![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to sun2-mainbus.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [The Machine Emulator] / tme / machine / sun2|
Return to sun2-mainbus.c CVS log | Up to [The Machine Emulator] / tme / machine / sun2 |
1.1 root 1: /* $Id: sun2-mainbus.c,v 1.10 2003/05/17 20:16:06 fredette Exp $ */
2:
3: /* machine/sun2/sun2-mainbus.c - implementation of Sun 2 emulation: */
4:
5: /*
6: * Copyright (c) 2003 Matt Fredette
7: * All rights reserved.
8: *
9: * Redistribution and use in source and binary forms, with or without
10: * modification, are permitted provided that the following conditions
11: * are met:
12: * 1. Redistributions of source code must retain the above copyright
13: * notice, this list of conditions and the following disclaimer.
14: * 2. Redistributions in binary form must reproduce the above copyright
15: * notice, this list of conditions and the following disclaimer in the
16: * documentation and/or other materials provided with the distribution.
17: * 3. All advertising materials mentioning features or use of this software
18: * must display the following acknowledgement:
19: * This product includes software developed by Matt Fredette.
20: * 4. The name of the author may not be used to endorse or promote products
21: * derived from this software without specific prior written permission.
22: *
23: * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
24: * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
25: * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
26: * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
27: * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
28: * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
29: * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30: * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
31: * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
32: * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
33: * POSSIBILITY OF SUCH DAMAGE.
34: */
35:
36: #include <tme/common.h>
37: _TME_RCSID("$Id: sun2-mainbus.c,v 1.10 2003/05/17 20:16:06 fredette Exp $");
38:
39: /* includes: */
40: #include "sun2-impl.h"
41: #include <tme/ic/am9513.h>
42: #include <tme/ic/z8530.h>
43: #include <tme/ic/mm58167.h>
44: #include <stdio.h>
45:
46: /* macros: */
47:
48: /* a sun2 mainbus connection: */
49: struct tme_sun2_bus_connection {
50:
51: /* the generic bus connection: */
52: struct tme_bus_connection tme_sun2_bus_connection;
53:
54: /* which bus this is: */
55: unsigned int tme_sun2_bus_connection_which;
56: };
57:
58: /* this possibly updates that the interrupt priority level driven to the CPU: */
59: int
60: _tme_sun2_ipl_check(struct tme_sun2 *sun2)
61: {
62: tme_uint16_t ena;
63: unsigned int ipl, ipl_index;
64: tme_uint8_t ipl_mask;
65:
66: /* get the enable register: */
67: ena = sun2->tme_sun2_enable;
68:
69: /* assume that interrupts are completely masked: */
70: ipl = TME_M68K_IPL_NONE;
71:
72: /* if interrupts are enabled: */
73: if (ena & TME_SUN2_ENA_INTS) {
74:
75: /* find the highest ipl now asserted on the buses: */
76: for (ipl = TME_M68K_IPL_MAX;
77: ipl > TME_M68K_IPL_NONE;
78: ipl--) {
79: ipl_index = ipl >> 3;
80: ipl_mask = TME_BIT(ipl & 7);
81: if (sun2->tme_sun2_int_signals[ipl_index] & ipl_mask) {
82: break;
83: }
84: }
85:
86: /* check the soft interrupts: */
87: if (ena & TME_SUN2_ENA_SOFT_INT_3) {
88: ipl = TME_MAX(ipl, 3);
89: }
90: else if (ena & TME_SUN2_ENA_SOFT_INT_2) {
91: ipl = TME_MAX(ipl, 2);
92: }
93: else if (ena & TME_SUN2_ENA_SOFT_INT_1) {
94: ipl = TME_MAX(ipl, 1);
95: }
96: }
97:
98: /* possibly update the CPU: */
99: if (ipl != sun2->tme_sun2_int_ipl_last) {
100: sun2->tme_sun2_int_ipl_last = ipl;
101: return ((*sun2->tme_sun2_m68k->tme_m68k_bus_interrupt)
102: (sun2->tme_sun2_m68k, ipl));
103: }
104: return (TME_OK);
105: }
106:
107: /* our mainbus signal handler: */
108: static int
109: _tme_sun2_bus_signal(struct tme_bus_connection *conn_bus_raiser, unsigned int signal)
110: {
111: struct tme_sun2 *sun2;
112: int signal_asserted;
113: unsigned int ipl, ipl_index;
114: tme_uint8_t ipl_mask;
115:
116: /* recover our sun2: */
117: sun2 = (struct tme_sun2 *) conn_bus_raiser->tme_bus_connection.tme_connection_element->tme_element_private;
118:
119: /* take out the level and edge. all of our signals are active low: */
120: signal_asserted = TRUE;
121: switch (signal & TME_BUS_SIGNAL_LEVEL_MASK) {
122: case TME_BUS_SIGNAL_LEVEL_LOW:
123: case TME_BUS_SIGNAL_LEVEL_ASSERTED:
124: break;
125: case TME_BUS_SIGNAL_LEVEL_HIGH:
126: case TME_BUS_SIGNAL_LEVEL_NEGATED:
127: signal_asserted = FALSE;
128: break;
129: }
130: signal &= ~(TME_BUS_SIGNAL_LEVEL_MASK
131: | TME_BUS_SIGNAL_EDGE);
132:
133: /* dispatch on the signal: */
134:
135: /* halt: */
136: if (signal == TME_BUS_SIGNAL_HALT) {
137: abort();
138: }
139:
140: /* reset: */
141: else if (signal == TME_BUS_SIGNAL_RESET) {
142: abort();
143: }
144:
145: /* an interrupt signal: */
146: else if (TME_BUS_SIGNAL_IS_INT(signal)) {
147: ipl = TME_BUS_SIGNAL_WHICH_INT(signal);
148: if (ipl >= TME_M68K_IPL_MIN
149: && ipl <= TME_M68K_IPL_MAX) {
150:
151: /* update this ipl in the byte array: */
152: ipl_index = ipl >> 3;
153: ipl_mask = TME_BIT(ipl & 7);
154: sun2->tme_sun2_int_signals[ipl_index]
155: = ((sun2->tme_sun2_int_signals[ipl_index]
156: & ~ipl_mask)
157: | (signal_asserted
158: ? ipl_mask
159: : 0));
160:
161: /* possibly update the ipl being driven to the CPU: */
162: return (_tme_sun2_ipl_check(sun2));
163: }
164: }
165:
166: /* an unknown signal: */
167: else {
168: abort();
169: }
170:
171: return (TME_OK);
172: }
173:
174: /* this handles a CPU interrupt acknowledge: */
175: static int
176: _tme_sun2_bus_intack(struct tme_bus_connection *conn_m68k, unsigned int ipl, int *vector)
177: {
178: struct tme_sun2 *sun2;
179: tme_uint16_t ena;
180: int signal;
181: int rc;
182:
183: /* recover our sun2: */
184: sun2 = (struct tme_sun2 *) conn_m68k->tme_bus_connection.tme_connection_element->tme_element_private;
185:
186: /* acknowledge any soft interrupt: */
187: ena = sun2->tme_sun2_enable;
188: if ((ipl == 3
189: && (ena & TME_SUN2_ENA_SOFT_INT_3))
190: || (ipl == 2
191: && (ena & TME_SUN2_ENA_SOFT_INT_2))
192: || (ipl == 1
193: && (ena & TME_SUN2_ENA_SOFT_INT_1))) {
194: *vector = TME_BUS_INTERRUPT_VECTOR_UNDEF;
195: return (TME_OK);
196: }
197:
198: /* turn the ipl into a bus signal number: */
199: signal = TME_BUS_SIGNAL_INT(ipl);
200:
201: /* try the acknowledge on these buses, in order: */
202:
203: /* obio: */
204: rc = (*sun2->tme_sun2_obio->tme_bus_intack)
205: (sun2->tme_sun2_obio, signal, vector);
206: if (rc != ENOENT) {
207: return (rc);
208: }
209: if (sun2->tme_sun2_has_vme) {
210: /* VME: */
211: rc = (*sun2->tme_sun2_vmebus->tme_bus_intack)
212: (sun2->tme_sun2_vmebus, signal, vector);
213: if (rc != ENOENT) {
214: return (rc);
215: }
216: }
217: else {
218: /* mbio: */
219: rc = (*sun2->tme_sun2_mbio->tme_bus_intack)
220: (sun2->tme_sun2_mbio, signal, vector);
221: if (rc != ENOENT) {
222: return (rc);
223: }
224: /* mbmem: */
225: rc = (*sun2->tme_sun2_mbmem->tme_bus_intack)
226: (sun2->tme_sun2_mbmem, signal, vector);
227: if (rc != ENOENT) {
228: return (rc);
229: }
230: }
231:
232: /* done: */
233: return (rc);
234: }
235:
236: /* our command function: */
237: static int
238: _tme_sun2_command(struct tme_element *element, const char * const * args, char **_output)
239: {
240: struct tme_sun2 *sun2;
241: int do_reset;
242:
243: /* recover our sun2: */
244: sun2 = (struct tme_sun2 *) element->tme_element_private;
245:
246: /* assume no reset: */
247: do_reset = FALSE;
248:
249: /* the "power" command: */
250: if (TME_ARG_IS(args[1], "power")) {
251:
252: if (TME_ARG_IS(args[2], "up")
253: && args[3] == NULL) {
254: do_reset = TRUE;
255: }
256:
257: else if (TME_ARG_IS(args[2], "down")
258: && args[3] == NULL) {
259: /* nothing */
260: }
261:
262: /* return an error: */
263: else {
264: tme_output_append_error(_output,
265: "%s %s power [ up | down ]",
266: _("usage:"),
267: args[0]);
268: return (EINVAL);
269: }
270: }
271:
272: /* any other command: */
273: else {
274: if (args[1] != NULL) {
275: tme_output_append_error(_output,
276: "%s '%s', ",
277: _("unknown command"),
278: args[1]);
279: }
280: tme_output_append_error(_output,
281: _("available %s commands: %s"),
282: args[0],
283: "power");
284: return (EINVAL);
285: }
286:
287: if (do_reset) {
288:
289: /* reset the MMU: */
290: _tme_sun2_mmu_reset(sun2);
291:
292: /* reset the CPU: */
293: (*sun2->tme_sun2_m68k->tme_m68k_bus_connection.tme_bus_signal)
294: (&sun2->tme_sun2_m68k->tme_m68k_bus_connection,
295: TME_BUS_SIGNAL_RESET
296: | TME_BUS_SIGNAL_LEVEL_NEGATED
297: | TME_BUS_SIGNAL_EDGE);
298:
299: /* reset all busses: */
300: (*sun2->tme_sun2_obio->tme_bus_signal)
301: (sun2->tme_sun2_obio,
302: TME_BUS_SIGNAL_RESET
303: | TME_BUS_SIGNAL_LEVEL_NEGATED
304: | TME_BUS_SIGNAL_EDGE);
305: (*sun2->tme_sun2_obmem->tme_bus_signal)
306: (sun2->tme_sun2_obmem,
307: TME_BUS_SIGNAL_RESET
308: | TME_BUS_SIGNAL_LEVEL_NEGATED
309: | TME_BUS_SIGNAL_EDGE);
310: if (sun2->tme_sun2_has_vme) {
311: (*sun2->tme_sun2_vmebus->tme_bus_signal)
312: (sun2->tme_sun2_obmem,
313: TME_BUS_SIGNAL_RESET
314: | TME_BUS_SIGNAL_LEVEL_NEGATED
315: | TME_BUS_SIGNAL_EDGE);
316: }
317: else {
318: (*sun2->tme_sun2_mbio->tme_bus_signal)
319: (sun2->tme_sun2_mbio,
320: TME_BUS_SIGNAL_RESET
321: | TME_BUS_SIGNAL_LEVEL_NEGATED
322: | TME_BUS_SIGNAL_EDGE);
323: (*sun2->tme_sun2_mbmem->tme_bus_signal)
324: (sun2->tme_sun2_mbmem,
325: TME_BUS_SIGNAL_RESET
326: | TME_BUS_SIGNAL_LEVEL_NEGATED
327: | TME_BUS_SIGNAL_EDGE);
328: }
329: }
330:
331: return (TME_OK);
332: }
333:
334: /* the connection scorer: */
335: static int
336: _tme_sun2_connection_score(struct tme_connection *conn, unsigned int *_score)
337: {
338: struct tme_m68k_bus_connection *conn_m68k;
339: struct tme_sun2_bus_connection *conn_sun2;
340: struct tme_bus_connection *conn_bus;
341: struct tme_sun2 *sun2;
342: unsigned int score;
343:
344: /* recover our sun2: */
345: sun2 = (struct tme_sun2 *) conn->tme_connection_element->tme_element_private;
346:
347: /* assume that this connection is useless: */
348: score = 0;
349:
350: /* dispatch on the connection type: */
351: conn_m68k = (struct tme_m68k_bus_connection *) conn->tme_connection_other;
352: conn_sun2 = (struct tme_sun2_bus_connection *) conn;
353: conn_bus = (struct tme_bus_connection *) conn->tme_connection_other;
354: switch (conn->tme_connection_type) {
355:
356: /* this must be an m68k chip, and not another bus: */
357: case TME_CONNECTION_BUS_M68K:
358: if (conn_bus->tme_bus_tlb_set_allocate == NULL
359: && conn_m68k->tme_m68k_bus_tlb_fill == NULL) {
360: score = 10;
361: }
362: break;
363:
364: /* this must be a bus, and not a chip: */
365: case TME_CONNECTION_BUS_GENERIC:
366: if (conn_bus->tme_bus_tlb_set_allocate != NULL
367: && conn_bus->tme_bus_tlb_fill != NULL
368: && sun2->tme_sun2_buses[conn_sun2->tme_sun2_bus_connection_which] == NULL) {
369: score = 1;
370: }
371: break;
372:
373: default: abort();
374: }
375:
376: *_score = score;
377: return (TME_OK);
378: }
379:
380: /* this makes a new connection: */
381: static int
382: _tme_sun2_connection_make(struct tme_connection *conn, unsigned int state)
383: {
384: struct tme_sun2 *sun2;
385: struct tme_m68k_bus_connection *conn_m68k;
386: struct tme_sun2_bus_connection *conn_sun2;
387: struct tme_bus_connection *conn_bus;
388: struct tme_connection *conn_other;
389:
390: /* recover our sun2: */
391: sun2 = (struct tme_sun2 *) conn->tme_connection_element->tme_element_private;
392:
393: /* dispatch on the connection type: */
394: conn_other = conn->tme_connection_other;
395: conn_m68k = (struct tme_m68k_bus_connection *) conn_other;
396: conn_sun2 = (struct tme_sun2_bus_connection *) conn;
397: conn_bus = (struct tme_bus_connection *) conn_other;
398: switch (conn->tme_connection_type) {
399:
400: case TME_CONNECTION_BUS_M68K:
401: sun2->tme_sun2_m68k = conn_m68k;
402: break;
403:
404: case TME_CONNECTION_BUS_GENERIC:
405: sun2->tme_sun2_buses[conn_sun2->tme_sun2_bus_connection_which] = conn_bus;
406: break;
407:
408: default: assert(FALSE);
409: }
410: return (TME_OK);
411: }
412:
413: /* this breaks a connection: */
414: static int
415: _tme_sun2_connection_break(struct tme_connection *conn, unsigned int state)
416: {
417: abort();
418: }
419:
420: /* this makes new connection sides: */
421: static int
422: _tme_sun2_connections_new(struct tme_element *element, const char * const *args, struct tme_connection **_conns, char **_output)
423: {
424: struct tme_m68k_bus_connection *conn_m68k;
425: struct tme_sun2_bus_connection *conn_sun2;
426: struct tme_bus_connection *conn_bus;
427: struct tme_connection *conn;
428: struct tme_sun2 *sun2;
429: char *free_buses;
430: int which_bus;
431:
432: /* recover our sun2: */
433: sun2 = (struct tme_sun2 *) element->tme_element_private;
434:
435: /* if we have no arguments and don't have a CPU yet, we can take an m68k connection: */
436: if (args[1] == NULL
437: && sun2->tme_sun2_m68k == NULL) {
438:
439: /* create our side of an m68k bus connection: */
440: conn_m68k = tme_new0(struct tme_m68k_bus_connection, 1);
441: conn_bus = &conn_m68k->tme_m68k_bus_connection;
442: conn = &conn_bus->tme_bus_connection;
443:
444: /* fill in the generic connection: */
445: conn->tme_connection_next = *_conns;
446: conn->tme_connection_type = TME_CONNECTION_BUS_M68K;
447: conn->tme_connection_score = _tme_sun2_connection_score;
448: conn->tme_connection_make = _tme_sun2_connection_make;
449: conn->tme_connection_break = _tme_sun2_connection_break;
450:
451: /* fill in the generic bus connection: */
452: conn_bus->tme_bus_signal = _tme_sun2_bus_signal;
453: conn_bus->tme_bus_intack = _tme_sun2_bus_intack;
454: conn_bus->tme_bus_tlb_set_allocate = _tme_sun2_mmu_tlb_set_allocate;
455:
456: /* full in the m68k bus connection: */
457: conn_m68k->tme_m68k_bus_tlb_fill = _tme_sun2_m68k_tlb_fill;
458:
459: /* add in this connection side possibility: */
460: *_conns = conn;
461: }
462:
463: /* otherwise, we must have an argument and it must be for a bus that
464: we don't have yet: */
465: else {
466:
467: free_buses = NULL;
468: which_bus = -1;
469:
470: if (sun2->tme_sun2_obio == NULL) {
471: tme_output_append(&free_buses, " obio");
472: }
473: if (TME_ARG_IS(args[1], "obio")) {
474: which_bus = TME_SUN2_BUS_OBIO;
475: }
476:
477: if (sun2->tme_sun2_obio == NULL) {
478: tme_output_append(&free_buses, " obmem");
479: }
480: if (TME_ARG_IS(args[1], "obmem")) {
481: which_bus = TME_SUN2_BUS_OBMEM;
482: }
483:
484: if (sun2->tme_sun2_has_vme) {
485:
486: if (sun2->tme_sun2_vmebus == NULL) {
487: tme_output_append(&free_buses, " vme");
488: }
489: if (TME_ARG_IS(args[1], "vme")) {
490: which_bus = TME_SUN2_BUS_VME;
491: }
492:
493: }
494:
495: else {
496:
497: if (sun2->tme_sun2_mbio == NULL) {
498: tme_output_append(&free_buses, " mbio");
499: }
500: if (TME_ARG_IS(args[1], "mbio")) {
501: which_bus = TME_SUN2_BUS_MBIO;
502: }
503:
504: if (sun2->tme_sun2_mbio == NULL) {
505: tme_output_append(&free_buses, " mbmem");
506: }
507: if (TME_ARG_IS(args[1], "mbmem")) {
508: which_bus = TME_SUN2_BUS_MBMEM;
509: }
510: }
511:
512: if (args[1] == NULL
513: || which_bus < 0
514: || sun2->tme_sun2_buses[which_bus] != NULL) {
515: if (free_buses != NULL) {
516: tme_output_append_error(_output,
517: "%s%s",
518: _("remaining buses:"),
519: free_buses);
520: tme_free(free_buses);
521: }
522: else {
523: tme_output_append_error(_output, _("all buses present"));
524: }
525: return (EINVAL);
526: }
527: if (free_buses != NULL) {
528: tme_free(free_buses);
529: }
530:
531: if (args[2] != NULL) {
532: tme_output_append_error(_output,
533: "%s %s",
534: args[2],
535: _("unexpected"));
536: return (EINVAL);
537: }
538:
539: /* create our side of a generic bus connection: */
540: conn_sun2 = tme_new0(struct tme_sun2_bus_connection, 1);
541: conn_bus = &conn_sun2->tme_sun2_bus_connection;
542: conn = &conn_bus->tme_bus_connection;
543: conn->tme_connection_next = *_conns;
544:
545: /* fill in the generic connection: */
546: conn->tme_connection_type = TME_CONNECTION_BUS_GENERIC;
547: conn->tme_connection_score = _tme_sun2_connection_score;
548: conn->tme_connection_make = _tme_sun2_connection_make;
549: conn->tme_connection_break = _tme_sun2_connection_break;
550:
551: /* fill in the generic bus connection: */
552: conn_bus->tme_bus_signal = _tme_sun2_bus_signal;
553: conn_bus->tme_bus_intack = NULL;
554: conn_bus->tme_bus_tlb_set_allocate = _tme_sun2_mmu_tlb_set_allocate;
555: conn_bus->tme_bus_tlb_fill = _tme_sun2_bus_tlb_fill;
556:
557: /* fill in the sun2 connection: */
558: conn_sun2->tme_sun2_bus_connection_which = which_bus;
559:
560: /* add in this connection side possibility: */
561: *_conns = conn;
562: }
563:
564: /* done: */
565: return (TME_OK);
566: }
567:
568: /* this creates a new sun2 element: */
569: TME_ELEMENT_NEW_DECL(tme_machine_sun2) {
570: int usage;
571: struct tme_sun2 *sun2;
572: int sun2_has_vme;
573: const char *idprom_filename;
574: FILE *idprom_fp;
575: tme_uint8_t idprom[TME_SUN_IDPROM_SIZE];
576: int arg_i;
577:
578: arg_i = 1;
579: usage = FALSE;
580:
581: /* our first argument must be either "multibus" or "vme": */
582: sun2_has_vme = FALSE;
583: if (TME_ARG_IS(args[arg_i], "multibus")) {
584: arg_i++;
585: }
586: else if (TME_ARG_IS(args[arg_i], "vme")) {
587: arg_i++;
588: sun2_has_vme = TRUE;
589: }
590: else {
591: usage = TRUE;
592: }
593:
594: /* our second argument is the filename to load our IDPROM contents from: */
595: idprom_filename = args[arg_i++];
596: if (idprom_filename == NULL) {
597: usage = TRUE;
598: }
599:
600: /* we must have no more arguments: */
601: if (args[arg_i] != NULL) {
602: tme_output_append_error(_output,
603: "%s %s, ",
604: args[arg_i],
605: _("unexpected"));
606: usage = TRUE;
607: }
608:
609: /* if our usage was bad: */
610: if (usage) {
611: tme_output_append_error(_output,
612: "%s %s [ multibus | vme ] IDPROM%s",
613: _("usage:"),
614: args[0],
615: _("-FILENAME"));
616: return (EINVAL);
617: }
618:
619: /* try to read in the IDPROM: */
620: idprom_fp = fopen(idprom_filename, "r");
621: if (idprom_fp == NULL) {
622: tme_output_append_error(_output, idprom_filename);
623: return (errno);
624: }
625: if (fread(idprom, sizeof(tme_uint8_t), sizeof(idprom), idprom_fp) != sizeof(idprom)) {
626: tme_output_append_error(_output, idprom_filename);
627: fclose(idprom_fp);
628: return (ENOEXEC);
629: }
630: fclose(idprom_fp);
631:
632: /* allocate and initialize the new sun2: */
633: sun2 = tme_new0(struct tme_sun2, 1);
634: sun2->tme_sun2_element = element;
635:
636: /* set the VME flag: */
637: sun2->tme_sun2_has_vme = sun2_has_vme;
638:
639: /* set the IDPROM: */
640: memcpy(sun2->tme_sun2_idprom_contents, idprom, sizeof(idprom));
641:
642: /* the system and user context registers: */
643: sun2->tme_sun2_context_system = 0;
644: sun2->tme_sun2_context_user = 0;
645:
646: /* the diagnostics register: */
647: sun2->tme_sun2_diag = 0;
648:
649: /* the bus error register: */
650: sun2->tme_sun2_buserr = 0;
651:
652: /* the enable register: */
653: sun2->tme_sun2_enable = 0;
654:
655: /* the MMU: */
656: _tme_sun2_mmu_new(sun2);
657:
658: /* the busses: */
659: sun2->tme_sun2_obio = NULL;
660: sun2->tme_sun2_obmem = NULL;
661: sun2->tme_sun2_mbio = NULL;
662: sun2->tme_sun2_mbmem = NULL;
663: sun2->tme_sun2_vmebus = NULL;
664:
665: /* we don't have the CPU's reset TLBs yet: */
666: sun2->tme_sun2_reset_tlbs = NULL;
667:
668: /* fill the element: */
669: element->tme_element_private = sun2;
670: element->tme_element_connections_new = _tme_sun2_connections_new;
671: element->tme_element_command = _tme_sun2_command;
672:
673: return (TME_OK);
674: }
675:
676: /* this creates a new Sun-2 am9513: */
677: TME_ELEMENT_SUB_NEW_DECL(tme_machine_sun2,clock) {
678: struct tme_am9513_socket socket;
679: char *sub_args[2];
680:
681: /* create the am9513 socket: */
682: socket.tme_am9513_socket_version = TME_AM9513_SOCKET_0;
683: socket.tme_am9513_socket_address_cmd = 2;
684: socket.tme_am9513_socket_address_data = 0;
685: socket.tme_am9513_socket_port_least_lane = 0; /* D7-D0 */
686: socket.tme_am9513_socket_basic_clock = (19660800 / 4);
687:
688: /* Timer 1 is connected to the bus as ipl 7 (inverted): */
689: socket.tme_am9513_socket_counter_signals[0] =
690: TME_BUS_SIGNAL_INT(7) | TME_BUS_SIGNAL_LEVEL_INVERTED;
691:
692: /* Timer 2 is connected to the bus as ipl 5 (inverted): */
693: socket.tme_am9513_socket_counter_signals[1] =
694: TME_BUS_SIGNAL_INT(5) | TME_BUS_SIGNAL_LEVEL_INVERTED;
695:
696: /* Timer 3 is connected to the bus as ???: */
697: socket.tme_am9513_socket_counter_signals[2] = TME_BUS_SIGNAL_ABORT;
698:
699: /* Timer 4 is connected to the bus as ???: */
700: socket.tme_am9513_socket_counter_signals[3] = TME_BUS_SIGNAL_ABORT;
701:
702: /* Timer 5 is connected to the bus as ???: */
703: socket.tme_am9513_socket_counter_signals[4] = TME_BUS_SIGNAL_ABORT;
704:
705: /* create the am9513: */
706: sub_args[0] = "tme/ic/am9513";
707: sub_args[1] = NULL;
708: return (tme_element_new(element, (const char * const *) sub_args, &socket, _output));
709: }
710:
711: /* this creates a new Sun-2 mm58167: */
712: TME_ELEMENT_SUB_NEW_DECL(tme_machine_sun2,tod) {
713: struct tme_mm58167_socket socket;
714: char *sub_args[2];
715:
716: /* create the mm58167 socket: */
717: socket.tme_mm58167_socket_version = TME_MM58167_SOCKET_0;
718: socket.tme_mm58167_socket_addr_shift = 1;
719: socket.tme_mm58167_socket_port_least_lane = 1; /* D15-D8 */
720:
721: /* create the mm58167: */
722: sub_args[0] = "tme/ic/mm58167";
723: sub_args[1] = NULL;
724: return (tme_element_new(element, (const char * const *) sub_args, &socket, _output));
725: }
726:
727: /* this creates a new Sun-2 z8530: */
728: TME_ELEMENT_SUB_NEW_DECL(tme_machine_sun2,zs) {
729: struct tme_z8530_socket socket;
730: char *sub_args[2];
731:
732: /* create the z8530 socket: */
733: socket.tme_z8530_socket_version = TME_Z8530_SOCKET_0;
734: socket.tme_z8530_socket_address_chan_a = 4;
735: socket.tme_z8530_socket_address_chan_b = 0;
736: socket.tme_z8530_socket_offset_csr = 0;
737: socket.tme_z8530_socket_offset_data = 2;
738: socket.tme_z8530_socket_port_least_lane = 1; /* D15-D8 */
739: socket.tme_z8530_socket_pclk = (9600 * 512);
740:
741: /* create the z8530: */
742: sub_args[0] = "tme/ic/z8530";
743: sub_args[1] = NULL;
744: return (tme_element_new(element, (const char * const *) sub_args, &socket, _output));
745: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.