root/dev/sbus/agten.c

DEFINITIONS

1. agtenmatch
2. agtenattach
3. agten_ioctl
4. agten_mmap
5. agten_setcolor
6. agten_alloc_screen
7. agten_free_screen
8. agten_show_screen
9. agten_getcmap
10. agten_putcmap
11. ibm561_write
12. agten_loadcmap

    1 /*      $OpenBSD: agten.c,v 1.7 2006/12/17 22:18:16 miod Exp $  */
    2 /*
    3  * Copyright (c) 2002, 2003, Miodrag Vallat.
    4  * All rights reserved.
    5  *
    6  * Redistribution and use in source and binary forms, with or without
    7  * modification, are permitted provided that the following conditions
    8  * are met:
    9  * 1. Redistributions of source code must retain the above copyright
   10  *    notice, this list of conditions and the following disclaimer.
   11  * 2. Redistributions in binary form must reproduce the above copyright
   12  *    notice, this list of conditions and the following disclaimer in the
   13  *    documentation and/or other materials provided with the distribution.
   14  *
   15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
   16  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
   17  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
   18  * DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
   19  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
   20  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
   21  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
   22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
   23  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
   24  * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
   25  * POSSIBILITY OF SUCH DAMAGE.
   26  *
   27  */
   29 /*
   30  * Fujitsu AG-10 framebuffer driver.
   31  *
   32  * The AG-10 is mostly made of:
   33  * - a 3DLabs 300SX Glint chip, with two 6MB independent framebuffer spaces
   34  * - a Number Nine Imagine 128 chip with its own 4MB framebuffer space
   35  * - a Weitek P9100 with its own 2MB of framebuffer memory
   36  * - an IBM PaletteDAC 561 ramdac
   37  * - an Analog Devices ADSP-21062
   38  *
   39  * All of these chips (memory, registers, etc) are mapped in the SBus
   40  * memory space associated to the board. What is unexpected, however, is
   41  * that there are also PCI registers mappings for the first three chips!
   42  *
   43  * The three graphics chips act as overlays of each other, for the final
   44  * video output.
   45  *
   46  * The PROM initialization will use the I128 framebuffer memory for output,
   47  * which is ``above'' the P9100. The P9100 seems to only be there to provide
   48  * a simple RAMDAC interface, but its frame buffer memory is accessible and
   49  * will appear as an ``underlay'' plane.
   50  */
   52 /*
   53  * TODO
   54  * - initialize the I128 in 32bit mode
   55  * - use the i128 acceleration features
   56  */
   58 #include <sys/param.h>
   59 #include <sys/systm.h>
   60 #include <sys/buf.h>
   61 #include <sys/device.h>
   62 #include <sys/ioctl.h>
   63 #include <sys/malloc.h>
   64 #include <sys/mman.h>
   65 #include <sys/tty.h>
   66 #include <sys/conf.h>
   68 #include <uvm/uvm_extern.h>
   70 #include <machine/autoconf.h>
   71 #include <machine/pmap.h>
   72 #include <machine/cpu.h>
   73 #include <machine/conf.h>
   75 #include <dev/wscons/wsconsio.h>
   76 #include <dev/wscons/wsdisplayvar.h>
   77 #include <dev/rasops/rasops.h>
   78 #include <machine/fbvar.h>
   80 #include <dev/ic/p9000.h>
   81 #include <dev/ic/ibm561reg.h>
   83 #include <dev/sbus/sbusvar.h>
   85 struct agten_cmap {
u_int8_t        cm_red[256];
u_int8_t        cm_green[256];
u_int8_t        cm_blue[256];
   89 };
   91 /* per-display variables */
   92 struct agten_softc {
   93         struct  sunfb sc_sunfb;                 /* common base part */
bus_space_tag_t sc_bustag;
bus_addr_t      sc_paddr;
off_t           sc_physoffset;          /* offset for frame buffer */
   99         volatile u_int8_t *sc_p9100;
  100         struct agten_cmap sc_cmap;              /* shadow color map */
  102         volatile u_int32_t *sc_i128_fb;
  104         int     sc_nscreens;
  105 };
  107 int agten_ioctl(void *, u_long, caddr_t, int, struct proc *);
  108 int agten_alloc_screen(void *, const struct wsscreen_descr *, void **,
  109     int *, int *, long *);
  110 void agten_free_screen(void *, void *);
  111 int agten_show_screen(void *, void *, int, void (*cb)(void *, int, int),
  112     void *);
