;; Scheduling description for z900 (cpu 2064).
|
;; Scheduling description for z900 (cpu 2064).
|
;; Copyright (C) 2003, 2004, 2005, 2007 Free Software Foundation, Inc.
|
;; Copyright (C) 2003, 2004, 2005, 2007 Free Software Foundation, Inc.
|
;; Contributed by Hartmut Penner (hpenner@de.ibm.com) and
|
;; Contributed by Hartmut Penner (hpenner@de.ibm.com) and
|
;; Ulrich Weigand (uweigand@de.ibm.com).
|
;; Ulrich Weigand (uweigand@de.ibm.com).
|
|
|
;; This file is part of GCC.
|
;; This file is part of GCC.
|
|
|
;; GCC is free software; you can redistribute it and/or modify it under
|
;; GCC is free software; you can redistribute it and/or modify it under
|
;; the terms of the GNU General Public License as published by the Free
|
;; the terms of the GNU General Public License as published by the Free
|
;; Software Foundation; either version 3, or (at your option) any later
|
;; Software Foundation; either version 3, or (at your option) any later
|
;; version.
|
;; version.
|
|
|
;; GCC is distributed in the hope that it will be useful, but WITHOUT ANY
|
;; GCC is distributed in the hope that it will be useful, but WITHOUT ANY
|
;; WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
;; WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
;; FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
;; FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
;; for more details.
|
;; for more details.
|
|
|
;; You should have received a copy of the GNU General Public License
|
;; You should have received a copy of the GNU General Public License
|
;; along with GCC; see the file COPYING3. If not see
|
;; along with GCC; see the file COPYING3. If not see
|
;; .
|
;; .
|
|
|
;;
|
;;
|
;; References:
|
;; References:
|
;; The microarchitecture of the IBM eServer z900 processor.
|
;; The microarchitecture of the IBM eServer z900 processor.
|
;; E.M. Schwarz et al.
|
;; E.M. Schwarz et al.
|
;; IBM Journal of Research and Development Vol. 46 No 4/5, 2002.
|
;; IBM Journal of Research and Development Vol. 46 No 4/5, 2002.
|
;;
|
;;
|
;; z900 (cpu 2064) pipeline
|
;; z900 (cpu 2064) pipeline
|
;;
|
;;
|
;; dec
|
;; dec
|
;; --> | <---
|
;; --> | <---
|
;; LA bypass | agen |
|
;; LA bypass | agen |
|
;; | | |
|
;; | | |
|
;; --- c1 | Load bypass
|
;; --- c1 | Load bypass
|
;; | |
|
;; | |
|
;; c2----
|
;; c2----
|
;; |
|
;; |
|
;; e1
|
;; e1
|
;; |
|
;; |
|
;; wr
|
;; wr
|
|
|
;; This scheduler description is also used for the g5 and g6.
|
;; This scheduler description is also used for the g5 and g6.
|
|
|
(define_automaton "z_ipu")
|
(define_automaton "z_ipu")
|
(define_cpu_unit "z_e1" "z_ipu")
|
(define_cpu_unit "z_e1" "z_ipu")
|
(define_cpu_unit "z_wr" "z_ipu")
|
(define_cpu_unit "z_wr" "z_ipu")
|
|
|
|
|
(define_insn_reservation "z_la" 1
|
(define_insn_reservation "z_la" 1
|
(and (eq_attr "cpu" "z900,g5,g6")
|
(and (eq_attr "cpu" "z900,g5,g6")
|
(eq_attr "type" "la"))
|
(eq_attr "type" "la"))
|
"z_e1,z_wr")
|
"z_e1,z_wr")
|
|
|
(define_insn_reservation "z_larl" 1
|
(define_insn_reservation "z_larl" 1
|
(and (eq_attr "cpu" "z900,g5,g6")
|
(and (eq_attr "cpu" "z900,g5,g6")
|
(eq_attr "type" "larl"))
|
(eq_attr "type" "larl"))
|
"z_e1,z_wr")
|
"z_e1,z_wr")
|
|
|
(define_insn_reservation "z_load" 1
|
(define_insn_reservation "z_load" 1
|
(and (eq_attr "cpu" "z900,g5,g6")
|
(and (eq_attr "cpu" "z900,g5,g6")
|
(eq_attr "type" "load"))
|
(eq_attr "type" "load"))
|
"z_e1,z_wr")
|
"z_e1,z_wr")
|
|
|
(define_insn_reservation "z_store" 1
|
(define_insn_reservation "z_store" 1
|
(and (eq_attr "cpu" "z900,g5,g6")
|
(and (eq_attr "cpu" "z900,g5,g6")
|
(eq_attr "type" "store"))
|
(eq_attr "type" "store"))
|
"z_e1,z_wr")
|
"z_e1,z_wr")
|
|
|
(define_insn_reservation "z_sem" 2
|
(define_insn_reservation "z_sem" 2
|
(and (eq_attr "cpu" "z900,g5,g6")
|
(and (eq_attr "cpu" "z900,g5,g6")
|
(eq_attr "type" "sem"))
|
(eq_attr "type" "sem"))
|
"z_e1*2,z_wr")
|
"z_e1*2,z_wr")
|
|
|
(define_insn_reservation "z_call" 5
|
(define_insn_reservation "z_call" 5
|
(and (eq_attr "cpu" "z900,g5,g6")
|
(and (eq_attr "cpu" "z900,g5,g6")
|
(eq_attr "type" "jsr"))
|
(eq_attr "type" "jsr"))
|
"z_e1*5,z_wr")
|
"z_e1*5,z_wr")
|
|
|
(define_insn_reservation "z_mul" 5
|
(define_insn_reservation "z_mul" 5
|
(and (eq_attr "cpu" "g5,g6,z900")
|
(and (eq_attr "cpu" "g5,g6,z900")
|
(eq_attr "type" "imulsi,imulhi"))
|
(eq_attr "type" "imulsi,imulhi"))
|
"z_e1*5,z_wr")
|
"z_e1*5,z_wr")
|
|
|
(define_insn_reservation "z_inf" 10
|
(define_insn_reservation "z_inf" 10
|
(and (eq_attr "cpu" "g5,g6,z900")
|
(and (eq_attr "cpu" "g5,g6,z900")
|
(eq_attr "type" "idiv,imuldi"))
|
(eq_attr "type" "idiv,imuldi"))
|
"z_e1*10,z_wr")
|
"z_e1*10,z_wr")
|
|
|
;; For everything else we check the atype flag.
|
;; For everything else we check the atype flag.
|
|
|
(define_insn_reservation "z_int" 1
|
(define_insn_reservation "z_int" 1
|
(and (eq_attr "cpu" "z900,g5,g6")
|
(and (eq_attr "cpu" "z900,g5,g6")
|
(and (not (eq_attr "type" "la,larl,load,store,jsr"))
|
(and (not (eq_attr "type" "la,larl,load,store,jsr"))
|
(eq_attr "atype" "reg")))
|
(eq_attr "atype" "reg")))
|
"z_e1,z_wr")
|
"z_e1,z_wr")
|
|
|
(define_insn_reservation "z_agen" 1
|
(define_insn_reservation "z_agen" 1
|
(and (eq_attr "cpu" "z900,g5,g6")
|
(and (eq_attr "cpu" "z900,g5,g6")
|
(and (not (eq_attr "type" "la,larl,load,store,jsr"))
|
(and (not (eq_attr "type" "la,larl,load,store,jsr"))
|
(eq_attr "atype" "agen")))
|
(eq_attr "atype" "agen")))
|
"z_e1,z_wr")
|
"z_e1,z_wr")
|
|
|
;;
|
;;
|
;; s390_agen_dep_p returns 1, if a register is set in the
|
;; s390_agen_dep_p returns 1, if a register is set in the
|
;; first insn and used in the dependent insn to form a address.
|
;; first insn and used in the dependent insn to form a address.
|
;;
|
;;
|
|
|
;;
|
;;
|
;; If an instruction uses a register to address memory, it needs
|
;; If an instruction uses a register to address memory, it needs
|
;; to be set 5 cycles in advance.
|
;; to be set 5 cycles in advance.
|
;;
|
;;
|
|
|
(define_bypass 5 "z_int,z_agen"
|
(define_bypass 5 "z_int,z_agen"
|
"z_agen,z_la,z_call,z_load,z_store" "s390_agen_dep_p")
|
"z_agen,z_la,z_call,z_load,z_store" "s390_agen_dep_p")
|
|
|
;;
|
;;
|
;; A load type instruction uses a bypass to feed the result back
|
;; A load type instruction uses a bypass to feed the result back
|
;; to the address generation pipeline stage.
|
;; to the address generation pipeline stage.
|
;;
|
;;
|
|
|
(define_bypass 3 "z_load"
|
(define_bypass 3 "z_load"
|
"z_agen,z_la,z_call,z_load,z_store" "s390_agen_dep_p")
|
"z_agen,z_la,z_call,z_load,z_store" "s390_agen_dep_p")
|
|
|
;;
|
;;
|
;; A load address type instruction uses a bypass to feed the
|
;; A load address type instruction uses a bypass to feed the
|
;; result back to the address generation pipeline stage.
|
;; result back to the address generation pipeline stage.
|
;;
|
;;
|
|
|
(define_bypass 2 "z_larl,z_la"
|
(define_bypass 2 "z_larl,z_la"
|
"z_agen,z_la,z_call,z_load,z_store" "s390_agen_dep_p")
|
"z_agen,z_la,z_call,z_load,z_store" "s390_agen_dep_p")
|
|
|
|
|
|
|
|
|
|
|
|
|
