drivers/video/valkyriefb.c

   1 /*
   2  *  valkyriefb.c -- frame buffer device for the PowerMac 'valkyrie' display
   3  *
   4  *  Created 8 August 1998 by
   5  *  Martin Costabel <costabel@wanadoo.fr> and Kevin Schoedel
   6  *
   7  *  Vmode-switching changes and vmode 15/17 modifications created 29 August
   8  *  1998 by Barry K. Nathan <barryn@pobox.com>.
   9  *
  10  *  Ported to m68k Macintosh by David Huggins-Daines <dhd@debian.org>
  11  *
  12  *  Derived directly from:
  13  *
  14  *   controlfb.c -- frame buffer device for the PowerMac 'control' display
  15  *   Copyright (C) 1998 Dan Jacobowitz <dan@debian.org>
  16  *
  17  *   pmc-valkyrie.c -- Console support for PowerMac "valkyrie" display adaptor.
  18  *   Copyright (C) 1997 Paul Mackerras.
  19  *
  20  *  and indirectly:
  21  *
  22  *  Frame buffer structure from:
  23  *    drivers/video/chipsfb.c -- frame buffer device for
  24  *    Chips & Technologies 65550 chip.
  25  *
  26  *    Copyright (C) 1998 Paul Mackerras
  27  *
  28  *    This file is derived from the Powermac "chips" driver:
  29  *    Copyright (C) 1997 Fabio Riccardi.
  30  *    And from the frame buffer device for Open Firmware-initialized devices:
  31  *    Copyright (C) 1997 Geert Uytterhoeven.
  32  *
  33  *  Hardware information from:
  34  *    control.c: Console support for PowerMac "control" display adaptor.
  35  *    Copyright (C) 1996 Paul Mackerras
  36  *
  37  *  This file is subject to the terms and conditions of the GNU General Public
  38  *  License. See the file COPYING in the main directory of this archive for
  39  *  more details.
  40  */
  41
  42 #include <linux/config.h>
  43 #include <linux/module.h>
  44 #include <linux/kernel.h>
  45 #include <linux/errno.h>
  46 #include <linux/string.h>
  47 #include <linux/mm.h>
  48 #include <linux/tty.h>
  49 #include <linux/slab.h>
  50 #include <linux/vmalloc.h>
  51 #include <linux/delay.h>
  52 #include <linux/interrupt.h>
  53 #include <linux/fb.h>
  54 #include <linux/selection.h>
  55 #include <linux/init.h>
  56 #include <linux/pci.h>
  57 #include <linux/nvram.h>
  58 #include <linux/adb.h>
  59 #include <linux/cuda.h>
  60 #include <asm/io.h>
  61 #ifdef CONFIG_MAC
  62 #include <asm/bootinfo.h>
  63 #include <asm/macintosh.h>
  64 #else
  65 #include <asm/prom.h>
  66 #endif
  67 #include <asm/pgtable.h>
  68
  69 #include "macmodes.h"
  70 #include "valkyriefb.h"
  71
  72 #ifdef CONFIG_MAC
  73 /* We don't yet have functions to read the PRAM... perhaps we can
  74    adapt them from the PPC code? */
  75 static int default_vmode = VMODE_640_480_67;
  76 static int default_cmode = CMODE_8;
  77 #else
  78 static int default_vmode = VMODE_NVRAM;
  79 static int default_cmode = CMODE_NVRAM;
  80 #endif
  81
  82 struct fb_par_valkyrie {
  83         int     vmode, cmode;
  84         int     xres, yres;
  85         int     vxres, vyres;
  86         struct valkyrie_regvals *init;
  87 };
  88
  89 struct fb_info_valkyrie {
  90         struct fb_info          info;
  91         struct fb_par_valkyrie  par;
  92         struct cmap_regs        *cmap_regs;
  93         unsigned long           cmap_regs_phys;
  94
  95         struct valkyrie_regs    *valkyrie_regs;
  96         unsigned long           valkyrie_regs_phys;
  97
  98         __u8                    *frame_buffer;
  99         unsigned long           frame_buffer_phys;
 100
 101         int                     sense;
 102         unsigned long           total_vram;
 103
 104         u32                     pseudo_palette[16];
 105 };
 106
 107 /*
 108  * Exported functions
 109  */
 110 int valkyriefb_init(void);
 111 int valkyriefb_setup(char*);
 112
 113 static int valkyriefb_check_var(struct fb_var_screeninfo *var,
 114                                 struct fb_info *info);
 115 static int valkyriefb_set_par(struct fb_info *info);
 116 static int valkyriefb_setcolreg(u_int regno, u_int red, u_int green, u_int blue,
 117                              u_int transp, struct fb_info *info);
 118 static int valkyriefb_blank(int blank_mode, struct fb_info *info);
 119
 120 static int read_valkyrie_sense(struct fb_info_valkyrie *p);
 121 static void set_valkyrie_clock(unsigned char *params);
 122 static int valkyrie_var_to_par(struct fb_var_screeninfo *var,
 123         struct fb_par_valkyrie *par, const struct fb_info *fb_info);
 124
 125 static void valkyrie_init_info(struct fb_info *info, struct fb_info_valkyrie *p);
 126 static void valkyrie_par_to_fix(struct fb_par_valkyrie *par, struct fb_fix_screeninfo *fix);
 127 static void valkyrie_init_fix(struct fb_fix_screeninfo *fix, struct fb_info_valkyrie *p);
 128
 129 static struct fb_ops valkyriefb_ops = {
 130         .owner =        THIS_MODULE,
 131         .fb_check_var = valkyriefb_check_var,
 132         .fb_set_par =   valkyriefb_set_par,
 133         .fb_setcolreg = valkyriefb_setcolreg,
 134         .fb_blank =     valkyriefb_blank,
 135         .fb_fillrect    = cfb_fillrect,
 136         .fb_copyarea    = cfb_copyarea,
 137         .fb_imageblit   = cfb_imageblit,
 138         .fb_cursor      = soft_cursor,
 139 };
 140
 141 /* Sets the video mode according to info->var */
 142 static int valkyriefb_set_par(struct fb_info *info)
 143 {
 144         struct fb_info_valkyrie *p = (struct fb_info_valkyrie *) info;
 145         volatile struct valkyrie_regs *valkyrie_regs = p->valkyrie_regs;
 146         struct fb_par_valkyrie *par = info->par;
 147         struct valkyrie_regvals *init;
 148         int err;
 149
 150         if ((err = valkyrie_var_to_par(&info->var, par, info)))
 151                 return err;
 152
 153         valkyrie_par_to_fix(par, &info->fix);
 154
 155         /* Reset the valkyrie */
 156         out_8(&valkyrie_regs->status.r, 0);
 157         udelay(100);
 158
 159         /* Initialize display timing registers */
 160         init = par->init;
 161         out_8(&valkyrie_regs->mode.r, init->mode | 0x80);
 162         out_8(&valkyrie_regs->depth.r, par->cmode + 3);
 163         set_valkyrie_clock(init->clock_params);
 164         udelay(100);
 165
 166         /* Turn on display */
 167         out_8(&valkyrie_regs->mode.r, init->mode);
 168
 169         return 0;
 170 }
 171
 172 static inline int valkyrie_par_to_var(struct fb_par_valkyrie *par,
 173                                       struct fb_var_screeninfo *var)
 174 {
 175         return mac_vmode_to_var(par->vmode, par->cmode, var);
 176 }
 177
 178 static int
 179 valkyriefb_check_var(struct fb_var_screeninfo *var, struct fb_info *info)
 180 {
 181         int err;
 182         struct fb_par_valkyrie par;
 183
 184         if ((err = valkyrie_var_to_par(var, &par, info)))
 185                 return err;
 186         valkyrie_par_to_var(&par, var);
 187         return 0;
 188 }
 189
 190 /*
 191  *  Blank the screen if blank_mode != 0, else unblank. If blank_mode == NULL
 192  *  then the caller blanks by setting the CLUT (Color Look Up Table) to all
 193  *  black. Return 0 if blanking succeeded, != 0 if un-/blanking failed due
 194  *  to e.g. a video mode which doesn't support it. Implements VESA suspend
 195  *  and powerdown modes on hardware that supports disabling hsync/vsync:
 196  *    blank_mode == 2: suspend vsync
 197  *    blank_mode == 3: suspend hsync
 198  *    blank_mode == 4: powerdown
 199  */
 200 static int valkyriefb_blank(int blank_mode, struct fb_info *info)
 201 {
 202         struct fb_info_valkyrie *p = (struct fb_info_valkyrie *) info;
 203         struct fb_par_valkyrie *par = info->par;
 204         struct valkyrie_regvals *init = par->init;
 205
 206         if (init == NULL)
 207                 return 1;
 208
 209         switch (blank_mode) {
 210         case 0:                 /* unblank */
 211                 out_8(&p->valkyrie_regs->mode.r, init->mode);
 212                 break;
 213         case 1:
 214                 return 1;       /* get caller to set CLUT to all black */
 215         case VESA_VSYNC_SUSPEND+1:
 216         case VESA_HSYNC_SUSPEND+1:
 217                 /*
 218                  * [kps] Value extracted from MacOS. I don't know
 219                  * whether this bit disables hsync or vsync, or
 220                  * whether the hardware can do the other as well.
 221                  */
 222                 out_8(&p->valkyrie_regs->mode.r, init->mode | 0x40);
 223                 break;
 224         case VESA_POWERDOWN+1:
 225                 out_8(&p->valkyrie_regs->mode.r, 0x66);
 226                 break;
 227         }
 228         return 0;
 229 }
 230
 231 static int valkyriefb_setcolreg(u_int regno, u_int red, u_int green, u_int blue,
 232                              u_int transp, struct fb_info *info)
 233 {
 234         struct fb_info_valkyrie *p = (struct fb_info_valkyrie *) info;
 235         volatile struct cmap_regs *cmap_regs = p->cmap_regs;
 236         struct fb_par_valkyrie *par = info->par;
 237
 238         if (regno > 255)
 239                 return 1;
 240         red >>= 8;
 241         green >>= 8;
 242         blue >>= 8;
 243
 244         /* tell clut which address to fill */
 245         out_8(&p->cmap_regs->addr, regno);
 246         udelay(1);
 247         /* send one color channel at a time */
 248         out_8(&cmap_regs->lut, red);
 249         out_8(&cmap_regs->lut, green);
 250         out_8(&cmap_regs->lut, blue);
 251
 252         if (regno < 16 && par->cmode == CMODE_16)
 253                 ((u32 *)info->pseudo_palette)[regno] =
 254                         (regno << 10) | (regno << 5) | regno;
 255
 256         return 0;
 257 }
 258
 259 static inline int valkyrie_vram_reqd(int video_mode, int color_mode)
 260 {
 261         int pitch;
 262         struct valkyrie_regvals *init = valkyrie_reg_init[video_mode-1];
 263
 264         if ((pitch = init->pitch[color_mode]) == 0)
 265                 pitch = 2 * init->pitch[0];
 266         return init->vres * pitch;
 267 }
 268
 269 static void set_valkyrie_clock(unsigned char *params)
 270 {
 271         struct adb_request req;
 272         int i;
 273
 274 #ifdef CONFIG_ADB_CUDA
 275         for (i = 0; i < 3; ++i) {
 276                 cuda_request(&req, NULL, 5, CUDA_PACKET, CUDA_GET_SET_IIC,
 277                              0x50, i + 1, params[i]);
 278                 while (!req.complete)
 279                         cuda_poll();
 280         }
 281 #endif
 282 }
 283
 284 static void __init valkyrie_choose_mode(struct fb_info_valkyrie *p)
 285 {
 286         p->sense = read_valkyrie_sense(p);
 287         printk(KERN_INFO "Monitor sense value = 0x%x\n", p->sense);
 288
 289         /* Try to pick a video mode out of NVRAM if we have one. */
 290 #ifndef CONFIG_MAC
 291         if (default_vmode == VMODE_NVRAM) {
 292                 default_vmode = nvram_read_byte(NV_VMODE);
 293                 if (default_vmode <= 0
 294                  || default_vmode > VMODE_MAX
 295                  || !valkyrie_reg_init[default_vmode - 1])
 296                         default_vmode = VMODE_CHOOSE;
 297         }
 298 #endif
 299         if (default_vmode == VMODE_CHOOSE)
 300                 default_vmode = mac_map_monitor_sense(p->sense);
 301         if (!valkyrie_reg_init[default_vmode - 1])
 302                 default_vmode = VMODE_640_480_67;
 303 #ifndef CONFIG_MAC
 304         if (default_cmode == CMODE_NVRAM)
 305                 default_cmode = nvram_read_byte(NV_CMODE);
 306 #endif
 307
 308         /*
 309          * Reduce the pixel size if we don't have enough VRAM or bandwidth.
 310          */
 311         if (default_cmode < CMODE_8 || default_cmode > CMODE_16
 312             || valkyrie_reg_init[default_vmode-1]->pitch[default_cmode] == 0
 313             || valkyrie_vram_reqd(default_vmode, default_cmode) > p->total_vram)
 314                 default_cmode = CMODE_8;
 315
 316         printk(KERN_INFO "using video mode %d and color mode %d.\n",
 317                default_vmode, default_cmode);
 318 }
 319
 320 int __init valkyriefb_init(void)
 321 {
 322         struct fb_info_valkyrie *p;
 323         unsigned long frame_buffer_phys, cmap_regs_phys, flags;
 324         int err;
 325
 326 #ifdef CONFIG_MAC
 327         if (!MACH_IS_MAC)
 328                 return 0;
 329         if (!(mac_bi_data.id == MAC_MODEL_Q630
 330               /* I'm not sure about this one */
 331             || mac_bi_data.id == MAC_MODEL_P588))
 332                 return 0;
 333
 334         /* Hardcoded addresses... welcome to 68k Macintosh country :-) */
 335         frame_buffer_phys = 0xf9000000;
 336         cmap_regs_phys = 0x50f24000;
 337         flags = IOMAP_NOCACHE_SER; /* IOMAP_WRITETHROUGH?? */
 338 #else /* ppc (!CONFIG_MAC) */
 339         struct device_node *dp;
 340
 341         dp = find_devices("valkyrie");
 342         if (dp == 0)
 343                 return 0;
 344
 345         if (dp->n_addrs != 1) {
 346                 printk(KERN_ERR "expecting 1 address for valkyrie (got %d)\n",
 347                        dp->n_addrs);
 348                 return 0;
 349         }
 350
 351         frame_buffer_phys = dp->addrs[0].address;
 352         cmap_regs_phys = dp->addrs[0].address+0x304000;
 353         flags = _PAGE_WRITETHRU;
 354 #endif /* ppc (!CONFIG_MAC) */
 355
 356         p = kmalloc(sizeof(*p), GFP_ATOMIC);
 357         if (p == 0)
 358                 return -ENOMEM;
 359         memset(p, 0, sizeof(*p));
 360
 361         /* Map in frame buffer and registers */
 362         if (!request_mem_region(frame_buffer_phys, 0x100000, "valkyriefb")) {
 363                 kfree(p);
 364                 return 0;
 365         }
 366         p->total_vram = 0x100000;
 367         p->frame_buffer_phys = frame_buffer_phys;
 368         p->frame_buffer = __ioremap(frame_buffer_phys, p->total_vram, flags);
 369         p->cmap_regs_phys = cmap_regs_phys;
 370         p->cmap_regs = ioremap(p->cmap_regs_phys, 0x1000);
 371         p->valkyrie_regs_phys = cmap_regs_phys+0x6000;
 372         p->valkyrie_regs = ioremap(p->valkyrie_regs_phys, 0x1000);
 373         err = -ENOMEM;
 374         if (p->frame_buffer == NULL || p->cmap_regs == NULL
 375             || p->valkyrie_regs == NULL) {
 376                 printk(KERN_ERR "valkyriefb: couldn't map resources\n");
 377                 goto out_free;
 378         }
 379
 380         valkyrie_choose_mode(p);
 381         mac_vmode_to_var(default_vmode, default_cmode, &p->info.var);
 382         valkyrie_init_info(&p->info, p);
 383         valkyrie_init_fix(&p->info.fix, p);
 384         if (valkyriefb_set_par(&p->info))
 385                 /* "can't happen" */
 386                 printk(KERN_ERR "valkyriefb: can't set default video mode\n");
 387
 388         if ((err = register_framebuffer(&p->info)) != 0)
 389                 goto out_free;
 390
 391         printk(KERN_INFO "fb%d: valkyrie frame buffer device\n", p->info.node);
 392         return 0;
 393
 394  out_free:
 395         if (p->frame_buffer)
 396                 iounmap(p->frame_buffer);
 397         if (p->cmap_regs)
 398                 iounmap(p->cmap_regs);
 399         if (p->valkyrie_regs)
 400                 iounmap(p->valkyrie_regs);
 401         kfree(p);
 402         return err;
 403 }
 404
 405 /*
 406  * Get the monitor sense value.
 407  */
 408 static int read_valkyrie_sense(struct fb_info_valkyrie *p)
 409 {
 410         int sense, in;
 411
 412         out_8(&p->valkyrie_regs->msense.r, 0);   /* release all lines */
 413         __delay(20000);
 414         sense = ((in = in_8(&p->valkyrie_regs->msense.r)) & 0x70) << 4;
 415         /* drive each sense line low in turn and collect the other 2 */
 416         out_8(&p->valkyrie_regs->msense.r, 4);   /* drive A low */
 417         __delay(20000);
 418         sense |= ((in = in_8(&p->valkyrie_regs->msense.r)) & 0x30);
 419         out_8(&p->valkyrie_regs->msense.r, 2);   /* drive B low */
 420         __delay(20000);
 421         sense |= ((in = in_8(&p->valkyrie_regs->msense.r)) & 0x40) >> 3;
 422         sense |= (in & 0x10) >> 2;
 423         out_8(&p->valkyrie_regs->msense.r, 1);   /* drive C low */
 424         __delay(20000);
 425         sense |= ((in = in_8(&p->valkyrie_regs->msense.r)) & 0x60) >> 5;
 426
 427         out_8(&p->valkyrie_regs->msense.r, 7);
 428
 429         return sense;
 430 }
 431
 432 /*
 433  * This routine takes a user-supplied var,
 434  * and picks the best vmode/cmode from it.
 435  */
 436
 437 /* [bkn] I did a major overhaul of this function.
 438  *
 439  * Much of the old code was "swiped by jonh from atyfb.c". Because
 440  * macmodes has mac_var_to_vmode, I felt that it would be better to
 441  * rework this function to use that, instead of reinventing the wheel to
 442  * add support for vmode 17. This was reinforced by the fact that
 443  * the previously swiped atyfb.c code is no longer there.
 444  *
 445  * So, I swiped and adapted platinum_var_to_par (from platinumfb.c), replacing
 446  * most, but not all, of the old code in the process. One side benefit of
 447  * swiping the platinumfb code is that we now have more comprehensible error
 448  * messages when a vmode/cmode switch fails. (Most of the error messages are
 449  * platinumfb.c, but I added two of my own, and I also changed some commas
 450  * into colons to make the messages more consistent with other Linux error
 451  * messages.) In addition, I think the new code *might* fix some vmode-
 452  * switching oddities, but I'm not sure.
 453  *
 454  * There may be some more opportunities for cleanup in here, but this is a
 455  * good start...
 456  */
 457
 458 static int valkyrie_var_to_par(struct fb_var_screeninfo *var,
 459         struct fb_par_valkyrie *par, const struct fb_info *fb_info)
 460 {
 461         int vmode, cmode;
 462         struct valkyrie_regvals *init;
 463         struct fb_info_valkyrie *p = (struct fb_info_valkyrie *) fb_info;
 464
 465         if (mac_var_to_vmode(var, &vmode, &cmode) != 0) {
 466                 printk(KERN_ERR "valkyriefb: can't do %dx%dx%d.\n",
 467                        var->xres, var->yres, var->bits_per_pixel);
 468                 return -EINVAL;
 469         }
 470
 471         /* Check if we know about the wanted video mode */
 472         if (vmode < 1 || vmode > VMODE_MAX || !valkyrie_reg_init[vmode-1]) {
 473                 printk(KERN_ERR "valkyriefb: vmode %d not valid.\n", vmode);
 474                 return -EINVAL;
 475         }
 476
 477         if (cmode != CMODE_8 && cmode != CMODE_16) {
 478                 printk(KERN_ERR "valkyriefb: cmode %d not valid.\n", cmode);
 479                 return -EINVAL;
 480         }
 481
 482         if (var->xres_virtual > var->xres || var->yres_virtual > var->yres
 483             || var->xoffset != 0 || var->yoffset != 0) {
 484                 return -EINVAL;
 485         }
 486
 487         init = valkyrie_reg_init[vmode-1];
 488         if (init->pitch[cmode] == 0) {
 489                 printk(KERN_ERR "valkyriefb: vmode %d does not support "
 490                        "cmode %d.\n", vmode, cmode);
 491                 return -EINVAL;
 492         }
 493
 494         if (valkyrie_vram_reqd(vmode, cmode) > p->total_vram) {
 495                 printk(KERN_ERR "valkyriefb: not enough ram for vmode %d, "
 496                        "cmode %d.\n", vmode, cmode);
 497                 return -EINVAL;
 498         }
 499
 500         par->vmode = vmode;
 501         par->cmode = cmode;
 502         par->init = init;
 503         par->xres = var->xres;
 504         par->yres = var->yres;
 505         par->vxres = par->xres;
 506         par->vyres = par->yres;
 507
 508         return 0;
 509 }
 510
 511 static void valkyrie_init_fix(struct fb_fix_screeninfo *fix, struct fb_info_valkyrie *p)
 512 {
 513         memset(fix, 0, sizeof(*fix));
 514         strcpy(fix->id, "valkyrie");
 515         fix->mmio_start = p->valkyrie_regs_phys;
 516         fix->mmio_len = sizeof(struct valkyrie_regs);
 517         fix->type = FB_TYPE_PACKED_PIXELS;
 518         fix->smem_start = p->frame_buffer_phys + 0x1000;
 519         fix->smem_len = p->total_vram;
 520
 521         fix->type_aux = 0;
 522         fix->ywrapstep = 0;
 523         fix->ypanstep = 0;
 524         fix->xpanstep = 0;
 525
 526 }
 527
 528 /* Fix must already be inited above */
 529 static void valkyrie_par_to_fix(struct fb_par_valkyrie *par,
 530         struct fb_fix_screeninfo *fix)
 531 {
 532         fix->smem_len = valkyrie_vram_reqd(par->vmode, par->cmode);
 533         fix->visual = (par->cmode == CMODE_8) ?
 534                 FB_VISUAL_PSEUDOCOLOR : FB_VISUAL_DIRECTCOLOR;
 535         fix->line_length = par->vxres << par->cmode;
 536                 /* ywrapstep, xpanstep, ypanstep */
 537 }
 538
 539 static void __init valkyrie_init_info(struct fb_info *info, struct fb_info_valkyrie *p)
 540 {
 541         info->fbops = &valkyriefb_ops;
 542         info->screen_base = (char *) p->frame_buffer + 0x1000;
 543         info->flags = FBINFO_FLAG_DEFAULT;
 544         info->pseudo_palette = p->pseudo_palette;
 545         fb_alloc_cmap(&info->cmap, 256, 0);
 546         info->par = &p->par;
 547 }
 548
 549
 550 /*
 551  * Parse user speficied options (`video=valkyriefb:')
 552  */
 553 int __init valkyriefb_setup(char *options)
 554 {
 555         char *this_opt;
 556
 557         if (!options || !*options)
 558                 return 0;
 559
 560         while ((this_opt = strsep(&options, ",")) != NULL) {
 561                 if (!strncmp(this_opt, "vmode:", 6)) {
 562                         int vmode = simple_strtoul(this_opt+6, NULL, 0);
 563                         if (vmode > 0 && vmode <= VMODE_MAX)
 564                                 default_vmode = vmode;
 565                 }
 566                 else if (!strncmp(this_opt, "cmode:", 6)) {
 567                         int depth = simple_strtoul(this_opt+6, NULL, 0);
 568                         switch (depth) {
 569                         case 8:
 570                                 default_cmode = CMODE_8;
 571                                 break;
 572                         case 15:
 573                         case 16:
 574                                 default_cmode = CMODE_16;
 575                                 break;
 576                         }
 577                 }
 578         }
 579         return 0;
 580 }
 581
 582 MODULE_LICENSE("GPL");