1/*
2 * Copyright (c) 2006 Intel Corporation
3 *
4 * This program is free software; you can redistribute it and/or modify it
5 * under the terms and conditions of the GNU General Public License,
6 * version 2, as published by the Free Software Foundation.
7 *
8 * This program is distributed in the hope it will be useful, but WITHOUT
9 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
10 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
11 * more details.
12 *
13 * You should have received a copy of the GNU General Public License along with
14 * this program; if not, write to the Free Software Foundation, Inc.,
15 * 51 Franklin St - Fifth Floor, Boston, MA 02110-1301 USA.
16 *
17 * Authors:
18 *    Eric Anholt <eric@anholt.net>
19 *
20 */
21#include <drm/drmP.h>
22#include <drm/drm.h>
23#include <drm/gma_drm.h>
24#include "psb_drv.h"
25#include "psb_intel_drv.h"
26#include "psb_intel_reg.h"
27#include "intel_bios.h"
28
29#define	SLAVE_ADDR1	0x70
30#define	SLAVE_ADDR2	0x72
31
32static void *find_section(struct bdb_header *bdb, int section_id)
33{
34	u8 *base = (u8 *)bdb;
35	int index = 0;
36	u16 total, current_size;
37	u8 current_id;
38
39	/* skip to first section */
40	index += bdb->header_size;
41	total = bdb->bdb_size;
42
43	/* walk the sections looking for section_id */
44	while (index < total) {
45		current_id = *(base + index);
46		index++;
47		current_size = *((u16 *)(base + index));
48		index += 2;
49		if (current_id == section_id)
50			return base + index;
51		index += current_size;
52	}
53
54	return NULL;
55}
56
57static void
58parse_edp(struct drm_psb_private *dev_priv, struct bdb_header *bdb)
59{
60	struct bdb_edp *edp;
61	struct edp_power_seq *edp_pps;
62	struct edp_link_params *edp_link_params;
63	uint8_t	panel_type;
64
65	edp = find_section(bdb, BDB_EDP);
66
67	dev_priv->edp.bpp = 18;
68	if (!edp) {
69		if (dev_priv->edp.support) {
70			DRM_DEBUG_KMS("No eDP BDB found but eDP panel supported, assume %dbpp panel color depth.\n",
71				      dev_priv->edp.bpp);
72		}
73		return;
74	}
75
76	panel_type = dev_priv->panel_type;
77	switch ((edp->color_depth >> (panel_type * 2)) & 3) {
78	case EDP_18BPP:
79		dev_priv->edp.bpp = 18;
80		break;
81	case EDP_24BPP:
82		dev_priv->edp.bpp = 24;
83		break;
84	case EDP_30BPP:
85		dev_priv->edp.bpp = 30;
86		break;
87	}
88
89	/* Get the eDP sequencing and link info */
90	edp_pps = &edp->power_seqs[panel_type];
91	edp_link_params = &edp->link_params[panel_type];
92
93	dev_priv->edp.pps = *edp_pps;
94
95	DRM_DEBUG_KMS("EDP timing in vbt t1_t3 %d t8 %d t9 %d t10 %d t11_t12 %d\n",
96				dev_priv->edp.pps.t1_t3, dev_priv->edp.pps.t8,
97				dev_priv->edp.pps.t9, dev_priv->edp.pps.t10,
98				dev_priv->edp.pps.t11_t12);
99
100	dev_priv->edp.rate = edp_link_params->rate ? DP_LINK_BW_2_7 :
101		DP_LINK_BW_1_62;
102	switch (edp_link_params->lanes) {
103	case 0:
104		dev_priv->edp.lanes = 1;
105		break;
106	case 1:
107		dev_priv->edp.lanes = 2;
108		break;
109	case 3:
110	default:
111		dev_priv->edp.lanes = 4;
112		break;
113	}
114	DRM_DEBUG_KMS("VBT reports EDP: Lane_count %d, Lane_rate %d, Bpp %d\n",
115			dev_priv->edp.lanes, dev_priv->edp.rate, dev_priv->edp.bpp);
116
117	switch (edp_link_params->preemphasis) {
118	case 0:
119		dev_priv->edp.preemphasis = DP_TRAIN_PRE_EMPH_LEVEL_0;
120		break;
121	case 1:
122		dev_priv->edp.preemphasis = DP_TRAIN_PRE_EMPH_LEVEL_1;
123		break;
124	case 2:
125		dev_priv->edp.preemphasis = DP_TRAIN_PRE_EMPH_LEVEL_2;
126		break;
127	case 3:
128		dev_priv->edp.preemphasis = DP_TRAIN_PRE_EMPH_LEVEL_3;
129		break;
130	}
131	switch (edp_link_params->vswing) {
132	case 0:
133		dev_priv->edp.vswing = DP_TRAIN_VOLTAGE_SWING_LEVEL_0;
134		break;
135	case 1:
136		dev_priv->edp.vswing = DP_TRAIN_VOLTAGE_SWING_LEVEL_1;
137		break;
138	case 2:
139		dev_priv->edp.vswing = DP_TRAIN_VOLTAGE_SWING_LEVEL_2;
140		break;
141	case 3:
142		dev_priv->edp.vswing = DP_TRAIN_VOLTAGE_SWING_LEVEL_3;
143		break;
144	}
145	DRM_DEBUG_KMS("VBT reports EDP: VSwing  %d, Preemph %d\n",
146			dev_priv->edp.vswing, dev_priv->edp.preemphasis);
147}
148
149static u16
150get_blocksize(void *p)
151{
152	u16 *block_ptr, block_size;
153
154	block_ptr = (u16 *)((char *)p - 2);
155	block_size = *block_ptr;
156	return block_size;
157}
158
159static void fill_detail_timing_data(struct drm_display_mode *panel_fixed_mode,
160			struct lvds_dvo_timing *dvo_timing)
161{
162	panel_fixed_mode->hdisplay = (dvo_timing->hactive_hi << 8) |
163		dvo_timing->hactive_lo;
164	panel_fixed_mode->hsync_start = panel_fixed_mode->hdisplay +
165		((dvo_timing->hsync_off_hi << 8) | dvo_timing->hsync_off_lo);
166	panel_fixed_mode->hsync_end = panel_fixed_mode->hsync_start +
167		dvo_timing->hsync_pulse_width;
168	panel_fixed_mode->htotal = panel_fixed_mode->hdisplay +
169		((dvo_timing->hblank_hi << 8) | dvo_timing->hblank_lo);
170
171	panel_fixed_mode->vdisplay = (dvo_timing->vactive_hi << 8) |
172		dvo_timing->vactive_lo;
173	panel_fixed_mode->vsync_start = panel_fixed_mode->vdisplay +
174		dvo_timing->vsync_off;
175	panel_fixed_mode->vsync_end = panel_fixed_mode->vsync_start +
176		dvo_timing->vsync_pulse_width;
177	panel_fixed_mode->vtotal = panel_fixed_mode->vdisplay +
178		((dvo_timing->vblank_hi << 8) | dvo_timing->vblank_lo);
179	panel_fixed_mode->clock = dvo_timing->clock * 10;
180	panel_fixed_mode->type = DRM_MODE_TYPE_PREFERRED;
181
182	if (dvo_timing->hsync_positive)
183		panel_fixed_mode->flags |= DRM_MODE_FLAG_PHSYNC;
184	else
185		panel_fixed_mode->flags |= DRM_MODE_FLAG_NHSYNC;
186
187	if (dvo_timing->vsync_positive)
188		panel_fixed_mode->flags |= DRM_MODE_FLAG_PVSYNC;
189	else
190		panel_fixed_mode->flags |= DRM_MODE_FLAG_NVSYNC;
191
192	/* Some VBTs have bogus h/vtotal values */
193	if (panel_fixed_mode->hsync_end > panel_fixed_mode->htotal)
194		panel_fixed_mode->htotal = panel_fixed_mode->hsync_end + 1;
195	if (panel_fixed_mode->vsync_end > panel_fixed_mode->vtotal)
196		panel_fixed_mode->vtotal = panel_fixed_mode->vsync_end + 1;
197
198	drm_mode_set_name(panel_fixed_mode);
199}
200
201static void parse_backlight_data(struct drm_psb_private *dev_priv,
202				struct bdb_header *bdb)
203{
204	struct bdb_lvds_backlight *vbt_lvds_bl = NULL;
205	struct bdb_lvds_backlight *lvds_bl;
206	u8 p_type = 0;
207	void *bl_start = NULL;
208	struct bdb_lvds_options *lvds_opts
209				= find_section(bdb, BDB_LVDS_OPTIONS);
210
211	dev_priv->lvds_bl = NULL;
212
213	if (lvds_opts)
214		p_type = lvds_opts->panel_type;
215	else
216		return;
217
218	bl_start = find_section(bdb, BDB_LVDS_BACKLIGHT);
219	vbt_lvds_bl = (struct bdb_lvds_backlight *)(bl_start + 1) + p_type;
220
221	lvds_bl = kmemdup(vbt_lvds_bl, sizeof(*vbt_lvds_bl), GFP_KERNEL);
222	if (!lvds_bl) {
223		dev_err(dev_priv->dev->dev, "out of memory for backlight data\n");
224		return;
225	}
226	dev_priv->lvds_bl = lvds_bl;
227}
228
229/* Try to find integrated panel data */
230static void parse_lfp_panel_data(struct drm_psb_private *dev_priv,
231			    struct bdb_header *bdb)
232{
233	struct bdb_lvds_options *lvds_options;
234	struct bdb_lvds_lfp_data *lvds_lfp_data;
235	struct bdb_lvds_lfp_data_entry *entry;
236	struct lvds_dvo_timing *dvo_timing;
237	struct drm_display_mode *panel_fixed_mode;
238
239	/* Defaults if we can't find VBT info */
240	dev_priv->lvds_dither = 0;
241	dev_priv->lvds_vbt = 0;
242
243	lvds_options = find_section(bdb, BDB_LVDS_OPTIONS);
244	if (!lvds_options)
245		return;
246
247	dev_priv->lvds_dither = lvds_options->pixel_dither;
248	dev_priv->panel_type = lvds_options->panel_type;
249
250	if (lvds_options->panel_type == 0xff)
251		return;
252
253	lvds_lfp_data = find_section(bdb, BDB_LVDS_LFP_DATA);
254	if (!lvds_lfp_data)
255		return;
256
257
258	entry = &lvds_lfp_data->data[lvds_options->panel_type];
259	dvo_timing = &entry->dvo_timing;
260
261	panel_fixed_mode = kzalloc(sizeof(*panel_fixed_mode),
262				      GFP_KERNEL);
263	if (panel_fixed_mode == NULL) {
264		dev_err(dev_priv->dev->dev, "out of memory for fixed panel mode\n");
265		return;
266	}
267
268	dev_priv->lvds_vbt = 1;
269	fill_detail_timing_data(panel_fixed_mode, dvo_timing);
270
271	if (panel_fixed_mode->htotal > 0 && panel_fixed_mode->vtotal > 0) {
272		dev_priv->lfp_lvds_vbt_mode = panel_fixed_mode;
273		drm_mode_debug_printmodeline(panel_fixed_mode);
274	} else {
275		dev_dbg(dev_priv->dev->dev, "ignoring invalid LVDS VBT\n");
276		dev_priv->lvds_vbt = 0;
277		kfree(panel_fixed_mode);
278	}
279	return;
280}
281
282/* Try to find sdvo panel data */
283static void parse_sdvo_panel_data(struct drm_psb_private *dev_priv,
284		      struct bdb_header *bdb)
285{
286	struct bdb_sdvo_lvds_options *sdvo_lvds_options;
287	struct lvds_dvo_timing *dvo_timing;
288	struct drm_display_mode *panel_fixed_mode;
289
290	dev_priv->sdvo_lvds_vbt_mode = NULL;
291
292	sdvo_lvds_options = find_section(bdb, BDB_SDVO_LVDS_OPTIONS);
293	if (!sdvo_lvds_options)
294		return;
295
296	dvo_timing = find_section(bdb, BDB_SDVO_PANEL_DTDS);
297	if (!dvo_timing)
298		return;
299
300	panel_fixed_mode = kzalloc(sizeof(*panel_fixed_mode), GFP_KERNEL);
301
302	if (!panel_fixed_mode)
303		return;
304
305	fill_detail_timing_data(panel_fixed_mode,
306			dvo_timing + sdvo_lvds_options->panel_type);
307
308	dev_priv->sdvo_lvds_vbt_mode = panel_fixed_mode;
309
310	return;
311}
312
313static void parse_general_features(struct drm_psb_private *dev_priv,
314		       struct bdb_header *bdb)
315{
316	struct bdb_general_features *general;
317
318	/* Set sensible defaults in case we can't find the general block */
319	dev_priv->int_tv_support = 1;
320	dev_priv->int_crt_support = 1;
321
322	general = find_section(bdb, BDB_GENERAL_FEATURES);
323	if (general) {
324		dev_priv->int_tv_support = general->int_tv_support;
325		dev_priv->int_crt_support = general->int_crt_support;
326		dev_priv->lvds_use_ssc = general->enable_ssc;
327
328		if (dev_priv->lvds_use_ssc) {
329			dev_priv->lvds_ssc_freq
330				= general->ssc_freq ? 100 : 96;
331		}
332	}
333}
334
335static void
336parse_sdvo_device_mapping(struct drm_psb_private *dev_priv,
337			  struct bdb_header *bdb)
338{
339	struct sdvo_device_mapping *p_mapping;
340	struct bdb_general_definitions *p_defs;
341	struct child_device_config *p_child;
342	int i, child_device_num, count;
343	u16	block_size;
344
345	p_defs = find_section(bdb, BDB_GENERAL_DEFINITIONS);
346	if (!p_defs) {
347		DRM_DEBUG_KMS("No general definition block is found, unable to construct sdvo mapping.\n");
348		return;
349	}
350	/* judge whether the size of child device meets the requirements.
351	 * If the child device size obtained from general definition block
352	 * is different with sizeof(struct child_device_config), skip the
353	 * parsing of sdvo device info
354	 */
355	if (p_defs->child_dev_size != sizeof(*p_child)) {
356		/* different child dev size . Ignore it */
357		DRM_DEBUG_KMS("different child size is found. Invalid.\n");
358		return;
359	}
360	/* get the block size of general definitions */
361	block_size = get_blocksize(p_defs);
362	/* get the number of child device */
363	child_device_num = (block_size - sizeof(*p_defs)) /
364				sizeof(*p_child);
365	count = 0;
366	for (i = 0; i < child_device_num; i++) {
367		p_child = &(p_defs->devices[i]);
368		if (!p_child->device_type) {
369			/* skip the device block if device type is invalid */
370			continue;
371		}
372		if (p_child->slave_addr != SLAVE_ADDR1 &&
373			p_child->slave_addr != SLAVE_ADDR2) {
374			/*
375			 * If the slave address is neither 0x70 nor 0x72,
376			 * it is not a SDVO device. Skip it.
377			 */
378			continue;
379		}
380		if (p_child->dvo_port != DEVICE_PORT_DVOB &&
381			p_child->dvo_port != DEVICE_PORT_DVOC) {
382			/* skip the incorrect SDVO port */
383			DRM_DEBUG_KMS("Incorrect SDVO port. Skip it\n");
384			continue;
385		}
386		DRM_DEBUG_KMS("the SDVO device with slave addr %2x is found on"
387				" %s port\n",
388				p_child->slave_addr,
389				(p_child->dvo_port == DEVICE_PORT_DVOB) ?
390					"SDVOB" : "SDVOC");
391		p_mapping = &(dev_priv->sdvo_mappings[p_child->dvo_port - 1]);
392		if (!p_mapping->initialized) {
393			p_mapping->dvo_port = p_child->dvo_port;
394			p_mapping->slave_addr = p_child->slave_addr;
395			p_mapping->dvo_wiring = p_child->dvo_wiring;
396			p_mapping->ddc_pin = p_child->ddc_pin;
397			p_mapping->i2c_pin = p_child->i2c_pin;
398			p_mapping->initialized = 1;
399			DRM_DEBUG_KMS("SDVO device: dvo=%x, addr=%x, wiring=%d, ddc_pin=%d, i2c_pin=%d\n",
400				      p_mapping->dvo_port,
401				      p_mapping->slave_addr,
402				      p_mapping->dvo_wiring,
403				      p_mapping->ddc_pin,
404				      p_mapping->i2c_pin);
405		} else {
406			DRM_DEBUG_KMS("Maybe one SDVO port is shared by "
407					 "two SDVO device.\n");
408		}
409		if (p_child->slave2_addr) {
410			/* Maybe this is a SDVO device with multiple inputs */
411			/* And the mapping info is not added */
412			DRM_DEBUG_KMS("there exists the slave2_addr. Maybe this"
413				" is a SDVO device with multiple inputs.\n");
414		}
415		count++;
416	}
417
418	if (!count) {
419		/* No SDVO device info is found */
420		DRM_DEBUG_KMS("No SDVO device info is found in VBT\n");
421	}
422	return;
423}
424
425
426static void
427parse_driver_features(struct drm_psb_private *dev_priv,
428		      struct bdb_header *bdb)
429{
430	struct bdb_driver_features *driver;
431
432	driver = find_section(bdb, BDB_DRIVER_FEATURES);
433	if (!driver)
434		return;
435
436	if (driver->lvds_config == BDB_DRIVER_FEATURE_EDP)
437		dev_priv->edp.support = 1;
438
439	/* This bit means to use 96Mhz for DPLL_A or not */
440	if (driver->primary_lfp_id)
441		dev_priv->dplla_96mhz = true;
442	else
443		dev_priv->dplla_96mhz = false;
444}
445
446static void
447parse_device_mapping(struct drm_psb_private *dev_priv,
448		       struct bdb_header *bdb)
449{
450	struct bdb_general_definitions *p_defs;
451	struct child_device_config *p_child, *child_dev_ptr;
452	int i, child_device_num, count;
453	u16	block_size;
454
455	p_defs = find_section(bdb, BDB_GENERAL_DEFINITIONS);
456	if (!p_defs) {
457		DRM_DEBUG_KMS("No general definition block is found, no devices defined.\n");
458		return;
459	}
460	/* judge whether the size of child device meets the requirements.
461	 * If the child device size obtained from general definition block
462	 * is different with sizeof(struct child_device_config), skip the
463	 * parsing of sdvo device info
464	 */
465	if (p_defs->child_dev_size != sizeof(*p_child)) {
466		/* different child dev size . Ignore it */
467		DRM_DEBUG_KMS("different child size is found. Invalid.\n");
468		return;
469	}
470	/* get the block size of general definitions */
471	block_size = get_blocksize(p_defs);
472	/* get the number of child device */
473	child_device_num = (block_size - sizeof(*p_defs)) /
474				sizeof(*p_child);
475	count = 0;
476	/* get the number of child devices that are present */
477	for (i = 0; i < child_device_num; i++) {
478		p_child = &(p_defs->devices[i]);
479		if (!p_child->device_type) {
480			/* skip the device block if device type is invalid */
481			continue;
482		}
483		count++;
484	}
485	if (!count) {
486		DRM_DEBUG_KMS("no child dev is parsed from VBT\n");
487		return;
488	}
489	dev_priv->child_dev = kcalloc(count, sizeof(*p_child), GFP_KERNEL);
490	if (!dev_priv->child_dev) {
491		DRM_DEBUG_KMS("No memory space for child devices\n");
492		return;
493	}
494
495	dev_priv->child_dev_num = count;
496	count = 0;
497	for (i = 0; i < child_device_num; i++) {
498		p_child = &(p_defs->devices[i]);
499		if (!p_child->device_type) {
500			/* skip the device block if device type is invalid */
501			continue;
502		}
503		child_dev_ptr = dev_priv->child_dev + count;
504		count++;
505		memcpy((void *)child_dev_ptr, (void *)p_child,
506					sizeof(*p_child));
507	}
508	return;
509}
510
511
512/**
513 * psb_intel_init_bios - initialize VBIOS settings & find VBT
514 * @dev: DRM device
515 *
516 * Loads the Video BIOS and checks that the VBT exists.  Sets scratch registers
517 * to appropriate values.
518 *
519 * VBT existence is a sanity check that is relied on by other i830_bios.c code.
520 * Note that it would be better to use a BIOS call to get the VBT, as BIOSes may
521 * feed an updated VBT back through that, compared to what we'll fetch using
522 * this method of groping around in the BIOS data.
523 *
524 * Returns 0 on success, nonzero on failure.
525 */
526int psb_intel_init_bios(struct drm_device *dev)
527{
528	struct drm_psb_private *dev_priv = dev->dev_private;
529	struct pci_dev *pdev = dev->pdev;
530	struct vbt_header *vbt = NULL;
531	struct bdb_header *bdb = NULL;
532	u8 __iomem *bios = NULL;
533	size_t size;
534	int i;
535
536
537	dev_priv->panel_type = 0xff;
538
539	/* XXX Should this validation be moved to intel_opregion.c? */
540	if (dev_priv->opregion.vbt) {
541		struct vbt_header *vbt = dev_priv->opregion.vbt;
542		if (memcmp(vbt->signature, "$VBT", 4) == 0) {
543			DRM_DEBUG_KMS("Using VBT from OpRegion: %20s\n",
544					 vbt->signature);
545			bdb = (struct bdb_header *)((char *)vbt + vbt->bdb_offset);
546		} else
547			dev_priv->opregion.vbt = NULL;
548	}
549
550	if (bdb == NULL) {
551		bios = pci_map_rom(pdev, &size);
552		if (!bios)
553			return -1;
554
555		/* Scour memory looking for the VBT signature */
556		for (i = 0; i + 4 < size; i++) {
557			if (!memcmp(bios + i, "$VBT", 4)) {
558				vbt = (struct vbt_header *)(bios + i);
559				break;
560			}
561		}
562
563		if (!vbt) {
564			dev_err(dev->dev, "VBT signature missing\n");
565			pci_unmap_rom(pdev, bios);
566			return -1;
567		}
568		bdb = (struct bdb_header *)(bios + i + vbt->bdb_offset);
569	}
570
571	/* Grab useful general dxefinitions */
572	parse_general_features(dev_priv, bdb);
573	parse_driver_features(dev_priv, bdb);
574	parse_lfp_panel_data(dev_priv, bdb);
575	parse_sdvo_panel_data(dev_priv, bdb);
576	parse_sdvo_device_mapping(dev_priv, bdb);
577	parse_device_mapping(dev_priv, bdb);
578	parse_backlight_data(dev_priv, bdb);
579	parse_edp(dev_priv, bdb);
580
581	if (bios)
582		pci_unmap_rom(pdev, bios);
583
584	return 0;
585}
586
587/**
588 * Destroy and free VBT data
589 */
590void psb_intel_destroy_bios(struct drm_device *dev)
591{
592	struct drm_psb_private *dev_priv = dev->dev_private;
593
594	kfree(dev_priv->sdvo_lvds_vbt_mode);
595	kfree(dev_priv->lfp_lvds_vbt_mode);
596	kfree(dev_priv->lvds_bl);
597}
598