]> CyberLeo.Net >> Repos - FreeBSD/FreeBSD.git/blob - sys/dev/drm2/drm_edid.c
Update LLDB snapshot to upstream r225923 (git 2b588ecd)
[FreeBSD/FreeBSD.git] / sys / dev / drm2 / drm_edid.c
1 /*
2  * Copyright (c) 2006 Luc Verhaegen (quirks list)
3  * Copyright (c) 2007-2008 Intel Corporation
4  *   Jesse Barnes <jesse.barnes@intel.com>
5  * Copyright 2010 Red Hat, Inc.
6  *
7  * DDC probing routines (drm_ddc_read & drm_do_probe_ddc_edid) originally from
8  * FB layer.
9  *   Copyright (C) 2006 Dennis Munsie <dmunsie@cecropia.com>
10  *
11  * Permission is hereby granted, free of charge, to any person obtaining a
12  * copy of this software and associated documentation files (the "Software"),
13  * to deal in the Software without restriction, including without limitation
14  * the rights to use, copy, modify, merge, publish, distribute, sub license,
15  * and/or sell copies of the Software, and to permit persons to whom the
16  * Software is furnished to do so, subject to the following conditions:
17  *
18  * The above copyright notice and this permission notice (including the
19  * next paragraph) shall be included in all copies or substantial portions
20  * of the Software.
21  *
22  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
23  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
24  * FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT. IN NO EVENT SHALL
25  * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
26  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
27  * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
28  * DEALINGS IN THE SOFTWARE.
29  */
30
31 #include <sys/cdefs.h>
32 __FBSDID("$FreeBSD$");
33
34 #include <dev/drm2/drmP.h>
35 #include <dev/drm2/drm_edid.h>
36 #include <dev/drm2/drm_edid_modes.h>
37 #include <dev/iicbus/iic.h>
38 #include <dev/iicbus/iiconf.h>
39 #include "iicbus_if.h"
40
41 #define version_greater(edid, maj, min) \
42         (((edid)->version > (maj)) || \
43          ((edid)->version == (maj) && (edid)->revision > (min)))
44
45 #define EDID_EST_TIMINGS 16
46 #define EDID_STD_TIMINGS 8
47 #define EDID_DETAILED_TIMINGS 4
48
49 /*
50  * EDID blocks out in the wild have a variety of bugs, try to collect
51  * them here (note that userspace may work around broken monitors first,
52  * but fixes should make their way here so that the kernel "just works"
53  * on as many displays as possible).
54  */
55
56 /* First detailed mode wrong, use largest 60Hz mode */
57 #define EDID_QUIRK_PREFER_LARGE_60              (1 << 0)
58 /* Reported 135MHz pixel clock is too high, needs adjustment */
59 #define EDID_QUIRK_135_CLOCK_TOO_HIGH           (1 << 1)
60 /* Prefer the largest mode at 75 Hz */
61 #define EDID_QUIRK_PREFER_LARGE_75              (1 << 2)
62 /* Detail timing is in cm not mm */
63 #define EDID_QUIRK_DETAILED_IN_CM               (1 << 3)
64 /* Detailed timing descriptors have bogus size values, so just take the
65  * maximum size and use that.
66  */
67 #define EDID_QUIRK_DETAILED_USE_MAXIMUM_SIZE    (1 << 4)
68 /* Monitor forgot to set the first detailed is preferred bit. */
69 #define EDID_QUIRK_FIRST_DETAILED_PREFERRED     (1 << 5)
70 /* use +hsync +vsync for detailed mode */
71 #define EDID_QUIRK_DETAILED_SYNC_PP             (1 << 6)
72
73 struct detailed_mode_closure {
74         struct drm_connector *connector;
75         struct edid *edid;
76         bool preferred;
77         u32 quirks;
78         int modes;
79 };
80
81 #define LEVEL_DMT       0
82 #define LEVEL_GTF       1
83 #define LEVEL_GTF2      2
84 #define LEVEL_CVT       3
85
86 static struct edid_quirk {
87         char vendor[4];
88         int product_id;
89         u32 quirks;
90 } edid_quirk_list[] = {
91         /* Acer AL1706 */
92         { "ACR", 44358, EDID_QUIRK_PREFER_LARGE_60 },
93         /* Acer F51 */
94         { "API", 0x7602, EDID_QUIRK_PREFER_LARGE_60 },
95         /* Unknown Acer */
96         { "ACR", 2423, EDID_QUIRK_FIRST_DETAILED_PREFERRED },
97
98         /* Belinea 10 15 55 */
99         { "MAX", 1516, EDID_QUIRK_PREFER_LARGE_60 },
100         { "MAX", 0x77e, EDID_QUIRK_PREFER_LARGE_60 },
101
102         /* Envision Peripherals, Inc. EN-7100e */
103         { "EPI", 59264, EDID_QUIRK_135_CLOCK_TOO_HIGH },
104         /* Envision EN2028 */
105         { "EPI", 8232, EDID_QUIRK_PREFER_LARGE_60 },
106
107         /* Funai Electronics PM36B */
108         { "FCM", 13600, EDID_QUIRK_PREFER_LARGE_75 |
109           EDID_QUIRK_DETAILED_IN_CM },
110
111         /* LG Philips LCD LP154W01-A5 */
112         { "LPL", 0, EDID_QUIRK_DETAILED_USE_MAXIMUM_SIZE },
113         { "LPL", 0x2a00, EDID_QUIRK_DETAILED_USE_MAXIMUM_SIZE },
114
115         /* Philips 107p5 CRT */
116         { "PHL", 57364, EDID_QUIRK_FIRST_DETAILED_PREFERRED },
117
118         /* Proview AY765C */
119         { "PTS", 765, EDID_QUIRK_FIRST_DETAILED_PREFERRED },
120
121         /* Samsung SyncMaster 205BW.  Note: irony */
122         { "SAM", 541, EDID_QUIRK_DETAILED_SYNC_PP },
123         /* Samsung SyncMaster 22[5-6]BW */
124         { "SAM", 596, EDID_QUIRK_PREFER_LARGE_60 },
125         { "SAM", 638, EDID_QUIRK_PREFER_LARGE_60 },
126 };
127
128 /*** DDC fetch and block validation ***/
129
130 static const u8 edid_header[] = {
131         0x00, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x00
132 };
133
134  /*
135  * Sanity check the header of the base EDID block.  Return 8 if the header
136  * is perfect, down to 0 if it's totally wrong.
137  */
138 int drm_edid_header_is_valid(const u8 *raw_edid)
139 {
140         int i, score = 0;
141
142         for (i = 0; i < sizeof(edid_header); i++)
143                 if (raw_edid[i] == edid_header[i])
144                         score++;
145
146         return score;
147 }
148
149 /*
150  * Sanity check the EDID block (base or extension).  Return 0 if the block
151  * doesn't check out, or 1 if it's valid.
152  */
153 static bool
154 drm_edid_block_valid(u8 *raw_edid, int block)
155 {
156         int i;
157         u8 csum = 0;
158         struct edid *edid = (struct edid *)raw_edid;
159
160         if (block == 0) {
161                 int score = drm_edid_header_is_valid(raw_edid);
162                 if (score == 8) ;
163                 else if (score >= 6) {
164                         DRM_DEBUG("Fixing EDID header, your hardware may be failing\n");
165                         memcpy(raw_edid, edid_header, sizeof(edid_header));
166                 } else {
167                         goto bad;
168                 }
169         }
170
171         for (i = 0; i < EDID_LENGTH; i++)
172                 csum += raw_edid[i];
173         if (csum) {
174                 DRM_DEBUG_KMS("EDID checksum is invalid, remainder is %d\n", csum);
175
176                 /* allow CEA to slide through, switches mangle this */
177                 if (raw_edid[0] != 0x02)
178                         goto bad;
179         }
180
181         /* per-block-type checks */
182         switch (raw_edid[0]) {
183         case 0: /* base */
184                 if (edid->version != 1) {
185                         DRM_ERROR("EDID has major version %d, instead of 1\n", edid->version);
186                         goto bad;
187                 }
188
189                 if (edid->revision > 4)
190                         DRM_DEBUG("EDID minor > 4, assuming backward compatibility\n");
191                 break;
192
193         default:
194                 break;
195         }
196
197         return 1;
198
199 bad:
200         if (raw_edid) {
201                 DRM_DEBUG_KMS("Raw EDID:\n");
202                 if ((drm_debug_flag & DRM_DEBUGBITS_KMS) != 0) {
203                         for (i = 0; i < EDID_LENGTH; ) {
204                                 printf("%02x", raw_edid[i]);
205                                 i++;
206                                 if (i % 16 == 0 || i == EDID_LENGTH)
207                                         printf("\n");
208                                 else if (i % 8 == 0)
209                                         printf("  ");
210                                 else
211                                         printf(" ");
212                         }
213                 }
214         }
215         return 0;
216 }
217
218 /**
219  * drm_edid_is_valid - sanity check EDID data
220  * @edid: EDID data
221  *
222  * Sanity-check an entire EDID record (including extensions)
223  */
224 bool drm_edid_is_valid(struct edid *edid)
225 {
226         int i;
227         u8 *raw = (u8 *)edid;
228
229         if (!edid)
230                 return false;
231
232         for (i = 0; i <= edid->extensions; i++)
233                 if (!drm_edid_block_valid(raw + i * EDID_LENGTH, i))
234                         return false;
235
236         return true;
237 }
238
239 #define DDC_ADDR 0x50
240 #define DDC_SEGMENT_ADDR 0x30
241 /**
242  * Get EDID information via I2C.
243  *
244  * \param adapter : i2c device adaptor
245  * \param buf     : EDID data buffer to be filled
246  * \param len     : EDID data buffer length
247  * \return 0 on success or -1 on failure.
248  *
249  * Try to fetch EDID information by calling i2c driver function.
250  */
251 static int
252 drm_do_probe_ddc_edid(device_t adapter, unsigned char *buf,
253                       int block, int len)
254 {
255         unsigned char start = block * EDID_LENGTH;
256         unsigned char segment = block >> 1;
257         unsigned char xfers = segment ? 3 : 2;
258         int ret, retries = 5;
259
260         /* The core i2c driver will automatically retry the transfer if the
261          * adapter reports EAGAIN. However, we find that bit-banging transfers
262          * are susceptible to errors under a heavily loaded machine and
263          * generate spurious NAKs and timeouts. Retrying the transfer
264          * of the individual block a few times seems to overcome this.
265          */
266         do {
267                 struct iic_msg msgs[] = {
268                         {
269                                 .slave  = DDC_SEGMENT_ADDR << 1,
270                                 .flags  = 0,
271                                 .len    = 1,
272                                 .buf    = &segment,
273                         }, {
274                                 .slave  = DDC_ADDR << 1,
275                                 .flags  = IIC_M_WR,
276                                 .len    = 1,
277                                 .buf    = &start,
278                         }, {
279                                 .slave  = DDC_ADDR << 1,
280                                 .flags  = IIC_M_RD,
281                                 .len    = len,
282                                 .buf    = buf,
283                         }
284                 };
285
286         /*
287          * Avoid sending the segment addr to not upset non-compliant ddc
288          * monitors.
289          */
290                 ret = iicbus_transfer(adapter, &msgs[3 - xfers], xfers);
291
292                 if (ret != 0)
293                         DRM_DEBUG_KMS("iicbus_transfer countdown %d error %d\n",
294                             retries, ret);
295         } while (ret != 0 && --retries);
296
297         return (ret == 0 ? 0 : -1);
298 }
299
300 static bool drm_edid_is_zero(u8 *in_edid, int length)
301 {
302         int i;
303         u32 *raw_edid = (u32 *)in_edid;
304
305         for (i = 0; i < length / 4; i++)
306                 if (*(raw_edid + i) != 0)
307                         return false;
308         return true;
309 }
310
311 static u8 *
312 drm_do_get_edid(struct drm_connector *connector, device_t adapter)
313 {
314         int i, j = 0, valid_extensions = 0;
315         u8 *block, *new;
316
317         block = malloc(EDID_LENGTH, DRM_MEM_KMS, M_WAITOK | M_ZERO);
318
319         /* base block fetch */
320         for (i = 0; i < 4; i++) {
321                 if (drm_do_probe_ddc_edid(adapter, block, 0, EDID_LENGTH))
322                         goto out;
323                 if (drm_edid_block_valid(block, 0))
324                         break;
325                 if (i == 0 && drm_edid_is_zero(block, EDID_LENGTH)) {
326                         connector->null_edid_counter++;
327                         goto carp;
328                 }
329         }
330         if (i == 4)
331                 goto carp;
332
333         /* if there's no extensions, we're done */
334         if (block[0x7e] == 0)
335                 return block;
336
337         new = reallocf(block, (block[0x7e] + 1) * EDID_LENGTH, DRM_MEM_KMS,
338             M_WAITOK);
339         block = new;
340
341         for (j = 1; j <= block[0x7e]; j++) {
342                 for (i = 0; i < 4; i++) {
343                         if (drm_do_probe_ddc_edid(adapter,
344                                   block + (valid_extensions + 1) * EDID_LENGTH,
345                                   j, EDID_LENGTH))
346                                 goto out;
347                         if (drm_edid_block_valid(block + (valid_extensions + 1) * EDID_LENGTH, j)) {
348                                 valid_extensions++;
349                                 break;
350                         }
351                 }
352                 if (i == 4)
353                         DRM_DEBUG_KMS("%s: Ignoring invalid EDID block %d.\n",
354                              drm_get_connector_name(connector), j);
355         }
356
357         if (valid_extensions != block[0x7e]) {
358                 block[EDID_LENGTH-1] += block[0x7e] - valid_extensions;
359                 block[0x7e] = valid_extensions;
360                 new = reallocf(block, (valid_extensions + 1) * EDID_LENGTH,
361                     DRM_MEM_KMS, M_WAITOK);
362                 block = new;
363         }
364
365         DRM_DEBUG_KMS("got EDID from %s\n", drm_get_connector_name(connector));
366         return block;
367
368 carp:
369         DRM_DEBUG_KMS("%s: EDID block %d invalid.\n",
370             drm_get_connector_name(connector), j);
371
372 out:
373         free(block, DRM_MEM_KMS);
374         return NULL;
375 }
376
377 /**
378  * Probe DDC presence.
379  *
380  * \param adapter : i2c device adaptor
381  * \return 1 on success
382  */
383 static bool
384 drm_probe_ddc(device_t adapter)
385 {
386         unsigned char out;
387
388         return (drm_do_probe_ddc_edid(adapter, &out, 0, 1) == 0);
389 }
390
391 /**
392  * drm_get_edid - get EDID data, if available
393  * @connector: connector we're probing
394  * @adapter: i2c adapter to use for DDC
395  *
396  * Poke the given i2c channel to grab EDID data if possible.  If found,
397  * attach it to the connector.
398  *
399  * Return edid data or NULL if we couldn't find any.
400  */
401 struct edid *drm_get_edid(struct drm_connector *connector,
402                           device_t adapter)
403 {
404         struct edid *edid = NULL;
405
406         if (drm_probe_ddc(adapter))
407                 edid = (struct edid *)drm_do_get_edid(connector, adapter);
408
409         connector->display_info.raw_edid = (char *)edid;
410
411         return edid;
412
413 }
414
415 /*** EDID parsing ***/
416
417 /**
418  * edid_vendor - match a string against EDID's obfuscated vendor field
419  * @edid: EDID to match
420  * @vendor: vendor string
421  *
422  * Returns true if @vendor is in @edid, false otherwise
423  */
424 static bool edid_vendor(struct edid *edid, char *vendor)
425 {
426         char edid_vendor[3];
427
428         edid_vendor[0] = ((edid->mfg_id[0] & 0x7c) >> 2) + '@';
429         edid_vendor[1] = (((edid->mfg_id[0] & 0x3) << 3) |
430                           ((edid->mfg_id[1] & 0xe0) >> 5)) + '@';
431         edid_vendor[2] = (edid->mfg_id[1] & 0x1f) + '@';
432
433         return !strncmp(edid_vendor, vendor, 3);
434 }
435
436 /**
437  * edid_get_quirks - return quirk flags for a given EDID
438  * @edid: EDID to process
439  *
440  * This tells subsequent routines what fixes they need to apply.
441  */
442 static u32 edid_get_quirks(struct edid *edid)
443 {
444         struct edid_quirk *quirk;
445         int i;
446
447         for (i = 0; i < DRM_ARRAY_SIZE(edid_quirk_list); i++) {
448                 quirk = &edid_quirk_list[i];
449
450                 if (edid_vendor(edid, quirk->vendor) &&
451                     (EDID_PRODUCT_ID(edid) == quirk->product_id))
452                         return quirk->quirks;
453         }
454
455         return 0;
456 }
457
458 #define MODE_SIZE(m) ((m)->hdisplay * (m)->vdisplay)
459 #define MODE_REFRESH_DIFF(m,r) (abs((m)->vrefresh - target_refresh))
460
461 /**
462  * edid_fixup_preferred - set preferred modes based on quirk list
463  * @connector: has mode list to fix up
464  * @quirks: quirks list
465  *
466  * Walk the mode list for @connector, clearing the preferred status
467  * on existing modes and setting it anew for the right mode ala @quirks.
468  */
469 static void edid_fixup_preferred(struct drm_connector *connector,
470                                  u32 quirks)
471 {
472         struct drm_display_mode *t, *cur_mode, *preferred_mode;
473         int target_refresh = 0;
474
475         if (list_empty(&connector->probed_modes))
476                 return;
477
478         if (quirks & EDID_QUIRK_PREFER_LARGE_60)
479                 target_refresh = 60;
480         if (quirks & EDID_QUIRK_PREFER_LARGE_75)
481                 target_refresh = 75;
482
483         preferred_mode = list_first_entry(&connector->probed_modes,
484                                           struct drm_display_mode, head);
485
486         list_for_each_entry_safe(cur_mode, t, &connector->probed_modes, head) {
487                 cur_mode->type &= ~DRM_MODE_TYPE_PREFERRED;
488
489                 if (cur_mode == preferred_mode)
490                         continue;
491
492                 /* Largest mode is preferred */
493                 if (MODE_SIZE(cur_mode) > MODE_SIZE(preferred_mode))
494                         preferred_mode = cur_mode;
495
496                 /* At a given size, try to get closest to target refresh */
497                 if ((MODE_SIZE(cur_mode) == MODE_SIZE(preferred_mode)) &&
498                     MODE_REFRESH_DIFF(cur_mode, target_refresh) <
499                     MODE_REFRESH_DIFF(preferred_mode, target_refresh)) {
500                         preferred_mode = cur_mode;
501                 }
502         }
503
504         preferred_mode->type |= DRM_MODE_TYPE_PREFERRED;
505 }
506
507 static bool
508 mode_is_rb(const struct drm_display_mode *mode)
509 {
510         return (mode->htotal - mode->hdisplay == 160) &&
511                (mode->hsync_end - mode->hdisplay == 80) &&
512                (mode->hsync_end - mode->hsync_start == 32) &&
513                (mode->vsync_start - mode->vdisplay == 3);
514 }
515
516 /*
517  * drm_mode_find_dmt - Create a copy of a mode if present in DMT
518  * @dev: Device to duplicate against
519  * @hsize: Mode width
520  * @vsize: Mode height
521  * @fresh: Mode refresh rate
522  * @rb: Mode reduced-blanking-ness
523  *
524  * Walk the DMT mode list looking for a match for the given parameters.
525  * Return a newly allocated copy of the mode, or NULL if not found.
526  */
527 struct drm_display_mode *drm_mode_find_dmt(struct drm_device *dev,
528                                            int hsize, int vsize, int fresh,
529                                            bool rb)
530 {
531         int i;
532
533         for (i = 0; i < drm_num_dmt_modes; i++) {
534                 struct drm_display_mode *ptr = &drm_dmt_modes[i];
535                 if (hsize != ptr->hdisplay)
536                         continue;
537                 if (vsize != ptr->vdisplay)
538                         continue;
539                 if (fresh != drm_mode_vrefresh(ptr))
540                         continue;
541                 if (rb != mode_is_rb(ptr))
542                         continue;
543
544                 return drm_mode_duplicate(dev, ptr);
545         }
546
547         return NULL;
548 }
549
550 typedef void detailed_cb(struct detailed_timing *timing, void *closure);
551
552 static void
553 cea_for_each_detailed_block(u8 *ext, detailed_cb *cb, void *closure)
554 {
555         int i, n = 0;
556         u8 rev = ext[0x01], d = ext[0x02];
557         u8 *det_base = ext + d;
558
559         switch (rev) {
560         case 0:
561                 /* can't happen */
562                 return;
563         case 1:
564                 /* have to infer how many blocks we have, check pixel clock */
565                 for (i = 0; i < 6; i++)
566                         if (det_base[18*i] || det_base[18*i+1])
567                                 n++;
568                 break;
569         default:
570                 /* explicit count */
571                 n = min(ext[0x03] & 0x0f, 6);
572                 break;
573         }
574
575         for (i = 0; i < n; i++)
576                 cb((struct detailed_timing *)(det_base + 18 * i), closure);
577 }
578
579 static void
580 vtb_for_each_detailed_block(u8 *ext, detailed_cb *cb, void *closure)
581 {
582         unsigned int i, n = min((int)ext[0x02], 6);
583         u8 *det_base = ext + 5;
584
585         if (ext[0x01] != 1)
586                 return; /* unknown version */
587
588         for (i = 0; i < n; i++)
589                 cb((struct detailed_timing *)(det_base + 18 * i), closure);
590 }
591
592 static void
593 drm_for_each_detailed_block(u8 *raw_edid, detailed_cb *cb, void *closure)
594 {
595         int i;
596         struct edid *edid = (struct edid *)raw_edid;
597
598         if (edid == NULL)
599                 return;
600
601         for (i = 0; i < EDID_DETAILED_TIMINGS; i++)
602                 cb(&(edid->detailed_timings[i]), closure);
603
604         for (i = 1; i <= raw_edid[0x7e]; i++) {
605                 u8 *ext = raw_edid + (i * EDID_LENGTH);
606                 switch (*ext) {
607                 case CEA_EXT:
608                         cea_for_each_detailed_block(ext, cb, closure);
609                         break;
610                 case VTB_EXT:
611                         vtb_for_each_detailed_block(ext, cb, closure);
612                         break;
613                 default:
614                         break;
615                 }
616         }
617 }
618
619 static void
620 is_rb(struct detailed_timing *t, void *data)
621 {
622         u8 *r = (u8 *)t;
623         if (r[3] == EDID_DETAIL_MONITOR_RANGE)
624                 if (r[15] & 0x10)
625                         *(bool *)data = true;
626 }
627
628 /* EDID 1.4 defines this explicitly.  For EDID 1.3, we guess, badly. */
629 static bool
630 drm_monitor_supports_rb(struct edid *edid)
631 {
632         if (edid->revision >= 4) {
633                 bool ret;
634                 drm_for_each_detailed_block((u8 *)edid, is_rb, &ret);
635                 return ret;
636         }
637
638         return ((edid->input & DRM_EDID_INPUT_DIGITAL) != 0);
639 }
640
641 static void
642 find_gtf2(struct detailed_timing *t, void *data)
643 {
644         u8 *r = (u8 *)t;
645         if (r[3] == EDID_DETAIL_MONITOR_RANGE && r[10] == 0x02)
646                 *(u8 **)data = r;
647 }
648
649 /* Secondary GTF curve kicks in above some break frequency */
650 static int
651 drm_gtf2_hbreak(struct edid *edid)
652 {
653         u8 *r = NULL;
654         drm_for_each_detailed_block((u8 *)edid, find_gtf2, &r);
655         return r ? (r[12] * 2) : 0;
656 }
657
658 static int
659 drm_gtf2_2c(struct edid *edid)
660 {
661         u8 *r = NULL;
662         drm_for_each_detailed_block((u8 *)edid, find_gtf2, &r);
663         return r ? r[13] : 0;
664 }
665
666 static int
667 drm_gtf2_m(struct edid *edid)
668 {
669         u8 *r = NULL;
670         drm_for_each_detailed_block((u8 *)edid, find_gtf2, &r);
671         return r ? (r[15] << 8) + r[14] : 0;
672 }
673
674 static int
675 drm_gtf2_k(struct edid *edid)
676 {
677         u8 *r = NULL;
678         drm_for_each_detailed_block((u8 *)edid, find_gtf2, &r);
679         return r ? r[16] : 0;
680 }
681
682 static int
683 drm_gtf2_2j(struct edid *edid)
684 {
685         u8 *r = NULL;
686         drm_for_each_detailed_block((u8 *)edid, find_gtf2, &r);
687         return r ? r[17] : 0;
688 }
689
690 /**
691  * standard_timing_level - get std. timing level(CVT/GTF/DMT)
692  * @edid: EDID block to scan
693  */
694 static int standard_timing_level(struct edid *edid)
695 {
696         if (edid->revision >= 2) {
697                 if (edid->revision >= 4 && (edid->features & DRM_EDID_FEATURE_DEFAULT_GTF))
698                         return LEVEL_CVT;
699                 if (drm_gtf2_hbreak(edid))
700                         return LEVEL_GTF2;
701                 return LEVEL_GTF;
702         }
703         return LEVEL_DMT;
704 }
705
706 /*
707  * 0 is reserved.  The spec says 0x01 fill for unused timings.  Some old
708  * monitors fill with ascii space (0x20) instead.
709  */
710 static int
711 bad_std_timing(u8 a, u8 b)
712 {
713         return (a == 0x00 && b == 0x00) ||
714                (a == 0x01 && b == 0x01) ||
715                (a == 0x20 && b == 0x20);
716 }
717
718 /**
719  * drm_mode_std - convert standard mode info (width, height, refresh) into mode
720  * @t: standard timing params
721  * @timing_level: standard timing level
722  *
723  * Take the standard timing params (in this case width, aspect, and refresh)
724  * and convert them into a real mode using CVT/GTF/DMT.
725  */
726 static struct drm_display_mode *
727 drm_mode_std(struct drm_connector *connector, struct edid *edid,
728              struct std_timing *t, int revision)
729 {
730         struct drm_device *dev = connector->dev;
731         struct drm_display_mode *m, *mode = NULL;
732         int hsize, vsize;
733         int vrefresh_rate;
734         unsigned aspect_ratio = (t->vfreq_aspect & EDID_TIMING_ASPECT_MASK)
735                 >> EDID_TIMING_ASPECT_SHIFT;
736         unsigned vfreq = (t->vfreq_aspect & EDID_TIMING_VFREQ_MASK)
737                 >> EDID_TIMING_VFREQ_SHIFT;
738         int timing_level = standard_timing_level(edid);
739
740         if (bad_std_timing(t->hsize, t->vfreq_aspect))
741                 return NULL;
742
743         /* According to the EDID spec, the hdisplay = hsize * 8 + 248 */
744         hsize = t->hsize * 8 + 248;
745         /* vrefresh_rate = vfreq + 60 */
746         vrefresh_rate = vfreq + 60;
747         /* the vdisplay is calculated based on the aspect ratio */
748         if (aspect_ratio == 0) {
749                 if (revision < 3)
750                         vsize = hsize;
751                 else
752                         vsize = (hsize * 10) / 16;
753         } else if (aspect_ratio == 1)
754                 vsize = (hsize * 3) / 4;
755         else if (aspect_ratio == 2)
756                 vsize = (hsize * 4) / 5;
757         else
758                 vsize = (hsize * 9) / 16;
759
760         /* HDTV hack, part 1 */
761         if (vrefresh_rate == 60 &&
762             ((hsize == 1360 && vsize == 765) ||
763              (hsize == 1368 && vsize == 769))) {
764                 hsize = 1366;
765                 vsize = 768;
766         }
767
768         /*
769          * If this connector already has a mode for this size and refresh
770          * rate (because it came from detailed or CVT info), use that
771          * instead.  This way we don't have to guess at interlace or
772          * reduced blanking.
773          */
774         list_for_each_entry(m, &connector->probed_modes, head)
775                 if (m->hdisplay == hsize && m->vdisplay == vsize &&
776                     drm_mode_vrefresh(m) == vrefresh_rate)
777                         return NULL;
778
779         /* HDTV hack, part 2 */
780         if (hsize == 1366 && vsize == 768 && vrefresh_rate == 60) {
781                 mode = drm_cvt_mode(dev, 1366, 768, vrefresh_rate, 0, 0,
782                                     false);
783                 mode->hdisplay = 1366;
784                 mode->hsync_start = mode->hsync_start - 1;
785                 mode->hsync_end = mode->hsync_end - 1;
786                 return mode;
787         }
788
789         /* check whether it can be found in default mode table */
790         if (drm_monitor_supports_rb(edid)) {
791                 mode = drm_mode_find_dmt(dev, hsize, vsize, vrefresh_rate,
792                                          true);
793                 if (mode)
794                         return mode;
795         }
796         mode = drm_mode_find_dmt(dev, hsize, vsize, vrefresh_rate, false);
797         if (mode)
798                 return mode;
799
800         /* okay, generate it */
801         switch (timing_level) {
802         case LEVEL_DMT:
803                 break;
804         case LEVEL_GTF:
805                 mode = drm_gtf_mode(dev, hsize, vsize, vrefresh_rate, 0, 0);
806                 break;
807         case LEVEL_GTF2:
808                 /*
809                  * This is potentially wrong if there's ever a monitor with
810                  * more than one ranges section, each claiming a different
811                  * secondary GTF curve.  Please don't do that.
812                  */
813                 mode = drm_gtf_mode(dev, hsize, vsize, vrefresh_rate, 0, 0);
814                 if (!mode)
815                         return NULL;
816                 if (drm_mode_hsync(mode) > drm_gtf2_hbreak(edid)) {
817                         free(mode, DRM_MEM_KMS);
818                         mode = drm_gtf_mode_complex(dev, hsize, vsize,
819                                                     vrefresh_rate, 0, 0,
820                                                     drm_gtf2_m(edid),
821                                                     drm_gtf2_2c(edid),
822                                                     drm_gtf2_k(edid),
823                                                     drm_gtf2_2j(edid));
824                 }
825                 break;
826         case LEVEL_CVT:
827                 mode = drm_cvt_mode(dev, hsize, vsize, vrefresh_rate, 0, 0,
828                                     false);
829                 break;
830         }
831         return mode;
832 }
833
834 /*
835  * EDID is delightfully ambiguous about how interlaced modes are to be
836  * encoded.  Our internal representation is of frame height, but some
837  * HDTV detailed timings are encoded as field height.
838  *
839  * The format list here is from CEA, in frame size.  Technically we
840  * should be checking refresh rate too.  Whatever.
841  */
842 static void
843 drm_mode_do_interlace_quirk(struct drm_display_mode *mode,
844                             struct detailed_pixel_timing *pt)
845 {
846         int i;
847         static const struct {
848                 int w, h;
849         } cea_interlaced[] = {
850                 { 1920, 1080 },
851                 {  720,  480 },
852                 { 1440,  480 },
853                 { 2880,  480 },
854                 {  720,  576 },
855                 { 1440,  576 },
856                 { 2880,  576 },
857         };
858
859         if (!(pt->misc & DRM_EDID_PT_INTERLACED))
860                 return;
861
862         for (i = 0; i < DRM_ARRAY_SIZE(cea_interlaced); i++) {
863                 if ((mode->hdisplay == cea_interlaced[i].w) &&
864                     (mode->vdisplay == cea_interlaced[i].h / 2)) {
865                         mode->vdisplay *= 2;
866                         mode->vsync_start *= 2;
867                         mode->vsync_end *= 2;
868                         mode->vtotal *= 2;
869                         mode->vtotal |= 1;
870                 }
871         }
872
873         mode->flags |= DRM_MODE_FLAG_INTERLACE;
874 }
875
876 /**
877  * drm_mode_detailed - create a new mode from an EDID detailed timing section
878  * @dev: DRM device (needed to create new mode)
879  * @edid: EDID block
880  * @timing: EDID detailed timing info
881  * @quirks: quirks to apply
882  *
883  * An EDID detailed timing block contains enough info for us to create and
884  * return a new struct drm_display_mode.
885  */
886 static struct drm_display_mode *drm_mode_detailed(struct drm_device *dev,
887                                                   struct edid *edid,
888                                                   struct detailed_timing *timing,
889                                                   u32 quirks)
890 {
891         struct drm_display_mode *mode;
892         struct detailed_pixel_timing *pt = &timing->data.pixel_data;
893         unsigned hactive = (pt->hactive_hblank_hi & 0xf0) << 4 | pt->hactive_lo;
894         unsigned vactive = (pt->vactive_vblank_hi & 0xf0) << 4 | pt->vactive_lo;
895         unsigned hblank = (pt->hactive_hblank_hi & 0xf) << 8 | pt->hblank_lo;
896         unsigned vblank = (pt->vactive_vblank_hi & 0xf) << 8 | pt->vblank_lo;
897         unsigned hsync_offset = (pt->hsync_vsync_offset_pulse_width_hi & 0xc0) << 2 | pt->hsync_offset_lo;
898         unsigned hsync_pulse_width = (pt->hsync_vsync_offset_pulse_width_hi & 0x30) << 4 | pt->hsync_pulse_width_lo;
899         unsigned vsync_offset = (pt->hsync_vsync_offset_pulse_width_hi & 0xc) >> 2 | pt->vsync_offset_pulse_width_lo >> 4;
900         unsigned vsync_pulse_width = (pt->hsync_vsync_offset_pulse_width_hi & 0x3) << 4 | (pt->vsync_offset_pulse_width_lo & 0xf);
901
902         /* ignore tiny modes */
903         if (hactive < 64 || vactive < 64)
904                 return NULL;
905
906         if (pt->misc & DRM_EDID_PT_STEREO) {
907                 printf("stereo mode not supported\n");
908                 return NULL;
909         }
910         if (!(pt->misc & DRM_EDID_PT_SEPARATE_SYNC)) {
911                 printf("composite sync not supported\n");
912         }
913
914         /* it is incorrect if hsync/vsync width is zero */
915         if (!hsync_pulse_width || !vsync_pulse_width) {
916                 DRM_DEBUG_KMS("Incorrect Detailed timing. "
917                                 "Wrong Hsync/Vsync pulse width\n");
918                 return NULL;
919         }
920         mode = drm_mode_create(dev);
921         if (!mode)
922                 return NULL;
923
924         mode->type = DRM_MODE_TYPE_DRIVER;
925
926         if (quirks & EDID_QUIRK_135_CLOCK_TOO_HIGH)
927                 timing->pixel_clock = htole16(1088);
928
929         mode->clock = le16toh(timing->pixel_clock) * 10;
930
931         mode->hdisplay = hactive;
932         mode->hsync_start = mode->hdisplay + hsync_offset;
933         mode->hsync_end = mode->hsync_start + hsync_pulse_width;
934         mode->htotal = mode->hdisplay + hblank;
935
936         mode->vdisplay = vactive;
937         mode->vsync_start = mode->vdisplay + vsync_offset;
938         mode->vsync_end = mode->vsync_start + vsync_pulse_width;
939         mode->vtotal = mode->vdisplay + vblank;
940
941         /* Some EDIDs have bogus h/vtotal values */
942         if (mode->hsync_end > mode->htotal)
943                 mode->htotal = mode->hsync_end + 1;
944         if (mode->vsync_end > mode->vtotal)
945                 mode->vtotal = mode->vsync_end + 1;
946
947         drm_mode_do_interlace_quirk(mode, pt);
948
949         drm_mode_set_name(mode);
950
951         if (quirks & EDID_QUIRK_DETAILED_SYNC_PP) {
952                 pt->misc |= DRM_EDID_PT_HSYNC_POSITIVE | DRM_EDID_PT_VSYNC_POSITIVE;
953         }
954
955         mode->flags |= (pt->misc & DRM_EDID_PT_HSYNC_POSITIVE) ?
956                 DRM_MODE_FLAG_PHSYNC : DRM_MODE_FLAG_NHSYNC;
957         mode->flags |= (pt->misc & DRM_EDID_PT_VSYNC_POSITIVE) ?
958                 DRM_MODE_FLAG_PVSYNC : DRM_MODE_FLAG_NVSYNC;
959
960         mode->width_mm = pt->width_mm_lo | (pt->width_height_mm_hi & 0xf0) << 4;
961         mode->height_mm = pt->height_mm_lo | (pt->width_height_mm_hi & 0xf) << 8;
962
963         if (quirks & EDID_QUIRK_DETAILED_IN_CM) {
964                 mode->width_mm *= 10;
965                 mode->height_mm *= 10;
966         }
967
968         if (quirks & EDID_QUIRK_DETAILED_USE_MAXIMUM_SIZE) {
969                 mode->width_mm = edid->width_cm * 10;
970                 mode->height_mm = edid->height_cm * 10;
971         }
972
973         return mode;
974 }
975
976 static bool
977 mode_in_hsync_range(struct drm_display_mode *mode,
978                     struct edid *edid, u8 *t)
979 {
980         int hsync, hmin, hmax;
981
982         hmin = t[7];
983         if (edid->revision >= 4)
984             hmin += ((t[4] & 0x04) ? 255 : 0);
985         hmax = t[8];
986         if (edid->revision >= 4)
987             hmax += ((t[4] & 0x08) ? 255 : 0);
988         hsync = drm_mode_hsync(mode);
989
990         return (hsync <= hmax && hsync >= hmin);
991 }
992
993 static bool
994 mode_in_vsync_range(struct drm_display_mode *mode,
995                     struct edid *edid, u8 *t)
996 {
997         int vsync, vmin, vmax;
998
999         vmin = t[5];
1000         if (edid->revision >= 4)
1001             vmin += ((t[4] & 0x01) ? 255 : 0);
1002         vmax = t[6];
1003         if (edid->revision >= 4)
1004             vmax += ((t[4] & 0x02) ? 255 : 0);
1005         vsync = drm_mode_vrefresh(mode);
1006
1007         return (vsync <= vmax && vsync >= vmin);
1008 }
1009
1010 static u32
1011 range_pixel_clock(struct edid *edid, u8 *t)
1012 {
1013         /* unspecified */
1014         if (t[9] == 0 || t[9] == 255)
1015                 return 0;
1016
1017         /* 1.4 with CVT support gives us real precision, yay */
1018         if (edid->revision >= 4 && t[10] == 0x04)
1019                 return (t[9] * 10000) - ((t[12] >> 2) * 250);
1020
1021         /* 1.3 is pathetic, so fuzz up a bit */
1022         return t[9] * 10000 + 5001;
1023 }
1024
1025 static bool
1026 mode_in_range(struct drm_display_mode *mode, struct edid *edid,
1027               struct detailed_timing *timing)
1028 {
1029         u32 max_clock;
1030         u8 *t = (u8 *)timing;
1031
1032         if (!mode_in_hsync_range(mode, edid, t))
1033                 return false;
1034
1035         if (!mode_in_vsync_range(mode, edid, t))
1036                 return false;
1037
1038         if ((max_clock = range_pixel_clock(edid, t)))
1039                 if (mode->clock > max_clock)
1040                         return false;
1041
1042         /* 1.4 max horizontal check */
1043         if (edid->revision >= 4 && t[10] == 0x04)
1044                 if (t[13] && mode->hdisplay > 8 * (t[13] + (256 * (t[12]&0x3))))
1045                         return false;
1046
1047         if (mode_is_rb(mode) && !drm_monitor_supports_rb(edid))
1048                 return false;
1049
1050         return true;
1051 }
1052
1053 static int
1054 drm_dmt_modes_for_range(struct drm_connector *connector, struct edid *edid,
1055                         struct detailed_timing *timing)
1056 {
1057         int i, modes = 0;
1058         struct drm_display_mode *newmode;
1059         struct drm_device *dev = connector->dev;
1060
1061         for (i = 0; i < drm_num_dmt_modes; i++) {
1062                 if (mode_in_range(drm_dmt_modes + i, edid, timing)) {
1063                         newmode = drm_mode_duplicate(dev, &drm_dmt_modes[i]);
1064                         if (newmode) {
1065                                 drm_mode_probed_add(connector, newmode);
1066                                 modes++;
1067                         }
1068                 }
1069         }
1070
1071         return modes;
1072 }
1073
1074 /* fix up 1366x768 mode from 1368x768;
1075  * GFT/CVT can't express 1366 width which isn't dividable by 8
1076  */
1077 static void fixup_mode_1366x768(struct drm_display_mode *mode)
1078 {
1079         if (mode->hdisplay == 1368 && mode->vdisplay == 768) {
1080                 mode->hdisplay = 1366;
1081                 mode->hsync_start--;
1082                 mode->hsync_end--;
1083                 drm_mode_set_name(mode);
1084         }
1085 }
1086
1087 static int
1088 drm_gtf_modes_for_range(struct drm_connector *connector, struct edid *edid,
1089                         struct detailed_timing *timing)
1090 {
1091         int i, modes = 0;
1092         struct drm_display_mode *newmode;
1093         struct drm_device *dev = connector->dev;
1094
1095         for (i = 0; i < num_extra_modes; i++) {
1096                 const struct minimode *m = &extra_modes[i];
1097                 newmode = drm_gtf_mode(dev, m->w, m->h, m->r, 0, 0);
1098                 if (!newmode)
1099                         return modes;
1100
1101                 fixup_mode_1366x768(newmode);
1102                 if (!mode_in_range(newmode, edid, timing)) {
1103                         drm_mode_destroy(dev, newmode);
1104                         continue;
1105                 }
1106
1107                 drm_mode_probed_add(connector, newmode);
1108                 modes++;
1109         }
1110
1111         return modes;
1112 }
1113
1114 static int
1115 drm_cvt_modes_for_range(struct drm_connector *connector, struct edid *edid,
1116                         struct detailed_timing *timing)
1117 {
1118         int i, modes = 0;
1119         struct drm_display_mode *newmode;
1120         struct drm_device *dev = connector->dev;
1121         bool rb = drm_monitor_supports_rb(edid);
1122
1123         for (i = 0; i < num_extra_modes; i++) {
1124                 const struct minimode *m = &extra_modes[i];
1125                 newmode = drm_cvt_mode(dev, m->w, m->h, m->r, rb, 0, 0);
1126                 if (!newmode)
1127                         return modes;
1128
1129                 fixup_mode_1366x768(newmode);
1130                 if (!mode_in_range(newmode, edid, timing)) {
1131                         drm_mode_destroy(dev, newmode);
1132                         continue;
1133                 }
1134
1135                 drm_mode_probed_add(connector, newmode);
1136                 modes++;
1137         }
1138
1139         return modes;
1140 }
1141
1142 static void
1143 do_inferred_modes(struct detailed_timing *timing, void *c)
1144 {
1145         struct detailed_mode_closure *closure = c;
1146         struct detailed_non_pixel *data = &timing->data.other_data;
1147         struct detailed_data_monitor_range *range = &data->data.range;
1148
1149         if (data->type != EDID_DETAIL_MONITOR_RANGE)
1150                 return;
1151
1152         closure->modes += drm_dmt_modes_for_range(closure->connector,
1153                                                   closure->edid,
1154                                                   timing);
1155         
1156         if (!version_greater(closure->edid, 1, 1))
1157                 return; /* GTF not defined yet */
1158
1159         switch (range->flags) {
1160         case 0x02: /* secondary gtf, XXX could do more */
1161         case 0x00: /* default gtf */
1162                 closure->modes += drm_gtf_modes_for_range(closure->connector,
1163                                                           closure->edid,
1164                                                           timing);
1165                 break;
1166         case 0x04: /* cvt, only in 1.4+ */
1167                 if (!version_greater(closure->edid, 1, 3))
1168                         break;
1169
1170                 closure->modes += drm_cvt_modes_for_range(closure->connector,
1171                                                           closure->edid,
1172                                                           timing);
1173                 break;
1174         case 0x01: /* just the ranges, no formula */
1175         default:
1176                 break;
1177         }
1178 }
1179
1180 static int
1181 add_inferred_modes(struct drm_connector *connector, struct edid *edid)
1182 {
1183         struct detailed_mode_closure closure = {
1184                 connector, edid, 0, 0, 0
1185         };
1186
1187         if (version_greater(edid, 1, 0))
1188                 drm_for_each_detailed_block((u8 *)edid, do_inferred_modes,
1189                                             &closure);
1190
1191         return closure.modes;
1192 }
1193
1194 static int
1195 drm_est3_modes(struct drm_connector *connector, struct detailed_timing *timing)
1196 {
1197         int i, j, m, modes = 0;
1198         struct drm_display_mode *mode;
1199         u8 *est = ((u8 *)timing) + 5;
1200
1201         for (i = 0; i < 6; i++) {
1202                 for (j = 7; j > 0; j--) {
1203                         m = (i * 8) + (7 - j);
1204                         if (m >= DRM_ARRAY_SIZE(est3_modes))
1205                                 break;
1206                         if (est[i] & (1 << j)) {
1207                                 mode = drm_mode_find_dmt(connector->dev,
1208                                                          est3_modes[m].w,
1209                                                          est3_modes[m].h,
1210                                                          est3_modes[m].r,
1211                                                          est3_modes[m].rb);
1212                                 if (mode) {
1213                                         drm_mode_probed_add(connector, mode);
1214                                         modes++;
1215                                 }
1216                         }
1217                 }
1218         }
1219
1220         return modes;
1221 }
1222
1223 static void
1224 do_established_modes(struct detailed_timing *timing, void *c)
1225 {
1226         struct detailed_mode_closure *closure = c;
1227         struct detailed_non_pixel *data = &timing->data.other_data;
1228
1229         if (data->type == EDID_DETAIL_EST_TIMINGS)
1230                 closure->modes += drm_est3_modes(closure->connector, timing);
1231 }
1232
1233 /**
1234  * add_established_modes - get est. modes from EDID and add them
1235  * @edid: EDID block to scan
1236  *
1237  * Each EDID block contains a bitmap of the supported "established modes" list
1238  * (defined above).  Tease them out and add them to the global modes list.
1239  */
1240 static int
1241 add_established_modes(struct drm_connector *connector, struct edid *edid)
1242 {
1243         struct drm_device *dev = connector->dev;
1244         unsigned long est_bits = edid->established_timings.t1 |
1245                 (edid->established_timings.t2 << 8) |
1246                 ((edid->established_timings.mfg_rsvd & 0x80) << 9);
1247         int i, modes = 0;
1248         struct detailed_mode_closure closure = {
1249                 connector, edid, 0, 0, 0
1250         };
1251
1252         for (i = 0; i <= EDID_EST_TIMINGS; i++) {
1253                 if (est_bits & (1<<i)) {
1254                         struct drm_display_mode *newmode;
1255                         newmode = drm_mode_duplicate(dev, &edid_est_modes[i]);
1256                         if (newmode) {
1257                                 drm_mode_probed_add(connector, newmode);
1258                                 modes++;
1259                         }
1260                 }
1261         }
1262
1263         if (version_greater(edid, 1, 0))
1264                     drm_for_each_detailed_block((u8 *)edid,
1265                                                 do_established_modes, &closure);
1266
1267         return modes + closure.modes;
1268 }
1269
1270 static void
1271 do_standard_modes(struct detailed_timing *timing, void *c)
1272 {
1273         struct detailed_mode_closure *closure = c;
1274         struct detailed_non_pixel *data = &timing->data.other_data;
1275         struct drm_connector *connector = closure->connector;
1276         struct edid *edid = closure->edid;
1277
1278         if (data->type == EDID_DETAIL_STD_MODES) {
1279                 int i;
1280                 for (i = 0; i < 6; i++) {
1281                         struct std_timing *std;
1282                         struct drm_display_mode *newmode;
1283
1284                         std = &data->data.timings[i];
1285                         newmode = drm_mode_std(connector, edid, std,
1286                                                edid->revision);
1287                         if (newmode) {
1288                                 drm_mode_probed_add(connector, newmode);
1289                                 closure->modes++;
1290                         }
1291                 }
1292         }
1293 }
1294
1295 /**
1296  * add_standard_modes - get std. modes from EDID and add them
1297  * @edid: EDID block to scan
1298  *
1299  * Standard modes can be calculated using the appropriate standard (DMT,
1300  * GTF or CVT. Grab them from @edid and add them to the list.
1301  */
1302 static int
1303 add_standard_modes(struct drm_connector *connector, struct edid *edid)
1304 {
1305         int i, modes = 0;
1306         struct detailed_mode_closure closure = {
1307                 connector, edid, 0, 0, 0
1308         };
1309
1310         for (i = 0; i < EDID_STD_TIMINGS; i++) {
1311                 struct drm_display_mode *newmode;
1312
1313                 newmode = drm_mode_std(connector, edid,
1314                                        &edid->standard_timings[i],
1315                                        edid->revision);
1316                 if (newmode) {
1317                         drm_mode_probed_add(connector, newmode);
1318                         modes++;
1319                 }
1320         }
1321
1322         if (version_greater(edid, 1, 0))
1323                 drm_for_each_detailed_block((u8 *)edid, do_standard_modes,
1324                                             &closure);
1325
1326         /* XXX should also look for standard codes in VTB blocks */
1327
1328         return modes + closure.modes;
1329 }
1330
1331 static int drm_cvt_modes(struct drm_connector *connector,
1332                          struct detailed_timing *timing)
1333 {
1334         int i, j, modes = 0;
1335         struct drm_display_mode *newmode;
1336         struct drm_device *dev = connector->dev;
1337         struct cvt_timing *cvt;
1338         const int rates[] = { 60, 85, 75, 60, 50 };
1339         const u8 empty[3] = { 0, 0, 0 };
1340
1341         for (i = 0; i < 4; i++) {
1342                 int width = 0, height;
1343                 cvt = &(timing->data.other_data.data.cvt[i]);
1344
1345                 if (!memcmp(cvt->code, empty, 3))
1346                         continue;
1347
1348                 height = (cvt->code[0] + ((cvt->code[1] & 0xf0) << 4) + 1) * 2;
1349                 switch (cvt->code[1] & 0x0c) {
1350                 case 0x00:
1351                         width = height * 4 / 3;
1352                         break;
1353                 case 0x04:
1354                         width = height * 16 / 9;
1355                         break;
1356                 case 0x08:
1357                         width = height * 16 / 10;
1358                         break;
1359                 case 0x0c:
1360                         width = height * 15 / 9;
1361                         break;
1362                 }
1363
1364                 for (j = 1; j < 5; j++) {
1365                         if (cvt->code[2] & (1 << j)) {
1366                                 newmode = drm_cvt_mode(dev, width, height,
1367                                                        rates[j], j == 0,
1368                                                        false, false);
1369                                 if (newmode) {
1370                                         drm_mode_probed_add(connector, newmode);
1371                                         modes++;
1372                                 }
1373                         }
1374                 }
1375         }
1376
1377         return modes;
1378 }
1379
1380 static void
1381 do_cvt_mode(struct detailed_timing *timing, void *c)
1382 {
1383         struct detailed_mode_closure *closure = c;
1384         struct detailed_non_pixel *data = &timing->data.other_data;
1385
1386         if (data->type == EDID_DETAIL_CVT_3BYTE)
1387                 closure->modes += drm_cvt_modes(closure->connector, timing);
1388 }
1389
1390 static int
1391 add_cvt_modes(struct drm_connector *connector, struct edid *edid)
1392 {       
1393         struct detailed_mode_closure closure = {
1394                 connector, edid, 0, 0, 0
1395         };
1396
1397         if (version_greater(edid, 1, 2))
1398                 drm_for_each_detailed_block((u8 *)edid, do_cvt_mode, &closure);
1399
1400         /* XXX should also look for CVT codes in VTB blocks */
1401
1402         return closure.modes;
1403 }
1404
1405 static void
1406 do_detailed_mode(struct detailed_timing *timing, void *c)
1407 {
1408         struct detailed_mode_closure *closure = c;
1409         struct drm_display_mode *newmode;
1410
1411         if (timing->pixel_clock) {
1412                 newmode = drm_mode_detailed(closure->connector->dev,
1413                                             closure->edid, timing,
1414                                             closure->quirks);
1415                 if (!newmode)
1416                         return;
1417
1418                 if (closure->preferred)
1419                         newmode->type |= DRM_MODE_TYPE_PREFERRED;
1420
1421                 drm_mode_probed_add(closure->connector, newmode);
1422                 closure->modes++;
1423                 closure->preferred = 0;
1424         }
1425 }
1426
1427 /*
1428  * add_detailed_modes - Add modes from detailed timings
1429  * @connector: attached connector
1430  * @edid: EDID block to scan
1431  * @quirks: quirks to apply
1432  */
1433 static int
1434 add_detailed_modes(struct drm_connector *connector, struct edid *edid,
1435                    u32 quirks)
1436 {
1437         struct detailed_mode_closure closure = {
1438                 connector,
1439                 edid,
1440                 1,
1441                 quirks,
1442                 0
1443         };
1444
1445         if (closure.preferred && !version_greater(edid, 1, 3))
1446                 closure.preferred =
1447                     (edid->features & DRM_EDID_FEATURE_PREFERRED_TIMING);
1448
1449         drm_for_each_detailed_block((u8 *)edid, do_detailed_mode, &closure);
1450
1451         return closure.modes;
1452 }
1453
1454 #define HDMI_IDENTIFIER 0x000C03
1455 #define AUDIO_BLOCK     0x01
1456 #define VENDOR_BLOCK    0x03
1457 #define SPEAKER_BLOCK   0x04
1458 #define EDID_BASIC_AUDIO        (1 << 6)
1459 #define EDID_CEA_YCRCB444       (1 << 5)
1460 #define EDID_CEA_YCRCB422       (1 << 4)
1461
1462 /**
1463  * Search EDID for CEA extension block.
1464  */
1465 u8 *drm_find_cea_extension(struct edid *edid)
1466 {
1467         u8 *edid_ext = NULL;
1468         int i;
1469
1470         /* No EDID or EDID extensions */
1471         if (edid == NULL || edid->extensions == 0)
1472                 return NULL;
1473
1474         /* Find CEA extension */
1475         for (i = 0; i < edid->extensions; i++) {
1476                 edid_ext = (u8 *)edid + EDID_LENGTH * (i + 1);
1477                 if (edid_ext[0] == CEA_EXT)
1478                         break;
1479         }
1480
1481         if (i == edid->extensions)
1482                 return NULL;
1483
1484         return edid_ext;
1485 }
1486
1487 static void
1488 parse_hdmi_vsdb(struct drm_connector *connector, uint8_t *db)
1489 {
1490         connector->eld[5] |= (db[6] >> 7) << 1;  /* Supports_AI */
1491
1492         connector->dvi_dual = db[6] & 1;
1493         connector->max_tmds_clock = db[7] * 5;
1494
1495         connector->latency_present[0] = db[8] >> 7;
1496         connector->latency_present[1] = (db[8] >> 6) & 1;
1497         connector->video_latency[0] = db[9];
1498         connector->audio_latency[0] = db[10];
1499         connector->video_latency[1] = db[11];
1500         connector->audio_latency[1] = db[12];
1501
1502         DRM_DEBUG_KMS("HDMI: DVI dual %d, "
1503                     "max TMDS clock %d, "
1504                     "latency present %d %d, "
1505                     "video latency %d %d, "
1506                     "audio latency %d %d\n",
1507                     connector->dvi_dual,
1508                     connector->max_tmds_clock,
1509               (int) connector->latency_present[0],
1510               (int) connector->latency_present[1],
1511                     connector->video_latency[0],
1512                     connector->video_latency[1],
1513                     connector->audio_latency[0],
1514                     connector->audio_latency[1]);
1515 }
1516
1517 static void
1518 monitor_name(struct detailed_timing *t, void *data)
1519 {
1520         if (t->data.other_data.type == EDID_DETAIL_MONITOR_NAME)
1521                 *(u8 **)data = t->data.other_data.data.str.str;
1522 }
1523
1524 /**
1525  * drm_edid_to_eld - build ELD from EDID
1526  * @connector: connector corresponding to the HDMI/DP sink
1527  * @edid: EDID to parse
1528  *
1529  * Fill the ELD (EDID-Like Data) buffer for passing to the audio driver.
1530  * Some ELD fields are left to the graphics driver caller:
1531  * - Conn_Type
1532  * - HDCP
1533  * - Port_ID
1534  */
1535 void drm_edid_to_eld(struct drm_connector *connector, struct edid *edid)
1536 {
1537         uint8_t *eld = connector->eld;
1538         u8 *cea;
1539         u8 *name;
1540         u8 *db;
1541         int sad_count = 0;
1542         int mnl;
1543         int dbl;
1544
1545         memset(eld, 0, sizeof(connector->eld));
1546
1547         cea = drm_find_cea_extension(edid);
1548         if (!cea) {
1549                 DRM_DEBUG_KMS("ELD: no CEA Extension found\n");
1550                 return;
1551         }
1552
1553         name = NULL;
1554         drm_for_each_detailed_block((u8 *)edid, monitor_name, &name);
1555         for (mnl = 0; name && mnl < 13; mnl++) {
1556                 if (name[mnl] == 0x0a)
1557                         break;
1558                 eld[20 + mnl] = name[mnl];
1559         }
1560         eld[4] = (cea[1] << 5) | mnl;
1561         DRM_DEBUG_KMS("ELD monitor %s\n", eld + 20);
1562
1563         eld[0] = 2 << 3;                /* ELD version: 2 */
1564
1565         eld[16] = edid->mfg_id[0];
1566         eld[17] = edid->mfg_id[1];
1567         eld[18] = edid->prod_code[0];
1568         eld[19] = edid->prod_code[1];
1569
1570         for (db = cea + 4; db < cea + cea[2]; db += dbl + 1) {
1571                 dbl = db[0] & 0x1f;
1572
1573                 switch ((db[0] & 0xe0) >> 5) {
1574                 case AUDIO_BLOCK:       /* Audio Data Block, contains SADs */
1575                         sad_count = dbl / 3;
1576                         memcpy(eld + 20 + mnl, &db[1], dbl);
1577                         break;
1578                 case SPEAKER_BLOCK:     /* Speaker Allocation Data Block */
1579                         eld[7] = db[1];
1580                         break;
1581                 case VENDOR_BLOCK:
1582                         /* HDMI Vendor-Specific Data Block */
1583                         if (db[1] == 0x03 && db[2] == 0x0c && db[3] == 0)
1584                                 parse_hdmi_vsdb(connector, db);
1585                         break;
1586                 default:
1587                         break;
1588                 }
1589         }
1590         eld[5] |= sad_count << 4;
1591         eld[2] = (20 + mnl + sad_count * 3 + 3) / 4;
1592
1593         DRM_DEBUG_KMS("ELD size %d, SAD count %d\n", (int)eld[2], sad_count);
1594 }
1595
1596 /**
1597  * drm_av_sync_delay - HDMI/DP sink audio-video sync delay in millisecond
1598  * @connector: connector associated with the HDMI/DP sink
1599  * @mode: the display mode
1600  */
1601 int drm_av_sync_delay(struct drm_connector *connector,
1602                       struct drm_display_mode *mode)
1603 {
1604         int i = !!(mode->flags & DRM_MODE_FLAG_INTERLACE);
1605         int a, v;
1606
1607         if (!connector->latency_present[0])
1608                 return 0;
1609         if (!connector->latency_present[1])
1610                 i = 0;
1611
1612         a = connector->audio_latency[i];
1613         v = connector->video_latency[i];
1614
1615         /*
1616          * HDMI/DP sink doesn't support audio or video?
1617          */
1618         if (a == 255 || v == 255)
1619                 return 0;
1620
1621         /*
1622          * Convert raw EDID values to millisecond.
1623          * Treat unknown latency as 0ms.
1624          */
1625         if (a)
1626                 a = min(2 * (a - 1), 500);
1627         if (v)
1628                 v = min(2 * (v - 1), 500);
1629
1630         return max(v - a, 0);
1631 }
1632
1633 /**
1634  * drm_select_eld - select one ELD from multiple HDMI/DP sinks
1635  * @encoder: the encoder just changed display mode
1636  * @mode: the adjusted display mode
1637  *
1638  * It's possible for one encoder to be associated with multiple HDMI/DP sinks.
1639  * The policy is now hard coded to simply use the first HDMI/DP sink's ELD.
1640  */
1641 struct drm_connector *drm_select_eld(struct drm_encoder *encoder,
1642                                      struct drm_display_mode *mode)
1643 {
1644         struct drm_connector *connector;
1645         struct drm_device *dev = encoder->dev;
1646
1647         list_for_each_entry(connector, &dev->mode_config.connector_list, head)
1648                 if (connector->encoder == encoder && connector->eld[0])
1649                         return connector;
1650
1651         return NULL;
1652 }
1653
1654 /**
1655  * drm_detect_hdmi_monitor - detect whether monitor is hdmi.
1656  * @edid: monitor EDID information
1657  *
1658  * Parse the CEA extension according to CEA-861-B.
1659  * Return true if HDMI, false if not or unknown.
1660  */
1661 bool drm_detect_hdmi_monitor(struct edid *edid)
1662 {
1663         u8 *edid_ext;
1664         int i, hdmi_id;
1665         int start_offset, end_offset;
1666         bool is_hdmi = false;
1667
1668         edid_ext = drm_find_cea_extension(edid);
1669         if (!edid_ext)
1670                 goto end;
1671
1672         /* Data block offset in CEA extension block */
1673         start_offset = 4;
1674         end_offset = edid_ext[2];
1675
1676         /*
1677          * Because HDMI identifier is in Vendor Specific Block,
1678          * search it from all data blocks of CEA extension.
1679          */
1680         for (i = start_offset; i < end_offset;
1681                 /* Increased by data block len */
1682                 i += ((edid_ext[i] & 0x1f) + 1)) {
1683                 /* Find vendor specific block */
1684                 if ((edid_ext[i] >> 5) == VENDOR_BLOCK) {
1685                         hdmi_id = edid_ext[i + 1] | (edid_ext[i + 2] << 8) |
1686                                   edid_ext[i + 3] << 16;
1687                         /* Find HDMI identifier */
1688                         if (hdmi_id == HDMI_IDENTIFIER)
1689                                 is_hdmi = true;
1690                         break;
1691                 }
1692         }
1693
1694 end:
1695         return is_hdmi;
1696 }
1697
1698 /**
1699  * drm_detect_monitor_audio - check monitor audio capability
1700  *
1701  * Monitor should have CEA extension block.
1702  * If monitor has 'basic audio', but no CEA audio blocks, it's 'basic
1703  * audio' only. If there is any audio extension block and supported
1704  * audio format, assume at least 'basic audio' support, even if 'basic
1705  * audio' is not defined in EDID.
1706  *
1707  */
1708 bool drm_detect_monitor_audio(struct edid *edid)
1709 {
1710         u8 *edid_ext;
1711         int i, j;
1712         bool has_audio = false;
1713         int start_offset, end_offset;
1714
1715         edid_ext = drm_find_cea_extension(edid);
1716         if (!edid_ext)
1717                 goto end;
1718
1719         has_audio = ((edid_ext[3] & EDID_BASIC_AUDIO) != 0);
1720
1721         if (has_audio) {
1722                 DRM_DEBUG_KMS("Monitor has basic audio support\n");
1723                 goto end;
1724         }
1725
1726         /* Data block offset in CEA extension block */
1727         start_offset = 4;
1728         end_offset = edid_ext[2];
1729
1730         for (i = start_offset; i < end_offset;
1731                         i += ((edid_ext[i] & 0x1f) + 1)) {
1732                 if ((edid_ext[i] >> 5) == AUDIO_BLOCK) {
1733                         has_audio = true;
1734                         for (j = 1; j < (edid_ext[i] & 0x1f); j += 3)
1735                                 DRM_DEBUG_KMS("CEA audio format %d\n",
1736                                               (edid_ext[i + j] >> 3) & 0xf);
1737                         goto end;
1738                 }
1739         }
1740 end:
1741         return has_audio;
1742 }
1743
1744 /**
1745  * drm_add_display_info - pull display info out if present
1746  * @edid: EDID data
1747  * @info: display info (attached to connector)
1748  *
1749  * Grab any available display info and stuff it into the drm_display_info
1750  * structure that's part of the connector.  Useful for tracking bpp and
1751  * color spaces.
1752  */
1753 static void drm_add_display_info(struct edid *edid,
1754                                  struct drm_display_info *info)
1755 {
1756         u8 *edid_ext;
1757
1758         info->width_mm = edid->width_cm * 10;
1759         info->height_mm = edid->height_cm * 10;
1760
1761         /* driver figures it out in this case */
1762         info->bpc = 0;
1763         info->color_formats = 0;
1764
1765         if (edid->revision < 3)
1766                 return;
1767
1768         if (!(edid->input & DRM_EDID_INPUT_DIGITAL))
1769                 return;
1770
1771         /* Get data from CEA blocks if present */
1772         edid_ext = drm_find_cea_extension(edid);
1773         if (edid_ext) {
1774                 info->cea_rev = edid_ext[1];
1775
1776                 /* The existence of a CEA block should imply RGB support */
1777                 info->color_formats = DRM_COLOR_FORMAT_RGB444;
1778                 if (edid_ext[3] & EDID_CEA_YCRCB444)
1779                         info->color_formats |= DRM_COLOR_FORMAT_YCRCB444;
1780                 if (edid_ext[3] & EDID_CEA_YCRCB422)
1781                         info->color_formats |= DRM_COLOR_FORMAT_YCRCB422;
1782         }
1783
1784         /* Only defined for 1.4 with digital displays */
1785         if (edid->revision < 4)
1786                 return;
1787
1788         switch (edid->input & DRM_EDID_DIGITAL_DEPTH_MASK) {
1789         case DRM_EDID_DIGITAL_DEPTH_6:
1790                 info->bpc = 6;
1791                 break;
1792         case DRM_EDID_DIGITAL_DEPTH_8:
1793                 info->bpc = 8;
1794                 break;
1795         case DRM_EDID_DIGITAL_DEPTH_10:
1796                 info->bpc = 10;
1797                 break;
1798         case DRM_EDID_DIGITAL_DEPTH_12:
1799                 info->bpc = 12;
1800                 break;
1801         case DRM_EDID_DIGITAL_DEPTH_14:
1802                 info->bpc = 14;
1803                 break;
1804         case DRM_EDID_DIGITAL_DEPTH_16:
1805                 info->bpc = 16;
1806                 break;
1807         case DRM_EDID_DIGITAL_DEPTH_UNDEF:
1808         default:
1809                 info->bpc = 0;
1810                 break;
1811         }
1812
1813         info->color_formats |= DRM_COLOR_FORMAT_RGB444;
1814         if (edid->features & DRM_EDID_FEATURE_RGB_YCRCB444)
1815                 info->color_formats |= DRM_COLOR_FORMAT_YCRCB444;
1816         if (edid->features & DRM_EDID_FEATURE_RGB_YCRCB422)
1817                 info->color_formats |= DRM_COLOR_FORMAT_YCRCB422;
1818 }
1819
1820 /**
1821  * drm_add_edid_modes - add modes from EDID data, if available
1822  * @connector: connector we're probing
1823  * @edid: edid data
1824  *
1825  * Add the specified modes to the connector's mode list.
1826  *
1827  * Return number of modes added or 0 if we couldn't find any.
1828  */
1829 int drm_add_edid_modes(struct drm_connector *connector, struct edid *edid)
1830 {
1831         int num_modes = 0;
1832         u32 quirks;
1833
1834         if (edid == NULL) {
1835                 return 0;
1836         }
1837         if (!drm_edid_is_valid(edid)) {
1838                 device_printf(connector->dev->device, "%s: EDID invalid.\n",
1839                          drm_get_connector_name(connector));
1840                 return 0;
1841         }
1842
1843         quirks = edid_get_quirks(edid);
1844
1845         /*
1846          * EDID spec says modes should be preferred in this order:
1847          * - preferred detailed mode
1848          * - other detailed modes from base block
1849          * - detailed modes from extension blocks
1850          * - CVT 3-byte code modes
1851          * - standard timing codes
1852          * - established timing codes
1853          * - modes inferred from GTF or CVT range information
1854          *
1855          * We get this pretty much right.
1856          *
1857          * XXX order for additional mode types in extension blocks?
1858          */
1859         num_modes += add_detailed_modes(connector, edid, quirks);
1860         num_modes += add_cvt_modes(connector, edid);
1861         num_modes += add_standard_modes(connector, edid);
1862         num_modes += add_established_modes(connector, edid);
1863         num_modes += add_inferred_modes(connector, edid);
1864
1865         if (quirks & (EDID_QUIRK_PREFER_LARGE_60 | EDID_QUIRK_PREFER_LARGE_75))
1866                 edid_fixup_preferred(connector, quirks);
1867
1868         drm_add_display_info(edid, &connector->display_info);
1869
1870         return num_modes;
1871 }
1872
1873 /**
1874  * drm_add_modes_noedid - add modes for the connectors without EDID
1875  * @connector: connector we're probing
1876  * @hdisplay: the horizontal display limit
1877  * @vdisplay: the vertical display limit
1878  *
1879  * Add the specified modes to the connector's mode list. Only when the
1880  * hdisplay/vdisplay is not beyond the given limit, it will be added.
1881  *
1882  * Return number of modes added or 0 if we couldn't find any.
1883  */
1884 int drm_add_modes_noedid(struct drm_connector *connector,
1885                         int hdisplay, int vdisplay)
1886 {
1887         int i, count, num_modes = 0;
1888         struct drm_display_mode *mode;
1889         struct drm_device *dev = connector->dev;
1890
1891         count = sizeof(drm_dmt_modes) / sizeof(struct drm_display_mode);
1892         if (hdisplay < 0)
1893                 hdisplay = 0;
1894         if (vdisplay < 0)
1895                 vdisplay = 0;
1896
1897         for (i = 0; i < count; i++) {
1898                 struct drm_display_mode *ptr = &drm_dmt_modes[i];
1899                 if (hdisplay && vdisplay) {
1900                         /*
1901                          * Only when two are valid, they will be used to check
1902                          * whether the mode should be added to the mode list of
1903                          * the connector.
1904                          */
1905                         if (ptr->hdisplay > hdisplay ||
1906                                         ptr->vdisplay > vdisplay)
1907                                 continue;
1908                 }
1909                 if (drm_mode_vrefresh(ptr) > 61)
1910                         continue;
1911                 mode = drm_mode_duplicate(dev, ptr);
1912                 if (mode) {
1913                         drm_mode_probed_add(connector, mode);
1914                         num_modes++;
1915                 }
1916         }
1917         return num_modes;
1918 }