2 * QEMU sPAPR IOMMU (TCE) code
4 * Copyright (c) 2010 David Gibson, IBM Corporation <dwg@au1.ibm.com>
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, see <http://www.gnu.org/licenses/>.
20 #include "sysemu/kvm.h"
23 #include "sysemu/dma.h"
24 #include "exec/address-spaces.h"
27 #include "hw/ppc/spapr.h"
38 #define IOMMU_PAGE_SIZE(shift) (1ULL << (shift))
39 #define IOMMU_PAGE_MASK(shift) (~(IOMMU_PAGE_SIZE(shift) - 1))
41 static QLIST_HEAD(spapr_tce_tables
, sPAPRTCETable
) spapr_tce_tables
;
43 static sPAPRTCETable
*spapr_tce_find_by_liobn(uint32_t liobn
)
47 if (liobn
& 0xFFFFFFFF00000000ULL
) {
48 hcall_dprintf("Request for out-of-bounds LIOBN 0x" TARGET_FMT_lx
"\n",
53 QLIST_FOREACH(tcet
, &spapr_tce_tables
, list
) {
54 if (tcet
->liobn
== liobn
) {
62 static IOMMUTLBEntry
spapr_tce_translate_iommu(MemoryRegion
*iommu
, hwaddr addr
,
65 sPAPRTCETable
*tcet
= container_of(iommu
, sPAPRTCETable
, iommu
);
68 .target_as
= &address_space_memory
,
71 .addr_mask
= ~(hwaddr
)0,
77 } else if ((addr
>> tcet
->page_shift
) < tcet
->nb_table
) {
78 /* Check if we are in bound */
79 hwaddr page_mask
= IOMMU_PAGE_MASK(tcet
->page_shift
);
81 tce
= tcet
->table
[addr
>> tcet
->page_shift
];
82 ret
.iova
= addr
& page_mask
;
83 ret
.translated_addr
= tce
& page_mask
;
84 ret
.addr_mask
= ~page_mask
;
85 ret
.perm
= tce
& IOMMU_RW
;
87 trace_spapr_iommu_xlate(tcet
->liobn
, addr
, ret
.iova
, ret
.perm
,
93 static const VMStateDescription vmstate_spapr_tce_table
= {
94 .name
= "spapr_iommu",
96 .minimum_version_id
= 2,
97 .fields
= (VMStateField
[]) {
99 VMSTATE_UINT32_EQUAL(liobn
, sPAPRTCETable
),
100 VMSTATE_UINT32_EQUAL(nb_table
, sPAPRTCETable
),
103 VMSTATE_BOOL(bypass
, sPAPRTCETable
),
104 VMSTATE_VARRAY_UINT32(table
, sPAPRTCETable
, nb_table
, 0, vmstate_info_uint64
, uint64_t),
106 VMSTATE_END_OF_LIST()
110 static MemoryRegionIOMMUOps spapr_iommu_ops
= {
111 .translate
= spapr_tce_translate_iommu
,
114 static int spapr_tce_table_realize(DeviceState
*dev
)
116 sPAPRTCETable
*tcet
= SPAPR_TCE_TABLE(dev
);
119 tcet
->table
= kvmppc_create_spapr_tce(tcet
->liobn
,
127 size_t table_size
= tcet
->nb_table
* sizeof(uint64_t);
128 tcet
->table
= g_malloc0(table_size
);
131 trace_spapr_iommu_new_table(tcet
->liobn
, tcet
, tcet
->table
, tcet
->fd
);
133 memory_region_init_iommu(&tcet
->iommu
, OBJECT(dev
), &spapr_iommu_ops
,
134 "iommu-spapr", ram_size
);
136 QLIST_INSERT_HEAD(&spapr_tce_tables
, tcet
, list
);
138 vmstate_register(DEVICE(tcet
), tcet
->liobn
, &vmstate_spapr_tce_table
,
144 sPAPRTCETable
*spapr_tce_new_table(DeviceState
*owner
, uint32_t liobn
,
152 if (spapr_tce_find_by_liobn(liobn
)) {
153 fprintf(stderr
, "Attempted to create TCE table with duplicate"
154 " LIOBN 0x%x\n", liobn
);
162 tcet
= SPAPR_TCE_TABLE(object_new(TYPE_SPAPR_TCE_TABLE
));
164 tcet
->bus_offset
= bus_offset
;
165 tcet
->page_shift
= page_shift
;
166 tcet
->nb_table
= nb_table
;
167 tcet
->vfio_accel
= vfio_accel
;
169 object_property_add_child(OBJECT(owner
), "tce-table", OBJECT(tcet
), NULL
);
171 object_property_set_bool(OBJECT(tcet
), true, "realized", NULL
);
176 static void spapr_tce_table_finalize(Object
*obj
)
178 sPAPRTCETable
*tcet
= SPAPR_TCE_TABLE(obj
);
180 QLIST_REMOVE(tcet
, list
);
182 if (!kvm_enabled() ||
183 (kvmppc_remove_spapr_tce(tcet
->table
, tcet
->fd
,
184 tcet
->nb_table
) != 0)) {
189 MemoryRegion
*spapr_tce_get_iommu(sPAPRTCETable
*tcet
)
194 void spapr_tce_set_bypass(sPAPRTCETable
*tcet
, bool bypass
)
196 tcet
->bypass
= bypass
;
199 static void spapr_tce_reset(DeviceState
*dev
)
201 sPAPRTCETable
*tcet
= SPAPR_TCE_TABLE(dev
);
202 size_t table_size
= tcet
->nb_table
* sizeof(uint64_t);
204 tcet
->bypass
= false;
205 memset(tcet
->table
, 0, table_size
);
208 static target_ulong
put_tce_emu(sPAPRTCETable
*tcet
, target_ulong ioba
,
212 hwaddr page_mask
= IOMMU_PAGE_MASK(tcet
->page_shift
);
213 unsigned long index
= (ioba
- tcet
->bus_offset
) >> tcet
->page_shift
;
215 if (index
>= tcet
->nb_table
) {
216 hcall_dprintf("spapr_vio_put_tce on out-of-bounds IOBA 0x"
217 TARGET_FMT_lx
"\n", ioba
);
221 tcet
->table
[index
] = tce
;
223 entry
.target_as
= &address_space_memory
,
224 entry
.iova
= ioba
& page_mask
;
225 entry
.translated_addr
= tce
& page_mask
;
226 entry
.addr_mask
= ~page_mask
;
227 entry
.perm
= tce
& IOMMU_RW
;
228 memory_region_notify_iommu(&tcet
->iommu
, entry
);
233 static target_ulong
h_put_tce_indirect(PowerPCCPU
*cpu
,
234 sPAPREnvironment
*spapr
,
235 target_ulong opcode
, target_ulong
*args
)
238 target_ulong liobn
= args
[0];
239 target_ulong ioba
= args
[1];
240 target_ulong ioba1
= ioba
;
241 target_ulong tce_list
= args
[2];
242 target_ulong npages
= args
[3];
243 target_ulong ret
= H_PARAMETER
;
244 sPAPRTCETable
*tcet
= spapr_tce_find_by_liobn(liobn
);
245 CPUState
*cs
= CPU(cpu
);
246 hwaddr page_mask
, page_size
;
252 if ((npages
> 512) || (tce_list
& SPAPR_TCE_PAGE_MASK
)) {
256 page_mask
= IOMMU_PAGE_MASK(tcet
->page_shift
);
257 page_size
= IOMMU_PAGE_SIZE(tcet
->page_shift
);
260 for (i
= 0; i
< npages
; ++i
, ioba
+= page_size
) {
261 target_ulong off
= (tce_list
& ~SPAPR_TCE_RW
) +
262 i
* sizeof(target_ulong
);
263 target_ulong tce
= ldq_phys(cs
->as
, off
);
265 ret
= put_tce_emu(tcet
, ioba
, tce
);
271 /* Trace last successful or the first problematic entry */
273 trace_spapr_iommu_indirect(liobn
, ioba1
, tce_list
, i
,
275 tce_list
+ i
* sizeof(target_ulong
)),
281 static target_ulong
h_stuff_tce(PowerPCCPU
*cpu
, sPAPREnvironment
*spapr
,
282 target_ulong opcode
, target_ulong
*args
)
285 target_ulong liobn
= args
[0];
286 target_ulong ioba
= args
[1];
287 target_ulong tce_value
= args
[2];
288 target_ulong npages
= args
[3];
289 target_ulong ret
= H_PARAMETER
;
290 sPAPRTCETable
*tcet
= spapr_tce_find_by_liobn(liobn
);
291 hwaddr page_mask
, page_size
;
297 if (npages
> tcet
->nb_table
) {
301 page_mask
= IOMMU_PAGE_MASK(tcet
->page_shift
);
302 page_size
= IOMMU_PAGE_SIZE(tcet
->page_shift
);
305 for (i
= 0; i
< npages
; ++i
, ioba
+= page_size
) {
306 ret
= put_tce_emu(tcet
, ioba
, tce_value
);
311 trace_spapr_iommu_stuff(liobn
, ioba
, tce_value
, npages
, ret
);
316 static target_ulong
h_put_tce(PowerPCCPU
*cpu
, sPAPREnvironment
*spapr
,
317 target_ulong opcode
, target_ulong
*args
)
319 target_ulong liobn
= args
[0];
320 target_ulong ioba
= args
[1];
321 target_ulong tce
= args
[2];
322 target_ulong ret
= H_PARAMETER
;
323 sPAPRTCETable
*tcet
= spapr_tce_find_by_liobn(liobn
);
326 hwaddr page_mask
= IOMMU_PAGE_MASK(tcet
->page_shift
);
330 ret
= put_tce_emu(tcet
, ioba
, tce
);
332 trace_spapr_iommu_put(liobn
, ioba
, tce
, ret
);
337 static target_ulong
get_tce_emu(sPAPRTCETable
*tcet
, target_ulong ioba
,
340 unsigned long index
= (ioba
- tcet
->bus_offset
) >> tcet
->page_shift
;
342 if (index
>= tcet
->nb_table
) {
343 hcall_dprintf("spapr_iommu_get_tce on out-of-bounds IOBA 0x"
344 TARGET_FMT_lx
"\n", ioba
);
348 *tce
= tcet
->table
[index
];
353 static target_ulong
h_get_tce(PowerPCCPU
*cpu
, sPAPREnvironment
*spapr
,
354 target_ulong opcode
, target_ulong
*args
)
356 target_ulong liobn
= args
[0];
357 target_ulong ioba
= args
[1];
358 target_ulong tce
= 0;
359 target_ulong ret
= H_PARAMETER
;
360 sPAPRTCETable
*tcet
= spapr_tce_find_by_liobn(liobn
);
363 hwaddr page_mask
= IOMMU_PAGE_MASK(tcet
->page_shift
);
367 ret
= get_tce_emu(tcet
, ioba
, &tce
);
372 trace_spapr_iommu_get(liobn
, ioba
, ret
, tce
);
377 int spapr_dma_dt(void *fdt
, int node_off
, const char *propname
,
378 uint32_t liobn
, uint64_t window
, uint32_t size
)
380 uint32_t dma_prop
[5];
383 dma_prop
[0] = cpu_to_be32(liobn
);
384 dma_prop
[1] = cpu_to_be32(window
>> 32);
385 dma_prop
[2] = cpu_to_be32(window
& 0xFFFFFFFF);
386 dma_prop
[3] = 0; /* window size is 32 bits */
387 dma_prop
[4] = cpu_to_be32(size
);
389 ret
= fdt_setprop_cell(fdt
, node_off
, "ibm,#dma-address-cells", 2);
394 ret
= fdt_setprop_cell(fdt
, node_off
, "ibm,#dma-size-cells", 2);
399 ret
= fdt_setprop(fdt
, node_off
, propname
, dma_prop
, sizeof(dma_prop
));
407 int spapr_tcet_dma_dt(void *fdt
, int node_off
, const char *propname
,
414 return spapr_dma_dt(fdt
, node_off
, propname
,
415 tcet
->liobn
, 0, tcet
->nb_table
<< tcet
->page_shift
);
418 static void spapr_tce_table_class_init(ObjectClass
*klass
, void *data
)
420 DeviceClass
*dc
= DEVICE_CLASS(klass
);
421 dc
->init
= spapr_tce_table_realize
;
422 dc
->reset
= spapr_tce_reset
;
424 QLIST_INIT(&spapr_tce_tables
);
427 spapr_register_hypercall(H_PUT_TCE
, h_put_tce
);
428 spapr_register_hypercall(H_GET_TCE
, h_get_tce
);
429 spapr_register_hypercall(H_PUT_TCE_INDIRECT
, h_put_tce_indirect
);
430 spapr_register_hypercall(H_STUFF_TCE
, h_stuff_tce
);
433 static TypeInfo spapr_tce_table_info
= {
434 .name
= TYPE_SPAPR_TCE_TABLE
,
435 .parent
= TYPE_DEVICE
,
436 .instance_size
= sizeof(sPAPRTCETable
),
437 .class_init
= spapr_tce_table_class_init
,
438 .instance_finalize
= spapr_tce_table_finalize
,
441 static void register_types(void)
443 type_register_static(&spapr_tce_table_info
);
446 type_init(register_types
);