1 /* 2 * QEMU PowerPC pSeries Logical Partition (aka sPAPR) hardware System Emulator 3 * 4 * PAPR Virtualized Interrupt System, aka ICS/ICP aka xics 5 * 6 * Copyright (c) 2010,2011 David Gibson, IBM Corporation. 7 * 8 * Permission is hereby granted, free of charge, to any person obtaining a copy 9 * of this software and associated documentation files (the "Software"), to deal 10 * in the Software without restriction, including without limitation the rights 11 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell 12 * copies of the Software, and to permit persons to whom the Software is 13 * furnished to do so, subject to the following conditions: 14 * 15 * The above copyright notice and this permission notice shall be included in 16 * all copies or substantial portions of the Software. 17 * 18 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR 19 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, 20 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL 21 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER 22 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, 23 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN 24 * THE SOFTWARE. 25 * 26 */ 27 28 #include "qemu/osdep.h" 29 #include "cpu.h" 30 #include "hw/hw.h" 31 #include "trace.h" 32 #include "qemu/timer.h" 33 #include "hw/ppc/spapr.h" 34 #include "hw/ppc/xics.h" 35 #include "hw/ppc/fdt.h" 36 #include "qapi/visitor.h" 37 38 /* 39 * Guest interfaces 40 */ 41 42 static target_ulong h_cppr(PowerPCCPU *cpu, sPAPRMachineState *spapr, 43 target_ulong opcode, target_ulong *args) 44 { 45 target_ulong cppr = args[0]; 46 47 icp_set_cppr(ICP(cpu->intc), cppr); 48 return H_SUCCESS; 49 } 50 51 static target_ulong h_ipi(PowerPCCPU *cpu, sPAPRMachineState *spapr, 52 target_ulong opcode, target_ulong *args) 53 { 54 target_ulong mfrr = args[1]; 55 ICPState *icp = xics_icp_get(XICS_FABRIC(spapr), args[0]); 56 57 if (!icp) { 58 return H_PARAMETER; 59 } 60 61 icp_set_mfrr(icp, mfrr); 62 return H_SUCCESS; 63 } 64 65 static target_ulong h_xirr(PowerPCCPU *cpu, sPAPRMachineState *spapr, 66 target_ulong opcode, target_ulong *args) 67 { 68 uint32_t xirr = icp_accept(ICP(cpu->intc)); 69 70 args[0] = xirr; 71 return H_SUCCESS; 72 } 73 74 static target_ulong h_xirr_x(PowerPCCPU *cpu, sPAPRMachineState *spapr, 75 target_ulong opcode, target_ulong *args) 76 { 77 uint32_t xirr = icp_accept(ICP(cpu->intc)); 78 79 args[0] = xirr; 80 args[1] = cpu_get_host_ticks(); 81 return H_SUCCESS; 82 } 83 84 static target_ulong h_eoi(PowerPCCPU *cpu, sPAPRMachineState *spapr, 85 target_ulong opcode, target_ulong *args) 86 { 87 target_ulong xirr = args[0]; 88 89 icp_eoi(ICP(cpu->intc), xirr); 90 return H_SUCCESS; 91 } 92 93 static target_ulong h_ipoll(PowerPCCPU *cpu, sPAPRMachineState *spapr, 94 target_ulong opcode, target_ulong *args) 95 { 96 uint32_t mfrr; 97 uint32_t xirr = icp_ipoll(ICP(cpu->intc), &mfrr); 98 99 args[0] = xirr; 100 args[1] = mfrr; 101 102 return H_SUCCESS; 103 } 104 105 static void rtas_set_xive(PowerPCCPU *cpu, sPAPRMachineState *spapr, 106 uint32_t token, 107 uint32_t nargs, target_ulong args, 108 uint32_t nret, target_ulong rets) 109 { 110 ICSState *ics = spapr->ics; 111 uint32_t nr, srcno, server, priority; 112 113 if ((nargs != 3) || (nret != 1)) { 114 rtas_st(rets, 0, RTAS_OUT_PARAM_ERROR); 115 return; 116 } 117 if (!ics) { 118 rtas_st(rets, 0, RTAS_OUT_HW_ERROR); 119 return; 120 } 121 122 nr = rtas_ld(args, 0); 123 server = rtas_ld(args, 1); 124 priority = rtas_ld(args, 2); 125 126 if (!ics_valid_irq(ics, nr) || !xics_icp_get(XICS_FABRIC(spapr), server) 127 || (priority > 0xff)) { 128 rtas_st(rets, 0, RTAS_OUT_PARAM_ERROR); 129 return; 130 } 131 132 srcno = nr - ics->offset; 133 ics_simple_write_xive(ics, srcno, server, priority, priority); 134 135 rtas_st(rets, 0, RTAS_OUT_SUCCESS); 136 } 137 138 static void rtas_get_xive(PowerPCCPU *cpu, sPAPRMachineState *spapr, 139 uint32_t token, 140 uint32_t nargs, target_ulong args, 141 uint32_t nret, target_ulong rets) 142 { 143 ICSState *ics = spapr->ics; 144 uint32_t nr, srcno; 145 146 if ((nargs != 1) || (nret != 3)) { 147 rtas_st(rets, 0, RTAS_OUT_PARAM_ERROR); 148 return; 149 } 150 if (!ics) { 151 rtas_st(rets, 0, RTAS_OUT_HW_ERROR); 152 return; 153 } 154 155 nr = rtas_ld(args, 0); 156 157 if (!ics_valid_irq(ics, nr)) { 158 rtas_st(rets, 0, RTAS_OUT_PARAM_ERROR); 159 return; 160 } 161 162 rtas_st(rets, 0, RTAS_OUT_SUCCESS); 163 srcno = nr - ics->offset; 164 rtas_st(rets, 1, ics->irqs[srcno].server); 165 rtas_st(rets, 2, ics->irqs[srcno].priority); 166 } 167 168 static void rtas_int_off(PowerPCCPU *cpu, sPAPRMachineState *spapr, 169 uint32_t token, 170 uint32_t nargs, target_ulong args, 171 uint32_t nret, target_ulong rets) 172 { 173 ICSState *ics = spapr->ics; 174 uint32_t nr, srcno; 175 176 if ((nargs != 1) || (nret != 1)) { 177 rtas_st(rets, 0, RTAS_OUT_PARAM_ERROR); 178 return; 179 } 180 if (!ics) { 181 rtas_st(rets, 0, RTAS_OUT_HW_ERROR); 182 return; 183 } 184 185 nr = rtas_ld(args, 0); 186 187 if (!ics_valid_irq(ics, nr)) { 188 rtas_st(rets, 0, RTAS_OUT_PARAM_ERROR); 189 return; 190 } 191 192 srcno = nr - ics->offset; 193 ics_simple_write_xive(ics, srcno, ics->irqs[srcno].server, 0xff, 194 ics->irqs[srcno].priority); 195 196 rtas_st(rets, 0, RTAS_OUT_SUCCESS); 197 } 198 199 static void rtas_int_on(PowerPCCPU *cpu, sPAPRMachineState *spapr, 200 uint32_t token, 201 uint32_t nargs, target_ulong args, 202 uint32_t nret, target_ulong rets) 203 { 204 ICSState *ics = spapr->ics; 205 uint32_t nr, srcno; 206 207 if ((nargs != 1) || (nret != 1)) { 208 rtas_st(rets, 0, RTAS_OUT_PARAM_ERROR); 209 return; 210 } 211 if (!ics) { 212 rtas_st(rets, 0, RTAS_OUT_HW_ERROR); 213 return; 214 } 215 216 nr = rtas_ld(args, 0); 217 218 if (!ics_valid_irq(ics, nr)) { 219 rtas_st(rets, 0, RTAS_OUT_PARAM_ERROR); 220 return; 221 } 222 223 srcno = nr - ics->offset; 224 ics_simple_write_xive(ics, srcno, ics->irqs[srcno].server, 225 ics->irqs[srcno].saved_priority, 226 ics->irqs[srcno].saved_priority); 227 228 rtas_st(rets, 0, RTAS_OUT_SUCCESS); 229 } 230 231 void xics_spapr_init(sPAPRMachineState *spapr) 232 { 233 /* Registration of global state belongs into realize */ 234 spapr_rtas_register(RTAS_IBM_SET_XIVE, "ibm,set-xive", rtas_set_xive); 235 spapr_rtas_register(RTAS_IBM_GET_XIVE, "ibm,get-xive", rtas_get_xive); 236 spapr_rtas_register(RTAS_IBM_INT_OFF, "ibm,int-off", rtas_int_off); 237 spapr_rtas_register(RTAS_IBM_INT_ON, "ibm,int-on", rtas_int_on); 238 239 spapr_register_hypercall(H_CPPR, h_cppr); 240 spapr_register_hypercall(H_IPI, h_ipi); 241 spapr_register_hypercall(H_XIRR, h_xirr); 242 spapr_register_hypercall(H_XIRR_X, h_xirr_x); 243 spapr_register_hypercall(H_EOI, h_eoi); 244 spapr_register_hypercall(H_IPOLL, h_ipoll); 245 } 246 247 void spapr_dt_xics(int nr_servers, void *fdt, uint32_t phandle) 248 { 249 uint32_t interrupt_server_ranges_prop[] = { 250 0, cpu_to_be32(nr_servers), 251 }; 252 int node; 253 254 _FDT(node = fdt_add_subnode(fdt, 0, "interrupt-controller")); 255 256 _FDT(fdt_setprop_string(fdt, node, "device_type", 257 "PowerPC-External-Interrupt-Presentation")); 258 _FDT(fdt_setprop_string(fdt, node, "compatible", "IBM,ppc-xicp")); 259 _FDT(fdt_setprop(fdt, node, "interrupt-controller", NULL, 0)); 260 _FDT(fdt_setprop(fdt, node, "ibm,interrupt-server-ranges", 261 interrupt_server_ranges_prop, 262 sizeof(interrupt_server_ranges_prop))); 263 _FDT(fdt_setprop_cell(fdt, node, "#interrupt-cells", 2)); 264 _FDT(fdt_setprop_cell(fdt, node, "linux,phandle", phandle)); 265 _FDT(fdt_setprop_cell(fdt, node, "phandle", phandle)); 266 } 267