1/*
2 * Copyright 2011 Advanced Micro Devices, Inc.
3 * All Rights Reserved.
4 *
5 * Permission is hereby granted, free of charge, to any person obtaining a
6 * copy of this software and associated documentation files (the
7 * "Software"), to deal in the Software without restriction, including
8 * without limitation the rights to use, copy, modify, merge, publish,
9 * distribute, sub license, and/or sell copies of the Software, and to
10 * permit persons to whom the Software is furnished to do so, subject to
11 * the following conditions:
12 *
13 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
14 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
15 * FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT. IN NO EVENT SHALL
16 * THE COPYRIGHT HOLDERS, AUTHORS AND/OR ITS SUPPLIERS BE LIABLE FOR ANY CLAIM,
17 * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR
18 * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE
19 * USE OR OTHER DEALINGS IN THE SOFTWARE.
20 *
21 * The above copyright notice and this permission notice (including the
22 * next paragraph) shall be included in all copies or substantial portions
23 * of the Software.
24 *
25 */
26/*
27 * Authors:
28 *    Christian König <deathsimple@vodafone.de>
29 */
30
31#include <linux/firmware.h>
32#include <linux/module.h>
33
34#include <drm/drm.h>
35
36#include "radeon.h"
37#include "radeon_ucode.h"
38#include "r600d.h"
39
40/* 1 second timeout */
41#define UVD_IDLE_TIMEOUT_MS	1000
42
43/* Firmware Names */
44#define FIRMWARE_R600		"radeon/R600_uvd.bin"
45#define FIRMWARE_RS780		"radeon/RS780_uvd.bin"
46#define FIRMWARE_RV770		"radeon/RV770_uvd.bin"
47#define FIRMWARE_RV710		"radeon/RV710_uvd.bin"
48#define FIRMWARE_CYPRESS	"radeon/CYPRESS_uvd.bin"
49#define FIRMWARE_SUMO		"radeon/SUMO_uvd.bin"
50#define FIRMWARE_TAHITI		"radeon/TAHITI_uvd.bin"
51#define FIRMWARE_BONAIRE_LEGACY	"radeon/BONAIRE_uvd.bin"
52#define FIRMWARE_BONAIRE	"radeon/bonaire_uvd.bin"
53
54MODULE_FIRMWARE(FIRMWARE_R600);
55MODULE_FIRMWARE(FIRMWARE_RS780);
56MODULE_FIRMWARE(FIRMWARE_RV770);
57MODULE_FIRMWARE(FIRMWARE_RV710);
58MODULE_FIRMWARE(FIRMWARE_CYPRESS);
59MODULE_FIRMWARE(FIRMWARE_SUMO);
60MODULE_FIRMWARE(FIRMWARE_TAHITI);
61MODULE_FIRMWARE(FIRMWARE_BONAIRE_LEGACY);
62MODULE_FIRMWARE(FIRMWARE_BONAIRE);
63
64static void radeon_uvd_idle_work_handler(struct work_struct *work);
65
66int radeon_uvd_init(struct radeon_device *rdev)
67{
68	unsigned long bo_size;
69	const char *fw_name = NULL, *legacy_fw_name = NULL;
70	int i, r;
71
72	INIT_DELAYED_WORK(&rdev->uvd.idle_work, radeon_uvd_idle_work_handler);
73
74	switch (rdev->family) {
75	case CHIP_RV610:
76	case CHIP_RV630:
77	case CHIP_RV670:
78	case CHIP_RV620:
79	case CHIP_RV635:
80		legacy_fw_name = FIRMWARE_R600;
81		break;
82
83	case CHIP_RS780:
84	case CHIP_RS880:
85		legacy_fw_name = FIRMWARE_RS780;
86		break;
87
88	case CHIP_RV770:
89		legacy_fw_name = FIRMWARE_RV770;
90		break;
91
92	case CHIP_RV710:
93	case CHIP_RV730:
94	case CHIP_RV740:
95		legacy_fw_name = FIRMWARE_RV710;
96		break;
97
98	case CHIP_CYPRESS:
99	case CHIP_HEMLOCK:
100	case CHIP_JUNIPER:
101	case CHIP_REDWOOD:
102	case CHIP_CEDAR:
103		legacy_fw_name = FIRMWARE_CYPRESS;
104		break;
105
106	case CHIP_SUMO:
107	case CHIP_SUMO2:
108	case CHIP_PALM:
109	case CHIP_CAYMAN:
110	case CHIP_BARTS:
111	case CHIP_TURKS:
112	case CHIP_CAICOS:
113		legacy_fw_name = FIRMWARE_SUMO;
114		break;
115
116	case CHIP_TAHITI:
117	case CHIP_VERDE:
118	case CHIP_PITCAIRN:
119	case CHIP_ARUBA:
120	case CHIP_OLAND:
121		legacy_fw_name = FIRMWARE_TAHITI;
122		break;
123
124	case CHIP_BONAIRE:
125	case CHIP_KABINI:
126	case CHIP_KAVERI:
127	case CHIP_HAWAII:
128	case CHIP_MULLINS:
129		legacy_fw_name = FIRMWARE_BONAIRE_LEGACY;
130		fw_name = FIRMWARE_BONAIRE;
131		break;
132
133	default:
134		return -EINVAL;
135	}
136
137	rdev->uvd.fw_header_present = false;
138	rdev->uvd.max_handles = RADEON_DEFAULT_UVD_HANDLES;
139	if (fw_name) {
140		/* Let's try to load the newer firmware first */
141		r = request_firmware(&rdev->uvd_fw, fw_name, rdev->dev);
142		if (r) {
143			dev_err(rdev->dev, "radeon_uvd: Can't load firmware \"%s\"\n",
144				fw_name);
145		} else {
146			struct common_firmware_header *hdr = (void *)rdev->uvd_fw->data;
147			unsigned version_major, version_minor, family_id;
148
149			r = radeon_ucode_validate(rdev->uvd_fw);
150			if (r)
151				return r;
152
153			rdev->uvd.fw_header_present = true;
154
155			family_id = le32_to_cpu(hdr->ucode_version) & 0xff;
156			version_major = (le32_to_cpu(hdr->ucode_version) >> 24) & 0xff;
157			version_minor = (le32_to_cpu(hdr->ucode_version) >> 8) & 0xff;
158			DRM_INFO("Found UVD firmware Version: %hu.%hu Family ID: %hu\n",
159				 version_major, version_minor, family_id);
160
161			/*
162			 * Limit the number of UVD handles depending on
163			 * microcode major and minor versions.
164			 */
165			if ((version_major >= 0x01) && (version_minor >= 0x37))
166				rdev->uvd.max_handles = RADEON_MAX_UVD_HANDLES;
167		}
168	}
169
170	/*
171	 * In case there is only legacy firmware, or we encounter an error
172	 * while loading the new firmware, we fall back to loading the legacy
173	 * firmware now.
174	 */
175	if (!fw_name || r) {
176		r = request_firmware(&rdev->uvd_fw, legacy_fw_name, rdev->dev);
177		if (r) {
178			dev_err(rdev->dev, "radeon_uvd: Can't load firmware \"%s\"\n",
179				legacy_fw_name);
180			return r;
181		}
182	}
183
184	bo_size = RADEON_GPU_PAGE_ALIGN(rdev->uvd_fw->size + 8) +
185		  RADEON_UVD_STACK_SIZE + RADEON_UVD_HEAP_SIZE +
186		  RADEON_UVD_SESSION_SIZE * rdev->uvd.max_handles;
187	r = radeon_bo_create(rdev, bo_size, PAGE_SIZE, true,
188			     RADEON_GEM_DOMAIN_VRAM, 0, NULL,
189			     NULL, &rdev->uvd.vcpu_bo);
190	if (r) {
191		dev_err(rdev->dev, "(%d) failed to allocate UVD bo\n", r);
192		return r;
193	}
194
195	r = radeon_bo_reserve(rdev->uvd.vcpu_bo, false);
196	if (r) {
197		radeon_bo_unref(&rdev->uvd.vcpu_bo);
198		dev_err(rdev->dev, "(%d) failed to reserve UVD bo\n", r);
199		return r;
200	}
201
202	r = radeon_bo_pin(rdev->uvd.vcpu_bo, RADEON_GEM_DOMAIN_VRAM,
203			  &rdev->uvd.gpu_addr);
204	if (r) {
205		radeon_bo_unreserve(rdev->uvd.vcpu_bo);
206		radeon_bo_unref(&rdev->uvd.vcpu_bo);
207		dev_err(rdev->dev, "(%d) UVD bo pin failed\n", r);
208		return r;
209	}
210
211	r = radeon_bo_kmap(rdev->uvd.vcpu_bo, &rdev->uvd.cpu_addr);
212	if (r) {
213		dev_err(rdev->dev, "(%d) UVD map failed\n", r);
214		return r;
215	}
216
217	radeon_bo_unreserve(rdev->uvd.vcpu_bo);
218
219	for (i = 0; i < rdev->uvd.max_handles; ++i) {
220		atomic_set(&rdev->uvd.handles[i], 0);
221		rdev->uvd.filp[i] = NULL;
222		rdev->uvd.img_size[i] = 0;
223	}
224
225	return 0;
226}
227
228void radeon_uvd_fini(struct radeon_device *rdev)
229{
230	int r;
231
232	if (rdev->uvd.vcpu_bo == NULL)
233		return;
234
235	r = radeon_bo_reserve(rdev->uvd.vcpu_bo, false);
236	if (!r) {
237		radeon_bo_kunmap(rdev->uvd.vcpu_bo);
238		radeon_bo_unpin(rdev->uvd.vcpu_bo);
239		radeon_bo_unreserve(rdev->uvd.vcpu_bo);
240	}
241
242	radeon_bo_unref(&rdev->uvd.vcpu_bo);
243
244	radeon_ring_fini(rdev, &rdev->ring[R600_RING_TYPE_UVD_INDEX]);
245
246	release_firmware(rdev->uvd_fw);
247}
248
249int radeon_uvd_suspend(struct radeon_device *rdev)
250{
251	int i, r;
252
253	if (rdev->uvd.vcpu_bo == NULL)
254		return 0;
255
256	for (i = 0; i < rdev->uvd.max_handles; ++i) {
257		uint32_t handle = atomic_read(&rdev->uvd.handles[i]);
258		if (handle != 0) {
259			struct radeon_fence *fence;
260
261			radeon_uvd_note_usage(rdev);
262
263			r = radeon_uvd_get_destroy_msg(rdev,
264				R600_RING_TYPE_UVD_INDEX, handle, &fence);
265			if (r) {
266				DRM_ERROR("Error destroying UVD (%d)!\n", r);
267				continue;
268			}
269
270			radeon_fence_wait(fence, false);
271			radeon_fence_unref(&fence);
272
273			rdev->uvd.filp[i] = NULL;
274			atomic_set(&rdev->uvd.handles[i], 0);
275		}
276	}
277
278	return 0;
279}
280
281int radeon_uvd_resume(struct radeon_device *rdev)
282{
283	unsigned size;
284	void *ptr;
285
286	if (rdev->uvd.vcpu_bo == NULL)
287		return -EINVAL;
288
289	memcpy_toio((void __iomem *)rdev->uvd.cpu_addr, rdev->uvd_fw->data, rdev->uvd_fw->size);
290
291	size = radeon_bo_size(rdev->uvd.vcpu_bo);
292	size -= rdev->uvd_fw->size;
293
294	ptr = rdev->uvd.cpu_addr;
295	ptr += rdev->uvd_fw->size;
296
297	memset_io((void __iomem *)ptr, 0, size);
298
299	return 0;
300}
301
302void radeon_uvd_force_into_uvd_segment(struct radeon_bo *rbo,
303				       uint32_t allowed_domains)
304{
305	int i;
306
307	for (i = 0; i < rbo->placement.num_placement; ++i) {
308		rbo->placements[i].fpfn = 0 >> PAGE_SHIFT;
309		rbo->placements[i].lpfn = (256 * 1024 * 1024) >> PAGE_SHIFT;
310	}
311
312	/* If it must be in VRAM it must be in the first segment as well */
313	if (allowed_domains == RADEON_GEM_DOMAIN_VRAM)
314		return;
315
316	/* abort if we already have more than one placement */
317	if (rbo->placement.num_placement > 1)
318		return;
319
320	/* add another 256MB segment */
321	rbo->placements[1] = rbo->placements[0];
322	rbo->placements[1].fpfn += (256 * 1024 * 1024) >> PAGE_SHIFT;
323	rbo->placements[1].lpfn += (256 * 1024 * 1024) >> PAGE_SHIFT;
324	rbo->placement.num_placement++;
325	rbo->placement.num_busy_placement++;
326}
327
328void radeon_uvd_free_handles(struct radeon_device *rdev, struct drm_file *filp)
329{
330	int i, r;
331	for (i = 0; i < rdev->uvd.max_handles; ++i) {
332		uint32_t handle = atomic_read(&rdev->uvd.handles[i]);
333		if (handle != 0 && rdev->uvd.filp[i] == filp) {
334			struct radeon_fence *fence;
335
336			radeon_uvd_note_usage(rdev);
337
338			r = radeon_uvd_get_destroy_msg(rdev,
339				R600_RING_TYPE_UVD_INDEX, handle, &fence);
340			if (r) {
341				DRM_ERROR("Error destroying UVD (%d)!\n", r);
342				continue;
343			}
344
345			radeon_fence_wait(fence, false);
346			radeon_fence_unref(&fence);
347
348			rdev->uvd.filp[i] = NULL;
349			atomic_set(&rdev->uvd.handles[i], 0);
350		}
351	}
352}
353
354static int radeon_uvd_cs_msg_decode(uint32_t *msg, unsigned buf_sizes[])
355{
356	unsigned stream_type = msg[4];
357	unsigned width = msg[6];
358	unsigned height = msg[7];
359	unsigned dpb_size = msg[9];
360	unsigned pitch = msg[28];
361
362	unsigned width_in_mb = width / 16;
363	unsigned height_in_mb = ALIGN(height / 16, 2);
364
365	unsigned image_size, tmp, min_dpb_size;
366
367	image_size = width * height;
368	image_size += image_size / 2;
369	image_size = ALIGN(image_size, 1024);
370
371	switch (stream_type) {
372	case 0: /* H264 */
373
374		/* reference picture buffer */
375		min_dpb_size = image_size * 17;
376
377		/* macroblock context buffer */
378		min_dpb_size += width_in_mb * height_in_mb * 17 * 192;
379
380		/* IT surface buffer */
381		min_dpb_size += width_in_mb * height_in_mb * 32;
382		break;
383
384	case 1: /* VC1 */
385
386		/* reference picture buffer */
387		min_dpb_size = image_size * 3;
388
389		/* CONTEXT_BUFFER */
390		min_dpb_size += width_in_mb * height_in_mb * 128;
391
392		/* IT surface buffer */
393		min_dpb_size += width_in_mb * 64;
394
395		/* DB surface buffer */
396		min_dpb_size += width_in_mb * 128;
397
398		/* BP */
399		tmp = max(width_in_mb, height_in_mb);
400		min_dpb_size += ALIGN(tmp * 7 * 16, 64);
401		break;
402
403	case 3: /* MPEG2 */
404
405		/* reference picture buffer */
406		min_dpb_size = image_size * 3;
407		break;
408
409	case 4: /* MPEG4 */
410
411		/* reference picture buffer */
412		min_dpb_size = image_size * 3;
413
414		/* CM */
415		min_dpb_size += width_in_mb * height_in_mb * 64;
416
417		/* IT surface buffer */
418		min_dpb_size += ALIGN(width_in_mb * height_in_mb * 32, 64);
419		break;
420
421	default:
422		DRM_ERROR("UVD codec not handled %d!\n", stream_type);
423		return -EINVAL;
424	}
425
426	if (width > pitch) {
427		DRM_ERROR("Invalid UVD decoding target pitch!\n");
428		return -EINVAL;
429	}
430
431	if (dpb_size < min_dpb_size) {
432		DRM_ERROR("Invalid dpb_size in UVD message (%d / %d)!\n",
433			  dpb_size, min_dpb_size);
434		return -EINVAL;
435	}
436
437	buf_sizes[0x1] = dpb_size;
438	buf_sizes[0x2] = image_size;
439	return 0;
440}
441
442static int radeon_uvd_validate_codec(struct radeon_cs_parser *p,
443				     unsigned stream_type)
444{
445	switch (stream_type) {
446	case 0: /* H264 */
447	case 1: /* VC1 */
448		/* always supported */
449		return 0;
450
451	case 3: /* MPEG2 */
452	case 4: /* MPEG4 */
453		/* only since UVD 3 */
454		if (p->rdev->family >= CHIP_PALM)
455			return 0;
456
457		fallthrough;
458	default:
459		DRM_ERROR("UVD codec not supported by hardware %d!\n",
460			  stream_type);
461		return -EINVAL;
462	}
463}
464
465static int radeon_uvd_cs_msg(struct radeon_cs_parser *p, struct radeon_bo *bo,
466			     unsigned offset, unsigned buf_sizes[])
467{
468	int32_t *msg, msg_type, handle;
469	unsigned img_size = 0;
470	struct dma_fence *f;
471	void *ptr;
472
473	int i, r;
474
475	if (offset & 0x3F) {
476		DRM_ERROR("UVD messages must be 64 byte aligned!\n");
477		return -EINVAL;
478	}
479
480	f = dma_resv_get_excl(bo->tbo.base.resv);
481	if (f) {
482		r = radeon_fence_wait((struct radeon_fence *)f, false);
483		if (r) {
484			DRM_ERROR("Failed waiting for UVD message (%d)!\n", r);
485			return r;
486		}
487	}
488
489	r = radeon_bo_kmap(bo, &ptr);
490	if (r) {
491		DRM_ERROR("Failed mapping the UVD message (%d)!\n", r);
492		return r;
493	}
494
495	msg = ptr + offset;
496
497	msg_type = msg[1];
498	handle = msg[2];
499
500	if (handle == 0) {
501		DRM_ERROR("Invalid UVD handle!\n");
502		return -EINVAL;
503	}
504
505	switch (msg_type) {
506	case 0:
507		/* it's a create msg, calc image size (width * height) */
508		img_size = msg[7] * msg[8];
509
510		r = radeon_uvd_validate_codec(p, msg[4]);
511		radeon_bo_kunmap(bo);
512		if (r)
513			return r;
514
515		/* try to alloc a new handle */
516		for (i = 0; i < p->rdev->uvd.max_handles; ++i) {
517			if (atomic_read(&p->rdev->uvd.handles[i]) == handle) {
518				DRM_ERROR("Handle 0x%x already in use!\n", handle);
519				return -EINVAL;
520			}
521
522			if (!atomic_cmpxchg(&p->rdev->uvd.handles[i], 0, handle)) {
523				p->rdev->uvd.filp[i] = p->filp;
524				p->rdev->uvd.img_size[i] = img_size;
525				return 0;
526			}
527		}
528
529		DRM_ERROR("No more free UVD handles!\n");
530		return -EINVAL;
531
532	case 1:
533		/* it's a decode msg, validate codec and calc buffer sizes */
534		r = radeon_uvd_validate_codec(p, msg[4]);
535		if (!r)
536			r = radeon_uvd_cs_msg_decode(msg, buf_sizes);
537		radeon_bo_kunmap(bo);
538		if (r)
539			return r;
540
541		/* validate the handle */
542		for (i = 0; i < p->rdev->uvd.max_handles; ++i) {
543			if (atomic_read(&p->rdev->uvd.handles[i]) == handle) {
544				if (p->rdev->uvd.filp[i] != p->filp) {
545					DRM_ERROR("UVD handle collision detected!\n");
546					return -EINVAL;
547				}
548				return 0;
549			}
550		}
551
552		DRM_ERROR("Invalid UVD handle 0x%x!\n", handle);
553		return -ENOENT;
554
555	case 2:
556		/* it's a destroy msg, free the handle */
557		for (i = 0; i < p->rdev->uvd.max_handles; ++i)
558			atomic_cmpxchg(&p->rdev->uvd.handles[i], handle, 0);
559		radeon_bo_kunmap(bo);
560		return 0;
561
562	default:
563
564		DRM_ERROR("Illegal UVD message type (%d)!\n", msg_type);
565		return -EINVAL;
566	}
567
568	BUG();
569	return -EINVAL;
570}
571
572static int radeon_uvd_cs_reloc(struct radeon_cs_parser *p,
573			       int data0, int data1,
574			       unsigned buf_sizes[], bool *has_msg_cmd)
575{
576	struct radeon_cs_chunk *relocs_chunk;
577	struct radeon_bo_list *reloc;
578	unsigned idx, cmd, offset;
579	uint64_t start, end;
580	int r;
581
582	relocs_chunk = p->chunk_relocs;
583	offset = radeon_get_ib_value(p, data0);
584	idx = radeon_get_ib_value(p, data1);
585	if (idx >= relocs_chunk->length_dw) {
586		DRM_ERROR("Relocs at %d after relocations chunk end %d !\n",
587			  idx, relocs_chunk->length_dw);
588		return -EINVAL;
589	}
590
591	reloc = &p->relocs[(idx / 4)];
592	start = reloc->gpu_offset;
593	end = start + radeon_bo_size(reloc->robj);
594	start += offset;
595
596	p->ib.ptr[data0] = start & 0xFFFFFFFF;
597	p->ib.ptr[data1] = start >> 32;
598
599	cmd = radeon_get_ib_value(p, p->idx) >> 1;
600
601	if (cmd < 0x4) {
602		if (end <= start) {
603			DRM_ERROR("invalid reloc offset %X!\n", offset);
604			return -EINVAL;
605		}
606		if ((end - start) < buf_sizes[cmd]) {
607			DRM_ERROR("buffer (%d) to small (%d / %d)!\n", cmd,
608				  (unsigned)(end - start), buf_sizes[cmd]);
609			return -EINVAL;
610		}
611
612	} else if (cmd != 0x100) {
613		DRM_ERROR("invalid UVD command %X!\n", cmd);
614		return -EINVAL;
615	}
616
617	if ((start >> 28) != ((end - 1) >> 28)) {
618		DRM_ERROR("reloc %LX-%LX crossing 256MB boundary!\n",
619			  start, end);
620		return -EINVAL;
621	}
622
623	/* TODO: is this still necessary on NI+ ? */
624	if ((cmd == 0 || cmd == 0x3) &&
625	    (start >> 28) != (p->rdev->uvd.gpu_addr >> 28)) {
626		DRM_ERROR("msg/fb buffer %LX-%LX out of 256MB segment!\n",
627			  start, end);
628		return -EINVAL;
629	}
630
631	if (cmd == 0) {
632		if (*has_msg_cmd) {
633			DRM_ERROR("More than one message in a UVD-IB!\n");
634			return -EINVAL;
635		}
636		*has_msg_cmd = true;
637		r = radeon_uvd_cs_msg(p, reloc->robj, offset, buf_sizes);
638		if (r)
639			return r;
640	} else if (!*has_msg_cmd) {
641		DRM_ERROR("Message needed before other commands are send!\n");
642		return -EINVAL;
643	}
644
645	return 0;
646}
647
648static int radeon_uvd_cs_reg(struct radeon_cs_parser *p,
649			     struct radeon_cs_packet *pkt,
650			     int *data0, int *data1,
651			     unsigned buf_sizes[],
652			     bool *has_msg_cmd)
653{
654	int i, r;
655
656	p->idx++;
657	for (i = 0; i <= pkt->count; ++i) {
658		switch (pkt->reg + i*4) {
659		case UVD_GPCOM_VCPU_DATA0:
660			*data0 = p->idx;
661			break;
662		case UVD_GPCOM_VCPU_DATA1:
663			*data1 = p->idx;
664			break;
665		case UVD_GPCOM_VCPU_CMD:
666			r = radeon_uvd_cs_reloc(p, *data0, *data1,
667						buf_sizes, has_msg_cmd);
668			if (r)
669				return r;
670			break;
671		case UVD_ENGINE_CNTL:
672		case UVD_NO_OP:
673			break;
674		default:
675			DRM_ERROR("Invalid reg 0x%X!\n",
676				  pkt->reg + i*4);
677			return -EINVAL;
678		}
679		p->idx++;
680	}
681	return 0;
682}
683
684int radeon_uvd_cs_parse(struct radeon_cs_parser *p)
685{
686	struct radeon_cs_packet pkt;
687	int r, data0 = 0, data1 = 0;
688
689	/* does the IB has a msg command */
690	bool has_msg_cmd = false;
691
692	/* minimum buffer sizes */
693	unsigned buf_sizes[] = {
694		[0x00000000]	=	2048,
695		[0x00000001]	=	32 * 1024 * 1024,
696		[0x00000002]	=	2048 * 1152 * 3,
697		[0x00000003]	=	2048,
698	};
699
700	if (p->chunk_ib->length_dw % 16) {
701		DRM_ERROR("UVD IB length (%d) not 16 dwords aligned!\n",
702			  p->chunk_ib->length_dw);
703		return -EINVAL;
704	}
705
706	if (p->chunk_relocs == NULL) {
707		DRM_ERROR("No relocation chunk !\n");
708		return -EINVAL;
709	}
710
711
712	do {
713		r = radeon_cs_packet_parse(p, &pkt, p->idx);
714		if (r)
715			return r;
716		switch (pkt.type) {
717		case RADEON_PACKET_TYPE0:
718			r = radeon_uvd_cs_reg(p, &pkt, &data0, &data1,
719					      buf_sizes, &has_msg_cmd);
720			if (r)
721				return r;
722			break;
723		case RADEON_PACKET_TYPE2:
724			p->idx += pkt.count + 2;
725			break;
726		default:
727			DRM_ERROR("Unknown packet type %d !\n", pkt.type);
728			return -EINVAL;
729		}
730	} while (p->idx < p->chunk_ib->length_dw);
731
732	if (!has_msg_cmd) {
733		DRM_ERROR("UVD-IBs need a msg command!\n");
734		return -EINVAL;
735	}
736
737	return 0;
738}
739
740static int radeon_uvd_send_msg(struct radeon_device *rdev,
741			       int ring, uint64_t addr,
742			       struct radeon_fence **fence)
743{
744	struct radeon_ib ib;
745	int i, r;
746
747	r = radeon_ib_get(rdev, ring, &ib, NULL, 64);
748	if (r)
749		return r;
750
751	ib.ptr[0] = PACKET0(UVD_GPCOM_VCPU_DATA0, 0);
752	ib.ptr[1] = addr;
753	ib.ptr[2] = PACKET0(UVD_GPCOM_VCPU_DATA1, 0);
754	ib.ptr[3] = addr >> 32;
755	ib.ptr[4] = PACKET0(UVD_GPCOM_VCPU_CMD, 0);
756	ib.ptr[5] = 0;
757	for (i = 6; i < 16; i += 2) {
758		ib.ptr[i] = PACKET0(UVD_NO_OP, 0);
759		ib.ptr[i+1] = 0;
760	}
761	ib.length_dw = 16;
762
763	r = radeon_ib_schedule(rdev, &ib, NULL, false);
764
765	if (fence)
766		*fence = radeon_fence_ref(ib.fence);
767
768	radeon_ib_free(rdev, &ib);
769	return r;
770}
771
772/*
773 * multiple fence commands without any stream commands in between can
774 * crash the vcpu so just try to emmit a dummy create/destroy msg to
775 * avoid this
776 */
777int radeon_uvd_get_create_msg(struct radeon_device *rdev, int ring,
778			      uint32_t handle, struct radeon_fence **fence)
779{
780	/* we use the last page of the vcpu bo for the UVD message */
781	uint64_t offs = radeon_bo_size(rdev->uvd.vcpu_bo) -
782		RADEON_GPU_PAGE_SIZE;
783
784	uint32_t *msg = rdev->uvd.cpu_addr + offs;
785	uint64_t addr = rdev->uvd.gpu_addr + offs;
786
787	int r, i;
788
789	r = radeon_bo_reserve(rdev->uvd.vcpu_bo, true);
790	if (r)
791		return r;
792
793	/* stitch together an UVD create msg */
794	msg[0] = cpu_to_le32(0x00000de4);
795	msg[1] = cpu_to_le32(0x00000000);
796	msg[2] = cpu_to_le32(handle);
797	msg[3] = cpu_to_le32(0x00000000);
798	msg[4] = cpu_to_le32(0x00000000);
799	msg[5] = cpu_to_le32(0x00000000);
800	msg[6] = cpu_to_le32(0x00000000);
801	msg[7] = cpu_to_le32(0x00000780);
802	msg[8] = cpu_to_le32(0x00000440);
803	msg[9] = cpu_to_le32(0x00000000);
804	msg[10] = cpu_to_le32(0x01b37000);
805	for (i = 11; i < 1024; ++i)
806		msg[i] = cpu_to_le32(0x0);
807
808	r = radeon_uvd_send_msg(rdev, ring, addr, fence);
809	radeon_bo_unreserve(rdev->uvd.vcpu_bo);
810	return r;
811}
812
813int radeon_uvd_get_destroy_msg(struct radeon_device *rdev, int ring,
814			       uint32_t handle, struct radeon_fence **fence)
815{
816	/* we use the last page of the vcpu bo for the UVD message */
817	uint64_t offs = radeon_bo_size(rdev->uvd.vcpu_bo) -
818		RADEON_GPU_PAGE_SIZE;
819
820	uint32_t *msg = rdev->uvd.cpu_addr + offs;
821	uint64_t addr = rdev->uvd.gpu_addr + offs;
822
823	int r, i;
824
825	r = radeon_bo_reserve(rdev->uvd.vcpu_bo, true);
826	if (r)
827		return r;
828
829	/* stitch together an UVD destroy msg */
830	msg[0] = cpu_to_le32(0x00000de4);
831	msg[1] = cpu_to_le32(0x00000002);
832	msg[2] = cpu_to_le32(handle);
833	msg[3] = cpu_to_le32(0x00000000);
834	for (i = 4; i < 1024; ++i)
835		msg[i] = cpu_to_le32(0x0);
836
837	r = radeon_uvd_send_msg(rdev, ring, addr, fence);
838	radeon_bo_unreserve(rdev->uvd.vcpu_bo);
839	return r;
840}
841
842/**
843 * radeon_uvd_count_handles - count number of open streams
844 *
845 * @rdev: radeon_device pointer
846 * @sd: number of SD streams
847 * @hd: number of HD streams
848 *
849 * Count the number of open SD/HD streams as a hint for power mangement
850 */
851static void radeon_uvd_count_handles(struct radeon_device *rdev,
852				     unsigned *sd, unsigned *hd)
853{
854	unsigned i;
855
856	*sd = 0;
857	*hd = 0;
858
859	for (i = 0; i < rdev->uvd.max_handles; ++i) {
860		if (!atomic_read(&rdev->uvd.handles[i]))
861			continue;
862
863		if (rdev->uvd.img_size[i] >= 720*576)
864			++(*hd);
865		else
866			++(*sd);
867	}
868}
869
870static void radeon_uvd_idle_work_handler(struct work_struct *work)
871{
872	struct radeon_device *rdev =
873		container_of(work, struct radeon_device, uvd.idle_work.work);
874
875	if (radeon_fence_count_emitted(rdev, R600_RING_TYPE_UVD_INDEX) == 0) {
876		if ((rdev->pm.pm_method == PM_METHOD_DPM) && rdev->pm.dpm_enabled) {
877			radeon_uvd_count_handles(rdev, &rdev->pm.dpm.sd,
878						 &rdev->pm.dpm.hd);
879			radeon_dpm_enable_uvd(rdev, false);
880		} else {
881			radeon_set_uvd_clocks(rdev, 0, 0);
882		}
883	} else {
884		schedule_delayed_work(&rdev->uvd.idle_work,
885				      msecs_to_jiffies(UVD_IDLE_TIMEOUT_MS));
886	}
887}
888
889void radeon_uvd_note_usage(struct radeon_device *rdev)
890{
891	bool streams_changed = false;
892	bool set_clocks = !cancel_delayed_work_sync(&rdev->uvd.idle_work);
893	set_clocks &= schedule_delayed_work(&rdev->uvd.idle_work,
894					    msecs_to_jiffies(UVD_IDLE_TIMEOUT_MS));
895
896	if ((rdev->pm.pm_method == PM_METHOD_DPM) && rdev->pm.dpm_enabled) {
897		unsigned hd = 0, sd = 0;
898		radeon_uvd_count_handles(rdev, &sd, &hd);
899		if ((rdev->pm.dpm.sd != sd) ||
900		    (rdev->pm.dpm.hd != hd)) {
901			rdev->pm.dpm.sd = sd;
902			rdev->pm.dpm.hd = hd;
903			/* disable this for now */
904			/*streams_changed = true;*/
905		}
906	}
907
908	if (set_clocks || streams_changed) {
909		if ((rdev->pm.pm_method == PM_METHOD_DPM) && rdev->pm.dpm_enabled) {
910			radeon_dpm_enable_uvd(rdev, true);
911		} else {
912			radeon_set_uvd_clocks(rdev, 53300, 40000);
913		}
914	}
915}
916
917static unsigned radeon_uvd_calc_upll_post_div(unsigned vco_freq,
918					      unsigned target_freq,
919					      unsigned pd_min,
920					      unsigned pd_even)
921{
922	unsigned post_div = vco_freq / target_freq;
923
924	/* adjust to post divider minimum value */
925	if (post_div < pd_min)
926		post_div = pd_min;
927
928	/* we alway need a frequency less than or equal the target */
929	if ((vco_freq / post_div) > target_freq)
930		post_div += 1;
931
932	/* post dividers above a certain value must be even */
933	if (post_div > pd_even && post_div % 2)
934		post_div += 1;
935
936	return post_div;
937}
938
939/**
940 * radeon_uvd_calc_upll_dividers - calc UPLL clock dividers
941 *
942 * @rdev: radeon_device pointer
943 * @vclk: wanted VCLK
944 * @dclk: wanted DCLK
945 * @vco_min: minimum VCO frequency
946 * @vco_max: maximum VCO frequency
947 * @fb_factor: factor to multiply vco freq with
948 * @fb_mask: limit and bitmask for feedback divider
949 * @pd_min: post divider minimum
950 * @pd_max: post divider maximum
951 * @pd_even: post divider must be even above this value
952 * @optimal_fb_div: resulting feedback divider
953 * @optimal_vclk_div: resulting vclk post divider
954 * @optimal_dclk_div: resulting dclk post divider
955 *
956 * Calculate dividers for UVDs UPLL (R6xx-SI, except APUs).
957 * Returns zero on success -EINVAL on error.
958 */
959int radeon_uvd_calc_upll_dividers(struct radeon_device *rdev,
960				  unsigned vclk, unsigned dclk,
961				  unsigned vco_min, unsigned vco_max,
962				  unsigned fb_factor, unsigned fb_mask,
963				  unsigned pd_min, unsigned pd_max,
964				  unsigned pd_even,
965				  unsigned *optimal_fb_div,
966				  unsigned *optimal_vclk_div,
967				  unsigned *optimal_dclk_div)
968{
969	unsigned vco_freq, ref_freq = rdev->clock.spll.reference_freq;
970
971	/* start off with something large */
972	unsigned optimal_score = ~0;
973
974	/* loop through vco from low to high */
975	vco_min = max(max(vco_min, vclk), dclk);
976	for (vco_freq = vco_min; vco_freq <= vco_max; vco_freq += 100) {
977
978		uint64_t fb_div = (uint64_t)vco_freq * fb_factor;
979		unsigned vclk_div, dclk_div, score;
980
981		do_div(fb_div, ref_freq);
982
983		/* fb div out of range ? */
984		if (fb_div > fb_mask)
985			break; /* it can oly get worse */
986
987		fb_div &= fb_mask;
988
989		/* calc vclk divider with current vco freq */
990		vclk_div = radeon_uvd_calc_upll_post_div(vco_freq, vclk,
991							 pd_min, pd_even);
992		if (vclk_div > pd_max)
993			break; /* vco is too big, it has to stop */
994
995		/* calc dclk divider with current vco freq */
996		dclk_div = radeon_uvd_calc_upll_post_div(vco_freq, dclk,
997							 pd_min, pd_even);
998		if (dclk_div > pd_max)
999			break; /* vco is too big, it has to stop */
1000
1001		/* calc score with current vco freq */
1002		score = vclk - (vco_freq / vclk_div) + dclk - (vco_freq / dclk_div);
1003
1004		/* determine if this vco setting is better than current optimal settings */
1005		if (score < optimal_score) {
1006			*optimal_fb_div = fb_div;
1007			*optimal_vclk_div = vclk_div;
1008			*optimal_dclk_div = dclk_div;
1009			optimal_score = score;
1010			if (optimal_score == 0)
1011				break; /* it can't get better than this */
1012		}
1013	}
1014
1015	/* did we found a valid setup ? */
1016	if (optimal_score == ~0)
1017		return -EINVAL;
1018
1019	return 0;
1020}
1021
1022int radeon_uvd_send_upll_ctlreq(struct radeon_device *rdev,
1023				unsigned cg_upll_func_cntl)
1024{
1025	unsigned i;
1026
1027	/* make sure UPLL_CTLREQ is deasserted */
1028	WREG32_P(cg_upll_func_cntl, 0, ~UPLL_CTLREQ_MASK);
1029
1030	mdelay(10);
1031
1032	/* assert UPLL_CTLREQ */
1033	WREG32_P(cg_upll_func_cntl, UPLL_CTLREQ_MASK, ~UPLL_CTLREQ_MASK);
1034
1035	/* wait for CTLACK and CTLACK2 to get asserted */
1036	for (i = 0; i < 100; ++i) {
1037		uint32_t mask = UPLL_CTLACK_MASK | UPLL_CTLACK2_MASK;
1038		if ((RREG32(cg_upll_func_cntl) & mask) == mask)
1039			break;
1040		mdelay(10);
1041	}
1042
1043	/* deassert UPLL_CTLREQ */
1044	WREG32_P(cg_upll_func_cntl, 0, ~UPLL_CTLREQ_MASK);
1045
1046	if (i == 100) {
1047		DRM_ERROR("Timeout setting UVD clocks!\n");
1048		return -ETIMEDOUT;
1049	}
1050
1051	return 0;
1052}
1053