Merge branch 'late/fixes' into fixes
[firefly-linux-kernel-4.4.55.git] / drivers / gpu / drm / nouveau / core / engine / disp / nvd0.c
1 /*
2  * Copyright 2012 Red Hat Inc.
3  *
4  * Permission is hereby granted, free of charge, to any person obtaining a
5  * copy of this software and associated documentation files (the "Software"),
6  * to deal in the Software without restriction, including without limitation
7  * the rights to use, copy, modify, merge, publish, distribute, sublicense,
8  * and/or sell copies of the Software, and to permit persons to whom the
9  * Software is furnished to do so, subject to the following conditions:
10  *
11  * The above copyright notice and this permission notice shall be included in
12  * all copies or substantial portions of the Software.
13  *
14  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
15  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
16  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
17  * THE COPYRIGHT HOLDER(S) OR AUTHOR(S) BE LIABLE FOR ANY CLAIM, DAMAGES OR
18  * OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
19  * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
20  * OTHER DEALINGS IN THE SOFTWARE.
21  *
22  * Authors: Ben Skeggs
23  */
24
25 #include <core/object.h>
26 #include <core/parent.h>
27 #include <core/handle.h>
28 #include <core/class.h>
29
30 #include <engine/disp.h>
31
32 #include <subdev/timer.h>
33 #include <subdev/fb.h>
34 #include <subdev/clock.h>
35
36 #include <subdev/bios.h>
37 #include <subdev/bios/dcb.h>
38 #include <subdev/bios/disp.h>
39 #include <subdev/bios/init.h>
40 #include <subdev/bios/pll.h>
41
42 #include "nv50.h"
43
44 /*******************************************************************************
45  * EVO DMA channel base class
46  ******************************************************************************/
47
48 static int
49 nvd0_disp_dmac_object_attach(struct nouveau_object *parent,
50                              struct nouveau_object *object, u32 name)
51 {
52         struct nv50_disp_base *base = (void *)parent->parent;
53         struct nv50_disp_chan *chan = (void *)parent;
54         u32 addr = nv_gpuobj(object)->node->offset;
55         u32 data = (chan->chid << 27) | (addr << 9) | 0x00000001;
56         return nouveau_ramht_insert(base->ramht, chan->chid, name, data);
57 }
58
59 static void
60 nvd0_disp_dmac_object_detach(struct nouveau_object *parent, int cookie)
61 {
62         struct nv50_disp_base *base = (void *)parent->parent;
63         nouveau_ramht_remove(base->ramht, cookie);
64 }
65
66 static int
67 nvd0_disp_dmac_init(struct nouveau_object *object)
68 {
69         struct nv50_disp_priv *priv = (void *)object->engine;
70         struct nv50_disp_dmac *dmac = (void *)object;
71         int chid = dmac->base.chid;
72         int ret;
73
74         ret = nv50_disp_chan_init(&dmac->base);
75         if (ret)
76                 return ret;
77
78         /* enable error reporting */
79         nv_mask(priv, 0x610090, 0x00000001 << chid, 0x00000001 << chid);
80         nv_mask(priv, 0x6100a0, 0x00000001 << chid, 0x00000001 << chid);
81
82         /* initialise channel for dma command submission */
83         nv_wr32(priv, 0x610494 + (chid * 0x0010), dmac->push);
84         nv_wr32(priv, 0x610498 + (chid * 0x0010), 0x00010000);
85         nv_wr32(priv, 0x61049c + (chid * 0x0010), 0x00000001);
86         nv_mask(priv, 0x610490 + (chid * 0x0010), 0x00000010, 0x00000010);
87         nv_wr32(priv, 0x640000 + (chid * 0x1000), 0x00000000);
88         nv_wr32(priv, 0x610490 + (chid * 0x0010), 0x00000013);
89
90         /* wait for it to go inactive */
91         if (!nv_wait(priv, 0x610490 + (chid * 0x10), 0x80000000, 0x00000000)) {
92                 nv_error(dmac, "init: 0x%08x\n",
93                          nv_rd32(priv, 0x610490 + (chid * 0x10)));
94                 return -EBUSY;
95         }
96
97         return 0;
98 }
99
100 static int
101 nvd0_disp_dmac_fini(struct nouveau_object *object, bool suspend)
102 {
103         struct nv50_disp_priv *priv = (void *)object->engine;
104         struct nv50_disp_dmac *dmac = (void *)object;
105         int chid = dmac->base.chid;
106
107         /* deactivate channel */
108         nv_mask(priv, 0x610490 + (chid * 0x0010), 0x00001010, 0x00001000);
109         nv_mask(priv, 0x610490 + (chid * 0x0010), 0x00000003, 0x00000000);
110         if (!nv_wait(priv, 0x610490 + (chid * 0x10), 0x001e0000, 0x00000000)) {
111                 nv_error(dmac, "fini: 0x%08x\n",
112                          nv_rd32(priv, 0x610490 + (chid * 0x10)));
113                 if (suspend)
114                         return -EBUSY;
115         }
116
117         /* disable error reporting */
118         nv_mask(priv, 0x610090, 0x00000001 << chid, 0x00000000);
119         nv_mask(priv, 0x6100a0, 0x00000001 << chid, 0x00000000);
120
121         return nv50_disp_chan_fini(&dmac->base, suspend);
122 }
123
124 /*******************************************************************************
125  * EVO master channel object
126  ******************************************************************************/
127
128 static int
129 nvd0_disp_mast_ctor(struct nouveau_object *parent,
130                     struct nouveau_object *engine,
131                     struct nouveau_oclass *oclass, void *data, u32 size,
132                     struct nouveau_object **pobject)
133 {
134         struct nv50_display_mast_class *args = data;
135         struct nv50_disp_dmac *mast;
136         int ret;
137
138         if (size < sizeof(*args))
139                 return -EINVAL;
140
141         ret = nv50_disp_dmac_create_(parent, engine, oclass, args->pushbuf,
142                                      0, sizeof(*mast), (void **)&mast);
143         *pobject = nv_object(mast);
144         if (ret)
145                 return ret;
146
147         nv_parent(mast)->object_attach = nvd0_disp_dmac_object_attach;
148         nv_parent(mast)->object_detach = nvd0_disp_dmac_object_detach;
149         return 0;
150 }
151
152 static int
153 nvd0_disp_mast_init(struct nouveau_object *object)
154 {
155         struct nv50_disp_priv *priv = (void *)object->engine;
156         struct nv50_disp_dmac *mast = (void *)object;
157         int ret;
158
159         ret = nv50_disp_chan_init(&mast->base);
160         if (ret)
161                 return ret;
162
163         /* enable error reporting */
164         nv_mask(priv, 0x610090, 0x00000001, 0x00000001);
165         nv_mask(priv, 0x6100a0, 0x00000001, 0x00000001);
166
167         /* initialise channel for dma command submission */
168         nv_wr32(priv, 0x610494, mast->push);
169         nv_wr32(priv, 0x610498, 0x00010000);
170         nv_wr32(priv, 0x61049c, 0x00000001);
171         nv_mask(priv, 0x610490, 0x00000010, 0x00000010);
172         nv_wr32(priv, 0x640000, 0x00000000);
173         nv_wr32(priv, 0x610490, 0x01000013);
174
175         /* wait for it to go inactive */
176         if (!nv_wait(priv, 0x610490, 0x80000000, 0x00000000)) {
177                 nv_error(mast, "init: 0x%08x\n", nv_rd32(priv, 0x610490));
178                 return -EBUSY;
179         }
180
181         return 0;
182 }
183
184 static int
185 nvd0_disp_mast_fini(struct nouveau_object *object, bool suspend)
186 {
187         struct nv50_disp_priv *priv = (void *)object->engine;
188         struct nv50_disp_dmac *mast = (void *)object;
189
190         /* deactivate channel */
191         nv_mask(priv, 0x610490, 0x00000010, 0x00000000);
192         nv_mask(priv, 0x610490, 0x00000003, 0x00000000);
193         if (!nv_wait(priv, 0x610490, 0x001e0000, 0x00000000)) {
194                 nv_error(mast, "fini: 0x%08x\n", nv_rd32(priv, 0x610490));
195                 if (suspend)
196                         return -EBUSY;
197         }
198
199         /* disable error reporting */
200         nv_mask(priv, 0x610090, 0x00000001, 0x00000000);
201         nv_mask(priv, 0x6100a0, 0x00000001, 0x00000000);
202
203         return nv50_disp_chan_fini(&mast->base, suspend);
204 }
205
206 struct nouveau_ofuncs
207 nvd0_disp_mast_ofuncs = {
208         .ctor = nvd0_disp_mast_ctor,
209         .dtor = nv50_disp_dmac_dtor,
210         .init = nvd0_disp_mast_init,
211         .fini = nvd0_disp_mast_fini,
212         .rd32 = nv50_disp_chan_rd32,
213         .wr32 = nv50_disp_chan_wr32,
214 };
215
216 /*******************************************************************************
217  * EVO sync channel objects
218  ******************************************************************************/
219
220 static int
221 nvd0_disp_sync_ctor(struct nouveau_object *parent,
222                     struct nouveau_object *engine,
223                     struct nouveau_oclass *oclass, void *data, u32 size,
224                     struct nouveau_object **pobject)
225 {
226         struct nv50_display_sync_class *args = data;
227         struct nv50_disp_priv *priv = (void *)engine;
228         struct nv50_disp_dmac *dmac;
229         int ret;
230
231         if (size < sizeof(*args) || args->head >= priv->head.nr)
232                 return -EINVAL;
233
234         ret = nv50_disp_dmac_create_(parent, engine, oclass, args->pushbuf,
235                                      1 + args->head, sizeof(*dmac),
236                                      (void **)&dmac);
237         *pobject = nv_object(dmac);
238         if (ret)
239                 return ret;
240
241         nv_parent(dmac)->object_attach = nvd0_disp_dmac_object_attach;
242         nv_parent(dmac)->object_detach = nvd0_disp_dmac_object_detach;
243         return 0;
244 }
245
246 struct nouveau_ofuncs
247 nvd0_disp_sync_ofuncs = {
248         .ctor = nvd0_disp_sync_ctor,
249         .dtor = nv50_disp_dmac_dtor,
250         .init = nvd0_disp_dmac_init,
251         .fini = nvd0_disp_dmac_fini,
252         .rd32 = nv50_disp_chan_rd32,
253         .wr32 = nv50_disp_chan_wr32,
254 };
255
256 /*******************************************************************************
257  * EVO overlay channel objects
258  ******************************************************************************/
259
260 static int
261 nvd0_disp_ovly_ctor(struct nouveau_object *parent,
262                     struct nouveau_object *engine,
263                     struct nouveau_oclass *oclass, void *data, u32 size,
264                     struct nouveau_object **pobject)
265 {
266         struct nv50_display_ovly_class *args = data;
267         struct nv50_disp_priv *priv = (void *)engine;
268         struct nv50_disp_dmac *dmac;
269         int ret;
270
271         if (size < sizeof(*args) || args->head >= priv->head.nr)
272                 return -EINVAL;
273
274         ret = nv50_disp_dmac_create_(parent, engine, oclass, args->pushbuf,
275                                      5 + args->head, sizeof(*dmac),
276                                      (void **)&dmac);
277         *pobject = nv_object(dmac);
278         if (ret)
279                 return ret;
280
281         nv_parent(dmac)->object_attach = nvd0_disp_dmac_object_attach;
282         nv_parent(dmac)->object_detach = nvd0_disp_dmac_object_detach;
283         return 0;
284 }
285
286 struct nouveau_ofuncs
287 nvd0_disp_ovly_ofuncs = {
288         .ctor = nvd0_disp_ovly_ctor,
289         .dtor = nv50_disp_dmac_dtor,
290         .init = nvd0_disp_dmac_init,
291         .fini = nvd0_disp_dmac_fini,
292         .rd32 = nv50_disp_chan_rd32,
293         .wr32 = nv50_disp_chan_wr32,
294 };
295
296 /*******************************************************************************
297  * EVO PIO channel base class
298  ******************************************************************************/
299
300 static int
301 nvd0_disp_pioc_create_(struct nouveau_object *parent,
302                        struct nouveau_object *engine,
303                        struct nouveau_oclass *oclass, int chid,
304                        int length, void **pobject)
305 {
306         return nv50_disp_chan_create_(parent, engine, oclass, chid,
307                                       length, pobject);
308 }
309
310 static void
311 nvd0_disp_pioc_dtor(struct nouveau_object *object)
312 {
313         struct nv50_disp_pioc *pioc = (void *)object;
314         nv50_disp_chan_destroy(&pioc->base);
315 }
316
317 static int
318 nvd0_disp_pioc_init(struct nouveau_object *object)
319 {
320         struct nv50_disp_priv *priv = (void *)object->engine;
321         struct nv50_disp_pioc *pioc = (void *)object;
322         int chid = pioc->base.chid;
323         int ret;
324
325         ret = nv50_disp_chan_init(&pioc->base);
326         if (ret)
327                 return ret;
328
329         /* enable error reporting */
330         nv_mask(priv, 0x610090, 0x00000001 << chid, 0x00000001 << chid);
331         nv_mask(priv, 0x6100a0, 0x00000001 << chid, 0x00000001 << chid);
332
333         /* activate channel */
334         nv_wr32(priv, 0x610490 + (chid * 0x10), 0x00000001);
335         if (!nv_wait(priv, 0x610490 + (chid * 0x10), 0x00030000, 0x00010000)) {
336                 nv_error(pioc, "init: 0x%08x\n",
337                          nv_rd32(priv, 0x610490 + (chid * 0x10)));
338                 return -EBUSY;
339         }
340
341         return 0;
342 }
343
344 static int
345 nvd0_disp_pioc_fini(struct nouveau_object *object, bool suspend)
346 {
347         struct nv50_disp_priv *priv = (void *)object->engine;
348         struct nv50_disp_pioc *pioc = (void *)object;
349         int chid = pioc->base.chid;
350
351         nv_mask(priv, 0x610490 + (chid * 0x10), 0x00000001, 0x00000000);
352         if (!nv_wait(priv, 0x610490 + (chid * 0x10), 0x00030000, 0x00000000)) {
353                 nv_error(pioc, "timeout: 0x%08x\n",
354                          nv_rd32(priv, 0x610490 + (chid * 0x10)));
355                 if (suspend)
356                         return -EBUSY;
357         }
358
359         /* disable error reporting */
360         nv_mask(priv, 0x610090, 0x00000001 << chid, 0x00000000);
361         nv_mask(priv, 0x6100a0, 0x00000001 << chid, 0x00000000);
362
363         return nv50_disp_chan_fini(&pioc->base, suspend);
364 }
365
366 /*******************************************************************************
367  * EVO immediate overlay channel objects
368  ******************************************************************************/
369
370 static int
371 nvd0_disp_oimm_ctor(struct nouveau_object *parent,
372                     struct nouveau_object *engine,
373                     struct nouveau_oclass *oclass, void *data, u32 size,
374                     struct nouveau_object **pobject)
375 {
376         struct nv50_display_oimm_class *args = data;
377         struct nv50_disp_priv *priv = (void *)engine;
378         struct nv50_disp_pioc *pioc;
379         int ret;
380
381         if (size < sizeof(*args) || args->head >= priv->head.nr)
382                 return -EINVAL;
383
384         ret = nvd0_disp_pioc_create_(parent, engine, oclass, 9 + args->head,
385                                      sizeof(*pioc), (void **)&pioc);
386         *pobject = nv_object(pioc);
387         if (ret)
388                 return ret;
389
390         return 0;
391 }
392
393 struct nouveau_ofuncs
394 nvd0_disp_oimm_ofuncs = {
395         .ctor = nvd0_disp_oimm_ctor,
396         .dtor = nvd0_disp_pioc_dtor,
397         .init = nvd0_disp_pioc_init,
398         .fini = nvd0_disp_pioc_fini,
399         .rd32 = nv50_disp_chan_rd32,
400         .wr32 = nv50_disp_chan_wr32,
401 };
402
403 /*******************************************************************************
404  * EVO cursor channel objects
405  ******************************************************************************/
406
407 static int
408 nvd0_disp_curs_ctor(struct nouveau_object *parent,
409                     struct nouveau_object *engine,
410                     struct nouveau_oclass *oclass, void *data, u32 size,
411                     struct nouveau_object **pobject)
412 {
413         struct nv50_display_curs_class *args = data;
414         struct nv50_disp_priv *priv = (void *)engine;
415         struct nv50_disp_pioc *pioc;
416         int ret;
417
418         if (size < sizeof(*args) || args->head >= priv->head.nr)
419                 return -EINVAL;
420
421         ret = nvd0_disp_pioc_create_(parent, engine, oclass, 13 + args->head,
422                                      sizeof(*pioc), (void **)&pioc);
423         *pobject = nv_object(pioc);
424         if (ret)
425                 return ret;
426
427         return 0;
428 }
429
430 struct nouveau_ofuncs
431 nvd0_disp_curs_ofuncs = {
432         .ctor = nvd0_disp_curs_ctor,
433         .dtor = nvd0_disp_pioc_dtor,
434         .init = nvd0_disp_pioc_init,
435         .fini = nvd0_disp_pioc_fini,
436         .rd32 = nv50_disp_chan_rd32,
437         .wr32 = nv50_disp_chan_wr32,
438 };
439
440 /*******************************************************************************
441  * Base display object
442  ******************************************************************************/
443
444 static void
445 nvd0_disp_base_vblank_enable(struct nouveau_event *event, int head)
446 {
447         nv_mask(event->priv, 0x6100c0 + (head * 0x800), 0x00000001, 0x00000001);
448 }
449
450 static void
451 nvd0_disp_base_vblank_disable(struct nouveau_event *event, int head)
452 {
453         nv_mask(event->priv, 0x6100c0 + (head * 0x800), 0x00000001, 0x00000000);
454 }
455
456 static int
457 nvd0_disp_base_ctor(struct nouveau_object *parent,
458                     struct nouveau_object *engine,
459                     struct nouveau_oclass *oclass, void *data, u32 size,
460                     struct nouveau_object **pobject)
461 {
462         struct nv50_disp_priv *priv = (void *)engine;
463         struct nv50_disp_base *base;
464         int ret;
465
466         ret = nouveau_parent_create(parent, engine, oclass, 0,
467                                     priv->sclass, 0, &base);
468         *pobject = nv_object(base);
469         if (ret)
470                 return ret;
471
472         priv->base.vblank->priv = priv;
473         priv->base.vblank->enable = nvd0_disp_base_vblank_enable;
474         priv->base.vblank->disable = nvd0_disp_base_vblank_disable;
475
476         return nouveau_ramht_new(nv_object(base), nv_object(base), 0x1000, 0,
477                                 &base->ramht);
478 }
479
480 static void
481 nvd0_disp_base_dtor(struct nouveau_object *object)
482 {
483         struct nv50_disp_base *base = (void *)object;
484         nouveau_ramht_ref(NULL, &base->ramht);
485         nouveau_parent_destroy(&base->base);
486 }
487
488 static int
489 nvd0_disp_base_init(struct nouveau_object *object)
490 {
491         struct nv50_disp_priv *priv = (void *)object->engine;
492         struct nv50_disp_base *base = (void *)object;
493         int ret, i;
494         u32 tmp;
495
496         ret = nouveau_parent_init(&base->base);
497         if (ret)
498                 return ret;
499
500         /* The below segments of code copying values from one register to
501          * another appear to inform EVO of the display capabilities or
502          * something similar.
503          */
504
505         /* ... CRTC caps */
506         for (i = 0; i < priv->head.nr; i++) {
507                 tmp = nv_rd32(priv, 0x616104 + (i * 0x800));
508                 nv_wr32(priv, 0x6101b4 + (i * 0x800), tmp);
509                 tmp = nv_rd32(priv, 0x616108 + (i * 0x800));
510                 nv_wr32(priv, 0x6101b8 + (i * 0x800), tmp);
511                 tmp = nv_rd32(priv, 0x61610c + (i * 0x800));
512                 nv_wr32(priv, 0x6101bc + (i * 0x800), tmp);
513         }
514
515         /* ... DAC caps */
516         for (i = 0; i < priv->dac.nr; i++) {
517                 tmp = nv_rd32(priv, 0x61a000 + (i * 0x800));
518                 nv_wr32(priv, 0x6101c0 + (i * 0x800), tmp);
519         }
520
521         /* ... SOR caps */
522         for (i = 0; i < priv->sor.nr; i++) {
523                 tmp = nv_rd32(priv, 0x61c000 + (i * 0x800));
524                 nv_wr32(priv, 0x6301c4 + (i * 0x800), tmp);
525         }
526
527         /* steal display away from vbios, or something like that */
528         if (nv_rd32(priv, 0x6100ac) & 0x00000100) {
529                 nv_wr32(priv, 0x6100ac, 0x00000100);
530                 nv_mask(priv, 0x6194e8, 0x00000001, 0x00000000);
531                 if (!nv_wait(priv, 0x6194e8, 0x00000002, 0x00000000)) {
532                         nv_error(priv, "timeout acquiring display\n");
533                         return -EBUSY;
534                 }
535         }
536
537         /* point at display engine memory area (hash table, objects) */
538         nv_wr32(priv, 0x610010, (nv_gpuobj(object->parent)->addr >> 8) | 9);
539
540         /* enable supervisor interrupts, disable everything else */
541         nv_wr32(priv, 0x610090, 0x00000000);
542         nv_wr32(priv, 0x6100a0, 0x00000000);
543         nv_wr32(priv, 0x6100b0, 0x00000307);
544
545         return 0;
546 }
547
548 static int
549 nvd0_disp_base_fini(struct nouveau_object *object, bool suspend)
550 {
551         struct nv50_disp_priv *priv = (void *)object->engine;
552         struct nv50_disp_base *base = (void *)object;
553
554         /* disable all interrupts */
555         nv_wr32(priv, 0x6100b0, 0x00000000);
556
557         return nouveau_parent_fini(&base->base, suspend);
558 }
559
560 struct nouveau_ofuncs
561 nvd0_disp_base_ofuncs = {
562         .ctor = nvd0_disp_base_ctor,
563         .dtor = nvd0_disp_base_dtor,
564         .init = nvd0_disp_base_init,
565         .fini = nvd0_disp_base_fini,
566 };
567
568 static struct nouveau_oclass
569 nvd0_disp_base_oclass[] = {
570         { NVD0_DISP_CLASS, &nvd0_disp_base_ofuncs, nva3_disp_base_omthds },
571         {}
572 };
573
574 static struct nouveau_oclass
575 nvd0_disp_sclass[] = {
576         { NVD0_DISP_MAST_CLASS, &nvd0_disp_mast_ofuncs },
577         { NVD0_DISP_SYNC_CLASS, &nvd0_disp_sync_ofuncs },
578         { NVD0_DISP_OVLY_CLASS, &nvd0_disp_ovly_ofuncs },
579         { NVD0_DISP_OIMM_CLASS, &nvd0_disp_oimm_ofuncs },
580         { NVD0_DISP_CURS_CLASS, &nvd0_disp_curs_ofuncs },
581         {}
582 };
583
584 /*******************************************************************************
585  * Display engine implementation
586  ******************************************************************************/
587
588 static u16
589 exec_lookup(struct nv50_disp_priv *priv, int head, int outp, u32 ctrl,
590             struct dcb_output *dcb, u8 *ver, u8 *hdr, u8 *cnt, u8 *len,
591             struct nvbios_outp *info)
592 {
593         struct nouveau_bios *bios = nouveau_bios(priv);
594         u16 mask, type, data;
595
596         if (outp < 4) {
597                 type = DCB_OUTPUT_ANALOG;
598                 mask = 0;
599         } else {
600                 outp -= 4;
601                 switch (ctrl & 0x00000f00) {
602                 case 0x00000000: type = DCB_OUTPUT_LVDS; mask = 1; break;
603                 case 0x00000100: type = DCB_OUTPUT_TMDS; mask = 1; break;
604                 case 0x00000200: type = DCB_OUTPUT_TMDS; mask = 2; break;
605                 case 0x00000500: type = DCB_OUTPUT_TMDS; mask = 3; break;
606                 case 0x00000800: type = DCB_OUTPUT_DP; mask = 1; break;
607                 case 0x00000900: type = DCB_OUTPUT_DP; mask = 2; break;
608                 default:
609                         nv_error(priv, "unknown SOR mc 0x%08x\n", ctrl);
610                         return 0x0000;
611                 }
612                 dcb->sorconf.link = mask;
613         }
614
615         mask  = 0x00c0 & (mask << 6);
616         mask |= 0x0001 << outp;
617         mask |= 0x0100 << head;
618
619         data = dcb_outp_match(bios, type, mask, ver, hdr, dcb);
620         if (!data)
621                 return 0x0000;
622
623         return nvbios_outp_match(bios, type, mask, ver, hdr, cnt, len, info);
624 }
625
626 static bool
627 exec_script(struct nv50_disp_priv *priv, int head, int id)
628 {
629         struct nouveau_bios *bios = nouveau_bios(priv);
630         struct nvbios_outp info;
631         struct dcb_output dcb;
632         u8  ver, hdr, cnt, len;
633         u32 ctrl = 0x00000000;
634         u16 data;
635         int outp;
636
637         for (outp = 0; !(ctrl & (1 << head)) && outp < 8; outp++) {
638                 ctrl = nv_rd32(priv, 0x640180 + (outp * 0x20));
639                 if (ctrl & (1 << head))
640                         break;
641         }
642
643         if (outp == 8)
644                 return false;
645
646         data = exec_lookup(priv, head, outp, ctrl, &dcb, &ver, &hdr, &cnt, &len, &info);
647         if (data) {
648                 struct nvbios_init init = {
649                         .subdev = nv_subdev(priv),
650                         .bios = bios,
651                         .offset = info.script[id],
652                         .outp = &dcb,
653                         .crtc = head,
654                         .execute = 1,
655                 };
656
657                 return nvbios_exec(&init) == 0;
658         }
659
660         return false;
661 }
662
663 static u32
664 exec_clkcmp(struct nv50_disp_priv *priv, int head, int id,
665             u32 pclk, struct dcb_output *dcb)
666 {
667         struct nouveau_bios *bios = nouveau_bios(priv);
668         struct nvbios_outp info1;
669         struct nvbios_ocfg info2;
670         u8  ver, hdr, cnt, len;
671         u32 ctrl = 0x00000000;
672         u32 data, conf = ~0;
673         int outp;
674
675         for (outp = 0; !(ctrl & (1 << head)) && outp < 8; outp++) {
676                 ctrl = nv_rd32(priv, 0x660180 + (outp * 0x20));
677                 if (ctrl & (1 << head))
678                         break;
679         }
680
681         if (outp == 8)
682                 return false;
683
684         data = exec_lookup(priv, head, outp, ctrl, dcb, &ver, &hdr, &cnt, &len, &info1);
685         if (data == 0x0000)
686                 return conf;
687
688         switch (dcb->type) {
689         case DCB_OUTPUT_TMDS:
690                 conf = (ctrl & 0x00000f00) >> 8;
691                 if (pclk >= 165000)
692                         conf |= 0x0100;
693                 break;
694         case DCB_OUTPUT_LVDS:
695                 conf = priv->sor.lvdsconf;
696                 break;
697         case DCB_OUTPUT_DP:
698                 conf = (ctrl & 0x00000f00) >> 8;
699                 break;
700         case DCB_OUTPUT_ANALOG:
701         default:
702                 conf = 0x00ff;
703                 break;
704         }
705
706         data = nvbios_ocfg_match(bios, data, conf, &ver, &hdr, &cnt, &len, &info2);
707         if (data && id < 0xff) {
708                 data = nvbios_oclk_match(bios, info2.clkcmp[id], pclk);
709                 if (data) {
710                         struct nvbios_init init = {
711                                 .subdev = nv_subdev(priv),
712                                 .bios = bios,
713                                 .offset = data,
714                                 .outp = dcb,
715                                 .crtc = head,
716                                 .execute = 1,
717                         };
718
719                         nvbios_exec(&init);
720                 }
721         }
722
723         return conf;
724 }
725
726 static void
727 nvd0_disp_intr_unk1_0(struct nv50_disp_priv *priv, int head)
728 {
729         exec_script(priv, head, 1);
730 }
731
732 static void
733 nvd0_disp_intr_unk2_0(struct nv50_disp_priv *priv, int head)
734 {
735         exec_script(priv, head, 2);
736 }
737
738 static void
739 nvd0_disp_intr_unk2_1(struct nv50_disp_priv *priv, int head)
740 {
741         struct nouveau_clock *clk = nouveau_clock(priv);
742         u32 pclk = nv_rd32(priv, 0x660450 + (head * 0x300)) / 1000;
743         if (pclk)
744                 clk->pll_set(clk, PLL_VPLL0 + head, pclk);
745         nv_wr32(priv, 0x612200 + (head * 0x800), 0x00000000);
746 }
747
748 static void
749 nvd0_disp_intr_unk2_2_tu(struct nv50_disp_priv *priv, int head,
750                          struct dcb_output *outp)
751 {
752         const int or = ffs(outp->or) - 1;
753         const u32 ctrl = nv_rd32(priv, 0x660200 + (or   * 0x020));
754         const u32 conf = nv_rd32(priv, 0x660404 + (head * 0x300));
755         const u32 pclk = nv_rd32(priv, 0x660450 + (head * 0x300)) / 1000;
756         const u32 link = ((ctrl & 0xf00) == 0x800) ? 0 : 1;
757         const u32 hoff = (head * 0x800);
758         const u32 soff = (  or * 0x800);
759         const u32 loff = (link * 0x080) + soff;
760         const u32 symbol = 100000;
761         const u32 TU = 64;
762         u32 dpctrl = nv_rd32(priv, 0x61c10c + loff) & 0x000f0000;
763         u32 clksor = nv_rd32(priv, 0x612300 + soff);
764         u32 datarate, link_nr, link_bw, bits;
765         u64 ratio, value;
766
767         if      ((conf & 0x3c0) == 0x180) bits = 30;
768         else if ((conf & 0x3c0) == 0x140) bits = 24;
769         else                              bits = 18;
770         datarate = (pclk * bits) / 8;
771
772         if      (dpctrl > 0x00030000) link_nr = 4;
773         else if (dpctrl > 0x00010000) link_nr = 2;
774         else                          link_nr = 1;
775
776         link_bw  = (clksor & 0x007c0000) >> 18;
777         link_bw *= 27000;
778
779         ratio  = datarate;
780         ratio *= symbol;
781         do_div(ratio, link_nr * link_bw);
782
783         value  = (symbol - ratio) * TU;
784         value *= ratio;
785         do_div(value, symbol);
786         do_div(value, symbol);
787
788         value += 5;
789         value |= 0x08000000;
790
791         nv_wr32(priv, 0x616610 + hoff, value);
792 }
793
794 static void
795 nvd0_disp_intr_unk2_2(struct nv50_disp_priv *priv, int head)
796 {
797         struct dcb_output outp;
798         u32 pclk = nv_rd32(priv, 0x660450 + (head * 0x300)) / 1000;
799         u32 conf = exec_clkcmp(priv, head, 0xff, pclk, &outp);
800         if (conf != ~0) {
801                 u32 addr, data;
802
803                 if (outp.type == DCB_OUTPUT_DP) {
804                         u32 sync = nv_rd32(priv, 0x660404 + (head * 0x300));
805                         switch ((sync & 0x000003c0) >> 6) {
806                         case 6: pclk = pclk * 30 / 8; break;
807                         case 5: pclk = pclk * 24 / 8; break;
808                         case 2:
809                         default:
810                                 pclk = pclk * 18 / 8;
811                                 break;
812                         }
813
814                         nouveau_dp_train(&priv->base, priv->sor.dp,
815                                          &outp, head, pclk);
816                 }
817
818                 exec_clkcmp(priv, head, 0, pclk, &outp);
819
820                 if (outp.type == DCB_OUTPUT_ANALOG) {
821                         addr = 0x612280 + (ffs(outp.or) - 1) * 0x800;
822                         data = 0x00000000;
823                 } else {
824                         if (outp.type == DCB_OUTPUT_DP)
825                                 nvd0_disp_intr_unk2_2_tu(priv, head, &outp);
826                         addr = 0x612300 + (ffs(outp.or) - 1) * 0x800;
827                         data = (conf & 0x0100) ? 0x00000101 : 0x00000000;
828                 }
829
830                 nv_mask(priv, addr, 0x00000707, data);
831         }
832 }
833
834 static void
835 nvd0_disp_intr_unk4_0(struct nv50_disp_priv *priv, int head)
836 {
837         struct dcb_output outp;
838         u32 pclk = nv_rd32(priv, 0x660450 + (head * 0x300)) / 1000;
839         exec_clkcmp(priv, head, 1, pclk, &outp);
840 }
841
842 void
843 nvd0_disp_intr_supervisor(struct work_struct *work)
844 {
845         struct nv50_disp_priv *priv =
846                 container_of(work, struct nv50_disp_priv, supervisor);
847         u32 mask[4];
848         int head;
849
850         nv_debug(priv, "supervisor %08x\n", priv->super);
851         for (head = 0; head < priv->head.nr; head++) {
852                 mask[head] = nv_rd32(priv, 0x6101d4 + (head * 0x800));
853                 nv_debug(priv, "head %d: 0x%08x\n", head, mask[head]);
854         }
855
856         if (priv->super & 0x00000001) {
857                 for (head = 0; head < priv->head.nr; head++) {
858                         if (!(mask[head] & 0x00001000))
859                                 continue;
860                         nvd0_disp_intr_unk1_0(priv, head);
861                 }
862         } else
863         if (priv->super & 0x00000002) {
864                 for (head = 0; head < priv->head.nr; head++) {
865                         if (!(mask[head] & 0x00001000))
866                                 continue;
867                         nvd0_disp_intr_unk2_0(priv, head);
868                 }
869                 for (head = 0; head < priv->head.nr; head++) {
870                         if (!(mask[head] & 0x00010000))
871                                 continue;
872                         nvd0_disp_intr_unk2_1(priv, head);
873                 }
874                 for (head = 0; head < priv->head.nr; head++) {
875                         if (!(mask[head] & 0x00001000))
876                                 continue;
877                         nvd0_disp_intr_unk2_2(priv, head);
878                 }
879         } else
880         if (priv->super & 0x00000004) {
881                 for (head = 0; head < priv->head.nr; head++) {
882                         if (!(mask[head] & 0x00001000))
883                                 continue;
884                         nvd0_disp_intr_unk4_0(priv, head);
885                 }
886         }
887
888         for (head = 0; head < priv->head.nr; head++)
889                 nv_wr32(priv, 0x6101d4 + (head * 0x800), 0x00000000);
890         nv_wr32(priv, 0x6101d0, 0x80000000);
891 }
892
893 void
894 nvd0_disp_intr(struct nouveau_subdev *subdev)
895 {
896         struct nv50_disp_priv *priv = (void *)subdev;
897         u32 intr = nv_rd32(priv, 0x610088);
898         int i;
899
900         if (intr & 0x00000001) {
901                 u32 stat = nv_rd32(priv, 0x61008c);
902                 nv_wr32(priv, 0x61008c, stat);
903                 intr &= ~0x00000001;
904         }
905
906         if (intr & 0x00000002) {
907                 u32 stat = nv_rd32(priv, 0x61009c);
908                 int chid = ffs(stat) - 1;
909                 if (chid >= 0) {
910                         u32 mthd = nv_rd32(priv, 0x6101f0 + (chid * 12));
911                         u32 data = nv_rd32(priv, 0x6101f4 + (chid * 12));
912                         u32 unkn = nv_rd32(priv, 0x6101f8 + (chid * 12));
913
914                         nv_error(priv, "chid %d mthd 0x%04x data 0x%08x "
915                                        "0x%08x 0x%08x\n",
916                                  chid, (mthd & 0x0000ffc), data, mthd, unkn);
917                         nv_wr32(priv, 0x61009c, (1 << chid));
918                         nv_wr32(priv, 0x6101f0 + (chid * 12), 0x90000000);
919                 }
920
921                 intr &= ~0x00000002;
922         }
923
924         if (intr & 0x00100000) {
925                 u32 stat = nv_rd32(priv, 0x6100ac);
926                 if (stat & 0x00000007) {
927                         priv->super = (stat & 0x00000007);
928                         schedule_work(&priv->supervisor);
929                         nv_wr32(priv, 0x6100ac, priv->super);
930                         stat &= ~0x00000007;
931                 }
932
933                 if (stat) {
934                         nv_info(priv, "unknown intr24 0x%08x\n", stat);
935                         nv_wr32(priv, 0x6100ac, stat);
936                 }
937
938                 intr &= ~0x00100000;
939         }
940
941         for (i = 0; i < priv->head.nr; i++) {
942                 u32 mask = 0x01000000 << i;
943                 if (mask & intr) {
944                         u32 stat = nv_rd32(priv, 0x6100bc + (i * 0x800));
945                         if (stat & 0x00000001)
946                                 nouveau_event_trigger(priv->base.vblank, i);
947                         nv_mask(priv, 0x6100bc + (i * 0x800), 0, 0);
948                         nv_rd32(priv, 0x6100c0 + (i * 0x800));
949                 }
950         }
951 }
952
953 static int
954 nvd0_disp_ctor(struct nouveau_object *parent, struct nouveau_object *engine,
955                struct nouveau_oclass *oclass, void *data, u32 size,
956                struct nouveau_object **pobject)
957 {
958         struct nv50_disp_priv *priv;
959         int heads = nv_rd32(parent, 0x022448);
960         int ret;
961
962         ret = nouveau_disp_create(parent, engine, oclass, heads,
963                                   "PDISP", "display", &priv);
964         *pobject = nv_object(priv);
965         if (ret)
966                 return ret;
967
968         nv_engine(priv)->sclass = nvd0_disp_base_oclass;
969         nv_engine(priv)->cclass = &nv50_disp_cclass;
970         nv_subdev(priv)->intr = nvd0_disp_intr;
971         INIT_WORK(&priv->supervisor, nvd0_disp_intr_supervisor);
972         priv->sclass = nvd0_disp_sclass;
973         priv->head.nr = heads;
974         priv->dac.nr = 3;
975         priv->sor.nr = 4;
976         priv->dac.power = nv50_dac_power;
977         priv->dac.sense = nv50_dac_sense;
978         priv->sor.power = nv50_sor_power;
979         priv->sor.hda_eld = nvd0_hda_eld;
980         priv->sor.hdmi = nvd0_hdmi_ctrl;
981         priv->sor.dp = &nvd0_sor_dp_func;
982         return 0;
983 }
984
985 struct nouveau_oclass
986 nvd0_disp_oclass = {
987         .handle = NV_ENGINE(DISP, 0x90),
988         .ofuncs = &(struct nouveau_ofuncs) {
989                 .ctor = nvd0_disp_ctor,
990                 .dtor = _nouveau_disp_dtor,
991                 .init = _nouveau_disp_init,
992                 .fini = _nouveau_disp_fini,
993         },
994 };