1 // SPDX-License-Identifier: GPL-2.0
2 /*
3  * Copyright (C) STMicroelectronics SA 2014
4  * Authors: Vincent Abriou <vincent.abriou@st.com>
5  *          Fabien Dessenne <fabien.dessenne@st.com>
6  *          for STMicroelectronics.
7  */
8 
9 #include <linux/dma-mapping.h>
10 #include <linux/seq_file.h>
11 
12 #include <drm/drm_atomic.h>
13 #include <drm/drm_device.h>
14 #include <drm/drm_fb_cma_helper.h>
15 #include <drm/drm_gem_cma_helper.h>
16 
17 #include "sti_compositor.h"
18 #include "sti_cursor.h"
19 #include "sti_plane.h"
20 #include "sti_vtg.h"
21 
22 /* Registers */
23 #define CUR_CTL             0x00
24 #define CUR_VPO             0x0C
25 #define CUR_PML             0x14
26 #define CUR_PMP             0x18
27 #define CUR_SIZE            0x1C
28 #define CUR_CML             0x20
29 #define CUR_AWS             0x28
30 #define CUR_AWE             0x2C
31 
32 #define CUR_CTL_CLUT_UPDATE BIT(1)
33 
34 #define STI_CURS_MIN_SIZE   1
35 #define STI_CURS_MAX_SIZE   128
36 
37 /*
38  * pixmap dma buffer structure
39  *
40  * @paddr:  physical address
41  * @size:   buffer size
42  * @base:   virtual address
43  */
44 struct dma_pixmap {
45 	dma_addr_t paddr;
46 	size_t size;
47 	void *base;
48 };
49 
50 /*
51  * STI Cursor structure
52  *
53  * @sti_plane:    sti_plane structure
54  * @dev:          driver device
55  * @regs:         cursor registers
56  * @width:        cursor width
57  * @height:       cursor height
58  * @clut:         color look up table
59  * @clut_paddr:   color look up table physical address
60  * @pixmap:       pixmap dma buffer (clut8-format cursor)
61  */
62 struct sti_cursor {
63 	struct sti_plane plane;
64 	struct device *dev;
65 	void __iomem *regs;
66 	unsigned int width;
67 	unsigned int height;
68 	unsigned short *clut;
69 	dma_addr_t clut_paddr;
70 	struct dma_pixmap pixmap;
71 };
72 
73 static const uint32_t cursor_supported_formats[] = {
74 	DRM_FORMAT_ARGB8888,
75 };
76 
77 #define to_sti_cursor(x) container_of(x, struct sti_cursor, plane)
78 
79 #define DBGFS_DUMP(reg) seq_printf(s, "\n  %-25s 0x%08X", #reg, \
80 				   readl(cursor->regs + reg))
81 
cursor_dbg_vpo(struct seq_file * s,u32 val)82 static void cursor_dbg_vpo(struct seq_file *s, u32 val)
83 {
84 	seq_printf(s, "\txdo:%4d\tydo:%4d", val & 0x0FFF, (val >> 16) & 0x0FFF);
85 }
86 
cursor_dbg_size(struct seq_file * s,u32 val)87 static void cursor_dbg_size(struct seq_file *s, u32 val)
88 {
89 	seq_printf(s, "\t%d x %d", val & 0x07FF, (val >> 16) & 0x07FF);
90 }
91 
cursor_dbg_pml(struct seq_file * s,struct sti_cursor * cursor,u32 val)92 static void cursor_dbg_pml(struct seq_file *s,
93 			   struct sti_cursor *cursor, u32 val)
94 {
95 	if (cursor->pixmap.paddr == val)
96 		seq_printf(s, "\tVirt @: %p", cursor->pixmap.base);
97 }
98 
cursor_dbg_cml(struct seq_file * s,struct sti_cursor * cursor,u32 val)99 static void cursor_dbg_cml(struct seq_file *s,
100 			   struct sti_cursor *cursor, u32 val)
101 {
102 	if (cursor->clut_paddr == val)
103 		seq_printf(s, "\tVirt @: %p", cursor->clut);
104 }
105 
cursor_dbg_show(struct seq_file * s,void * data)106 static int cursor_dbg_show(struct seq_file *s, void *data)
107 {
108 	struct drm_info_node *node = s->private;
109 	struct sti_cursor *cursor = (struct sti_cursor *)node->info_ent->data;
110 
111 	seq_printf(s, "%s: (vaddr = 0x%p)",
112 		   sti_plane_to_str(&cursor->plane), cursor->regs);
113 
114 	DBGFS_DUMP(CUR_CTL);
115 	DBGFS_DUMP(CUR_VPO);
116 	cursor_dbg_vpo(s, readl(cursor->regs + CUR_VPO));
117 	DBGFS_DUMP(CUR_PML);
118 	cursor_dbg_pml(s, cursor, readl(cursor->regs + CUR_PML));
119 	DBGFS_DUMP(CUR_PMP);
120 	DBGFS_DUMP(CUR_SIZE);
121 	cursor_dbg_size(s, readl(cursor->regs + CUR_SIZE));
122 	DBGFS_DUMP(CUR_CML);
123 	cursor_dbg_cml(s, cursor, readl(cursor->regs + CUR_CML));
124 	DBGFS_DUMP(CUR_AWS);
125 	DBGFS_DUMP(CUR_AWE);
126 	seq_putc(s, '\n');
127 	return 0;
128 }
129 
130 static struct drm_info_list cursor_debugfs_files[] = {
131 	{ "cursor", cursor_dbg_show, 0, NULL },
132 };
133 
cursor_debugfs_init(struct sti_cursor * cursor,struct drm_minor * minor)134 static void cursor_debugfs_init(struct sti_cursor *cursor,
135 				struct drm_minor *minor)
136 {
137 	unsigned int i;
138 
139 	for (i = 0; i < ARRAY_SIZE(cursor_debugfs_files); i++)
140 		cursor_debugfs_files[i].data = cursor;
141 
142 	drm_debugfs_create_files(cursor_debugfs_files,
143 				 ARRAY_SIZE(cursor_debugfs_files),
144 				 minor->debugfs_root, minor);
145 }
146 
sti_cursor_argb8888_to_clut8(struct sti_cursor * cursor,u32 * src)147 static void sti_cursor_argb8888_to_clut8(struct sti_cursor *cursor, u32 *src)
148 {
149 	u8  *dst = cursor->pixmap.base;
150 	unsigned int i, j;
151 	u32 a, r, g, b;
152 
153 	for (i = 0; i < cursor->height; i++) {
154 		for (j = 0; j < cursor->width; j++) {
155 			/* Pick the 2 higher bits of each component */
156 			a = (*src >> 30) & 3;
157 			r = (*src >> 22) & 3;
158 			g = (*src >> 14) & 3;
159 			b = (*src >> 6) & 3;
160 			*dst = a << 6 | r << 4 | g << 2 | b;
161 			src++;
162 			dst++;
163 		}
164 	}
165 }
166 
sti_cursor_init(struct sti_cursor * cursor)167 static void sti_cursor_init(struct sti_cursor *cursor)
168 {
169 	unsigned short *base = cursor->clut;
170 	unsigned int a, r, g, b;
171 
172 	/* Assign CLUT values, ARGB444 format */
173 	for (a = 0; a < 4; a++)
174 		for (r = 0; r < 4; r++)
175 			for (g = 0; g < 4; g++)
176 				for (b = 0; b < 4; b++)
177 					*base++ = (a * 5) << 12 |
178 						  (r * 5) << 8 |
179 						  (g * 5) << 4 |
180 						  (b * 5);
181 }
182 
sti_cursor_atomic_check(struct drm_plane * drm_plane,struct drm_atomic_state * state)183 static int sti_cursor_atomic_check(struct drm_plane *drm_plane,
184 				   struct drm_atomic_state *state)
185 {
186 	struct drm_plane_state *new_plane_state = drm_atomic_get_new_plane_state(state,
187 										 drm_plane);
188 	struct sti_plane *plane = to_sti_plane(drm_plane);
189 	struct sti_cursor *cursor = to_sti_cursor(plane);
190 	struct drm_crtc *crtc = new_plane_state->crtc;
191 	struct drm_framebuffer *fb = new_plane_state->fb;
192 	struct drm_crtc_state *crtc_state;
193 	struct drm_display_mode *mode;
194 	int dst_x, dst_y, dst_w, dst_h;
195 	int src_w, src_h;
196 
197 	/* no need for further checks if the plane is being disabled */
198 	if (!crtc || !fb)
199 		return 0;
200 
201 	crtc_state = drm_atomic_get_crtc_state(state, crtc);
202 	mode = &crtc_state->mode;
203 	dst_x = new_plane_state->crtc_x;
204 	dst_y = new_plane_state->crtc_y;
205 	dst_w = clamp_val(new_plane_state->crtc_w, 0,
206 			  mode->crtc_hdisplay - dst_x);
207 	dst_h = clamp_val(new_plane_state->crtc_h, 0,
208 			  mode->crtc_vdisplay - dst_y);
209 	/* src_x are in 16.16 format */
210 	src_w = new_plane_state->src_w >> 16;
211 	src_h = new_plane_state->src_h >> 16;
212 
213 	if (src_w < STI_CURS_MIN_SIZE ||
214 	    src_h < STI_CURS_MIN_SIZE ||
215 	    src_w > STI_CURS_MAX_SIZE ||
216 	    src_h > STI_CURS_MAX_SIZE) {
217 		DRM_ERROR("Invalid cursor size (%dx%d)\n",
218 				src_w, src_h);
219 		return -EINVAL;
220 	}
221 
222 	/* If the cursor size has changed, re-allocated the pixmap */
223 	if (!cursor->pixmap.base ||
224 	    (cursor->width != src_w) ||
225 	    (cursor->height != src_h)) {
226 		cursor->width = src_w;
227 		cursor->height = src_h;
228 
229 		if (cursor->pixmap.base)
230 			dma_free_wc(cursor->dev, cursor->pixmap.size,
231 				    cursor->pixmap.base, cursor->pixmap.paddr);
232 
233 		cursor->pixmap.size = cursor->width * cursor->height;
234 
235 		cursor->pixmap.base = dma_alloc_wc(cursor->dev,
236 						   cursor->pixmap.size,
237 						   &cursor->pixmap.paddr,
238 						   GFP_KERNEL | GFP_DMA);
239 		if (!cursor->pixmap.base) {
240 			DRM_ERROR("Failed to allocate memory for pixmap\n");
241 			return -EINVAL;
242 		}
243 	}
244 
245 	if (!drm_fb_cma_get_gem_obj(fb, 0)) {
246 		DRM_ERROR("Can't get CMA GEM object for fb\n");
247 		return -EINVAL;
248 	}
249 
250 	DRM_DEBUG_KMS("CRTC:%d (%s) drm plane:%d (%s)\n",
251 		      crtc->base.id, sti_mixer_to_str(to_sti_mixer(crtc)),
252 		      drm_plane->base.id, sti_plane_to_str(plane));
253 	DRM_DEBUG_KMS("(%dx%d)@(%d,%d)\n", dst_w, dst_h, dst_x, dst_y);
254 
255 	return 0;
256 }
257 
sti_cursor_atomic_update(struct drm_plane * drm_plane,struct drm_atomic_state * state)258 static void sti_cursor_atomic_update(struct drm_plane *drm_plane,
259 				     struct drm_atomic_state *state)
260 {
261 	struct drm_plane_state *newstate = drm_atomic_get_new_plane_state(state,
262 									  drm_plane);
263 	struct sti_plane *plane = to_sti_plane(drm_plane);
264 	struct sti_cursor *cursor = to_sti_cursor(plane);
265 	struct drm_crtc *crtc = newstate->crtc;
266 	struct drm_framebuffer *fb = newstate->fb;
267 	struct drm_display_mode *mode;
268 	int dst_x, dst_y;
269 	struct drm_gem_cma_object *cma_obj;
270 	u32 y, x;
271 	u32 val;
272 
273 	if (!crtc || !fb)
274 		return;
275 
276 	mode = &crtc->mode;
277 	dst_x = newstate->crtc_x;
278 	dst_y = newstate->crtc_y;
279 
280 	cma_obj = drm_fb_cma_get_gem_obj(fb, 0);
281 
282 	/* Convert ARGB8888 to CLUT8 */
283 	sti_cursor_argb8888_to_clut8(cursor, (u32 *)cma_obj->vaddr);
284 
285 	/* AWS and AWE depend on the mode */
286 	y = sti_vtg_get_line_number(*mode, 0);
287 	x = sti_vtg_get_pixel_number(*mode, 0);
288 	val = y << 16 | x;
289 	writel(val, cursor->regs + CUR_AWS);
290 	y = sti_vtg_get_line_number(*mode, mode->vdisplay - 1);
291 	x = sti_vtg_get_pixel_number(*mode, mode->hdisplay - 1);
292 	val = y << 16 | x;
293 	writel(val, cursor->regs + CUR_AWE);
294 
295 	/* Set memory location, size, and position */
296 	writel(cursor->pixmap.paddr, cursor->regs + CUR_PML);
297 	writel(cursor->width, cursor->regs + CUR_PMP);
298 	writel(cursor->height << 16 | cursor->width, cursor->regs + CUR_SIZE);
299 
300 	y = sti_vtg_get_line_number(*mode, dst_y);
301 	x = sti_vtg_get_pixel_number(*mode, dst_x);
302 	writel((y << 16) | x, cursor->regs + CUR_VPO);
303 
304 	/* Set and fetch CLUT */
305 	writel(cursor->clut_paddr, cursor->regs + CUR_CML);
306 	writel(CUR_CTL_CLUT_UPDATE, cursor->regs + CUR_CTL);
307 
308 	sti_plane_update_fps(plane, true, false);
309 
310 	plane->status = STI_PLANE_UPDATED;
311 }
312 
sti_cursor_atomic_disable(struct drm_plane * drm_plane,struct drm_atomic_state * state)313 static void sti_cursor_atomic_disable(struct drm_plane *drm_plane,
314 				      struct drm_atomic_state *state)
315 {
316 	struct drm_plane_state *oldstate = drm_atomic_get_old_plane_state(state,
317 									  drm_plane);
318 	struct sti_plane *plane = to_sti_plane(drm_plane);
319 
320 	if (!oldstate->crtc) {
321 		DRM_DEBUG_DRIVER("drm plane:%d not enabled\n",
322 				 drm_plane->base.id);
323 		return;
324 	}
325 
326 	DRM_DEBUG_DRIVER("CRTC:%d (%s) drm plane:%d (%s)\n",
327 			 oldstate->crtc->base.id,
328 			 sti_mixer_to_str(to_sti_mixer(oldstate->crtc)),
329 			 drm_plane->base.id, sti_plane_to_str(plane));
330 
331 	plane->status = STI_PLANE_DISABLING;
332 }
333 
334 static const struct drm_plane_helper_funcs sti_cursor_helpers_funcs = {
335 	.atomic_check = sti_cursor_atomic_check,
336 	.atomic_update = sti_cursor_atomic_update,
337 	.atomic_disable = sti_cursor_atomic_disable,
338 };
339 
sti_cursor_late_register(struct drm_plane * drm_plane)340 static int sti_cursor_late_register(struct drm_plane *drm_plane)
341 {
342 	struct sti_plane *plane = to_sti_plane(drm_plane);
343 	struct sti_cursor *cursor = to_sti_cursor(plane);
344 
345 	cursor_debugfs_init(cursor, drm_plane->dev->primary);
346 
347 	return 0;
348 }
349 
350 static const struct drm_plane_funcs sti_cursor_plane_helpers_funcs = {
351 	.update_plane = drm_atomic_helper_update_plane,
352 	.disable_plane = drm_atomic_helper_disable_plane,
353 	.destroy = drm_plane_cleanup,
354 	.reset = drm_atomic_helper_plane_reset,
355 	.atomic_duplicate_state = drm_atomic_helper_plane_duplicate_state,
356 	.atomic_destroy_state = drm_atomic_helper_plane_destroy_state,
357 	.late_register = sti_cursor_late_register,
358 };
359 
sti_cursor_create(struct drm_device * drm_dev,struct device * dev,int desc,void __iomem * baseaddr,unsigned int possible_crtcs)360 struct drm_plane *sti_cursor_create(struct drm_device *drm_dev,
361 				    struct device *dev, int desc,
362 				    void __iomem *baseaddr,
363 				    unsigned int possible_crtcs)
364 {
365 	struct sti_cursor *cursor;
366 	size_t size;
367 	int res;
368 
369 	cursor = devm_kzalloc(dev, sizeof(*cursor), GFP_KERNEL);
370 	if (!cursor) {
371 		DRM_ERROR("Failed to allocate memory for cursor\n");
372 		return NULL;
373 	}
374 
375 	/* Allocate clut buffer */
376 	size = 0x100 * sizeof(unsigned short);
377 	cursor->clut = dma_alloc_wc(dev, size, &cursor->clut_paddr,
378 				    GFP_KERNEL | GFP_DMA);
379 
380 	if (!cursor->clut) {
381 		DRM_ERROR("Failed to allocate memory for cursor clut\n");
382 		goto err_clut;
383 	}
384 
385 	cursor->dev = dev;
386 	cursor->regs = baseaddr;
387 	cursor->plane.desc = desc;
388 	cursor->plane.status = STI_PLANE_DISABLED;
389 
390 	sti_cursor_init(cursor);
391 
392 	res = drm_universal_plane_init(drm_dev, &cursor->plane.drm_plane,
393 				       possible_crtcs,
394 				       &sti_cursor_plane_helpers_funcs,
395 				       cursor_supported_formats,
396 				       ARRAY_SIZE(cursor_supported_formats),
397 				       NULL, DRM_PLANE_TYPE_CURSOR, NULL);
398 	if (res) {
399 		DRM_ERROR("Failed to initialize universal plane\n");
400 		goto err_plane;
401 	}
402 
403 	drm_plane_helper_add(&cursor->plane.drm_plane,
404 			     &sti_cursor_helpers_funcs);
405 
406 	sti_plane_init_property(&cursor->plane, DRM_PLANE_TYPE_CURSOR);
407 
408 	return &cursor->plane.drm_plane;
409 
410 err_plane:
411 	dma_free_wc(dev, size, cursor->clut, cursor->clut_paddr);
412 err_clut:
413 	devm_kfree(dev, cursor);
414 	return NULL;
415 }
416