]> Git Repo - linux.git/blob - drivers/gpu/drm/amd/amdgpu/atom.c
drm/amdgpu/atom: add support for new mul32 opcodes (v2)
[linux.git] / drivers / gpu / drm / amd / amdgpu / atom.c
1 /*
2  * Copyright 2008 Advanced Micro Devices, 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  * Author: Stanislaw Skowronek
23  */
24
25 #include <linux/module.h>
26 #include <linux/sched.h>
27 #include <linux/slab.h>
28 #include <asm/unaligned.h>
29
30 #define ATOM_DEBUG
31
32 #include "atom.h"
33 #include "atom-names.h"
34 #include "atom-bits.h"
35 #include "amdgpu.h"
36
37 #define ATOM_COND_ABOVE         0
38 #define ATOM_COND_ABOVEOREQUAL  1
39 #define ATOM_COND_ALWAYS        2
40 #define ATOM_COND_BELOW         3
41 #define ATOM_COND_BELOWOREQUAL  4
42 #define ATOM_COND_EQUAL         5
43 #define ATOM_COND_NOTEQUAL      6
44
45 #define ATOM_PORT_ATI   0
46 #define ATOM_PORT_PCI   1
47 #define ATOM_PORT_SYSIO 2
48
49 #define ATOM_UNIT_MICROSEC      0
50 #define ATOM_UNIT_MILLISEC      1
51
52 #define PLL_INDEX       2
53 #define PLL_DATA        3
54
55 typedef struct {
56         struct atom_context *ctx;
57         uint32_t *ps, *ws;
58         int ps_shift;
59         uint16_t start;
60         unsigned last_jump;
61         unsigned long last_jump_jiffies;
62         bool abort;
63 } atom_exec_context;
64
65 int amdgpu_atom_debug = 0;
66 static int amdgpu_atom_execute_table_locked(struct atom_context *ctx, int index, uint32_t * params);
67 int amdgpu_atom_execute_table(struct atom_context *ctx, int index, uint32_t * params);
68
69 static uint32_t atom_arg_mask[8] =
70     { 0xFFFFFFFF, 0xFFFF, 0xFFFF00, 0xFFFF0000, 0xFF, 0xFF00, 0xFF0000,
71 0xFF000000 };
72 static int atom_arg_shift[8] = { 0, 0, 8, 16, 0, 8, 16, 24 };
73
74 static int atom_dst_to_src[8][4] = {
75         /* translate destination alignment field to the source alignment encoding */
76         {0, 0, 0, 0},
77         {1, 2, 3, 0},
78         {1, 2, 3, 0},
79         {1, 2, 3, 0},
80         {4, 5, 6, 7},
81         {4, 5, 6, 7},
82         {4, 5, 6, 7},
83         {4, 5, 6, 7},
84 };
85 static int atom_def_dst[8] = { 0, 0, 1, 2, 0, 1, 2, 3 };
86
87 static int debug_depth = 0;
88 #ifdef ATOM_DEBUG
89 static void debug_print_spaces(int n)
90 {
91         while (n--)
92                 printk("   ");
93 }
94
95 #define DEBUG(...) do if (amdgpu_atom_debug) { printk(KERN_DEBUG __VA_ARGS__); } while (0)
96 #define SDEBUG(...) do if (amdgpu_atom_debug) { printk(KERN_DEBUG); debug_print_spaces(debug_depth); printk(__VA_ARGS__); } while (0)
97 #else
98 #define DEBUG(...) do { } while (0)
99 #define SDEBUG(...) do { } while (0)
100 #endif
101
102 static uint32_t atom_iio_execute(struct atom_context *ctx, int base,
103                                  uint32_t index, uint32_t data)
104 {
105         uint32_t temp = 0xCDCDCDCD;
106
107         while (1)
108                 switch (CU8(base)) {
109                 case ATOM_IIO_NOP:
110                         base++;
111                         break;
112                 case ATOM_IIO_READ:
113                         temp = ctx->card->ioreg_read(ctx->card, CU16(base + 1));
114                         base += 3;
115                         break;
116                 case ATOM_IIO_WRITE:
117                         ctx->card->ioreg_write(ctx->card, CU16(base + 1), temp);
118                         base += 3;
119                         break;
120                 case ATOM_IIO_CLEAR:
121                         temp &=
122                             ~((0xFFFFFFFF >> (32 - CU8(base + 1))) <<
123                               CU8(base + 2));
124                         base += 3;
125                         break;
126                 case ATOM_IIO_SET:
127                         temp |=
128                             (0xFFFFFFFF >> (32 - CU8(base + 1))) << CU8(base +
129                                                                         2);
130                         base += 3;
131                         break;
132                 case ATOM_IIO_MOVE_INDEX:
133                         temp &=
134                             ~((0xFFFFFFFF >> (32 - CU8(base + 1))) <<
135                               CU8(base + 3));
136                         temp |=
137                             ((index >> CU8(base + 2)) &
138                              (0xFFFFFFFF >> (32 - CU8(base + 1)))) << CU8(base +
139                                                                           3);
140                         base += 4;
141                         break;
142                 case ATOM_IIO_MOVE_DATA:
143                         temp &=
144                             ~((0xFFFFFFFF >> (32 - CU8(base + 1))) <<
145                               CU8(base + 3));
146                         temp |=
147                             ((data >> CU8(base + 2)) &
148                              (0xFFFFFFFF >> (32 - CU8(base + 1)))) << CU8(base +
149                                                                           3);
150                         base += 4;
151                         break;
152                 case ATOM_IIO_MOVE_ATTR:
153                         temp &=
154                             ~((0xFFFFFFFF >> (32 - CU8(base + 1))) <<
155                               CU8(base + 3));
156                         temp |=
157                             ((ctx->
158                               io_attr >> CU8(base + 2)) & (0xFFFFFFFF >> (32 -
159                                                                           CU8
160                                                                           (base
161                                                                            +
162                                                                            1))))
163                             << CU8(base + 3);
164                         base += 4;
165                         break;
166                 case ATOM_IIO_END:
167                         return temp;
168                 default:
169                         printk(KERN_INFO "Unknown IIO opcode.\n");
170                         return 0;
171                 }
172 }
173
174 static uint32_t atom_get_src_int(atom_exec_context *ctx, uint8_t attr,
175                                  int *ptr, uint32_t *saved, int print)
176 {
177         uint32_t idx, val = 0xCDCDCDCD, align, arg;
178         struct atom_context *gctx = ctx->ctx;
179         arg = attr & 7;
180         align = (attr >> 3) & 7;
181         switch (arg) {
182         case ATOM_ARG_REG:
183                 idx = U16(*ptr);
184                 (*ptr) += 2;
185                 if (print)
186                         DEBUG("REG[0x%04X]", idx);
187                 idx += gctx->reg_block;
188                 switch (gctx->io_mode) {
189                 case ATOM_IO_MM:
190                         val = gctx->card->reg_read(gctx->card, idx);
191                         break;
192                 case ATOM_IO_PCI:
193                         printk(KERN_INFO
194                                "PCI registers are not implemented.\n");
195                         return 0;
196                 case ATOM_IO_SYSIO:
197                         printk(KERN_INFO
198                                "SYSIO registers are not implemented.\n");
199                         return 0;
200                 default:
201                         if (!(gctx->io_mode & 0x80)) {
202                                 printk(KERN_INFO "Bad IO mode.\n");
203                                 return 0;
204                         }
205                         if (!gctx->iio[gctx->io_mode & 0x7F]) {
206                                 printk(KERN_INFO
207                                        "Undefined indirect IO read method %d.\n",
208                                        gctx->io_mode & 0x7F);
209                                 return 0;
210                         }
211                         val =
212                             atom_iio_execute(gctx,
213                                              gctx->iio[gctx->io_mode & 0x7F],
214                                              idx, 0);
215                 }
216                 break;
217         case ATOM_ARG_PS:
218                 idx = U8(*ptr);
219                 (*ptr)++;
220                 /* get_unaligned_le32 avoids unaligned accesses from atombios
221                  * tables, noticed on a DEC Alpha. */
222                 val = get_unaligned_le32((u32 *)&ctx->ps[idx]);
223                 if (print)
224                         DEBUG("PS[0x%02X,0x%04X]", idx, val);
225                 break;
226         case ATOM_ARG_WS:
227                 idx = U8(*ptr);
228                 (*ptr)++;
229                 if (print)
230                         DEBUG("WS[0x%02X]", idx);
231                 switch (idx) {
232                 case ATOM_WS_QUOTIENT:
233                         val = gctx->divmul[0];
234                         break;
235                 case ATOM_WS_REMAINDER:
236                         val = gctx->divmul[1];
237                         break;
238                 case ATOM_WS_DATAPTR:
239                         val = gctx->data_block;
240                         break;
241                 case ATOM_WS_SHIFT:
242                         val = gctx->shift;
243                         break;
244                 case ATOM_WS_OR_MASK:
245                         val = 1 << gctx->shift;
246                         break;
247                 case ATOM_WS_AND_MASK:
248                         val = ~(1 << gctx->shift);
249                         break;
250                 case ATOM_WS_FB_WINDOW:
251                         val = gctx->fb_base;
252                         break;
253                 case ATOM_WS_ATTRIBUTES:
254                         val = gctx->io_attr;
255                         break;
256                 case ATOM_WS_REGPTR:
257                         val = gctx->reg_block;
258                         break;
259                 default:
260                         val = ctx->ws[idx];
261                 }
262                 break;
263         case ATOM_ARG_ID:
264                 idx = U16(*ptr);
265                 (*ptr) += 2;
266                 if (print) {
267                         if (gctx->data_block)
268                                 DEBUG("ID[0x%04X+%04X]", idx, gctx->data_block);
269                         else
270                                 DEBUG("ID[0x%04X]", idx);
271                 }
272                 val = U32(idx + gctx->data_block);
273                 break;
274         case ATOM_ARG_FB:
275                 idx = U8(*ptr);
276                 (*ptr)++;
277                 if ((gctx->fb_base + (idx * 4)) > gctx->scratch_size_bytes) {
278                         DRM_ERROR("ATOM: fb read beyond scratch region: %d vs. %d\n",
279                                   gctx->fb_base + (idx * 4), gctx->scratch_size_bytes);
280                         val = 0;
281                 } else
282                         val = gctx->scratch[(gctx->fb_base / 4) + idx];
283                 if (print)
284                         DEBUG("FB[0x%02X]", idx);
285                 break;
286         case ATOM_ARG_IMM:
287                 switch (align) {
288                 case ATOM_SRC_DWORD:
289                         val = U32(*ptr);
290                         (*ptr) += 4;
291                         if (print)
292                                 DEBUG("IMM 0x%08X\n", val);
293                         return val;
294                 case ATOM_SRC_WORD0:
295                 case ATOM_SRC_WORD8:
296                 case ATOM_SRC_WORD16:
297                         val = U16(*ptr);
298                         (*ptr) += 2;
299                         if (print)
300                                 DEBUG("IMM 0x%04X\n", val);
301                         return val;
302                 case ATOM_SRC_BYTE0:
303                 case ATOM_SRC_BYTE8:
304                 case ATOM_SRC_BYTE16:
305                 case ATOM_SRC_BYTE24:
306                         val = U8(*ptr);
307                         (*ptr)++;
308                         if (print)
309                                 DEBUG("IMM 0x%02X\n", val);
310                         return val;
311                 }
312                 return 0;
313         case ATOM_ARG_PLL:
314                 idx = U8(*ptr);
315                 (*ptr)++;
316                 if (print)
317                         DEBUG("PLL[0x%02X]", idx);
318                 val = gctx->card->pll_read(gctx->card, idx);
319                 break;
320         case ATOM_ARG_MC:
321                 idx = U8(*ptr);
322                 (*ptr)++;
323                 if (print)
324                         DEBUG("MC[0x%02X]", idx);
325                 val = gctx->card->mc_read(gctx->card, idx);
326                 break;
327         }
328         if (saved)
329                 *saved = val;
330         val &= atom_arg_mask[align];
331         val >>= atom_arg_shift[align];
332         if (print)
333                 switch (align) {
334                 case ATOM_SRC_DWORD:
335                         DEBUG(".[31:0] -> 0x%08X\n", val);
336                         break;
337                 case ATOM_SRC_WORD0:
338                         DEBUG(".[15:0] -> 0x%04X\n", val);
339                         break;
340                 case ATOM_SRC_WORD8:
341                         DEBUG(".[23:8] -> 0x%04X\n", val);
342                         break;
343                 case ATOM_SRC_WORD16:
344                         DEBUG(".[31:16] -> 0x%04X\n", val);
345                         break;
346                 case ATOM_SRC_BYTE0:
347                         DEBUG(".[7:0] -> 0x%02X\n", val);
348                         break;
349                 case ATOM_SRC_BYTE8:
350                         DEBUG(".[15:8] -> 0x%02X\n", val);
351                         break;
352                 case ATOM_SRC_BYTE16:
353                         DEBUG(".[23:16] -> 0x%02X\n", val);
354                         break;
355                 case ATOM_SRC_BYTE24:
356                         DEBUG(".[31:24] -> 0x%02X\n", val);
357                         break;
358                 }
359         return val;
360 }
361
362 static void atom_skip_src_int(atom_exec_context *ctx, uint8_t attr, int *ptr)
363 {
364         uint32_t align = (attr >> 3) & 7, arg = attr & 7;
365         switch (arg) {
366         case ATOM_ARG_REG:
367         case ATOM_ARG_ID:
368                 (*ptr) += 2;
369                 break;
370         case ATOM_ARG_PLL:
371         case ATOM_ARG_MC:
372         case ATOM_ARG_PS:
373         case ATOM_ARG_WS:
374         case ATOM_ARG_FB:
375                 (*ptr)++;
376                 break;
377         case ATOM_ARG_IMM:
378                 switch (align) {
379                 case ATOM_SRC_DWORD:
380                         (*ptr) += 4;
381                         return;
382                 case ATOM_SRC_WORD0:
383                 case ATOM_SRC_WORD8:
384                 case ATOM_SRC_WORD16:
385                         (*ptr) += 2;
386                         return;
387                 case ATOM_SRC_BYTE0:
388                 case ATOM_SRC_BYTE8:
389                 case ATOM_SRC_BYTE16:
390                 case ATOM_SRC_BYTE24:
391                         (*ptr)++;
392                         return;
393                 }
394                 return;
395         }
396 }
397
398 static uint32_t atom_get_src(atom_exec_context *ctx, uint8_t attr, int *ptr)
399 {
400         return atom_get_src_int(ctx, attr, ptr, NULL, 1);
401 }
402
403 static uint32_t atom_get_src_direct(atom_exec_context *ctx, uint8_t align, int *ptr)
404 {
405         uint32_t val = 0xCDCDCDCD;
406
407         switch (align) {
408         case ATOM_SRC_DWORD:
409                 val = U32(*ptr);
410                 (*ptr) += 4;
411                 break;
412         case ATOM_SRC_WORD0:
413         case ATOM_SRC_WORD8:
414         case ATOM_SRC_WORD16:
415                 val = U16(*ptr);
416                 (*ptr) += 2;
417                 break;
418         case ATOM_SRC_BYTE0:
419         case ATOM_SRC_BYTE8:
420         case ATOM_SRC_BYTE16:
421         case ATOM_SRC_BYTE24:
422                 val = U8(*ptr);
423                 (*ptr)++;
424                 break;
425         }
426         return val;
427 }
428
429 static uint32_t atom_get_dst(atom_exec_context *ctx, int arg, uint8_t attr,
430                              int *ptr, uint32_t *saved, int print)
431 {
432         return atom_get_src_int(ctx,
433                                 arg | atom_dst_to_src[(attr >> 3) &
434                                                       7][(attr >> 6) & 3] << 3,
435                                 ptr, saved, print);
436 }
437
438 static void atom_skip_dst(atom_exec_context *ctx, int arg, uint8_t attr, int *ptr)
439 {
440         atom_skip_src_int(ctx,
441                           arg | atom_dst_to_src[(attr >> 3) & 7][(attr >> 6) &
442                                                                  3] << 3, ptr);
443 }
444
445 static void atom_put_dst(atom_exec_context *ctx, int arg, uint8_t attr,
446                          int *ptr, uint32_t val, uint32_t saved)
447 {
448         uint32_t align =
449             atom_dst_to_src[(attr >> 3) & 7][(attr >> 6) & 3], old_val =
450             val, idx;
451         struct atom_context *gctx = ctx->ctx;
452         old_val &= atom_arg_mask[align] >> atom_arg_shift[align];
453         val <<= atom_arg_shift[align];
454         val &= atom_arg_mask[align];
455         saved &= ~atom_arg_mask[align];
456         val |= saved;
457         switch (arg) {
458         case ATOM_ARG_REG:
459                 idx = U16(*ptr);
460                 (*ptr) += 2;
461                 DEBUG("REG[0x%04X]", idx);
462                 idx += gctx->reg_block;
463                 switch (gctx->io_mode) {
464                 case ATOM_IO_MM:
465                         if (idx == 0)
466                                 gctx->card->reg_write(gctx->card, idx,
467                                                       val << 2);
468                         else
469                                 gctx->card->reg_write(gctx->card, idx, val);
470                         break;
471                 case ATOM_IO_PCI:
472                         printk(KERN_INFO
473                                "PCI registers are not implemented.\n");
474                         return;
475                 case ATOM_IO_SYSIO:
476                         printk(KERN_INFO
477                                "SYSIO registers are not implemented.\n");
478                         return;
479                 default:
480                         if (!(gctx->io_mode & 0x80)) {
481                                 printk(KERN_INFO "Bad IO mode.\n");
482                                 return;
483                         }
484                         if (!gctx->iio[gctx->io_mode & 0xFF]) {
485                                 printk(KERN_INFO
486                                        "Undefined indirect IO write method %d.\n",
487                                        gctx->io_mode & 0x7F);
488                                 return;
489                         }
490                         atom_iio_execute(gctx, gctx->iio[gctx->io_mode & 0xFF],
491                                          idx, val);
492                 }
493                 break;
494         case ATOM_ARG_PS:
495                 idx = U8(*ptr);
496                 (*ptr)++;
497                 DEBUG("PS[0x%02X]", idx);
498                 ctx->ps[idx] = cpu_to_le32(val);
499                 break;
500         case ATOM_ARG_WS:
501                 idx = U8(*ptr);
502                 (*ptr)++;
503                 DEBUG("WS[0x%02X]", idx);
504                 switch (idx) {
505                 case ATOM_WS_QUOTIENT:
506                         gctx->divmul[0] = val;
507                         break;
508                 case ATOM_WS_REMAINDER:
509                         gctx->divmul[1] = val;
510                         break;
511                 case ATOM_WS_DATAPTR:
512                         gctx->data_block = val;
513                         break;
514                 case ATOM_WS_SHIFT:
515                         gctx->shift = val;
516                         break;
517                 case ATOM_WS_OR_MASK:
518                 case ATOM_WS_AND_MASK:
519                         break;
520                 case ATOM_WS_FB_WINDOW:
521                         gctx->fb_base = val;
522                         break;
523                 case ATOM_WS_ATTRIBUTES:
524                         gctx->io_attr = val;
525                         break;
526                 case ATOM_WS_REGPTR:
527                         gctx->reg_block = val;
528                         break;
529                 default:
530                         ctx->ws[idx] = val;
531                 }
532                 break;
533         case ATOM_ARG_FB:
534                 idx = U8(*ptr);
535                 (*ptr)++;
536                 if ((gctx->fb_base + (idx * 4)) > gctx->scratch_size_bytes) {
537                         DRM_ERROR("ATOM: fb write beyond scratch region: %d vs. %d\n",
538                                   gctx->fb_base + (idx * 4), gctx->scratch_size_bytes);
539                 } else
540                         gctx->scratch[(gctx->fb_base / 4) + idx] = val;
541                 DEBUG("FB[0x%02X]", idx);
542                 break;
543         case ATOM_ARG_PLL:
544                 idx = U8(*ptr);
545                 (*ptr)++;
546                 DEBUG("PLL[0x%02X]", idx);
547                 gctx->card->pll_write(gctx->card, idx, val);
548                 break;
549         case ATOM_ARG_MC:
550                 idx = U8(*ptr);
551                 (*ptr)++;
552                 DEBUG("MC[0x%02X]", idx);
553                 gctx->card->mc_write(gctx->card, idx, val);
554                 return;
555         }
556         switch (align) {
557         case ATOM_SRC_DWORD:
558                 DEBUG(".[31:0] <- 0x%08X\n", old_val);
559                 break;
560         case ATOM_SRC_WORD0:
561                 DEBUG(".[15:0] <- 0x%04X\n", old_val);
562                 break;
563         case ATOM_SRC_WORD8:
564                 DEBUG(".[23:8] <- 0x%04X\n", old_val);
565                 break;
566         case ATOM_SRC_WORD16:
567                 DEBUG(".[31:16] <- 0x%04X\n", old_val);
568                 break;
569         case ATOM_SRC_BYTE0:
570                 DEBUG(".[7:0] <- 0x%02X\n", old_val);
571                 break;
572         case ATOM_SRC_BYTE8:
573                 DEBUG(".[15:8] <- 0x%02X\n", old_val);
574                 break;
575         case ATOM_SRC_BYTE16:
576                 DEBUG(".[23:16] <- 0x%02X\n", old_val);
577                 break;
578         case ATOM_SRC_BYTE24:
579                 DEBUG(".[31:24] <- 0x%02X\n", old_val);
580                 break;
581         }
582 }
583
584 static void atom_op_add(atom_exec_context *ctx, int *ptr, int arg)
585 {
586         uint8_t attr = U8((*ptr)++);
587         uint32_t dst, src, saved;
588         int dptr = *ptr;
589         SDEBUG("   dst: ");
590         dst = atom_get_dst(ctx, arg, attr, ptr, &saved, 1);
591         SDEBUG("   src: ");
592         src = atom_get_src(ctx, attr, ptr);
593         dst += src;
594         SDEBUG("   dst: ");
595         atom_put_dst(ctx, arg, attr, &dptr, dst, saved);
596 }
597
598 static void atom_op_and(atom_exec_context *ctx, int *ptr, int arg)
599 {
600         uint8_t attr = U8((*ptr)++);
601         uint32_t dst, src, saved;
602         int dptr = *ptr;
603         SDEBUG("   dst: ");
604         dst = atom_get_dst(ctx, arg, attr, ptr, &saved, 1);
605         SDEBUG("   src: ");
606         src = atom_get_src(ctx, attr, ptr);
607         dst &= src;
608         SDEBUG("   dst: ");
609         atom_put_dst(ctx, arg, attr, &dptr, dst, saved);
610 }
611
612 static void atom_op_beep(atom_exec_context *ctx, int *ptr, int arg)
613 {
614         printk("ATOM BIOS beeped!\n");
615 }
616
617 static void atom_op_calltable(atom_exec_context *ctx, int *ptr, int arg)
618 {
619         int idx = U8((*ptr)++);
620         int r = 0;
621
622         if (idx < ATOM_TABLE_NAMES_CNT)
623                 SDEBUG("   table: %d (%s)\n", idx, atom_table_names[idx]);
624         else
625                 SDEBUG("   table: %d\n", idx);
626         if (U16(ctx->ctx->cmd_table + 4 + 2 * idx))
627                 r = amdgpu_atom_execute_table_locked(ctx->ctx, idx, ctx->ps + ctx->ps_shift);
628         if (r) {
629                 ctx->abort = true;
630         }
631 }
632
633 static void atom_op_clear(atom_exec_context *ctx, int *ptr, int arg)
634 {
635         uint8_t attr = U8((*ptr)++);
636         uint32_t saved;
637         int dptr = *ptr;
638         attr &= 0x38;
639         attr |= atom_def_dst[attr >> 3] << 6;
640         atom_get_dst(ctx, arg, attr, ptr, &saved, 0);
641         SDEBUG("   dst: ");
642         atom_put_dst(ctx, arg, attr, &dptr, 0, saved);
643 }
644
645 static void atom_op_compare(atom_exec_context *ctx, int *ptr, int arg)
646 {
647         uint8_t attr = U8((*ptr)++);
648         uint32_t dst, src;
649         SDEBUG("   src1: ");
650         dst = atom_get_dst(ctx, arg, attr, ptr, NULL, 1);
651         SDEBUG("   src2: ");
652         src = atom_get_src(ctx, attr, ptr);
653         ctx->ctx->cs_equal = (dst == src);
654         ctx->ctx->cs_above = (dst > src);
655         SDEBUG("   result: %s %s\n", ctx->ctx->cs_equal ? "EQ" : "NE",
656                ctx->ctx->cs_above ? "GT" : "LE");
657 }
658
659 static void atom_op_delay(atom_exec_context *ctx, int *ptr, int arg)
660 {
661         unsigned count = U8((*ptr)++);
662         SDEBUG("   count: %d\n", count);
663         if (arg == ATOM_UNIT_MICROSEC)
664                 udelay(count);
665         else if (!drm_can_sleep())
666                 mdelay(count);
667         else
668                 msleep(count);
669 }
670
671 static void atom_op_div(atom_exec_context *ctx, int *ptr, int arg)
672 {
673         uint8_t attr = U8((*ptr)++);
674         uint32_t dst, src;
675         SDEBUG("   src1: ");
676         dst = atom_get_dst(ctx, arg, attr, ptr, NULL, 1);
677         SDEBUG("   src2: ");
678         src = atom_get_src(ctx, attr, ptr);
679         if (src != 0) {
680                 ctx->ctx->divmul[0] = dst / src;
681                 ctx->ctx->divmul[1] = dst % src;
682         } else {
683                 ctx->ctx->divmul[0] = 0;
684                 ctx->ctx->divmul[1] = 0;
685         }
686 }
687
688 static void atom_op_eot(atom_exec_context *ctx, int *ptr, int arg)
689 {
690         /* functionally, a nop */
691 }
692
693 static void atom_op_jump(atom_exec_context *ctx, int *ptr, int arg)
694 {
695         int execute = 0, target = U16(*ptr);
696         unsigned long cjiffies;
697
698         (*ptr) += 2;
699         switch (arg) {
700         case ATOM_COND_ABOVE:
701                 execute = ctx->ctx->cs_above;
702                 break;
703         case ATOM_COND_ABOVEOREQUAL:
704                 execute = ctx->ctx->cs_above || ctx->ctx->cs_equal;
705                 break;
706         case ATOM_COND_ALWAYS:
707                 execute = 1;
708                 break;
709         case ATOM_COND_BELOW:
710                 execute = !(ctx->ctx->cs_above || ctx->ctx->cs_equal);
711                 break;
712         case ATOM_COND_BELOWOREQUAL:
713                 execute = !ctx->ctx->cs_above;
714                 break;
715         case ATOM_COND_EQUAL:
716                 execute = ctx->ctx->cs_equal;
717                 break;
718         case ATOM_COND_NOTEQUAL:
719                 execute = !ctx->ctx->cs_equal;
720                 break;
721         }
722         if (arg != ATOM_COND_ALWAYS)
723                 SDEBUG("   taken: %s\n", execute ? "yes" : "no");
724         SDEBUG("   target: 0x%04X\n", target);
725         if (execute) {
726                 if (ctx->last_jump == (ctx->start + target)) {
727                         cjiffies = jiffies;
728                         if (time_after(cjiffies, ctx->last_jump_jiffies)) {
729                                 cjiffies -= ctx->last_jump_jiffies;
730                                 if ((jiffies_to_msecs(cjiffies) > 5000)) {
731                                         DRM_ERROR("atombios stuck in loop for more than 5secs aborting\n");
732                                         ctx->abort = true;
733                                 }
734                         } else {
735                                 /* jiffies wrap around we will just wait a little longer */
736                                 ctx->last_jump_jiffies = jiffies;
737                         }
738                 } else {
739                         ctx->last_jump = ctx->start + target;
740                         ctx->last_jump_jiffies = jiffies;
741                 }
742                 *ptr = ctx->start + target;
743         }
744 }
745
746 static void atom_op_mask(atom_exec_context *ctx, int *ptr, int arg)
747 {
748         uint8_t attr = U8((*ptr)++);
749         uint32_t dst, mask, src, saved;
750         int dptr = *ptr;
751         SDEBUG("   dst: ");
752         dst = atom_get_dst(ctx, arg, attr, ptr, &saved, 1);
753         mask = atom_get_src_direct(ctx, ((attr >> 3) & 7), ptr);
754         SDEBUG("   mask: 0x%08x", mask);
755         SDEBUG("   src: ");
756         src = atom_get_src(ctx, attr, ptr);
757         dst &= mask;
758         dst |= src;
759         SDEBUG("   dst: ");
760         atom_put_dst(ctx, arg, attr, &dptr, dst, saved);
761 }
762
763 static void atom_op_move(atom_exec_context *ctx, int *ptr, int arg)
764 {
765         uint8_t attr = U8((*ptr)++);
766         uint32_t src, saved;
767         int dptr = *ptr;
768         if (((attr >> 3) & 7) != ATOM_SRC_DWORD)
769                 atom_get_dst(ctx, arg, attr, ptr, &saved, 0);
770         else {
771                 atom_skip_dst(ctx, arg, attr, ptr);
772                 saved = 0xCDCDCDCD;
773         }
774         SDEBUG("   src: ");
775         src = atom_get_src(ctx, attr, ptr);
776         SDEBUG("   dst: ");
777         atom_put_dst(ctx, arg, attr, &dptr, src, saved);
778 }
779
780 static void atom_op_mul(atom_exec_context *ctx, int *ptr, int arg)
781 {
782         uint8_t attr = U8((*ptr)++);
783         uint32_t dst, src;
784         SDEBUG("   src1: ");
785         dst = atom_get_dst(ctx, arg, attr, ptr, NULL, 1);
786         SDEBUG("   src2: ");
787         src = atom_get_src(ctx, attr, ptr);
788         ctx->ctx->divmul[0] = dst * src;
789 }
790
791 static void atom_op_mul32(atom_exec_context *ctx, int *ptr, int arg)
792 {
793         uint64_t val64;
794         uint8_t attr = U8((*ptr)++);
795         uint32_t dst, src;
796         SDEBUG("   src1: ");
797         dst = atom_get_dst(ctx, arg, attr, ptr, NULL, 1);
798         SDEBUG("   src2: ");
799         src = atom_get_src(ctx, attr, ptr);
800         val64 = (uint64_t)dst * (uint64_t)src;
801         ctx->ctx->divmul[0] = lower_32_bits(val64);
802         ctx->ctx->divmul[1] = upper_32_bits(val64);
803 }
804
805 static void atom_op_nop(atom_exec_context *ctx, int *ptr, int arg)
806 {
807         /* nothing */
808 }
809
810 static void atom_op_or(atom_exec_context *ctx, int *ptr, int arg)
811 {
812         uint8_t attr = U8((*ptr)++);
813         uint32_t dst, src, saved;
814         int dptr = *ptr;
815         SDEBUG("   dst: ");
816         dst = atom_get_dst(ctx, arg, attr, ptr, &saved, 1);
817         SDEBUG("   src: ");
818         src = atom_get_src(ctx, attr, ptr);
819         dst |= src;
820         SDEBUG("   dst: ");
821         atom_put_dst(ctx, arg, attr, &dptr, dst, saved);
822 }
823
824 static void atom_op_postcard(atom_exec_context *ctx, int *ptr, int arg)
825 {
826         uint8_t val = U8((*ptr)++);
827         SDEBUG("POST card output: 0x%02X\n", val);
828 }
829
830 static void atom_op_repeat(atom_exec_context *ctx, int *ptr, int arg)
831 {
832         printk(KERN_INFO "unimplemented!\n");
833 }
834
835 static void atom_op_restorereg(atom_exec_context *ctx, int *ptr, int arg)
836 {
837         printk(KERN_INFO "unimplemented!\n");
838 }
839
840 static void atom_op_savereg(atom_exec_context *ctx, int *ptr, int arg)
841 {
842         printk(KERN_INFO "unimplemented!\n");
843 }
844
845 static void atom_op_setdatablock(atom_exec_context *ctx, int *ptr, int arg)
846 {
847         int idx = U8(*ptr);
848         (*ptr)++;
849         SDEBUG("   block: %d\n", idx);
850         if (!idx)
851                 ctx->ctx->data_block = 0;
852         else if (idx == 255)
853                 ctx->ctx->data_block = ctx->start;
854         else
855                 ctx->ctx->data_block = U16(ctx->ctx->data_table + 4 + 2 * idx);
856         SDEBUG("   base: 0x%04X\n", ctx->ctx->data_block);
857 }
858
859 static void atom_op_setfbbase(atom_exec_context *ctx, int *ptr, int arg)
860 {
861         uint8_t attr = U8((*ptr)++);
862         SDEBUG("   fb_base: ");
863         ctx->ctx->fb_base = atom_get_src(ctx, attr, ptr);
864 }
865
866 static void atom_op_setport(atom_exec_context *ctx, int *ptr, int arg)
867 {
868         int port;
869         switch (arg) {
870         case ATOM_PORT_ATI:
871                 port = U16(*ptr);
872                 if (port < ATOM_IO_NAMES_CNT)
873                         SDEBUG("   port: %d (%s)\n", port, atom_io_names[port]);
874                 else
875                         SDEBUG("   port: %d\n", port);
876                 if (!port)
877                         ctx->ctx->io_mode = ATOM_IO_MM;
878                 else
879                         ctx->ctx->io_mode = ATOM_IO_IIO | port;
880                 (*ptr) += 2;
881                 break;
882         case ATOM_PORT_PCI:
883                 ctx->ctx->io_mode = ATOM_IO_PCI;
884                 (*ptr)++;
885                 break;
886         case ATOM_PORT_SYSIO:
887                 ctx->ctx->io_mode = ATOM_IO_SYSIO;
888                 (*ptr)++;
889                 break;
890         }
891 }
892
893 static void atom_op_setregblock(atom_exec_context *ctx, int *ptr, int arg)
894 {
895         ctx->ctx->reg_block = U16(*ptr);
896         (*ptr) += 2;
897         SDEBUG("   base: 0x%04X\n", ctx->ctx->reg_block);
898 }
899
900 static void atom_op_shift_left(atom_exec_context *ctx, int *ptr, int arg)
901 {
902         uint8_t attr = U8((*ptr)++), shift;
903         uint32_t saved, dst;
904         int dptr = *ptr;
905         attr &= 0x38;
906         attr |= atom_def_dst[attr >> 3] << 6;
907         SDEBUG("   dst: ");
908         dst = atom_get_dst(ctx, arg, attr, ptr, &saved, 1);
909         shift = atom_get_src_direct(ctx, ATOM_SRC_BYTE0, ptr);
910         SDEBUG("   shift: %d\n", shift);
911         dst <<= shift;
912         SDEBUG("   dst: ");
913         atom_put_dst(ctx, arg, attr, &dptr, dst, saved);
914 }
915
916 static void atom_op_shift_right(atom_exec_context *ctx, int *ptr, int arg)
917 {
918         uint8_t attr = U8((*ptr)++), shift;
919         uint32_t saved, dst;
920         int dptr = *ptr;
921         attr &= 0x38;
922         attr |= atom_def_dst[attr >> 3] << 6;
923         SDEBUG("   dst: ");
924         dst = atom_get_dst(ctx, arg, attr, ptr, &saved, 1);
925         shift = atom_get_src_direct(ctx, ATOM_SRC_BYTE0, ptr);
926         SDEBUG("   shift: %d\n", shift);
927         dst >>= shift;
928         SDEBUG("   dst: ");
929         atom_put_dst(ctx, arg, attr, &dptr, dst, saved);
930 }
931
932 static void atom_op_shl(atom_exec_context *ctx, int *ptr, int arg)
933 {
934         uint8_t attr = U8((*ptr)++), shift;
935         uint32_t saved, dst;
936         int dptr = *ptr;
937         uint32_t dst_align = atom_dst_to_src[(attr >> 3) & 7][(attr >> 6) & 3];
938         SDEBUG("   dst: ");
939         dst = atom_get_dst(ctx, arg, attr, ptr, &saved, 1);
940         /* op needs to full dst value */
941         dst = saved;
942         shift = atom_get_src(ctx, attr, ptr);
943         SDEBUG("   shift: %d\n", shift);
944         dst <<= shift;
945         dst &= atom_arg_mask[dst_align];
946         dst >>= atom_arg_shift[dst_align];
947         SDEBUG("   dst: ");
948         atom_put_dst(ctx, arg, attr, &dptr, dst, saved);
949 }
950
951 static void atom_op_shr(atom_exec_context *ctx, int *ptr, int arg)
952 {
953         uint8_t attr = U8((*ptr)++), shift;
954         uint32_t saved, dst;
955         int dptr = *ptr;
956         uint32_t dst_align = atom_dst_to_src[(attr >> 3) & 7][(attr >> 6) & 3];
957         SDEBUG("   dst: ");
958         dst = atom_get_dst(ctx, arg, attr, ptr, &saved, 1);
959         /* op needs to full dst value */
960         dst = saved;
961         shift = atom_get_src(ctx, attr, ptr);
962         SDEBUG("   shift: %d\n", shift);
963         dst >>= shift;
964         dst &= atom_arg_mask[dst_align];
965         dst >>= atom_arg_shift[dst_align];
966         SDEBUG("   dst: ");
967         atom_put_dst(ctx, arg, attr, &dptr, dst, saved);
968 }
969
970 static void atom_op_sub(atom_exec_context *ctx, int *ptr, int arg)
971 {
972         uint8_t attr = U8((*ptr)++);
973         uint32_t dst, src, saved;
974         int dptr = *ptr;
975         SDEBUG("   dst: ");
976         dst = atom_get_dst(ctx, arg, attr, ptr, &saved, 1);
977         SDEBUG("   src: ");
978         src = atom_get_src(ctx, attr, ptr);
979         dst -= src;
980         SDEBUG("   dst: ");
981         atom_put_dst(ctx, arg, attr, &dptr, dst, saved);
982 }
983
984 static void atom_op_switch(atom_exec_context *ctx, int *ptr, int arg)
985 {
986         uint8_t attr = U8((*ptr)++);
987         uint32_t src, val, target;
988         SDEBUG("   switch: ");
989         src = atom_get_src(ctx, attr, ptr);
990         while (U16(*ptr) != ATOM_CASE_END)
991                 if (U8(*ptr) == ATOM_CASE_MAGIC) {
992                         (*ptr)++;
993                         SDEBUG("   case: ");
994                         val =
995                             atom_get_src(ctx, (attr & 0x38) | ATOM_ARG_IMM,
996                                          ptr);
997                         target = U16(*ptr);
998                         if (val == src) {
999                                 SDEBUG("   target: %04X\n", target);
1000                                 *ptr = ctx->start + target;
1001                                 return;
1002                         }
1003                         (*ptr) += 2;
1004                 } else {
1005                         printk(KERN_INFO "Bad case.\n");
1006                         return;
1007                 }
1008         (*ptr) += 2;
1009 }
1010
1011 static void atom_op_test(atom_exec_context *ctx, int *ptr, int arg)
1012 {
1013         uint8_t attr = U8((*ptr)++);
1014         uint32_t dst, src;
1015         SDEBUG("   src1: ");
1016         dst = atom_get_dst(ctx, arg, attr, ptr, NULL, 1);
1017         SDEBUG("   src2: ");
1018         src = atom_get_src(ctx, attr, ptr);
1019         ctx->ctx->cs_equal = ((dst & src) == 0);
1020         SDEBUG("   result: %s\n", ctx->ctx->cs_equal ? "EQ" : "NE");
1021 }
1022
1023 static void atom_op_xor(atom_exec_context *ctx, int *ptr, int arg)
1024 {
1025         uint8_t attr = U8((*ptr)++);
1026         uint32_t dst, src, saved;
1027         int dptr = *ptr;
1028         SDEBUG("   dst: ");
1029         dst = atom_get_dst(ctx, arg, attr, ptr, &saved, 1);
1030         SDEBUG("   src: ");
1031         src = atom_get_src(ctx, attr, ptr);
1032         dst ^= src;
1033         SDEBUG("   dst: ");
1034         atom_put_dst(ctx, arg, attr, &dptr, dst, saved);
1035 }
1036
1037 static void atom_op_debug(atom_exec_context *ctx, int *ptr, int arg)
1038 {
1039         uint8_t val = U8((*ptr)++);
1040         SDEBUG("DEBUG output: 0x%02X\n", val);
1041 }
1042
1043 static void atom_op_processds(atom_exec_context *ctx, int *ptr, int arg)
1044 {
1045         uint16_t val = U16(*ptr);
1046         (*ptr) += val + 2;
1047         SDEBUG("PROCESSDS output: 0x%02X\n", val);
1048 }
1049
1050 static struct {
1051         void (*func) (atom_exec_context *, int *, int);
1052         int arg;
1053 } opcode_table[ATOM_OP_CNT] = {
1054         {
1055         NULL, 0}, {
1056         atom_op_move, ATOM_ARG_REG}, {
1057         atom_op_move, ATOM_ARG_PS}, {
1058         atom_op_move, ATOM_ARG_WS}, {
1059         atom_op_move, ATOM_ARG_FB}, {
1060         atom_op_move, ATOM_ARG_PLL}, {
1061         atom_op_move, ATOM_ARG_MC}, {
1062         atom_op_and, ATOM_ARG_REG}, {
1063         atom_op_and, ATOM_ARG_PS}, {
1064         atom_op_and, ATOM_ARG_WS}, {
1065         atom_op_and, ATOM_ARG_FB}, {
1066         atom_op_and, ATOM_ARG_PLL}, {
1067         atom_op_and, ATOM_ARG_MC}, {
1068         atom_op_or, ATOM_ARG_REG}, {
1069         atom_op_or, ATOM_ARG_PS}, {
1070         atom_op_or, ATOM_ARG_WS}, {
1071         atom_op_or, ATOM_ARG_FB}, {
1072         atom_op_or, ATOM_ARG_PLL}, {
1073         atom_op_or, ATOM_ARG_MC}, {
1074         atom_op_shift_left, ATOM_ARG_REG}, {
1075         atom_op_shift_left, ATOM_ARG_PS}, {
1076         atom_op_shift_left, ATOM_ARG_WS}, {
1077         atom_op_shift_left, ATOM_ARG_FB}, {
1078         atom_op_shift_left, ATOM_ARG_PLL}, {
1079         atom_op_shift_left, ATOM_ARG_MC}, {
1080         atom_op_shift_right, ATOM_ARG_REG}, {
1081         atom_op_shift_right, ATOM_ARG_PS}, {
1082         atom_op_shift_right, ATOM_ARG_WS}, {
1083         atom_op_shift_right, ATOM_ARG_FB}, {
1084         atom_op_shift_right, ATOM_ARG_PLL}, {
1085         atom_op_shift_right, ATOM_ARG_MC}, {
1086         atom_op_mul, ATOM_ARG_REG}, {
1087         atom_op_mul, ATOM_ARG_PS}, {
1088         atom_op_mul, ATOM_ARG_WS}, {
1089         atom_op_mul, ATOM_ARG_FB}, {
1090         atom_op_mul, ATOM_ARG_PLL}, {
1091         atom_op_mul, ATOM_ARG_MC}, {
1092         atom_op_div, ATOM_ARG_REG}, {
1093         atom_op_div, ATOM_ARG_PS}, {
1094         atom_op_div, ATOM_ARG_WS}, {
1095         atom_op_div, ATOM_ARG_FB}, {
1096         atom_op_div, ATOM_ARG_PLL}, {
1097         atom_op_div, ATOM_ARG_MC}, {
1098         atom_op_add, ATOM_ARG_REG}, {
1099         atom_op_add, ATOM_ARG_PS}, {
1100         atom_op_add, ATOM_ARG_WS}, {
1101         atom_op_add, ATOM_ARG_FB}, {
1102         atom_op_add, ATOM_ARG_PLL}, {
1103         atom_op_add, ATOM_ARG_MC}, {
1104         atom_op_sub, ATOM_ARG_REG}, {
1105         atom_op_sub, ATOM_ARG_PS}, {
1106         atom_op_sub, ATOM_ARG_WS}, {
1107         atom_op_sub, ATOM_ARG_FB}, {
1108         atom_op_sub, ATOM_ARG_PLL}, {
1109         atom_op_sub, ATOM_ARG_MC}, {
1110         atom_op_setport, ATOM_PORT_ATI}, {
1111         atom_op_setport, ATOM_PORT_PCI}, {
1112         atom_op_setport, ATOM_PORT_SYSIO}, {
1113         atom_op_setregblock, 0}, {
1114         atom_op_setfbbase, 0}, {
1115         atom_op_compare, ATOM_ARG_REG}, {
1116         atom_op_compare, ATOM_ARG_PS}, {
1117         atom_op_compare, ATOM_ARG_WS}, {
1118         atom_op_compare, ATOM_ARG_FB}, {
1119         atom_op_compare, ATOM_ARG_PLL}, {
1120         atom_op_compare, ATOM_ARG_MC}, {
1121         atom_op_switch, 0}, {
1122         atom_op_jump, ATOM_COND_ALWAYS}, {
1123         atom_op_jump, ATOM_COND_EQUAL}, {
1124         atom_op_jump, ATOM_COND_BELOW}, {
1125         atom_op_jump, ATOM_COND_ABOVE}, {
1126         atom_op_jump, ATOM_COND_BELOWOREQUAL}, {
1127         atom_op_jump, ATOM_COND_ABOVEOREQUAL}, {
1128         atom_op_jump, ATOM_COND_NOTEQUAL}, {
1129         atom_op_test, ATOM_ARG_REG}, {
1130         atom_op_test, ATOM_ARG_PS}, {
1131         atom_op_test, ATOM_ARG_WS}, {
1132         atom_op_test, ATOM_ARG_FB}, {
1133         atom_op_test, ATOM_ARG_PLL}, {
1134         atom_op_test, ATOM_ARG_MC}, {
1135         atom_op_delay, ATOM_UNIT_MILLISEC}, {
1136         atom_op_delay, ATOM_UNIT_MICROSEC}, {
1137         atom_op_calltable, 0}, {
1138         atom_op_repeat, 0}, {
1139         atom_op_clear, ATOM_ARG_REG}, {
1140         atom_op_clear, ATOM_ARG_PS}, {
1141         atom_op_clear, ATOM_ARG_WS}, {
1142         atom_op_clear, ATOM_ARG_FB}, {
1143         atom_op_clear, ATOM_ARG_PLL}, {
1144         atom_op_clear, ATOM_ARG_MC}, {
1145         atom_op_nop, 0}, {
1146         atom_op_eot, 0}, {
1147         atom_op_mask, ATOM_ARG_REG}, {
1148         atom_op_mask, ATOM_ARG_PS}, {
1149         atom_op_mask, ATOM_ARG_WS}, {
1150         atom_op_mask, ATOM_ARG_FB}, {
1151         atom_op_mask, ATOM_ARG_PLL}, {
1152         atom_op_mask, ATOM_ARG_MC}, {
1153         atom_op_postcard, 0}, {
1154         atom_op_beep, 0}, {
1155         atom_op_savereg, 0}, {
1156         atom_op_restorereg, 0}, {
1157         atom_op_setdatablock, 0}, {
1158         atom_op_xor, ATOM_ARG_REG}, {
1159         atom_op_xor, ATOM_ARG_PS}, {
1160         atom_op_xor, ATOM_ARG_WS}, {
1161         atom_op_xor, ATOM_ARG_FB}, {
1162         atom_op_xor, ATOM_ARG_PLL}, {
1163         atom_op_xor, ATOM_ARG_MC}, {
1164         atom_op_shl, ATOM_ARG_REG}, {
1165         atom_op_shl, ATOM_ARG_PS}, {
1166         atom_op_shl, ATOM_ARG_WS}, {
1167         atom_op_shl, ATOM_ARG_FB}, {
1168         atom_op_shl, ATOM_ARG_PLL}, {
1169         atom_op_shl, ATOM_ARG_MC}, {
1170         atom_op_shr, ATOM_ARG_REG}, {
1171         atom_op_shr, ATOM_ARG_PS}, {
1172         atom_op_shr, ATOM_ARG_WS}, {
1173         atom_op_shr, ATOM_ARG_FB}, {
1174         atom_op_shr, ATOM_ARG_PLL}, {
1175         atom_op_shr, ATOM_ARG_MC}, {
1176         atom_op_debug, 0}, {
1177         atom_op_processds, 0}, {
1178         atom_op_mul32, ATOM_ARG_PS}, {
1179         atom_op_mul32, ATOM_ARG_WS},
1180 };
1181
1182 static int amdgpu_atom_execute_table_locked(struct atom_context *ctx, int index, uint32_t * params)
1183 {
1184         int base = CU16(ctx->cmd_table + 4 + 2 * index);
1185         int len, ws, ps, ptr;
1186         unsigned char op;
1187         atom_exec_context ectx;
1188         int ret = 0;
1189
1190         if (!base)
1191                 return -EINVAL;
1192
1193         len = CU16(base + ATOM_CT_SIZE_PTR);
1194         ws = CU8(base + ATOM_CT_WS_PTR);
1195         ps = CU8(base + ATOM_CT_PS_PTR) & ATOM_CT_PS_MASK;
1196         ptr = base + ATOM_CT_CODE_PTR;
1197
1198         SDEBUG(">> execute %04X (len %d, WS %d, PS %d)\n", base, len, ws, ps);
1199
1200         ectx.ctx = ctx;
1201         ectx.ps_shift = ps / 4;
1202         ectx.start = base;
1203         ectx.ps = params;
1204         ectx.abort = false;
1205         ectx.last_jump = 0;
1206         if (ws)
1207                 ectx.ws = kzalloc(4 * ws, GFP_KERNEL);
1208         else
1209                 ectx.ws = NULL;
1210
1211         debug_depth++;
1212         while (1) {
1213                 op = CU8(ptr++);
1214                 if (op < ATOM_OP_NAMES_CNT)
1215                         SDEBUG("%s @ 0x%04X\n", atom_op_names[op], ptr - 1);
1216                 else
1217                         SDEBUG("[%d] @ 0x%04X\n", op, ptr - 1);
1218                 if (ectx.abort) {
1219                         DRM_ERROR("atombios stuck executing %04X (len %d, WS %d, PS %d) @ 0x%04X\n",
1220                                 base, len, ws, ps, ptr - 1);
1221                         ret = -EINVAL;
1222                         goto free;
1223                 }
1224
1225                 if (op < ATOM_OP_CNT && op > 0)
1226                         opcode_table[op].func(&ectx, &ptr,
1227                                               opcode_table[op].arg);
1228                 else
1229                         break;
1230
1231                 if (op == ATOM_OP_EOT)
1232                         break;
1233         }
1234         debug_depth--;
1235         SDEBUG("<<\n");
1236
1237 free:
1238         if (ws)
1239                 kfree(ectx.ws);
1240         return ret;
1241 }
1242
1243 int amdgpu_atom_execute_table(struct atom_context *ctx, int index, uint32_t * params)
1244 {
1245         int r;
1246
1247         mutex_lock(&ctx->mutex);
1248         /* reset data block */
1249         ctx->data_block = 0;
1250         /* reset reg block */
1251         ctx->reg_block = 0;
1252         /* reset fb window */
1253         ctx->fb_base = 0;
1254         /* reset io mode */
1255         ctx->io_mode = ATOM_IO_MM;
1256         /* reset divmul */
1257         ctx->divmul[0] = 0;
1258         ctx->divmul[1] = 0;
1259         r = amdgpu_atom_execute_table_locked(ctx, index, params);
1260         mutex_unlock(&ctx->mutex);
1261         return r;
1262 }
1263
1264 static int atom_iio_len[] = { 1, 2, 3, 3, 3, 3, 4, 4, 4, 3 };
1265
1266 static void atom_index_iio(struct atom_context *ctx, int base)
1267 {
1268         ctx->iio = kzalloc(2 * 256, GFP_KERNEL);
1269         if (!ctx->iio)
1270                 return;
1271         while (CU8(base) == ATOM_IIO_START) {
1272                 ctx->iio[CU8(base + 1)] = base + 2;
1273                 base += 2;
1274                 while (CU8(base) != ATOM_IIO_END)
1275                         base += atom_iio_len[CU8(base)];
1276                 base += 3;
1277         }
1278 }
1279
1280 struct atom_context *amdgpu_atom_parse(struct card_info *card, void *bios)
1281 {
1282         int base;
1283         struct atom_context *ctx =
1284             kzalloc(sizeof(struct atom_context), GFP_KERNEL);
1285         char *str;
1286         char name[512];
1287         int i;
1288
1289         if (!ctx)
1290                 return NULL;
1291
1292         ctx->card = card;
1293         ctx->bios = bios;
1294
1295         if (CU16(0) != ATOM_BIOS_MAGIC) {
1296                 printk(KERN_INFO "Invalid BIOS magic.\n");
1297                 kfree(ctx);
1298                 return NULL;
1299         }
1300         if (strncmp
1301             (CSTR(ATOM_ATI_MAGIC_PTR), ATOM_ATI_MAGIC,
1302              strlen(ATOM_ATI_MAGIC))) {
1303                 printk(KERN_INFO "Invalid ATI magic.\n");
1304                 kfree(ctx);
1305                 return NULL;
1306         }
1307
1308         base = CU16(ATOM_ROM_TABLE_PTR);
1309         if (strncmp
1310             (CSTR(base + ATOM_ROM_MAGIC_PTR), ATOM_ROM_MAGIC,
1311              strlen(ATOM_ROM_MAGIC))) {
1312                 printk(KERN_INFO "Invalid ATOM magic.\n");
1313                 kfree(ctx);
1314                 return NULL;
1315         }
1316
1317         ctx->cmd_table = CU16(base + ATOM_ROM_CMD_PTR);
1318         ctx->data_table = CU16(base + ATOM_ROM_DATA_PTR);
1319         atom_index_iio(ctx, CU16(ctx->data_table + ATOM_DATA_IIO_PTR) + 4);
1320         if (!ctx->iio) {
1321                 amdgpu_atom_destroy(ctx);
1322                 return NULL;
1323         }
1324
1325         str = CSTR(CU16(base + ATOM_ROM_MSG_PTR));
1326         while (*str && ((*str == '\n') || (*str == '\r')))
1327                 str++;
1328         /* name string isn't always 0 terminated */
1329         for (i = 0; i < 511; i++) {
1330                 name[i] = str[i];
1331                 if (name[i] < '.' || name[i] > 'z') {
1332                         name[i] = 0;
1333                         break;
1334                 }
1335         }
1336         printk(KERN_INFO "ATOM BIOS: %s\n", name);
1337
1338         return ctx;
1339 }
1340
1341 int amdgpu_atom_asic_init(struct atom_context *ctx)
1342 {
1343         int hwi = CU16(ctx->data_table + ATOM_DATA_FWI_PTR);
1344         uint32_t ps[16];
1345         int ret;
1346
1347         memset(ps, 0, 64);
1348
1349         ps[0] = cpu_to_le32(CU32(hwi + ATOM_FWI_DEFSCLK_PTR));
1350         ps[1] = cpu_to_le32(CU32(hwi + ATOM_FWI_DEFMCLK_PTR));
1351         if (!ps[0] || !ps[1])
1352                 return 1;
1353
1354         if (!CU16(ctx->cmd_table + 4 + 2 * ATOM_CMD_INIT))
1355                 return 1;
1356         ret = amdgpu_atom_execute_table(ctx, ATOM_CMD_INIT, ps);
1357         if (ret)
1358                 return ret;
1359
1360         memset(ps, 0, 64);
1361
1362         return ret;
1363 }
1364
1365 void amdgpu_atom_destroy(struct atom_context *ctx)
1366 {
1367         kfree(ctx->iio);
1368         kfree(ctx);
1369 }
1370
1371 bool amdgpu_atom_parse_data_header(struct atom_context *ctx, int index,
1372                             uint16_t * size, uint8_t * frev, uint8_t * crev,
1373                             uint16_t * data_start)
1374 {
1375         int offset = index * 2 + 4;
1376         int idx = CU16(ctx->data_table + offset);
1377         u16 *mdt = (u16 *)(ctx->bios + ctx->data_table + 4);
1378
1379         if (!mdt[index])
1380                 return false;
1381
1382         if (size)
1383                 *size = CU16(idx);
1384         if (frev)
1385                 *frev = CU8(idx + 2);
1386         if (crev)
1387                 *crev = CU8(idx + 3);
1388         *data_start = idx;
1389         return true;
1390 }
1391
1392 bool amdgpu_atom_parse_cmd_header(struct atom_context *ctx, int index, uint8_t * frev,
1393                            uint8_t * crev)
1394 {
1395         int offset = index * 2 + 4;
1396         int idx = CU16(ctx->cmd_table + offset);
1397         u16 *mct = (u16 *)(ctx->bios + ctx->cmd_table + 4);
1398
1399         if (!mct[index])
1400                 return false;
1401
1402         if (frev)
1403                 *frev = CU8(idx + 2);
1404         if (crev)
1405                 *crev = CU8(idx + 3);
1406         return true;
1407 }
1408
1409 int amdgpu_atom_allocate_fb_scratch(struct atom_context *ctx)
1410 {
1411         int index = GetIndexIntoMasterTable(DATA, VRAM_UsageByFirmware);
1412         uint16_t data_offset;
1413         int usage_bytes = 0;
1414         struct _ATOM_VRAM_USAGE_BY_FIRMWARE *firmware_usage;
1415
1416         if (amdgpu_atom_parse_data_header(ctx, index, NULL, NULL, NULL, &data_offset)) {
1417                 firmware_usage = (struct _ATOM_VRAM_USAGE_BY_FIRMWARE *)(ctx->bios + data_offset);
1418
1419                 DRM_DEBUG("atom firmware requested %08x %dkb\n",
1420                           le32_to_cpu(firmware_usage->asFirmwareVramReserveInfo[0].ulStartAddrUsedByFirmware),
1421                           le16_to_cpu(firmware_usage->asFirmwareVramReserveInfo[0].usFirmwareUseInKb));
1422
1423                 usage_bytes = le16_to_cpu(firmware_usage->asFirmwareVramReserveInfo[0].usFirmwareUseInKb) * 1024;
1424         }
1425         ctx->scratch_size_bytes = 0;
1426         if (usage_bytes == 0)
1427                 usage_bytes = 20 * 1024;
1428         /* allocate some scratch memory */
1429         ctx->scratch = kzalloc(usage_bytes, GFP_KERNEL);
1430         if (!ctx->scratch)
1431                 return -ENOMEM;
1432         ctx->scratch_size_bytes = usage_bytes;
1433         return 0;
1434 }
This page took 0.118543 seconds and 4 git commands to generate.