paddr_t agten_mmap(void *, off_t, int);
  114 void agten_reset(struct agten_softc *);
  115 void agten_setcolor(void *, u_int, u_int8_t, u_int8_t, u_int8_t);
  117 static __inline__ void ibm561_write(struct agten_softc *, u_int32_t, u_int32_t);
  118 int agten_getcmap(struct agten_cmap *, struct wsdisplay_cmap *);
  119 int agten_putcmap(struct agten_cmap *, struct wsdisplay_cmap *);
  120 void agten_loadcmap(struct agten_softc *, u_int, u_int);
  122 struct wsdisplay_accessops agten_accessops = {
agten_ioctl,
agten_mmap,
agten_alloc_screen,
agten_free_screen,
agten_show_screen,
NULL,   /* load_font */
NULL,   /* scrollback */
NULL,   /* getchar */
NULL,   /* burner */
  132 };
  134 int agtenmatch(struct device *, void *, void *);
  135 void agtenattach(struct device *, struct device *, void *);
  137 struct cfattach agten_ca = {
  138         sizeof(struct agten_softc), agtenmatch, agtenattach
  139 };
  141 struct cfdriver agten_cd = {
NULL, "agten", DV_DULL
  143 };
  145 int
agtenmatch(struct device *parent, void *vcf, void *aux)
  147 {
  148         struct sbus_attach_args *sa = aux;
  150         if (strcmp(sa->sa_name, "PFU,aga") != 0)
  151                 return (0);
  153         return (1);
  154 }
  156 void
agtenattach(struct device *parent, struct device *self, void *args)
  158 {
  159         struct agten_softc *sc = (struct agten_softc *)self;
  160         struct sbus_attach_args *sa = args;
bus_space_tag_t bt;
bus_space_handle_t bh;
  163         int node, isconsole;
  164         char *nam;
bt = sa->sa_bustag;
node = sa->sa_node;
nam = getpropstring(node, "model");
printf(": model %s", nam);
isconsole = node == fbnode;
  173         /*
  174          * Map the various beasts of this card we are interested in.
  175          */
sc->sc_bustag = bt;
sc->sc_paddr = sbus_bus_addr(bt, sa->sa_slot, sa->sa_offset);
sc->sc_physoffset =
  181             (off_t)getpropint(node, "i128_fb_physaddr", 0x8000000);
  183         if (sbus_bus_map(bt, sa->sa_slot, sa->sa_offset + sc->sc_physoffset,
getpropint(node, "i128_fb_size", 0x400000), BUS_SPACE_MAP_LINEAR,
  185             0, &bh) != 0) {
printf("\n%s: couldn't map video memory\n", self->dv_xname);
  187                 return;
  188         }
sc->sc_i128_fb = bus_space_vaddr(bt, bh);
  190         if (sbus_bus_map(bt, sa->sa_slot, sa->sa_offset +
getpropint(node, "p9100_reg_physaddr", 0x10a0000), 0x4000,
BUS_SPACE_MAP_LINEAR, 0, &bh) != 0) {
printf("\n%s: couldn't map control registers\n", self->dv_xname);
  194                 return;
  195         }
sc->sc_p9100 = bus_space_vaddr(bt, bh);
  198         /*
  199          * For some reason the agten does not use the canonical name for
  200          * properties, but uses an ffb_ prefix; and the linebytes property is
  201          * missing.
  202          * The following is a specific version of
  203          *   fb_setsize(&sc->sc_sunfb, 8, 1152, 900, node, BUS_SBUS);
  204          * using the correct property names.
  205          */
  206 #ifdef notyet
sc->sc_sunfb.sf_depth = 32;
  208 #else
sc->sc_sunfb.sf_depth = getpropint(node, "ffb_depth", 8);
  210 #endif
sc->sc_sunfb.sf_width = getpropint(node, "ffb_width", 1152);
sc->sc_sunfb.sf_height = getpropint(node, "ffb_height", 900);
sc->sc_sunfb.sf_linebytes =
roundup(sc->sc_sunfb.sf_width, sc->sc_sunfb.sf_depth) *
sc->sc_sunfb.sf_depth / 8;
sc->sc_sunfb.sf_fbsize =
sc->sc_sunfb.sf_height * sc->sc_sunfb.sf_linebytes;
printf(", %dx%d, depth %d\n",
sc->sc_sunfb.sf_width, sc->sc_sunfb.sf_height,
sc->sc_sunfb.sf_depth);
sc->sc_sunfb.sf_ro.ri_bits = (void *)sc->sc_i128_fb;
sc->sc_sunfb.sf_ro.ri_hw = sc;
fbwscons_init(&sc->sc_sunfb, isconsole ? 0 : RI_CLEAR);
fbwscons_setcolormap(&sc->sc_sunfb, agten_setcolor);
  229         if (isconsole) {
fbwscons_console_init(&sc->sc_sunfb, -1);
  231         }
fbwscons_attach(&sc->sc_sunfb, &agten_accessops, isconsole);
  234 }
  236 int
