1// SPDX-License-Identifier: GPL-2.0-only
2
3#include <linux/delay.h>
4#include <linux/pci.h>
5
6#include <drm/drm_atomic.h>
7#include <drm/drm_atomic_helper.h>
8#include <drm/drm_drv.h>
9#include <drm/drm_gem_atomic_helper.h>
10#include <drm/drm_probe_helper.h>
11
12#include "mgag200_drv.h"
13
14static int mgag200_g200se_init_pci_options(struct pci_dev *pdev)
15{
16	struct device *dev = &pdev->dev;
17	bool has_sgram;
18	u32 option;
19	int err;
20
21	err = pci_read_config_dword(pdev, PCI_MGA_OPTION, &option);
22	if (err != PCIBIOS_SUCCESSFUL) {
23		dev_err(dev, "pci_read_config_dword(PCI_MGA_OPTION) failed: %d\n", err);
24		return pcibios_err_to_errno(err);
25	}
26
27	has_sgram = !!(option & PCI_MGA_OPTION_HARDPWMSK);
28
29	option = 0x40049120;
30	if (has_sgram)
31		option |= PCI_MGA_OPTION_HARDPWMSK;
32
33	return mgag200_init_pci_options(pdev, option, 0x00008000);
34}
35
36static void mgag200_g200se_init_registers(struct mgag200_g200se_device *g200se)
37{
38	static const u8 dacvalue[] = {
39		MGAG200_DAC_DEFAULT(0x03,
40				    MGA1064_PIX_CLK_CTL_SEL_PLL,
41				    MGA1064_MISC_CTL_DAC_EN |
42				    MGA1064_MISC_CTL_VGA8 |
43				    MGA1064_MISC_CTL_DAC_RAM_CS,
44				    0x00, 0x00, 0x00)
45	};
46
47	struct mga_device *mdev = &g200se->base;
48	size_t i;
49
50	for (i = 0; i < ARRAY_SIZE(dacvalue); i++) {
51		if ((i <= 0x17) ||
52		    (i == 0x1b) ||
53		    (i == 0x1c) ||
54		    ((i >= 0x1f) && (i <= 0x29)) ||
55		    ((i == 0x2c) || (i == 0x2d) || (i == 0x2e)) ||
56		    ((i >= 0x30) && (i <= 0x37)))
57			continue;
58		WREG_DAC(i, dacvalue[i]);
59	}
60
61	mgag200_init_registers(mdev);
62}
63
64static void mgag200_g200se_set_hiprilvl(struct mga_device *mdev,
65					const struct drm_display_mode *mode,
66					const struct drm_format_info *format)
67{
68	struct mgag200_g200se_device *g200se = to_mgag200_g200se_device(&mdev->base);
69	unsigned int hiprilvl;
70	u8 crtcext6;
71
72	if  (g200se->unique_rev_id >= 0x04) {
73		hiprilvl = 0;
74	} else if (g200se->unique_rev_id >= 0x02) {
75		unsigned int bpp;
76		unsigned long mb;
77
78		if (format->cpp[0] * 8 > 16)
79			bpp = 32;
80		else if (format->cpp[0] * 8 > 8)
81			bpp = 16;
82		else
83			bpp = 8;
84
85		mb = (mode->clock * bpp) / 1000;
86		if (mb > 3100)
87			hiprilvl = 0;
88		else if (mb > 2600)
89			hiprilvl = 1;
90		else if (mb > 1900)
91			hiprilvl = 2;
92		else if (mb > 1160)
93			hiprilvl = 3;
94		else if (mb > 440)
95			hiprilvl = 4;
96		else
97			hiprilvl = 5;
98
99	} else if (g200se->unique_rev_id >= 0x01) {
100		hiprilvl = 3;
101	} else {
102		hiprilvl = 4;
103	}
104
105	crtcext6 = hiprilvl; /* implicitly sets maxhipri to 0 */
106
107	WREG_ECRT(0x06, crtcext6);
108}
109
110/*
111 * PIXPLLC
112 */
113
114static int mgag200_g200se_00_pixpllc_atomic_check(struct drm_crtc *crtc,
115						  struct drm_atomic_state *new_state)
116{
117	static const unsigned int vcomax = 320000;
118	static const unsigned int vcomin = 160000;
119	static const unsigned int pllreffreq = 25000;
120
121	struct drm_crtc_state *new_crtc_state = drm_atomic_get_new_crtc_state(new_state, crtc);
122	struct mgag200_crtc_state *new_mgag200_crtc_state = to_mgag200_crtc_state(new_crtc_state);
123	long clock = new_crtc_state->mode.clock;
124	struct mgag200_pll_values *pixpllc = &new_mgag200_crtc_state->pixpllc;
125	unsigned int delta, tmpdelta, permitteddelta;
126	unsigned int testp, testm, testn;
127	unsigned int p, m, n, s;
128	unsigned int computed;
129
130	m = n = p = s = 0;
131	delta = 0xffffffff;
132	permitteddelta = clock * 5 / 1000;
133
134	for (testp = 8; testp > 0; testp /= 2) {
135		if (clock * testp > vcomax)
136			continue;
137		if (clock * testp < vcomin)
138			continue;
139
140		for (testn = 17; testn < 256; testn++) {
141			for (testm = 1; testm < 32; testm++) {
142				computed = (pllreffreq * testn) / (testm * testp);
143				if (computed > clock)
144					tmpdelta = computed - clock;
145				else
146					tmpdelta = clock - computed;
147				if (tmpdelta < delta) {
148					delta = tmpdelta;
149					m = testm;
150					n = testn;
151					p = testp;
152				}
153			}
154		}
155	}
156
157	if (delta > permitteddelta) {
158		pr_warn("PLL delta too large\n");
159		return -EINVAL;
160	}
161
162	pixpllc->m = m;
163	pixpllc->n = n;
164	pixpllc->p = p;
165	pixpllc->s = s;
166
167	return 0;
168}
169
170static void mgag200_g200se_00_pixpllc_atomic_update(struct drm_crtc *crtc,
171						    struct drm_atomic_state *old_state)
172{
173	struct drm_device *dev = crtc->dev;
174	struct mga_device *mdev = to_mga_device(dev);
175	struct drm_crtc_state *crtc_state = crtc->state;
176	struct mgag200_crtc_state *mgag200_crtc_state = to_mgag200_crtc_state(crtc_state);
177	struct mgag200_pll_values *pixpllc = &mgag200_crtc_state->pixpllc;
178	unsigned int pixpllcm, pixpllcn, pixpllcp, pixpllcs;
179	u8 xpixpllcm, xpixpllcn, xpixpllcp;
180
181	pixpllcm = pixpllc->m - 1;
182	pixpllcn = pixpllc->n - 1;
183	pixpllcp = pixpllc->p - 1;
184	pixpllcs = pixpllc->s;
185
186	xpixpllcm = pixpllcm | ((pixpllcn & BIT(8)) >> 1);
187	xpixpllcn = pixpllcn;
188	xpixpllcp = (pixpllcs << 3) | pixpllcp;
189
190	WREG_MISC_MASKED(MGAREG_MISC_CLKSEL_MGA, MGAREG_MISC_CLKSEL_MASK);
191
192	WREG_DAC(MGA1064_PIX_PLLC_M, xpixpllcm);
193	WREG_DAC(MGA1064_PIX_PLLC_N, xpixpllcn);
194	WREG_DAC(MGA1064_PIX_PLLC_P, xpixpllcp);
195}
196
197static int mgag200_g200se_04_pixpllc_atomic_check(struct drm_crtc *crtc,
198						  struct drm_atomic_state *new_state)
199{
200	static const unsigned int vcomax = 1600000;
201	static const unsigned int vcomin = 800000;
202	static const unsigned int pllreffreq = 25000;
203	static const unsigned int pvalues_e4[] = {16, 14, 12, 10, 8, 6, 4, 2, 1};
204
205	struct drm_crtc_state *new_crtc_state = drm_atomic_get_new_crtc_state(new_state, crtc);
206	struct mgag200_crtc_state *new_mgag200_crtc_state = to_mgag200_crtc_state(new_crtc_state);
207	long clock = new_crtc_state->mode.clock;
208	struct mgag200_pll_values *pixpllc = &new_mgag200_crtc_state->pixpllc;
209	unsigned int delta, tmpdelta, permitteddelta;
210	unsigned int testp, testm, testn;
211	unsigned int p, m, n, s;
212	unsigned int computed;
213	unsigned int fvv;
214	unsigned int i;
215
216	m = n = p = s = 0;
217	delta = 0xffffffff;
218
219	if (clock < 25000)
220		clock = 25000;
221	clock = clock * 2;
222
223	/* Permited delta is 0.5% as VESA Specification */
224	permitteddelta = clock * 5 / 1000;
225
226	for (i = 0 ; i < ARRAY_SIZE(pvalues_e4); i++) {
227		testp = pvalues_e4[i];
228
229		if ((clock * testp) > vcomax)
230			continue;
231		if ((clock * testp) < vcomin)
232			continue;
233
234		for (testn = 50; testn <= 256; testn++) {
235			for (testm = 1; testm <= 32; testm++) {
236				computed = (pllreffreq * testn) / (testm * testp);
237				if (computed > clock)
238					tmpdelta = computed - clock;
239				else
240					tmpdelta = clock - computed;
241
242				if (tmpdelta < delta) {
243					delta = tmpdelta;
244					m = testm;
245					n = testn;
246					p = testp;
247				}
248			}
249		}
250	}
251
252	fvv = pllreffreq * n / m;
253	fvv = (fvv - 800000) / 50000;
254	if (fvv > 15)
255		fvv = 15;
256	s = fvv << 1;
257
258	if (delta > permitteddelta) {
259		pr_warn("PLL delta too large\n");
260		return -EINVAL;
261	}
262
263	pixpllc->m = m;
264	pixpllc->n = n;
265	pixpllc->p = p;
266	pixpllc->s = s;
267
268	return 0;
269}
270
271static void mgag200_g200se_04_pixpllc_atomic_update(struct drm_crtc *crtc,
272						    struct drm_atomic_state *old_state)
273{
274	struct drm_device *dev = crtc->dev;
275	struct mga_device *mdev = to_mga_device(dev);
276	struct drm_crtc_state *crtc_state = crtc->state;
277	struct mgag200_crtc_state *mgag200_crtc_state = to_mgag200_crtc_state(crtc_state);
278	struct mgag200_pll_values *pixpllc = &mgag200_crtc_state->pixpllc;
279	unsigned int pixpllcm, pixpllcn, pixpllcp, pixpllcs;
280	u8 xpixpllcm, xpixpllcn, xpixpllcp;
281
282	pixpllcm = pixpllc->m - 1;
283	pixpllcn = pixpllc->n - 1;
284	pixpllcp = pixpllc->p - 1;
285	pixpllcs = pixpllc->s;
286
287	// For G200SE A, BIT(7) should be set unconditionally.
288	xpixpllcm = BIT(7) | pixpllcm;
289	xpixpllcn = pixpllcn;
290	xpixpllcp = (pixpllcs << 3) | pixpllcp;
291
292	WREG_MISC_MASKED(MGAREG_MISC_CLKSEL_MGA, MGAREG_MISC_CLKSEL_MASK);
293
294	WREG_DAC(MGA1064_PIX_PLLC_M, xpixpllcm);
295	WREG_DAC(MGA1064_PIX_PLLC_N, xpixpllcn);
296	WREG_DAC(MGA1064_PIX_PLLC_P, xpixpllcp);
297
298	WREG_DAC(0x1a, 0x09);
299	msleep(20);
300	WREG_DAC(0x1a, 0x01);
301}
302
303/*
304 * Mode-setting pipeline
305 */
306
307static const struct drm_plane_helper_funcs mgag200_g200se_primary_plane_helper_funcs = {
308	MGAG200_PRIMARY_PLANE_HELPER_FUNCS,
309};
310
311static const struct drm_plane_funcs mgag200_g200se_primary_plane_funcs = {
312	MGAG200_PRIMARY_PLANE_FUNCS,
313};
314
315static void mgag200_g200se_crtc_helper_atomic_enable(struct drm_crtc *crtc,
316						     struct drm_atomic_state *old_state)
317{
318	struct drm_device *dev = crtc->dev;
319	struct mga_device *mdev = to_mga_device(dev);
320	const struct mgag200_device_funcs *funcs = mdev->funcs;
321	struct drm_crtc_state *crtc_state = crtc->state;
322	struct drm_display_mode *adjusted_mode = &crtc_state->adjusted_mode;
323	struct mgag200_crtc_state *mgag200_crtc_state = to_mgag200_crtc_state(crtc_state);
324	const struct drm_format_info *format = mgag200_crtc_state->format;
325
326	if (funcs->disable_vidrst)
327		funcs->disable_vidrst(mdev);
328
329	mgag200_set_format_regs(mdev, format);
330	mgag200_set_mode_regs(mdev, adjusted_mode);
331
332	if (funcs->pixpllc_atomic_update)
333		funcs->pixpllc_atomic_update(crtc, old_state);
334
335	mgag200_g200se_set_hiprilvl(mdev, adjusted_mode, format);
336
337	if (crtc_state->gamma_lut)
338		mgag200_crtc_set_gamma(mdev, format, crtc_state->gamma_lut->data);
339	else
340		mgag200_crtc_set_gamma_linear(mdev, format);
341
342	mgag200_enable_display(mdev);
343
344	if (funcs->enable_vidrst)
345		funcs->enable_vidrst(mdev);
346}
347
348static const struct drm_crtc_helper_funcs mgag200_g200se_crtc_helper_funcs = {
349	.mode_valid = mgag200_crtc_helper_mode_valid,
350	.atomic_check = mgag200_crtc_helper_atomic_check,
351	.atomic_flush = mgag200_crtc_helper_atomic_flush,
352	.atomic_enable = mgag200_g200se_crtc_helper_atomic_enable,
353	.atomic_disable = mgag200_crtc_helper_atomic_disable
354};
355
356static const struct drm_crtc_funcs mgag200_g200se_crtc_funcs = {
357	MGAG200_CRTC_FUNCS,
358};
359
360static const struct drm_encoder_funcs mgag200_g200se_dac_encoder_funcs = {
361	MGAG200_DAC_ENCODER_FUNCS,
362};
363
364static const struct drm_connector_helper_funcs mgag200_g200se_vga_connector_helper_funcs = {
365	MGAG200_VGA_CONNECTOR_HELPER_FUNCS,
366};
367
368static const struct drm_connector_funcs mgag200_g200se_vga_connector_funcs = {
369	MGAG200_VGA_CONNECTOR_FUNCS,
370};
371
372static int mgag200_g200se_pipeline_init(struct mga_device *mdev)
373{
374	struct drm_device *dev = &mdev->base;
375	struct drm_plane *primary_plane = &mdev->primary_plane;
376	struct drm_crtc *crtc = &mdev->crtc;
377	struct drm_encoder *encoder = &mdev->encoder;
378	struct mga_i2c_chan *i2c = &mdev->i2c;
379	struct drm_connector *connector = &mdev->connector;
380	int ret;
381
382	ret = drm_universal_plane_init(dev, primary_plane, 0,
383				       &mgag200_g200se_primary_plane_funcs,
384				       mgag200_primary_plane_formats,
385				       mgag200_primary_plane_formats_size,
386				       mgag200_primary_plane_fmtmods,
387				       DRM_PLANE_TYPE_PRIMARY, NULL);
388	if (ret) {
389		drm_err(dev, "drm_universal_plane_init() failed: %d\n", ret);
390		return ret;
391	}
392	drm_plane_helper_add(primary_plane, &mgag200_g200se_primary_plane_helper_funcs);
393	drm_plane_enable_fb_damage_clips(primary_plane);
394
395	ret = drm_crtc_init_with_planes(dev, crtc, primary_plane, NULL,
396					&mgag200_g200se_crtc_funcs, NULL);
397	if (ret) {
398		drm_err(dev, "drm_crtc_init_with_planes() failed: %d\n", ret);
399		return ret;
400	}
401	drm_crtc_helper_add(crtc, &mgag200_g200se_crtc_helper_funcs);
402
403	/* FIXME: legacy gamma tables, but atomic gamma doesn't work without */
404	drm_mode_crtc_set_gamma_size(crtc, MGAG200_LUT_SIZE);
405	drm_crtc_enable_color_mgmt(crtc, 0, false, MGAG200_LUT_SIZE);
406
407	encoder->possible_crtcs = drm_crtc_mask(crtc);
408	ret = drm_encoder_init(dev, encoder, &mgag200_g200se_dac_encoder_funcs,
409			       DRM_MODE_ENCODER_DAC, NULL);
410	if (ret) {
411		drm_err(dev, "drm_encoder_init() failed: %d\n", ret);
412		return ret;
413	}
414
415	ret = mgag200_i2c_init(mdev, i2c);
416	if (ret) {
417		drm_err(dev, "failed to add DDC bus: %d\n", ret);
418		return ret;
419	}
420
421	ret = drm_connector_init_with_ddc(dev, connector,
422					  &mgag200_g200se_vga_connector_funcs,
423					  DRM_MODE_CONNECTOR_VGA,
424					  &i2c->adapter);
425	if (ret) {
426		drm_err(dev, "drm_connector_init_with_ddc() failed: %d\n", ret);
427		return ret;
428	}
429	drm_connector_helper_add(connector, &mgag200_g200se_vga_connector_helper_funcs);
430
431	ret = drm_connector_attach_encoder(connector, encoder);
432	if (ret) {
433		drm_err(dev, "drm_connector_attach_encoder() failed: %d\n", ret);
434		return ret;
435	}
436
437	return 0;
438}
439
440/*
441 * DRM device
442 */
443
444static const struct mgag200_device_info mgag200_g200se_a_01_device_info =
445	MGAG200_DEVICE_INFO_INIT(1600, 1200, 24400, false, 0, 1, true);
446
447static const struct mgag200_device_info mgag200_g200se_a_02_device_info =
448	MGAG200_DEVICE_INFO_INIT(1920, 1200, 30100, false, 0, 1, true);
449
450static const struct mgag200_device_info mgag200_g200se_a_03_device_info =
451	MGAG200_DEVICE_INFO_INIT(2048, 2048, 55000, false, 0, 1, false);
452
453static const struct mgag200_device_info mgag200_g200se_b_01_device_info =
454	MGAG200_DEVICE_INFO_INIT(1600, 1200, 24400, false, 0, 1, false);
455
456static const struct mgag200_device_info mgag200_g200se_b_02_device_info =
457	MGAG200_DEVICE_INFO_INIT(1920, 1200, 30100, false, 0, 1, false);
458
459static const struct mgag200_device_info mgag200_g200se_b_03_device_info =
460	MGAG200_DEVICE_INFO_INIT(2048, 2048, 55000, false, 0, 1, false);
461
462static int mgag200_g200se_init_unique_rev_id(struct mgag200_g200se_device *g200se)
463{
464	struct mga_device *mdev = &g200se->base;
465	struct drm_device *dev = &mdev->base;
466
467	/* stash G200 SE model number for later use */
468	g200se->unique_rev_id = RREG32(0x1e24);
469	if (!g200se->unique_rev_id)
470		return -ENODEV;
471
472	drm_dbg(dev, "G200 SE unique revision id is 0x%x\n", g200se->unique_rev_id);
473
474	return 0;
475}
476
477static const struct mgag200_device_funcs mgag200_g200se_00_device_funcs = {
478	.pixpllc_atomic_check = mgag200_g200se_00_pixpllc_atomic_check,
479	.pixpllc_atomic_update = mgag200_g200se_00_pixpllc_atomic_update,
480};
481
482static const struct mgag200_device_funcs mgag200_g200se_04_device_funcs = {
483	.pixpllc_atomic_check = mgag200_g200se_04_pixpllc_atomic_check,
484	.pixpllc_atomic_update = mgag200_g200se_04_pixpllc_atomic_update,
485};
486
487struct mga_device *mgag200_g200se_device_create(struct pci_dev *pdev, const struct drm_driver *drv,
488						enum mga_type type)
489{
490	struct mgag200_g200se_device *g200se;
491	const struct mgag200_device_info *info;
492	const struct mgag200_device_funcs *funcs;
493	struct mga_device *mdev;
494	struct drm_device *dev;
495	resource_size_t vram_available;
496	int ret;
497
498	g200se = devm_drm_dev_alloc(&pdev->dev, drv, struct mgag200_g200se_device, base.base);
499	if (IS_ERR(g200se))
500		return ERR_CAST(g200se);
501	mdev = &g200se->base;
502	dev = &mdev->base;
503
504	pci_set_drvdata(pdev, dev);
505
506	ret = mgag200_g200se_init_pci_options(pdev);
507	if (ret)
508		return ERR_PTR(ret);
509
510	ret = mgag200_device_preinit(mdev);
511	if (ret)
512		return ERR_PTR(ret);
513
514	ret = mgag200_g200se_init_unique_rev_id(g200se);
515	if (ret)
516		return ERR_PTR(ret);
517
518	switch (type) {
519	case G200_SE_A:
520		if (g200se->unique_rev_id >= 0x03)
521			info = &mgag200_g200se_a_03_device_info;
522		else if (g200se->unique_rev_id >= 0x02)
523			info = &mgag200_g200se_a_02_device_info;
524		else
525			info = &mgag200_g200se_a_01_device_info;
526		break;
527	case G200_SE_B:
528		if (g200se->unique_rev_id >= 0x03)
529			info = &mgag200_g200se_b_03_device_info;
530		else if (g200se->unique_rev_id >= 0x02)
531			info = &mgag200_g200se_b_02_device_info;
532		else
533			info = &mgag200_g200se_b_01_device_info;
534		break;
535	default:
536		return ERR_PTR(-EINVAL);
537	}
538
539	if (g200se->unique_rev_id >= 0x04)
540		funcs = &mgag200_g200se_04_device_funcs;
541	else
542		funcs = &mgag200_g200se_00_device_funcs;
543
544	ret = mgag200_device_init(mdev, info, funcs);
545	if (ret)
546		return ERR_PTR(ret);
547
548	mgag200_g200se_init_registers(g200se);
549
550	vram_available = mgag200_device_probe_vram(mdev);
551
552	ret = mgag200_mode_config_init(mdev, vram_available);
553	if (ret)
554		return ERR_PTR(ret);
555
556	ret = mgag200_g200se_pipeline_init(mdev);
557	if (ret)
558		return ERR_PTR(ret);
559
560	drm_mode_config_reset(dev);
561
562	return mdev;
563}
564