drivers/video/fbdev/aty/mach64_accel.c

   1 // SPDX-License-Identifier: GPL-2.0
   2
   3 /*
   4  *  ATI Mach64 Hardware Acceleration
   5  */
   6
   7 #include <linux/delay.h>
   8 #include <asm/unaligned.h>
   9 #include <linux/fb.h>
  10 #include <video/mach64.h>
  11 #include "atyfb.h"
  12
  13     /*
  14      *  Generic Mach64 routines
  15      */
  16
  17 /* this is for DMA GUI engine! work in progress */
  18 typedef struct {
  19         u32 frame_buf_offset;
  20         u32 system_mem_addr;
  21         u32 command;
  22         u32 reserved;
  23 } BM_DESCRIPTOR_ENTRY;
  24
  25 #define LAST_DESCRIPTOR (1 << 31)
  26 #define SYSTEM_TO_FRAME_BUFFER 0
  27
  28 static u32 rotation24bpp(u32 dx, u32 direction)
  29 {
  30         u32 rotation;
  31         if (direction & DST_X_LEFT_TO_RIGHT) {
  32                 rotation = (dx / 4) % 6;
  33         } else {
  34                 rotation = ((dx + 2) / 4) % 6;
  35         }
  36
  37         return ((rotation << 8) | DST_24_ROTATION_ENABLE);
  38 }
  39
  40 void aty_reset_engine(const struct atyfb_par *par)
  41 {
  42         /* reset engine */
  43         aty_st_le32(GEN_TEST_CNTL,
  44                 aty_ld_le32(GEN_TEST_CNTL, par) &
  45                 ~(GUI_ENGINE_ENABLE | HWCURSOR_ENABLE), par);
  46         /* enable engine */
  47         aty_st_le32(GEN_TEST_CNTL,
  48                 aty_ld_le32(GEN_TEST_CNTL, par) | GUI_ENGINE_ENABLE, par);
  49         /* ensure engine is not locked up by clearing any FIFO or */
  50         /* HOST errors */
  51         aty_st_le32(BUS_CNTL,
  52                 aty_ld_le32(BUS_CNTL, par) | BUS_HOST_ERR_ACK | BUS_FIFO_ERR_ACK, par);
  53 }
  54
  55 static void reset_GTC_3D_engine(const struct atyfb_par *par)
  56 {
  57         aty_st_le32(SCALE_3D_CNTL, 0xc0, par);
  58         mdelay(GTC_3D_RESET_DELAY);
  59         aty_st_le32(SETUP_CNTL, 0x00, par);
  60         mdelay(GTC_3D_RESET_DELAY);
  61         aty_st_le32(SCALE_3D_CNTL, 0x00, par);
  62         mdelay(GTC_3D_RESET_DELAY);
  63 }
  64
  65 void aty_init_engine(struct atyfb_par *par, struct fb_info *info)
  66 {
  67         u32 pitch_value;
  68         u32 vxres;
  69
  70         /* determine modal information from global mode structure */
  71         pitch_value = info->fix.line_length / (info->var.bits_per_pixel / 8);
  72         vxres = info->var.xres_virtual;
  73
  74         if (info->var.bits_per_pixel == 24) {
  75                 /* In 24 bpp, the engine is in 8 bpp - this requires that all */
  76                 /* horizontal coordinates and widths must be adjusted */
  77                 pitch_value *= 3;
  78                 vxres *= 3;
  79         }
  80
  81         /* On GTC (RagePro), we need to reset the 3D engine before */
  82         if (M64_HAS(RESET_3D))
  83                 reset_GTC_3D_engine(par);
  84
  85         /* Reset engine, enable, and clear any engine errors */
  86         aty_reset_engine(par);
  87         /* Ensure that vga page pointers are set to zero - the upper */
  88         /* page pointers are set to 1 to handle overflows in the */
  89         /* lower page */
  90         aty_st_le32(MEM_VGA_WP_SEL, 0x00010000, par);
  91         aty_st_le32(MEM_VGA_RP_SEL, 0x00010000, par);
  92
  93         /* ---- Setup standard engine context ---- */
  94
  95         /* All GUI registers here are FIFOed - therefore, wait for */
  96         /* the appropriate number of empty FIFO entries */
  97         wait_for_fifo(14, par);
  98
  99         /* enable all registers to be loaded for context loads */
 100         aty_st_le32(CONTEXT_MASK, 0xFFFFFFFF, par);
 101
 102         /* set destination pitch to modal pitch, set offset to zero */
 103         aty_st_le32(DST_OFF_PITCH, (pitch_value / 8) << 22, par);
 104
 105         /* zero these registers (set them to a known state) */
 106         aty_st_le32(DST_Y_X, 0, par);
 107         aty_st_le32(DST_HEIGHT, 0, par);
 108         aty_st_le32(DST_BRES_ERR, 0, par);
 109         aty_st_le32(DST_BRES_INC, 0, par);
 110         aty_st_le32(DST_BRES_DEC, 0, par);
 111
 112         /* set destination drawing attributes */
 113         aty_st_le32(DST_CNTL, DST_LAST_PEL | DST_Y_TOP_TO_BOTTOM |
 114                     DST_X_LEFT_TO_RIGHT, par);
 115
 116         /* set source pitch to modal pitch, set offset to zero */
 117         aty_st_le32(SRC_OFF_PITCH, (pitch_value / 8) << 22, par);
 118
 119         /* set these registers to a known state */
 120         aty_st_le32(SRC_Y_X, 0, par);
 121         aty_st_le32(SRC_HEIGHT1_WIDTH1, 1, par);
 122         aty_st_le32(SRC_Y_X_START, 0, par);
 123         aty_st_le32(SRC_HEIGHT2_WIDTH2, 1, par);
 124
 125         /* set source pixel retrieving attributes */
 126         aty_st_le32(SRC_CNTL, SRC_LINE_X_LEFT_TO_RIGHT, par);
 127
 128         /* set host attributes */
 129         wait_for_fifo(13, par);
 130         aty_st_le32(HOST_CNTL, HOST_BYTE_ALIGN, par);
 131
 132         /* set pattern attributes */
 133         aty_st_le32(PAT_REG0, 0, par);
 134         aty_st_le32(PAT_REG1, 0, par);
 135         aty_st_le32(PAT_CNTL, 0, par);
 136
 137         /* set scissors to modal size */
 138         aty_st_le32(SC_LEFT, 0, par);
 139         aty_st_le32(SC_TOP, 0, par);
 140         aty_st_le32(SC_BOTTOM, par->crtc.vyres - 1, par);
 141         aty_st_le32(SC_RIGHT, vxres - 1, par);
 142
 143         /* set background color to minimum value (usually BLACK) */
 144         aty_st_le32(DP_BKGD_CLR, 0, par);
 145
 146         /* set foreground color to maximum value (usually WHITE) */
 147         aty_st_le32(DP_FRGD_CLR, 0xFFFFFFFF, par);
 148
 149         /* set write mask to effect all pixel bits */
 150         aty_st_le32(DP_WRITE_MASK, 0xFFFFFFFF, par);
 151
 152         /* set foreground mix to overpaint and background mix to */
 153         /* no-effect */
 154         aty_st_le32(DP_MIX, FRGD_MIX_S | BKGD_MIX_D, par);
 155
 156         /* set primary source pixel channel to foreground color */
 157         /* register */
 158         aty_st_le32(DP_SRC, FRGD_SRC_FRGD_CLR, par);
 159
 160         /* set compare functionality to false (no-effect on */
 161         /* destination) */
 162         wait_for_fifo(3, par);
 163         aty_st_le32(CLR_CMP_CLR, 0, par);
 164         aty_st_le32(CLR_CMP_MASK, 0xFFFFFFFF, par);
 165         aty_st_le32(CLR_CMP_CNTL, 0, par);
 166
 167         /* set pixel depth */
 168         wait_for_fifo(2, par);
 169         aty_st_le32(DP_PIX_WIDTH, par->crtc.dp_pix_width, par);
 170         aty_st_le32(DP_CHAIN_MASK, par->crtc.dp_chain_mask, par);
 171
 172         wait_for_fifo(5, par);
 173         aty_st_le32(SCALE_3D_CNTL, 0, par);
 174         aty_st_le32(Z_CNTL, 0, par);
 175         aty_st_le32(CRTC_INT_CNTL, aty_ld_le32(CRTC_INT_CNTL, par) & ~0x20,
 176                     par);
 177         aty_st_le32(GUI_TRAJ_CNTL, 0x100023, par);
 178
 179         /* insure engine is idle before leaving */
 180         wait_for_idle(par);
 181 }
 182
 183     /*
 184      *  Accelerated functions
 185      */
 186
 187 static inline void draw_rect(s16 x, s16 y, u16 width, u16 height,
 188                              struct atyfb_par *par)
 189 {
 190         /* perform rectangle fill */
 191         wait_for_fifo(2, par);
 192         aty_st_le32(DST_Y_X, (x << 16) | y, par);
 193         aty_st_le32(DST_HEIGHT_WIDTH, (width << 16) | height, par);
 194         par->blitter_may_be_busy = 1;
 195 }
 196
 197 void atyfb_copyarea(struct fb_info *info, const struct fb_copyarea *area)
 198 {
 199         struct atyfb_par *par = (struct atyfb_par *) info->par;
 200         u32 dy = area->dy, sy = area->sy, direction = DST_LAST_PEL;
 201         u32 sx = area->sx, dx = area->dx, width = area->width, rotation = 0;
 202
 203         if (par->asleep)
 204                 return;
 205         if (!area->width || !area->height)
 206                 return;
 207         if (!par->accel_flags) {
 208                 cfb_copyarea(info, area);
 209                 return;
 210         }
 211
 212         if (info->var.bits_per_pixel == 24) {
 213                 /* In 24 bpp, the engine is in 8 bpp - this requires that all */
 214                 /* horizontal coordinates and widths must be adjusted */
 215                 sx *= 3;
 216                 dx *= 3;
 217                 width *= 3;
 218         }
 219
 220         if (area->sy < area->dy) {
 221                 dy += area->height - 1;
 222                 sy += area->height - 1;
 223         } else
 224                 direction |= DST_Y_TOP_TO_BOTTOM;
 225
 226         if (sx < dx) {
 227                 dx += width - 1;
 228                 sx += width - 1;
 229         } else
 230                 direction |= DST_X_LEFT_TO_RIGHT;
 231
 232         if (info->var.bits_per_pixel == 24) {
 233                 rotation = rotation24bpp(dx, direction);
 234         }
 235
 236         wait_for_fifo(5, par);
 237         aty_st_le32(DP_PIX_WIDTH, par->crtc.dp_pix_width, par);
 238         aty_st_le32(DP_SRC, FRGD_SRC_BLIT, par);
 239         aty_st_le32(SRC_Y_X, (sx << 16) | sy, par);
 240         aty_st_le32(SRC_HEIGHT1_WIDTH1, (width << 16) | area->height, par);
 241         aty_st_le32(DST_CNTL, direction | rotation, par);
 242         draw_rect(dx, dy, width, area->height, par);
 243 }
 244
 245 void atyfb_fillrect(struct fb_info *info, const struct fb_fillrect *rect)
 246 {
 247         struct atyfb_par *par = (struct atyfb_par *) info->par;
 248         u32 color, dx = rect->dx, width = rect->width, rotation = 0;
 249
 250         if (par->asleep)
 251                 return;
 252         if (!rect->width || !rect->height)
 253                 return;
 254         if (!par->accel_flags) {
 255                 cfb_fillrect(info, rect);
 256                 return;
 257         }
 258
 259         if (info->fix.visual == FB_VISUAL_TRUECOLOR ||
 260             info->fix.visual == FB_VISUAL_DIRECTCOLOR)
 261                 color = ((u32 *)(info->pseudo_palette))[rect->color];
 262         else
 263                 color = rect->color;
 264
 265         if (info->var.bits_per_pixel == 24) {
 266                 /* In 24 bpp, the engine is in 8 bpp - this requires that all */
 267                 /* horizontal coordinates and widths must be adjusted */
 268                 dx *= 3;
 269                 width *= 3;
 270                 rotation = rotation24bpp(dx, DST_X_LEFT_TO_RIGHT);
 271         }
 272
 273         wait_for_fifo(4, par);
 274         aty_st_le32(DP_PIX_WIDTH, par->crtc.dp_pix_width, par);
 275         aty_st_le32(DP_FRGD_CLR, color, par);
 276         aty_st_le32(DP_SRC,
 277                     BKGD_SRC_BKGD_CLR | FRGD_SRC_FRGD_CLR | MONO_SRC_ONE,
 278                     par);
 279         aty_st_le32(DST_CNTL,
 280                     DST_LAST_PEL | DST_Y_TOP_TO_BOTTOM |
 281                     DST_X_LEFT_TO_RIGHT | rotation, par);
 282         draw_rect(dx, rect->dy, width, rect->height, par);
 283 }
 284
 285 void atyfb_imageblit(struct fb_info *info, const struct fb_image *image)
 286 {
 287         struct atyfb_par *par = (struct atyfb_par *) info->par;
 288         u32 src_bytes, dx = image->dx, dy = image->dy, width = image->width;
 289         u32 pix_width, rotation = 0, src, mix;
 290
 291         if (par->asleep)
 292                 return;
 293         if (!image->width || !image->height)
 294                 return;
 295         if (!par->accel_flags ||
 296             (image->depth != 1 && info->var.bits_per_pixel != image->depth)) {
 297                 cfb_imageblit(info, image);
 298                 return;
 299         }
 300
 301         pix_width = par->crtc.dp_pix_width;
 302
 303         switch (image->depth) {
 304         case 1:
 305             pix_width &= ~(BYTE_ORDER_MASK | HOST_MASK);
 306             pix_width |= (BYTE_ORDER_MSB_TO_LSB | HOST_1BPP);
 307             break;
 308         case 4:
 309             pix_width &= ~(BYTE_ORDER_MASK | HOST_MASK);
 310             pix_width |= (BYTE_ORDER_MSB_TO_LSB | HOST_4BPP);
 311             break;
 312         case 8:
 313             pix_width &= ~HOST_MASK;
 314             pix_width |= HOST_8BPP;
 315             break;
 316         case 15:
 317             pix_width &= ~HOST_MASK;
 318             pix_width |= HOST_15BPP;
 319             break;
 320         case 16:
 321             pix_width &= ~HOST_MASK;
 322             pix_width |= HOST_16BPP;
 323             break;
 324         case 24:
 325             pix_width &= ~HOST_MASK;
 326             pix_width |= HOST_24BPP;
 327             break;
 328         case 32:
 329             pix_width &= ~HOST_MASK;
 330             pix_width |= HOST_32BPP;
 331             break;
 332         }
 333
 334         if (info->var.bits_per_pixel == 24) {
 335                 /* In 24 bpp, the engine is in 8 bpp - this requires that all */
 336                 /* horizontal coordinates and widths must be adjusted */
 337                 dx *= 3;
 338                 width *= 3;
 339
 340                 rotation = rotation24bpp(dx, DST_X_LEFT_TO_RIGHT);
 341
 342                 pix_width &= ~DST_MASK;
 343                 pix_width |= DST_8BPP;
 344
 345                 /*
 346                  * since Rage 3D IIc we have DP_HOST_TRIPLE_EN bit
 347                  * this hwaccelerated triple has an issue with not aligned data
 348                  */
 349                 if (image->depth == 1 && M64_HAS(HW_TRIPLE) && image->width % 8 == 0)
 350                         pix_width |= DP_HOST_TRIPLE_EN;
 351         }
 352
 353         if (image->depth == 1) {
 354                 u32 fg, bg;
 355                 if (info->fix.visual == FB_VISUAL_TRUECOLOR ||
 356                     info->fix.visual == FB_VISUAL_DIRECTCOLOR) {
 357                         fg = ((u32*)(info->pseudo_palette))[image->fg_color];
 358                         bg = ((u32*)(info->pseudo_palette))[image->bg_color];
 359                 } else {
 360                         fg = image->fg_color;
 361                         bg = image->bg_color;
 362                 }
 363
 364                 wait_for_fifo(2, par);
 365                 aty_st_le32(DP_BKGD_CLR, bg, par);
 366                 aty_st_le32(DP_FRGD_CLR, fg, par);
 367                 src = MONO_SRC_HOST | FRGD_SRC_FRGD_CLR | BKGD_SRC_BKGD_CLR;
 368                 mix = FRGD_MIX_S | BKGD_MIX_S;
 369         } else {
 370                 src = MONO_SRC_ONE | FRGD_SRC_HOST;
 371                 mix = FRGD_MIX_D_XOR_S | BKGD_MIX_D;
 372         }
 373
 374         wait_for_fifo(5, par);
 375         aty_st_le32(DP_PIX_WIDTH, pix_width, par);
 376         aty_st_le32(DP_MIX, mix, par);
 377         aty_st_le32(DP_SRC, src, par);
 378         aty_st_le32(HOST_CNTL, HOST_BYTE_ALIGN, par);
 379         aty_st_le32(DST_CNTL, DST_Y_TOP_TO_BOTTOM | DST_X_LEFT_TO_RIGHT | rotation, par);
 380
 381         draw_rect(dx, dy, width, image->height, par);
 382         src_bytes = (((image->width * image->depth) + 7) / 8) * image->height;
 383
 384         /* manual triple each pixel */
 385         if (image->depth == 1 && info->var.bits_per_pixel == 24 && !(pix_width & DP_HOST_TRIPLE_EN)) {
 386                 int inbit, outbit, mult24, byte_id_in_dword, width;
 387                 u8 *pbitmapin = (u8*)image->data, *pbitmapout;
 388                 u32 hostdword;
 389
 390                 for (width = image->width, inbit = 7, mult24 = 0; src_bytes; ) {
 391                         for (hostdword = 0, pbitmapout = (u8*)&hostdword, byte_id_in_dword = 0;
 392                                 byte_id_in_dword < 4 && src_bytes;
 393                                 byte_id_in_dword++, pbitmapout++) {
 394                                 for (outbit = 7; outbit >= 0; outbit--) {
 395                                         *pbitmapout |= (((*pbitmapin >> inbit) & 1) << outbit);
 396                                         mult24++;
 397                                         /* next bit */
 398                                         if (mult24 == 3) {
 399                                                 mult24 = 0;
 400                                                 inbit--;
 401                                                 width--;
 402                                         }
 403
 404                                         /* next byte */
 405                                         if (inbit < 0 || width == 0) {
 406                                                 src_bytes--;
 407                                                 pbitmapin++;
 408                                                 inbit = 7;
 409
 410                                                 if (width == 0) {
 411                                                     width = image->width;
 412                                                     outbit = 0;
 413                                                 }
 414                                         }
 415                                 }
 416                         }
 417                         wait_for_fifo(1, par);
 418                         aty_st_le32(HOST_DATA0, le32_to_cpu(hostdword), par);
 419                 }
 420         } else {
 421                 u32 *pbitmap, dwords = (src_bytes + 3) / 4;
 422                 for (pbitmap = (u32*)(image->data); dwords; dwords--, pbitmap++) {
 423                         wait_for_fifo(1, par);
 424                         aty_st_le32(HOST_DATA0, get_unaligned_le32(pbitmap), par);
 425                 }
 426         }
 427 }