agten_ioctl(dev, cmd, data, flags, p)
  238         void *dev;
u_long cmd;
caddr_t data;
  241         int flags;
  242         struct proc *p;
  243 {
  244         struct agten_softc *sc = dev;
  245         struct wsdisplay_cmap *cm;
  246         struct wsdisplay_fbinfo *wdf;
  247         int error;
  249         switch (cmd) {
  250         case WSDISPLAYIO_GTYPE:
  251                 *(u_int *)data = WSDISPLAY_TYPE_SUN24;
  252                 break;
  253         case WSDISPLAYIO_GINFO:
wdf = (struct wsdisplay_fbinfo *)data;
wdf->height = sc->sc_sunfb.sf_height;
wdf->width = sc->sc_sunfb.sf_width;
wdf->depth = sc->sc_sunfb.sf_depth;
wdf->cmsize = (sc->sc_sunfb.sf_depth == 8) ? 256 : 0;
  259                 break;
  260         case WSDISPLAYIO_LINEBYTES:
  261                 *(u_int *)data = sc->sc_sunfb.sf_linebytes;
  262                 break;
  264         case WSDISPLAYIO_GETCMAP:
  265                 if (sc->sc_sunfb.sf_depth == 8) {
cm = (struct wsdisplay_cmap *)data;
error = agten_getcmap(&sc->sc_cmap, cm);
  268                         if (error)
  269                                 return (error);
  270                 }
  271                 break;
  272         case WSDISPLAYIO_PUTCMAP:
  273                 if (sc->sc_sunfb.sf_depth == 8) {
cm = (struct wsdisplay_cmap *)data;
error = agten_putcmap(&sc->sc_cmap, cm);
  276                         if (error)
  277                                 return (error);
agten_loadcmap(sc, 0, 256);
  279                 }
  280                 break;
  282         case WSDISPLAYIO_SVIDEO:
  283         case WSDISPLAYIO_GVIDEO:
  284                 break;
  286         case WSDISPLAYIO_GCURPOS:
  287         case WSDISPLAYIO_SCURPOS:
  288         case WSDISPLAYIO_GCURMAX:
  289         case WSDISPLAYIO_GCURSOR:
  290         case WSDISPLAYIO_SCURSOR:
  291         default:
  292                 return (-1);    /* not supported yet */
  293         }
  295         return (0);
  296 }
  298 /*
  299  * Return the address that would map the given device at the given
  300  * offset, allowing for the given protection, or return -1 for error.
  301  */
paddr_t
agten_mmap(v, offset, prot)
  304         void *v;
off_t offset;
  306         int prot;
  307 {
  308         struct agten_softc *sc = v;
  310         if (offset & PGOFSET)
  311                 return (-1);
  313         /* Allow mapping as a dumb framebuffer from offset 0 */
  314         if (offset >= 0 && offset < sc->sc_sunfb.sf_fbsize) {
  315                 return (bus_space_mmap(sc->sc_bustag, sc->sc_paddr,
sc->sc_physoffset + offset, prot, BUS_SPACE_MAP_LINEAR));
  317         }
  319         return (-1);    /* not a user-map offset */
  320 }
  322 void
agten_setcolor(v, index, r, g, b)
  324         void *v;
