src/devices/dev_turbochannel.c

/*
 *  Copyright (C) 2003-2005  Anders Gavare.  All rights reserved.
 *
 *  Redistribution and use in source and binary forms, with or without
 *  modification, are permitted provided that the following conditions are met:
 *
 *  1. Redistributions of source code must retain the above copyright
 *     notice, this list of conditions and the following disclaimer.
 *  2. Redistributions in binary form must reproduce the above copyright  
 *     notice, this list of conditions and the following disclaimer in the 
 *     documentation and/or other materials provided with the distribution.
 *  3. The name of the author may not be used to endorse or promote products
 *     derived from this software without specific prior written permission.
 *
 *  THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
 *  ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 *  IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 *  ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE   
 *  FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 *  DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 *  OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 *  HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 *  LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 *  OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 *  SUCH DAMAGE.
 *   
 *
 *  $Id: dev_turbochannel.c,v 1.44 2005/10/26 14:37:04 debug Exp $
 *  
 *  Generic framework for TURBOchannel devices, used in DECstation machines.
 */

#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include "devices.h"
#include "machine.h"
#include "memory.h"
#include "misc.h"
#include "sfbreg.h"


#define DEVICE_NAME_BUFLEN              9
#define CARD_NAME_BUFLEN                9
#define CARD_FIRMWARE_BUFLEN            5

struct turbochannel_data {
        int             slot_nr;
        uint64_t        baseaddr;
        uint64_t        endaddr;
        int             irq;

        int             rom_skip;

        char            device_name[DEVICE_NAME_BUFLEN];  /*  NUL-terminated  */

        /*  These should be terminated with spaces  */
        char            card_firmware_version[CARD_NAME_BUFLEN];
        char            card_vendor_name[CARD_NAME_BUFLEN];
        char            card_module_name[CARD_NAME_BUFLEN];
        char            card_firmware_type[CARD_FIRMWARE_BUFLEN];
};


/*
 *  dev_turbochannel_access():
 */
int dev_turbochannel_access(struct cpu *cpu, struct memory *mem,
        uint64_t relative_addr, unsigned char *data, size_t len,
        int writeflag, void *extra)
{
        struct turbochannel_data *d = extra;
        uint64_t idata = 0, odata = 0;

        if (writeflag == MEM_WRITE)
                idata = memory_readmax64(cpu, data, len);

        relative_addr += d->rom_skip;

        if (writeflag == MEM_READ) {
                debug("[ turbochannel: read from slot %i addr 0x%08lx (",
                    d->slot_nr, (long)relative_addr);

                relative_addr &= 0x7fff;

                switch (relative_addr) {
                case 0x3e0:
                        odata = 0x00000001; debug("ROM width");
                        break;
                case 0x3e4:
                        odata = 0x00000004; debug("ROM stride");
                        break;
                case 0x3e8:
                        /*  8KB * romsize  */
                        odata = 0x00000001; debug("ROM size");
                        break;
                case 0x3ec:
                        /*  4MB * slotsize  */
                        odata = 0x00000001; debug("slot size");
                        break;
                case 0x3f0:
                        odata = 0x55555555; debug("ROM signature byte 0");
                        break;
                case 0x3f4:
                        odata = 0x00000000; debug("ROM signature byte 1");
                        break;
                case 0x3f8:
                        odata = 0xaaaaaaaa; debug("ROM signature byte 2");
                        break;
                case 0x3fc:
                        odata = 0xffffffff; debug("ROM signature byte 3");
                        break;
                case 0x470:
                        /*  0=nothing, 1=parity  */
                        odata = 0x00000000; debug("flags"); break;
                default:
                        if (relative_addr >= 0x400 && relative_addr < 0x420)
                                odata = d->card_firmware_version[
                                    (relative_addr-0x400)/4];
                        else if (relative_addr >= 0x420 &&
                            relative_addr < 0x440)
                                odata = d->card_vendor_name[
                                    (relative_addr-0x420)/4];
                        else if (relative_addr >= 0x440 &&
                            relative_addr < 0x460)
                                odata = d->card_module_name[
                                    (relative_addr-0x440)/4];
                        else if (relative_addr >= 0x460 &&
                            relative_addr < 0x470)
                                odata = d->card_firmware_type[
                                    (relative_addr-0x460)/4];
                        else {
                                debug("?");
                        }
                }

                /*
                 *  If this slot is empty, return an error so that a DBE
                 *  exception is caused. (This is the way DECstation operating
                 *  systems have to detect the absence of cards in a
                 *  TURBOchannel slot.)
                 *
                 *  NOTE:  The Sprite kernel reads from offsets 0x3e0..0x400
                 *  without handling the DBE exception, and both Ultrix and
                 *  NetBSD seem to detect the DBE exception using addresses
                 *  around offset 0x0 or 0x3c0000.  This code seems to work
                 *  with all of the those OS kernels:
                 */
                if (d->card_module_name[0] ==  ' ') {
                        /*  Return no data for empty slot:  */
                        odata = 0;

                        /*  Return DBE exception in some cases:  */
                        if (relative_addr < 0x3e0 || relative_addr >= 0x500)
                                return 0;
                }

                debug(") ]\n");
        } else {
                /*  debug("[ turbochannel: write to  0x%08lx: 0x%08x ]\n",
                    (long)relative_addr, (int)idata);  */
        }

        if (writeflag == MEM_READ)
                memory_writemax64(cpu, data, len, odata);

        return 1;
}


