/[gxemul]/trunk/src/devices/dev_turbochannel.c
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Contents of /trunk/src/devices/dev_turbochannel.c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 18 - (show annotations)
Mon Oct 8 16:19:11 2007 UTC (16 years, 6 months ago) by dpavlin
File MIME type: text/plain
File size: 11373 byte(s)
++ trunk/HISTORY	(local)
$Id: HISTORY,v 1.1004 2005/10/27 14:01:10 debug Exp $
20051011        Passing -A as the default boot arg for CATS (works fine with
                OpenBSD/cats).
20051012	Fixing the VGA cursor offset bug, and speeding up framebuffer
		redraws if character cells contain the same thing as during
		the last redraw.
20051013	Adding a slow strd ARM instruction hack.
20051017	Minor updates: Adding a dummy i80321 Verde controller (for
		XScale emulation), fixing the disassembly of the ARM "ldrd"
		instruction, adding "support" for less-than-4KB pages for ARM
		(by not adding them to translation tables).
20051020	Continuing on some HPCarm stuff. A NetBSD/hpcarm kernel prints
		some boot messages on an emulated Jornada 720.
		Making dev_ram work better with dyntrans (speeds up some things
		quite a bit).
20051021	Automatically generating some of the most common ARM load/store
		multiple instructions.
20051022	Better statistics gathering for the ARM load/store multiple.
		Various other dyntrans and device updates.
20051023	Various minor updates.
20051024	Continuing; minor device and dyntrans fine-tuning. Adding the
		first "reasonable" instruction combination hacks for ARM (the
		cores of NetBSD/cats' memset and memcpy).
20051025	Fixing a dyntrans-related bug in dev_vga. Also changing the
		dyntrans low/high access notification to only be updated on
		writes, not reads. Hopefully it will be enough. (dev_vga in
		charcell mode now seems to work correctly with both reads and
		writes.)
		Experimenting with gathering dyntrans statistics (which parts
		of emulated RAM that are actually executed), and adding
		instruction combination hacks for cache cleaning and a part of
		NetBSD's scanc() function.
20051026	Adding a bitmap for ARM emulation which indicates if a page is
		(specifically) user accessible; loads and stores with the t-
		flag set can now use the translation arrays, which results in
		a measurable speedup.
20051027	Dyntrans updates; adding an extra bitmap array for 32-bit
		emulation modes, speeding up the check whether a physical page
		has any code translations or not (O(n) -> O(1)). Doing a
		similar reduction of O(n) to O(1) by avoiding the scan through
		the translation entries on a translation update (32-bit mode
		only).
		Various other minor hacks.
20051029	Quick release, without any testing at all.

==============  RELEASE 0.3.6.2  ==============


1 /*
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 * $Id: dev_turbochannel.c,v 1.44 2005/10/26 14:37:04 debug Exp $
29 *
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 #define DEVICE_NAME_BUFLEN 9
45 #define CARD_NAME_BUFLEN 9
46 #define CARD_FIRMWARE_BUFLEN 5
47
48 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 char device_name[DEVICE_NAME_BUFLEN]; /* NUL-terminated */
57
58 /* These should be terminated with spaces */
59 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 };
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 if (writeflag == MEM_WRITE)
77 idata = memory_readmax64(cpu, data, len);
78
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 int rom_offset=0x3c0000, rom_length=DEV_TURBOCHANNEL_LEN, rom_skip=0;
188 char *name2;
189 size_t nlen;
190
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 strlcpy(d->device_name, device_name, DEVICE_NAME_BUFLEN);
211
212 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
216 memset(d->card_module_name, ' ', 8);
217 memcpy(d->card_module_name, device_name, strlen(device_name));
218
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 VFB_GENERIC, 1280, 1024, 2048, 1024, 8, device_name);
254 /* 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 1024,864, 1024,1024,8, device_name);
262 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 VFB_GENERIC, 1280,1024, 1280,1024,8, device_name);
272 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 VFB_DEC_MAXINE, 0, 0, 0, 0, 0, "PMAG-DV");
300 /* 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 VFB_GENERIC, 1280,1024, 1280,1024, 8, "PMAG-RO");
310 /* 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 nlen = strlen(device_name) + 30;
328 name2 = malloc(nlen);
329 if (name2 == NULL) {
330 fprintf(stderr, "out of memory in dev_turbochannel_init()\n");
331 exit(1);
332 }
333 if (*device_name)
334 snprintf(name2, nlen, "turbochannel [%s]", device_name);
335 else
336 snprintf(name2, nlen, "turbochannel");
337
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

  ViewVC Help
Powered by ViewVC 1.1.26