u_int index;
u_int8_t r, g, b;
  327 {
  328         struct agten_softc *sc = v;
sc->sc_cmap.cm_red[index] = r;
sc->sc_cmap.cm_green[index] = g;
sc->sc_cmap.cm_blue[index] = b;
agten_loadcmap(sc, index, 1);
  335 }
  337 int
agten_alloc_screen(v, type, cookiep, curxp, curyp, attrp)
  339         void *v;
  340         const struct wsscreen_descr *type;
  341         void **cookiep;
  342         int *curxp, *curyp;
  343         long *attrp;
  344 {
  345         struct agten_softc *sc = v;
  347         if (sc->sc_nscreens > 0)
  348                 return (ENOMEM);
  350         *cookiep = &sc->sc_sunfb.sf_ro;
  351         *curyp = 0;
  352         *curxp = 0;
sc->sc_sunfb.sf_ro.ri_ops.alloc_attr(&sc->sc_sunfb.sf_ro,
WSCOL_BLACK, WSCOL_WHITE, WSATTR_WSCOLORS, attrp);
sc->sc_nscreens++;
  356         return (0);
  357 }
  359 void
agten_free_screen(v, cookie)
  361         void *v;
  362         void *cookie;
  363 {
  364         struct agten_softc *sc = v;
sc->sc_nscreens--;
  367 }
  369 int
agten_show_screen(v, cookie, waitok, cb, cbarg)
  371         void *v;
  372         void *cookie;
  373         int waitok;
  374         void (*cb)(void *, int, int);
  375         void *cbarg;
  376 {
  377         return (0);
  378 }
  380 int
agten_getcmap(struct agten_cmap *cm, struct wsdisplay_cmap *rcm)
  382 {
u_int index = rcm->index, count = rcm->count;
  384         int error;
  386         if (index >= 256 || count > 256 - index)
  387                 return (EINVAL);
  389         if ((error = copyout(&cm->cm_red[index], rcm->red, count)) != 0)
  390                 return (error);
  391         if ((error = copyout(&cm->cm_green[index], rcm->green, count)) != 0)
  392                 return (error);
  393         if ((error = copyout(&cm->cm_blue[index], rcm->blue, count)) != 0)
  394                 return (error);
  396         return (0);
  397 }
  399 int
agten_putcmap(struct agten_cmap *cm, struct wsdisplay_cmap *rcm)
  401 {
u_int index = rcm->index, count = rcm->count;
  403         int error;
  405         if (index >= 256 || count > 256 - index)
  406                 return (EINVAL);
  408         if ((error = copyin(rcm->red, &cm->cm_red[index], count)) != 0)
  409                 return (error);
  410         if ((error = copyin(rcm->green, &cm->cm_green[index], count)) != 0)
  411                 return (error);
  412         if ((error = copyin(rcm->blue, &cm->cm_blue[index], count)) != 0)
  413                 return (error);
  415         return (0);
  416 }
  418 static __inline__ void
ibm561_write(struct agten_softc *sc, u_int32_t reg, u_int32_t value)
  420 {
  421         /*
  422          * For some design reason the IBM561 PaletteDac needs to be fed
  423          * values shifted left by 16 bits. What happened to simplicity?
  424          */
  425         *(volatile u_int32_t *)(sc->sc_p9100 + P9100_RAMDAC_REGISTER(reg)) =
  426             (value) << 16;
  427 }
  429 void
agten_loadcmap(struct agten_softc *sc, u_int start, u_int ncolors)
  431 {
  432         int i;
u_int8_t *red, *green, *blue;
ibm561_write(sc, IBM561_ADDR_LOW,
  436             (IBM561_CMAP_TABLE + start) & 0xff);
ibm561_write(sc, IBM561_ADDR_HIGH,
  438             ((IBM561_CMAP_TABLE + start) >> 8) & 0xff);
red = sc->sc_cmap.cm_red;
green = sc->sc_cmap.cm_green;
blue = sc->sc_cmap.cm_blue;
  443         for (i = start; i < start + ncolors; i++) {
ibm561_write(sc, IBM561_CMD_CMAP, *red++);
ibm561_write(sc, IBM561_CMD_CMAP, *green++);
ibm561_write(sc, IBM561_CMD_CMAP, *blue++);
  447         }
  448 }