/*
 *  dev_turbochannel_init():
 *
 *  This is a generic turbochannel card device.  device_name should point
 *  to a string such as "PMAG-BA".
 *
 *  TODO: When running for example dual-head, maybe the name of each
 *        framebuffer should include the card slot number?
 */
void dev_turbochannel_init(struct machine *machine, struct memory *mem,
        int slot_nr, uint64_t baseaddr, uint64_t endaddr,
        char *device_name, int irq)
{
        struct vfb_data *fb;
        struct turbochannel_data *d;
        int rom_offset=0x3c0000, rom_length=DEV_TURBOCHANNEL_LEN, rom_skip=0;
        char *name2;
        size_t nlen;

        if (device_name == NULL)
                return;

        if (strlen(device_name) > 8) {
                fprintf(stderr, "dev_turbochannel_init(): bad device_name\n");
                exit(1);
        }

        d = malloc(sizeof(struct turbochannel_data));
        if (d == NULL) {
                fprintf(stderr, "out of memory\n");
                exit(1);
        }
        memset(d, 0, sizeof(struct turbochannel_data));
        d->slot_nr  = slot_nr;
        d->baseaddr = baseaddr;
        d->endaddr  = endaddr;
        d->irq      = irq;

        strlcpy(d->device_name, device_name, DEVICE_NAME_BUFLEN);

        strncpy(d->card_firmware_version, "V5.3a   ", CARD_NAME_BUFLEN);
        strncpy(d->card_vendor_name,      "DEC     ", CARD_NAME_BUFLEN);
        strncpy(d->card_firmware_type,    "TCF0", CARD_FIRMWARE_BUFLEN);

        memset(d->card_module_name, ' ', 8);
        memcpy(d->card_module_name, device_name, strlen(device_name));

        /*
         *  According to NetBSD/pmax:
         *
         *  PMAD-AA:  le1 at tc0 slot 2 offset 0x0: address 00:00:00:00:00:00
         *  PMAG-AA:  mfb0 at tc0 slot 2 offset 0x0: 1280x1024x8
         *  PMAG-BA:  cfb0 at tc0 slot 2 offset 0x0cfb0: 1024x864x8
         *  PMAG-CA:  px0 at tc0 slot 2 offset 0x0: 2D, 4x1 stamp, 8 plane
         *      (PMAG-DA,EA,FA,FB are also pixelstamps)
         *  PMAG-DV:  xcfb0 at tc0 slot 2 offset 0x0: 1024x768x8
         *  PMAG-JA:  "truecolor" in Ultrix
         *  PMAGB-BA: sfb0 at tc0 slot 0 offset 0x0: 0x0x8
         *  PMAGB-VA: sfb0 at tc0 slot 2 offset 0x0: 0x0x8
         *  PMAZ-AA:  asc0 at tc0 slot 2 offset 0x0: NCR53C94, 25MHz, SCSI ID 7
         *
         *  PMAF-FA:  fta0 at tc0 slot 0  (fddi network, "DEC", "V1.0b")
         */

        if (strcmp(device_name, "PMAD-AA")==0) {
                /*  le in NetBSD, Lance ethernet  */
                dev_le_init(machine, mem, baseaddr, 0, 0, irq, DEV_LE_LENGTH);
                /*  One ROM at 0x1c03e0, and one at 0x3c0000.  */
                rom_skip = 0x300;
                rom_offset = 0x1c0000;
                rom_length = 0x201000;
        } else if (strcmp(device_name, "PMAZ-AA")==0) {
                /*  asc in NetBSD, SCSI  */
                dev_asc_init(machine, mem, baseaddr, irq, d,
                    DEV_ASC_DEC, NULL, NULL);
                rom_offset = 0xc0000;
                /*  There is a copy at 0x0, at least that's where Linux
                    looks for the rom signature  */
        } else if (strcmp(device_name, "PMAG-AA")==0) {
                /*  mfb in NetBSD  */
                fb = dev_fb_init(machine, mem, baseaddr + VFB_MFB_VRAM,
                    VFB_GENERIC, 1280, 1024, 2048, 1024, 8, device_name);
                /*  bt455 = palette, bt431 = cursor  */
                dev_bt455_init(mem, baseaddr + VFB_MFB_BT455, fb);
                dev_bt431_init(mem, baseaddr + VFB_MFB_BT431, fb, 8);
                rom_offset = 0;
        } else if (strcmp(device_name, "PMAG-BA")==0) {
                /*  cfb in NetBSD  */
                fb = dev_fb_init(machine, mem, baseaddr, VFB_GENERIC,
                    1024,864, 1024,1024,8, device_name);
                dev_bt459_init(machine, mem, baseaddr + VFB_CFB_BT459,
                    baseaddr + 0x300000, fb, 8, irq, BT459_BA);
                /*  ROM at both 0x380000 and 0x3c0000?  */
                rom_offset = 0x380000;
                rom_length = 0x080000;
        } else if (strcmp(device_name, "PMAGB-BA")==0) {
                /*  sfb in NetBSD  */
                /*  TODO: This is not working with Ultrix yet.  */
                fb = dev_fb_init(machine, mem, baseaddr + SFB_OFFSET_VRAM,
                    VFB_GENERIC, 1280,1024, 1280,1024,8, device_name);
                dev_sfb_init(machine, mem, baseaddr + SFB_ASIC_OFFSET, fb);
                /*  TODO: the CLEAR doesn't get through, as the address
                        range is already in use by the asic  */
                dev_bt459_init(machine, mem, baseaddr + SFB_OFFSET_BT459,
                    baseaddr + SFB_CLEAR, fb, 8, irq, BT459_BBA);
                rom_offset = 0x0;       /*  ? TODO  */
        } else if (strcmp(device_name, "PMAG-CA")==0) {
                /*  px in NetBSD  */
                dev_px_init(machine, mem, baseaddr, DEV_PX_TYPE_PX, irq);
                rom_offset = 0x3c0000;
        } else if (strcmp(device_name, "PMAG-DA")==0) {
                /*  pxg in NetBSD  */
                dev_px_init(machine, mem, baseaddr, DEV_PX_TYPE_PXG, irq);
                rom_offset = 0x3c0000;
        } else if (strcmp(device_name, "PMAG-EA")==0) {
                /*  pxg+ in NetBSD: TODO  (not supported by the kernel
                    I've tried)  */
                fatal("TODO (see dev_turbochannel.c)\n");
                rom_offset = 0x3c0000;
        } else if (strcmp(device_name, "PMAG-FA")==0) {
                /*  "pxg+ Turbo" in NetBSD  */
                dev_px_init(machine, mem, baseaddr,
                    DEV_PX_TYPE_PXGPLUSTURBO, irq);
                rom_offset = 0x3c0000;
        } else if (strcmp(device_name, "PMAG-DV")==0) {
                /*  xcfb in NetBSD: TODO  */
                fb = dev_fb_init(machine, mem, baseaddr + 0x2000000,
                    VFB_DEC_MAXINE, 0, 0, 0, 0, 0, "PMAG-DV");
                /*  TODO:  not yet usable, needs a IMS332 vdac  */
                rom_offset = 0x3c0000;
        } else if (strcmp(device_name, "PMAG-JA")==0) {
                /*  "Truecolor", mixed 8- and 24-bit  */
                dev_pmagja_init(machine, mem, baseaddr, irq);
                rom_offset = 0;         /*  NOTE: 0, not 0x3c0000  */
        } else if (strcmp(device_name, "PMAG-RO")==0) {
                /*  This works at least B/W in Ultrix, so far.  */
                fb = dev_fb_init(machine, mem, baseaddr + 0x200000,
                    VFB_GENERIC, 1280,1024, 1280,1024, 8, "PMAG-RO");
                /*  TODO: bt463 at offset 0x040000, not bt459  */
                dev_bt459_init(machine, mem, baseaddr + 0x40000, 0,
                    fb, 8, irq, 0);             /*  TODO: type  */
                dev_bt431_init(mem, baseaddr + 0x40010, fb, 8);  /*  cursor  */
                rom_offset = 0x3c0000;
        } else if (device_name[0] == '\0') {
                /*  If this slot is empty, then occupy the entire
                    4MB slot address range:  */
                rom_offset = 0;
                rom_length = 4*1048576;
        } else {
                fatal("warning: unknown TURBOchannel device name \"%s\"\n",
                    device_name);
        }

        d->rom_skip = rom_skip;

        nlen = strlen(device_name) + 30;
        name2 = malloc(nlen);
        if (name2 == NULL) {
                fprintf(stderr, "out of memory in dev_turbochannel_init()\n");
                exit(1);
        }
        if (*device_name)
                snprintf(name2, nlen, "turbochannel [%s]", device_name);
        else
                snprintf(name2, nlen, "turbochannel");

        memory_device_register(mem, name2, baseaddr + rom_offset + rom_skip,
            rom_length-rom_skip, dev_turbochannel_access, d, MEM_DEFAULT, NULL);
}

