xref: /openbmc/qemu/hw/pci-host/pnv_phb4_pec.c (revision 210aacb3)
1 /*
2  * QEMU PowerPC PowerNV (POWER9) PHB4 model
3  *
4  * Copyright (c) 2018-2020, IBM Corporation.
5  *
6  * This code is licensed under the GPL version 2 or later. See the
7  * COPYING file in the top-level directory.
8  */
9 #include "qemu/osdep.h"
10 #include "qapi/error.h"
11 #include "qemu/log.h"
12 #include "target/ppc/cpu.h"
13 #include "hw/ppc/fdt.h"
14 #include "hw/pci-host/pnv_phb4_regs.h"
15 #include "hw/pci-host/pnv_phb4.h"
16 #include "hw/ppc/pnv_xscom.h"
17 #include "hw/pci/pci_bridge.h"
18 #include "hw/pci/pci_bus.h"
19 #include "hw/ppc/pnv.h"
20 #include "hw/qdev-properties.h"
21 #include "sysemu/sysemu.h"
22 
23 #include <libfdt.h>
24 
25 #define phb_pec_error(pec, fmt, ...)                                    \
26     qemu_log_mask(LOG_GUEST_ERROR, "phb4_pec[%d:%d]: " fmt "\n",        \
27                   (pec)->chip_id, (pec)->index, ## __VA_ARGS__)
28 
29 
30 static uint64_t pnv_pec_nest_xscom_read(void *opaque, hwaddr addr,
31                                         unsigned size)
32 {
33     PnvPhb4PecState *pec = PNV_PHB4_PEC(opaque);
34     uint32_t reg = addr >> 3;
35 
36     /* TODO: add list of allowed registers and error out if not */
37     return pec->nest_regs[reg];
38 }
39 
40 static void pnv_pec_nest_xscom_write(void *opaque, hwaddr addr,
41                                      uint64_t val, unsigned size)
42 {
43     PnvPhb4PecState *pec = PNV_PHB4_PEC(opaque);
44     uint32_t reg = addr >> 3;
45 
46     switch (reg) {
47     case PEC_NEST_PBCQ_HW_CONFIG:
48     case PEC_NEST_DROP_PRIO_CTRL:
49     case PEC_NEST_PBCQ_ERR_INJECT:
50     case PEC_NEST_PCI_NEST_CLK_TRACE_CTL:
51     case PEC_NEST_PBCQ_PMON_CTRL:
52     case PEC_NEST_PBCQ_PBUS_ADDR_EXT:
53     case PEC_NEST_PBCQ_PRED_VEC_TIMEOUT:
54     case PEC_NEST_CAPP_CTRL:
55     case PEC_NEST_PBCQ_READ_STK_OVR:
56     case PEC_NEST_PBCQ_WRITE_STK_OVR:
57     case PEC_NEST_PBCQ_STORE_STK_OVR:
58     case PEC_NEST_PBCQ_RETRY_BKOFF_CTRL:
59         pec->nest_regs[reg] = val;
60         break;
61     default:
62         phb_pec_error(pec, "%s @0x%"HWADDR_PRIx"=%"PRIx64"\n", __func__,
63                       addr, val);
64     }
65 }
66 
67 static const MemoryRegionOps pnv_pec_nest_xscom_ops = {
68     .read = pnv_pec_nest_xscom_read,
69     .write = pnv_pec_nest_xscom_write,
70     .valid.min_access_size = 8,
71     .valid.max_access_size = 8,
72     .impl.min_access_size = 8,
73     .impl.max_access_size = 8,
74     .endianness = DEVICE_BIG_ENDIAN,
75 };
76 
77 static uint64_t pnv_pec_pci_xscom_read(void *opaque, hwaddr addr,
78                                        unsigned size)
79 {
80     PnvPhb4PecState *pec = PNV_PHB4_PEC(opaque);
81     uint32_t reg = addr >> 3;
82 
83     /* TODO: add list of allowed registers and error out if not */
84     return pec->pci_regs[reg];
85 }
86 
87 static void pnv_pec_pci_xscom_write(void *opaque, hwaddr addr,
88                                     uint64_t val, unsigned size)
89 {
90     PnvPhb4PecState *pec = PNV_PHB4_PEC(opaque);
91     uint32_t reg = addr >> 3;
92 
93     switch (reg) {
94     case PEC_PCI_PBAIB_HW_CONFIG:
95     case PEC_PCI_PBAIB_READ_STK_OVR:
96         pec->pci_regs[reg] = val;
97         break;
98     default:
99         phb_pec_error(pec, "%s @0x%"HWADDR_PRIx"=%"PRIx64"\n", __func__,
100                       addr, val);
101     }
102 }
103 
104 static const MemoryRegionOps pnv_pec_pci_xscom_ops = {
105     .read = pnv_pec_pci_xscom_read,
106     .write = pnv_pec_pci_xscom_write,
107     .valid.min_access_size = 8,
108     .valid.max_access_size = 8,
109     .impl.min_access_size = 8,
110     .impl.max_access_size = 8,
111     .endianness = DEVICE_BIG_ENDIAN,
112 };
113 
114 static void pnv_pec_default_phb_realize(PnvPhb4PecState *pec,
115                                         int stack_no,
116                                         Error **errp)
117 {
118     PnvPHB *phb = PNV_PHB(qdev_new(TYPE_PNV_PHB));
119     int phb_id = pnv_phb4_pec_get_phb_id(pec, stack_no);
120 
121     object_property_add_child(OBJECT(pec), "phb[*]", OBJECT(phb));
122     object_property_set_link(OBJECT(phb), "pec", OBJECT(pec),
123                              &error_abort);
124     object_property_set_int(OBJECT(phb), "chip-id", pec->chip_id,
125                             &error_fatal);
126     object_property_set_int(OBJECT(phb), "index", phb_id,
127                             &error_fatal);
128 
129     if (!sysbus_realize(SYS_BUS_DEVICE(phb), errp)) {
130         return;
131     }
132 }
133 
134 static void pnv_pec_realize(DeviceState *dev, Error **errp)
135 {
136     PnvPhb4PecState *pec = PNV_PHB4_PEC(dev);
137     PnvPhb4PecClass *pecc = PNV_PHB4_PEC_GET_CLASS(pec);
138     char name[64];
139     int i;
140 
141     if (pec->index >= PNV_CHIP_GET_CLASS(pec->chip)->num_pecs) {
142         error_setg(errp, "invalid PEC index: %d", pec->index);
143         return;
144     }
145 
146     pec->num_phbs = pecc->num_phbs[pec->index];
147 
148     /* Create PHBs if running with defaults */
149     for (i = 0; i < pec->num_phbs; i++) {
150         pnv_pec_default_phb_realize(pec, i, errp);
151     }
152 
153     /* Initialize the XSCOM regions for the PEC registers */
154     snprintf(name, sizeof(name), "xscom-pec-%d.%d-nest", pec->chip_id,
155              pec->index);
156     pnv_xscom_region_init(&pec->nest_regs_mr, OBJECT(dev),
157                           &pnv_pec_nest_xscom_ops, pec, name,
158                           PHB4_PEC_NEST_REGS_COUNT);
159 
160     snprintf(name, sizeof(name), "xscom-pec-%d.%d-pci", pec->chip_id,
161              pec->index);
162     pnv_xscom_region_init(&pec->pci_regs_mr, OBJECT(dev),
163                           &pnv_pec_pci_xscom_ops, pec, name,
164                           PHB4_PEC_PCI_REGS_COUNT);
165 }
166 
167 static int pnv_pec_dt_xscom(PnvXScomInterface *dev, void *fdt,
168                             int xscom_offset)
169 {
170     PnvPhb4PecState *pec = PNV_PHB4_PEC(dev);
171     PnvPhb4PecClass *pecc = PNV_PHB4_PEC_GET_CLASS(dev);
172     uint32_t nbase = pecc->xscom_nest_base(pec);
173     uint32_t pbase = pecc->xscom_pci_base(pec);
174     int offset, i;
175     char *name;
176     uint32_t reg[] = {
177         cpu_to_be32(nbase),
178         cpu_to_be32(pecc->xscom_nest_size),
179         cpu_to_be32(pbase),
180         cpu_to_be32(pecc->xscom_pci_size),
181     };
182 
183     name = g_strdup_printf("pbcq@%x", nbase);
184     offset = fdt_add_subnode(fdt, xscom_offset, name);
185     _FDT(offset);
186     g_free(name);
187 
188     _FDT((fdt_setprop(fdt, offset, "reg", reg, sizeof(reg))));
189 
190     _FDT((fdt_setprop_cell(fdt, offset, "ibm,pec-index", pec->index)));
191     _FDT((fdt_setprop_cell(fdt, offset, "#address-cells", 1)));
192     _FDT((fdt_setprop_cell(fdt, offset, "#size-cells", 0)));
193     _FDT((fdt_setprop(fdt, offset, "compatible", pecc->compat,
194                       pecc->compat_size)));
195 
196     for (i = 0; i < pec->num_phbs; i++) {
197         int phb_id = pnv_phb4_pec_get_phb_id(pec, i);
198         int stk_offset;
199 
200         name = g_strdup_printf("stack@%x", i);
201         stk_offset = fdt_add_subnode(fdt, offset, name);
202         _FDT(stk_offset);
203         g_free(name);
204         _FDT((fdt_setprop(fdt, stk_offset, "compatible", pecc->stk_compat,
205                           pecc->stk_compat_size)));
206         _FDT((fdt_setprop_cell(fdt, stk_offset, "reg", i)));
207         _FDT((fdt_setprop_cell(fdt, stk_offset, "ibm,phb-index", phb_id)));
208     }
209 
210     return 0;
211 }
212 
213 static Property pnv_pec_properties[] = {
214     DEFINE_PROP_UINT32("index", PnvPhb4PecState, index, 0),
215     DEFINE_PROP_UINT32("chip-id", PnvPhb4PecState, chip_id, 0),
216     DEFINE_PROP_LINK("chip", PnvPhb4PecState, chip, TYPE_PNV_CHIP,
217                      PnvChip *),
218     DEFINE_PROP_END_OF_LIST(),
219 };
220 
221 static uint32_t pnv_pec_xscom_pci_base(PnvPhb4PecState *pec)
222 {
223     return PNV9_XSCOM_PEC_PCI_BASE + 0x1000000 * pec->index;
224 }
225 
226 static uint32_t pnv_pec_xscom_nest_base(PnvPhb4PecState *pec)
227 {
228     return PNV9_XSCOM_PEC_NEST_BASE + 0x400 * pec->index;
229 }
230 
231 /*
232  * PEC0 -> 1 phb
233  * PEC1 -> 2 phb
234  * PEC2 -> 3 phbs
235  */
236 static const uint32_t pnv_pec_num_phbs[] = { 1, 2, 3 };
237 
238 static void pnv_pec_class_init(ObjectClass *klass, void *data)
239 {
240     DeviceClass *dc = DEVICE_CLASS(klass);
241     PnvXScomInterfaceClass *xdc = PNV_XSCOM_INTERFACE_CLASS(klass);
242     PnvPhb4PecClass *pecc = PNV_PHB4_PEC_CLASS(klass);
243     static const char compat[] = "ibm,power9-pbcq";
244     static const char stk_compat[] = "ibm,power9-phb-stack";
245 
246     xdc->dt_xscom = pnv_pec_dt_xscom;
247 
248     dc->realize = pnv_pec_realize;
249     device_class_set_props(dc, pnv_pec_properties);
250     dc->user_creatable = false;
251 
252     pecc->xscom_nest_base = pnv_pec_xscom_nest_base;
253     pecc->xscom_pci_base  = pnv_pec_xscom_pci_base;
254     pecc->xscom_nest_size = PNV9_XSCOM_PEC_NEST_SIZE;
255     pecc->xscom_pci_size  = PNV9_XSCOM_PEC_PCI_SIZE;
256     pecc->compat = compat;
257     pecc->compat_size = sizeof(compat);
258     pecc->stk_compat = stk_compat;
259     pecc->stk_compat_size = sizeof(stk_compat);
260     pecc->version = PNV_PHB4_VERSION;
261     pecc->phb_type = TYPE_PNV_PHB4;
262     pecc->num_phbs = pnv_pec_num_phbs;
263     pecc->rp_model = TYPE_PNV_PHB4_ROOT_PORT;
264 }
265 
266 static const TypeInfo pnv_pec_type_info = {
267     .name          = TYPE_PNV_PHB4_PEC,
268     .parent        = TYPE_DEVICE,
269     .instance_size = sizeof(PnvPhb4PecState),
270     .class_init    = pnv_pec_class_init,
271     .class_size    = sizeof(PnvPhb4PecClass),
272     .interfaces    = (InterfaceInfo[]) {
273         { TYPE_PNV_XSCOM_INTERFACE },
274         { }
275     }
276 };
277 
278 /*
279  * POWER10 definitions
280  */
281 
282 static uint32_t pnv_phb5_pec_xscom_pci_base(PnvPhb4PecState *pec)
283 {
284     return PNV10_XSCOM_PEC_PCI_BASE + 0x1000000 * pec->index;
285 }
286 
287 static uint32_t pnv_phb5_pec_xscom_nest_base(PnvPhb4PecState *pec)
288 {
289     /* index goes down ... */
290     return PNV10_XSCOM_PEC_NEST_BASE - 0x1000000 * pec->index;
291 }
292 
293 /*
294  * PEC0 -> 3 stacks
295  * PEC1 -> 3 stacks
296  */
297 static const uint32_t pnv_phb5_pec_num_stacks[] = { 3, 3 };
298 
299 static void pnv_phb5_pec_class_init(ObjectClass *klass, void *data)
300 {
301     PnvPhb4PecClass *pecc = PNV_PHB4_PEC_CLASS(klass);
302     static const char compat[] = "ibm,power10-pbcq";
303     static const char stk_compat[] = "ibm,power10-phb-stack";
304 
305     pecc->xscom_nest_base = pnv_phb5_pec_xscom_nest_base;
306     pecc->xscom_pci_base  = pnv_phb5_pec_xscom_pci_base;
307     pecc->xscom_nest_size = PNV10_XSCOM_PEC_NEST_SIZE;
308     pecc->xscom_pci_size  = PNV10_XSCOM_PEC_PCI_SIZE;
309     pecc->compat = compat;
310     pecc->compat_size = sizeof(compat);
311     pecc->stk_compat = stk_compat;
312     pecc->stk_compat_size = sizeof(stk_compat);
313     pecc->version = PNV_PHB5_VERSION;
314     pecc->phb_type = TYPE_PNV_PHB5;
315     pecc->num_phbs = pnv_phb5_pec_num_stacks;
316     pecc->rp_model = TYPE_PNV_PHB5_ROOT_PORT;
317 }
318 
319 static const TypeInfo pnv_phb5_pec_type_info = {
320     .name          = TYPE_PNV_PHB5_PEC,
321     .parent        = TYPE_PNV_PHB4_PEC,
322     .instance_size = sizeof(PnvPhb4PecState),
323     .class_init    = pnv_phb5_pec_class_init,
324     .class_size    = sizeof(PnvPhb4PecClass),
325     .interfaces    = (InterfaceInfo[]) {
326         { TYPE_PNV_XSCOM_INTERFACE },
327         { }
328     }
329 };
330 
331 static void pnv_pec_register_types(void)
332 {
333     type_register_static(&pnv_pec_type_info);
334     type_register_static(&pnv_phb5_pec_type_info);
335 }
336 
337 type_init(pnv_pec_register_types);
338