1 // SPDX-License-Identifier: GPL-2.0 OR MIT
2 /*
3 * Copyright 2014-2022 Advanced Micro Devices, Inc.
4 *
5 * Permission is hereby granted, free of charge, to any person obtaining a
6 * copy of this software and associated documentation files (the "Software"),
7 * to deal in the Software without restriction, including without limitation
8 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
9 * and/or sell copies of the Software, and to permit persons to whom the
10 * Software is furnished to do so, subject to the following conditions:
11 *
12 * The above copyright notice and this permission notice shall be included in
13 * all copies or substantial portions of the Software.
14 *
15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
16 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
17 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
18 * THE COPYRIGHT HOLDER(S) OR AUTHOR(S) BE LIABLE FOR ANY CLAIM, DAMAGES OR
19 * OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
20 * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
21 * OTHER DEALINGS IN THE SOFTWARE.
22 *
23 */
24
25 #include <linux/slab.h>
26 #include <linux/mutex.h>
27 #include "kfd_device_queue_manager.h"
28 #include "kfd_kernel_queue.h"
29 #include "kfd_priv.h"
30
inc_wptr(unsigned int * wptr,unsigned int increment_bytes,unsigned int buffer_size_bytes)31 static inline void inc_wptr(unsigned int *wptr, unsigned int increment_bytes,
32 unsigned int buffer_size_bytes)
33 {
34 unsigned int temp = *wptr + increment_bytes / sizeof(uint32_t);
35
36 WARN((temp * sizeof(uint32_t)) > buffer_size_bytes,
37 "Runlist IB overflow");
38 *wptr = temp;
39 }
40
pm_calc_rlib_size(struct packet_manager * pm,unsigned int * rlib_size,bool * over_subscription)41 static void pm_calc_rlib_size(struct packet_manager *pm,
42 unsigned int *rlib_size,
43 bool *over_subscription)
44 {
45 unsigned int process_count, queue_count, compute_queue_count, gws_queue_count;
46 unsigned int map_queue_size;
47 unsigned int max_proc_per_quantum = 1;
48 struct kfd_node *dev = pm->dqm->dev;
49
50 process_count = pm->dqm->processes_count;
51 queue_count = pm->dqm->active_queue_count;
52 compute_queue_count = pm->dqm->active_cp_queue_count;
53 gws_queue_count = pm->dqm->gws_queue_count;
54
55 /* check if there is over subscription
56 * Note: the arbitration between the number of VMIDs and
57 * hws_max_conc_proc has been done in
58 * kgd2kfd_device_init().
59 */
60 *over_subscription = false;
61
62 if (dev->max_proc_per_quantum > 1)
63 max_proc_per_quantum = dev->max_proc_per_quantum;
64
65 if ((process_count > max_proc_per_quantum) ||
66 compute_queue_count > get_cp_queues_num(pm->dqm) ||
67 gws_queue_count > 1) {
68 *over_subscription = true;
69 pr_debug("Over subscribed runlist\n");
70 }
71
72 map_queue_size = pm->pmf->map_queues_size;
73 /* calculate run list ib allocation size */
74 *rlib_size = process_count * pm->pmf->map_process_size +
75 queue_count * map_queue_size;
76
77 /*
78 * Increase the allocation size in case we need a chained run list
79 * when over subscription
80 */
81 if (*over_subscription)
82 *rlib_size += pm->pmf->runlist_size;
83
84 pr_debug("runlist ib size %d\n", *rlib_size);
85 }
86
pm_allocate_runlist_ib(struct packet_manager * pm,unsigned int ** rl_buffer,uint64_t * rl_gpu_buffer,unsigned int * rl_buffer_size,bool * is_over_subscription)87 static int pm_allocate_runlist_ib(struct packet_manager *pm,
88 unsigned int **rl_buffer,
89 uint64_t *rl_gpu_buffer,
90 unsigned int *rl_buffer_size,
91 bool *is_over_subscription)
92 {
93 int retval;
94
95 if (WARN_ON(pm->allocated))
96 return -EINVAL;
97
98 pm_calc_rlib_size(pm, rl_buffer_size, is_over_subscription);
99
100 mutex_lock(&pm->lock);
101
102 retval = kfd_gtt_sa_allocate(pm->dqm->dev, *rl_buffer_size,
103 &pm->ib_buffer_obj);
104
105 if (retval) {
106 pr_err("Failed to allocate runlist IB\n");
107 goto out;
108 }
109
110 *(void **)rl_buffer = pm->ib_buffer_obj->cpu_ptr;
111 *rl_gpu_buffer = pm->ib_buffer_obj->gpu_addr;
112
113 memset(*rl_buffer, 0, *rl_buffer_size);
114 pm->allocated = true;
115
116 out:
117 mutex_unlock(&pm->lock);
118 return retval;
119 }
120
pm_create_runlist_ib(struct packet_manager * pm,struct list_head * queues,uint64_t * rl_gpu_addr,size_t * rl_size_bytes)121 static int pm_create_runlist_ib(struct packet_manager *pm,
122 struct list_head *queues,
123 uint64_t *rl_gpu_addr,
124 size_t *rl_size_bytes)
125 {
126 unsigned int alloc_size_bytes;
127 unsigned int *rl_buffer, rl_wptr, i;
128 int retval, processes_mapped;
129 struct device_process_node *cur;
130 struct qcm_process_device *qpd;
131 struct queue *q;
132 struct kernel_queue *kq;
133 bool is_over_subscription;
134
135 rl_wptr = retval = processes_mapped = 0;
136
137 retval = pm_allocate_runlist_ib(pm, &rl_buffer, rl_gpu_addr,
138 &alloc_size_bytes, &is_over_subscription);
139 if (retval)
140 return retval;
141
142 *rl_size_bytes = alloc_size_bytes;
143 pm->ib_size_bytes = alloc_size_bytes;
144
145 pr_debug("Building runlist ib process count: %d queues count %d\n",
146 pm->dqm->processes_count, pm->dqm->active_queue_count);
147
148 /* build the run list ib packet */
149 list_for_each_entry(cur, queues, list) {
150 qpd = cur->qpd;
151 /* build map process packet */
152 if (processes_mapped >= pm->dqm->processes_count) {
153 pr_debug("Not enough space left in runlist IB\n");
154 pm_release_ib(pm);
155 return -ENOMEM;
156 }
157
158 retval = pm->pmf->map_process(pm, &rl_buffer[rl_wptr], qpd);
159 if (retval)
160 return retval;
161
162 processes_mapped++;
163 inc_wptr(&rl_wptr, pm->pmf->map_process_size,
164 alloc_size_bytes);
165
166 list_for_each_entry(kq, &qpd->priv_queue_list, list) {
167 if (!kq->queue->properties.is_active)
168 continue;
169
170 pr_debug("static_queue, mapping kernel q %d, is debug status %d\n",
171 kq->queue->queue, qpd->is_debug);
172
173 retval = pm->pmf->map_queues(pm,
174 &rl_buffer[rl_wptr],
175 kq->queue,
176 qpd->is_debug);
177 if (retval)
178 return retval;
179
180 inc_wptr(&rl_wptr,
181 pm->pmf->map_queues_size,
182 alloc_size_bytes);
183 }
184
185 list_for_each_entry(q, &qpd->queues_list, list) {
186 if (!q->properties.is_active)
187 continue;
188
189 pr_debug("static_queue, mapping user queue %d, is debug status %d\n",
190 q->queue, qpd->is_debug);
191
192 retval = pm->pmf->map_queues(pm,
193 &rl_buffer[rl_wptr],
194 q,
195 qpd->is_debug);
196
197 if (retval)
198 return retval;
199
200 inc_wptr(&rl_wptr,
201 pm->pmf->map_queues_size,
202 alloc_size_bytes);
203 }
204 }
205
206 pr_debug("Finished map process and queues to runlist\n");
207
208 if (is_over_subscription) {
209 if (!pm->is_over_subscription)
210 pr_warn("Runlist is getting oversubscribed. Expect reduced ROCm performance.\n");
211 retval = pm->pmf->runlist(pm, &rl_buffer[rl_wptr],
212 *rl_gpu_addr,
213 alloc_size_bytes / sizeof(uint32_t),
214 true);
215 }
216 pm->is_over_subscription = is_over_subscription;
217
218 for (i = 0; i < alloc_size_bytes / sizeof(uint32_t); i++)
219 pr_debug("0x%2X ", rl_buffer[i]);
220 pr_debug("\n");
221
222 return retval;
223 }
224
pm_init(struct packet_manager * pm,struct device_queue_manager * dqm)225 int pm_init(struct packet_manager *pm, struct device_queue_manager *dqm)
226 {
227 switch (dqm->dev->adev->asic_type) {
228 case CHIP_KAVERI:
229 case CHIP_HAWAII:
230 /* PM4 packet structures on CIK are the same as on VI */
231 case CHIP_CARRIZO:
232 case CHIP_TONGA:
233 case CHIP_FIJI:
234 case CHIP_POLARIS10:
235 case CHIP_POLARIS11:
236 case CHIP_POLARIS12:
237 case CHIP_VEGAM:
238 pm->pmf = &kfd_vi_pm_funcs;
239 break;
240 default:
241 if (KFD_GC_VERSION(dqm->dev) == IP_VERSION(9, 4, 2) ||
242 KFD_GC_VERSION(dqm->dev) == IP_VERSION(9, 4, 3))
243 pm->pmf = &kfd_aldebaran_pm_funcs;
244 else if (KFD_GC_VERSION(dqm->dev) >= IP_VERSION(9, 0, 1))
245 pm->pmf = &kfd_v9_pm_funcs;
246 else {
247 WARN(1, "Unexpected ASIC family %u",
248 dqm->dev->adev->asic_type);
249 return -EINVAL;
250 }
251 }
252
253 pm->dqm = dqm;
254 mutex_init(&pm->lock);
255 pm->priv_queue = kernel_queue_init(dqm->dev, KFD_QUEUE_TYPE_HIQ);
256 if (!pm->priv_queue) {
257 mutex_destroy(&pm->lock);
258 return -ENOMEM;
259 }
260 pm->allocated = false;
261
262 return 0;
263 }
264
pm_uninit(struct packet_manager * pm,bool hanging)265 void pm_uninit(struct packet_manager *pm, bool hanging)
266 {
267 mutex_destroy(&pm->lock);
268 kernel_queue_uninit(pm->priv_queue, hanging);
269 pm->priv_queue = NULL;
270 }
271
pm_send_set_resources(struct packet_manager * pm,struct scheduling_resources * res)272 int pm_send_set_resources(struct packet_manager *pm,
273 struct scheduling_resources *res)
274 {
275 uint32_t *buffer, size;
276 int retval = 0;
277
278 size = pm->pmf->set_resources_size;
279 mutex_lock(&pm->lock);
280 kq_acquire_packet_buffer(pm->priv_queue,
281 size / sizeof(uint32_t),
282 (unsigned int **)&buffer);
283 if (!buffer) {
284 pr_err("Failed to allocate buffer on kernel queue\n");
285 retval = -ENOMEM;
286 goto out;
287 }
288
289 retval = pm->pmf->set_resources(pm, buffer, res);
290 if (!retval)
291 kq_submit_packet(pm->priv_queue);
292 else
293 kq_rollback_packet(pm->priv_queue);
294
295 out:
296 mutex_unlock(&pm->lock);
297
298 return retval;
299 }
300
pm_send_runlist(struct packet_manager * pm,struct list_head * dqm_queues)301 int pm_send_runlist(struct packet_manager *pm, struct list_head *dqm_queues)
302 {
303 uint64_t rl_gpu_ib_addr;
304 uint32_t *rl_buffer;
305 size_t rl_ib_size, packet_size_dwords;
306 int retval;
307
308 retval = pm_create_runlist_ib(pm, dqm_queues, &rl_gpu_ib_addr,
309 &rl_ib_size);
310 if (retval)
311 goto fail_create_runlist_ib;
312
313 pr_debug("runlist IB address: 0x%llX\n", rl_gpu_ib_addr);
314
315 packet_size_dwords = pm->pmf->runlist_size / sizeof(uint32_t);
316 mutex_lock(&pm->lock);
317
318 retval = kq_acquire_packet_buffer(pm->priv_queue,
319 packet_size_dwords, &rl_buffer);
320 if (retval)
321 goto fail_acquire_packet_buffer;
322
323 retval = pm->pmf->runlist(pm, rl_buffer, rl_gpu_ib_addr,
324 rl_ib_size / sizeof(uint32_t), false);
325 if (retval)
326 goto fail_create_runlist;
327
328 kq_submit_packet(pm->priv_queue);
329
330 mutex_unlock(&pm->lock);
331
332 return retval;
333
334 fail_create_runlist:
335 kq_rollback_packet(pm->priv_queue);
336 fail_acquire_packet_buffer:
337 mutex_unlock(&pm->lock);
338 fail_create_runlist_ib:
339 pm_release_ib(pm);
340 return retval;
341 }
342
pm_send_query_status(struct packet_manager * pm,uint64_t fence_address,uint64_t fence_value)343 int pm_send_query_status(struct packet_manager *pm, uint64_t fence_address,
344 uint64_t fence_value)
345 {
346 uint32_t *buffer, size;
347 int retval = 0;
348
349 if (WARN_ON(!fence_address))
350 return -EFAULT;
351
352 size = pm->pmf->query_status_size;
353 mutex_lock(&pm->lock);
354 kq_acquire_packet_buffer(pm->priv_queue,
355 size / sizeof(uint32_t), (unsigned int **)&buffer);
356 if (!buffer) {
357 pr_err("Failed to allocate buffer on kernel queue\n");
358 retval = -ENOMEM;
359 goto out;
360 }
361
362 retval = pm->pmf->query_status(pm, buffer, fence_address, fence_value);
363 if (!retval)
364 kq_submit_packet(pm->priv_queue);
365 else
366 kq_rollback_packet(pm->priv_queue);
367
368 out:
369 mutex_unlock(&pm->lock);
370 return retval;
371 }
372
pm_update_grace_period(struct packet_manager * pm,uint32_t grace_period)373 int pm_update_grace_period(struct packet_manager *pm, uint32_t grace_period)
374 {
375 int retval = 0;
376 uint32_t *buffer, size;
377
378 size = pm->pmf->set_grace_period_size;
379
380 mutex_lock(&pm->lock);
381
382 if (size) {
383 kq_acquire_packet_buffer(pm->priv_queue,
384 size / sizeof(uint32_t),
385 (unsigned int **)&buffer);
386
387 if (!buffer) {
388 pr_err("Failed to allocate buffer on kernel queue\n");
389 retval = -ENOMEM;
390 goto out;
391 }
392
393 retval = pm->pmf->set_grace_period(pm, buffer, grace_period);
394 if (!retval)
395 kq_submit_packet(pm->priv_queue);
396 else
397 kq_rollback_packet(pm->priv_queue);
398 }
399
400 out:
401 mutex_unlock(&pm->lock);
402 return retval;
403 }
404
pm_send_unmap_queue(struct packet_manager * pm,enum kfd_unmap_queues_filter filter,uint32_t filter_param,bool reset)405 int pm_send_unmap_queue(struct packet_manager *pm,
406 enum kfd_unmap_queues_filter filter,
407 uint32_t filter_param, bool reset)
408 {
409 uint32_t *buffer, size;
410 int retval = 0;
411
412 size = pm->pmf->unmap_queues_size;
413 mutex_lock(&pm->lock);
414 kq_acquire_packet_buffer(pm->priv_queue,
415 size / sizeof(uint32_t), (unsigned int **)&buffer);
416 if (!buffer) {
417 pr_err("Failed to allocate buffer on kernel queue\n");
418 retval = -ENOMEM;
419 goto out;
420 }
421
422 retval = pm->pmf->unmap_queues(pm, buffer, filter, filter_param, reset);
423 if (!retval)
424 kq_submit_packet(pm->priv_queue);
425 else
426 kq_rollback_packet(pm->priv_queue);
427
428 out:
429 mutex_unlock(&pm->lock);
430 return retval;
431 }
432
pm_release_ib(struct packet_manager * pm)433 void pm_release_ib(struct packet_manager *pm)
434 {
435 mutex_lock(&pm->lock);
436 if (pm->allocated) {
437 kfd_gtt_sa_free(pm->dqm->dev, pm->ib_buffer_obj);
438 pm->allocated = false;
439 }
440 mutex_unlock(&pm->lock);
441 }
442
443 #if defined(CONFIG_DEBUG_FS)
444
pm_debugfs_runlist(struct seq_file * m,void * data)445 int pm_debugfs_runlist(struct seq_file *m, void *data)
446 {
447 struct packet_manager *pm = data;
448
449 mutex_lock(&pm->lock);
450
451 if (!pm->allocated) {
452 seq_puts(m, " No active runlist\n");
453 goto out;
454 }
455
456 seq_hex_dump(m, " ", DUMP_PREFIX_OFFSET, 32, 4,
457 pm->ib_buffer_obj->cpu_ptr, pm->ib_size_bytes, false);
458
459 out:
460 mutex_unlock(&pm->lock);
461 return 0;
462 }
463
pm_debugfs_hang_hws(struct packet_manager * pm)464 int pm_debugfs_hang_hws(struct packet_manager *pm)
465 {
466 uint32_t *buffer, size;
467 int r = 0;
468
469 if (!pm->priv_queue)
470 return -EAGAIN;
471
472 size = pm->pmf->query_status_size;
473 mutex_lock(&pm->lock);
474 kq_acquire_packet_buffer(pm->priv_queue,
475 size / sizeof(uint32_t), (unsigned int **)&buffer);
476 if (!buffer) {
477 pr_err("Failed to allocate buffer on kernel queue\n");
478 r = -ENOMEM;
479 goto out;
480 }
481 memset(buffer, 0x55, size);
482 kq_submit_packet(pm->priv_queue);
483
484 pr_info("Submitting %x %x %x %x %x %x %x to HIQ to hang the HWS.",
485 buffer[0], buffer[1], buffer[2], buffer[3],
486 buffer[4], buffer[5], buffer[6]);
487 out:
488 mutex_unlock(&pm->lock);
489 return r;
490 }
491
492
493 #endif
494