1	dpavlin	4	/*
2			* Copyright (C) 2003-2005 Anders Gavare. All rights reserved.
3			*
4			* Redistribution and use in source and binary forms, with or without
5			* modification, are permitted provided that the following conditions are met:
6			*
7			* 1. Redistributions of source code must retain the above copyright
8			* notice, this list of conditions and the following disclaimer.
9			* 2. Redistributions in binary form must reproduce the above copyright
10			* notice, this list of conditions and the following disclaimer in the
11			* documentation and/or other materials provided with the distribution.
12			* 3. The name of the author may not be used to endorse or promote products
13			* derived from this software without specific prior written permission.
14			*
15			* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16			* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17			* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18			* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19			* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20			* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21			* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22			* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23			* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24			* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25			* SUCH DAMAGE.
26			*
27			*
28	dpavlin	18	* $Id: dev_turbochannel.c,v 1.44 2005/10/26 14:37:04 debug Exp $
29	dpavlin	4	*
30			* Generic framework for TURBOchannel devices, used in DECstation machines.
31			*/
32
33			#include <stdio.h>
34			#include <stdlib.h>
35			#include <string.h>
36
37			#include "devices.h"
38			#include "machine.h"
39			#include "memory.h"
40			#include "misc.h"
41			#include "sfbreg.h"
42
43
44	dpavlin	10	#define DEVICE_NAME_BUFLEN 9
45			#define CARD_NAME_BUFLEN 9
46			#define CARD_FIRMWARE_BUFLEN 5
47
48	dpavlin	4	struct turbochannel_data {
49			int slot_nr;
50			uint64_t baseaddr;
51			uint64_t endaddr;
52			int irq;
53
54			int rom_skip;
55
56	dpavlin	10	char device_name[DEVICE_NAME_BUFLEN]; /* NUL-terminated */
57	dpavlin	4
58			/* These should be terminated with spaces */
59	dpavlin	10	char card_firmware_version[CARD_NAME_BUFLEN];
60			char card_vendor_name[CARD_NAME_BUFLEN];
61			char card_module_name[CARD_NAME_BUFLEN];
62			char card_firmware_type[CARD_FIRMWARE_BUFLEN];
63	dpavlin	4	};
64
65
66			/*
67			* dev_turbochannel_access():
68			*/
69			int dev_turbochannel_access(struct cpu cpu, struct memory mem,
70			uint64_t relative_addr, unsigned char *data, size_t len,
71			int writeflag, void *extra)
72			{
73			struct turbochannel_data *d = extra;
74			uint64_t idata = 0, odata = 0;
75
76	dpavlin	18	if (writeflag == MEM_WRITE)
77			idata = memory_readmax64(cpu, data, len);
78	dpavlin	4
79			relative_addr += d->rom_skip;
80
81			if (writeflag == MEM_READ) {
82			debug("[ turbochannel: read from slot %i addr 0x%08lx (",
83			d->slot_nr, (long)relative_addr);
84
85			relative_addr &= 0x7fff;
86
87			switch (relative_addr) {
88			case 0x3e0:
89			odata = 0x00000001; debug("ROM width");
90			break;
91			case 0x3e4:
92			odata = 0x00000004; debug("ROM stride");
93			break;
94			case 0x3e8:
95			/* 8KB * romsize */
96			odata = 0x00000001; debug("ROM size");
97			break;
98			case 0x3ec:
99			/* 4MB * slotsize */
100			odata = 0x00000001; debug("slot size");
101			break;
102			case 0x3f0:
103			odata = 0x55555555; debug("ROM signature byte 0");
104			break;
105			case 0x3f4:
106			odata = 0x00000000; debug("ROM signature byte 1");
107			break;
108			case 0x3f8:
109			odata = 0xaaaaaaaa; debug("ROM signature byte 2");
110			break;
111			case 0x3fc:
112			odata = 0xffffffff; debug("ROM signature byte 3");
113			break;
114			case 0x470:
115			/* 0=nothing, 1=parity */
116			odata = 0x00000000; debug("flags"); break;
117			default:
118			if (relative_addr >= 0x400 && relative_addr < 0x420)
119			odata = d->card_firmware_version[
120			(relative_addr-0x400)/4];
121			else if (relative_addr >= 0x420 &&
122			relative_addr < 0x440)
123			odata = d->card_vendor_name[
124			(relative_addr-0x420)/4];
125			else if (relative_addr >= 0x440 &&
126			relative_addr < 0x460)
127			odata = d->card_module_name[
128			(relative_addr-0x440)/4];
129			else if (relative_addr >= 0x460 &&
130			relative_addr < 0x470)
131			odata = d->card_firmware_type[
132			(relative_addr-0x460)/4];
133			else {
134			debug("?");
135			}
136			}
137
138			/*
139			* If this slot is empty, return an error so that a DBE
140			* exception is caused. (This is the way DECstation operating
141			* systems have to detect the absence of cards in a
142			* TURBOchannel slot.)
143			*
144			* NOTE: The Sprite kernel reads from offsets 0x3e0..0x400
145			* without handling the DBE exception, and both Ultrix and
146			* NetBSD seem to detect the DBE exception using addresses
147			* around offset 0x0 or 0x3c0000. This code seems to work
148			* with all of the those OS kernels:
149			*/
150			if (d->card_module_name[0] == ' ') {
151			/* Return no data for empty slot: */
152			odata = 0;
153
154			/* Return DBE exception in some cases: */
155			if (relative_addr < 0x3e0 \|\| relative_addr >= 0x500)
156			return 0;
157			}
158
159			debug(") ]\n");
160			} else {
161			/* debug("[ turbochannel: write to 0x%08lx: 0x%08x ]\n",
162			(long)relative_addr, (int)idata); */
163			}
164
165			if (writeflag == MEM_READ)
166			memory_writemax64(cpu, data, len, odata);
167
168			return 1;
169			}
170
171
172			/*
173			* dev_turbochannel_init():
174			*
175			* This is a generic turbochannel card device. device_name should point
176			* to a string such as "PMAG-BA".
177			*
178			* TODO: When running for example dual-head, maybe the name of each
179			* framebuffer should include the card slot number?
180			*/
181			void dev_turbochannel_init(struct machine machine, struct memory mem,
182			int slot_nr, uint64_t baseaddr, uint64_t endaddr,
183			char *device_name, int irq)
184			{
185			struct vfb_data *fb;
186			struct turbochannel_data *d;
187	dpavlin	10	int rom_offset=0x3c0000, rom_length=DEV_TURBOCHANNEL_LEN, rom_skip=0;
188	dpavlin	4	char *name2;
189	dpavlin	10	size_t nlen;
190	dpavlin	4
191			if (device_name == NULL)
192			return;
193
194			if (strlen(device_name) > 8) {
195			fprintf(stderr, "dev_turbochannel_init(): bad device_name\n");
196			exit(1);
197			}
198
199			d = malloc(sizeof(struct turbochannel_data));
200			if (d == NULL) {
201			fprintf(stderr, "out of memory\n");
202			exit(1);
203			}
204			memset(d, 0, sizeof(struct turbochannel_data));
205			d->slot_nr = slot_nr;
206			d->baseaddr = baseaddr;
207			d->endaddr = endaddr;
208			d->irq = irq;
209
210	dpavlin	10	strlcpy(d->device_name, device_name, DEVICE_NAME_BUFLEN);
211	dpavlin	4
212	dpavlin	10	strncpy(d->card_firmware_version, "V5.3a ", CARD_NAME_BUFLEN);
213			strncpy(d->card_vendor_name, "DEC ", CARD_NAME_BUFLEN);
214			strncpy(d->card_firmware_type, "TCF0", CARD_FIRMWARE_BUFLEN);
215	dpavlin	4
216			memset(d->card_module_name, ' ', 8);
217	dpavlin	10	memcpy(d->card_module_name, device_name, strlen(device_name));
218	dpavlin	4
219			/*
220			* According to NetBSD/pmax:
221			*
222			* PMAD-AA: le1 at tc0 slot 2 offset 0x0: address 00:00:00:00:00:00
223			* PMAG-AA: mfb0 at tc0 slot 2 offset 0x0: 1280x1024x8
224			* PMAG-BA: cfb0 at tc0 slot 2 offset 0x0cfb0: 1024x864x8
225			* PMAG-CA: px0 at tc0 slot 2 offset 0x0: 2D, 4x1 stamp, 8 plane
226			* (PMAG-DA,EA,FA,FB are also pixelstamps)
227			* PMAG-DV: xcfb0 at tc0 slot 2 offset 0x0: 1024x768x8
228			* PMAG-JA: "truecolor" in Ultrix
229			* PMAGB-BA: sfb0 at tc0 slot 0 offset 0x0: 0x0x8
230			* PMAGB-VA: sfb0 at tc0 slot 2 offset 0x0: 0x0x8
231			* PMAZ-AA: asc0 at tc0 slot 2 offset 0x0: NCR53C94, 25MHz, SCSI ID 7
232			*
233			* PMAF-FA: fta0 at tc0 slot 0 (fddi network, "DEC", "V1.0b")
234			*/
235
236			if (strcmp(device_name, "PMAD-AA")==0) {
237			/* le in NetBSD, Lance ethernet */
238			dev_le_init(machine, mem, baseaddr, 0, 0, irq, DEV_LE_LENGTH);
239			/* One ROM at 0x1c03e0, and one at 0x3c0000. */
240			rom_skip = 0x300;
241			rom_offset = 0x1c0000;
242			rom_length = 0x201000;
243			} else if (strcmp(device_name, "PMAZ-AA")==0) {
244			/* asc in NetBSD, SCSI */
245			dev_asc_init(machine, mem, baseaddr, irq, d,
246			DEV_ASC_DEC, NULL, NULL);
247			rom_offset = 0xc0000;
248			/* There is a copy at 0x0, at least that's where Linux
249			looks for the rom signature */
250			} else if (strcmp(device_name, "PMAG-AA")==0) {
251			/* mfb in NetBSD */
252			fb = dev_fb_init(machine, mem, baseaddr + VFB_MFB_VRAM,
253	dpavlin	12	VFB_GENERIC, 1280, 1024, 2048, 1024, 8, device_name);
254	dpavlin	4	/* bt455 = palette, bt431 = cursor */
255			dev_bt455_init(mem, baseaddr + VFB_MFB_BT455, fb);
256			dev_bt431_init(mem, baseaddr + VFB_MFB_BT431, fb, 8);
257			rom_offset = 0;
258			} else if (strcmp(device_name, "PMAG-BA")==0) {
259			/* cfb in NetBSD */
260			fb = dev_fb_init(machine, mem, baseaddr, VFB_GENERIC,
261	dpavlin	12	1024,864, 1024,1024,8, device_name);
262	dpavlin	4	dev_bt459_init(machine, mem, baseaddr + VFB_CFB_BT459,
263			baseaddr + 0x300000, fb, 8, irq, BT459_BA);
264			/* ROM at both 0x380000 and 0x3c0000? */
265			rom_offset = 0x380000;
266			rom_length = 0x080000;
267			} else if (strcmp(device_name, "PMAGB-BA")==0) {
268			/* sfb in NetBSD */
269			/* TODO: This is not working with Ultrix yet. */
270			fb = dev_fb_init(machine, mem, baseaddr + SFB_OFFSET_VRAM,
271	dpavlin	12	VFB_GENERIC, 1280,1024, 1280,1024,8, device_name);
272	dpavlin	4	dev_sfb_init(machine, mem, baseaddr + SFB_ASIC_OFFSET, fb);
273			/* TODO: the CLEAR doesn't get through, as the address
274			range is already in use by the asic */
275			dev_bt459_init(machine, mem, baseaddr + SFB_OFFSET_BT459,
276			baseaddr + SFB_CLEAR, fb, 8, irq, BT459_BBA);
277			rom_offset = 0x0; /* ? TODO */
278			} else if (strcmp(device_name, "PMAG-CA")==0) {
279			/* px in NetBSD */
280			dev_px_init(machine, mem, baseaddr, DEV_PX_TYPE_PX, irq);
281			rom_offset = 0x3c0000;
282			} else if (strcmp(device_name, "PMAG-DA")==0) {
283			/* pxg in NetBSD */
284			dev_px_init(machine, mem, baseaddr, DEV_PX_TYPE_PXG, irq);
285			rom_offset = 0x3c0000;
286			} else if (strcmp(device_name, "PMAG-EA")==0) {
287			/* pxg+ in NetBSD: TODO (not supported by the kernel
288			I've tried) */
289			fatal("TODO (see dev_turbochannel.c)\n");
290			rom_offset = 0x3c0000;
291			} else if (strcmp(device_name, "PMAG-FA")==0) {
292			/* "pxg+ Turbo" in NetBSD */
293			dev_px_init(machine, mem, baseaddr,
294			DEV_PX_TYPE_PXGPLUSTURBO, irq);
295			rom_offset = 0x3c0000;
296			} else if (strcmp(device_name, "PMAG-DV")==0) {
297			/* xcfb in NetBSD: TODO */
298			fb = dev_fb_init(machine, mem, baseaddr + 0x2000000,
299	dpavlin	12	VFB_DEC_MAXINE, 0, 0, 0, 0, 0, "PMAG-DV");
300	dpavlin	4	/* TODO: not yet usable, needs a IMS332 vdac */
301			rom_offset = 0x3c0000;
302			} else if (strcmp(device_name, "PMAG-JA")==0) {
303			/* "Truecolor", mixed 8- and 24-bit */
304			dev_pmagja_init(machine, mem, baseaddr, irq);
305			rom_offset = 0; /* NOTE: 0, not 0x3c0000 */
306			} else if (strcmp(device_name, "PMAG-RO")==0) {
307			/* This works at least B/W in Ultrix, so far. */
308			fb = dev_fb_init(machine, mem, baseaddr + 0x200000,
309	dpavlin	12	VFB_GENERIC, 1280,1024, 1280,1024, 8, "PMAG-RO");
310	dpavlin	4	/* TODO: bt463 at offset 0x040000, not bt459 */
311			dev_bt459_init(machine, mem, baseaddr + 0x40000, 0,
312			fb, 8, irq, 0); /* TODO: type */
313			dev_bt431_init(mem, baseaddr + 0x40010, fb, 8); /* cursor */
314			rom_offset = 0x3c0000;
315			} else if (device_name[0] == '\0') {
316			/* If this slot is empty, then occupy the entire
317			4MB slot address range: */
318			rom_offset = 0;
319			rom_length = 4*1048576;
320			} else {
321			fatal("warning: unknown TURBOchannel device name \"%s\"\n",
322			device_name);
323			}
324
325			d->rom_skip = rom_skip;
326
327	dpavlin	10	nlen = strlen(device_name) + 30;
328			name2 = malloc(nlen);
329	dpavlin	4	if (name2 == NULL) {
330			fprintf(stderr, "out of memory in dev_turbochannel_init()\n");
331			exit(1);
332			}
333			if (*device_name)
334	dpavlin	10	snprintf(name2, nlen, "turbochannel [%s]", device_name);
335	dpavlin	4	else
336	dpavlin	10	snprintf(name2, nlen, "turbochannel");
337	dpavlin	4
338			memory_device_register(mem, name2, baseaddr + rom_offset + rom_skip,
339			rom_length-rom_skip, dev_turbochannel_access, d, MEM_DEFAULT, NULL);
340			}
341