ViewVC Help
View File | Revision Log | Show Annotations | Revision Graph | Root Listing
root/cebix/BasiliskII/src/slot_rom.cpp
Revision: 1.4
Committed: 2001-02-02T20:52:57Z (23 years, 9 months ago) by cebix
Branch: MAIN
CVS Tags: snapshot-17022001, snapshot-29052001, release-0_9-1
Changes since 1.3: +1 -1 lines
Log Message:
- bumped version number to 0.9
- updated copyright dates

File Contents

# Content
1 /*
2 * slot_rom.cpp - Slot declaration ROM
3 *
4 * Basilisk II (C) 1996-2001 Christian Bauer
5 *
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
10 *
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
15 *
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
19 */
20
21 /*
22 * SEE ALSO
23 * Inside Macintosh: Devices, chapter 2 "Slot Manager"
24 * Designing Cards and Drivers for the Macintosh Family, Second Edition
25 */
26
27 #include <stdio.h>
28 #include <string.h>
29
30 #include "sysdeps.h"
31 #include "cpu_emulation.h"
32 #include "main.h"
33 #include "video.h"
34 #include "emul_op.h"
35 #include "version.h"
36 #include "slot_rom.h"
37
38
39 // Temporary buffer for slot ROM
40 static uint8 srom[4096];
41
42 // Index in srom
43 static uint32 p;
44
45
46 /*
47 * Construct slot declaration ROM and copy it into the Mac ROM (must be called after VideoInit())
48 */
49
50 static void Offs(uint8 type, uint32 ptr)
51 {
52 uint32 offs = ptr - p;
53 srom[p++] = type;
54 srom[p++] = offs >> 16;
55 srom[p++] = offs >> 8;
56 srom[p++] = offs;
57 }
58
59 static void Rsrc(uint8 type, uint32 data)
60 {
61 srom[p++] = type;
62 srom[p++] = data >> 16;
63 srom[p++] = data >> 8;
64 srom[p++] = data;
65 }
66
67 static void EndOfList(void)
68 {
69 srom[p++] = 0xff;
70 srom[p++] = 0;
71 srom[p++] = 0;
72 srom[p++] = 0;
73 }
74
75 static void Long(uint32 data)
76 {
77 srom[p++] = data >> 24;
78 srom[p++] = data >> 16;
79 srom[p++] = data >> 8;
80 srom[p++] = data;
81 }
82
83 static void Word(uint16 data)
84 {
85 srom[p++] = data >> 8;
86 srom[p++] = data;
87 }
88
89 static void String(char *str)
90 {
91 while ((srom[p++] = *str++) != 0) ;
92 if (p & 1)
93 srom[p++] = 0;
94 }
95
96 static void PString(char *str)
97 {
98 srom[p++] = strlen(str);
99 while ((srom[p++] = *str++) != 0) ;
100 p--;
101 if (p & 1)
102 srom[p++] = 0;
103 }
104
105 bool InstallSlotROM(void)
106 {
107 uint32 boardType, boardName, vendorID, revLevel, partNum, date;
108 uint32 vendorInfo, sRsrcBoard;
109
110 uint32 videoType, videoName, minorBase, minorLength, videoDrvr, vidDrvrDir;
111 uint32 defaultGamma, gammaDir, vidModeParms, vidMode, sRsrcVideo;
112
113 uint32 cpuType, cpuName, cpuMajor, cpuMinor, sRsrcCPU;
114
115 uint32 etherType, etherName, etherDrvr, etherDrvrDir, sRsrcEther;
116
117 uint32 sRsrcDir;
118
119 char str[256];
120 p = 0;
121
122 // Board sResource
123 boardType = p; // Literals
124 Word(1); Word(0); Word(0); Word(0); // Board sResource
125 boardName = p;
126 String("Basilisk II Slot ROM");
127 vendorID = p;
128 String("Christian Bauer");
129 revLevel = p;
130 sprintf(str, "V%d.%d", VERSION_MAJOR, VERSION_MINOR);
131 String(str);
132 partNum = p;
133 String("BasiliskII");
134 date = p;
135 String(__DATE__);
136
137 vendorInfo = p; // Vendor Info
138 Offs(0x01, vendorID); // Vendor ID
139 Offs(0x03, revLevel); // Revision level
140 Offs(0x04, partNum); // Part number
141 Offs(0x05, date); // ROM build date
142 EndOfList();
143
144 sRsrcBoard = p;
145 Offs(0x01, boardType); // Board descriptor
146 Offs(0x02, boardName); // Board name
147 Rsrc(0x20, 0x4232); // Board ID ('B2')
148 Offs(0x24, vendorInfo); // Vendor Info
149 EndOfList();
150
151 // Video sResource
152 videoType = p; // Literals
153 Word(3); Word(1); Word(1); Word(0x4232); // Display Video Apple 'B2'
154 videoName = p;
155 String("Display_Video_Apple_Basilisk");
156 minorBase = p;
157 Long(VideoMonitor.mac_frame_base); // Frame buffer base
158 minorLength = p;
159 Long(VideoMonitor.bytes_per_row * VideoMonitor.y); // Frame buffer size
160
161 videoDrvr = p; // Video driver
162 Long(0x72); // Length
163 Word(0x4c00); Word(0); Word(0); Word(0);
164 Word(0x32); // Open offset
165 Word(0x36); // Prime offset
166 Word(0x3a); // Control offset
167 Word(0x46); // Status offset
168 Word(0x6c); // Close offset
169 PString(".Display_Video_Apple_Basilisk");
170 Word(1); // Driver version
171 Word(M68K_EMUL_OP_VIDEO_OPEN); // Open()
172 Word(0x4e75);
173 Word(0x70ff); // Prime()
174 Word(0x600e);
175 Word(M68K_EMUL_OP_VIDEO_CONTROL); // Control()
176 Word(0x0c68); Word(0x0001); Word(0x001a);
177 Word(0x6604);
178 Word(0x4e75);
179 Word(M68K_EMUL_OP_VIDEO_STATUS); // Status()
180 Word(0x3228); Word(0x0006); // IOReturn
181 Word(0x0801); Word(0x0009);
182 Word(0x670c);
183 Word(0x4a40);
184 Word(0x6f02);
185 Word(0x4240);
186 Word(0x3140); Word(0x0010);
187 Word(0x4e75);
188 Word(0x4a40);
189 Word(0x6f04);
190 Word(0x4240);
191 Word(0x4e75);
192 Word(0x2f38); Word(0x08fc);
193 Word(0x4e75);
194 Word(0x70e8); // Close()
195 Word(0x4e75);
196
197 vidDrvrDir = p; // Driver directory
198 Offs(0x02, videoDrvr); // sMacOS68020
199 EndOfList();
200
201 defaultGamma = p; // Gamma table
202 Long(38 + 0x100); // Length
203 Word(0x2000); // Resource ID
204 String("Mac HiRes Std Gamma");
205 Word(0); // Version
206 Word(0); // Type
207 Word(0); // FormulaSize
208 Word(1); // ChanCnt
209 Word(0x0100); // DataCnt
210 Word(8); // ChanWidth
211 Long(0x0005090B); Long(0x0E101315); Long(0x17191B1D); Long(0x1E202224);
212 Long(0x2527282A); Long(0x2C2D2F30); Long(0x31333436); Long(0x37383A3B);
213 Long(0x3C3E3F40); Long(0x42434445); Long(0x4748494A); Long(0x4B4D4E4F);
214 Long(0x50515254); Long(0x55565758); Long(0x595A5B5C); Long(0x5E5F6061);
215 Long(0x62636465); Long(0x66676869); Long(0x6A6B6C6D); Long(0x6E6F7071);
216 Long(0x72737475); Long(0x76777879); Long(0x7A7B7C7D); Long(0x7E7F8081);
217 Long(0x81828384); Long(0x85868788); Long(0x898A8B8C); Long(0x8C8D8E8F);
218 Long(0x90919293); Long(0x94959596); Long(0x9798999A); Long(0x9B9B9C9D);
219 Long(0x9E9FA0A1); Long(0xA1A2A3A4); Long(0xA5A6A6A7); Long(0xA8A9AAAB);
220 Long(0xABACADAE); Long(0xAFB0B0B1); Long(0xB2B3B4B4); Long(0xB5B6B7B8);
221 Long(0xB8B9BABB); Long(0xBCBCBDBE); Long(0xBFC0C0C1); Long(0xC2C3C3C4);
222 Long(0xC5C6C7C7); Long(0xC8C9CACA); Long(0xCBCCCDCD); Long(0xCECFD0D0);
223 Long(0xD1D2D3D3); Long(0xD4D5D6D6); Long(0xD7D8D9D9); Long(0xDADBDCDC);
224 Long(0xDDDEDFDF); Long(0xE0E1E1E2); Long(0xE3E4E4E5); Long(0xE6E7E7E8);
225 Long(0xE9E9EAEB); Long(0xECECEDEE); Long(0xEEEFF0F1); Long(0xF1F2F3F3);
226 Long(0xF4F5F5F6); Long(0xF7F8F8F9); Long(0xFAFAFBFC); Long(0xFCFDFEFF);
227
228 gammaDir = p; // Gamma directory
229 Offs(0x80, defaultGamma);
230 EndOfList();
231
232 vidModeParms = p; // Video mode parameters
233 Long(50); // Length
234 Long(0); // Base offset
235 Word(VideoMonitor.bytes_per_row); // Row bytes
236 Word(0); // Bounds
237 Word(0);
238 Word(VideoMonitor.y);
239 Word(VideoMonitor.x);
240 Word(0); // Version
241 Word(0); // Pack type
242 Long(0); // Pack size
243 Long(0x00480000); // HRes
244 Long(0x00480000); // VRes
245 switch (VideoMonitor.mode) {
246 case VMODE_1BIT:
247 Word(0); // Pixel type (indirect)
248 Word(1); // Pixel size
249 Word(1); // CmpCount
250 Word(1); // CmpSize
251 break;
252 case VMODE_2BIT:
253 Word(0); // Pixel type (indirect)
254 Word(2); // Pixel size
255 Word(1); // CmpCount
256 Word(2); // CmpSize
257 break;
258 case VMODE_4BIT:
259 Word(0); // Pixel type (indirect)
260 Word(4); // Pixel size
261 Word(1); // CmpCount
262 Word(4); // CmpSize
263 break;
264 case VMODE_8BIT:
265 Word(0); // Pixel type (indirect)
266 Word(8); // Pixel size
267 Word(1); // CmpCount
268 Word(8); // CmpSize
269 break;
270 case VMODE_16BIT:
271 Word(16); // Pixel type (direct)
272 Word(16); // Pixel size
273 Word(3); // CmpCount
274 Word(5); // CmpSize
275 break;
276 case VMODE_32BIT:
277 Word(16); // Pixel type (direct)
278 Word(32); // Pixel size
279 Word(3); // CmpCount
280 Word(8); // CmpSize
281 break;
282 }
283 Long(0); // Plane size
284 Long(0); // Reserved
285
286 vidMode = p; // Video mode description
287 Offs(0x01, vidModeParms); // Video parameters
288 Rsrc(0x03, 1); // Page count
289 Rsrc(0x04, IsDirectMode(VideoMonitor.mode) ? 2 :0); // Device type
290 EndOfList();
291
292 sRsrcVideo = p;
293 Offs(0x01, videoType); // Video type descriptor
294 Offs(0x02, videoName); // Driver name
295 Offs(0x04, vidDrvrDir); // Driver directory
296 Rsrc(0x08, 0x4232); // Hardware device ID ('B2')
297 Offs(0x0a, minorBase); // Frame buffer base
298 Offs(0x0b, minorLength); // Frame buffer length
299 Offs(0x40, gammaDir); // Gamma directory
300 Rsrc(0x7d, 6); // Video attributes: Default to color, built-in
301 Offs(0x80, vidMode); // Video mode parameters
302 EndOfList();
303
304 // CPU sResource
305 cpuType = p; // Literals
306 Word(10); Word(3); Word(0); Word(24); // CPU 68020
307 cpuName = p;
308 String("CPU_68020");
309 cpuMajor = p;
310 Long(0); Long(0x7fffffff);
311 cpuMinor = p;
312 Long(0xf0800000); Long(0xf0ffffff);
313
314 sRsrcCPU = p;
315 Offs(0x01, cpuType); // Type descriptor
316 Offs(0x02, cpuName); // CPU name
317 Offs(0x81, cpuMajor); // Major RAM space
318 Offs(0x82, cpuMinor); // Minor RAM space
319 EndOfList();
320
321 // Ethernet sResource
322 etherType = p; // Literals
323 Word(4); Word(1); Word(1); Word(0x4232); // Network Ethernet Apple 'B2'
324 etherName = p;
325 String("Network_Ethernet_Apple_BasiliskII");
326
327 etherDrvr = p; // Video driver
328 Long(0x88); // Length
329 Word(0x4400); Word(0); Word(0); Word(0);
330 Word(0x4a); // Open offset
331 Word(0x4e); // Prime offset
332 Word(0x52); // Control offset
333 Word(0x4e); // Status offset
334 Word(0x82); // Close offset
335 PString(".ENET");
336 Word(0x0111); Word(0x8000); // Driver version
337 Word(0);
338 PString("1.1.1 ");
339 PString("Basilisk II Ethernet Network Driver");
340 Word(M68K_EMUL_OP_ETHER_OPEN); // Open()
341 Word(0x4e75);
342 Word(0x70ef); // Prime()/Status()
343 Word(0x600c);
344 Word(M68K_EMUL_OP_ETHER_CONTROL); // Control()
345 Word(0x0c68); Word(0x0001); Word(0x001a);
346 Word(0x6602);
347 Word(0x4e75);
348 Word(0x3228); Word(0x0006); // IOReturn
349 Word(0x0801); Word(0x0009);
350 Word(0x670c);
351 Word(0x4a40);
352 Word(0x6f02);
353 Word(0x4240);
354 Word(0x3140); Word(0x0010);
355 Word(0x4e75);
356 Word(0x4a40);
357 Word(0x6f04);
358 Word(0x4240);
359 Word(0x4e75);
360 Word(0x2f38); Word(0x08fc);
361 Word(0x4e75);
362 Word(0x70e8); // Close()
363 Word(0x4e75);
364
365 etherDrvrDir = p; // Driver directory
366 Offs(0x02, etherDrvr); // sMacOS68020
367 EndOfList();
368
369 sRsrcEther = p;
370 Offs(0x01, etherType); // Type descriptor
371 Offs(0x02, etherName); // Driver name
372 Offs(0x04, etherDrvrDir); // Driver directory
373 Rsrc(0x07, 2); // Flags: OpenAtStart
374 Rsrc(0x08, 0x4232); // Hardware device ID ('B2')
375 EndOfList();
376
377 // sResource directory
378 sRsrcDir = p;
379 Offs(0x01, sRsrcBoard);
380 Offs(0x80, sRsrcVideo);
381 Offs(0xf0, sRsrcCPU);
382 Offs(0xf1, sRsrcEther);
383 EndOfList();
384
385 // Format/header block
386 Offs(0, sRsrcDir); // sResource directory
387 Long(p + 16); // Length of declaration data
388 Long(0); // CRC (calculated below)
389 Word(0x0101); // Rev. level, format
390 Long(0x5a932bc7); // Test pattern
391 Word(0x000f); // Byte lanes
392
393 // Calculate CRC
394 uint32 crc = 0;
395 for (uint32 i=0; i<p; i++) {
396 crc = (crc << 1) | (crc >> 31);
397 crc += srom[i];
398 }
399 srom[p - 12] = crc >> 24;
400 srom[p - 11] = crc >> 16;
401 srom[p - 10] = crc >> 8;
402 srom[p - 9] = crc;
403
404 // Copy slot ROM to Mac ROM
405 memcpy(ROMBaseHost + ROMSize - p, srom, p);
406 return true;
407 }