summaryrefslogtreecommitdiff
path: root/sys
diff options
context:
space:
mode:
authorbriggs <briggs@cvs.openbsd.org>1996-05-26 18:14:44 +0000
committerbriggs <briggs@cvs.openbsd.org>1996-05-26 18:14:44 +0000
commitb6700f4a6dad1f781af611627f1b245f0bfcb1f2 (patch)
treeeafc30749b1b1fd3d326929c6c45a42e7c0c5050 /sys
parent7aade6e6e58d423c865758a97a7ba25c54343b63 (diff)
Sync with NetBSD-current.
Diffstat (limited to 'sys')
-rw-r--r--sys/arch/mac68k/conf/GENERIC22
-rw-r--r--sys/arch/mac68k/conf/Makefile.mac68k26
-rw-r--r--sys/arch/mac68k/conf/OCELOT16
-rw-r--r--sys/arch/mac68k/conf/PUMA18
-rw-r--r--sys/arch/mac68k/conf/RAMDISK17
-rw-r--r--sys/arch/mac68k/conf/SPOT94
-rw-r--r--sys/arch/mac68k/conf/files.mac68k87
-rw-r--r--sys/arch/mac68k/conf/std.mac68k20
-rw-r--r--sys/arch/mac68k/dev/adb.c68
-rw-r--r--sys/arch/mac68k/dev/adbsys.c69
-rw-r--r--sys/arch/mac68k/dev/adbvar.h25
-rw-r--r--sys/arch/mac68k/dev/asc.c49
-rw-r--r--sys/arch/mac68k/dev/grf.c187
-rw-r--r--sys/arch/mac68k/dev/grf_iv.c63
-rw-r--r--sys/arch/mac68k/dev/grf_mv.c130
-rw-r--r--sys/arch/mac68k/dev/grfvar.h70
-rw-r--r--sys/arch/mac68k/dev/if_ae.c80
-rw-r--r--sys/arch/mac68k/dev/if_sn.c205
-rw-r--r--sys/arch/mac68k/dev/ite.c625
-rw-r--r--sys/arch/mac68k/dev/mac68k5380.c293
-rw-r--r--sys/arch/mac68k/dev/ncr5380.c224
-rw-r--r--sys/arch/mac68k/dev/ncr5380reg.h16
-rw-r--r--sys/arch/mac68k/dev/nubus.c127
-rw-r--r--sys/arch/mac68k/dev/nubus.h17
-rw-r--r--sys/arch/mac68k/dev/rd_root.c5
-rw-r--r--sys/arch/mac68k/dev/scsi.c1224
-rw-r--r--sys/arch/mac68k/dev/scsi96.c49
-rw-r--r--sys/arch/mac68k/dev/ser.c2033
-rw-r--r--sys/arch/mac68k/dev/serreg.h52
-rw-r--r--sys/arch/mac68k/dev/z8530reg.h83
-rw-r--r--sys/arch/mac68k/include/adbsys.h11
-rw-r--r--sys/arch/mac68k/include/autoconf.h84
-rw-r--r--sys/arch/mac68k/include/cdefs.h8
-rw-r--r--sys/arch/mac68k/include/cpu.h50
-rw-r--r--sys/arch/mac68k/include/disklabel.h8
-rw-r--r--sys/arch/mac68k/include/exec.h8
-rw-r--r--sys/arch/mac68k/include/float.h8
-rw-r--r--sys/arch/mac68k/include/frame.h7
-rw-r--r--sys/arch/mac68k/include/keyboard.h6
-rw-r--r--sys/arch/mac68k/include/param.h10
-rw-r--r--sys/arch/mac68k/include/pcb.h6
-rw-r--r--sys/arch/mac68k/include/pmap.h32
-rw-r--r--sys/arch/mac68k/include/profile.h8
-rw-r--r--sys/arch/mac68k/include/psl.h41
-rw-r--r--sys/arch/mac68k/include/pte.h8
-rw-r--r--sys/arch/mac68k/include/reg.h14
-rw-r--r--sys/arch/mac68k/include/scsi96reg.h8
-rw-r--r--sys/arch/mac68k/include/types.h8
-rw-r--r--sys/arch/mac68k/include/viareg.h (renamed from sys/arch/mac68k/mac68k/via.h)30
-rw-r--r--sys/arch/mac68k/include/z8530var.h106
-rw-r--r--sys/arch/mac68k/mac68k/autoconf.c296
-rw-r--r--sys/arch/mac68k/mac68k/clock.c165
-rw-r--r--sys/arch/mac68k/mac68k/clockreg.h17
-rw-r--r--sys/arch/mac68k/mac68k/conf.c25
-rw-r--r--sys/arch/mac68k/mac68k/disksubr.c38
-rw-r--r--sys/arch/mac68k/mac68k/fpu.c31
-rw-r--r--sys/arch/mac68k/mac68k/genassym.c94
-rw-r--r--sys/arch/mac68k/mac68k/locore.s92
-rw-r--r--sys/arch/mac68k/mac68k/macglobals.s8
-rw-r--r--sys/arch/mac68k/mac68k/machdep.c580
-rw-r--r--sys/arch/mac68k/mac68k/macrom.c729
-rw-r--r--sys/arch/mac68k/mac68k/macrom.h100
-rw-r--r--sys/arch/mac68k/mac68k/macromasm.s51
-rw-r--r--sys/arch/mac68k/mac68k/pmap.c295
-rw-r--r--sys/arch/mac68k/mac68k/pmap_bootstrap.c114
-rw-r--r--sys/arch/mac68k/mac68k/pram.c5
-rw-r--r--sys/arch/mac68k/mac68k/pram.h5
-rw-r--r--sys/arch/mac68k/mac68k/swapgeneric.c24
-rw-r--r--sys/arch/mac68k/mac68k/sys_machdep.c35
-rw-r--r--sys/arch/mac68k/mac68k/trap.c41
-rw-r--r--sys/arch/mac68k/mac68k/via.c218
-rw-r--r--sys/arch/mac68k/mac68k/vm_machdep.c32
72 files changed, 3776 insertions, 5674 deletions
diff --git a/sys/arch/mac68k/conf/GENERIC b/sys/arch/mac68k/conf/GENERIC
index 7b5363e62e9..0c3b7e45f4d 100644
--- a/sys/arch/mac68k/conf/GENERIC
+++ b/sys/arch/mac68k/conf/GENERIC
@@ -1,4 +1,4 @@
-# $NetBSD: GENERIC,v 1.32 1995/11/21 05:00:37 briggs Exp $
+# $NetBSD: GENERIC,v 1.37 1996/05/19 22:29:04 scottr Exp $
#
# GENERIC
@@ -49,10 +49,12 @@ options COMPAT_43
options NS
options MAPMEM
options SYSVSHM,SYSVSEM,SYSVMSG
+options PPP_BSDCOMP,PPP_DEFLATE
# Mac-specific options
options M68040
-options M68030 # Includes the 020+851
+options M68030
+options M68020 # Must have 68851 PMMU
options FPSP
options FPU_EMULATE
options COMPAT_NOMID
@@ -64,12 +66,19 @@ options MACHINE_NONCONTIG
config bsd swap generic
options GENERIC
-ae* at nubus0 slot -1 id ? claimed 0
+sn0 at obio? # SONIC ethernet (68040)
-sn0 at mainbus? # SONIC ethernet (68040)
+intvid0 at obio? # Internal video hardware
+grf* at intvid?
-ncrscsi0 at mainbus? # SCSI NCR 5380
-ncr96scsi0 at mainbus? # SCSI NCR 53C96
+nubus0 at mainbus?
+
+ae* at nubus?
+macvid* at nubus?
+grf* at macvid?
+
+ncrscsi0 at obio? # SCSI NCR 5380
+ncr96scsi0 at obio? # SCSI NCR 53C96
scsibus* at scsi?
sd* at scsibus? target ? lun ?
@@ -77,7 +86,6 @@ st* at scsibus? target ? lun ?
cd* at scsibus? target ? lun ?
ch* at scsibus? target ? lun ?
ss* at scsibus? target ? lun ?
-su* at scsibus? target ? lun ?
uk* at scsibus? target ? lun ?
pseudo-device pty 16
diff --git a/sys/arch/mac68k/conf/Makefile.mac68k b/sys/arch/mac68k/conf/Makefile.mac68k
index afdc4e51d05..13f0f1ea435 100644
--- a/sys/arch/mac68k/conf/Makefile.mac68k
+++ b/sys/arch/mac68k/conf/Makefile.mac68k
@@ -1,4 +1,4 @@
-# $NetBSD: Makefile.mac68k,v 1.34 1996/02/09 02:21:26 mycroft Exp $
+# $NetBSD: Makefile.mac68k,v 1.38 1996/05/11 16:12:20 mycroft Exp $
# Makefile for NetBSD
#
@@ -21,13 +21,12 @@
# DEBUG is set to -g if debugging.
# PROF is set to -pg if profiling.
-AS= as
-AWK= awk
-CC= cc
-CPP= cpp
-LD= ld
-STRIP= strip -d
-TOUCH= touch -f -c
+AS?= as
+CC?= cc
+CPP?= cpp
+LD?= ld
+STRIP?= strip -d
+TOUCH?= touch -f -c
# source tree is located via $S relative to the compilation directory
S= ../../../..
@@ -35,8 +34,9 @@ MAC68K= ../..
INCLUDES= -I. -I$S/arch -I$S
CPPFLAGS= ${INCLUDES} ${IDENT} -D_KERNEL -Dmc68020 -Dmac68k
-CFLAGS= ${DEBUG} -O -Werror -msoft-float
-AFLAGS= -x assembler-with-cpp -traditional-cpp -DLOCORE
+GCCWFLAGS= -Wall -Wstrict-prototypes -Wmissing-prototypes -Wno-uninitialized
+CFLAGS= ${DEBUG} -O ${GCCWFLAGS} -msoft-float
+AFLAGS= -x assembler-with-cpp -traditional-cpp -D_LOCORE
LINKFLAGS= -n -Ttext 0 -e start
### Find out what to use for libkern.
@@ -150,7 +150,7 @@ links:
SRCS= ${MAC68K}/mac68k/locore.s \
param.c ioconf.c ${CFILES} ${SFILES}
-depend: .depend
+depend:: .depend
.depend: ${SRCS} assym.h param.c
mkdep ${AFLAGS} ${CPPFLAGS} ${MAC68K}/mac68k/locore.s
mkdep -a ${CFLAGS} ${CPPFLAGS} param.c ioconf.c ${CFILES}
@@ -162,9 +162,7 @@ depend: .depend
autoconf.o conf.o: Makefile
# depend on network or filesystem configuration
-uipc_domain.o uipc_proto.o vfs_conf.o: Makefile
-if_tun.o if_loop.o if_ethersubr.o: Makefile
-in_proto.o: Makefile
+uipc_proto.o vfs_conf.o: Makefile
# depend on maxusers
genassym.o machdep.o: Makefile
diff --git a/sys/arch/mac68k/conf/OCELOT b/sys/arch/mac68k/conf/OCELOT
index 46654b0dd08..c672d038e67 100644
--- a/sys/arch/mac68k/conf/OCELOT
+++ b/sys/arch/mac68k/conf/OCELOT
@@ -1,4 +1,4 @@
-# $NetBSD: OCELOT,v 1.6 1995/11/21 05:00:34 briggs Exp $
+# $NetBSD: OCELOT,v 1.10 1996/05/19 22:29:06 scottr Exp $
#
# OCELOT
@@ -40,7 +40,7 @@ options SYSVSHM,SYSVSEM,SYSVMSG
# Mac-specific options
options M68040
-options M68030 # Includes the 020+851
+options M68030
options COMPAT_NOMID
options COMPAT_SUNOS
options COMPAT_09
@@ -49,8 +49,16 @@ options MACHINE_NONCONTIG
config bsd swap generic
-ae0 at nubus0 slot -1 id ? claimed 0
-ae1 at nubus0 slot -1 id ? claimed 0
+intvid0 at obio? # Internal video hardware
+
+nubus0 at mainbus?
+
+ae* at nubus?
+macvid* at nubus?
+
+# Attach grf semantics to all video hardware as it is found
+grf* at intvid?
+grf* at macvid?
ncrscsi0 at mainbus? # SCSI NCR 5380
ncr96scsi0 at mainbus? # SCSI NCR 53C96
diff --git a/sys/arch/mac68k/conf/PUMA b/sys/arch/mac68k/conf/PUMA
index d8b4bffccee..a5ace910f90 100644
--- a/sys/arch/mac68k/conf/PUMA
+++ b/sys/arch/mac68k/conf/PUMA
@@ -1,4 +1,4 @@
-# $NetBSD: PUMA,v 1.7 1995/11/21 05:00:36 briggs Exp $
+# $NetBSD: PUMA,v 1.12 1996/05/19 22:29:07 scottr Exp $
#
# PUMA
@@ -40,7 +40,7 @@ options MAPMEM
options SYSVSHM,SYSVSEM,SYSVMSG
# Mac-specific options
-options M68030 # Includes the 020+851
+options M68030
options MACHINE_NONCONTIG
options COMPAT_NOMID
options COMPAT_SUNOS
@@ -49,9 +49,14 @@ options COMPAT_10
config bsd root on sd0 swap on sd0 and sd1 and vnd0a dumps on sd1b
-ae* at nubus0 slot -1 id ? claimed 0
+nubus0 at mainbus?
-ncrscsi0 at mainbus? # SCSI NCR 5380
+ae* at nubus?
+macvid* at nubus?
+
+grf* at macvid?
+
+ncrscsi0 at obio? # SCSI NCR 5380
scsibus* at scsi?
sd* at scsibus? target ? lun ?
@@ -64,3 +69,8 @@ pseudo-device vnd 4
pseudo-device loop
pseudo-device ppp
pseudo-device sl
+
+# Puma-specific options
+
+# Try linked commands on all targets
+options TRY_SCSI_LINKED_COMMANDS=0x7f
diff --git a/sys/arch/mac68k/conf/RAMDISK b/sys/arch/mac68k/conf/RAMDISK
index 39233c7f48e..e56934e2b5d 100644
--- a/sys/arch/mac68k/conf/RAMDISK
+++ b/sys/arch/mac68k/conf/RAMDISK
@@ -1,4 +1,4 @@
-# $NetBSD: RAMDISK,v 1.1 1995/11/21 05:02:02 briggs Exp $
+# $NetBSD: RAMDISK,v 1.5 1996/05/19 22:29:08 scottr Exp $
# RAMDISK
# Support Root/swap on ramdisk
@@ -31,7 +31,8 @@ options TCP_COMPAT_42 # compatibility with 4.2BSD TCP/IP
# Mac-specific options
options M68040
-options M68030 # Includes the 020+851
+options M68030
+options M68020 # Must have 68851 PMMU
options FPSP
options FPU_EMULATE
options COMPAT_09
@@ -40,9 +41,16 @@ options MACHINE_NONCONTIG
config bsd root on rd0a swap on rd0b
-rd0 at mainbus?
+intvid0 at obio? # Internal video hardware
-ae* at nubus0 slot -1 id ? claimed 0
+nubus0 at mainbus?
+
+ae* at nubus?
+macvid* at nubus?
+
+# Attach grf semantics to all video hardware as it is found
+grf* at intvid?
+grf* at macvid?
ncrscsi0 at mainbus? # SCSI NCR 5380
ncr96scsi0 at mainbus? # SCSI NCR 53C96
@@ -53,6 +61,7 @@ st* at scsibus? target ? lun ?
cd* at scsibus? target ? lun ?
ch* at scsibus? target ? lun ?
+pseudo-device rd 2
pseudo-device ppp
pseudo-device sl
pseudo-device loop
diff --git a/sys/arch/mac68k/conf/SPOT b/sys/arch/mac68k/conf/SPOT
new file mode 100644
index 00000000000..a3c107533d9
--- /dev/null
+++ b/sys/arch/mac68k/conf/SPOT
@@ -0,0 +1,94 @@
+# $NetBSD: SPOT,v 1.8 1996/05/20 03:23:36 scottr Exp $
+#
+# SPOT
+
+include "std.mac68k"
+
+maxusers 16
+
+makeoptions CC="cc -m68030"
+options MAXFDESCS=2048
+
+# Standard system options
+options SWAPPAGER, VNODEPAGER, DEVPAGER # paging
+options DIAGNOSTIC # DEBUG for extra kernel debugging
+options KTRACE # system call tracing support
+#options KGDB # support for kernel gdb
+#options GDB # support for normal gdb
+#options KGDBDEV=0xc01, KGDBRATE=38400 # device & baud rate
+
+# Filesystem options
+options FIFO # POSIX fifo support (in all filesystems)
+options DDB
+options FFS
+options QUOTA # fast filesystem with user and group quotas
+options MFS # memory-based filesystem
+#options NFSSERVER # Sun NFS-compatible filesystem
+#options NFSCLIENT # Sun NFS-compatible filesystem
+#options NULLFS # Null (formerly loop-back) filesystem
+options CD9660 # ISO-9660 w/ RockRidge
+options KERNFS # kernel data-structure filesystem
+options FDESC # user file descriptor filesystem
+#options UMAPFS # uid/gid remapping filesystem
+#options LFS # Log-based filesystem (still experimental)
+#options PORTAL # portal filesystem (still experimental)
+options PROCFS # Process filesystem
+
+options SCSI
+#options SCSIDEBUG
+#options NCR5380_DEBUG
+#options SBC_DEBUG
+
+# Networking options
+options INET
+options TCP_COMPAT_42 # compatibility with 4.2BSD TCP/IP
+options GATEWAY # IP packet forwarding
+#options ISO # OSI networking
+#options TPIP
+#options EON
+options PPP_BSDCOMP
+#options PPP_DEFLATE
+options COMPAT_42
+options COMPAT_43
+#options NS
+options MAPMEM
+options SYSVSHM,SYSVSEM,SYSVMSG
+
+# Mac-specific options
+options M68030
+options COMPAT_NOMID
+options COMPAT_SUNOS
+options COMPAT_09
+options COMPAT_10
+options MACHINE_NONCONTIG
+
+config bsd swap generic
+options GENERIC
+
+intvid0 at obio? # Internal video hardware
+
+nubus0 at mainbus?
+
+ae* at nubus?
+macvid* at nubus?
+
+# Attach grf semantics to all video hardware as it is found
+grf* at intvid?
+grf* at macvid?
+
+#ncrscsi0 at obio? # SCSI NCR 5380
+#ncr96scsi0 at obio? # SCSI NCR 53C96
+sbc0 at obio? flags 0x1 # MI NCR 5380 SCSI Bus Controller
+
+scsibus* at scsi?
+sd* at scsibus? target ? lun ?
+st* at scsibus? target ? lun ?
+cd* at scsibus? target ? lun ?
+ch* at scsibus? target ? lun ?
+
+pseudo-device pty 32
+pseudo-device bpfilter 16
+pseudo-device vnd 2
+pseudo-device ppp 2
+pseudo-device loop
+#pseudo-device sl
diff --git a/sys/arch/mac68k/conf/files.mac68k b/sys/arch/mac68k/conf/files.mac68k
index 98992087763..feec7ae9fa1 100644
--- a/sys/arch/mac68k/conf/files.mac68k
+++ b/sys/arch/mac68k/conf/files.mac68k
@@ -1,4 +1,4 @@
-# $NetBSD: files.mac68k,v 1.39 1996/02/07 16:34:28 scottr Exp $
+# $NetBSD: files.mac68k,v 1.48 1996/05/19 22:29:10 scottr Exp $
# mac68k-specific configuration info
@@ -7,50 +7,88 @@ maxpartitions 8
maxusers 2 8 64
-device mainbus at root { } # no locators (yet?)
+device mainbus { } # no locators (yet?)
+attach mainbus at root
-device nubus at mainbus { slot = -1, id = -1, claimed = 0 }
-file arch/mac68k/dev/nubus.c nubus
+device obio {}
+attach obio at mainbus
+file arch/mac68k/dev/obio.c obio
-device ser at mainbus: tty
-file arch/mac68k/dev/ser.c ser needs-flag
+device nubus {}
+attach nubus at mainbus
+file arch/mac68k/dev/nubus.c nubus
-device adb at mainbus
+device adb
+attach adb at obio
file arch/mac68k/dev/adb.c adb
file arch/mac68k/dev/adbsys.c
file arch/mac68k/dev/adbsysasm.s
-device asc at mainbus
+device asc
+attach asc at obio
file arch/mac68k/dev/asc.c asc
-device fpu at mainbus
-file arch/mac68k/mac68k/fpu.c fpu
+define grfbus {}
+file arch/mac68k/dev/grf_subr.c grfbus
-device grf at nubus
-file arch/mac68k/dev/grf.c grf needs-count
-file arch/mac68k/dev/grf_mv.c grf
-file arch/mac68k/dev/grf_iv.c grf
-device ite at mainbus
-file arch/mac68k/dev/ite.c ite needs-flag
+device intvid: grfbus
+attach intvid at obio
+file arch/mac68k/dev/grf_iv.c intvid
+
+device macvid: grfbus
+attach macvid at nubus
+file arch/mac68k/dev/grf_mv.c macvid
+
+device grf {} # eventually, we'll attach ITEs here
+attach grf at grfbus
+file arch/mac68k/dev/grf.c grf needs-flag
-device ae at nubus: ifnet, ether
+device ae: ifnet, ether
+attach ae at nubus
file arch/mac68k/dev/if_ae.c ae needs-flag
-device sn at mainbus: ifnet, ether
+device ite
+attach ite at obio
+file arch/mac68k/dev/ite.c ite needs-flag
+
+device sn: ifnet, ether
+attach sn at obio
file arch/mac68k/dev/if_sn.c sn needs-flag
include "../../../scsi/files.scsi"
-device ncrscsi at mainbus: scsi
+# Option 1 for ncr5380 support
+device ncrscsi: scsi
+attach ncrscsi at obio
file arch/mac68k/dev/mac68k5380.c ncrscsi needs-flag
-device ncr96scsi at mainbus: scsi
+# Option 2 for ncr5380 support
+device sbc: scsi, ncr5380sbc
+attach sbc at obio
+file arch/mac68k/dev/sbc.c sbc
+
+device ncr96scsi: scsi
+attach ncr96scsi at obio
file arch/mac68k/dev/scsi96.c ncr96scsi needs-flag
-device sbc at mainbus: scsi, ncr5380sbc
-file arch/mac68k/dev/ncr_sbc.c sbc
+device zsc { channel = -1 }
+attach zsc at obio
+file arch/mac68k/dev/zs.c zsc needs-flag
+file arch/mac68k/dev/z8530sc.c zsc
+#file dev/ic/z8530sc.c zsc
+
+device zstty: tty
+attach zstty at zsc
+file arch/mac68k/dev/z8530tty.c zstty needs-flag
+#file dev/ic/z8530tty.c zstty needs-flag
+
+# This one is out of alphabetical order
+device fpu
+attach fpu at obio
+file arch/mac68k/mac68k/fpu.c fpu
file arch/m68k/m68k/copy.s
+file arch/m68k/m68k/db_memrw.c ddb
include "../../m68k/fpe/files.fpe"
file arch/mac68k/mac68k/autoconf.c
@@ -74,8 +112,9 @@ file dev/cons.c
file dev/cninit.c
# RAM Disk for installs
-device rd at mainbus
-file dev/ramdisk.c rd needs-count
+# These files are out of order
+pseudo-device rd
+file dev/ramdisk.c rd needs-flag
file arch/mac68k/dev/rd_root.c ramdisk_hooks
major {sd = 4}
diff --git a/sys/arch/mac68k/conf/std.mac68k b/sys/arch/mac68k/conf/std.mac68k
index 96abcb3619f..e51dbf79012 100644
--- a/sys/arch/mac68k/conf/std.mac68k
+++ b/sys/arch/mac68k/conf/std.mac68k
@@ -1,4 +1,4 @@
-# $NetBSD: std.mac68k,v 1.8 1995/11/21 05:05:51 briggs Exp $
+# $NetBSD: std.mac68k,v 1.12 1996/05/18 18:53:56 briggs Exp $
#
# standard Macintosh information.
# roughly copied from std.sparc 14 Oct 1993.
@@ -7,17 +7,15 @@ machine mac68k m68k
mainbus0 at root
-nubus0 at mainbus0
-ite0 at mainbus0
-adb0 at mainbus0
+# on-board I/O
+obio0 at mainbus?
-fpu0 at mainbus0
-
-asc0 at mainbus0
-
-ser0 at mainbus0
-grf0 at nubus0 slot -1 id ? claimed 0
-grf1 at nubus0 slot -1 id ? claimed 0
+adb0 at obio?
+asc0 at obio?
+fpu0 at obio?
+ite0 at obio?
+zsc0 at obio?
+zstty* at zsc? channel ?
options TIMEZONE=0 # minutes west of GMT--read from booter
options DST=0 # daylight savings rules--obsolete
diff --git a/sys/arch/mac68k/dev/adb.c b/sys/arch/mac68k/dev/adb.c
index 8e75d7df8ab..44e1f721d58 100644
--- a/sys/arch/mac68k/dev/adb.c
+++ b/sys/arch/mac68k/dev/adb.c
@@ -1,4 +1,4 @@
-/* $NetBSD: adb.c,v 1.5 1995/11/01 04:40:21 briggs Exp $ */
+/* $NetBSD: adb.c,v 1.9 1996/05/05 16:21:20 briggs Exp $ */
/*-
* Copyright (C) 1994 Bradley A. Grantham
@@ -35,18 +35,22 @@ e* notice, this list of conditions and the following disclaimer in the
#include <sys/fcntl.h>
#include <sys/select.h>
#include <sys/proc.h>
+#include <sys/signalvar.h>
#include <sys/systm.h>
#include <machine/adbsys.h>
+#include <machine/autoconf.h>
#include <machine/keyboard.h>
#include "adbvar.h"
+#include "itevar.h"
#include "../mac68k/macrom.h"
/*
* Function declarations.
*/
-static void adbattach __P((struct device *parent, struct device *dev, void *aux));
+static int adbmatch __P((struct device *, void *, void *));
+static void adbattach __P((struct device *, struct device *, void *));
/*
* Global variables.
@@ -80,13 +84,23 @@ static int adb_rptinterval = 6; /* ticks between auto-repeat */
static int adb_repeating = -1; /* key that is auto-repeating */
static adb_event_t adb_rptevent;/* event to auto-repeat */
-extern int matchbyname();
+/* Driver definition. -- This should probably be a bus... */
+struct cfattach adb_ca = {
+ sizeof(struct device), adbmatch, adbattach
+};
-/* Driver definition. */
-struct cfdriver adbcd = {
- NULL, "adb", matchbyname, adbattach, DV_DULL, sizeof(struct device),
+struct cfdriver adb_cd = {
+ NULL, "adb", DV_DULL
};
+static int
+adbmatch(pdp, match, auxp)
+ struct device *pdp;
+ void *match, *auxp;
+{
+ return 1;
+}
+
static void
adbattach(parent, dev, aux)
struct device *parent, *dev;
@@ -308,22 +322,34 @@ adb_processevent(event)
*/
max_byte = event->byte_count;
button_bit = 1;
- /* Classic Mouse Protocol (up to 2 buttons) */
- for (i = 0; i < 2; i++, button_bit <<= 1)
- /* 0 when button down */
- if (!(event->bytes[i] & 0x80))
- buttons |= button_bit;
- else
- buttons &= ~button_bit;
- /* Extended Protocol (up to 6 more buttons) */
- for (mask = 0x80; i < max_byte;
- i += (mask == 0x80), button_bit <<= 1) {
- /* 0 when button down */
- if (!(event->bytes[i] & mask))
- buttons |= button_bit;
+ switch (event->hand_id) {
+ case ADBMS_USPEED:
+ /* MicroSpeed mouse */
+ if (max_byte == 4)
+ buttons = (~event->bytes[2]) & 0xff;
else
- buttons &= ~button_bit;
- mask = ((mask >> 4) & 0xf) | ((mask & 0xf) << 4);
+ buttons = (event->bytes[0] & 0x80) ? 0 : 1;
+ break;
+ default:
+ /* Classic Mouse Protocol (up to 2 buttons) */
+ for (i = 0; i < 2; i++, button_bit <<= 1)
+ /* 0 when button down */
+ if (!(event->bytes[i] & 0x80))
+ buttons |= button_bit;
+ else
+ buttons &= ~button_bit;
+ /* Extended Protocol (up to 6 more buttons) */
+ for (mask = 0x80; i < max_byte;
+ i += (mask == 0x80), button_bit <<= 1) {
+ /* 0 when button down */
+ if (!(event->bytes[i] & mask))
+ buttons |= button_bit;
+ else
+ buttons &= ~button_bit;
+ mask = ((mask >> 4) & 0xf)
+ | ((mask & 0xf) << 4);
+ }
+ break;
}
new_event.u.m.buttons = adb_ms_buttons | buttons;
new_event.u.m.dx = ((signed int) (event->bytes[1] & 0x3f)) -
diff --git a/sys/arch/mac68k/dev/adbsys.c b/sys/arch/mac68k/dev/adbsys.c
index e34a969f9a6..539b32c5483 100644
--- a/sys/arch/mac68k/dev/adbsys.c
+++ b/sys/arch/mac68k/dev/adbsys.c
@@ -1,4 +1,4 @@
-/* $NetBSD: adbsys.c,v 1.15 1995/09/04 02:50:57 briggs Exp $ */
+/* $NetBSD: adbsys.c,v 1.20 1996/05/08 13:36:41 briggs Exp $ */
/*-
* Copyright (C) 1994 Bradley A. Grantham
@@ -31,10 +31,11 @@
*/
#include <sys/param.h>
+#include <sys/systm.h>
#include <machine/adbsys.h>
+#include <machine/viareg.h>
#include "adbvar.h"
-#include "../mac68k/via.h"
#include "../mac68k/macrom.h"
/* from adb.c */
@@ -101,14 +102,49 @@ extdms_init()
int adbindex, adbaddr;
short cmd;
char buffer[9];
- void extdms_complete();
totaladbs = CountADBs();
for (adbindex = 1; adbindex <= totaladbs; adbindex++) {
/* Get the ADB information */
adbaddr = GetIndADB(&adbdata, adbindex);
if (adbdata.origADBAddr == ADBADDR_MS &&
- (adbdata.devType == 1 || adbdata.devType == 2)) {
+ (adbdata.devType == ADBMS_USPEED)) {
+ /* Found MicroSpeed Mouse Deluxe Mac */
+ cmd = ((adbaddr<<4)&0xF0)|0x9; /* listen 1 */
+
+ /*
+ * To setup the MicroSpeed, it appears that we can
+ * send the following command to the mouse and then
+ * expect data back in the form:
+ * buffer[0] = 4 (bytes)
+ * buffer[1], buffer[2] as std. mouse
+ * buffer[3] = buffer[4] = 0xff when no buttons
+ * are down. When button N down, bit N is clear.
+ * buffer[4]'s locking mask enables a
+ * click to toggle the button down state--sort of
+ * like the "Easy Access" shift/control/etc. keys.
+ * buffer[3]'s alternative speed mask enables using
+ * different speed when the corr. button is down
+ */
+ buffer[0] = 4;
+ buffer[1] = 0x00; /* Alternative speed */
+ buffer[2] = 0x00; /* speed = maximum */
+ buffer[3] = 0x10; /* enable extended protocol,
+ * lower bits = alt. speed mask
+ * = 0000b
+ */
+ buffer[4] = 0x07; /* Locking mask = 0000b,
+ * enable buttons = 0111b
+ */
+ extdms_done = 0;
+ ADBOp((Ptr)buffer, (Ptr)extdms_complete,
+ (Ptr)&extdms_done, cmd);
+ while (!extdms_done)
+ /* busy wait until done */;
+ }
+ if (adbdata.origADBAddr == ADBADDR_MS &&
+ ( adbdata.devType == ADBMS_100DPI
+ || adbdata.devType == ADBMS_200DPI)) {
/* found a mouse */
cmd = ((adbaddr << 4) & 0xf0) | 0x3;
@@ -135,12 +171,10 @@ adb_init()
{
ADBDataBlock adbdata;
ADBSetInfoBlock adbinfo;
- int i, s;
int totaladbs;
int adbindex, adbaddr;
int error;
char buffer[9];
- void extdms_complete();
if (!mrg_romready()) {
printf("adb: no ROM ADB driver in this kernel for this machine\n");
@@ -161,7 +195,7 @@ adb_init()
/* Initialize ADB */
#if defined(MRG_DEBUG)
- printf("adb: calling ADBAlternateInit\n");
+ printf("adb: calling ADBAlternateInit.\n");
#endif
ADBAlternateInit();
@@ -182,15 +216,15 @@ adb_init()
/* Print out the glory */
printf("adb: ");
switch (adbdata.origADBAddr) {
- case 2:
+ case ADBADDR_MAP:
switch (adbdata.devType) {
- case 1:
+ case ADB_STDKBD:
printf("keyboard");
break;
- case 2:
+ case ADB_EXTKBD:
printf("extended keyboard");
break;
- case 12:
+ case ADB_PBKBD:
printf("PowerBook keyboard");
break;
default:
@@ -199,7 +233,7 @@ adb_init()
break;
}
break;
- case 3:
+ case ADBADDR_REL:
extdms_done = 0;
/* talk register 3 */
ADBOp((Ptr)buffer, (Ptr)extdms_complete,
@@ -207,13 +241,16 @@ adb_init()
while (!extdms_done)
/* busy-wait until done */;
switch (buffer[2]) {
- case 1:
+ case ADBMS_100DPI:
printf("100 dpi mouse");
break;
- case 2:
+ case ADBMS_200DPI:
printf("200 dpi mouse");
break;
- case 4:
+ case ADBMS_USPEED:
+ printf("MicroSpeed mouse, default parameters");
+ break;
+ case ADBMS_EXTENDED:
extdms_done = 0;
/* talk register 1 */
ADBOp((Ptr)buffer, (Ptr)extdms_complete,
@@ -239,7 +276,7 @@ adb_init()
break;
}
break;
- case 4:
+ case ADBADDR_ABS:
printf("absolute positioning device (tablet?) (%d)", adbdata.devType);
break;
default:
diff --git a/sys/arch/mac68k/dev/adbvar.h b/sys/arch/mac68k/dev/adbvar.h
index fc48977e4ad..b51182ef931 100644
--- a/sys/arch/mac68k/dev/adbvar.h
+++ b/sys/arch/mac68k/dev/adbvar.h
@@ -1,4 +1,4 @@
-/* $NetBSD: adbvar.h,v 1.2 1995/04/21 02:47:44 briggs Exp $ */
+/* $NetBSD: adbvar.h,v 1.3 1996/05/05 06:16:24 briggs Exp $ */
/*-
* Copyright (C) 1994 Bradley A. Grantham
@@ -41,4 +41,25 @@ typedef struct adb_trace_xlate_s {
} adb_trace_xlate_t;
extern adb_trace_xlate_t adb_trace_xlations[];
-void adb_asmcomplete();
+
+/* adb.c */
+void adb_asmcomplete __P((void));
+void adb_enqevent __P((adb_event_t *event));
+void adb_handoff __P((adb_event_t *event));
+void adb_autorepeat __P((void *keyp));
+void adb_dokeyupdown __P((adb_event_t *event));
+void adb_keymaybemouse __P((adb_event_t *event));
+void adb_processevent __P((adb_event_t *event));
+int adbopen __P((dev_t dev, int flag, int mode, struct proc *p));
+int adbclose __P((dev_t dev, int flag, int mode, struct proc *p));
+int adbread __P((dev_t dev, struct uio *uio, int flag));
+int adbwrite __P((dev_t dev, struct uio *uio, int flag));
+int adbioctl __P((dev_t , int , caddr_t , int , struct proc *));
+int adbselect __P((dev_t dev, int rw, struct proc *p));
+
+/* adbsysadm.s */
+void extdms_complete __P((void));
+
+/* adbsys.c */
+void adb_complete __P((caddr_t buffer, caddr_t data_area, int adb_command));
+void extdms_init __P((void));
diff --git a/sys/arch/mac68k/dev/asc.c b/sys/arch/mac68k/dev/asc.c
index 7d6782b19a0..3afa56ab4f2 100644
--- a/sys/arch/mac68k/dev/asc.c
+++ b/sys/arch/mac68k/dev/asc.c
@@ -1,4 +1,4 @@
-/* $NetBSD: asc.c,v 1.9 1995/11/01 04:58:21 briggs Exp $ */
+/* $NetBSD: asc.c,v 1.11 1996/05/05 06:16:26 briggs Exp $ */
/*-
* Copyright (C) 1993 Allen K. Briggs, Chris P. Caputo,
@@ -46,6 +46,7 @@
#include <sys/device.h>
#include <machine/cpu.h>
+#include "ascvar.h"
/* Global ASC location */
volatile unsigned char *ASCBase = (unsigned char *) 0x14000;
@@ -57,27 +58,25 @@ static int bell_length = 10;
static int bell_volume = 100;
static int bell_ringing = 0;
-static int ascprobe __P((struct device *, struct cfdata *, void *));
+static int ascmatch __P((struct device *, void *, void *));
static void ascattach __P((struct device *, struct device *, void *));
-extern int matchbyname __P((struct device *, void *, void *));
-struct cfdriver asccd =
-{NULL, "asc", matchbyname, ascattach,
-DV_DULL, sizeof(struct device), NULL, 0};
+struct cfattach asc_ca = {
+ sizeof(struct device), ascmatch, ascattach
+};
+
+struct cfdriver asc_cd = {
+ NULL, "asc", DV_DULL, NULL, 0
+};
static int
-ascprobe(parent, cf, aux)
- struct device *parent;
- struct cfdata *cf;
- void *aux;
+ascmatch(pdp, match, auxp)
+ struct device *pdp;
+ void *match, *auxp;
{
- if (strcmp(*((char **) aux), asccd.cd_name))
- return 0;
-
return 1;
}
-
static void
ascattach(parent, dev, aux)
struct device *parent, *dev;
@@ -87,10 +86,10 @@ ascattach(parent, dev, aux)
}
int
-asc_setbellparams(
- int freq,
- int length,
- int volume)
+asc_setbellparams(freq, length, volume)
+ int freq;
+ int length;
+ int volume;
{
/* I only perform these checks for sanity. */
/* I suppose someone might want a bell that rings */
@@ -112,10 +111,10 @@ asc_setbellparams(
int
-asc_getbellparams(
- int *freq,
- int *length,
- int *volume)
+asc_getbellparams(freq, length, volume)
+ int *freq;
+ int *length;
+ int *volume;
{
*freq = bell_freq;
*length = bell_length;
@@ -126,8 +125,8 @@ asc_getbellparams(
void
-asc_bellstop(
- int param)
+asc_bellstop(param)
+ int param;
{
if (bell_ringing > 1000 || bell_ringing < 0)
panic("bell got out of synch?????");
@@ -184,4 +183,6 @@ asc_ringbell()
}
bell_ringing++;
timeout((void *) asc_bellstop, 0, bell_length);
+
+ return 0;
}
diff --git a/sys/arch/mac68k/dev/grf.c b/sys/arch/mac68k/dev/grf.c
index 3f9bd41ff00..508935afb19 100644
--- a/sys/arch/mac68k/dev/grf.c
+++ b/sys/arch/mac68k/dev/grf.c
@@ -1,4 +1,4 @@
-/* $NetBSD: grf.c,v 1.29 1995/09/21 11:13:27 briggs Exp $ */
+/* $NetBSD: grf.c,v 1.33 1996/05/19 22:27:04 scottr Exp $ */
/*
* Copyright (c) 1988 University of Utah.
@@ -57,6 +57,7 @@
#include <sys/mman.h>
#include <sys/proc.h>
#include <sys/vnode.h>
+#include <sys/systm.h>
#include <machine/grfioctl.h>
#include <machine/cpu.h>
@@ -69,6 +70,7 @@
#include <vm/vm_pager.h>
#include "nubus.h"
+#include "itevar.h"
#include "grfvar.h"
#include "grf.h"
@@ -79,90 +81,61 @@
#define iteoff(u,f)
#endif
-static int grf_match __P((/*struct device *parent, struct device *dev,
- void *aux*/));
-static void grf_attach __P((struct device *parent, struct device *dev,
- void *aux));
+int grfmatch __P((struct device *, void *, void *));
+void grfattach __P((struct device *, struct device *, void *));
-static void fake_internal __P((void));
-
-extern int grfmv_probe __P((struct grf_softc *gp, nubus_slot *nu));
-extern int grfmv_init __P((struct grf_softc *gp));
-extern int grfmv_mode __P((struct grf_softc *gp, int cmd, void *arg));
-extern caddr_t grfmv_phys __P((struct grf_softc *gp, vm_offset_t addr));
-
-extern int grfiv_probe __P((struct grf_softc *gp, nubus_slot *ignore));
-extern int grfiv_init __P((struct grf_softc *gp));
-extern int grfiv_mode __P((struct grf_softc *gp, int cmd, void *arg));
-extern caddr_t grfiv_phys __P((struct grf_softc *gp, vm_offset_t addr));
-
-struct cfdriver grfcd = {
- NULL, "grf", grf_match, grf_attach, DV_DULL,
- sizeof(struct grf_softc)
+struct cfdriver grf_cd = {
+ NULL, "grf", DV_DULL
};
-struct grfdev grfdev[] = {
-/* DrSW (*gd_probe)() (*gd_init)() (*gd_mode)() gd_desc
- (*gd_phys)() */
-{ NUBUS_DRSW_APPLE, grfmv_probe, grfmv_init, grfmv_mode, "QD-compatible",
- grfmv_phys },
-{ 0xFF, grfiv_probe, grfiv_init, grfiv_mode, "Internal video",
- grfiv_phys },
+struct cfattach grf_ca = {
+ sizeof(struct grf_softc), grfmatch, grfattach
};
-static int ngrfdev=(sizeof(grfdev) / sizeof(grfdev[0]));
-
#ifdef DEBUG
-static int grfdebug = 0xff;
#define GDB_DEVNO 0x01
#define GDB_MMAP 0x02
#define GDB_IOMAP 0x04
#define GDB_LOCK 0x08
+static int grfdebug = (GDB_DEVNO|GDB_MMAP|GDB_IOMAP|GDB_LOCK);
#endif
-static int
-grf_match(parent, match, aux)
- struct device *parent;
- void *match, *aux;
+int
+grfmatch(parent, match, aux)
+ struct device *parent;
+ void *match, *aux;
{
- struct grf_softc *sc = match;
- nubus_slot *nu = (nubus_slot *) aux;
- int i, r;
-
- for (i = 0; i < ngrfdev; i++) {
- if ((r = (*grfdev[i].gd_probe)(sc, nu)) > 0) {
- sc->g_type = i;
- bcopy(aux, &sc->sc_slot, sizeof(nubus_slot));
- return r;
- }
- }
- return 0;
+ struct grfbus_attach_args *ga = aux;
+
+ return (strcmp(ga->ga_name, "grf") == 0);
}
-static void
-grf_attach(parent, self, aux)
+void
+grfattach(parent, self, aux)
struct device *parent, *self;
- void *aux;
+ void *aux;
{
- struct grf_softc *sc;
+ struct grf_softc *sc = (struct grf_softc *)self;
+ struct grfbus_attach_args *ga = aux;
- sc = (struct grf_softc *) self;
-
- if ((*grfdev[sc->g_type].gd_init)(sc) == 0) {
- printf("\n");
- return;
- }
- sc->g_flags = GF_ALIVE;
+ printf("\n");
- printf(": %d x %d ", sc->curr_mode.width, sc->curr_mode.height);
+ /* Load forwarded pointers. */
+ sc->sc_grfmode = ga->ga_grfmode;
+ sc->sc_slot = ga->ga_slot;
+ sc->sc_mode = ga->ga_mode;
+ sc->sc_phys = ga->ga_phys;
- if (sc->curr_mode.psize == 1)
- printf("monochrome");
- else
- printf("%d color", 1 << sc->curr_mode.psize);
+ sc->sc_flags = GF_ALIVE; /* XXX bogus */
- printf(" %s (%s) display\n",
- grfdev[sc->g_type].gd_desc, sc->card_name);
+#ifdef notyet
+ /*
+ * Attach ite semantics to the grf. Change the name, forward
+ * everything else.
+ */
+ ga->ga_name = "ite";
+ (void)config_found(self, ga, grfbusprint);
+#endif
}
/*ARGSUSED*/
@@ -178,12 +151,12 @@ grfopen(dev, flag, mode, p)
int error;
unit = GRFUNIT(dev);
- gp = grfcd.cd_devs[unit];
+ gp = grf_cd.cd_devs[unit];
- if (unit >= grfcd.cd_ndevs || (gp->g_flags & GF_ALIVE) == 0)
+ if (unit >= grf_cd.cd_ndevs || (gp->sc_flags & GF_ALIVE) == 0)
return (ENXIO);
- if ((gp->g_flags & (GF_OPEN | GF_EXCLUDE)) == (GF_OPEN | GF_EXCLUDE))
+ if ((gp->sc_flags & (GF_OPEN | GF_EXCLUDE)) == (GF_OPEN | GF_EXCLUDE))
return (EBUSY);
/*
@@ -191,14 +164,15 @@ grfopen(dev, flag, mode, p)
* XXX: always put in graphics mode.
*/
error = 0;
- if ((gp->g_flags & GF_OPEN) == 0) {
- gp->g_flags |= GF_OPEN;
+ if ((gp->sc_flags & GF_OPEN) == 0) {
+ gp->sc_flags |= GF_OPEN;
error = grfon(dev);
}
return (error);
}
/*ARGSUSED*/
+int
grfclose(dev, flag, mode, p)
dev_t dev;
int flag;
@@ -207,15 +181,16 @@ grfclose(dev, flag, mode, p)
{
register struct grf_softc *gp;
- gp = grfcd.cd_devs[GRFUNIT(dev)];
+ gp = grf_cd.cd_devs[GRFUNIT(dev)];
(void) grfoff(dev);
- gp->g_flags &= GF_ALIVE;
+ gp->sc_flags &= GF_ALIVE;
return (0);
}
/*ARGSUSED*/
+int
grfioctl(dev, cmd, data, flag, p)
dev_t dev;
int cmd;
@@ -223,11 +198,13 @@ grfioctl(dev, cmd, data, flag, p)
int flag;
struct proc *p;
{
- register struct grf_softc *gp;
+ struct grf_softc *gp;
+ struct grfmode *gm;
int error;
int unit = GRFUNIT(dev);
- gp = grfcd.cd_devs[unit];
+ gp = grf_cd.cd_devs[unit];
+ gm = gp->sc_grfmode;
error = 0;
switch (cmd) {
@@ -236,14 +213,14 @@ grfioctl(dev, cmd, data, flag, p)
{ struct grfinfo *g;
g = (struct grfinfo *) data;
bzero(data, sizeof(struct grfinfo));
- g->gd_id = gp->curr_mode.mode_id;
- g->gd_fbaddr = gp->curr_mode.fbbase;
- g->gd_fbsize = gp->curr_mode.fbsize;
- g->gd_colors = 1 << (u_int32_t) gp->curr_mode.psize;
- g->gd_planes = gp->curr_mode.psize;
- g->gd_fbwidth = g->gd_dwidth = gp->curr_mode.width;
- g->gd_fbheight = g->gd_dheight = gp->curr_mode.height;
- g->gd_fbrowbytes = gp->curr_mode.rowbytes;
+ g->gd_id = gm->mode_id;
+ g->gd_fbaddr = gm->fbbase;
+ g->gd_fbsize = gm->fbsize;
+ g->gd_colors = 1 << (u_int32_t) gm->psize;
+ g->gd_planes = gm->psize;
+ g->gd_fbwidth = g->gd_dwidth = gm->width;
+ g->gd_fbheight = g->gd_dheight = gm->height;
+ g->gd_fbrowbytes = gm->rowbytes;
}
break;
@@ -261,16 +238,16 @@ grfioctl(dev, cmd, data, flag, p)
break;
case GRFIOCGMODE:
- bcopy(&gp->curr_mode, data, sizeof(struct grfmode));
+ bcopy(gm, data, sizeof(struct grfmode));
break;
case GRFIOCGETMODE:
- error = (*grfdev[gp->g_type].gd_mode)(gp, GM_CURRMODE, data);
+ error = (*gp->sc_mode)(gp, GM_CURRMODE, data);
break;
case GRFIOCSETMODE:
- error = (*grfdev[gp->g_type].gd_mode)(gp, GM_NEWMODE, data);
+ error = (*gp->sc_mode)(gp, GM_NEWMODE, data);
break;
case GRFIOCLISTMODES:
- error = (*grfdev[gp->g_type].gd_mode)(gp, GM_LISTMODES, data);
+ error = (*gp->sc_mode)(gp, GM_LISTMODES, data);
break;
default:
@@ -281,6 +258,7 @@ grfioctl(dev, cmd, data, flag, p)
}
/*ARGSUSED*/
+int
grfselect(dev, rw, p)
dev_t dev;
int rw;
@@ -292,6 +270,7 @@ grfselect(dev, rw, p)
}
/*ARGSUSED*/
+int
grfmmap(dev, off, prot)
dev_t dev;
int off;
@@ -300,7 +279,7 @@ grfmmap(dev, off, prot)
int unit = GRFUNIT(dev);
struct grf_softc *gp;
- gp = grfcd.cd_devs[unit];
+ gp = grf_cd.cd_devs[unit];
return (grfaddr(gp, off));
}
@@ -311,7 +290,7 @@ grfon(dev)
int unit = GRFUNIT(dev);
struct grf_softc *gp;
- gp = grfcd.cd_devs[unit];
+ gp = grf_cd.cd_devs[unit];
/*
* XXX: iteoff call relies on devices being in same order
@@ -320,7 +299,7 @@ grfon(dev)
*/
iteoff(unit, 3);
- return (*grfdev[gp->g_type].gd_mode) (gp, GM_GRFON, NULL);
+ return (*gp->sc_mode) (gp, GM_GRFON, NULL);
}
int
@@ -331,11 +310,11 @@ grfoff(dev)
struct grf_softc *gp;
int error;
- gp = grfcd.cd_devs[unit];
+ gp = grf_cd.cd_devs[unit];
(void) grfunmap(dev, (caddr_t) 0, curproc);
- error = (*grfdev[gp->g_type].gd_mode) (gp, GM_GRFOFF, NULL);
+ error = (*gp->sc_mode) (gp, GM_GRFOFF, NULL);
/* XXX: see comment for iteoff above */
iteon(unit, 2);
@@ -348,12 +327,11 @@ grfaddr(gp, off)
struct grf_softc *gp;
register int off;
{
- register struct grfmode *gm = &gp->curr_mode;
+ register struct grfmode *gm = gp->sc_grfmode;
u_long addr;
- if (off < mac68k_round_page(gm->fbsize + gm->fboff) ) {
- addr = (u_long) (*grfdev[gp->g_type].gd_phys) (gp, gm->fbbase)
- + off;
+ if (off < mac68k_round_page(gm->fbsize + gm->fboff)) {
+ addr = (u_long)(*gp->sc_phys)(gp, (vm_offset_t)gm->fbbase)+off;
return mac68k_btop(addr);
}
/* bogus */
@@ -372,31 +350,30 @@ grfmap(dev, addrp, p)
int len, error;
int flags;
- gp = grfcd.cd_devs[GRFUNIT(dev)];
+ gp = grf_cd.cd_devs[GRFUNIT(dev)];
#ifdef DEBUG
if (grfdebug & GDB_MMAP)
- printf("grfmap(%d): addr %x\n", p->p_pid, *addrp);
+ printf("grfmap(%d): addr %p\n", p->p_pid, *addrp);
#endif
- len = mac68k_round_page(gp->curr_mode.fbsize + gp->curr_mode.fboff);
+ len = mac68k_round_page(gp->sc_grfmode->fbsize + gp->sc_grfmode->fboff);
flags = MAP_SHARED | MAP_FIXED;
*addrp = (caddr_t) mac68k_trunc_page(
- NUBUS_VIRT_TO_PHYS((u_int) gp->curr_mode.fbbase));
+ NUBUS_SLOT_TO_PADDR(gp->sc_slot->slot));
vn.v_type = VCHR; /* XXX */
vn.v_specinfo = &si; /* XXX */
vn.v_rdev = dev; /* XXX */
error = vm_mmap(&p->p_vmspace->vm_map, (vm_offset_t *) addrp,
- (vm_size_t) len, VM_PROT_ALL, VM_PROT_ALL, flags, (caddr_t) & vn,
- 0);
+ (vm_size_t) len, VM_PROT_ALL, VM_PROT_ALL, flags, (caddr_t) &vn, 0);
/* Offset into page: */
- *addrp += (unsigned long) gp->curr_mode.fboff & 0xfff;
+ *addrp += (unsigned long) gp->sc_grfmode->fboff & 0xfff;
#ifdef DEBUG
if (grfdebug & GDB_MMAP)
- printf("grfmap(%d): returning addr %x\n", p->p_pid, *addrp);
+ printf("grfmap(%d): returning addr %p\n", p->p_pid, *addrp);
#endif
return (error);
@@ -412,17 +389,17 @@ grfunmap(dev, addr, p)
vm_size_t size;
int rv;
- gp = grfcd.cd_devs[GRFUNIT(dev)];
+ gp = grf_cd.cd_devs[GRFUNIT(dev)];
#ifdef DEBUG
if (grfdebug & GDB_MMAP)
- printf("grfunmap(%d): dev %x addr %x\n", p->p_pid, dev, addr);
+ printf("grfunmap(%d): dev %x addr %p\n", p->p_pid, dev, addr);
#endif
if (addr == 0)
return (EINVAL);/* XXX: how do we deal with this? */
- size = round_page(gp->curr_mode.fbsize);
+ size = round_page(gp->sc_grfmode->fbsize);
rv = vm_deallocate(&p->p_vmspace->vm_map, (vm_offset_t) addr, size);
diff --git a/sys/arch/mac68k/dev/grf_iv.c b/sys/arch/mac68k/dev/grf_iv.c
index 21907590532..53a98ce5bb0 100644
--- a/sys/arch/mac68k/dev/grf_iv.c
+++ b/sys/arch/mac68k/dev/grf_iv.c
@@ -1,4 +1,4 @@
-/* $NetBSD: grf_iv.c,v 1.10 1995/08/11 17:48:19 briggs Exp $ */
+/* $NetBSD: grf_iv.c,v 1.12 1996/05/19 22:27:06 scottr Exp $ */
/*
* Copyright (c) 1995 Allen Briggs. All rights reserved.
@@ -41,6 +41,7 @@
#include <sys/malloc.h>
#include <sys/mman.h>
#include <sys/proc.h>
+#include <sys/systm.h>
#include <machine/grfioctl.h>
#include <machine/cpu.h>
@@ -48,20 +49,29 @@
#include "nubus.h"
#include "grfvar.h"
-extern int grfiv_probe __P((struct grf_softc *sc, nubus_slot *ignore));
-extern int grfiv_init __P((struct grf_softc *sc));
-extern int grfiv_mode __P((struct grf_softc *sc, int cmd, void *arg));
-
extern u_int32_t mac68k_vidlog;
extern u_int32_t mac68k_vidphys;
extern long videorowbytes;
extern long videobitdepth;
extern unsigned long videosize;
-extern int
-grfiv_probe(sc, slotinfo)
- struct grf_softc *sc;
- nubus_slot *slotinfo;
+static int grfiv_mode __P((struct grf_softc *gp, int cmd, void *arg));
+static caddr_t grfiv_phys __P((struct grf_softc *gp, vm_offset_t addr));
+static int grfiv_match __P((struct device *, void *, void *));
+static void grfiv_attach __P((struct device *, struct device *, void *));
+
+struct cfdriver intvid_cd = {
+ NULL, "intvid", DV_DULL
+};
+
+struct cfattach intvid_ca = {
+ sizeof(struct grfbus_softc), grfiv_match, grfiv_attach
+};
+
+static int
+grfiv_match(pdp, match, auxp)
+ struct device *pdp;
+ void *match, *auxp;
{
static int internal_video_found = 0;
@@ -69,30 +79,22 @@ grfiv_probe(sc, slotinfo)
return 0;
}
- if ( (NUBUS_SLOT_TO_BASE(slotinfo->slot) <= mac68k_vidlog)
- && (mac68k_vidlog < NUBUS_SLOT_TO_BASE(slotinfo->slot + 1))) {
- internal_video_found++;
- return 1;
- }
-
- if (slotinfo->slot == NUBUS_INT_VIDEO_PSUEDO_SLOT) {
- internal_video_found++;
- return 1;
- }
-
- return 0;
+ return 1;
}
-extern int
-grfiv_init(sc)
- struct grf_softc *sc;
+static void
+grfiv_attach(parent, self, aux)
+ struct device *parent, *self;
+ void *aux;
{
- struct grfmode *gm;
- int i, j;
+ struct grfbus_softc *sc;
+ struct grfmode *gm;
+
+ sc = (struct grfbus_softc *) self;
sc->card_id = 0;
- strcpy(sc->card_name, "Internal video");
+ printf(": Internal Video\n");
gm = &(sc->curr_mode);
gm->mode_id = 0;
@@ -107,10 +109,11 @@ grfiv_init(sc)
gm->fbbase = (caddr_t) mac68k_vidlog;
gm->fboff = 0;
- return 1;
+ /* Perform common video attachment. */
+ grf_establish(sc, grfiv_mode, grfiv_phys);
}
-extern int
+static int
grfiv_mode(sc, cmd, arg)
struct grf_softc *sc;
int cmd;
@@ -130,7 +133,7 @@ grfiv_mode(sc, cmd, arg)
return EINVAL;
}
-extern caddr_t
+static caddr_t
grfiv_phys(gp, addr)
struct grf_softc *gp;
vm_offset_t addr;
diff --git a/sys/arch/mac68k/dev/grf_mv.c b/sys/arch/mac68k/dev/grf_mv.c
index a32fabb8bb7..a19390bc3c2 100644
--- a/sys/arch/mac68k/dev/grf_mv.c
+++ b/sys/arch/mac68k/dev/grf_mv.c
@@ -1,4 +1,4 @@
-/* $NetBSD: grf_mv.c,v 1.7 1995/08/24 04:27:16 briggs Exp $ */
+/* $NetBSD: grf_mv.c,v 1.11 1996/05/19 22:27:07 scottr Exp $ */
/*
* Copyright (c) 1995 Allen Briggs. All rights reserved.
@@ -40,19 +40,34 @@
#include <sys/malloc.h>
#include <sys/mman.h>
#include <sys/proc.h>
+#include <sys/systm.h>
-#include <machine/grfioctl.h>
#include <machine/cpu.h>
+#include <machine/grfioctl.h>
+#include <machine/viareg.h>
#include "nubus.h"
#include "grfvar.h"
-extern int grfmv_probe __P((struct grf_softc *gp, nubus_slot *slot));
-extern int grfmv_init __P((struct grf_softc *gp));
-extern int grfmv_mode __P((struct grf_softc *gp, int cmd, void *arg));
+static void load_image_data __P((caddr_t data, struct image_data *image));
+static void grfmv_intr __P((void *vsc, int slot));
+static int get_vrsrcid __P((nubus_slot *slot));
static char zero = 0;
+static int grfmv_mode __P((struct grf_softc *gp, int cmd, void *arg));
+static caddr_t grfmv_phys __P((struct grf_softc *gp, vm_offset_t addr));
+static int grfmv_match __P((struct device *, void *, void *));
+static void grfmv_attach __P((struct device *, struct device *, void *));
+
+struct cfdriver macvid_cd = {
+ NULL, "macvid", DV_DULL
+};
+
+struct cfattach macvid_ca = {
+ sizeof(struct grfbus_softc), grfmv_match, grfmv_attach
+};
+
static void
load_image_data(data, image)
caddr_t data;
@@ -77,15 +92,17 @@ load_image_data(data, image)
bcopy(data + 42, &image->planeBytes, 4);
}
+/*ARGSUSED*/
static void
-grfmv_intr(sc, slot)
- struct grf_softc *sc;
+grfmv_intr(vsc, slot)
+ void *vsc;
int slot;
{
- struct grf_softc *gp;
- caddr_t slotbase;
+ caddr_t slotbase;
+ struct grfbus_softc *sc;
- slotbase = (caddr_t) NUBUS_SLOT_TO_BASE(slot);
+ sc = (struct grfbus_softc *) vsc;
+ slotbase = (caddr_t) sc->sc_slot.virtual_base;
slotbase[0xa0000] = zero;
}
@@ -94,7 +111,6 @@ get_vrsrcid(slot)
nubus_slot *slot;
{
extern u_short mac68k_vrsrc_vec[];
-extern int mac68k_vrsrc_cnt;
int i;
for (i = 0 ; i < 6 ; i++)
@@ -103,16 +119,19 @@ extern int mac68k_vrsrc_cnt;
return 0x80;
}
-extern int
-grfmv_probe(sc, slot)
- struct grf_softc *sc;
- nubus_slot *slot;
+static int
+grfmv_match(parent, self, aux)
+ struct device *parent;
+ void *self, *aux;
{
- nubus_dir dir, *dirp, dir2, *dirp2;
+ struct grfbus_softc *sc;
+ nubus_slot *slot = (nubus_slot *) aux;
+ nubus_dir dir, *dirp, *dirp2;
nubus_dirent dirent, *direntp;
nubus_type slottype;
int vrsrc;
+ sc = (struct grfbus_softc *) self; /* XXX: indirect brokenness */
dirp = &dir;
direntp = &dirent;
nubus_get_main_dir(slot, dirp);
@@ -154,61 +173,79 @@ grfmv_probe(sc, slot)
sc->card_id = slottype.drhw;
+ sc->sc_slot = *slot;
+
/* Need to load display info (and driver?), etc... */
return 1;
}
-extern int
-grfmv_init(sc)
- struct grf_softc *sc;
+static void
+grfmv_attach(parent, self, aux)
+ struct device *parent, *self;
+ void *aux;
{
+ struct grfbus_softc *sc;
struct image_data image_store, image;
+ struct grfmode *gm;
+ char cardname[CARD_NAME_LEN];
nubus_dirent dirent;
nubus_dir mode_dir;
int mode;
- u_long base;
+
+ sc = (struct grfbus_softc *) self;
+ gm = &sc->curr_mode;
mode = NUBUS_RSRC_FIRSTMODE;
- if (nubus_find_rsrc(&sc->sc_slot, &sc->board_dir, mode, &dirent) <= 0)
- return 0;
+ if (nubus_find_rsrc(&sc->sc_slot, &sc->board_dir, mode, &dirent) <= 0) {
+ printf("\n%s: probe failed to get board rsrc.\n",
+ sc->sc_dev.dv_xname);
+ return;
+ }
nubus_get_dir_from_rsrc(&sc->sc_slot, &dirent, &mode_dir);
- if (nubus_find_rsrc(&sc->sc_slot, &mode_dir, VID_PARAMS, &dirent) <= 0)
- return 0;
+ if (nubus_find_rsrc(&sc->sc_slot, &mode_dir, VID_PARAMS, &dirent)
+ <= 0) {
+ printf("\n%s: probe failed to get mode dir.\n",
+ sc->sc_dev.dv_xname);
+ return;
+ }
if (nubus_get_ind_data(&sc->sc_slot, &dirent, (caddr_t) &image_store,
- sizeof(struct image_data)) <= 0)
- return 0;
+ sizeof(struct image_data)) <= 0) {
+ printf("\n%s: probe failed to get indirect mode data.\n",
+ sc->sc_dev.dv_xname);
+ return;
+ }
load_image_data((caddr_t) &image_store, &image);
- base = NUBUS_SLOT_TO_BASE(sc->sc_slot.slot);
-
- sc->curr_mode.mode_id = mode;
- sc->curr_mode.fbbase = (caddr_t) (base + image.offset);
- sc->curr_mode.fboff = image.offset;
- sc->curr_mode.rowbytes = image.rowbytes;
- sc->curr_mode.width = image.right - image.left;
- sc->curr_mode.height = image.bottom - image.top;
- sc->curr_mode.fbsize = sc->curr_mode.height * sc->curr_mode.rowbytes;
- sc->curr_mode.hres = image.hRes;
- sc->curr_mode.vres = image.vRes;
- sc->curr_mode.ptype = image.pixelType;
- sc->curr_mode.psize = image.pixelSize;
-
- strncpy(sc->card_name, nubus_get_card_name(&sc->sc_slot),
+ gm->mode_id = mode;
+ gm->fbbase = (caddr_t) (sc->sc_slot.virtual_base + image.offset);
+ gm->fboff = image.offset;
+ gm->rowbytes = image.rowbytes;
+ gm->width = image.right - image.left;
+ gm->height = image.bottom - image.top;
+ gm->fbsize = sc->curr_mode.height * sc->curr_mode.rowbytes;
+ gm->hres = image.hRes;
+ gm->vres = image.vRes;
+ gm->ptype = image.pixelType;
+ gm->psize = image.pixelSize;
+
+ strncpy(cardname, nubus_get_card_name(&sc->sc_slot),
CARD_NAME_LEN);
+ cardname[CARD_NAME_LEN-1] = '\0';
- sc->card_name[CARD_NAME_LEN-1] = '\0';
+ printf(": %s\n", cardname);
add_nubus_intr(sc->sc_slot.slot, grfmv_intr, sc);
- return 1;
+ /* Perform common video attachment. */
+ grf_establish(sc, grfmv_mode, grfmv_phys);
}
-extern int
+static int
grfmv_mode(gp, cmd, arg)
struct grf_softc *gp;
int cmd;
@@ -228,10 +265,11 @@ grfmv_mode(gp, cmd, arg)
return EINVAL;
}
-extern caddr_t
+static caddr_t
grfmv_phys(gp, addr)
struct grf_softc *gp;
vm_offset_t addr;
{
- return (caddr_t) NUBUS_VIRT_TO_PHYS(addr);
+ return (caddr_t) (NUBUS_SLOT_TO_PADDR(gp->sc_slot->slot) +
+ (addr - gp->sc_slot->virtual_base));
}
diff --git a/sys/arch/mac68k/dev/grfvar.h b/sys/arch/mac68k/dev/grfvar.h
index 2679e253478..cd60da3c9af 100644
--- a/sys/arch/mac68k/dev/grfvar.h
+++ b/sys/arch/mac68k/dev/grfvar.h
@@ -1,4 +1,4 @@
-/* $NetBSD: grfvar.h,v 1.8 1995/07/06 17:13:51 briggs Exp $ */
+/* $NetBSD: grfvar.h,v 1.10 1996/05/19 22:27:10 scottr Exp $ */
/*
* Copyright (c) 1988 University of Utah.
@@ -43,20 +43,47 @@
*/
#define CARD_NAME_LEN 64
-/* per display info */
-struct grf_softc {
+
+/*
+ * State info, per hardware instance.
+ */
+struct grfbus_softc {
struct device sc_dev;
nubus_slot sc_slot;
- char card_name[CARD_NAME_LEN];
struct grfmode curr_mode; /* hardware desc(for ioctl) */
- u_int32_t g_flags; /* software flags */
- u_int32_t g_type; /* index into grfdev */
u_int16_t card_id; /* DrHW value for nubus cards */
nubus_dir board_dir; /* Nubus dir for curr board */
- caddr_t g_data; /* device dependent data */
};
+/*
+ * State info, per grf instance.
+ */
+struct grf_softc {
+ struct device sc_dev; /* device glue */
+
+ int sc_flags; /* software flags */
+ struct grfmode *sc_grfmode; /* forwarded ... */
+ nubus_slot *sc_slot;
+ /* mode-change on/off/mode function */
+ int (*sc_mode) __P((struct grf_softc *, int, void *));
+ /* map virtual addr to physical addr */
+ caddr_t (*sc_phys) __P((struct grf_softc *, vm_offset_t));
+};
+
+/*
+ * Attach grf and ite semantics to Mac video hardware.
+ */
+struct grfbus_attach_args {
+ char *ga_name; /* name of semantics to attach */
+ struct grfmode *ga_grfmode; /* forwarded ... */
+ nubus_slot *ga_slot;
+ int (*ga_mode) __P((struct grf_softc *, int, void *));
+ caddr_t (*ga_phys) __P((struct grf_softc *, vm_offset_t));
+};
+
+typedef caddr_t (*grf_phys_t) __P((struct grf_softc *gp, vm_offset_t addr));
+
/* flags */
#define GF_ALIVE 0x01
#define GF_OPEN 0x02
@@ -65,19 +92,6 @@ struct grf_softc {
#define GF_BSDOPEN 0x10
#define GF_HPUXOPEN 0x20
-/* display types - indices into grfdev */
-#define GT_MACVIDEO 0
-#define GT_INTERNALVIDEO 1
-
-struct grfdev {
- int gd_softid; /* DrSW */
- int (*gd_probe)(); /* probe routine */
- int (*gd_init) (); /* boot time initialization */
- int (*gd_mode) (); /* mode-change on/off/mode function */
- char *gd_desc; /* text description */
- caddr_t (*gd_phys) (); /* map virtual addr to physical addr */
-};
-
/* requests to mode routine */
#define GM_GRFON 1
#define GM_GRFOFF 2
@@ -117,3 +131,19 @@ struct image_data {
#define VID_TABLE_OFFSET 2
#define VID_PAGE_CNT 3
#define VID_DEV_TYPE 4
+
+int grfopen __P((dev_t dev, int flag, int mode, struct proc *p));
+int grfclose __P((dev_t dev, int flag, int mode, struct proc *p));
+int grfioctl __P((dev_t, int, caddr_t, int, struct proc *p));
+int grfselect __P((dev_t dev, int rw, struct proc *p));
+int grfmmap __P((dev_t dev, int off, int prot));
+int grfon __P((dev_t dev));
+int grfoff __P((dev_t dev));
+int grfaddr __P((struct grf_softc *gp, register int off));
+int grfmap __P((dev_t dev, caddr_t *addrp, struct proc *p));
+int grfunmap __P((dev_t dev, caddr_t addr, struct proc *p));
+
+void grf_establish __P((struct grfbus_softc *,
+ int (*)(struct grf_softc *, int, void *),
+ caddr_t (*)(struct grf_softc *, vm_offset_t)));
+int grfbusprint __P((void *, char *));
diff --git a/sys/arch/mac68k/dev/if_ae.c b/sys/arch/mac68k/dev/if_ae.c
index 0897e54dfec..c30bdc49a9b 100644
--- a/sys/arch/mac68k/dev/if_ae.c
+++ b/sys/arch/mac68k/dev/if_ae.c
@@ -1,4 +1,4 @@
-/* $NetBSD: if_ae.c,v 1.40 1996/02/02 15:30:56 briggs Exp $ */
+/* $NetBSD: if_ae.c,v 1.46 1996/05/15 03:20:22 briggs Exp $ */
/*
* Device driver for National Semiconductor DS8390/WD83C690 based ethernet
@@ -51,7 +51,7 @@
#include <net/bpfdesc.h>
#endif
-#include "../mac68k/via.h"
+#include <machine/viareg.h>
#include "nubus.h"
#include <dev/ic/dp8390reg.h>
#include "if_aereg.h"
@@ -98,12 +98,15 @@ struct ae_softc {
u_char next_packet; /* pointer to next unread RX packet */
};
+static int ae_id_card __P((nubus_slot *slot, struct ae_softc *sc));
+static int ae_size_card_memory __P((struct ae_softc *sc));
+
int aeprobe __P((struct device *, void *, void *));
void aeattach __P((struct device *, struct device *, void *));
-void aeintr __P((void *));
+void aeintr __P((void *, int));
int aeioctl __P((struct ifnet *, u_long, caddr_t));
void aestart __P((struct ifnet *));
-void aewatchdog __P(( /* short */ ));
+void aewatchdog __P((struct ifnet *));
void aereset __P((struct ae_softc *));
void aeinit __P((struct ae_softc *));
void aestop __P((struct ae_softc *));
@@ -119,10 +122,14 @@ void ae_getmcaf __P((struct arpcom *, u_char *));
static inline void ae_rint __P((struct ae_softc *));
static inline void ae_xmit __P((struct ae_softc *));
static inline caddr_t ae_ring_copy __P((
- /* struct ae_softc *, caddr_t, caddr_t, u_short */ ));
+ struct ae_softc *, caddr_t, caddr_t, int));
+
+struct cfattach ae_ca = {
+ sizeof(struct ae_softc), aeprobe, aeattach
+};
-struct cfdriver aecd = {
- NULL, "ae", aeprobe, aeattach, DV_IFNET, sizeof(struct ae_softc)
+struct cfdriver ae_cd = {
+ NULL, "ae", DV_IFNET
};
#define ETHER_MIN_LEN 64
@@ -130,7 +137,6 @@ struct cfdriver aecd = {
#define ETHER_ADDR_LEN 6
static char zero = 0;
-static u_char ones = 0xff;
/*
* XXX These two should be moved to locore, and maybe changed to use shorts
@@ -138,6 +144,10 @@ static u_char ones = 0xff;
* which the ethernet cards can't handle.
*/
+void bszero __P((u_short *addr, int len));
+static inline void word_copy __P((caddr_t a, caddr_t b, int len));
+static inline void byte_copy __P((caddr_t a, caddr_t b, int len));
+
void
bszero(u_short * addr, int len)
{
@@ -228,6 +238,7 @@ ae_id_card(slot, sc)
}
break;
default:
+ printf("Unknown ethernet drsw: %x\n", slottype.drsw);
sc->vendor = AE_VENDOR_UNKNOWN;
return 0;
}
@@ -239,13 +250,12 @@ ae_id_card(slot, sc)
return 1;
}
-int
+static int
ae_size_card_memory(sc)
struct ae_softc *sc;
{
u_short *p;
u_short i1, i2, i3, i4;
- int size;
p = (u_short *) sc->mem_start;
@@ -294,15 +304,17 @@ aeprobe(parent, match, aux)
sc->regs_rev = 0;
- addr = (caddr_t) NUBUS_SLOT_TO_BASE(nu->slot);
+ addr = (caddr_t) nu->virtual_base;
switch (sc->vendor) {
case AE_VENDOR_INTERLAN:
sc->nic_addr = addr + GC_NIC_OFFSET;
sc->rom_addr = addr + GC_ROM_OFFSET;
sc->mem_start = addr + GC_DATA_OFFSET;
- if ((memsize = ae_size_card_memory(sc)) == 0)
+ if ((memsize = ae_size_card_memory(sc)) == 0) {
+ printf("Failed to determine size of RAM.\n");
return 0;
+ }
/* reset the NIC chip */
*((caddr_t) addr + GC_RESET_OFFSET) = (char) zero;
@@ -319,8 +331,10 @@ aeprobe(parent, match, aux)
sc->nic_addr = addr + AE_NIC_OFFSET;
sc->rom_addr = addr + AE_ROM_OFFSET;
sc->mem_start = addr + AE_DATA_OFFSET;
- if ((memsize = ae_size_card_memory(sc)) == 0)
+ if ((memsize = ae_size_card_memory(sc)) == 0) {
+ printf("Failed to determine size of RAM.\n");
return (0);
+ }
/* Get station address from on-board ROM */
for (i = 0; i < ETHER_ADDR_LEN; ++i)
@@ -346,8 +360,10 @@ aeprobe(parent, match, aux)
sc->rom_addr = addr + FE_ROM_OFFSET;
sc->nic_addr = addr + AE_NIC_OFFSET;
sc->mem_start = addr + AE_DATA_OFFSET;
- if ((memsize = ae_size_card_memory(sc)) == 0)
+ if ((memsize = ae_size_card_memory(sc)) == 0) {
+ printf("Failed to determine size of RAM.\n");
return (0);
+ }
/* Get station address from on-board ROM */
for (i = 0; i < ETHER_ADDR_LEN; ++i)
@@ -381,7 +397,7 @@ aeprobe(parent, match, aux)
for (i = 0; i < memsize; ++i)
if (sc->mem_start[i]) {
- printf("%s: failed to clear shared memory at %x - check configuration\n",
+printf("%s: failed to clear shared memory at %p - check configuration\n",
sc->sc_dev.dv_xname,
sc->mem_start + i);
return (0);
@@ -401,16 +417,14 @@ aeattach(parent, self, aux)
void *aux;
{
struct ae_softc *sc = (void *) self;
- struct nubus_hw *nu = aux;
- struct cfdata *cf = sc->sc_dev.dv_cfdata;
struct ifnet *ifp = &sc->sc_arpcom.ac_if;
/* Set interface to stopped condition (reset). */
aestop(sc);
/* Initialize ifnet structure. */
- ifp->if_unit = sc->sc_dev.dv_unit;
- ifp->if_name = aecd.cd_name;
+ bcopy(sc->sc_dev.dv_xname, ifp->if_xname, IFNAMSIZ);
+ ifp->if_softc = sc;
ifp->if_start = aestart;
ifp->if_ioctl = aeioctl;
ifp->if_watchdog = aewatchdog;
@@ -424,7 +438,7 @@ aeattach(parent, self, aux)
/* Print additional info when attached. */
printf(": address %s, ", ether_sprintf(sc->sc_arpcom.ac_enaddr));
- printf("type %s, %dk mem.\n", sc->type_str, sc->mem_size / 1024);
+ printf("type %s, %ldk mem.\n", sc->type_str, sc->mem_size / 1024);
#if NBPFILTER > 0
bpfattach(&ifp->if_bpf, ifp, DLT_EN10MB, sizeof(struct ether_header));
@@ -482,11 +496,12 @@ aestop(sc)
* an interrupt after a transmit has been started on it.
*/
static int aeintr_ctr = 0;
+
void
-aewatchdog(unit)
- int unit;
+aewatchdog(ifp)
+ struct ifnet *ifp;
{
- struct ae_softc *sc = aecd.cd_devs[unit];
+ struct ae_softc *sc = ifp->if_softc;
#if 1
/*
@@ -498,10 +513,11 @@ aewatchdog(unit)
i = aeintr_ctr;
- (*via2itab[1]) (1);
+ (*via2itab[1]) ((void *) 1);
if (i != aeintr_ctr) {
- log(LOG_ERR, "ae%d: device timeout, recovered\n", unit);
+ log(LOG_ERR, "%s: device timeout, recovered\n",
+ sc->sc_dev.dv_xname);
return;
}
#endif
@@ -521,7 +537,6 @@ aeinit(sc)
{
struct ifnet *ifp = &sc->sc_arpcom.ac_if;
int i;
- u_char command;
u_char mcaf[8];
/*
@@ -674,7 +689,7 @@ void
aestart(ifp)
struct ifnet *ifp;
{
- struct ae_softc *sc = aecd.cd_devs[ifp->if_unit];
+ struct ae_softc *sc = ifp->if_softc;
struct mbuf *m0;
caddr_t buffer;
int len;
@@ -848,8 +863,9 @@ loop:
/* Ethernet interface interrupt processor. */
void
-aeintr(arg)
- void *arg;
+aeintr(arg, slot)
+ void *arg;
+ int slot;
{
struct ae_softc *sc = arg;
struct ifnet *ifp = &sc->sc_arpcom.ac_if;
@@ -1021,7 +1037,7 @@ aeioctl(ifp, cmd, data)
u_long cmd;
caddr_t data;
{
- struct ae_softc *sc = aecd.cd_devs[ifp->if_unit];
+ struct ae_softc *sc = ifp->if_softc;
register struct ifaddr *ifa = (struct ifaddr *) data;
struct ifreq *ifr = (struct ifreq *) data;
int s, error = 0;
@@ -1170,7 +1186,7 @@ static inline caddr_t
ae_ring_copy(sc, src, dst, amount)
struct ae_softc *sc;
caddr_t src, dst;
- u_short amount;
+ int amount;
{
u_short tmp_amount;
@@ -1232,7 +1248,7 @@ aeget(sc, src, total_len)
len = MCLBYTES;
}
m->m_len = len = min(total_len, len);
- src = ae_ring_copy(sc, src, mtod(m, caddr_t), len);
+ src = ae_ring_copy(sc, src, mtod(m, caddr_t), (int) len);
total_len -= len;
*mp = m;
mp = &m->m_next;
diff --git a/sys/arch/mac68k/dev/if_sn.c b/sys/arch/mac68k/dev/if_sn.c
index 3a6051a1176..d5d2d571957 100644
--- a/sys/arch/mac68k/dev/if_sn.c
+++ b/sys/arch/mac68k/dev/if_sn.c
@@ -47,7 +47,9 @@
typedef unsigned char uchar;
#include <machine/cpu.h>
+#include <machine/viareg.h>
#include <mac68k/dev/if_sn.h>
+
#define SWR(a, x) (a) = (x)
#define SRD(a) ((a) & 0xffff)
@@ -84,9 +86,9 @@ struct sn_stats {
struct sn_softc {
struct device sc_dev;
- struct arpcom sc_ac;
-#define sc_if sc_ac.ac_if /* network visible interface */
-#define sc_enaddr sc_ac.ac_enaddr /* hardware ethernet address */
+ struct arpcom sc_arpcom;
+#define sc_if sc_arpcom.ac_if /* network visible interface */
+#define sc_enaddr sc_arpcom.ac_enaddr /* hardware ethernet address */
struct sonic_reg *sc_csr; /* hardware pointer */
int sc_rxmark; /* position in rx ring for reading buffs */
@@ -105,11 +107,26 @@ struct sn_softc {
short sc_iflags;
} sn_softc;
-int snmatch __P((struct device *, void *, void *));
-void snattach __P((struct device *, struct device *, void *));
+static void snwatchdog __P((struct ifnet *));
+static int snmatch __P((struct device *, void *, void *));
+static void snattach __P((struct device *, struct device *, void *));
+static int sngetaddr __P((struct sn_softc *sc));
+static int sninit __P((struct sn_softc *sc));
+static int snstop __P((struct sn_softc *sc));
+static int sonicput __P((struct sn_softc *sc, struct mbuf *m0));
+static int snintr __P((struct sn_softc *, int));
+static int snioctl __P((struct ifnet *ifp, u_long cmd, caddr_t data));
+static void snstart __P((struct ifnet *ifp));
+static void snreset __P((struct sn_softc *sc));
+
+void camdump __P((struct sn_softc *sc));
+
+struct cfattach sn_ca = {
+ sizeof(struct sn_softc), snmatch, snattach
+};
-struct cfdriver sncd = {
- NULL, "sn", snmatch, snattach, DV_IFNET, sizeof(struct sn_softc)
+struct cfdriver sn_cd = {
+ NULL, "sn", DV_IFNET
};
#include <assert.h>
@@ -123,49 +140,8 @@ __assert(file, line, failedexpr)
failedexpr, file, line);
}
-void
-m_check(m)
- struct mbuf *m;
-{
- if (m->m_flags & M_EXT) {
- assert(m->m_len >= 0);
- assert(m->m_len <= m->m_ext.ext_size);
- assert(m->m_data >= &m->m_ext.ext_buf[0]);
- assert(m->m_data <= &m->m_ext.ext_buf[m->m_ext.ext_size]);
- assert(m->m_data + m->m_len <= &m->m_ext.ext_buf[m->m_ext.ext_size]);
- } else if (m->m_flags & M_PKTHDR) {
- assert(m->m_len >= 0);
- assert(m->m_len <= MHLEN);
- assert(m->m_data >= m->m_pktdat);
- assert(m->m_data <= &m->m_pktdat[MHLEN]);
- assert(m->m_data + m->m_len <= &m->m_pktdat[MHLEN]);
- } else {
- assert(m->m_len >= 0);
- assert(m->m_len <= MLEN);
- assert(m->m_data >= m->m_dat);
- assert(m->m_data <= &m->m_dat[MLEN]);
- assert(m->m_data + m->m_len <= &m->m_dat[MLEN]);
- }
-}
-
-void
-m_checkm(m)
- struct mbuf *m;
-{
- while (m) {
- m_check(m);
- m = m->m_next;
- }
-}
-
int ethdebug = 0;
-int snintr __P((struct sn_softc *));
-int snioctl __P((struct ifnet *ifp, u_long cmd, caddr_t data));
-void snstart __P((struct ifnet *ifp));
-void snwatchdog __P(( /*int unit */ ));
-void snreset __P((struct sn_softc *sc));
-
/*
* SONIC buffers need to be aligned 16 or 32 bit aligned.
* These macros calculate and verify alignment.
@@ -247,24 +223,11 @@ struct mtd *mtdnext; /* next descriptor to give to chip */
void mtd_free __P((struct mtd *));
struct mtd *mtd_alloc __P((void));
-int sngetaddr __P((struct sn_softc *sc));
-int sninit __P((int unit));
-int snstop __P((int unit));
-int sonicput __P((struct sn_softc *sc, struct mbuf *m0));
-
-void camdump __P((struct sn_softc *sc));
-
-int
+static int
snmatch(parent, match, aux)
struct device *parent;
void *match, *aux;
{
- struct cfdata *cf = match;
- struct confargs *ca = aux;
-
- if (matchbyname(parent, cf, aux) == 0)
- return 0;
-
if (!mac68k_machine.sonic)
return 0;
@@ -276,7 +239,7 @@ snmatch(parent, match, aux)
* record. System will initialize the interface when it is ready
* to accept packets.
*/
-void
+static void
snattach(parent, self, aux)
struct device *parent, *self;
void *aux;
@@ -284,15 +247,13 @@ snattach(parent, self, aux)
extern unsigned char SONICSPACE;
extern unsigned long SONICSPACE_size;
struct sn_softc *sc = (void *)self;
- struct confargs *ca = aux;
struct ifnet *ifp = &sc->sc_if;
- struct cfdata *cf = sc->sc_dev.dv_cfdata;
int base, p, pp;
/* Must allocate extra memory in case we need to round later. */
pp = (DESC_SIZE + NRBA*RBASIZE + 0x10000 + 4 + TBASIZE);
if (pp != SONICSPACE_size) {
- printf(": SONICSPACE_size (%d) != pp (%d). Punt!\n",
+ printf(": SONICSPACE_size (%ld) != pp (%d). Punt!\n",
SONICSPACE_size, pp);
return;
}
@@ -351,11 +312,8 @@ printf("sonic buffers: rra=0x%x cda=0x%x rda=0x%x tda=0x%x rba=0x%x tba=0x%x\n",
p_rra, p_cda, p_rda, p_tda, p_rba, p_tba);
#endif
- add_nubus_intr(9, snintr, (void *) sc);
- enable_nubus_intr();
-
- ifp->if_name = "sn";
- ifp->if_unit = sc->sc_dev.dv_unit;
+ bcopy(sc->sc_dev.dv_xname, ifp->if_xname, IFNAMSIZ);
+ ifp->if_softc = sc;
ifp->if_ioctl = snioctl;
ifp->if_start = snstart;
ifp->if_flags = IFF_BROADCAST | IFF_SIMPLEX | IFF_MULTICAST;
@@ -365,18 +323,21 @@ printf("sonic buffers: rra=0x%x cda=0x%x rda=0x%x tda=0x%x rba=0x%x tba=0x%x\n",
#endif
if_attach(ifp);
ether_ifattach(ifp);
+
+ add_nubus_intr(9, (void (*) __P((void *, int))) snintr, (void *) sc);
+ enable_nubus_intr();
}
-int
+static int
snioctl(ifp, cmd, data)
struct ifnet *ifp;
u_long cmd;
caddr_t data;
{
struct ifaddr *ifa;
- struct sn_softc *sc = sncd.cd_devs[ifp->if_unit];
+ struct sn_softc *sc = ifp->if_softc;
int s = splnet(), err = 0;
- int temp;
+ int temp, error;
if ((error = ether_ioctl(ifp, &sc->sc_arpcom, cmd, data)) > 0) {
splx(s);
@@ -391,12 +352,12 @@ snioctl(ifp, cmd, data)
switch (ifa->ifa_addr->sa_family) {
#ifdef INET
case AF_INET:
- (void)sninit(ifp->if_unit);
- arp_ifinit(&sc->sc_ac, ifa);
+ (void)sninit(ifp->if_softc);
+ arp_ifinit(&sc->sc_arpcom, ifa);
break;
#endif
default:
- (void)sninit(ifp->if_unit);
+ (void)sninit(ifp->if_softc);
break;
}
break;
@@ -404,11 +365,11 @@ snioctl(ifp, cmd, data)
case SIOCSIFFLAGS:
if ((ifp->if_flags & IFF_UP) == 0 &&
ifp->if_flags & IFF_RUNNING) {
- snstop(ifp->if_unit);
+ snstop(ifp->if_softc);
ifp->if_flags &= ~IFF_RUNNING;
} else if (ifp->if_flags & IFF_UP &&
(ifp->if_flags & IFF_RUNNING) == 0)
- (void)sninit(ifp->if_unit);
+ (void)sninit(ifp->if_softc);
/*
* If the state of the promiscuous bit changes, the interface
* must be reset to effect the change.
@@ -427,9 +388,11 @@ snioctl(ifp, cmd, data)
case SIOCADDMULTI:
case SIOCDELMULTI:
if(cmd == SIOCADDMULTI)
- err = ether_addmulti((struct ifreq *)data, &sc->sc_ac);
+ err = ether_addmulti((struct ifreq *)data,
+ &sc->sc_arpcom);
else
- err = ether_delmulti((struct ifreq *)data, &sc->sc_ac);
+ err = ether_delmulti((struct ifreq *)data,
+ &sc->sc_arpcom);
if (err == ENETRESET) {
/*
@@ -454,11 +417,11 @@ snioctl(ifp, cmd, data)
* Use trailer local net encapsulation if enough data in first
* packet leaves a multiple of 512 bytes of data in remainder.
*/
-void
+static void
snstart(ifp)
struct ifnet *ifp;
{
- struct sn_softc *sc = sncd.cd_devs[ifp->if_unit];
+ struct sn_softc *sc = ifp->if_softc;
struct mbuf *m;
int len;
@@ -534,22 +497,21 @@ void initialise_tba __P((struct sn_softc *));
* reset and restart the SONIC. Called in case of fatal
* hardware/software errors.
*/
-void
+static void
snreset(sc)
struct sn_softc *sc;
{
printf("snreset\n");
- snstop(sc->sc_dev.dv_unit);
- sninit(sc->sc_dev.dv_unit);
+ snstop(sc);
+ sninit(sc);
}
-int
-sninit(unit)
- int unit;
+static int
+sninit(sc)
+ struct sn_softc *sc;
{
- struct sn_softc *sc = sncd.cd_devs[unit];
struct sonic_reg *csr = sc->sc_csr;
- int s, error;
+ int s;
if (sc->sc_if.if_flags & IFF_RUNNING)
/* already running */
@@ -602,10 +564,6 @@ sninit(unit)
splx(s);
return (0);
-
-bad:
- snstop(sc->sc_dev.dv_unit);
- return (error);
}
/*
@@ -613,11 +571,10 @@ bad:
* Called on final close of device, or if sninit() fails
* part way through.
*/
-int
-snstop(unit)
- int unit;
+static int
+snstop(sc)
+ struct sn_softc *sc;
{
- struct sn_softc *sc = sncd.cd_devs[unit];
struct mtd *mtd;
int s = splnet();
@@ -628,7 +585,7 @@ snstop(unit)
/* free all receive buffers (currently static so nothing to do) */
/* free all pending transmit mbufs */
- while (mtd = mtdhead) {
+ while ((mtd = mtdhead) != NULL) {
mtdhead = mtdhead->mtd_link;
mtd->mtd_buf = 0;
mtd_free(mtd);
@@ -648,21 +605,21 @@ snstop(unit)
* In all cases we just reset the chip, and any retransmission
* will be handled by higher level protocol timeouts.
*/
-void
-snwatchdog(unit)
- int unit;
+static void
+snwatchdog(ifp)
+ struct ifnet *ifp;
{
- struct sn_softc *sc = sncd.cd_devs[unit];
+ struct sn_softc *sc = ifp->if_softc;
int temp;
if (mtdhead && mtdhead->mtd_buf) {
/* something still pending for transmit */
if (mtdhead->mtd_txp->status == 0)
- log(LOG_ERR, "%s%d: Tx - timeout\n",
- sc->sc_if.if_name, sc->sc_if.if_unit);
+ log(LOG_ERR, "%s: Tx - timeout\n",
+ sc->sc_dev.dv_xname);
else
- log(LOG_ERR, "%s%d: Tx - lost interrupt\n",
- sc->sc_if.if_name, sc->sc_if.if_unit);
+ log(LOG_ERR, "%s: Tx - lost interrupt\n",
+ sc->sc_dev.dv_xname);
temp = sc->sc_if.if_flags & IFF_UP;
snreset(sc);
sc->sc_if.if_flags |= temp;
@@ -672,7 +629,7 @@ snwatchdog(unit)
/*
* stuff packet into sonic (at splnet)
*/
-int
+static int
sonicput(sc, m0)
struct sn_softc *sc;
struct mbuf *m0;
@@ -682,7 +639,7 @@ sonicput(sc, m0)
struct TXpkt *txp;
struct mtd *mtdnew;
struct mbuf *m;
- int i, len = 0, totlen = 0;
+ int len = 0, totlen = 0;
/* grab the replacement mtd */
if ((mtdnew = mtd_alloc()) == 0)
@@ -753,12 +710,11 @@ printf("Padding %d to %d bytes\n", totlen, totlen+pad);
* there by the boot when doing a loopback test. Thus we don't
* have to fetch it from nv ram.
*/
-int
+static int
sngetaddr(sc)
struct sn_softc *sc;
{
- unsigned i, x, y;
- char *cp, *ea;
+ unsigned i;
sc->sc_csr->s_cr = CR_RST;
wbflush();
@@ -838,7 +794,6 @@ camprogram(sc)
{
struct sonic_reg *csr;
int timeout;
- int i;
csr = sc->sc_csr;
csr->s_cdp = LOWER(p_cda);
@@ -972,21 +927,20 @@ void
initialise_tba(sc)
struct sn_softc *sc;
{
- int i;
-
sc->txb_cnt = NTXB;
sc->txb_inuse = 0;
sc->txb_new = 0;
}
-int
-snintr(sc)
+static int
+snintr(sc, slot)
struct sn_softc *sc;
+ int slot;
{
struct sonic_reg *csr = sc->sc_csr;
int isr;
- while (isr = (csr->s_isr & ISR_ALL)) {
+ while ((isr = (csr->s_isr & ISR_ALL)) != 0) {
printf("snintr: %x.\n", isr);
/* scrub the interrupts that we are going to service */
csr->s_isr = isr;
@@ -1044,7 +998,7 @@ sonictxint(sc)
csr = sc->sc_csr;
- while (mtd = mtdhead) {
+ while ((mtd = mtdhead) != NULL) {
if (mtd->mtd_buf == 0)
break;
@@ -1057,7 +1011,7 @@ sonictxint(sc)
struct ether_header *eh;
eh = (struct ether_header *) mtd->mtd_buf;
- printf("xmit status=0x%x len=%d type=0x%x from %s",
+ printf("xmit status=0x%lx len=%ld type=0x%x from %s",
txp->status,
txp->pkt_size,
htons(eh->ether_type),
@@ -1073,7 +1027,7 @@ sonictxint(sc)
/* XXX - Do stats here. */
if ((SRD(txp->status) & TCR_PTX) == 0) {
- printf("sonic: Tx packet status=0x%x\n", txp->status);
+ printf("sonic: Tx packet status=0x%lx\n", txp->status);
if (mtdhead != mtdnext) {
printf("resubmitting remaining packets\n");
@@ -1099,7 +1053,6 @@ sonicrxint(sc)
{
struct sonic_reg *csr = sc->sc_csr;
struct RXpkt *rxp;
- u_long addr;
int orra;
rxp = &p_rda[sc->sc_rxmark];
@@ -1174,7 +1127,7 @@ sonic_read(sc, rxp)
/*extern char *ether_sprintf();*/
struct ether_header *et;
struct mbuf *m;
- int len, off, i;
+ int len;
caddr_t pkt;
/*
@@ -1190,7 +1143,7 @@ sonic_read(sc, rxp)
et = (struct ether_header *)pkt;
if (ethdebug) {
- printf("rcvd 0x%x status=0x%x, len=%d type=0x%x from %s",
+ printf("rcvd 0x%p status=0x%lx, len=%d type=0x%x from %s",
et, rxp->status, len, htons(et->ether_type),
ether_sprintf(et->ether_shost));
printf(" (to %s)\n", ether_sprintf(et->ether_dhost));
@@ -1213,7 +1166,7 @@ sonic_read(sc, rxp)
(et->ether_dhost[0] & 1) == 0 && /* !mcast and !bcast */
bcmp(et->ether_dhost, sc->sc_enaddr,
sizeof(et->ether_dhost)) != 0)
- return;
+ return (0);
}
#endif
m = sonic_get(sc, et, len);
diff --git a/sys/arch/mac68k/dev/ite.c b/sys/arch/mac68k/dev/ite.c
index 1ce56c6efa4..434cc491879 100644
--- a/sys/arch/mac68k/dev/ite.c
+++ b/sys/arch/mac68k/dev/ite.c
@@ -1,4 +1,4 @@
-/* $NetBSD: ite.c,v 1.16 1995/07/17 01:24:34 briggs Exp $ */
+/* $NetBSD: ite.c,v 1.22 1996/05/25 00:56:38 briggs Exp $ */
/*
* Copyright (c) 1988 University of Utah.
@@ -64,7 +64,7 @@
#include <sys/device.h>
#include <dev/cons.h>
-#include "../mac68k/via.h"
+#include <machine/viareg.h>
#include <machine/cpu.h>
#include <machine/frame.h>
@@ -73,10 +73,40 @@
#include <machine/adbsys.h>
#include <machine/iteioctl.h>
+#include "../mac68k/macrom.h"
+
+#include "ascvar.h"
+#include "itevar.h"
+
#include "6x10.h"
#define CHARWIDTH 6
#define CHARHEIGHT 10
+/* Local function prototypes */
+static inline void putpixel1 __P((int, int, int *, int));
+static void putpixel2 __P((int, int, int *, int));
+static void putpixel4 __P((int, int, int *, int));
+static void putpixel8 __P((int, int, int *, int));
+static void reversepixel1 __P((int, int, int));
+static void writechar __P((char, int, int, int));
+static void drawcursor __P((void));
+static void erasecursor __P((void));
+static void scrollup __P((void));
+static void scrolldown __P((void));
+static void clear_screen __P((int));
+static void clear_line __P((int));
+static void reset_tabs __P((void));
+static void vt100_reset __P((void));
+static void putc_normal __P((char));
+static void putc_esc __P((char));
+static void putc_gotpars __P((char));
+static void putc_getpars __P((char));
+static void putc_square __P((char));
+static void ite_putchar __P((char));
+static int ite_pollforchar __P((void));
+static int itematch __P((struct device *, void *, void *));
+static void iteattach __P((struct device *, struct device *, void *));
+
#define dprintf if (0) printf
#define ATTR_NONE 0
@@ -97,43 +127,48 @@ enum vt100state_e {
ESignore /* Ignore this sequence */
} vt100state = ESnormal;
-/* Received from MacBSDBoot, stored by Locore: */
-long videoaddr;
-long videorowbytes;
-long videobitdepth;
-unsigned long videosize;
+/* From Booter via locore */
+long videoaddr;
+long videorowbytes;
+long videobitdepth;
+unsigned long videosize;
-/* Calculated in itecninit(): */
-static int width, height, scrrows, scrcols;
-static void (*putpixel) (int x, int y, int *c, int num);
-static void (*reversepixel) (int x, int y, int num);
+/* Calculated by itecninit() */
+static int ite_initted = 0;
+static int width, height; /* width, height in pixels */
+static int scrcols, scrrows; /* width, height in characters */
+static int screenrowbytes; /* number of visible bytes per row */
-/* VT100 state: */
-#define MAXPARS 16
-static int x = 0, y = 0, savex, savey;
-static int par[MAXPARS], numpars, hanging_cursor, attr;
+/* VT100 emulation */
+#define MAXPARS 16 /* max number of VT100 op parameters */
+static int par[MAXPARS], numpars; /* parameter array, # of parameters */
+static int x = 0, y = 0; /* current VT100 cursor location */
+static int savex, savey; /* saved cursor location */
+static int hanging_cursor; /* cursor waiting for more output */
+static int attr; /* current video attribute */
+static char tab_stops[255]; /* tab stops */
+static int scrreg_top; /* scroll region */
+static int scrreg_bottom;
-/* Our tty: */
-struct tty *ite_tty;
+/* For polled ADB mode */
+static int polledkey;
+extern int adb_polling;
-/* For polled ADB mode: */
-static int polledkey;
-extern int adb_polling;
+struct tty *ite_tty; /* Our tty */
-/* Misc */
-void itestart();
-static void ite_putchar(char ch);
+static void (*putpixel) __P((int x, int y, int *c, int num));
+static void (*reversepixel) __P((int x, int y, int num));
-/* VT100 tab stops & scroll region */
-static char tab_stops[255];
-static int scrreg_top, scrreg_bottom;
/*
* Bitmap handling functions
*/
static inline void
-putpixel1(int xx, int yy, int *c, int num)
+putpixel1(xx, yy, c, num)
+ int xx, yy;
+ int *c;
+ int num;
{
unsigned int i, mask;
unsigned char *sc;
@@ -151,7 +186,10 @@ putpixel1(int xx, int yy, int *c, int num)
}
static void
-putpixel2(int xx, int yy, int *c, int num)
+putpixel2(xx, yy, c, num)
+ int xx, yy;
+ int *c;
+ int num;
{
unsigned int i, mask;
unsigned char *sc;
@@ -169,7 +207,10 @@ putpixel2(int xx, int yy, int *c, int num)
}
static void
-putpixel4(int xx, int yy, int *c, int num)
+putpixel4(xx, yy, c, num)
+ int xx, yy;
+ int *c;
+ int num;
{
unsigned int i, mask;
unsigned char *sc;
@@ -187,7 +228,10 @@ putpixel4(int xx, int yy, int *c, int num)
}
static void
-putpixel8(int xx, int yy, int *c, int num)
+putpixel8(xx, yy, c, num)
+ int xx, yy;
+ int *c;
+ int num;
{
unsigned char *sc;
@@ -201,7 +245,8 @@ putpixel8(int xx, int yy, int *c, int num)
}
static void
-reversepixel1(int xx, int yy, int num)
+reversepixel1(xx, yy, num)
+ int xx, yy, num;
{
unsigned int mask;
unsigned char *sc;
@@ -237,9 +282,11 @@ reversepixel1(int xx, int yy, int num)
}
static void
-writechar(char ch, int x, int y, int attr)
+writechar(ch, x, y, attr)
+ char ch;
+ int x, y, attr;
{
- int i, j, mask, rev, col[CHARHEIGHT];
+ int i, j, mask, rev, col[CHARHEIGHT];
unsigned char *c;
ch &= 0x7F;
@@ -254,16 +301,14 @@ writechar(char ch, int x, int y, int attr)
case 1:
for (j = 0; j < CHARWIDTH; j++) {
mask = 1 << (CHARWIDTH - 1 - j);
- for (i = 0; i < CHARHEIGHT; i++) {
+ for (i = 0; i < CHARHEIGHT; i++)
col[i] = ((c[i] & mask) ? 255 : 0) ^ rev;
- }
putpixel1(x + j, y, col, CHARHEIGHT);
}
if (attr & ATTR_UNDER) {
col[0] = 255;
- for (j = 0; j < CHARWIDTH; j++) {
+ for (j = 0; j < CHARWIDTH; j++)
putpixel1(x + j, y + CHARHEIGHT - 1, col, 1);
- }
}
break;
case 2:
@@ -271,116 +316,132 @@ writechar(char ch, int x, int y, int attr)
case 8:
for (j = 0; j < CHARWIDTH; j++) {
mask = 1 << (CHARWIDTH - 1 - j);
- for (i = 0; i < CHARHEIGHT; i++) {
+ for (i = 0; i < CHARHEIGHT; i++)
col[i] = ((c[i] & mask) ? 255 : 0) ^ rev;
- }
putpixel(x + j, y, col, CHARHEIGHT);
}
if (attr & ATTR_UNDER) {
col[0] = 255;
- for (j = 0; j < CHARWIDTH; j++) {
+ for (j = 0; j < CHARWIDTH; j++)
putpixel(x + j, y + CHARHEIGHT - 1, col, 1);
- }
}
break;
}
}
static void
-drawcursor(void)
+drawcursor()
{
- int j, X, Y;
+ unsigned int j, X, Y;
X = x * CHARWIDTH;
Y = y * CHARHEIGHT;
- for (j = 0; j < CHARWIDTH; j++) {
+ for (j = 0; j < CHARWIDTH; j++)
reversepixel(X + j, Y, CHARHEIGHT);
- }
}
static void
-erasecursor(void)
+erasecursor()
{
- int j, X, Y;
+ unsigned int j, X, Y;
X = x * CHARWIDTH;
Y = y * CHARHEIGHT;
- for (j = 0; j < CHARWIDTH; j++) {
+ for (j = 0; j < CHARWIDTH; j++)
reversepixel(X + j, Y, CHARHEIGHT);
- }
}
static void
-scrollup(void)
+scrollup()
{
- unsigned long *from, *to;
- int i, linelongs, tocopy, copying;
- linelongs = videorowbytes * CHARHEIGHT / 4;
-
- to = (unsigned long *) videoaddr + ((scrreg_top-1) * linelongs);
- from = to + linelongs;
-
- tocopy = (scrreg_bottom - scrreg_top) * linelongs;
- while (tocopy > 0) {
- copying = (tocopy > 16383) ? 16383 : tocopy;
- bcopy(from, to, copying * 4);
- from += copying;
- to += copying;
- tocopy -= copying;
+ unsigned char *from, *to;
+ unsigned int linebytes;
+ unsigned short i;
+
+ linebytes = videorowbytes * CHARHEIGHT;
+ to = (unsigned char *) videoaddr + ((scrreg_top - 1) * linebytes);
+ from = to + linebytes;
+
+ for (i = (scrreg_bottom - scrreg_top) * CHARHEIGHT; i > 0; i--) {
+ ovbcopy(from, to, screenrowbytes);
+ from += videorowbytes;
+ to += videorowbytes;
+ }
+ for (i = CHARHEIGHT; i > 0; i--) {
+ bzero(to, screenrowbytes);
+ to += videorowbytes;
}
- to = (unsigned long *) videoaddr;
- bzero(to + (scrreg_bottom - 1) * linelongs, linelongs * sizeof(long));
}
static void
-scrolldown(void)
+scrolldown()
{
- unsigned long *from, *to;
- int i, linelongs;
- linelongs = videorowbytes * CHARHEIGHT / 4;
-
- to = (unsigned long *) videoaddr + linelongs * (scrreg_bottom);
- from = to - linelongs;
-
- for (i = (scrreg_bottom - scrreg_top) * linelongs; i > 0; i--) {
- *--to = *--from;
+ unsigned char *from, *to;
+ unsigned int linebytes;
+ unsigned short i;
+
+ linebytes = videorowbytes * CHARHEIGHT;
+ to = (unsigned char *) videoaddr + (scrreg_bottom * linebytes);
+ from = to - linebytes;
+
+ for (i = (scrreg_bottom - scrreg_top) * CHARHEIGHT; i > 0; i--) {
+ from -= videorowbytes;
+ to -= videorowbytes;
+ ovbcopy(from, to, screenrowbytes);
}
- for (i = linelongs; i > 0; i--) {
- *--to = 0;
+ for (i = CHARHEIGHT; i > 0; i--) {
+ to -= videorowbytes;
+ bzero(to, screenrowbytes);
}
}
static void
-clear_screen(int which)
+clear_screen(which)
+ int which;
{
- unsigned long *p;
- int i, linelongs;
+ unsigned char *p;
+ unsigned short len, i;
- p = (unsigned long *) videoaddr;
- linelongs = videorowbytes * CHARHEIGHT / 4;
+ p = (unsigned char *) videoaddr;
switch (which) {
case 0: /* To end of screen */
- p += y * linelongs;
- i = (scrrows - y) * linelongs;
+ if (x > 0) {
+ clear_line(0);
+ if (y < scrrows)
+ y++;
+ x = 0;
+ }
+ p += y * videorowbytes * CHARHEIGHT;
+ len = scrrows - y;
break;
case 1: /* To start of screen */
- i = y * linelongs;
+ if (x > 0) {
+ clear_line(1);
+ if (y > 0)
+ y--;
+ x = 0;
+ }
+ len = y;
break;
case 2: /* Whole screen */
- i = scrrows * linelongs;
+ len = scrrows;
break;
}
- bzero(p, i * sizeof(long));
+ for (i = len * CHARHEIGHT; i > 0; i--) {
+ bzero(p, screenrowbytes);
+ p += videorowbytes;
+ }
}
static void
-clear_line(int which)
+clear_line(which)
+ int which;
{
- int start, end, i;
+ int start, end, i;
/*
* This routine runs extremely slowly. I don't think it's
@@ -390,6 +451,7 @@ clear_line(int which)
*/
switch (which) {
+ default:
case 0: /* To end of line */
start = x;
end = scrcols;
@@ -404,31 +466,31 @@ clear_line(int which)
break;
}
- for (i = start; i < end; i++) {
+ for (i = start; i < end; i++)
writechar(' ', i, y, ATTR_NONE);
- }
}
+
static void
-reset_tabs(void)
+reset_tabs()
{
int i;
- for (i = 0; i<= scrcols; i++) {
+ for (i = 0; i<= scrcols; i++)
tab_stops[i] = ((i % 8) == 0);
- }
}
static void
-vt100_reset(void)
+vt100_reset()
{
- reset_tabs;
+ reset_tabs();
scrreg_top = 1;
scrreg_bottom = scrrows;
attr = ATTR_NONE;
}
static void
-putc_normal(char ch)
+putc_normal(ch)
+ char ch;
{
switch (ch) {
case '\a': /* Beep */
@@ -436,24 +498,22 @@ putc_normal(char ch)
break;
case 127: /* Delete */
case '\b': /* Backspace */
- if (hanging_cursor) {
+ if (hanging_cursor)
hanging_cursor = 0;
- } else
- if (x > 0) {
- x--;
- }
+ else if (x > 0)
+ x--;
break;
case '\t': /* Tab */
do {
ite_putchar(' ');
- } while (tab_stops[x] = 0);
+ x++;
+ } while ((tab_stops[x] == 0) && (x < scrcols));
break;
case '\n': /* Line feed */
- if (y == scrreg_bottom - 1) {
+ if (y == scrreg_bottom - 1)
scrollup();
- } else {
+ else
y++;
- }
break;
case '\r': /* Carriage return */
x = 0;
@@ -467,19 +527,19 @@ putc_normal(char ch)
if (ch >= ' ') {
if (hanging_cursor) {
x = 0;
- if (y == scrreg_bottom - 1) {
+ if (y == scrreg_bottom - 1)
scrollup();
- } else {
+ else
y++;
- }
hanging_cursor = 0;
}
+
writechar(ch, x, y, attr);
- if (x == scrcols - 1) {
+
+ if (x == scrcols - 1)
hanging_cursor = 1;
- } else {
+ else
x++;
- }
if (x >= scrcols) { /* can we ever get here? */
x = 0;
y++;
@@ -490,7 +550,8 @@ putc_normal(char ch)
}
static void
-putc_esc(char ch)
+putc_esc(ch)
+ char ch;
{
vt100state = ESnormal;
@@ -499,21 +560,19 @@ putc_esc(char ch)
vt100state = ESsquare;
break;
case 'D': /* Line feed */
- if (y == scrreg_bottom - 1) {
+ if (y == scrreg_bottom - 1)
scrollup();
- } else {
+ else
y++;
- }
break;
case 'H': /* Set tab stop */
tab_stops[x] = 1;
break;
case 'M': /* Cursor up */
- if (y == scrreg_top - 1) {
+ if (y == scrreg_top - 1)
scrolldown();
- } else {
+ else
y--;
- }
break;
case '>':
vt100_reset();
@@ -533,31 +592,30 @@ putc_esc(char ch)
}
static void
-putc_gotpars(char ch)
+putc_gotpars(ch)
+ char ch;
{
- int i;
+ int i;
vt100state = ESnormal;
switch (ch) {
case 'A': /* Up */
i = par[0];
do {
- if (y == scrreg_top - 1) {
+ if (y == scrreg_top - 1)
scrolldown();
- } else {
+ else
y--;
- };
i--;
} while (i > 0);
break;
case 'B': /* Down */
i = par[0];
do {
- if (y == scrreg_bottom - 1) {
+ if (y == scrreg_bottom - 1)
scrollup();
- } else {
+ else
y++;
- };
i--;
} while (i > 0);
break;
@@ -579,9 +637,8 @@ putc_gotpars(char ch)
clear_line(par[0]);
break;
case 'g': /* Clear tab stops */
- if (numpars >= 1 && par[0] == 3) {
+ if (numpars >= 1 && par[0] == 3)
reset_tabs();
- }
break;
case 'm': /* Set attribute */
for (i = 0; i < numpars; i++) {
@@ -603,22 +660,21 @@ putc_gotpars(char ch)
break;
case 'r': /* Set scroll region */
/* ensure top < bottom, and both within limits */
- if ((numpars > 0) && (par[0] < scrrows)) {
+ if ((numpars > 0) && (par[0] < scrrows))
scrreg_top = par[0];
- } else {
+ else
scrreg_top = 1;
- }
- if ((numpars > 1) && (par[1] <= scrrows) && (par[1] > par[0])) {
+ if ((numpars > 1) && (par[1] <= scrrows) && (par[1] > par[0]))
scrreg_bottom = par[1];
- } else {
+ else
scrreg_bottom = scrrows;
- }
break;
}
}
static void
-putc_getpars(char ch)
+putc_getpars(ch)
+ char ch;
{
if (ch == '?') {
/* Not supported */
@@ -629,27 +685,26 @@ putc_getpars(char ch)
/* Not supported */
return;
}
- if (ch == ';' && numpars < MAXPARS - 1) {
+ if (ch == ';' && numpars < MAXPARS - 1)
numpars++;
- } else
- if (ch >= '0' && ch <= '9') {
- par[numpars] *= 10;
- par[numpars] += ch - '0';
- } else {
- numpars++;
- vt100state = ESgotpars;
- putc_gotpars(ch);
- }
+ else if (ch >= '0' && ch <= '9') {
+ par[numpars] *= 10;
+ par[numpars] += ch - '0';
+ } else {
+ numpars++;
+ vt100state = ESgotpars;
+ putc_gotpars(ch);
+ }
}
static void
-putc_square(char ch)
+putc_square(ch)
+ char ch;
{
- int i;
+ unsigned short i;
- for (i = 0; i < MAXPARS; i++) {
+ for (i = 0; i < MAXPARS; i++)
par[i] = 0;
- }
numpars = 0;
vt100state = ESgetpars;
@@ -658,10 +713,12 @@ putc_square(char ch)
}
static void
-ite_putchar(char ch)
+ite_putchar(ch)
+ char ch;
{
switch (vt100state) {
- default:vt100state = ESnormal; /* FALLTHROUGH */
+ default:
+ vt100state = ESnormal; /* FALLTHROUGH */
case ESnormal:
putc_normal(ch);
break;
@@ -679,36 +736,25 @@ ite_putchar(char ch)
break;
}
- if (x >= scrcols) {
+ if (x >= scrcols)
x = scrcols - 1;
- }
- if (x < 0) {
+ if (x < 0)
x = 0;
- }
- if (y >= scrrows) {
+ if (y >= scrrows)
y = scrrows - 1;
- }
- if (y < 0) {
+ if (y < 0)
y = 0;
- }
}
+
+
/*
* Keyboard support functions
*/
static int
-ite_dopollkey(int key)
+ite_pollforchar()
{
- polledkey = key;
-
- return 0;
-}
-
-
-static int
-ite_pollforchar(void)
-{
- int s;
+ int s;
register int intbits;
s = splhigh();
@@ -736,30 +782,56 @@ ite_pollforchar(void)
return polledkey;
}
+
+
/*
- * Tty handling functions
+ * Autoconfig attachment
*/
+struct cfattach ite_ca = {
+ sizeof(struct device), itematch, iteattach
+};
+
+struct cfdriver ite_cd = {
+ NULL, "ite", DV_TTY
+};
+
+static int
+itematch(pdp, match, auxp)
+ struct device *pdp;
+ void *match, *auxp;
+{
+ return 1;
+}
+
static void
-iteattach(struct device * parent, struct device * dev, void *aux)
+iteattach(parent, dev, aux)
+ struct device *parent, *dev;
+ void *aux;
{
printf(" (minimal console)\n");
}
-extern int matchbyname();
-struct cfdriver itecd = {
- NULL, "ite", matchbyname, iteattach, DV_TTY, sizeof(struct device)
-};
+/*
+ * Tty handling functions
+ */
int
-iteopen(dev_t dev, int mode, int devtype, struct proc * p)
+iteopen(dev, mode, devtype, p)
+ dev_t dev;
+ int mode;
+ int devtype;
+ struct proc *p;
{
register struct tty *tp;
register int error;
- int first = 0;
dprintf("iteopen(): enter(0x%x)\n", (int) dev);
+
+ if (!ite_initted)
+ return (ENXIO);
+
if (ite_tty == NULL)
tp = ite_tty = ttymalloc();
else
@@ -767,6 +839,7 @@ iteopen(dev_t dev, int mode, int devtype, struct proc * p)
if ((tp->t_state & (TS_ISOPEN | TS_XCLUDE)) == (TS_ISOPEN | TS_XCLUDE)
&& p->p_ucred->cr_uid != 0)
return (EBUSY);
+
tp->t_oproc = itestart;
tp->t_param = NULL;
tp->t_dev = dev;
@@ -780,85 +853,109 @@ iteopen(dev_t dev, int mode, int devtype, struct proc * p)
tp->t_state = TS_ISOPEN | TS_CARR_ON;
ttsetwater(tp);
}
+
error = (*linesw[tp->t_line].l_open) (dev, tp);
tp->t_winsize.ws_row = scrrows;
tp->t_winsize.ws_col = scrcols;
+
dprintf("iteopen(): exit(%d)\n", error);
return (error);
}
int
-iteclose(dev_t dev, int flag, int mode, struct proc * p)
+iteclose(dev, flag, mode, p)
+ dev_t dev;
+ int flag;
+ int mode;
+ struct proc *p;
{
dprintf("iteclose: enter (%d)\n", (int) dev);
+
(*linesw[ite_tty->t_line].l_close) (ite_tty, flag);
ttyclose(ite_tty);
#if 0
ttyfree(ite_tty);
ite_tty = (struct tty *) 0;
#endif
+
dprintf("iteclose: exit\n");
return 0;
}
int
-iteread(dev_t dev, struct uio * uio, int flag)
+iteread(dev, uio, flag)
+ dev_t dev;
+ struct uio *uio;
+ int flag;
{
dprintf("iteread: enter\n");
return (*linesw[ite_tty->t_line].l_read) (ite_tty, uio, flag);
- dprintf("iteread: exit\n");
}
int
-itewrite(dev_t dev, struct uio * uio, int flag)
+itewrite(dev, uio, flag)
+ dev_t dev;
+ struct uio *uio;
+ int flag;
{
dprintf("itewrite: enter\n");
return (*linesw[ite_tty->t_line].l_write) (ite_tty, uio, flag);
- dprintf("itewrite: exit\n");
}
struct tty *
itetty(dev)
- dev_t dev;
+ dev_t dev;
{
return (ite_tty);
}
int
-iteioctl(dev_t dev, int cmd, caddr_t addr, int flag, struct proc * p)
+iteioctl(dev, cmd, addr, flag, p)
+ dev_t dev;
+ int cmd;
+ caddr_t addr;
+ int flag;
+ struct proc *p;
{
register struct tty *tp = ite_tty;
- int error;
+ int error;
dprintf("iteioctl: enter(%d, 0x%x)\n", cmd, cmd);
+
error = (*linesw[tp->t_line].l_ioctl) (tp, cmd, addr, flag, p);
if (error >= 0) {
dprintf("iteioctl: exit(%d)\n", error);
return (error);
}
+
error = ttioctl(tp, cmd, addr, flag, p);
if (error >= 0) {
dprintf("iteioctl: exit(%d)\n", error);
return (error);
}
+
switch (cmd) {
- case ITEIOC_RINGBELL:{
+ case ITEIOC_RINGBELL:
+ {
asc_ringbell();
return (0);
}
- case ITEIOC_SETBELL:{
+ case ITEIOC_SETBELL:
+ {
struct bellparams *bp = (void *) addr;
asc_setbellparams(bp->freq, bp->len, bp->vol);
return (0);
}
- case ITEIOC_GETBELL:{
+ case ITEIOC_GETBELL:
+ {
struct bellparams *bp = (void *) addr;
asc_getbellparams(&bp->freq, &bp->len, &bp->vol);
return (0);
}
}
+
dprintf("iteioctl: exit(ENOTTY)\n");
return (ENOTTY);
}
@@ -867,7 +964,6 @@ void
itestart(register struct tty * tp)
{
register int cc, s;
- int hiwat = 0, hadcursor = 0;
s = spltty();
if (tp->t_state & (TS_TIMEOUT | TS_BUSY | TS_TTSTOP)) {
@@ -879,9 +975,8 @@ itestart(register struct tty * tp)
cc = tp->t_outq.c_cc;
splx(s);
erasecursor();
- while (cc-- > 0) {
+ while (cc-- > 0)
ite_putchar(getc(&tp->t_outq));
- }
drawcursor();
s = spltty();
@@ -892,14 +987,12 @@ itestart(register struct tty * tp)
void
itestop(struct tty * tp, int flag)
{
- int s;
+ int s;
s = spltty();
- if (tp->t_state & TS_BUSY) {
- if ((tp->t_state & TS_TTSTOP) == 0) {
+ if (tp->t_state & TS_BUSY)
+ if ((tp->t_state & TS_TTSTOP) == 0)
tp->t_state |= TS_FLUSH;
- }
- }
splx(s);
}
@@ -907,65 +1000,60 @@ int
ite_intr(adb_event_t * event)
{
static int shift = 0, control = 0;
- int key, press, val, state;
- char str[10], *s;
+ int key, press, val, state;
+ char str[10], *s;
key = event->u.k.key;
press = ADBK_PRESS(key);
val = ADBK_KEYVAL(key);
- if (val == ADBK_SHIFT) {
+ if (val == ADBK_SHIFT)
shift = press;
- } else
- if (val == ADBK_CONTROL) {
- control = press;
- } else
- if (press) {
- switch (val) {
- case ADBK_UP:
- str[0] = '\e';
- str[1] = 'O';
- str[2] = 'A';
- str[3] = '\0';
- break;
- case ADBK_DOWN:
- str[0] = '\e';
- str[1] = 'O';
- str[2] = 'B';
- str[3] = '\0';
- break;
- case ADBK_RIGHT:
- str[0] = '\e';
- str[1] = 'O';
- str[2] = 'C';
- str[3] = '\0';
- break;
- case ADBK_LEFT:
- str[0] = '\e';
- str[1] = 'O';
- str[2] = 'D';
- str[3] = '\0';
- break;
- default:
- state = 0;
- if (shift) {
- state = 1;
- }
- if (control) {
- state = 2;
- }
- str[0] = keyboard[val][state];
- str[1] = '\0';
- break;
- }
- if (adb_polling) {
- polledkey = str[0];
- } else {
- for (s = str; *s; s++) {
- (*linesw[ite_tty->t_line].l_rint) (*s, ite_tty);
- }
- }
- }
+ else if (val == ADBK_CONTROL)
+ control = press;
+ else if (press) {
+ switch (val) {
+ case ADBK_UP:
+ str[0] = '\e';
+ str[1] = 'O';
+ str[2] = 'A';
+ str[3] = '\0';
+ break;
+ case ADBK_DOWN:
+ str[0] = '\e';
+ str[1] = 'O';
+ str[2] = 'B';
+ str[3] = '\0';
+ break;
+ case ADBK_RIGHT:
+ str[0] = '\e';
+ str[1] = 'O';
+ str[2] = 'C';
+ str[3] = '\0';
+ break;
+ case ADBK_LEFT:
+ str[0] = '\e';
+ str[1] = 'O';
+ str[2] = 'D';
+ str[3] = '\0';
+ break;
+ default:
+ state = 0;
+ if (shift)
+ state = 1;
+ if (control)
+ state = 2;
+ str[0] = keyboard[val][state];
+ str[1] = '\0';
+ break;
+ }
+ if (adb_polling)
+ polledkey = str[0];
+ else
+ for (s = str; *s; s++)
+ (*linesw[ite_tty->t_line].l_rint)(*s, ite_tty);
+ }
+ return 0;
}
/*
* Console functions
@@ -974,28 +1062,29 @@ ite_intr(adb_event_t * event)
int
itecnprobe(struct consdev * cp)
{
- int maj, unit;
+ int maj, unit;
/* locate the major number */
- for (maj = 0; maj < nchrdev; maj++) {
- if (cdevsw[maj].d_open == iteopen) {
+ for (maj = 0; maj < nchrdev; maj++)
+ if (cdevsw[maj].d_open == iteopen)
break;
- }
- }
- if (maj == nchrdev) {
+ if (maj == nchrdev)
panic("itecnprobe(): did not find iteopen().");
- }
+
unit = 0; /* hardcode first device as console. */
/* initialize required fields */
cp->cn_dev = makedev(maj, unit);
cp->cn_pri = CN_INTERNAL;
+
+ return 0;
}
int
itecninit(struct consdev * cp)
{
+ ite_initted = 1;
width = videosize & 0xffff;
height = (videosize >> 16) & 0xffff;
scrrows = height / CHARHEIGHT;
@@ -1008,22 +1097,26 @@ itecninit(struct consdev * cp)
case 1:
putpixel = putpixel2;
reversepixel = reversepixel1;
+ screenrowbytes = (width + 7) >> 3;
break;
case 2:
putpixel = putpixel2;
reversepixel = reversepixel1;
+ screenrowbytes = (width + 3) >> 2;
break;
case 4:
putpixel = putpixel4;
reversepixel = reversepixel1;
+ screenrowbytes = (width + 1) >> 1;
break;
case 8:
putpixel = putpixel8;
reversepixel = reversepixel1;
+ screenrowbytes = width;
break;
}
- iteon(cp->cn_dev, 0);
+ return iteon(cp->cn_dev, 0);
}
int
@@ -1032,6 +1125,7 @@ iteon(dev_t dev, int flags)
erasecursor();
clear_screen(2);
drawcursor();
+ return 0;
}
int
@@ -1039,6 +1133,7 @@ iteoff(dev_t dev, int flags)
{
erasecursor();
clear_screen(2);
+ return 0;
}
int
@@ -1052,16 +1147,14 @@ itecngetc(dev_t dev)
int
itecnputc(dev_t dev, int c)
{
- extern dev_t mac68k_serdev;
- int s;
-
-/* s = splhigh (); */
+ extern dev_t mac68k_zsdev;
+ extern int zscnputc __P((dev_t dev, int c));
erasecursor();
ite_putchar(c);
drawcursor();
if (mac68k_machine.serial_boot_echo)
- sercnputc(mac68k_serdev, c);
+ zscnputc(mac68k_zsdev, c);
-/* splx (s); */
+ return c;
}
diff --git a/sys/arch/mac68k/dev/mac68k5380.c b/sys/arch/mac68k/dev/mac68k5380.c
index 5c4fdca77d4..dd31e1ce67e 100644
--- a/sys/arch/mac68k/dev/mac68k5380.c
+++ b/sys/arch/mac68k/dev/mac68k5380.c
@@ -1,4 +1,4 @@
-/* $NetBSD: mac68k5380.c,v 1.15 1995/11/01 04:59:03 briggs Exp $ */
+/* $NetBSD: mac68k5380.c,v 1.24 1996/05/25 16:42:24 briggs Exp $ */
/*
* Copyright (c) 1995 Allen Briggs
@@ -47,11 +47,12 @@
/*
* Include the driver definitions
*/
-#include <mac68k/dev/ncr5380reg.h>
+#include "ncr5380reg.h"
#include <machine/stdarg.h>
+#include <machine/viareg.h>
-#include "../mac68k/via.h"
+#include "ncr5380var.h"
/*
* Set the various driver options
@@ -66,8 +67,39 @@
#undef DBG_PIO /* Show the polled-I/O process */
#undef DBG_INF /* Show information transfer process */
#define DBG_NOSTATIC /* No static functions, all in DDB trace*/
-#define DBG_PID 15 /* Keep track of driver */
+#define DBG_PID 25 /* Keep track of driver */
+#ifdef DBG_NOSTATIC
+# define static
+#endif
+#ifdef DBG_SEL
+# define DBG_SELPRINT(a,b) printf(a,b)
+#else
+# define DBG_SELPRINT(a,b)
+#endif
+#ifdef DBG_PIO
+# define DBG_PIOPRINT(a,b,c) printf(a,b,c)
+#else
+# define DBG_PIOPRINT(a,b,c)
+#endif
+#ifdef DBG_INF
+# define DBG_INFPRINT(a,b,c) a(b,c)
+#else
+# define DBG_INFPRINT(a,b,c)
+#endif
+#ifdef DBG_PID
+ /* static char *last_hit = NULL, *olast_hit = NULL; */
+ static char *last_hit[DBG_PID];
+# define PID(a) \
+ { int i; \
+ for (i=0; i< DBG_PID-1; i++) \
+ last_hit[i] = last_hit[i+1]; \
+ last_hit[DBG_PID-1] = a; }
+#else
+# define PID(a)
+#endif
+
#undef REAL_DMA /* Use DMA if sensible */
+#define scsi_ipending() (GET_5380_REG(NCR5380_DMSTAT) & SC_IRQ_SET)
#define fair_to_keep_dma() 1
#define claimed_dma() 1
#define reconsider_dma()
@@ -91,14 +123,21 @@ static volatile u_char *ncr = (volatile u_char *) 0x10000;
static volatile u_char *ncr_5380_with_drq = (volatile u_char *) 0x6000;
static volatile u_char *ncr_5380_without_drq = (volatile u_char *) 0x12000;
-static volatile u_char *scsi_enable = NULL;
-
#define SCSI_5380 ((struct scsi_5380 *) ncr)
#define GET_5380_REG(rnum) SCSI_5380->scsi_5380[((rnum)<<4)]
#define SET_5380_REG(rnum,val) (SCSI_5380->scsi_5380[((rnum)<<4)] = (val))
-void ncr5380_irq_intr(void *);
-void ncr5380_drq_intr(void *);
+static void ncr5380_irq_intr(void *);
+static void ncr5380_drq_intr(void *);
+static void do_ncr5380_drq_intr __P((void *));
+
+static __inline__ void scsi_clr_ipend __P((void));
+static void scsi_mach_init __P((struct ncr_softc *sc));
+static int machine_match __P((struct device *pdp, void *match,
+ void *auxp, struct cfdriver *cd));
+static __inline__ int pdma_ready __P((void));
+static int transfer_pdma __P((u_char *phasep, u_char *data,
+ u_long *count));
static __inline__ void
scsi_clr_ipend()
@@ -106,26 +145,7 @@ scsi_clr_ipend()
int tmp;
tmp = GET_5380_REG(NCR5380_IRCV);
-}
-
-extern __inline__ void
-scsi_ienable()
-{
- int s;
-
- s = splhigh();
- *scsi_enable = 0x80 | (V2IF_SCSIIRQ | V2IF_SCSIDRQ);
- splx(s);
-}
-
-extern __inline__ void
-scsi_idisable()
-{
- int s;
-
- s = splhigh();
- *scsi_enable = V2IF_SCSIIRQ | V2IF_SCSIDRQ;
- splx(s);
+ scsi_clear_irq();
}
static void
@@ -144,28 +164,26 @@ scsi_mach_init(sc)
ncr_5380_without_drq = (volatile u_char *)
(SCSIBase + (u_int) ncr_5380_without_drq);
- if (VIA2 == VIA2OFF)
+ if (VIA2 == VIA2OFF) {
scsi_enable = Via1Base + VIA2 * 0x2000 + vIER;
- else
+ scsi_flag = Via1Base + VIA2 * 0x2000 + vIFR;
+ } else {
scsi_enable = Via1Base + VIA2 * 0x2000 + rIER;
+ scsi_flag = Via1Base + VIA2 * 0x2000 + rIFR;
+ }
mac68k_register_scsi_irq(ncr5380_irq_intr, sc);
mac68k_register_scsi_drq(ncr5380_drq_intr, sc);
}
static int
-machine_match(pdp, cdp, auxp, cd)
+machine_match(pdp, match, auxp, cd)
struct device *pdp;
- struct cfdata *cdp;
- void *auxp;
+ void *match, *auxp;
struct cfdriver *cd;
{
- if (matchbyname(pdp, cdp, auxp) == 0)
- return 0;
if (!mac68k_machine.scsi80)
return 0;
- if (cdp->cf_unit != 0)
- return 0;
return 1;
}
@@ -181,9 +199,6 @@ u_long pending_5380_count;
int pdma_5380_sends = 0;
int pdma_5380_bytes = 0;
-char *pdma_5380_state="", *pdma_5380_prev_state="";
-#define DBG_SET(x) {pdma_5380_prev_state=pdma_5380_state; pdma_5380_state=(x);}
-
void
pdma_stat()
{
@@ -191,10 +206,8 @@ pdma_stat()
pdma_5380_sends, pdma_5380_bytes);
printf("pdma_5380_dir = %d\t",
pdma_5380_dir);
- printf("datap = 0x%x, remainder = %d.\n",
+ printf("datap = %p, remainder = %ld.\n",
pending_5380_data, pending_5380_count);
- printf("state: %s\t", pdma_5380_state);
- printf("last state: %s\n", pdma_5380_prev_state);
scsi_show();
}
#endif
@@ -203,14 +216,14 @@ void
pdma_cleanup(void)
{
SC_REQ *reqp = connected;
- int bytes, s;
+ int s;
s = splbio();
+ PID("pdma_cleanup0");
pdma_5380_dir = 0;
#if NCR5380_PDMA_DEBUG
- DBG_SET("in pdma_cleanup().")
pdma_5380_sends++;
pdma_5380_bytes+=(reqp->xdata_len - pending_5380_count);
#endif
@@ -244,13 +257,9 @@ pdma_cleanup(void)
/*
* Back for more punishment.
*/
-#if NCR5380_PDMA_DEBUG
- pdma_5380_state = "pdma_cleanup() -- going back to run_main().";
-#endif
+ PID("pdma_cleanup1");
run_main(cur_softc);
-#if NCR5380_PDMA_DEBUG
- pdma_5380_state = "pdma_cleanup() -- back from run_main().";
-#endif
+ PID("pdma_cleanup2");
}
#endif
@@ -262,21 +271,9 @@ pdma_ready()
int dmstat, idstat;
extern u_char ncr5380_no_parchk;
+ PID("pdma_ready0");
if (pdma_5380_dir) {
-#if NCR5380_PDMA_DEBUG
- DBG_SET("got irq interrupt in xfer.")
-#endif
- /*
- * If Mr. IRQ isn't set one might wonder how we got
- * here. It does happen, though.
- */
- dmstat = GET_5380_REG(NCR5380_DMSTAT);
- if (!(dmstat & SC_IRQ_SET)) {
-#if NCR5380_PDMA_DEBUG
- DBG_SET("irq not set.")
-#endif
- return 0;
- }
+ PID("pdma_ready1.");
/*
* For a phase mis-match, ATN is a "don't care," IRQ is 1 and
* all other bits in the Bus & Status Register are 0. Also,
@@ -284,22 +281,19 @@ extern u_char ncr5380_no_parchk;
* REQ. Since we're just checking that this interrupt isn't a
* reselection or a reset, we just check for either.
*/
+ dmstat = GET_5380_REG(NCR5380_DMSTAT);
idstat = GET_5380_REG(NCR5380_IDSTAT);
if ( ((dmstat & (0xff & ~SC_ATN_STAT)) == SC_IRQ_SET)
&& ((idstat & (SC_S_BSY|SC_S_REQ))
== (SC_S_BSY | SC_S_REQ)) ) {
-#if NCR5380_PDMA_DEBUG
- DBG_SET("BSY|REQ.")
-#endif
+ PID("pdma_ready2");
pdma_cleanup();
return 1;
} else if (PH_IN(reqp->phase) && (dmstat & SC_PAR_ERR)) {
if (!(ncr5380_no_parchk & (1 << reqp->targ_id)))
/* XXX: Should be parity error ???? */
reqp->xs->error = XS_DRIVER_STUFFUP;
-#if NCR5380_PDMA_DEBUG
- DBG_SET("PARITY.")
-#endif
+ PID("pdma_ready3");
/* XXX: is this the right reaction? */
pdma_cleanup();
return 1;
@@ -317,26 +311,25 @@ extern u_char ncr5380_no_parchk;
scsi_show();
panic("Spurious interrupt during PDMA xfer.\n");
}
- }
+ } else
+ PID("pdma_ready4");
#endif
return 0;
}
-void
+static void
ncr5380_irq_intr(p)
void *p;
{
- struct ncr_softc *sc = p;
+ PID("irq");
#if USE_PDMA
if (pdma_ready()) {
return;
}
#endif
- if (GET_5380_REG(NCR5380_DMSTAT) & SC_IRQ_SET) {
- scsi_idisable();
- ncr_ctrl_intr(cur_softc);
- }
+ scsi_idisable();
+ ncr_ctrl_intr(cur_softc);
}
/*
@@ -354,43 +347,25 @@ ncr5380_irq_intr(p)
* detect and handle the bus error for early termination of a command.
* This is usually caused by a disconnecting target.
*/
-void
-ncr5380_drq_intr(p)
+static void
+do_ncr5380_drq_intr(p)
void *p;
{
#if USE_PDMA
extern int *nofault, mac68k_buserr_addr;
- struct ncr_softc *sc = p;
label_t faultbuf;
register int count;
volatile u_int32_t *long_drq;
u_int32_t *long_data;
- volatile u_int8_t *drq;
+ volatile u_int8_t *drq, tmp_data;
u_int8_t *data;
- /*
- * If we're not ready to xfer data, just return.
- */
- if ( !(GET_5380_REG(NCR5380_DMSTAT) & SC_DMA_REQ)
- || !pdma_5380_dir) {
- return;
- }
-
- /*
- * I don't think this should be necessary, but it is
- * for writes--at least to some devices. They don't
- * let go of PH_DATAOUT until we do pdma_cleanup().
- */
- if (pending_5380_count == 0) {
-#if NCR5380_PDMA_DEBUG
- DBG_SET("forcing pdma_cleanup().")
-#endif
- pdma_cleanup();
- return;
+#if DBG_PID
+ if (pdma_5380_dir == 2) {
+ PID("drq (in)");
+ } else {
+ PID("drq (out)");
}
-
-#if NCR5380_PDMA_DEBUG
- DBG_SET("got drq interrupt.")
#endif
/*
@@ -401,15 +376,12 @@ extern int *nofault, mac68k_buserr_addr;
nofault = (int *) &faultbuf;
if (setjmp((label_t *) nofault)) {
+ PID("drq berr");
nofault = (int *) 0;
-#if NCR5380_PDMA_DEBUG
- DBG_SET("buserr in xfer.")
-#endif
count = ( (u_long) mac68k_buserr_addr
- (u_long) ncr_5380_with_drq);
if ((count < 0) || (count > pending_5380_count)) {
- printf("pdma %s: count = %d (0x%x) (pending "
- "count %d)\n",
+ printf("pdma %s: cnt = %d (0x%x) (pending cnt %ld)\n",
(pdma_5380_dir == 2) ? "in" : "out",
count, count, pending_5380_count);
panic("something is wrong");
@@ -418,28 +390,22 @@ extern int *nofault, mac68k_buserr_addr;
pending_5380_data += count;
pending_5380_count -= count;
-#if NCR5380_PDMA_DEBUG
- DBG_SET("handled bus error in xfer.")
-#endif
mac68k_buserr_addr = 0;
+
+ PID("end drq early");
+
return;
}
if (pdma_5380_dir == 2) { /* Data In */
int resid;
-#if NCR5380_PDMA_DEBUG
- DBG_SET("Data in.")
-#endif
/*
* Get the dest address aligned.
*/
resid = count = min(pending_5380_count,
4 - (((int) pending_5380_data) & 0x3));
if (count && (count < 4)) {
-#if NCR5380_PDMA_DEBUG
- DBG_SET("Data in (aligning dest).")
-#endif
data = (u_int8_t *) pending_5380_data;
drq = (u_int8_t *) ncr_5380_with_drq;
while (count) {
@@ -457,50 +423,20 @@ extern int *nofault, mac68k_buserr_addr;
while (pending_5380_count) {
int dcount;
-#if NCR5380_PDMA_DEBUG
- DBG_SET("Data in (starting read).")
-#endif
dcount = count = min(pending_5380_count, MIN_PHYS);
long_drq = (volatile u_int32_t *) ncr_5380_with_drq;
long_data = (u_int32_t *) pending_5380_data;
#define R4 *long_data++ = *long_drq++
- while ( count >= 512 ) {
- if (!(GET_5380_REG(NCR5380_DMSTAT) & SC_DMA_REQ)) {
- nofault = (int *) 0;
-
- pending_5380_data += (dcount - count);
- pending_5380_count -= (dcount - count);
-#if NCR5380_PDMA_DEBUG
- DBG_SET("drq low")
-#endif
- return;
- }
+ while ( count >= 64 ) {
R4; R4; R4; R4; R4; R4; R4; R4;
R4; R4; R4; R4; R4; R4; R4; R4; /* 64 */
- R4; R4; R4; R4; R4; R4; R4; R4;
- R4; R4; R4; R4; R4; R4; R4; R4; /* 128 */
- R4; R4; R4; R4; R4; R4; R4; R4;
- R4; R4; R4; R4; R4; R4; R4; R4;
- R4; R4; R4; R4; R4; R4; R4; R4;
- R4; R4; R4; R4; R4; R4; R4; R4; /* 256 */
- R4; R4; R4; R4; R4; R4; R4; R4;
- R4; R4; R4; R4; R4; R4; R4; R4;
- R4; R4; R4; R4; R4; R4; R4; R4;
- R4; R4; R4; R4; R4; R4; R4; R4;
- R4; R4; R4; R4; R4; R4; R4; R4;
- R4; R4; R4; R4; R4; R4; R4; R4;
- R4; R4; R4; R4; R4; R4; R4; R4;
- R4; R4; R4; R4; R4; R4; R4; R4; /* 512 */
- count -= 512;
+ count -= 64;
}
while (count >= 4) {
R4; count -= 4;
}
#undef R4
-#if NCR5380_PDMA_DEBUG
- DBG_SET("Data in (finishing up).")
-#endif
data = (u_int8_t *) long_data;
drq = (u_int8_t *) long_drq;
while (count) {
@@ -514,18 +450,12 @@ extern int *nofault, mac68k_buserr_addr;
} else {
int resid;
-#if NCR5380_PDMA_DEBUG
- DBG_SET("Data out.")
-#endif
/*
* Get the source address aligned.
*/
resid = count = min(pending_5380_count,
4 - (((int) pending_5380_data) & 0x3));
if (count && (count < 4)) {
-#if NCR5380_PDMA_DEBUG
- DBG_SET("Data out (aligning dest).")
-#endif
data = (u_int8_t *) pending_5380_data;
drq = (u_int8_t *) ncr_5380_with_drq;
while (count) {
@@ -543,9 +473,6 @@ extern int *nofault, mac68k_buserr_addr;
while (pending_5380_count) {
int dcount;
-#if NCR5380_PDMA_DEBUG
- DBG_SET("Data out (starting write).")
-#endif
dcount = count = min(pending_5380_count, MIN_PHYS);
long_drq = (volatile u_int32_t *) ncr_5380_with_drq;
long_data = (u_int32_t *) pending_5380_data;
@@ -560,9 +487,6 @@ extern int *nofault, mac68k_buserr_addr;
W4; count -= 4;
}
#undef W4
-#if NCR5380_PDMA_DEBUG
- DBG_SET("Data out (cleaning up).")
-#endif
data = (u_int8_t *) long_data;
drq = (u_int8_t *) long_drq;
while (count) {
@@ -573,6 +497,14 @@ extern int *nofault, mac68k_buserr_addr;
pending_5380_count -= dcount;
pending_5380_data += dcount;
}
+ PID("write complete");
+
+ drq = (volatile u_int8_t *) ncr_5380_with_drq;
+ tmp_data = *drq;
+
+ PID("read a byte?");
+
+ nofault = (int *) 0;
}
/*
@@ -581,13 +513,23 @@ extern int *nofault, mac68k_buserr_addr;
*/
nofault = (int *) 0;
-#if NCR5380_PDMA_DEBUG
- DBG_SET("done in xfer.")
-#endif
-
+ PID("end drq");
+ return;
+#else
+ return;
#endif /* if USE_PDMA */
}
+static void
+ncr5380_drq_intr(p)
+ void *p;
+{
+ while (GET_5380_REG(NCR5380_DMSTAT) & SC_DMA_REQ) {
+ do_ncr5380_drq_intr(p);
+ scsi_clear_drq();
+ }
+}
+
#if USE_PDMA
#define SCSI_TIMEOUT_VAL 10000000
@@ -599,24 +541,19 @@ transfer_pdma(phasep, data, count)
u_long *count;
{
SC_REQ *reqp = connected;
- int len = *count, i, scsi_timeout = SCSI_TIMEOUT_VAL;
- int s, err;
+ int len = *count, s, scsi_timeout = SCSI_TIMEOUT_VAL;
if (pdma_5380_dir) {
panic("ncrscsi: transfer_pdma called when operation already "
"pending.\n");
}
-#if NCR5380_PDMA_DEBUG
- DBG_SET("in transfer_pdma.")
-#endif
+ PID("transfer_pdma0")
/*
* Don't bother with PDMA if we can't sleep or for small transfers.
*/
if (reqp->dr_flag & DRIVER_NOINT) {
-#if NCR5380_PDMA_DEBUG
- DBG_SET("pdma, actually using transfer_pio.")
-#endif
+ PID("pdma, falling back to transfer_pio.")
transfer_pio(phasep, data, count, 0);
return -1;
}
@@ -663,10 +600,6 @@ transfer_pdma(phasep, data, count)
pending_5380_data = data;
pending_5380_count = len;
-#if NCR5380_PDMA_DEBUG
- DBG_SET("setting up for interrupt.")
-#endif
-
/*
* Set the transfer function to be called on DRQ interrupts.
* And note that we're waiting.
@@ -688,9 +621,7 @@ transfer_pdma(phasep, data, count)
break;
}
-#if NCR5380_PDMA_DEBUG
- DBG_SET("wait for interrupt.")
-#endif
+ PID("waiting for interrupt.")
/*
* Now that we're set up, enable interrupts and drop processor
diff --git a/sys/arch/mac68k/dev/ncr5380.c b/sys/arch/mac68k/dev/ncr5380.c
index 99a620f23f6..ad0c63c29d8 100644
--- a/sys/arch/mac68k/dev/ncr5380.c
+++ b/sys/arch/mac68k/dev/ncr5380.c
@@ -1,4 +1,4 @@
-/* $NetBSD: ncr5380.c,v 1.17 1996/01/06 15:56:12 briggs Exp $ */
+/* $NetBSD: ncr5380.c,v 1.29 1996/05/22 17:16:45 briggs Exp $ */
/*
* Copyright (c) 1995 Leo Weppelman.
@@ -30,38 +30,6 @@
* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*/
-
-#ifdef DBG_NOSTATIC
-# define static
-#endif
-#ifdef DBG_SEL
-# define DBG_SELPRINT(a,b) printf(a,b)
-#else
-# define DBG_SELPRINT(a,b)
-#endif
-#ifdef DBG_PIO
-# define DBG_PIOPRINT(a,b,c) printf(a,b,c)
-#else
-# define DBG_PIOPRINT(a,b,c)
-#endif
-#ifdef DBG_INF
-# define DBG_INFPRINT(a,b,c) a(b,c)
-#else
-# define DBG_INFPRINT(a,b,c)
-#endif
-#ifdef DBG_PID
- /* static char *last_hit = NULL, *olast_hit = NULL; */
- static char *last_hit[DBG_PID];
-# define PID(a) \
- { int i; \
- for (i=0; i< DBG_PID-1; i++) \
- last_hit[i] = last_hit[i+1]; \
- last_hit[DBG_PID-1] = a; } \
- /* olast_hit = last_hit; last_hit = a; */
-#else
-# define PID(a)
-#endif
-
/*
* Bit mask of targets you want debugging to be shown
*/
@@ -104,9 +72,9 @@ static volatile int main_running = 0;
*/
static u_char busy;
-static void ncr5380_minphys(struct buf *bp);
-static int ncr5380_scsi_cmd(struct scsi_xfer *xs);
-static int ncr5380_show_scsi_cmd(struct scsi_xfer *xs);
+static void ncr5380_minphys __P((struct buf *bp));
+static int ncr5380_scsi_cmd __P((struct scsi_xfer *xs));
+static void ncr5380_show_scsi_cmd __P((struct scsi_xfer *xs));
struct scsi_adapter ncr5380_switch = {
ncr5380_scsi_cmd, /* scsi_cmd() */
@@ -228,25 +196,29 @@ extern __inline__ void finish_req(SC_REQ *reqp)
*/
int ncr_cprint __P((void *auxp, char *));
void ncr_attach __P((struct device *, struct device *, void *));
-int ncr_match __P((struct device *, struct cfdata *, void *));
+int ncr_match __P((struct device *, void *, void *));
/*
* Tricks to make driver-name configurable
*/
-#define CFNAME(n) __CONCAT(n,cd)
+#define CFNAME(n) __CONCAT(n,_cd)
+#define CANAME(n) __CONCAT(n,_ca)
#define CFSTRING(n) __STRING(n)
+struct cfattach CANAME(DRNAME) = {
+ sizeof(struct ncr_softc), ncr_match, ncr_attach
+};
+
struct cfdriver CFNAME(DRNAME) = {
- NULL, CFSTRING(DRNAME), (cfmatch_t)ncr_match, ncr_attach,
- DV_DULL, sizeof(struct ncr_softc), NULL, 0 };
+ NULL, CFSTRING(DRNAME), DV_DULL
+};
int
-ncr_match(pdp, cdp, auxp)
+ncr_match(pdp, match, auxp)
struct device *pdp;
-struct cfdata *cdp;
-void *auxp;
+void *match, *auxp;
{
- return (machine_match(pdp, cdp, auxp, &CFNAME(DRNAME)));
+ return (machine_match(pdp, match, auxp, &CFNAME(DRNAME)));
}
void
@@ -332,7 +304,8 @@ ncr5380_scsi_cmd(struct scsi_xfer *xs)
* We do not queue RESET commands
*/
if (flags & SCSI_RESET) {
- scsi_reset(xs->sc_link->adapter_softc);
+ scsi_reset_verbose(xs->sc_link->adapter_softc,
+ "Got reset-command");
return (COMPLETE);
}
@@ -355,6 +328,7 @@ ncr5380_scsi_cmd(struct scsi_xfer *xs)
reqp->phase = NR_PHASE;
reqp->msgout = MSG_NOOP;
reqp->status = SCSGOOD;
+ reqp->message = 0xff;
reqp->link = NULL;
reqp->xs = xs;
reqp->targ_id = xs->sc_link->target;
@@ -373,7 +347,7 @@ ncr5380_scsi_cmd(struct scsi_xfer *xs)
}
if (!(flags & INUSE)) {
ncr_tprint(reqp, "scsi_cmd: command not in use.....\n");
- xs->flags |= ~INUSE;
+ xs->flags |= INUSE;
}
#ifdef REAL_DMA
@@ -439,7 +413,7 @@ ncr5380_minphys(struct buf *bp)
}
#undef MIN_PHYS
-static int
+static void
ncr5380_show_scsi_cmd(struct scsi_xfer *xs)
{
u_char *b = (u_char *) xs->cmd;
@@ -583,7 +557,7 @@ connected:
/*
* Let the target guide us through the bus-phases
*/
- while (information_transfer() == -1)
+ while (information_transfer(sc) == -1)
;
}
}
@@ -600,8 +574,15 @@ main_exit:
*/
PID("scsi_main4");
scsi_ienable();
- SET_5380_REG(NCR5380_IDSTAT, SC_HOST_ID);
- if (GET_5380_REG(NCR5380_DMSTAT) & SC_IRQ_SET) {
+
+ /*
+ * If we're not currently connected, enable reselection
+ * interrupts.
+ */
+ if (!connected)
+ SET_5380_REG(NCR5380_IDSTAT, SC_HOST_ID);
+
+ if (scsi_ipending()) {
if ((itype = check_intr(sc)) != INTR_SPURIOUS) {
scsi_idisable();
splx(sps);
@@ -667,15 +648,15 @@ ncr_ctrl_intr(sc)
struct ncr_softc *sc;
{
int itype;
- int dma_done;
- while (GET_5380_REG(NCR5380_DMSTAT) & SC_IRQ_SET) {
+ while (scsi_ipending()) {
scsi_idisable();
if ((itype = check_intr(sc)) != INTR_SPURIOUS) {
if (itype == INTR_RESEL)
reselect(sc);
else {
#ifdef REAL_DMA
+ int dma_done;
if (!(dma_done = dma_ready())) {
transfer_dma(connected, connected->phase, 0);
return;
@@ -707,8 +688,8 @@ struct ncr_softc *sc;
static int
scsi_select(reqp, code)
SC_REQ *reqp;
+int code;
{
- u_long timeout;
u_char tmp[1];
u_char phase;
u_long cnt;
@@ -927,7 +908,7 @@ SC_REQ *reqp;
transfer_pio(&phase, &msg, &len, 0);
}
- else scsi_reset(sc);
+ else scsi_reset_verbose(sc, "Connected to unidentified target");
SET_5380_REG(NCR5380_ICOM, 0);
reqp->xs->error = code ? code : XS_DRIVER_STUFFUP;
@@ -955,11 +936,12 @@ identify_failed:
/*
* Return codes:
- * -1: quit main, trigger on interrupt
- * 0: keep on running main.
+ * 0: Job has finished or disconnected, find something else
+ * -1: keep on calling information_transfer() from scsi_main()
*/
static int
-information_transfer()
+information_transfer(sc)
+struct ncr_softc *sc;
{
SC_REQ *reqp = connected;
u_char tmp, phase;
@@ -972,28 +954,48 @@ information_transfer()
scsi_clr_ipend();
/*
- * We only have a valid SCSI-phase when REQ is asserted. Something
- * is deadly wrong when BSY has dropped.
+ * The SCSI-spec requires BSY to be true while connected to a target,
+ * loosing it means we lost the target...
+ * Also REQ needs to be asserted here to indicate that the bus-phase
+ * is valid. When the target does not supply REQ within a 'reasonable'
+ * amount of time, it's probably lost in it's own maze of twisting
+ * passages, we have to reset the bus to free it.
*/
+ if (GET_5380_REG(NCR5380_IDSTAT) & SC_S_BSY)
+ wait_req_true();
tmp = GET_5380_REG(NCR5380_IDSTAT);
- if (!(tmp & SC_S_BSY)) {
+
+ if ((tmp & (SC_S_BSY|SC_S_REQ)) != (SC_S_BSY|SC_S_REQ)) {
busy &= ~(1 << reqp->targ_id);
connected = NULL;
- reqp->xs->error = XS_BUSY;
+ reqp->xs->error = XS_TIMEOUT;
finish_req(reqp);
+ if (!(tmp & SC_S_REQ))
+ scsi_reset_verbose(sc,
+ "Timeout waiting for phase-change");
PID("info_transf2");
return (0);
}
- if (tmp & SC_S_REQ) {
- phase = (tmp >> 2) & 7;
- if (phase != reqp->phase) {
- reqp->phase = phase;
- DBG_INFPRINT(show_phase, reqp, phase);
+ phase = (tmp >> 2) & 7;
+ if (phase != reqp->phase) {
+ reqp->phase = phase;
+ DBG_INFPRINT(show_phase, reqp, phase);
+ }
+ else {
+ /*
+ * Same data-phase. If same error give up
+ */
+ if ((reqp->msgout == MSG_ABORT)
+ && ((phase == PH_DATAOUT) || (phase == PH_DATAIN))) {
+ busy &= ~(1 << reqp->targ_id);
+ connected = NULL;
+ finish_req(reqp);
+ scsi_reset_verbose(sc, "Failure to abort command");
+ return (0);
}
}
- else return (-1);
switch (phase) {
case PH_DATAOUT:
@@ -1013,6 +1015,17 @@ information_transfer()
}
case PH_DATAIN:
+ if (reqp->xdata_len <= 0) {
+ /*
+ * Target keeps requesting data. Try to get into
+ * message-out phase by feeding/taking 100 byte.
+ */
+ ncr_tprint(reqp, "Target requests too much data\n");
+ reqp->msgout = MSG_ABORT;
+ SET_5380_REG(NCR5380_ICOM, SC_A_ATN);
+ reach_msg_out(sc, 100);
+ return (-1);
+ }
#ifdef REAL_DMA
if (reqp->dr_flag & DRIVER_DMAOK) {
int poll = REAL_DMA_POLL|(reqp->dr_flag & DRIVER_NOINT);
@@ -1049,7 +1062,8 @@ information_transfer()
if (reqp->msgout == MSG_ABORT) {
busy &= ~(1 << reqp->targ_id);
connected = NULL;
- reqp->xs->error = XS_DRIVER_STUFFUP;
+ if (!reqp->xs->error)
+ reqp->xs->error = XS_DRIVER_STUFFUP;
finish_req(reqp);
PID("info_transf4");
return (0);
@@ -1194,10 +1208,19 @@ u_int msg;
PID("hmessage9");
return (-1);
default:
- ncr_tprint(reqp, "Unknown message %x\n", msg);
+ if ((msg & 0x80) && !(msg & 0x18)) { /* IDENTIFY */
+ PID("hmessage10");
+ ack_message();
+ return (0);
+ } else {
+ ncr_tprint(reqp,
+ "Unknown message %x. Rejecting.\n",
+ msg);
+ nack_message(reqp, MSG_MESSAGE_REJECT);
+ }
return (-1);
}
- PID("hmessage10");
+ PID("hmessage11");
return (-1);
}
@@ -1236,7 +1259,7 @@ struct ncr_softc *sc;
}
if (GET_5380_REG(NCR5380_IDSTAT) & SC_S_SEL) {
/* Damn SEL isn't dropping */
- scsi_reset(sc);
+ scsi_reset_verbose(sc, "Target won't drop SEL during Reselect");
return;
}
@@ -1263,6 +1286,7 @@ struct ncr_softc *sc;
if (len || !MSG_ISIDENTIFY(msg)) {
ncr_aprint(sc, "Expecting IDENTIFY, got 0x%x\n", msg);
abort = 1;
+ tmp = NULL;
}
else {
/*
@@ -1290,7 +1314,7 @@ struct ncr_softc *sc;
SET_5380_REG(NCR5380_ICOM, SC_A_ATN);
if (transfer_pio(&phase, &msg, &len, 0) || len)
- scsi_reset(sc);
+ scsi_reset_verbose(sc, "Failure to abort reselection");
}
else {
connected = tmp;
@@ -1496,9 +1520,10 @@ dma_ready()
else reqp->dm_cur->dm_addr += bytes_done;
if (PH_IN(reqp->phase) && (dmstat & SC_PAR_ERR)) {
- if (!(ncr5380_no_parchk & (1 << reqp->targ_id)))
- /* XXX: Should be parity error ???? */
- reqp->xs->error = XS_DRIVER_STUFFUP;
+ if (!(ncr5380_no_parchk & (1 << reqp->targ_id))) {
+ ncr_tprint(reqp, "parity error in data-phase\n");
+ reqp->xs->error = XS_TIMEOUT;
+ }
}
/*
@@ -1526,7 +1551,7 @@ dma_ready()
if (dmstat & SC_BSY_ERR) {
if (!reqp->xs->error)
- reqp->xs->error = XS_BUSY;
+ reqp->xs->error = XS_TIMEOUT;
finish_req(reqp);
PID("dma_ready1");
return (1);
@@ -1605,6 +1630,7 @@ u_long len;
{
u_char phase;
u_char data;
+ u_long n = len;
ncr_aprint(sc, "Trying to reach Message-out phase\n");
if ((phase = GET_5380_REG(NCR5380_IDSTAT)) & SC_S_REQ)
@@ -1632,32 +1658,31 @@ u_long len;
if (!wait_req_false())
break;
SET_5380_REG(NCR5380_ICOM, SC_A_ATN);
- } while (--len);
+ } while (--n);
if ((phase = GET_5380_REG(NCR5380_IDSTAT)) & SC_S_REQ) {
phase = (phase >> 2) & 7;
if (phase == PH_MSGOUT) {
- ncr_aprint(sc, "Message-out phase reached.\n");
+ ncr_aprint(sc, "Message-out phase reached after "
+ "%ld bytes.\n", len - n);
return (0);
}
}
return (-1);
}
-static void
-scsi_reset(sc)
-struct ncr_softc *sc;
+void
+scsi_reset()
{
SC_REQ *tmp, *next;
int sps;
- ncr_aprint(sc, "Resetting SCSI-bus\n");
-
PID("scsi_reset1");
sps = splbio();
SET_5380_REG(NCR5380_ICOM, SC_A_RST);
- delay(1);
+ delay(100);
SET_5380_REG(NCR5380_ICOM, 0);
+ scsi_clr_ipend();
/*
* None of the jobs in the discon_q will ever be reconnected,
@@ -1680,7 +1705,7 @@ struct ncr_softc *sc;
* doing REAL-DMA. In that case 'dma_ready()' should correctly finish
* the job because it detects BSY-loss.
*/
- if (tmp = connected) {
+ if ((tmp = connected) != NULL) {
if (tmp->dr_flag & DRIVER_IN_DMA) {
tmp->xs->error = XS_DRIVER_STUFFUP;
#ifdef REAL_DMA
@@ -1690,6 +1715,22 @@ struct ncr_softc *sc;
}
splx(sps);
PID("scsi_reset2");
+
+ /*
+ * Give the attached devices some time to handle the reset. This
+ * value is arbitrary but should be relatively long.
+ */
+ delay(100000);
+}
+
+static void
+scsi_reset_verbose(sc, why)
+struct ncr_softc *sc;
+const char *why;
+{
+ ncr_aprint(sc, "Resetting SCSI-bus (%s)\n", why);
+
+ scsi_reset();
}
/*
@@ -1850,7 +1891,7 @@ ncr_tprint(SC_REQ *reqp, char *fmt, ...)
va_start(ap, fmt);
sc_print_addr(reqp->xs->sc_link);
- printf("%r", fmt, ap);
+ printf("%:", fmt, ap);
va_end(ap);
}
@@ -1863,7 +1904,7 @@ ncr_aprint(struct ncr_softc *sc, char *fmt, ...)
va_list ap;
va_start(ap, fmt);
- printf("%s : %r", sc->sc_dev.dv_xname, fmt, ap);
+ printf("%s : %:", sc->sc_dev.dv_xname, fmt, ap);
va_end(ap);
}
/****************************************************************************
@@ -1895,7 +1936,7 @@ show_request(reqp, qtxt)
SC_REQ *reqp;
char *qtxt;
{
- printf("REQ-%s: %d %x[%d] cmd[0]=%x S=%x M=%x R=%x resid=%d dr_flag=%x %s\n",
+ printf("REQ-%s: %d %p[%ld] cmd[0]=%x S=%x M=%x R=%x resid=%d dr_flag=%x %s\n",
qtxt, reqp->targ_id, reqp->xdata_ptr, reqp->xdata_len,
reqp->xcmd.opcode, reqp->status, reqp->message,
reqp->xs->error, reqp->xs->resid, reqp->dr_flag,
@@ -1914,7 +1955,7 @@ show_signals(dmstat, idstat)
u_char dmstat, idstat;
{
u_short tmp, mask;
- int i, j, need_pipe;
+ int j, need_pipe;
tmp = idstat | ((dmstat & 3) << 8);
printf("Bus signals (%02x/%02x): ", idstat, dmstat & 3);
@@ -1930,13 +1971,18 @@ u_char dmstat, idstat;
printf("\n");
}
+void
scsi_show()
{
SC_REQ *tmp;
int sps = splhigh();
u_char idstat, dmstat;
+#ifdef DBG_PID
int i;
+#endif
+ printf("scsi_show: scsi_main is%s running\n",
+ main_running ? "" : " not");
for (tmp = issue_q; tmp; tmp = tmp->next)
show_request(tmp, "ISSUED");
for (tmp = discon_q; tmp; tmp = tmp->next)
diff --git a/sys/arch/mac68k/dev/ncr5380reg.h b/sys/arch/mac68k/dev/ncr5380reg.h
index a19f41f3fca..5f941854114 100644
--- a/sys/arch/mac68k/dev/ncr5380reg.h
+++ b/sys/arch/mac68k/dev/ncr5380reg.h
@@ -1,4 +1,4 @@
-/* $NetBSD: ncr5380reg.h,v 1.5 1995/12/04 02:10:46 briggs Exp $ */
+/* $NetBSD: ncr5380reg.h,v 1.9 1996/05/05 06:16:58 briggs Exp $ */
/*
* Copyright (c) 1995 Leo Weppelman.
@@ -236,24 +236,24 @@ static int scsi_select __P((SC_REQ *, int));
static int handle_message __P((SC_REQ *, u_int));
static void ack_message __P((void));
static void nack_message __P((SC_REQ *, u_char));
-static int information_transfer __P((void));
+static void finish_req __P((SC_REQ *reqp));
+static int command_size __P((u_char opcode));
+static int information_transfer __P((struct ncr_softc *));
static void reselect __P((struct ncr_softc *));
-static int dma_ready __P((void));
-static void transfer_dma __P((SC_REQ *, u_int, int));
static int check_autosense __P((SC_REQ *, int));
static int reach_msg_out __P((struct ncr_softc *, u_long));
static int check_intr __P((struct ncr_softc *));
-static void scsi_reset __P((struct ncr_softc *));
-static int scsi_dmaok __P((SC_REQ *));
+static void scsi_reset __P((void));
+static void scsi_reset_verbose __P((struct ncr_softc *, const char *));
static void run_main __P((struct ncr_softc *));
static void scsi_main __P((struct ncr_softc *));
static void ncr_ctrl_intr __P((struct ncr_softc *));
-static void ncr_dma_intr __P((struct ncr_softc *));
static void ncr_tprint __P((SC_REQ *, char *, ...));
static void ncr_aprint __P((struct ncr_softc *, char *, ...));
+static void show_data_sense __P((struct scsi_xfer *xs));
static void show_request __P((SC_REQ *, char *));
-static void show_phase __P((SC_REQ *, int));
+/* static void show_phase __P((SC_REQ *, int)); */
static void show_signals __P((u_char, u_char));
#endif /* _NCR5380REG_H */
diff --git a/sys/arch/mac68k/dev/nubus.c b/sys/arch/mac68k/dev/nubus.c
index 7b15a53437b..fbcd45f668f 100644
--- a/sys/arch/mac68k/dev/nubus.c
+++ b/sys/arch/mac68k/dev/nubus.c
@@ -1,4 +1,4 @@
-/* $NetBSD: nubus.c,v 1.15 1996/01/12 04:16:43 briggs Exp $ */
+/* $NetBSD: nubus.c,v 1.23 1996/05/08 15:14:53 scottr Exp $ */
/*
* Copyright (c) 1995 Allen Briggs. All rights reserved.
@@ -33,69 +33,66 @@
#include <sys/systm.h>
#include <sys/device.h>
+#include <machine/autoconf.h>
#include <machine/cpu.h>
#include <vm/vm.h>
#include "nubus.h"
-#if DEBUG
+#ifdef DEBUG
static int nubus_debug = 0x01;
#define NDB_PROBE 0x1
#define NDB_FOLLOW 0x2
#define NDB_ARITH 0x4
#endif
-extern int matchbyname();
-
-static int nubusprint __P((void *aux, char *name));
-static void nubusattach __P((struct device *parent, struct device *self,
- void *aux));
+static int nubusprint __P((void *, char *));
+static int nubusmatch __P((struct device *, void *, void *));
+static void nubusattach __P((struct device *, struct device *, void *));
static int probe_slot __P((int slot, nubus_slot *fmt));
static u_long IncPtr __P((nubus_slot *fmt, u_long base, long amt));
static u_long nubus_calc_CRC __P((nubus_slot *fmt));
static u_char GetByte __P((nubus_slot *fmt, u_long ptr));
-static u_short GetWord __P((nubus_slot *fmt, u_long ptr));
+#ifdef notyet
+/* unused */ static u_short GetWord __P((nubus_slot *fmt, u_long ptr));
+#endif
static u_long GetLong __P((nubus_slot *fmt, u_long ptr));
-struct cfdriver nubuscd = {
- NULL, "nubus", matchbyname, nubusattach,
- DV_DULL, sizeof(struct nubus_softc), 1
+struct cfattach nubus_ca = {
+ sizeof(struct nubus_softc), nubusmatch, nubusattach
+};
+
+struct cfdriver nubus_cd = {
+ NULL, "nubus", DV_DULL, 1
};
+static int
+nubusmatch(parent, vcf, aux)
+ struct device *parent;
+ void *vcf, *aux;
+{
+ struct confargs *ca = aux;
+
+ if (ca->ca_bustype != BUS_NUBUS)
+ return (0);
+ return(1);
+}
+
static void
nubusattach(parent, self, aux)
struct device *parent, *self;
void *aux;
{
- extern u_int32_t mac68k_vidlog;
nubus_slot fmtblock;
int i;
printf("\n");
- /*
- * Kludge for internal video.
- */
- if (mac68k_vidlog) {
- int int_video_slot = NUBUS_INT_VIDEO_PSUEDO_SLOT;
-
- fmtblock.top = NUBUS_SLOT_TO_BASE(int_video_slot);
- fmtblock.slot = int_video_slot;
- fmtblock.bytelanes = 0x0F;
- fmtblock.step = 4;
- fmtblock.test_pattern = ~NUBUS_ROM_TEST_PATTERN;
- fmtblock.format = 1;
- fmtblock.revision_level = 1;
- fmtblock.crc = 1;
- fmtblock.length = 0;
- fmtblock.directory_offset = 0;
- config_found(self, &fmtblock, nubusprint);
- }
-
- for ( i = NUBUS_MIN_SLOT; i <= NUBUS_MAX_SLOT; i++) {
+ for (i = NUBUS_MIN_SLOT; i <= NUBUS_MAX_SLOT; i++) {
if (probe_slot(i, &fmtblock)) {
+ /*config_search(bus_scan, &fmtblock, nubusprint);*/
config_found(self, &fmtblock, nubusprint);
}
}
@@ -107,8 +104,6 @@ nubusprint(aux, name)
char *name;
{
nubus_slot *fmt;
- int slot;
- char *info;
fmt = (nubus_slot *) aux;
if (name) {
@@ -156,21 +151,23 @@ probe_slot(slot, fmt)
nubus_slot *fmt;
{
caddr_t rom_probe;
- u_long hdr;
- u_long phys;
- u_char data;
+ vm_offset_t hdr;
+#ifdef DEBUG
+ vm_offset_t pa;
+#endif
+ u_int data;
int hdr_size, i;
fmt->bytelanes = 0;
fmt->slot = (u_long)slot;
- rom_probe = (caddr_t) (NUBUS_SLOT_TO_BASE(fmt->slot) + NBMEMSIZE);
+ rom_probe = (caddr_t) (NUBUS_SLOT_TO_PADDR(fmt->slot) + NBMEMSIZE);
#ifdef DEBUG
if (nubus_debug & NDB_PROBE) {
- phys = pmap_extract(pmap_kernel(), (vm_offset_t)rom_probe-1);
- printf("probing slot %d, first probe at 0x%x (phys 0x%x).\n",
- slot, rom_probe-1, phys);
+ pa = pmap_extract(pmap_kernel(), (vm_offset_t) rom_probe - 1);
+ printf("probing slot %d, first probe at 0x%x (PA 0x%p).\n",
+ slot, rom_probe - 1, pa);
}
#endif
@@ -178,10 +175,11 @@ probe_slot(slot, fmt)
rom_probe--;
- if (badbaddr(rom_probe))
+ data = bus_peek(BUS_NUBUS, (vm_offset_t) rom_probe, 1);
+ if (data == -1)
continue;
- if ((data = *rom_probe) == 0)
+ if (data == 0)
continue;
if ( ((((data & 0xf0) >> 4) ^ (data & 0x0f)) == 0x0f)
@@ -201,8 +199,8 @@ probe_slot(slot, fmt)
#ifdef DEBUG
if (nubus_debug & NDB_PROBE)
- printf("bytelanes of 0x%x found for slot 0x%x (base 0x%x).\n",
- fmt->bytelanes, slot, NUBUS_SLOT_TO_BASE(slot));
+ printf("bytelanes of 0x%x found for slot 0x%x.\n",
+ fmt->bytelanes, slot);
#endif
hdr_size = 20;
@@ -213,7 +211,17 @@ probe_slot(slot, fmt)
* would be valid. This is necessary for NUBUS_ROM_offset()
* to work.
*/
- hdr = NUBUS_SLOT_TO_BASE(fmt->slot) + NBMEMSIZE;
+ hdr = (vm_offset_t)
+ bus_mapin(BUS_NUBUS,NUBUS_SLOT_TO_PADDR(fmt->slot),NBMEMSIZE);
+ if (hdr == NULL) {
+ printf("Failed to map %d bytes for NuBUS slot %d probe. ",
+ NBMEMSIZE, fmt->slot);
+ printf("Physical slot address %x\n",
+ (unsigned int) NUBUS_SLOT_TO_PADDR(fmt->slot));
+ }
+ fmt->virtual_base = hdr;
+ hdr += NBMEMSIZE;
+
i = 0x10 | (fmt->bytelanes & 0x0f);
while ((i & 1) == 0) {
hdr++;
@@ -223,7 +231,7 @@ probe_slot(slot, fmt)
hdr = IncPtr(fmt, hdr, -hdr_size);
#ifdef DEBUG
if (nubus_debug & NDB_PROBE)
- printf("fmt->top is 0x%x, that minus 0x%x puts us at 0x%x.\n",
+ printf("fmt->top is 0x%p, that minus 0x%x puts us at 0x%p.\n",
fmt->top, hdr_size, hdr);
#if 0
for (i=1 ; i < 8 ; i++) {
@@ -246,7 +254,7 @@ probe_slot(slot, fmt)
hdr = IncPtr(fmt, hdr, 1);
fmt->test_pattern = GetLong(fmt, hdr);
-#if DEBUG
+#ifdef DEBUG
if (nubus_debug & NDB_PROBE) {
printf("Directory offset 0x%x\t", fmt->directory_offset);
printf("Length 0x%x\t", fmt->length);
@@ -366,6 +374,8 @@ GetByte(fmt, ptr)
return *(caddr_t)ptr;
}
+#ifdef notyet
+/* Nothing uses this, yet */
static u_short
GetWord(fmt, ptr)
nubus_slot *fmt;
@@ -378,6 +388,7 @@ GetWord(fmt, ptr)
s |= GetByte(fmt, ptr);
return s;
}
+#endif
static u_long
GetLong(fmt, ptr)
@@ -400,9 +411,7 @@ nubus_get_main_dir(slot, dir_return)
nubus_slot *slot;
nubus_dir *dir_return;
{
- u_long off;
-
-#if DEBUG
+#ifdef DEBUG
if (nubus_debug & NDB_FOLLOW)
printf("nubus_get_main_dir(0x%x, 0x%x)\n",
(u_int) slot, (u_int) dir_return);
@@ -422,7 +431,7 @@ nubus_find_rsrc(slot, dir, rsrcid, dirent_return)
u_long entry;
u_char byte;
-#if DEBUG
+#ifdef DEBUG
if (nubus_debug & NDB_FOLLOW)
printf("nubus_find_rsrc(0x%x, 0x%x, 0x%x, 0x%x)\n",
(u_int) slot, (u_int) dir, (u_int) rsrcid,
@@ -434,7 +443,7 @@ nubus_find_rsrc(slot, dir, rsrcid, dirent_return)
entry = dir->curr_ent;
do {
byte = GetByte(slot, entry);
-#if DEBUG
+#ifdef DEBUG
if (nubus_debug & NDB_FOLLOW)
printf("\tFound rsrc 0x%x.\n", byte);
#endif
@@ -462,7 +471,7 @@ nubus_get_dir_from_rsrc(slot, dirent, dir_return)
{
u_long loc;
-#if DEBUG
+#ifdef DEBUG
if (nubus_debug & NDB_FOLLOW)
printf("nubus_get_dir_from_rsrc(0x%x, 0x%x, 0x%x).\n",
(u_int) slot, (u_int) dirent, (u_int) dir_return);
@@ -483,7 +492,7 @@ nubus_get_ind_data(slot, dirent, data_return, nbytes)
{
u_long loc;
-#if DEBUG
+#ifdef DEBUG
if (nubus_debug & NDB_FOLLOW)
printf("nubus_get_ind_data(0x%x, 0x%x, 0x%x, %d).\n",
(u_int) slot, (u_int) dirent, (u_int) data_return,
@@ -510,7 +519,7 @@ nubus_get_c_string(slot, dirent, data_return, max_bytes)
{
u_long loc;
-#if DEBUG
+#ifdef DEBUG
if (nubus_debug & NDB_FOLLOW)
printf("nubus_get_c_string(0x%x, 0x%x, 0x%x, %d).\n",
(u_int) slot, (u_int) dirent, (u_int) data_return,
@@ -541,7 +550,7 @@ static char str_ret[64];
nubus_dir dir;
nubus_dirent ent;
-#if DEBUG
+#ifdef DEBUG
if (nubus_debug & NDB_FOLLOW)
printf("nubus_get_vendor(0x%x, 0x%x).\n", (u_int) slot, rsrc);
#endif
@@ -570,9 +579,9 @@ static char name_ret[64];
nubus_dir dir;
nubus_dirent ent;
-#if DEBUG
+#ifdef DEBUG
if (nubus_debug & NDB_FOLLOW)
- printf("nubus_get_card_name(0x%x).\n", (u_long) slot);
+ printf("nubus_get_card_name(0x%lx).\n", (u_long) slot);
#endif
nubus_get_main_dir(slot, &dir);
diff --git a/sys/arch/mac68k/dev/nubus.h b/sys/arch/mac68k/dev/nubus.h
index 2b6ea05b323..05edd16d901 100644
--- a/sys/arch/mac68k/dev/nubus.h
+++ b/sys/arch/mac68k/dev/nubus.h
@@ -1,4 +1,4 @@
-/* $NetBSD: nubus.h,v 1.12 1996/01/12 04:52:58 briggs Exp $ */
+/* $NetBSD: nubus.h,v 1.14 1996/05/07 03:13:40 briggs Exp $ */
/*
* Copyright (c) 1995 Allen Briggs. All rights reserved.
@@ -59,13 +59,14 @@
#define NUBUS_TYPE_ETHERNET 0x0001
#define NUBUS_DRSW_3COM 0x0000
#define NUBUS_DRSW_GATOR 0x0103
-#define NUBUS_DRHW_INTERLAN 0x0100
-#define NUBUS_DRHW_KINETICS 0x0106
#define NUBUS_DRSW_ASANTE 0x0104
#define NUBUS_DRSW_TECHWORKS 0x0109
-#define NUBUS_DRHW_SONIC 0x0110
#define NUBUS_DRSW_FARALLON 0x010C
#define NUBUS_DRSW_FOCUS 0x011A
+#define NUBUS_DRHW_INTERLAN 0x0100
+#define NUBUS_DRHW_KINETICS 0x0106
+#define NUBUS_DRHW_SONIC 0x0110
+#define NUBUS_DRHW_CABLETRON 0x0109
#define NUBUS_CATEGORY_COMMUNICATIONS 0x0006
#define NUBUS_TYPE_RS232 0x0002
@@ -98,6 +99,7 @@ typedef struct _nubus_slot {
u_int32_t crc;
u_int32_t length;
u_int32_t directory_offset;
+ vm_offset_t virtual_base;
} nubus_slot;
/*
@@ -219,15 +221,10 @@ typedef struct _NUBUS_EXEC_BLOCK {
#define NUBUS_MIN_SLOT 0x9
#define NUBUS_MAX_SLOT 0xE
-#define NUBUS_INT_VIDEO_PSUEDO_SLOT 0xF
#define NUBUS_ROM_TEST_PATTERN 0x5A932BC7
-#define NUBUS_BASE_TO_SLOT(x) (((((x)-NuBusBase) >> 24) & 0x0F) + \
- NUBUS_MIN_SLOT)
-#define NUBUS_SLOT_TO_BASE(x) (NuBusBase + \
+#define NUBUS_SLOT_TO_PADDR(x) ( 0xF9000000 + \
((((x)-NUBUS_MIN_SLOT) & 0xF) << 24))
-#define NUBUS_VIRT_TO_PHYS(x) ((x - NuBusBase) + \
- ((0xF0 | NUBUS_MIN_SLOT) << 24))
struct nubus_softc {
struct device sc_dev;
diff --git a/sys/arch/mac68k/dev/rd_root.c b/sys/arch/mac68k/dev/rd_root.c
index e7ac28a3040..faea4c265fa 100644
--- a/sys/arch/mac68k/dev/rd_root.c
+++ b/sys/arch/mac68k/dev/rd_root.c
@@ -1,4 +1,4 @@
-/* $NetBSD: rd_root.c,v 1.1 1995/11/21 04:53:20 briggs Exp $ */
+/* $NetBSD: rd_root.c,v 1.3 1996/05/05 06:17:09 briggs Exp $ */
/*
* Copyright (c) 1995 Gordon W. Ross
@@ -47,9 +47,6 @@ extern int boothowto;
int rd_root_size = ROOTBYTES;
char rd_root_image[ROOTBYTES] = "|This is the root ramdisk!\n";
-/*
- * This is called during autoconfig.
- */
void
rd_attach_hook(unit, rd)
int unit;
diff --git a/sys/arch/mac68k/dev/scsi.c b/sys/arch/mac68k/dev/scsi.c
deleted file mode 100644
index 2d04207d2c3..00000000000
--- a/sys/arch/mac68k/dev/scsi.c
+++ /dev/null
@@ -1,1224 +0,0 @@
-/* $NetBSD: scsi.c,v 1.19 1995/09/03 03:39:38 briggs Exp $ */
-
-/*
- * This driver is obsolete as of 2 September 1995. mac68k5380.c should
- * be used instead if at all possible. [briggs 2Sept95]
- */
-
-/*
- * Copyright (C) 1993 Allen K. Briggs, Chris P. Caputo,
- * Michael L. Finch, Bradley A. Grantham, and
- * Lawrence A. Kesteloot
- * 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. All advertising materials mentioning features or use of this software
- * must display the following acknowledgement:
- * This product includes software developed by the Alice Group.
- * 4. The names of the Alice Group or any of its members may not be used
- * to endorse or promote products derived from this software without
- * specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE ALICE GROUP ``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 ALICE GROUP 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.
- */
-
-#define PSEUDO_DMA 1
-
-static int pdebug = 0;
-
-#include <sys/types.h>
-#include <sys/malloc.h>
-#include <sys/param.h>
-#include <sys/systm.h>
-#include <sys/errno.h>
-#include <sys/buf.h>
-#include <sys/proc.h>
-#include <sys/user.h>
-#include <sys/device.h>
-#include <scsi/scsi_all.h>
-#include <scsi/scsi_debug.h>
-#include <scsi/scsiconf.h>
-
-#include "scsi_defs.h"
-#define PAD(n) u_char n[15]
-#include <machine/scsi_5380.h>
-#undef PAD
-#define SCI_PHASE_DISC 0 /* sort of ... */
-#define SCI_CLR_INTR(regs) {register int temp = regs->sci_iack;}
-#define SCI_ACK(ptr,phase) (ptr)->sci_tcmd = (phase)
-#define SCSI_TIMEOUT_VAL 10000000
-#define WAIT_FOR_NOT_REQ(ptr) { \
- int scsi_timeout = SCSI_TIMEOUT_VAL; \
- while ( ((ptr)->sci_bus_csr & SCI_BUS_REQ) && \
- ((ptr)->sci_bus_csr & SCI_BUS_REQ) && \
- ((ptr)->sci_bus_csr & SCI_BUS_REQ) && \
- (--scsi_timeout) ); \
- if (!scsi_timeout) { \
- printf("scsi timeout--WAIT_FOR_NOT_REQ---scsi.c, line %d.\n", \
- __LINE__); \
- goto scsi_timeout_error; \
- } \
-}
-#define WAIT_FOR_REQ(ptr) { \
- int scsi_timeout = SCSI_TIMEOUT_VAL; \
- while ( (((ptr)->sci_bus_csr & SCI_BUS_REQ) == 0) && \
- (((ptr)->sci_bus_csr & SCI_BUS_REQ) == 0) && \
- (((ptr)->sci_bus_csr & SCI_BUS_REQ) == 0) && \
- (--scsi_timeout) ); \
- if (!scsi_timeout) { \
- printf("scsi timeout--WAIT_FOR_REQ---scsi.c, line %d.\n", \
- __LINE__); \
- goto scsi_timeout_error; \
- } \
-}
-#define WAIT_FOR_BSY(ptr) { \
- int scsi_timeout = SCSI_TIMEOUT_VAL; \
- while ( (((ptr)->sci_bus_csr & SCI_BUS_BSY) == 0) && \
- (((ptr)->sci_bus_csr & SCI_BUS_BSY) == 0) && \
- (((ptr)->sci_bus_csr & SCI_BUS_BSY) == 0) && \
- (--scsi_timeout) ); \
- if (!scsi_timeout) { \
- printf("scsi timeout--WAIT_FOR_BSY---scsi.c, line %d.\n", \
- __LINE__); \
- goto scsi_timeout_error; \
- } \
-}
-
-#ifdef DDB
-int Debugger();
-#else
-#define Debugger() panic("Should call Debugger here (mac/dev/scsi.c).")
-#endif
-
-typedef unsigned long int physaddr;
-typedef sci_regmap_t sci_padded_regmap_t;
-
-#define NNCR5380 1
-
-struct ncr5380_softc {
- struct device sc_dev;
-
- void *reg_base;
- int adapter_target;
- struct scsi_link sc_link;
-};
-/* From Guide to Mac II family hardware, p. 137 */
-/* These are "adjusted" in the init routine. */
-extern vm_offset_t SCSIBase;
-static volatile sci_padded_regmap_t *ncr = (sci_regmap_t *) 0x10000;
-static volatile long *sci_4byte_addr = (long *) 0x6000;
-static volatile u_char *sci_1byte_addr = (u_char *) 0x12000;
-
-static unsigned int ncr5380_adapter_info(struct ncr5380_softc * ncr5380);
-static void ncr5380_minphys(struct buf * bp);
-static int ncr5380_scsi_cmd(struct scsi_xfer * xs);
-
-static int ncr5380_show_scsi_cmd(struct scsi_xfer * xs);
-static int ncr5380_reset_target(int adapter, int target);
-static int ncr5380_poll(int adapter, int timeout);
-static int ncr5380_send_cmd(struct scsi_xfer * xs);
-
-extern void ncr5380_intr(int adapter);
-extern void spinwait(int);
-
-static int
-scsi_gen(int adapter, int id, int lun,
- struct scsi_generic * cmd, int cmdlen,
- void *databuf, int datalen);
-static int
-scsi_group0(int adapter, int id, int lun,
- int opcode, int addr, int len,
- int flags, caddr_t databuf, int datalen);
-
-struct scsi_adapter ncr5380_switch = {
- ncr5380_scsi_cmd, /* scsi_cmd() */
- ncr5380_minphys, /* scsi_minphys() */
- 0, /* open_target_lu() */
- 0, /* close_target_lu() */
-};
-/* This is copied from julian's bt driver */
-/* "so we have a default dev struct for our link struct." */
-struct scsi_device ncr5380_dev = {
- NULL, /* Use default error handler. */
- NULL, /* have a queue, served by this (?) */
- NULL, /* have no async handler. */
- NULL, /* Use default "done" routine. */
-};
-
-extern int matchbyname();
-static int ncrprobe();
-static void ncrattach();
-
-struct cfdriver ncrscsicd =
-{NULL, "ncrscsi", ncrprobe, ncrattach,
-DV_DULL, sizeof(struct ncr5380_softc), NULL, 0};
-
-static int
-ncr_print(aux, name)
- void *aux;
- char *name;
-{
- /* printf("%s: (sc_link = 0x%x)", name, (int) aux); return UNCONF; */
-}
-
-static int
-ncrprobe(parent, match, aux)
- struct device *parent;
- void *match;
- void *aux;
-{
- static int probed = 0;
- struct ncr5380_softc *ncr5380;
-
- if (!mac68k_machine.scsi80) {
- return 0;
- }
- ncr5380 = (struct ncr5380_softc *) match;
-
- if (strcmp(*((char **) aux), ncr5380->sc_dev.dv_xname)) {
- return 0;
- }
- if (!probed) {
- /*
- * Adjust values based on SCSIBase.
- */
- ncr = (volatile sci_regmap_t *) (SCSIBase + (u_int) ncr);
- sci_4byte_addr = (volatile long *)
- (SCSIBase + (u_int) sci_4byte_addr);
- sci_1byte_addr = (volatile u_char *)
- (SCSIBase + (u_int) sci_1byte_addr);
- probed = 1;
- }
- return 1;
-}
-
-static void
-ncrattach(parent, dev, aux)
- struct device *parent, *dev;
- void *aux;
-{
- int unit = dev->dv_unit;
- struct ncr5380_softc *ncr5380;
- int r;
-
- ncr5380 = (struct ncr5380_softc *) dev;
-
- ncr5380->sc_link.scsibus = unit;
- ncr5380->sc_link.adapter_target = 7;
- ncr5380->sc_link.adapter = &ncr5380_switch;
- ncr5380->sc_link.device = &ncr5380_dev;
- ncr5380->sc_link.openings = 1;
-#ifdef SCSIDEBUG
- ncr5380->sc_link.flags = SDEV_DB1 | SDEV_DB2 /* | SDEV_DB3 | SDEV_DB4 */ ;
-#endif
-
- printf("\n");
-
- config_found(dev, &(ncr5380->sc_link), ncr_print);
-}
-
-#define MIN_PHYS 65536 /* BARF!!!! */
-static void
-ncr5380_minphys(struct buf * bp)
-{
- if (bp->b_bcount > MIN_PHYS) {
- printf("Uh-oh... ncr5380_minphys setting bp->b_bcount = %x.\n", MIN_PHYS);
- bp->b_bcount = MIN_PHYS;
- }
- minphys(bp);
-}
-#undef MIN_PHYS
-
-static int
-ncr5380_scsi_cmd(struct scsi_xfer * xs)
-{
- int flags, s, r;
-
- flags = xs->flags;
- if (xs->bp)
- flags |= (SCSI_NOSLEEP);
- if (flags & ITSDONE) {
- printf("Already done?");
- xs->flags &= ~ITSDONE;
- }
- if (!(flags & INUSE)) {
- printf("Not in use?");
- xs->flags |= INUSE;
- }
- if (flags & SCSI_RESET) {
- printf("flags & SCSIRESET.\n");
- s = splbio();
- ncr5380_reset_target(xs->sc_link->scsibus,
- xs->sc_link->target);
- splx(s);
- return (COMPLETE);
- }
- xs->resid = 0;
- r = ncr5380_send_cmd(xs);
- xs->flags |= ITSDONE;
- scsi_done(xs);
-#ifdef SCSIDEBUG
- printf("SCSI transfer done.\n");
-#endif /* SCSIDEBUG */
- switch (r) {
- case COMPLETE:
- case SUCCESSFULLY_QUEUED:
- r = SUCCESSFULLY_QUEUED;
- if (xs->flags & SCSI_POLL)
- r = COMPLETE;
- break;
- default:
- break;
- }
- return r;
-}
-
-static int
-ncr5380_show_scsi_cmd(struct scsi_xfer * xs)
-{
- u_char *b = (u_char *) xs->cmd;
- int i = 0;
-
- if (!(xs->flags & SCSI_RESET)) {
- printf("ncr5380(%d:%d:%d)-",
- xs->sc_link->scsibus, xs->sc_link->target, xs->sc_link->lun);
- while (i < xs->cmdlen) {
- if (i)
- printf(",");
- printf("%x", b[i++]);
- }
- printf("-\n");
- } else {
- printf("ncr5380(%d:%d:%d)-RESET-\n",
- xs->sc_link->scsibus, xs->sc_link->target, xs->sc_link->lun);
- }
-}
-/*
- * Actual chip control.
- */
-
-extern void
-spinwait(int ms)
-{
- while (ms--)
- delay(1000);
-}
-
-extern void
-ncr5380_intr(int adapter)
-{
- register volatile sci_padded_regmap_t *regs = ncr;
-
- SCI_CLR_INTR(regs);
- regs->sci_mode = 0x00;
-}
-
-extern int
-ncr5380_irq_intr(void)
-{
- register volatile sci_padded_regmap_t *regs = ncr;
-
-/* if (regs->sci_csr != SCI_CSR_PHASE_MATCH)
- printf("scsi_irq_intr called (not just phase match -- "
- "csr = 0x%x, bus_csr = 0x%x).\n",
- regs->sci_csr, regs->sci_bus_csr);
- ncr5380_intr(0); */
- return 1;
-}
-
-extern int
-ncr5380_drq_intr(void)
-{
-/* printf("scsi_drq_intr called.\n"); */
-/* ncr5380_intr(0); */
- return 1;
-}
-
-static int
-ncr5380_reset_target(int adapter, int target)
-{
- register volatile sci_padded_regmap_t *regs = ncr;
- int dummy;
-
- regs->sci_icmd = SCI_ICMD_TEST;
- regs->sci_icmd = SCI_ICMD_TEST | SCI_ICMD_RST;
- spinwait(250); /* 250 ms */
- regs->sci_icmd = 0;
-
- regs->sci_mode = 0;
- regs->sci_tcmd = SCI_PHASE_DISC;
- regs->sci_sel_enb = 0;
-
- SCI_CLR_INTR(regs);
- SCI_CLR_INTR(regs);
-}
-
-static int
-ncr5380_poll(int adapter, int timeout)
-{
-}
-
-static int
-ncr5380_send_cmd(struct scsi_xfer * xs)
-{
- int s;
- int sense;
-
-#ifdef SCSIDEBUG
- ncr5380_show_scsi_cmd(xs);
-#endif
- s = splbio();
- sense = scsi_gen(xs->sc_link->scsibus, xs->sc_link->target,
- xs->sc_link->lun, xs->cmd, xs->cmdlen,
- xs->data, xs->datalen);
- splx(s);
- if (sense) {
- switch (sense) {
- case 0x02: /* Check condition */
-/* printf("check cond. target %d.\n", xs->targ);*/
- s = splbio();
- scsi_group0(xs->sc_link->scsibus,
- xs->sc_link->target,
- xs->sc_link->lun,
- 0x3, 0x0,
- sizeof(struct scsi_sense_data),
- 0, (caddr_t) & (xs->sense),
- sizeof(struct scsi_sense_data));
- splx(s);
- xs->error = XS_SENSE;
- return COMPLETE;
- case 0x08: /* Busy */
- xs->error = XS_BUSY;
- return COMPLETE;
- default:
- xs->error = XS_DRIVER_STUFFUP;
- return COMPLETE;
- }
- }
- xs->error = XS_NOERROR;
- return (COMPLETE);
-}
-
-static int
-select_target(register volatile sci_padded_regmap_t * regs,
- u_char myid, u_char tid, int with_atn)
-{
- register u_char bid, icmd;
- int ret = SCSI_RET_RETRY;
-
- if ((regs->sci_bus_csr & (SCI_BUS_BSY | SCI_BUS_SEL)) &&
- (regs->sci_bus_csr & (SCI_BUS_BSY | SCI_BUS_SEL)) &&
- (regs->sci_bus_csr & (SCI_BUS_BSY | SCI_BUS_SEL)))
- return ret;
-
- /* for our purposes.. */
- myid = 1 << myid;
- tid = 1 << tid;
-
- regs->sci_sel_enb = 0; /* myid; we don't want any interrupts. */
- regs->sci_tcmd = 0; /* Get into a harmless state. */
- regs->sci_mode = 0; /* Get into a harmless state. */
-
- regs->sci_odata = myid;
- regs->sci_mode = SCI_MODE_ARB;
-/* regs->sci_mode |= SCI_MODE_ARB; */
- /* AIP might not set if BSY went true after we checked */
- for (bid = 0; bid < 20; bid++) /* 20usec circa */
- if (regs->sci_icmd & SCI_ICMD_AIP)
- break;
- if ((regs->sci_icmd & SCI_ICMD_AIP) == 0) {
- goto lost;
- }
- delay(3); /* 2.4us arb delay */
-
- if (regs->sci_icmd & SCI_ICMD_LST) {
- goto lost;
- }
- regs->sci_mode &= ~SCI_MODE_PAR_CHK;
- bid = regs->sci_data;
-
- if ((bid & ~myid) > myid) {
- goto lost;
- }
- if (regs->sci_icmd & SCI_ICMD_LST) {
- goto lost;
- }
- /* Won arbitration, enter selection phase now */
- icmd = regs->sci_icmd & ~(SCI_ICMD_DIFF | SCI_ICMD_TEST);
- icmd |= (with_atn ? (SCI_ICMD_SEL | SCI_ICMD_ATN) : SCI_ICMD_SEL);
- icmd |= SCI_ICMD_BSY;
- regs->sci_icmd = icmd;
-
- if (regs->sci_icmd & SCI_ICMD_LST) {
- goto nosel;
- }
- /* XXX a target that violates specs might still drive the bus XXX */
- /* XXX should put our id out, and after the delay check nothi XXX */
- /* XXX ng else is out there. XXX */
-
- delay(1);
-
- regs->sci_tcmd = 0;
- regs->sci_odata = myid | tid;
- regs->sci_sel_enb = 0;
-
-/* regs->sci_mode &= ~SCI_MODE_ARB; 2 deskew delays, too */
- regs->sci_mode = 0; /* 2 deskew delays, too */
-
- icmd |= SCI_ICMD_DATA;
- icmd &= ~(SCI_ICMD_BSY);
-
- regs->sci_icmd = icmd;
-
- /* bus settle delay, 400ns */
- delay(1); /* 1us > 400ns ;-) */
-
-/* regs->sci_mode |= SCI_MODE_PAR_CHK; */
-
- {
- register int timeo = 2500; /* 250 msecs in 100 usecs
- * chunks */
- while ((regs->sci_bus_csr & SCI_BUS_BSY) == 0) {
- if (--timeo > 0) {
- delay(100);
- } else {
- goto nodev;
- }
- }
- }
-
- icmd &= ~(SCI_ICMD_DATA | SCI_ICMD_SEL);
- regs->sci_icmd = icmd;
- /* regs->sci_sel_enb = myid;*//* looks like we should NOT have it */
- return SCSI_RET_SUCCESS;
-nodev:
- ret = SCSI_RET_DEVICE_DOWN;
- regs->sci_sel_enb = myid;
-nosel:
- icmd &= ~(SCI_ICMD_DATA | SCI_ICMD_SEL | SCI_ICMD_ATN);
- regs->sci_icmd = icmd;
-lost:
- regs->sci_mode = 0;
-
- return ret;
-}
-
-static int
-sci_data_out(regs, phase, count, data)
- register sci_padded_regmap_t *regs;
- unsigned char *data;
-{
- register unsigned char icmd;
- register int cnt = 0;
-
- /* ..checks.. */
-
- icmd = regs->sci_icmd & ~(SCI_ICMD_DIFF | SCI_ICMD_TEST);
-loop:
- if (SCI_CUR_PHASE(regs->sci_bus_csr) != phase)
- return cnt;
-
- WAIT_FOR_REQ(regs);
- icmd |= SCI_ICMD_DATA;
- regs->sci_icmd = icmd;
- regs->sci_odata = *data++;
- icmd |= SCI_ICMD_ACK;
- regs->sci_icmd = icmd;
-
- icmd &= ~(SCI_ICMD_DATA | SCI_ICMD_ACK);
- WAIT_FOR_NOT_REQ(regs);
- regs->sci_icmd = icmd;
- ++cnt;
- if (--count > 0)
- goto loop;
-scsi_timeout_error:
- return cnt;
-}
-
-static int
-sci_data_in(regs, phase, count, data)
- register sci_padded_regmap_t *regs;
- unsigned char *data;
-{
- register unsigned char icmd;
- register int cnt = 0;
-
- /* ..checks.. */
-
- icmd = regs->sci_icmd & ~(SCI_ICMD_DIFF | SCI_ICMD_TEST);
-
-loop:
- if (SCI_CUR_PHASE(regs->sci_bus_csr) != phase)
- return cnt;
-
- WAIT_FOR_REQ(regs);
- *data++ = regs->sci_data;
- icmd |= SCI_ICMD_ACK;
- regs->sci_icmd = icmd;
-
- icmd &= ~SCI_ICMD_ACK;
- WAIT_FOR_NOT_REQ(regs);
- regs->sci_icmd = icmd;
- ++cnt;
- if (--count > 0)
- goto loop;
-
-scsi_timeout_error:
- return cnt;
-}
-
-static int
-command_transfer(register volatile sci_padded_regmap_t * regs,
- int maxlen, u_char * data, u_char * status, u_char * msg)
-{
- int xfer = 0, phase;
-
-/* printf("command_transfer called for 0x%x.\n", *data); */
-
- regs->sci_icmd = 0;
-
- while (1) {
-
- WAIT_FOR_REQ(regs);
-
- phase = SCI_CUR_PHASE(regs->sci_bus_csr);
-
- switch (phase) {
- case SCSI_PHASE_CMD:
- SCI_ACK(regs, SCSI_PHASE_CMD);
- xfer += sci_data_out(regs, SCSI_PHASE_CMD,
- maxlen, data);
- return xfer;
- case SCSI_PHASE_DATA_IN:
- printf("Data in phase in command_transfer?\n");
- return 0;
- case SCSI_PHASE_DATA_OUT:
- printf("Data out phase in command_transfer?\n");
- return 0;
- case SCSI_PHASE_STATUS:
- SCI_ACK(regs, SCSI_PHASE_STATUS);
- printf("status in command_transfer.\n");
- sci_data_in(regs, SCSI_PHASE_STATUS,
- 1, status);
- break;
- case SCSI_PHASE_MESSAGE_IN:
- SCI_ACK(regs, SCSI_PHASE_MESSAGE_IN);
- printf("msgin in command_transfer.\n");
- sci_data_in(regs, SCSI_PHASE_MESSAGE_IN,
- 1, msg);
- break;
- case SCSI_PHASE_MESSAGE_OUT:
- SCI_ACK(regs, SCSI_PHASE_MESSAGE_OUT);
- sci_data_out(regs, SCSI_PHASE_MESSAGE_OUT,
- 1, msg);
- break;
- default:
- printf("Unexpected phase 0x%x in "
- "command_transfer().\n", phase);
- scsi_timeout_error:
- return xfer;
- break;
- }
- }
-}
-
-static int
-data_transfer(register volatile sci_padded_regmap_t * regs,
- int maxlen, u_char * data, u_char * status, u_char * msg)
-{
- int retlen = 0, xfer, phase;
-
- regs->sci_icmd = 0;
-
- *status = 0;
-
- while (1) {
-
- WAIT_FOR_REQ(regs);
-
- phase = SCI_CUR_PHASE(regs->sci_bus_csr);
-
- switch (phase) {
- case SCSI_PHASE_CMD:
- printf("Command phase in data_transfer().\n");
- return retlen;
- case SCSI_PHASE_DATA_IN:
- SCI_ACK(regs, SCSI_PHASE_DATA_IN);
-#if PSEUDO_DMA
- xfer = sci_pdma_in(regs, SCSI_PHASE_DATA_IN,
- maxlen, data);
-#else
- xfer = sci_data_in(regs, SCSI_PHASE_DATA_IN,
- maxlen, data);
-#endif
- retlen += xfer;
- maxlen -= xfer;
- break;
- case SCSI_PHASE_DATA_OUT:
- SCI_ACK(regs, SCSI_PHASE_DATA_OUT);
-#if PSEUDO_DMA
- xfer = sci_pdma_out(regs, SCSI_PHASE_DATA_OUT,
- maxlen, data);
-#else
- xfer = sci_data_out(regs, SCSI_PHASE_DATA_OUT,
- maxlen, data);
-#endif
- retlen += xfer;
- maxlen -= xfer;
- break;
- case SCSI_PHASE_STATUS:
- SCI_ACK(regs, SCSI_PHASE_STATUS);
- sci_data_in(regs, SCSI_PHASE_STATUS,
- 1, status);
- break;
- case SCSI_PHASE_MESSAGE_IN:
- SCI_ACK(regs, SCSI_PHASE_MESSAGE_IN);
- sci_data_in(regs, SCSI_PHASE_MESSAGE_IN,
- 1, msg);
- if (*msg == 0) {
- return retlen;
- } else {
- printf("message 0x%x in "
- "data_transfer.\n", *msg);
- }
- break;
- case SCSI_PHASE_MESSAGE_OUT:
- SCI_ACK(regs, SCSI_PHASE_MESSAGE_OUT);
- sci_data_out(regs, SCSI_PHASE_MESSAGE_OUT,
- 1, msg);
- break;
- default:
- printf("Unexpected phase 0x%x in "
- "data_transfer().\n", phase);
- scsi_timeout_error:
- return retlen;
- break;
- }
- }
-}
-
-static int
-scsi_request(register volatile sci_padded_regmap_t * regs,
- int target, int lun, u_char * cmd, int cmdlen,
- char *databuf, int datalen, int *sent, int *ret)
-{
-/* Returns 0 on success, -1 on internal error, or the status byte */
- int cmd_bytes_sent, r;
- u_char stat, msg, c;
-
- *sent = 0;
-
- if ((r = select_target(regs, 7, target, 1)) != SCSI_RET_SUCCESS) {
- *ret = r;
- SCI_CLR_INTR(regs);
- switch (r) {
- case SCSI_RET_RETRY:
- return 0x08;
- default:
- printf("select_target(target %d, lun %d) failed(%d).\n",
- target, lun, r);
- case SCSI_RET_DEVICE_DOWN:
- return -1;
- }
- }
- c = 0x80 | lun;
-
- if ((cmd_bytes_sent = command_transfer(regs, cmdlen,
- (u_char *) cmd, &stat, &c))
- != cmdlen) {
- SCI_CLR_INTR(regs);
- *ret = SCSI_RET_COMMAND_FAIL;
- printf("Data underrun sending CCB (%d bytes of %d, sent).\n",
- cmd_bytes_sent, cmdlen);
- return -1;
- }
- *sent = data_transfer(regs, datalen, (u_char *) databuf,
- &stat, &msg);
-
- *ret = 0;
-
- return stat;
-}
-
-static int
-scsi_gen(int adapter, int id, int lun, struct scsi_generic * cmd,
- int cmdlen, void *databuf, int datalen)
-{
- register volatile sci_padded_regmap_t *regs = ncr;
- int i, j, sent, ret;
-
- cmd->bytes[0] = ((u_char) lun << 5);
-
- i = scsi_request(regs, id, lun, (u_char *) cmd, cmdlen,
- databuf, datalen, &sent, &ret);
-
- return i;
-}
-
-static int
-scsi_group0(int adapter, int id, int lun, int opcode, int addr, int len,
- int flags, caddr_t databuf, int datalen)
-{
- register volatile sci_padded_regmap_t *regs = ncr;
- unsigned char cmd[6];
- int i, j, sent, ret;
-
- cmd[0] = opcode; /* Operation code */
- cmd[1] = (lun << 5) | ((addr >> 16) & 0x1F); /* Lun & MSB of addr */
- cmd[2] = (addr >> 8) & 0xFF; /* addr */
- cmd[3] = addr & 0xFF; /* LSB of addr */
- cmd[4] = len; /* Allocation length */
- cmd[5] = flags; /* Link/Flag */
-
- i = scsi_request(regs, id, lun, cmd, 6, databuf, datalen, &sent, &ret);
-
- return i;
-}
-/* pseudo-dma action */
-
-#if PSEUDO_DMA
-
-#define TIMEOUT 1000000
-#define READY(poll) \
- i = TIMEOUT; \
- while ((regs->sci_csr & (SCI_CSR_DREQ|SCI_CSR_PHASE_MATCH)) \
- !=(SCI_CSR_DREQ|SCI_CSR_PHASE_MATCH)) \
- if ( !(regs->sci_csr & SCI_CSR_PHASE_MATCH) \
- || !(regs->sci_bus_csr & SCI_BUS_BSY) \
- || (i-- < 0) ) { \
- printf("scsi.c: timeout counter = %d, len = %d count=%d (count-len %d).\n", \
- i, len,count,count-len); \
- printf("pdebug = %d, 1=out, 2=in",pdebug); \
- /*dump_regs();*/ \
- if (poll && !(regs->sci_csr & SCI_CSR_PHASE_MATCH)) { \
- regs->sci_icmd &= ~SCI_ICMD_DATA; \
- len--; \
- } else { \
- regs->sci_mode &= ~SCI_MODE_DMA; \
- } \
- return count-len; \
- }
-
-#define W1 *byte_data = *data++
-#define W4 *long_data = *((long*)data)++
-
-sci_pdma_out(regs, phase, count, data)
- register volatile sci_padded_regmap_t *regs;
- int phase;
- int count;
- u_char *data;
-{
- register volatile long *long_data = sci_4byte_addr;
- register volatile u_char *byte_data = sci_1byte_addr;
- register int len = count, i;
-
- pdebug = 1;
-
- if (count < 128)
- return sci_data_out(regs, phase, count, data);
-
- WAIT_FOR_BSY(regs);
- regs->sci_mode |= SCI_MODE_DMA;
- regs->sci_icmd |= SCI_ICMD_DATA;
- regs->sci_dma_send = 0;
-
- while (len >= 64) {
- READY(1);
- W1;
- READY(1);
- W1;
- READY(1);
- W1;
- READY(1);
- W1;
- READY(1);
- W4;
- W4;
- W4;
- W4;
- W4;
- W4;
- W4;
- W4;
- W4;
- W4;
- W4;
- W4;
- W4;
- W4;
- W4;
- len -= 64;
- }
- while (len) {
- READY(1);
- W1;
- len--;
- }
- i = TIMEOUT;
- while (((regs->sci_csr & (SCI_CSR_DREQ | SCI_CSR_PHASE_MATCH))
- == SCI_CSR_PHASE_MATCH) && --i);
- if (!i)
- printf("scsi.c:%d: timeout waiting for SCI_CSR_DREQ.\n", __LINE__);
- *byte_data = 0;
-scsi_timeout_error:
- regs->sci_mode &= ~SCI_MODE_DMA;
- return count - len;
-}
-#undef W1
-#undef W4
-
-#define R4 *((long *)data)++ = *long_data
-#define R1 *data++ = *byte_data
-
-sci_pdma_in(regs, phase, count, data)
- register volatile sci_padded_regmap_t *regs;
- int phase;
- int count;
- u_char *data;
-{
- register volatile long *long_data = sci_4byte_addr;
- register volatile u_char *byte_data = sci_1byte_addr;
- register int len = count, i;
-
- pdebug = 2;
- if (count < 128)
- return sci_data_in(regs, phase, count, data);
-
-/* printf("Called sci_pdma_in(0x%x, 0x%x, %d, 0x%x.\n", regs, phase, count, data); */
-
- WAIT_FOR_BSY(regs);
- regs->sci_mode |= SCI_MODE_DMA;
- regs->sci_icmd |= SCI_ICMD_DATA;
- regs->sci_irecv = 0;
-
- while (len >= 1024) {
- READY(0);
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4; /* 128 */
- READY(0);
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4; /* 256 */
- READY(0);
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4; /* 384 */
- READY(0);
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4; /* 512 */
- READY(0);
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4; /* 640 */
- READY(0);
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4; /* 768 */
- READY(0);
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4; /* 896 */
- READY(0);
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4; /* 1024 */
- len -= 1024;
- }
- while (len >= 128) {
- READY(0);
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4;
- R4; /* 128 */
- len -= 128;
- }
- while (len) {
- READY(0);
- R1;
- len--;
- }
-scsi_timeout_error:
- regs->sci_mode &= ~SCI_MODE_DMA;
- return count - len;
-}
-#undef R4
-#undef R1
-#endif
diff --git a/sys/arch/mac68k/dev/scsi96.c b/sys/arch/mac68k/dev/scsi96.c
index d6a9abbf303..4adfc02979b 100644
--- a/sys/arch/mac68k/dev/scsi96.c
+++ b/sys/arch/mac68k/dev/scsi96.c
@@ -1,4 +1,4 @@
-/* $NetBSD: scsi96.c,v 1.13 1995/08/14 03:55:28 briggs Exp $ */
+/* $NetBSD: scsi96.c,v 1.17 1996/05/05 06:17:19 briggs Exp $ */
/*
* Copyright (C) 1994 Allen K. Briggs
@@ -47,13 +47,11 @@
#include <scsi/scsiconf.h>
#include <machine/scsi96reg.h>
-#include "../mac68k/via.h"
+#include <machine/viareg.h>
/* Support for the NCR 53C96 SCSI processor--primarily for '040 Macs. */
-#ifdef DDB
-int Debugger();
-#else
+#ifndef DDB
#define Debugger() panic("Should call Debugger here (mac/dev/scsi96.c).")
#endif
@@ -78,7 +76,6 @@ struct ncr53c96_softc {
} \
}
-static unsigned int ncr53c96_adapter_info(struct ncr53c96_softc * ncr53c96);
static void ncr53c96_minphys(struct buf * bp);
static int ncr53c96_scsi_cmd(struct scsi_xfer * xs);
@@ -102,20 +99,25 @@ struct scsi_device ncr53c96_dev = {
NULL, /* Use default "done" routine. */
};
-extern int matchbyname();
-static int ncr96probe();
-static void ncr96attach();
+static int ncr96probe __P((struct device *, void *, void *));
+static void ncr96attach __P((struct device *, struct device *, void *));
-struct cfdriver ncr96scsicd =
-{NULL, "ncr96scsi", ncr96probe, ncr96attach,
-DV_DULL, sizeof(struct ncr53c96_softc), NULL, 0};
+struct cfattach ncr96scsi_ca = {
+ sizeof(struct ncr53c96_softc), ncr96probe, ncr96attach
+};
+
+struct cfdriver ncr96scsi_cd = {
+ NULL, "ncr96scsi", DV_DULL, NULL, 0
+};
+static int ncr96_print __P((void *, char *));
static int
ncr96_print(aux, name)
void *aux;
char *name;
{
/* printf("%s: (sc_link = 0x%x)", name, (int) aux); return UNCONF; */
+ return UNCONF;
}
static int
@@ -125,17 +127,12 @@ ncr96probe(parent, match, aux)
void *aux;
{
static int probed = 0;
- struct ncr53c96_softc *ncr53c96;
return 0;
if (!mac68k_machine.scsi96) {
return 0;
}
- ncr53c96 = (struct ncr53c96_softc *) match;
- if (strcmp(*((char **) aux), ncr53c96->sc_dev.dv_xname)) {
- return 0;
- }
if (!probed) {
probed = 1;
ncr53c96base += SCSIBase;
@@ -150,7 +147,6 @@ ncr96attach(parent, dev, aux)
{
int unit = dev->dv_unit;
struct ncr53c96_softc *ncr53c96;
- int r;
ncr53c96 = (struct ncr53c96_softc *) dev;
@@ -280,16 +276,22 @@ ncr53c96_show_scsi_cmd(struct scsi_xfer * xs)
xs->sc_link->scsibus, xs->sc_link->target,
xs->sc_link->lun);
}
+ return 0;
}
+
/*
* Actual chip control.
*/
+extern void ncr53c96_intr __P((int));
+
extern void
ncr53c96_intr(int adapter)
{
}
+extern int ncr53c96_irq_intr __P((void));
+
extern int
ncr53c96_irq_intr(void)
{
@@ -297,6 +299,7 @@ ncr53c96_irq_intr(void)
return 1;
}
+extern int ncr53c96_drq_intr __P((void));
extern int
ncr53c96_drq_intr(void)
{
@@ -307,11 +310,13 @@ ncr53c96_drq_intr(void)
static int
ncr53c96_reset_target(int adapter, int target)
{
+return 0;
}
static int
ncr53c96_poll(int adapter, int timeout)
{
+return 0;
}
static int
@@ -320,7 +325,7 @@ do_send_cmd(struct scsi_xfer * xs)
struct ncr53c96regs *ncr = (struct ncr53c96regs *) ncr53c96base;
u_char *cmd;
int i, stat, is, intr;
- int status, msg, phase;
+ int msg, phase;
xs->resid = 0;
i = (int) ncr->statreg; /* clear interrupts */
@@ -352,7 +357,7 @@ do_send_cmd(struct scsi_xfer * xs)
"datalen = %d\n", stat, is, intr, xs->datalen);
phase = ncr->statreg & NCR96_STAT_PHASE;
if (((phase == 0x01) || (phase == 0x00)) && xs->datalen) {
- printf("data = 0x%x, datalen = 0x%x.\n", xs->data, xs->datalen);
+ printf("data = %p, datalen = 0x%x.\n", xs->data, xs->datalen);
stat = ncr->statreg;
is = ncr->isreg;
intr = ncr->instreg;
@@ -381,8 +386,8 @@ do_send_cmd(struct scsi_xfer * xs)
}
intr = ncr->instreg;
- printf("\nin loop. stat = 0x%x, intr = 0x%x, cnt = %d. ",
- stat, intr, cnt);
+ printf("\nin loop. stat = 0x%x, intr = 0x%x",
+ stat, intr);
printf("rem... %d.\n", ncr->tcreg_lsb | (ncr->tcreg_msb << 8));
}
/* } else {
diff --git a/sys/arch/mac68k/dev/ser.c b/sys/arch/mac68k/dev/ser.c
deleted file mode 100644
index ba565105d6f..00000000000
--- a/sys/arch/mac68k/dev/ser.c
+++ /dev/null
@@ -1,2033 +0,0 @@
-/* $NetBSD: ser.c,v 1.34 1996/01/12 04:16:25 briggs Exp $ */
-
-/*
- * Copyright (c) 1994 Gordon W. Ross
- * Copyright (c) 1992, 1993
- * The Regents of the University of California. All rights reserved.
- *
- * This software was developed by the Computer Systems Engineering group
- * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and
- * contributed to Berkeley.
- *
- * All advertising materials mentioning features or use of this software
- * must display the following acknowledgement:
- * This product includes software developed by the University of
- * California, Lawrence Berkeley Laboratory.
- *
- * 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. All advertising materials mentioning features or use of this software
- * must display the following acknowledgement:
- * This product includes software developed by the University of
- * California, Berkeley and its contributors.
- * 4. Neither the name of the University nor the names of its contributors
- * may be used to endorse or promote products derived from this software
- * without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE REGENTS 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 REGENTS 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.
- *
- * @(#)zs.c 8.1 (Berkeley) 7/19/93
- */
-
-/*
- * Originally a custom driver.
- * Hacked by Brad Parker, <brad@fcr.com>
- * added CTS input flow control
- * added DCD event detection
- * added software fifo's
- *
- * Mac II serial device interface
- *
- * Information used in this source was gleaned from low-memory
- * global variables in MacOS and the Advanced Micro Devices
- * 1992 Data Book/Handbook.
- *
- * Further hacked by Bill Studenmund <wrstuden@loki.stanford.edu>
- * merged in much of the sun's SCC code, hence the new
- * copyright--there's not much original ser.c code in
- * here at all.
- *
- * Further information from Zilog Serial Communication Controllers
- * databook.
- */
-
-
-/*
- * Zilog Z8530 (ZSCC) driver.
- *
- * Runs two tty ports (ttya and ttyb) on zs0,
- * and runs a keyboard and mouse on zs1. (at least on a sun it will!)
- *
- * This driver knows far too much about chip to usage mappings.
- */
-#define NZS 1 /* XXX */
-
-#include <sys/param.h>
-#include <sys/systm.h>
-#include <sys/ioctl.h>
-#include <sys/tty.h>
-#include <sys/proc.h>
-#include <sys/conf.h>
-#include <sys/file.h>
-#include <sys/uio.h>
-#include <sys/kernel.h>
-#include <sys/syslog.h>
-#include <sys/device.h>
-
-#include <machine/cpu.h>
-#include <machine/frame.h>
-
-#include <dev/cons.h>
-
-#undef LOCORE
-#include "z8530reg.h"
-#include "zsvar.h"
-
-/* Defines for mapping zs onto the mac68k. */
-#undef ZS_DELAY()
-#define ZS_DELAY()
-#define mon_printf printf
-#define splzs spl4
-#define isr_soft_clear(x)
-#define isr_soft_request(x) setsoftserial()
-#define isr_add_autovect(x, y, z)
-#define ZS_CHAN(x) (volatile struct zschan *)(((long)addr)+x*2)
-#define ZS_CONS_A (volatile struct zschan *)1
-#define ZS_CONS_B (volatile struct zschan *)2
-/* magic cookies for console stuff. If zsconschan is one of these, we look at sccA all the time */
-#define zsopen seropen
-#define zsclose serclose
-#define zsioctl serioctl
-#define zsread serread
-#define zswrite serwrite
-#define zsparam serparam
-#define zsstart serstart
-#define zsstop serstop
-#define zstty sertty
-
-#define ZSMAJOR 12 /* XXX */
-
-#define ZSHARD_PRI 4 /* Wired on the CPU board... */
-#define ZSSOFT_PRI 3 /* Want tty pri (4) but this is OK. */
-
-#define ZS_KBD 2 /* XXX */
-#define ZS_MOUSE 3 /* XXX */
-#define ZSDEF_CFLAG (CREAD | CS8 | HUPCL )
-
-/*
- * Below calculation gets us to the chip clock value.
- */
-#define PCLK (mac68k_machine.sccClkConst*2)
-
-#define ZS_HFC (ZSRR0_DCD | ZSRR0_CTS)
-
-/*
- * Software state per found chip. This would be called `zs_softc',
- * but the previous driver had a rather different zs_softc....
- */
-struct zsinfo {
- struct device zi_dev; /* base device */
- volatile struct zsdevice *zi_zs;/* chip registers */
- struct zs_chanstate zi_cs[2]; /* channel A and B software state */
-};
-
-static struct tty *zs_tty[NZS * 2]; /* XXX should be dynamic */
-
-extern int matchbyname();
-static void serinit(int);
-
-/* Definition of the driver for autoconfig. */
-static int zs_match(struct device *, void *, void *);
-static void zs_attach(struct device *, struct device *, void *);
-
-struct cfdriver sercd = {
- NULL, "ser", matchbyname, zs_attach, DV_TTY, sizeof(struct zsinfo)
-};
-
-#define zscd sercd
-/* HACK until finished cleaning up configuration stuff */
-
-/* Interrupt handlers. */
-int zshard(int);
-int zssoft(int);
-void zsinit(void);
-
-struct zs_chanstate *zslist = 0;
-
-volatile unsigned char *sccA = 0;
-
-static void serstart __P((register struct tty *));
-static int serparam __P((register struct tty *, register struct termios *));
-
-/* Routines called from other code. */
-int zsopen(dev_t, int, int, struct proc *);
-int zsclose(dev_t, int, int, struct proc *);
-static void zsiopen(struct tty *);
-static void zsiclose(struct tty *);
-static void zsstart(struct tty *);
-void zsstop(struct tty *, int);
-static int zsparam(struct tty *, struct termios *);
-
-/* Routines purely local to this driver. */
-static int zs_getspeed(volatile struct zschan *);
-static void zs_reset(volatile struct zschan *, int, int);
-static void zs_modem(struct zs_chanstate *, int);
-static void zs_loadchannelregs(volatile struct zschan *, u_char *);
-static u_char zs_read(volatile struct zschan *, u_char);
-static u_char zs_write(volatile struct zschan *, u_char, u_char);
-static void zs_restart(struct zs_chanstate *, volatile struct zschan *);
-
-/* Console stuff. */
-volatile struct zschan *zs_conschan = 0;
-
-#ifdef KGDB
-/* KGDB stuff. Must reboot to change zs_kgdbunit. */
-extern int kgdb_dev, kgdb_rate;
-static int zs_kgdb_savedspeed;
-static void zs_checkkgdb(int, struct zs_chanstate *, struct tty *);
-#endif
-
-static int initted = 0;
-static int serdefaultrate = 9600;
-
-static int zsinitted = 0;
-
-extern struct tty *constty;
-
-#define UNIT(x) minor(x)
-/* #define SER_TTY(unit) \
- (((struct ser_softc *) sercd.cd_devs[unit])->sc_tty) */
-
-/*
- * Console keyboard L1-A processing is done in the hardware interrupt code,
- * so we need to duplicate some of the console keyboard decode state. (We
- * must not use the regular state as the hardware code keeps ahead of the
- * software state: the software state tracks the most recent ring input but
- * the hardware state tracks the most recent ZSCC input.) See also kbd.h.
- */
-static struct conk_state { /* console keyboard state */
- char conk_id; /* true => ID coming up (console only) */
- char conk_l1; /* true => L1 pressed (console only) */
-} zsconk_state;
-
-int zshardscope;
-int zsshortcuts; /* number of "shortcut" software interrupts */
-
-int zssoftpending; /* We have done isr_soft_request() */
-
-static struct zsdevice *zsaddr[NZS]; /* XXX, but saves work */
-
-/* Default OBIO addresses. */
-/* static int zs_physaddr[NZS] = { OBIO_ZS, OBIO_KEYBD_MS }; not until we have OBIO */
-
-static u_char zs_init_reg[16] = {
- 0, /* 0: CMD (reset, etc.) */
- ZSWR1_RIE | ZSWR1_TIE | ZSWR1_SIE,
- 0x18 + ZSHARD_PRI, /* IVECT */
- ZSWR3_RX_8 | ZSWR3_RX_ENABLE,
- ZSWR4_CLK_X16 | ZSWR4_ONESB | ZSWR4_EVENP,
- /* ZSWR5_TX_8 | ZSWR5_TX_ENABLE | ZSWR5_RTS, */
- ZSWR5_TX_8 | ZSWR5_TX_ENABLE | ZSWR5_RTS | ZSWR5_DTR,
- 0, /* 6: TXSYNC/SYNCLO */
- 0, /* 7: RXSYNC/SYNCHI */
- 0, /* 8: alias for data port */
- 0, /* 9: ZSWR9_MASTER_IE (later) */
- 0, /*10: Misc. TX/RX control bits */
- ZSWR11_TXCLK_BAUD | ZSWR11_RXCLK_BAUD,
- 0, /*12: BAUDLO (later) */
- 0, /*13: BAUDHI (later) */
-/* ZSWR14_BAUD_FROM_PCLK | ZSWR14_BAUD_ENA, */
- ZSWR14_BAUD_ENA,
-/* ZSWR15_BREAK_IE | ZSWR15_DCD_IE | ZSWR15_CTS_IE, */
- ZSWR15_DCD_IE | ZSWR15_CTS_IE,
-};
-
-/* Find PROM mappings (for console support). */
-void zs_init()
-{
- int i;
-
- for (i = 0; i < NZS; i++) {
- /* zsaddr[i] = (struct zsdevice *)
- obio_find_mapping(zs_physaddr[i], OBIO_ZS_SIZE); */
- }
-}
-
-/*
- * Match slave number to zs unit number, so that misconfiguration will
- * not set up the keyboard as ttya, etc.
- */
-static int
-zs_match(struct device *parent, void *vcf, void *args)
-{
- struct cfdata *cf = vcf;
- struct confargs *ca = args;
- int unit, x;
- void *zsva;
-
- unit = cf->cf_unit;
- if (unit < 0 || unit >= NZS)
- return (0);
-
- zsva = zsaddr[unit];
- if (zsva == NULL)
- return (0);
-
-/* if (ca->ca_paddr == -1)
- ca->ca_paddr = zs_physaddr[unit];
- if (ca->ca_intpri == -1)
- ca->ca_intpri = ZSHARD_PRI;
-*/
- /* This returns -1 on a fault (bus error). */
-/* x = peek_byte(zsva); */
- return (x != -1);
-}
-
-/*
- * Attach a found zs.
- *
- * USE ROM PROPERTIES port-a-ignore-cd AND port-b-ignore-cd FOR
- * SOFT CARRIER, AND keyboard PROPERTY FOR KEYBOARD/MOUSE?
- */
-static void
-zs_attach(struct device *parent, struct device *self, void *args)
-{
- struct cfdata *cf;
- struct confargs *ca;
- register int zs, unit;
- register struct zsinfo *zi;
- register struct zs_chanstate *cs;
- register volatile struct zsdevice *addr;
- register struct tty *tp, *ctp;
- int softcar;
- static int didintr;
-
- cf = self->dv_cfdata;
- zs = self->dv_unit;
- ca = args;
-
-#ifdef DEBUG
- printf(" softpri %d\n", ZSSOFT_PRI);
-#endif
- if (self->dv_unit != 0) {printf("\n"); return;} /* Hack for now */
-
- if (!zsinitted) zsinit();
- if (zsaddr[zs] == NULL)
- panic("zs_attach: zs%d not mapped\n", zs);
- addr = zsaddr[zs];
-
- if (!didintr) {
- didintr = 1;
- /* On the mac, these are not used. */
- isr_add_autovect(zssoft, NULL, ZSSOFT_PRI);
- isr_add_autovect(zshard, NULL, ZSHARD_PRI);
- }
-
- if ((zs_conschan == ZS_CONS_A) || (zs_conschan == ZS_CONS_B)) {
- volatile struct zsdevice *addr;
- addr = (volatile struct zsdevice *)sccA;
- zs_conschan = ((zs_conschan == ZS_CONS_A) ? (ZS_CHAN(ZS_CHAN_A)):(ZS_CHAN(ZS_CHAN_B)));
- /* the IO mapping won't be changing after here, so we can solidify the address */
- }
-
- zi = (struct zsinfo *)self;
- zi->zi_zs = addr;
- unit = zs * 2;
- cs = zi->zi_cs;
- softcar = cf->cf_flags;
-
- if(!zs_tty[unit])
- zs_tty[unit] = ttymalloc();
- if(!zs_tty[unit+1])
- zs_tty[unit+1] = ttymalloc();
-#ifdef DEBUG
- printf("units are %x, %x\n", zs_tty[unit], zs_tty[unit+1]);
-#endif
-
- /* link into interrupt list with order (A,B) (B=A+1) */
- cs[0].cs_next = &cs[1];
- cs[1].cs_next = zslist;
- zslist = cs;
-
- cs->cs_unit = unit;
- cs->cs_zc = ZS_CHAN(ZS_CHAN_A);
-#ifdef DEBUG
- printf("zs channel a at %x\n",cs->cs_zc);
-#endif
- cs->cs_speed = zs_getspeed(cs->cs_zc);
-#ifdef DEBUG
- mon_printf("zs%da speed %d ", zs, cs->cs_speed);
-#endif
- cs->cs_softcar = softcar & 1;
- cs->cs_rr0_mask = 0; /* CTS is broken on the mac */
- cs->cs_SFC = 0;
- cs->cs_holdSFC = 0;
- cs->cs_tiu = 0;
-
- tp = zs_tty[unit];
- cs->cs_ttyp = tp;
- tp->t_dev = makedev(ZSMAJOR, unit);
- tp->t_oproc = zsstart;
- tp->t_param = zsparam;
- if ((cs->cs_zc == zs_conschan) && (mac68k_machine.serial_console & 0x01)) {
-#ifdef DEBUG
- printf("We got a console!, unit %d\n",unit);
-#endif
- /* This unit is the console. */
- cs->cs_consio = 1;
- cs->cs_brkabort = /* 1 */ 0;
- cs->cs_softcar = 1;
- /* Call zsparam so interrupts get enabled. */
- tp->t_ispeed = tp->t_ospeed = cs->cs_speed;
- tp->t_iflag = TTYDEF_IFLAG;
- tp->t_oflag = TTYDEF_OFLAG;
- tp->t_cflag = ZSDEF_CFLAG;
- tp->t_lflag = TTYDEF_LFLAG;
- (void) zsparam(tp, &tp->t_termios);
- } else {
- /* Can not run kgdb on the console? */
-#ifdef KGDB
- zs_checkkgdb(unit, cs, tp);
-#endif
- }
-#if 0
- /* XXX - Drop carrier here? -gwr */
- zs_modem(cs, cs->cs_softcar ? 1 : 0);
-#endif
-
- if (unit == ZS_KBD) {
-#ifdef DEBUG
- printf("We got a KBD!, unit %d\n",unit);
-#endif
- /*
- * Keyboard: tell /dev/kbd driver how to talk to us.
- */
- tp->t_ispeed = tp->t_ospeed = cs->cs_speed;
- tp->t_cflag = CS8;
- /* zsparam called by zsiopen */
- /*kbd_serial(tp, zsiopen, zsiclose); HACK */
- cs->cs_conk = 1; /* do L1-A processing */
- }
- unit++;
- cs++;
-
- cs->cs_unit = unit;
- cs->cs_zc = ZS_CHAN(ZS_CHAN_B);
-#ifdef DEBUG
- printf("zs channel b at %x\n",cs->cs_zc);
-#endif
- cs->cs_speed = zs_getspeed(cs->cs_zc);
-#ifdef DEBUG
- mon_printf("zs%db speed %d\n", zs, cs->cs_speed);
-#endif
- cs->cs_softcar = softcar & 2;
- cs->cs_rr0_mask = 0; /* CTS is broken on the mac */
- cs->cs_SFC = 0;
- cs->cs_holdSFC = 0;
- cs->cs_tiu = 0;
-
- tp = zs_tty[unit];
- cs->cs_ttyp = tp;
- tp->t_dev = makedev(ZSMAJOR, unit);
- tp->t_oproc = zsstart;
- tp->t_param = zsparam;
- if ((cs->cs_zc == zs_conschan) && (mac68k_machine.serial_console & 0x01)) {
-#ifdef DEBUG
- printf("We got a console!, unit %d\n",unit);
-#endif
- /* This unit is the console. */
- cs->cs_consio = 1;
- cs->cs_brkabort = 0;
- cs->cs_softcar = 1;
- tp->t_ispeed = tp->t_ospeed = cs->cs_speed;
- tp->t_iflag = TTYDEF_IFLAG;
- tp->t_oflag = TTYDEF_OFLAG;
- tp->t_cflag = ZSDEF_CFLAG;
- tp->t_lflag = TTYDEF_LFLAG;
- (void) zsparam(tp, &tp->t_termios);
- } else {
- /* Can not run kgdb on the console? */
-#ifdef KGDB
- zs_checkkgdb(unit, cs, tp);
-#endif
- }
-#if 0
- /* XXX - Drop carrier here? -gwr */
- zs_modem(cs, cs->cs_softcar ? 1 : 0);
-#endif
-
- if (unit == ZS_MOUSE) {
-#ifdef DEBUG
- printf("We got a mouse!, unit %d\n",unit);
-#endif
- /*
- * Mouse: tell /dev/mouse driver how to talk to us.
- */
- tp->t_ispeed = tp->t_ospeed = cs->cs_speed;
- tp->t_cflag = CS8;
- /* zsparam called by zsiopen */
- /* ms_serial(tp, zsiopen, zsiclose); HACK */
- }
- if (mac68k_machine.serial_boot_echo) {
- if (self->dv_unit == 0)
- printf(" (serial boot echo is on)");
- }
- printf("\n");
-}
-
-/*
- * XXX - Temporary hack...
- */
-struct tty *
-zstty(dev)
- dev_t dev;
-{
- int unit = minor(dev);
-
-#ifdef DEBUG
- printf("Fetching tty unit %i\n", unit);
-#endif
-
- return (zs_tty[unit]);
-}
-
-/*
- * Put a channel in a known state. Interrupts may be left disabled
- * or enabled, as desired. (Used only by kgdb)
- */
-static void
-zs_reset(zc, inten, speed)
- volatile struct zschan *zc;
- int inten, speed;
-{
- int tconst;
- u_char reg[16];
-
- bcopy(zs_init_reg, reg, 16);
- if (inten) {
- reg[1] |= ZSWR1_RIE | ZSWR1_TIE | ZSWR1_SIE;
- reg[9] |= ZSWR9_MASTER_IE;
- }
-
- tconst = BPS_TO_TCONST(PCLK , speed);
- reg[12] = tconst;
- reg[13] = tconst >> 8;
- zs_loadchannelregs(zc, reg);
-}
-
-/*
- * Console support
- */
-
-/*
- * Used by the kd driver to find out if it can work.
- */
-int
-zscnprobe_kbd()
-{
- if (zsaddr[1] == NULL) {
- mon_printf("zscnprobe_kbd: zs1 not yet mapped\n");
- return CN_DEAD;
- }
- return CN_INTERNAL;
-}
-
-/*
- * This is the console probe routine for ttya and ttyb.
- */
-static int
-zscnprobe(struct consdev *cn, int unit)
-{
- int maj;
-
- if (zsaddr[0] == NULL) {
- mon_printf("zscnprobe: zs0 not mapped\n");
- cn->cn_pri = CN_DEAD;
- return 0;
- }
- /* XXX - Also try to make sure it exists? */
-
- /* locate the major number */
- for (maj = 0; maj < nchrdev; maj++)
- if (cdevsw[maj].d_open == (void*)zsopen)
- break;
-
- cn->cn_dev = makedev(maj, unit);
-
- /* Use EEPROM console setting to decide "remote" console. */
- /* Note: EE_CONS_TTYA + 1 == EE_CONS_TTYB */
-/* if (ee_console == (EE_CONS_TTYA + unit)) {
- cn->cn_pri = CN_REMOTE;
- } else { HACK */
- cn->cn_pri = CN_NORMAL;
-/* } HACK */
- return (0);
-}
-
-/* This is the constab entry for TTYA. */
-int
-zscnprobe_a(struct consdev *cn)
-{
- return (zscnprobe(cn, 0));
-}
-
-/* This is the constab entry for TTYB. */
-int
-zscnprobe_b(struct consdev *cn)
-{
- return (zscnprobe(cn, 1));
-}
-
-/* Called by kdcninit() or below. */
-void
-zs_set_conschan(unit, ab)
- int unit, ab;
-{
- volatile struct zsdevice *addr;
-
-#ifndef mac68k
- addr = zsaddr[unit];
- zs_conschan = ((ab == 0) ? (ZS_CHAN(ZS_CHAN_A)):(ZS_CHAN(ZS_CHAN_B)));
-#else
- zs_conschan = ((ab == 0) ? (ZS_CONS_A) : (ZS_CONS_B));
- /* use tokens for now */
-#endif
-
-}
-
-/* Attach as console. Also set zs_conschan */
-int
-zscninit(struct consdev *cn)
-{
- int ab = minor(cn->cn_dev) & 1;
- zs_set_conschan(0, ab);
- mon_printf("console on zs0 (tty%c)\n", 'a' + ab);
-}
-
-
-/*
- * Polled console input putchar.
- */
-int
-sercngetc(dev)
- dev_t dev;
-{
- register volatile struct zschan *zc = zs_conschan;
- register int s, c, rr0;
-
- if (zc == NULL)
- return (0);
- if ((zc == ZS_CONS_A) || (zc == ZS_CONS_B)) {
- volatile struct zsdevice *addr;
- addr = (volatile struct zsdevice *)sccA;
- zc = ((zc == ZS_CONS_A) ? (ZS_CHAN(ZS_CHAN_A)):(ZS_CHAN(ZS_CHAN_B)));
- /* if zs_conschan points at one of the magic values, re-direct it to the real chip */
- }
-
- s = splhigh();
-
- /* Wait for a character to arrive. */
- do {
- rr0 = zc->zc_csr;
- ZS_DELAY();
- } while ((rr0 & ZSRR0_RX_READY) == 0);
-
- c = zc->zc_data;
- ZS_DELAY();
-
- splx(s);
-
- /*
- * This is used by the kd driver to read scan codes,
- * so don't translate '\r' ==> '\n' here...
- */
- return (c);
-}
-
-/*
- * Polled console output putchar.
- */
-int
-sercnputc(dev, c)
- dev_t dev;
- int c;
-{
- register volatile struct zschan *zc = zs_conschan;
- register int s, rr0;
- register long wait = 0;
-
- if (zc == NULL) {
- s = splhigh();
- /* mon_putchar(c); */
- splx(s);
- return (0);
- }
- s = splhigh();
- if ((zc == ZS_CONS_A) || (zc == ZS_CONS_B)) {
- volatile struct zsdevice *addr;
- addr = (volatile struct zsdevice *)sccA;
- zc = ((zc == ZS_CONS_A) ? (ZS_CHAN(ZS_CHAN_A)):(ZS_CHAN(ZS_CHAN_B)));
- /* if zs_conschan points at one of the magic values, re-direct it to the real chip */
- }
-
- /* Wait for transmitter to become ready. */
- do {
- rr0 = zc->zc_csr;
- ZS_DELAY();
- } while (((rr0 & ZSRR0_TX_READY) == 0) && (wait ++ < 100000));
-
- zc->zc_data = c;
- ZS_DELAY();
- splx(s);
-}
-
-#ifdef KGDB
-/*
- * The kgdb zs port, if any, was altered at boot time (see zs_kgdb_init).
- * Pick up the current speed and character size and restore the original
- * speed.
- */
-static void
-zs_checkkgdb(int unit, struct zs_chanstate *cs, struct tty *tp)
-{
-
- if (kgdb_dev == makedev(ZSMAJOR, unit)) {
- tp->t_ispeed = tp->t_ospeed = kgdb_rate;
- tp->t_cflag = CS8;
- cs->cs_kgdb = 1;
- cs->cs_speed = zs_kgdb_savedspeed;
- (void) zsparam(tp, &tp->t_termios);
- }
-}
-#endif
-
-/*
- * Compute the current baud rate given a ZSCC channel.
- */
-static int
-zs_getspeed(zc)
- register volatile struct zschan *zc;
-{
- register int tconst;
-
- tconst = ZS_READ(zc, 12);
- tconst |= ZS_READ(zc, 13) << 8;
-#ifdef DEBUG
- printf("Time const is %x \n",tconst);
-#endif
- return (TCONST_TO_BPS(PCLK , tconst));
-}
-
-
-/*
- * Do an internal open.
- */
-static void
-zsiopen(tp)
- struct tty *tp;
-{
-
- (void) zsparam(tp, &tp->t_termios);
- ttsetwater(tp);
- tp->t_state = TS_ISOPEN | TS_CARR_ON;
-}
-
-/*
- * Do an internal close. Eventually we should shut off the chip when both
- * ports on it are closed.
- */
-static void
-zsiclose(tp)
- struct tty *tp;
-{
-#ifdef DEBUG
- printf("zs internal close.\n");
-#endif
-
- ttylclose(tp, 0); /* ??? */
- ttyclose(tp); /* ??? */
- tp->t_state = 0;
-}
-
-
-/*
- * Open a zs serial port. This interface may not be used to open
- * the keyboard and mouse ports. (XXX)
- */
-int
-zsopen(dev, flags, mode, p)
- dev_t dev;
- int flags;
- int mode;
- struct proc *p;
-{
- register struct tty *tp;
- register struct zs_chanstate *cs;
- struct zsinfo *zi;
- int unit = minor(dev), zs = unit >> 1, error, s;
-
-#ifdef DEBUG
- mon_printf("zs_open to channel at %x\n",cs->cs_zc);
-#endif
- if (zs >= zscd.cd_ndevs || (zi = zscd.cd_devs[zs]) == NULL ||
- unit == ZS_KBD || unit == ZS_MOUSE)
- return (ENXIO);
- cs = &zi->zi_cs[unit & 1];
- tp = cs->cs_ttyp;
- s = spltty();
- if ((tp->t_state & TS_ISOPEN) == 0) {
- ttychars(tp);
- if (tp->t_ispeed == 0) {
- tp->t_iflag = TTYDEF_IFLAG;
- tp->t_oflag = TTYDEF_OFLAG;
- tp->t_cflag = TTYDEF_CFLAG;
- tp->t_lflag = TTYDEF_LFLAG;
- tp->t_ispeed = tp->t_ospeed = cs->cs_speed;
- }
- (void) zsparam(tp, &tp->t_termios);
- ttsetwater(tp);
- } else if (tp->t_state & TS_XCLUDE && p->p_ucred->cr_uid != 0) {
- splx(s);
- return (EBUSY);
- }
- error = 0;
-#ifdef DEBUG
- mon_printf("wait for carrier...\n");
-#endif
- for (;;) {
- register int rr0;
-
- /* loop, turning on the device, until carrier present */
- zs_modem(cs, 1);
- /* May never get status intr if carrier already on. -gwr */
- rr0 = cs->cs_zc->zc_csr;
- ZS_DELAY();
- if (rr0 & ZSRR0_DCD)
- tp->t_state |= TS_CARR_ON;
- if (cs->cs_softcar)
- tp->t_state |= TS_CARR_ON;
- if (flags & O_NONBLOCK || tp->t_cflag & CLOCAL ||
- tp->t_state & TS_CARR_ON)
- break;
- tp->t_state |= TS_WOPEN;
- if (error = ttysleep(tp, (caddr_t)&tp->t_rawq, TTIPRI | PCATCH,
- ttopen, 0)) {
- if (!(tp->t_state & TS_ISOPEN)) {
- zs_modem(cs, 0);
- tp->t_state &= ~TS_WOPEN;
- ttwakeup(tp);
- }
- splx(s);
- return error;
- }
- }
-#ifdef DEBUG
- mon_printf("...carrier %s\n",
- (tp->t_state & TS_CARR_ON) ? "on" : "off");
-#endif
- splx(s);
- if (error == 0)
- error = linesw[tp->t_line].l_open(dev, tp);
- if (error)
- zs_modem(cs, 0);
- return (error);
-}
-
-/*
- * Close a zs serial port.
- */
-int
-zsclose(dev, flags, mode, p)
- dev_t dev;
- int flags;
- int mode;
- struct proc *p;
-{
- register struct zs_chanstate *cs;
- register struct tty *tp;
- struct zsinfo *zi;
- int unit = minor(dev), s;
-
-#ifdef DEBUG
- mon_printf("zs_close\n");
-#endif
- zi = zscd.cd_devs[unit >> 1];
- cs = &zi->zi_cs[unit & 1];
- tp = cs->cs_ttyp;
- linesw[tp->t_line].l_close(tp, flags);
-/* printf("My zsclose tty is %x, ",tp);
- printf("Stored values are: iflag %x, oflag %x, cflag %x, ospeed %x\n",tp->t_iflag, tp->t_oflag,\
- tp->t_cflag, tp->t_ospeed); */
- if (tp->t_cflag & HUPCL || tp->t_state & TS_WOPEN ||
- (tp->t_state & TS_ISOPEN) == 0) {
- zs_modem(cs, 0);
- /* hold low for 1 second */
- (void) tsleep((caddr_t)cs, TTIPRI, ttclos, hz);
- }
- if (cs->cs_creg[5] & ZSWR5_BREAK)
- {
- s = splzs();
- cs->cs_preg[5] &= ~ZSWR5_BREAK;
- cs->cs_creg[5] &= ~ZSWR5_BREAK;
- ZS_WRITE(cs->cs_zc, 5, cs->cs_creg[5]);
- splx(s);
- }
- ttyclose(tp);
-#ifdef KGDB
- /* Reset the speed if we're doing kgdb on this port */
- if (cs->cs_kgdb) {
- tp->t_ispeed = tp->t_ospeed = kgdb_rate;
- (void) zsparam(tp, &tp->t_termios);
- }
-#endif
- return (0);
-}
-
-/*
- * Read/write zs serial port.
- */
-int
-zsread(dev, uio, flags)
- dev_t dev;
- struct uio *uio;
- int flags;
-{
- register struct tty *tp = zs_tty[minor(dev)];
-
- return (linesw[tp->t_line].l_read(tp, uio, flags));
-}
-
-int
-zswrite(dev, uio, flags)
- dev_t dev;
- struct uio *uio;
- int flags;
-{
- register struct tty *tp = zs_tty[minor(dev)];
-#ifdef DEBUG
- printf("Writing\n");
-#endif
-
- return (linesw[tp->t_line].l_write(tp, uio, flags));
-}
-
-/*
- * ZS hardware interrupt. Scan all ZS channels. NB: we know here that
- * channels are kept in (A,B) pairs.
- *
- * Do just a little, then get out; set a software interrupt if more
- * work is needed.
- *
- * We deliberately ignore the vectoring Zilog gives us, and match up
- * only the number of `reset interrupt under service' operations, not
- * the order.
- */
-/* ARGSUSED */
-int
-zshard(intrarg)
- int intrarg;
-{
- register struct zs_chanstate *a;
-#define b (a + 1)
- register volatile struct zschan *zc;
- register int rr3, intflags = 0, i;
- register long v;
- static long zsrint(struct zs_chanstate *, volatile struct zschan *);
- static long zsxint(struct zs_chanstate *, volatile struct zschan *);
- static long zssint(struct zs_chanstate *, volatile struct zschan *);
-
- if (!sccA) return;
- if (zslist == 0) return;
-
- for (a = zslist; a != NULL; a = b->cs_next) {
- rr3 = ZS_READ(a->cs_zc, 3);
-
- /* XXX - This should loop to empty the on-chip fifo. */
- if (rr3 & (ZSRR3_IP_A_RX|ZSRR3_IP_A_TX|ZSRR3_IP_A_STAT)) {
- intflags |= 2;
- zc = a->cs_zc;
-#ifdef DEBUG
- printf("z %x ",ZS_READ(a->cs_zc,0));
-#endif
- i = a->cs_rbput;
- if (rr3 & ZSRR3_IP_A_RX && (v = zsrint(a, zc)) != 0) {
- a->cs_rbuf[i++ & ZLRB_RING_MASK] = v;
- intflags |= 1;
- while (ZS_READ(a->cs_zc, 0) & ZSRR0_RX_READY)
- if ((v = zsrint(a, zc)) != 0)
- a->cs_rbuf[i++ & ZLRB_RING_MASK] = v;
- }
- if (rr3 & ZSRR3_IP_A_TX && (v = zsxint(a, zc)) != 0) {
- a->cs_rbuf[i++ & ZLRB_RING_MASK] = v;
- intflags |= 1;
- }
- if (rr3 & ZSRR3_IP_A_STAT && (v = zssint(a, zc)) != 0) {
- a->cs_rbuf[i++ & ZLRB_RING_MASK] = v;
- intflags |= 1;
- }
- a->cs_rbput = i;
- }
-
- /* XXX - This should loop to empty the on-chip fifo. */
- if (rr3 & (ZSRR3_IP_B_RX|ZSRR3_IP_B_TX|ZSRR3_IP_B_STAT)) {
- intflags |= 2;
- zc = b->cs_zc;
-#ifdef DEBUG
- printf("zb %x ",ZS_READ(b->cs_zc,0));
-#endif
- i = b->cs_rbput;
- if (rr3 & ZSRR3_IP_B_RX && (v = zsrint(b, zc)) != 0) {
- b->cs_rbuf[i++ & ZLRB_RING_MASK] = v;
- intflags |= 1;
- while (ZS_READ(b->cs_zc, 0) & ZSRR0_RX_READY)
- if ((v = zsrint(b, zc)) != 0)
- b->cs_rbuf[i++ & ZLRB_RING_MASK] = v;
- }
- if (rr3 & ZSRR3_IP_B_TX && (v = zsxint(b, zc)) != 0) {
- b->cs_rbuf[i++ & ZLRB_RING_MASK] = v;
- intflags |= 1;
- }
- if (rr3 & ZSRR3_IP_B_STAT && (v = zssint(b, zc)) != 0) {
- b->cs_rbuf[i++ & ZLRB_RING_MASK] = v;
- intflags |= 1;
- }
- b->cs_rbput = i;
- }
- }
-#undef b
- if (intflags & 1) {
- if (zssoftpending == 0) {
- /* We are at splzs here, so no need to lock. */
- zssoftpending = ZSSOFT_PRI;
- isr_soft_request(ZSSOFT_PRI);
- }
- }
- return (intflags & 2);
-}
-
-static long
-zsrint(cs, zc)
- register struct zs_chanstate *cs;
- register volatile struct zschan *zc;
-{
- register long c;
-
- c = zc->zc_data;
- ZS_DELAY();
-#ifdef DEBUG
- printf("r%x ",c);
-#endif
-
- if (cs->cs_conk) {
- register struct conk_state *conk = &zsconk_state;
-
-#define KBD_RESET 0
-#define KBD_L1 4
-#define KBD_UP 2
-#define KBD_A 8
- /*
- * Check here for console abort function, so that we
- * can abort even when interrupts are locking up the
- * machine.
- */
- if (c == KBD_RESET) {
- conk->conk_id = 1; /* ignore next byte */
- conk->conk_l1 = 0;
- } else if (conk->conk_id)
- conk->conk_id = 0; /* stop ignoring bytes */
- else if (c == KBD_L1)
- conk->conk_l1 = 1; /* L1 went down */
- else if (c == (KBD_L1|KBD_UP))
- conk->conk_l1 = 0; /* L1 went up */
- else if (c == KBD_A && conk->conk_l1) {
- zsabort();
- /* Debugger done. Send L1-up in case X is running. */
- conk->conk_l1 = 0;
- c = (KBD_L1|KBD_UP);
- }
- }
-#ifdef KGDB
- /*if (c == FRAME_START && cs->cs_kgdb &&
- (cs->cs_ttyp->t_state & TS_ISOPEN) == 0) {
- zskgdb(cs->cs_unit);
- c = 0;
- goto clearit;
- } */
-#endif
- /* compose receive character and status */
- c <<= 8;
- c |= ZS_READ(zc, 1);
- c = ZRING_MAKE(ZRING_RINT, c);
-
-clearit:
- /* clear receive error & interrupt condition */
- zc->zc_csr = ZSWR0_RESET_ERRORS;
- ZS_DELAY();
- zc->zc_csr = ZSWR0_CLR_INTR;
- ZS_DELAY();
- return (c);
-}
-
-static long
-zsxint(cs, zc)
- register struct zs_chanstate *cs;
- register volatile struct zschan *zc;
-{
- register int i = cs->cs_tbc;
-
- if (i == 0) {
- zc->zc_csr = ZSWR0_RESET_TXINT;
- ZS_DELAY();
- zc->zc_csr = ZSWR0_CLR_INTR;
- ZS_DELAY();
- if (cs->cs_tiu !=0) {
- /* We only want to post a transmitter's empty if we've
- actually put something in it. We also get here after zscnputc
- outputs a byte, but we shouldn't post to the ring */
- cs->cs_tiu = 0;
-#ifdef DEBUG
- printf("Td ");
-#endif
- return (ZRING_MAKE(ZRING_XINT, 0));
- } else {return (0);}
- }
-#ifdef DEBUGTX
- printf(" t%x ",(u_char)*cs->cs_tba);
-#endif
- if (cs->cs_holdSFC) {
- cs->cs_tiu = 0; /* transmitter is no longer in use */
- zc->zc_csr = ZSWR0_RESET_TXINT;
- ZS_DELAY();
- zc->zc_csr = ZSWR0_CLR_INTR;
- ZS_DELAY();
- return (0);
- }
- cs->cs_tbc = i - 1;
- zc->zc_data = *cs->cs_tba++;
- ZS_DELAY();
- zc->zc_csr = ZSWR0_CLR_INTR;
- ZS_DELAY();
- return (0);
-}
-
-static long
-zssint(cs, zc)
- register struct zs_chanstate *cs;
- register volatile struct zschan *zc;
-{
- register int rr0;
-
- rr0 = zc->zc_csr;
- ZS_DELAY();
- rr0 = zc->zc_csr;
- ZS_DELAY();
- zc->zc_csr = ZSWR0_RESET_STATUS;
- ZS_DELAY();
- zc->zc_csr = ZSWR0_CLR_INTR;
- ZS_DELAY();
- /*
- * The chip's hardware flow control is, as noted in zsreg.h,
- * busted---if the DCD line goes low the chip shuts off the
- * receiver (!). If we want hardware CTS flow control but do
- * not have it, and carrier is now on, turn HFC on; if we have
- * HFC now but carrier has gone low, turn it off.
- */
- /* if (rr0 & ZSRR0_DCD) {
- if (cs->cs_ttyp->t_cflag & CCTS_OFLOW &&
- (cs->cs_creg[3] & ZSWR3_HFC) == 0) {
- cs->cs_creg[3] |= ZSWR3_HFC;
- ZS_WRITE(zc, 3, cs->cs_creg[3]);
- }
- } else {
- if (cs->cs_creg[3] & ZSWR3_HFC) {
- cs->cs_creg[3] &= ~ZSWR3_HFC;
- ZS_WRITE(zc, 3, cs->cs_creg[3]);
- }
- } */
- if (cs->cs_SFC) {
- register u_char nhold = \
- (((rr0 ^ cs->cs_rr0_mask) & ZS_HFC)==ZS_HFC) ? 1 : 0;
- if (nhold != cs->cs_holdSFC) { /* our holding state has changed */
- cs->cs_holdSFC = nhold;
- if ((nhold == 0) && (cs->cs_tbc != 0)) {
- /* a character is waiting; send it */
- zs_restart(cs, zc);
- }
-#ifdef DEBUG
- printf(" ntd CTS change, hl %d ",nhold);
-#endif
- }
- }
- if ((rr0 & ZSRR0_BREAK) && cs->cs_brkabort) {
- /* Wait for end of break to avoid PROM abort. */
- do {
- rr0 = zc->zc_csr;
- ZS_DELAY();
- } while (rr0 & ZSRR0_BREAK);
- zsabort();
- return (0);
- }
-#ifdef DEBUG
- printf(" s%x ",rr0);
-#endif
- return (ZRING_MAKE(ZRING_SINT, rr0));
-}
-
-static void
-zs_restart(cs, zc)
- register struct zs_chanstate *cs;
- register volatile struct zschan *zc;
-{
- cs->cs_tbc -= 1;
- zc->zc_data = *cs->cs_tba++;
- ZS_DELAY();
- cs->cs_tiu = 1;
-#ifdef DEBUG
- printf(" restart tx ");
-#endif
-}
-
-zsabort()
-{
-#ifdef DDB
- Debugger();
-#endif
-}
-
-#ifdef KGDB
-/*
- * KGDB framing character received: enter kernel debugger. This probably
- * should time out after a few seconds to avoid hanging on spurious input.
- */
-zskgdb(unit)
- int unit;
-{
-
- printf("zs%d%c: kgdb interrupt\n", unit >> 1, (unit & 1) + 'a');
- kgdb_connect(1);
-}
-#endif
-
-/*
- * Print out a ring or fifo overrun error message.
- */
-static void
-zsoverrun(unit, ptime, what)
- int unit;
- long *ptime;
- char *what;
-{
-
- if (*ptime != time.tv_sec) {
- *ptime = time.tv_sec;
- log(LOG_WARNING, "zs%d%c: %s overrun\n", unit >> 1,
- (unit & 1) + 'a', what);
- }
-}
-
-/*
- * ZS software interrupt. Scan all channels for deferred interrupts.
- */
-int
-zssoft(arg)
- int arg;
-{
- register struct zs_chanstate *cs;
- register volatile struct zschan *zc;
- register struct linesw *line;
- register struct tty *tp;
- register int get, n, c, cc, unit, s;
-
- /* This is not the only ISR on this IPL. */
- if (zssoftpending == 0)
- return (0);
-#ifdef DEBUG
- printf("zs");
-#endif
-
- /*
- * The soft intr. bit will be set by zshard only if
- * the variable zssoftpending is zero. The order of
- * these next two statements prevents our clearing
- * the soft intr bit just after zshard has set it.
- */
- isr_soft_clear(ZSSOFT_PRI);
- zssoftpending = 0; /* Now zshard may set it again. */
-
- for (cs = zslist; cs != NULL; cs = cs->cs_next) {
- get = cs->cs_rbget;
-again:
- n = cs->cs_rbput; /* atomic */
- if (get == n) /* nothing more on this line */
- continue;
- unit = cs->cs_unit; /* set up to handle interrupts */
- zc = cs->cs_zc;
- tp = cs->cs_ttyp;
- if (tp != NULL) line = &linesw[tp->t_line];
- /*
- * Compute the number of interrupts in the receive ring.
- * If the count is overlarge, we lost some events, and
- * must advance to the first valid one. It may get
- * overwritten if more data are arriving, but this is
- * too expensive to check and gains nothing (we already
- * lost out; all we can do at this point is trade one
- * kind of loss for another).
- */
- n -= get;
- if (n > ZLRB_RING_SIZE) {
- zsoverrun(unit, &cs->cs_rotime, "ring");
- get += n - ZLRB_RING_SIZE;
- n = ZLRB_RING_SIZE;
- }
- while (--n >= 0) {
- /* race to keep ahead of incoming interrupts */
- c = cs->cs_rbuf[get++ & ZLRB_RING_MASK];
- switch (ZRING_TYPE(c)) {
-
- case ZRING_RINT:
- c = ZRING_VALUE(c);
- if (c & ZSRR1_DO)
- zsoverrun(unit, &cs->cs_fotime, "fifo");
- cc = c >> 8;
- if (c & ZSRR1_FE)
- cc |= TTY_FE;
- if (c & ZSRR1_PE)
- cc |= TTY_PE;
- /*
- * this should be done through
- * bstreams XXX gag choke
- */
- if (tp != NULL) {
- line->l_rint(cc, tp);
- } else {printf("tp == NULL!");}
- break;
-
- case ZRING_XINT:
- /*
- * Transmit done: change registers and resume,
- * or clear BUSY.
- */
- if (cs->cs_heldchange) {
- s = splzs();
- c = zc->zc_csr;
- ZS_DELAY();
- if ((c & ZSRR0_DCD) == 0)
- cs->cs_preg[3] &= ~ZSWR3_HFC;
- bcopy((caddr_t)cs->cs_preg,
- (caddr_t)cs->cs_creg, 16);
- zs_loadchannelregs(zc, cs->cs_creg);
- splx(s);
- cs->cs_heldchange = 0;
- if (cs->cs_heldtbc &&
- (tp->t_state & TS_TTSTOP) == 0) {
- cs->cs_tbc = cs->cs_heldtbc - 1;
- zc->zc_data = *cs->cs_tba++;
- ZS_DELAY();
- goto again;
- }
- }
- if (tp != NULL) {
- tp->t_state &= ~TS_BUSY;
- if (tp->t_state & TS_FLUSH)
- tp->t_state &= ~TS_FLUSH;
- else
- ndflush(&tp->t_outq, cs->cs_tba -
- (caddr_t) tp->t_outq.c_cf);
- line->l_start(tp);
- } else {printf("Trans. tp == NULL!");}
- break;
-
- case ZRING_SINT:
- /*
- * Status line change. HFC bit is run in
- * hardware interrupt, to avoid locking
- * at splzs here.
- */
- c = ZRING_VALUE(c);
- if ((c ^ cs->cs_rr0) & ZSRR0_DCD) {
- cc = (c & ZSRR0_DCD) != 0;
- if (tp != NULL) if (line->l_modem(tp, cc) == 0)
- zs_modem(cs, cc);
- }
- cs->cs_rr0 = c;
- break;
-
- default:
- log(LOG_ERR, "zs%d%c: bad ZRING_TYPE (%x)\n",
- unit >> 1, (unit & 1) + 'a', c);
- break;
- }
- }
- cs->cs_rbget = get;
- goto again;
- }
- return (1);
-}
-
-int
-zsioctl(dev, cmd, data, flag, p)
- dev_t dev;
- u_long cmd;
- caddr_t data;
- int flag;
- struct proc *p;
-{
- int unit = minor(dev);
- struct zsinfo *zi = zscd.cd_devs[unit >> 1];
- register struct zs_chanstate *cs = &zi->zi_cs[unit & 1];
- register struct tty *tp = cs->cs_ttyp;
- register int error, s;
-
-#ifdef DEBUG
- printf("My tty in zsioctl is %x, my command is %x, and my zc is %x\n",tp,cmd,cs->cs_zc);
-#endif
-
- error = linesw[tp->t_line].l_ioctl(tp, cmd, data, flag, p);
- if (error >= 0)
- return (error);
- error = ttioctl(tp, cmd, data, flag, p);
- if (error >= 0)
- return (error);
-
- switch (cmd) {
-
- case TIOCSBRK:
- s = splzs();
- cs->cs_preg[5] |= ZSWR5_BREAK;
- cs->cs_creg[5] |= ZSWR5_BREAK;
- ZS_WRITE(cs->cs_zc, 5, cs->cs_creg[5]);
- splx(s);
- break;
-
- case TIOCCBRK:
- s = splzs();
- cs->cs_preg[5] &= ~ZSWR5_BREAK;
- cs->cs_creg[5] &= ~ZSWR5_BREAK;
- ZS_WRITE(cs->cs_zc, 5, cs->cs_creg[5]);
- splx(s);
- break;
-
- case TIOCGFLAGS: {
- int bits = 0;
-
- if (cs->cs_softcar)
- bits |= TIOCFLAG_SOFTCAR;
- if (cs->cs_creg[15] & ZSWR15_DCD_IE)
- bits |= TIOCFLAG_CLOCAL;
- if (cs->cs_creg[3] & ZSWR3_HFC)
- bits |= TIOCFLAG_CRTSCTS;
- *(int *)data = bits;
- break;
- }
-
- case TIOCSFLAGS: {
- int userbits, driverbits = 0;
-
- error = suser(p->p_ucred, &p->p_acflag);
- if (error != 0)
- return (EPERM);
-
- userbits = *(int *)data;
-
- /*
- * can have `local' or `softcar', and `rtscts' or `mdmbuf'
- * defaulting to software flow control.
- */
- if (userbits & TIOCFLAG_SOFTCAR && userbits & TIOCFLAG_CLOCAL)
- return(EINVAL);
- if (userbits & TIOCFLAG_MDMBUF) /* don't support this (yet?) */
- return(ENXIO);
-
- s = splzs();
- if ((userbits & TIOCFLAG_SOFTCAR) ||
- (cs->cs_zc == zs_conschan))
- {
- cs->cs_softcar = 1; /* turn on softcar */
- cs->cs_preg[15] &= ~ZSWR15_DCD_IE; /* turn off dcd */
- cs->cs_creg[15] &= ~ZSWR15_DCD_IE;
- ZS_WRITE(cs->cs_zc, 15, cs->cs_creg[15]);
- } else if (userbits & TIOCFLAG_CLOCAL) {
- cs->cs_softcar = 0; /* turn off softcar */
- cs->cs_preg[15] |= ZSWR15_DCD_IE; /* turn on dcd */
- cs->cs_creg[15] |= ZSWR15_DCD_IE;
- ZS_WRITE(cs->cs_zc, 15, cs->cs_creg[15]);
- tp->t_termios.c_cflag |= CLOCAL;
- }
- if (userbits & TIOCFLAG_CRTSCTS) {
- cs->cs_preg[15] |= ZSWR15_CTS_IE;
- cs->cs_creg[15] |= ZSWR15_CTS_IE;
- ZS_WRITE(cs->cs_zc, 15, cs->cs_creg[15]);
- cs->cs_preg[3] |= ZSWR3_HFC;
- cs->cs_creg[3] |= ZSWR3_HFC;
- ZS_WRITE(cs->cs_zc, 3, cs->cs_creg[3]);
- tp->t_termios.c_cflag |= CRTSCTS;
- } else {
- /* no mdmbuf, so we must want software flow control */
- cs->cs_preg[15] &= ~ZSWR15_CTS_IE;
- cs->cs_creg[15] &= ~ZSWR15_CTS_IE;
- ZS_WRITE(cs->cs_zc, 15, cs->cs_creg[15]);
- cs->cs_preg[3] &= ~ZSWR3_HFC;
- cs->cs_creg[3] &= ~ZSWR3_HFC;
- ZS_WRITE(cs->cs_zc, 3, cs->cs_creg[3]);
- tp->t_termios.c_cflag &= ~CRTSCTS;
- }
- splx(s);
- break;
- }
-
- case TIOCSDTR:
- zs_modem(cs, 1);
- break;
- case TIOCCDTR:
- zs_modem(cs, 0);
- break;
-
- case TIOCMSET:
- case TIOCMBIS:
- case TIOCMBIC:
- case TIOCMGET:
- default:
- return (ENOTTY);
- }
- return (0);
-}
-
-/*
- * Start or restart transmission.
- */
-static void
-zsstart(tp)
- register struct tty *tp;
-{
- register struct zs_chanstate *cs;
- register int s, nch;
- int unit = minor(tp->t_dev);
- struct zsinfo *zi = zscd.cd_devs[unit >> 1];
-
- cs = &zi->zi_cs[unit & 1];
- s = spltty();
-
- /*
- * If currently active or delaying, no need to do anything.
- */
- if (tp->t_state & (TS_TIMEOUT | TS_BUSY | TS_TTSTOP))
- goto out;
-
- /*
- * If there are sleepers, and output has drained below low
- * water mark, awaken.
- */
- if (tp->t_outq.c_cc <= tp->t_lowat) {
- if (tp->t_state & TS_ASLEEP) {
- tp->t_state &= ~TS_ASLEEP;
- wakeup((caddr_t)&tp->t_outq);
- }
- selwakeup(&tp->t_wsel);
- }
-#ifdef DEBUG
- printf("stat %x ",ZS_READ(cs->cs_zc,0));
-#endif
-
- nch = ndqb(&tp->t_outq, 0); /* XXX */
- if (nch) {
- register char *p = tp->t_outq.c_cf;
-
- /* mark busy, enable tx done interrupts, & send first byte */
- tp->t_state |= TS_BUSY;
-#ifdef DEBUG
- printf(" out w/ %x ",(u_char)*p);
-#endif
- (void) splzs();
- cs->cs_preg[1] |= ZSWR1_TIE;
- cs->cs_creg[1] |= ZSWR1_TIE;
- ZS_WRITE(cs->cs_zc, 1, cs->cs_creg[1]);
- cs->cs_tba = p;
- cs->cs_tbc = nch;
- if ((cs->cs_SFC == 0) || (cs->cs_holdSFC == 0))
- zs_restart(cs, cs->cs_zc);
- } else {
- /*
- * Nothing to send, turn off transmit done interrupts.
- * This is useful if something is doing polled output.
- */
-#ifdef DEBUG
- printf(" off ");
-#endif
- (void) splzs();
- cs->cs_preg[1] &= ~ZSWR1_TIE;
- cs->cs_creg[1] &= ~ZSWR1_TIE;
- ZS_WRITE(cs->cs_zc, 1, cs->cs_creg[1]);
- }
-out:
- splx(s);
-}
-
-/*
- * Stop output, e.g., for ^S or output flush.
- */
-void
-zsstop(tp, flag)
- register struct tty *tp;
- int flag;
-{
- register struct zs_chanstate *cs;
- register int s, unit = minor(tp->t_dev);
- struct zsinfo *zi = zscd.cd_devs[unit >> 1];
-
- cs = &zi->zi_cs[unit & 1];
- s = splzs();
- if (tp->t_state & TS_BUSY) {
- /*
- * Device is transmitting; must stop it.
- */
- cs->cs_tbc = 0;
- if ((tp->t_state & TS_TTSTOP) == 0)
- tp->t_state |= TS_FLUSH;
- }
- splx(s);
-}
-
-/*
- * Set ZS tty parameters from termios.
- */
-static int
-zsparam(tp, t)
- register struct tty *tp;
- register struct termios *t;
-{
- int unit = minor(tp->t_dev);
- struct zsinfo *zi = zscd.cd_devs[unit >> 1];
- register struct zs_chanstate *cs = &zi->zi_cs[unit & 1];
- register int tmp, tmp5, cflag, s, tmpx;
-
- /*
- * Because PCLK is only run at 4.9 MHz, the fastest we
- * can go is 51200 baud (this corresponds to TC=1).
- * This is somewhat unfortunate as there is no real
- * reason we should not be able to handle higher rates.
- */
- tmp = t->c_ospeed;
- if (tmp < 0 || (t->c_ispeed && t->c_ispeed != tmp))
- return (EINVAL);
- if (tmp == 0) {
- /* stty 0 => drop DTR and RTS */
- zs_modem(cs, 0);
- return (0);
- }
- tmp = BPS_TO_TCONST(PCLK , tmp);
- if (tmp < 0)
- return (EINVAL);
-
- cflag = t->c_cflag;
- tp->t_ispeed = tp->t_ospeed = TCONST_TO_BPS(PCLK , tmp);
- tp->t_cflag = cflag;
-
- /*
- * Block interrupts so that state will not
- * be altered until we are done setting it up.
- */
- s = splzs();
- bcopy(zs_init_reg, cs->cs_preg, 16);
- cs->cs_preg[12] = tmp & 255;
- cs->cs_preg[13] = tmp >> 8;
- cs->cs_preg[1] |= ZSWR1_RIE | ZSWR1_TIE | ZSWR1_SIE;
- cs->cs_preg[9] |= ZSWR9_MASTER_IE;
- switch (cflag & CSIZE) {
- case CS5:
- tmp = ZSWR3_RX_5;
- tmp5 = ZSWR5_TX_5;
- break;
- case CS6:
- tmp = ZSWR3_RX_6;
- tmp5 = ZSWR5_TX_6;
- break;
- case CS7:
- tmp = ZSWR3_RX_7;
- tmp5 = ZSWR5_TX_7;
- break;
- case CS8:
- default:
- tmp = ZSWR3_RX_8;
- tmp5 = ZSWR5_TX_8;
- break;
- }
-
- /*
- * Output hardware flow control on the chip is horrendous: if
- * carrier detect drops, the receiver is disabled. Hence we
- * can only do this when the carrier is on.
- */
- tmp |= ZSWR3_RX_ENABLE;
- if (cflag & CCTS_OFLOW) {
- if (1) {
- cs->cs_SFC = 1;
- cs->cs_holdSFC = (((cs->cs_zc->zc_csr ^ cs->cs_rr0_mask) & ZS_HFC)==ZS_HFC) ? 1 : 0;
- } else {
- if (cs->cs_zc->zc_csr & ZSRR0_DCD)
- tmp |= ZSWR3_HFC;
- ZS_DELAY();
- }
- } else {
- /* (cs_SFC !=0) && (cs_holdSFC !=0) */
- tmpx = (cs->cs_SFC ? cs->cs_holdSFC : 0);
- cs->cs_SFC = 0;
- cs->cs_holdSFC = 0;
- if (tmpx)
- /* we were waiting because of SFC, but now we don't */
- zs_restart(cs, cs->cs_zc);
- }
-
- cs->cs_preg[3] = tmp;
- cs->cs_preg[5] = tmp5 | ZSWR5_TX_ENABLE | ZSWR5_DTR | ZSWR5_RTS;;
-
- tmp = ZSWR4_CLK_X16 | (cflag & CSTOPB ? ZSWR4_TWOSB : ZSWR4_ONESB);
- if ((cflag & PARODD) == 0)
- tmp |= ZSWR4_EVENP;
- if (cflag & PARENB)
- tmp |= ZSWR4_PARENB;
- cs->cs_preg[4] = tmp;
-
- /*
- * If nothing is being transmitted, set up new current values,
- * else mark them as pending.
- */
- if (cs->cs_heldchange == 0) {
- if (cs->cs_ttyp->t_state & TS_BUSY) {
- cs->cs_heldtbc = cs->cs_tbc;
- cs->cs_tbc = 0;
- cs->cs_heldchange = 1;
- } else {
- bcopy((caddr_t)cs->cs_preg, (caddr_t)cs->cs_creg, 16);
- zs_loadchannelregs(cs->cs_zc, cs->cs_creg);
- }
- }
- splx(s);
-#ifdef DEBUG
-printf("My zsparam tty is %x, my termios is %x, iflag %x, oflag %x, cflag %x\n",
- tp,t, t->c_iflag, t->c_oflag, t->c_cflag);
-printf("Stored values are: iflag %x, oflag %x, cflag %x, ospeed %x\n",
- tp->t_iflag, tp->t_oflag, tp->t_cflag, tp->t_ospeed);
-#endif
- return (0);
-}
-
-/*
- * Raise or lower modem control (DTR/RTS) signals. If a character is
- * in transmission, the change is deferred.
- */
-static void
-zs_modem(cs, onoff)
- struct zs_chanstate *cs;
- int onoff;
-{
- int s, bis, and;
-
- if (onoff) {
- bis = ZSWR5_DTR | ZSWR5_RTS;
- and = ~0;
- } else {
- bis = 0;
- and = ~(ZSWR5_DTR | ZSWR5_RTS);
- }
- s = splzs();
- cs->cs_preg[5] = (cs->cs_preg[5] | bis) & and;
- if (cs->cs_heldchange == 0) {
- if (cs->cs_ttyp->t_state & TS_BUSY) {
- cs->cs_heldtbc = cs->cs_tbc;
- cs->cs_tbc = 0;
- cs->cs_heldchange = 1;
- } else {
- cs->cs_creg[5] = (cs->cs_creg[5] | bis) & and;
- ZS_WRITE(cs->cs_zc, 5, cs->cs_creg[5]);
- }
- }
- splx(s);
-}
-
-/*
- * Write the given register set to the given zs channel in the proper order.
- * The channel must not be transmitting at the time. The receiver will
- * be disabled for the time it takes to write all the registers.
- */
-static void
-zs_loadchannelregs(zc, reg)
- volatile struct zschan *zc;
- u_char *reg;
-{
- int i;
-
- zc->zc_csr = ZSM_RESET_ERR; /* reset error condition */
- ZS_DELAY();
-
-#if 1 /* XXX - Is this really a good idea? -gwr */
- i = zc->zc_data; /* drain fifo */
- ZS_DELAY();
- i = zc->zc_data;
- ZS_DELAY();
- i = zc->zc_data;
- ZS_DELAY();
-#endif
-
- /* baud clock divisor, stop bits, parity */
- ZS_WRITE(zc, 4, reg[4]);
-
- /* misc. TX/RX control bits */
- ZS_WRITE(zc, 10, reg[10]);
-
- /* char size, enable (RX/TX) */
- ZS_WRITE(zc, 3, reg[3] & ~ZSWR3_RX_ENABLE);
- ZS_WRITE(zc, 5, reg[5] & ~ZSWR5_TX_ENABLE);
-
- /* interrupt enables: TX, TX, STATUS */
- ZS_WRITE(zc, 1, reg[1]);
-
- /* interrupt vector */
- ZS_WRITE(zc, 2, reg[2]);
-
- /* master interrupt control */
- ZS_WRITE(zc, 9, reg[9]);
-
- /* clock mode control */
- ZS_WRITE(zc, 11, reg[11]);
-
- /* baud rate (lo/hi) */
- ZS_WRITE(zc, 12, reg[12]);
- ZS_WRITE(zc, 13, reg[13]);
-
- /* Misc. control bits */
- ZS_WRITE(zc, 14, reg[14]);
-
- /* which lines cause status interrupts */
- ZS_WRITE(zc, 15, reg[15]| 1);
- ZS_WRITE(zc, 7, 0);
- ZS_WRITE(zc, 15, reg[15]);
-
- /* char size, enable (RX/TX)*/
- ZS_WRITE(zc, 3, reg[3]);
- ZS_WRITE(zc, 5, reg[5]);
-#ifdef DEBUG2
- printf("Params %x %x %x %x %x %x %x %x %x %x %x %x %x\n",
- reg[0], reg[1], reg[2], reg[3], reg[4], reg[5], reg[9],
- reg[10], reg[11], reg[12], reg[13], reg[14], reg[15]);
-#endif
-}
-
-static u_char
-zs_read(zc, reg)
- volatile struct zschan *zc;
- u_char reg;
-{
- u_char val;
-
- zc->zc_csr = reg;
- ZS_DELAY();
- val = zc->zc_csr;
- ZS_DELAY();
- return val;
-}
-
-static u_char
-zs_write(zc, reg, val)
- volatile struct zschan *zc;
- u_char reg, val;
-{
- zc->zc_csr = reg;
- ZS_DELAY();
- zc->zc_csr = val;
- ZS_DELAY();
- return val;
-}
-
-#ifdef KGDB
-/*
- * Get a character from the given kgdb channel. Called at splhigh().
- * XXX - Add delays, or combine with zscngetc()...
- */
-static int
-zs_kgdb_getc(arg)
- void *arg;
-{
- register volatile struct zschan *zc = (volatile struct zschan *)arg;
- register int c, rr0;
-
- do {
- rr0 = zc->zc_csr;
- ZS_DELAY();
- } while ((rr0 & ZSRR0_RX_READY) == 0);
- c = zc->zc_data;
- ZS_DELAY();
- return (c);
-}
-
-/*
- * Put a character to the given kgdb channel. Called at splhigh().
- */
-static void
-zs_kgdb_putc(arg, c)
- void *arg;
- int c;
-{
- register volatile struct zschan *zc = (volatile struct zschan *)arg;
- register int c, rr0;
-
- do {
- rr0 = zc->zc_csr;
- ZS_DELAY();
- } while ((rr0 & ZSRR0_TX_READY) == 0);
- zc->zc_data = c;
- ZS_DELAY();
-}
-
-/*
- * Set up for kgdb; called at boot time before configuration.
- * KGDB interrupts will be enabled later when zs0 is configured.
- */
-void
-zs_kgdb_init()
-{
- volatile struct zsdevice *addr;
- volatile struct zschan *zc;
- int unit, zs;
-
- if (major(kgdb_dev) != ZSMAJOR)
- return;
- unit = minor(kgdb_dev);
- /*
- * Unit must be 0 or 1 (zs0).
- */
- if ((unsigned)unit >= ZS_KBD) {
- printf("zs_kgdb_init: bad minor dev %d\n", unit);
- return;
- }
- zs = unit >> 1;
- unit &= 1;
-
- if (zsaddr[0] == NULL)
- panic("kbdb_attach: zs0 not yet mapped");
- addr = zsaddr[0];
-
- zc = (unit == 0) ?
- &addr->zs_chan[ZS_CHAN_A] :
- &addr->zs_chan[ZS_CHAN_B];
- zs_kgdb_savedspeed = zs_getspeed(zc);
- printf("zs_kgdb_init: attaching zs%d%c at %d baud\n",
- zs, unit + 'a', kgdb_rate);
- zs_reset(zc, 1, kgdb_rate);
- kgdb_attach(zs_kgdb_getc, zs_kgdb_putc, (void *)zc);
-}
-#endif /* KGDB */
-
-void zsinit(void)
-{
- volatile struct zschan *zc;
- u_char ch;
-
- /* get the base address of the chip */
- zsaddr[0] = (struct zsdevice *)sccA;
- zsinitted = 1;
-
- zc=(volatile struct zschan *)zsaddr[0];
- ch=zc->zc_csr;
- ch=zc->zc_csr;
-}
-
-static void
-serinit(int running_interrupts)
-{
- int bcount;
- int i, s, spd, im;
-
- if (!sccA)
- panic("sccA offset not set!\n");
-
- im=mac68k_machine.serial_console & 0x03;
-
- /* note: the HACKed routine doesn't do a lot of the pleasantries in the
- old mac routine. Oh well. This is still a hacked version */
- /* zs_reset doesn't turn on interrupts! */
- zs_reset((volatile struct zschan *)&sccA[0],
- (running_interrupts && (im!=3)), serdefaultrate);
- zs_reset((volatile struct zschan *)&sccA[2],
- (running_interrupts && (im!=1)), serdefaultrate);
-
- return;
-}
-
-/*
- * Console functions.
- */
-dev_t mac68k_serdev;
-
-sercnprobe(struct consdev * cp)
-{
- extern u_long IOBase;
- int maj, unit;
-
- for (maj = 0; maj < nchrdev; maj++) {
- if (cdevsw[maj].d_open == seropen) {
- break;
- }
- }
- if (maj == nchrdev) {
- /* no console entry for us */
- if (mac68k_machine.serial_boot_echo) {
- /* major number doesn't really matter. */
- mac68k_serdev = makedev(maj, 0);
- mac68k_set_io_offsets(IOBase);
- zs_conschan = (volatile struct zschan *)ZS_CONS_B;
- serinit(0);
- }
- return 0;
- }
-
- cp->cn_pri = CN_NORMAL; /* Lower than CN_INTERNAL */
- if (mac68k_machine.serial_console & 0x01) {
- cp->cn_pri = CN_REMOTE; /* Higher than CN_INTERNAL */
- mac68k_machine.serial_boot_echo =0;
- }
-
- unit = (mac68k_machine.serial_console & 0x02) ? 1 : 0;
-
- cp->cn_dev = makedev(maj, unit);
-
- if (mac68k_machine.serial_boot_echo) {
- /*
- * at this point, we know that we don't have a serial
- * console, but are doing echo
- */
- mac68k_set_io_offsets(IOBase);
- zs_conschan = (volatile struct zschan *)ZS_CONS_B;
- serinit(0);
- }
- return 0;
-}
-
-sercninit(struct consdev * cp)
-{
- extern u_long IOBase;
-
- mac68k_set_io_offsets(IOBase);
- /*
- * zsinit(); This is not the right time to zsinit as
- * the IO mapping will move.
- */
- zscninit(cp);
- serinit(0);
- printf("Whee! we are the console!\n");
-}
diff --git a/sys/arch/mac68k/dev/serreg.h b/sys/arch/mac68k/dev/serreg.h
deleted file mode 100644
index 0bc1b912d36..00000000000
--- a/sys/arch/mac68k/dev/serreg.h
+++ /dev/null
@@ -1,52 +0,0 @@
-/* $NetBSD: serreg.h,v 1.9 1995/04/21 02:48:09 briggs Exp $ */
-
-/*
- * Copyright (C) 1993 Allen K. Briggs, Chris P. Caputo,
- * Michael L. Finch, Bradley A. Grantham, and
- * Lawrence A. Kesteloot
- * 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. All advertising materials mentioning features or use of this software
- * must display the following acknowledgement:
- * This product includes software developed by the Alice Group.
- * 4. The names of the Alice Group or any of its members may not be used
- * to endorse or promote products derived from this software without
- * specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE ALICE GROUP ``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 ALICE GROUP 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.
- *
- * Mac II serial device interface
- *
- * Information used in this source was gleaned from low-memory
- * global variables in MacOS and the Advanced Micro Devices
- * 1992 Data Book/Handbook.
- */
-
-/* Gleaned from MacOS */
-extern volatile unsigned char *sccA;
-
-#define SERBRD(x) (mac68k_machine.sccClkConst / (x) - 2)
-#define SCCCNTL(unit) (sccA[2 - ((unit) << 1)])
-#define SCCRDWR(unit) (sccA[6 - ((unit) << 1)])
-
-#define SER_DOCNTL(unit, reg, val) \
- {SCCCNTL(unit) = (reg); SCCCNTL(unit) = (val);}
-#define SER_STATUS(unit, reg) \
- (SCCCNTL(unit) = (reg), SCCCNTL(unit))
diff --git a/sys/arch/mac68k/dev/z8530reg.h b/sys/arch/mac68k/dev/z8530reg.h
index ee44a4f78a9..4cf1554b605 100644
--- a/sys/arch/mac68k/dev/z8530reg.h
+++ b/sys/arch/mac68k/dev/z8530reg.h
@@ -1,4 +1,4 @@
-/* $NetBSD: z8530reg.h,v 1.1 1995/10/09 12:42:18 briggs Exp $ */
+/* $NetBSD: z8530reg.h,v 1.3 1996/05/18 18:54:23 briggs Exp $ */
/*
* Copyright (c) 1992, 1993
@@ -64,38 +64,26 @@
* differently for the two channels. We can, however, ignore this much
* of the time.
*/
-#ifndef LOCORE
+
+/*
+ * This file also includes flags for the Z85C30 and Z85230 enhanced scc.
+ * The CMOS 8530 includes extra SDLC functionality, and is used in a
+ * number of Macs (often in the Z85C80, an 85C30 combined w/ a SCSI
+ * controller). -wrs
+ */
+#if 0 /* Example only! */
+/*
+ * The layout of this structure is hardware-dependent!
+ * Define these in some machine-dependent place.
+ */
struct zschan {
-#if (BYTE_ORDER == BIG_ENDIAN) && !defined(atari)
-#ifndef mac68k
- volatile u_char zc_csr; /* ctrl,status, and indirect access */
- u_char zc_xxx0;
- volatile u_char zc_data; /* data */
- u_char zc_xxx1;
-#else
- volatile u_char zc_csr; /* ctrl,status, and indirect access */
- u_char zc_xxx0;
- u_char zc_xxx1;
- u_char zc_xxx2;
- volatile u_char zc_data; /* data */
- u_char zc_xxx3;
- u_char zc_xxx4;
- u_char zc_xxx5;
-#endif
-#else
- u_char zc_xxx0;
- volatile u_char zc_csr; /* ctrl,status, and indirect access */
- u_char zc_xxx1;
- volatile u_char zc_data; /* data */
-#endif
+ volatile u_char zc_csr; /* ctrl, status, or reg. number */
+ volatile u_char zc_data; /* data or numbered register */
};
-
-typedef struct zschan zschan;
-
struct zsdevice {
struct zschan zs_chan[2];
};
-#endif
+#endif /* Example only! */
/*
* Some of the names in this files were chosen to make the hsis driver
@@ -119,8 +107,15 @@ struct zsdevice {
*/
#define ZSRR_IVEC 2 /* interrupt vector (channel 0) */
#define ZSRR_IPEND 3 /* interrupt pending (ch. 0 only) */
+#define ZSRR_TXSYNC 6 /* sync transmit char (monosync mode) */
+#define ZSRR_RXSYNC 7 /* sync receive char (monosync mode) */
+#define ZSRR_SYNCLO 6 /* sync low byte (bisync mode) */
+#define ZSRR_SYNCHI 7 /* sync high byte (bisync mode) */
+#define ZSRR_SDLC_ADDR 6 /* SDLC address (SDLC mode) */
+#define ZSRR_SDLC_FLAG 7 /* SDLC flag 0x7E (SDLC mode) */
#define ZSRR_BAUDLO 12 /* baud rate generator (low half) */
#define ZSRR_BAUDHI 13 /* baud rate generator (high half) */
+#define ZSRR_ENHANCED 14 /* read address of WR7' - yes, it's not 7!*/
#define ZSWR_IVEC 2 /* interrupt vector (shared) */
#define ZSWR_TXSYNC 6 /* sync transmit char (monosync mode) */
@@ -131,6 +126,7 @@ struct zsdevice {
#define ZSWR_SDLC_FLAG 7 /* SDLC flag 0x7E (SDLC mode) */
#define ZSWR_BAUDLO 12 /* baud rate generator (low half) */
#define ZSWR_BAUDHI 13 /* baud rate generator (high half) */
+#define ZSWR_ENHANCED 7 /* write address of WR7' */
/*
* Registers 0 through 7 may be written with any one of the 8 command
@@ -260,6 +256,21 @@ struct zsdevice {
#endif
/*
+ * Bits in Write Register 7' (ZSWR_ENHANCED above). This register is
+ * only available on the 85230. Dispite the fact it contains flags
+ * and not a single value, the register was named as it is read
+ * via RR14. Weird.
+ */
+ /* 0x80 unused */
+#define ZSWR7P_EXTEND_READ 0x40 /* modify read map; make most regs readable */
+#define ZSWR7P_TX_FIFO 0x20 /* change level for Tx FIFO empty int */
+#define ZSWR7P_DTR_TIME 0x10 /* modifies deact. speed of /DTR//REQ */
+#define ZSWR7P_RX_FIFO 0x08 /* Rx FIFO int on 1/2 full? */
+#define ZSWR7P_RTS_DEACT 0x04 /* automatically deassert RTS */
+#define ZSWR7P_AUTO_EOM_RESET 0x02 /* automatically reset EMO/Tx Underrun */
+#define ZSWR7P_AUTO_TX_FLAG 0x01 /* Auto send SDLC flag at transmit start */
+
+/*
* Bits in Write Register 9 (`Master Interrupt Control'). Bits 7 & 6
* are taken as a unit and indicate the type of reset; 00 means no reset
* (and is not defined here).
@@ -267,7 +278,7 @@ struct zsdevice {
#define ZSWR9_HARD_RESET 0xc0 /* force hardware reset */
#define ZSWR9_A_RESET 0x80 /* reset channel A (0) */
#define ZSWR9_B_RESET 0x40 /* reset channel B (1) */
- /* 0x20 unused */
+#define ZSWR9_SOFT_INTAC 0x20 /* Not in NMOS version */
#define ZSWR9_STATUS_HIGH 0x10 /* status in high bits of intr vec */
#define ZSWR9_MASTER_IE 0x08 /* master interrupt enable */
@@ -300,13 +311,13 @@ struct zsdevice {
*/
#define ZSWR11_XTAL 0x80 /* have xtal between RTxC* and SYNC* */
/* (else have TTL oscil. on RTxC*) */
-#define ZSWR11_RXCLK_RTXC 0x00 /* recv clock taken from TRxC* pin */
+#define ZSWR11_RXCLK_RTXC 0x00 /* recv clock taken from RTxC* pin */
#define ZSWR11_RXCLK_TRXC 0x20 /* recv clock taken from TRxC* pin */
#define ZSWR11_RXCLK_BAUD 0x40 /* recv clock taken from BRG */
#define ZSWR11_RXCLK_DPLL 0x60 /* recv clock taken from DPLL */
-#define ZSWR11_TXCLK_RTXC 0x00 /* xmit clock taken from TRxC* pin */
-#define ZSWR11_TXCLK_TRXC 0x08 /* xmit clock taken from RTxC* pin */
+#define ZSWR11_TXCLK_RTXC 0x00 /* xmit clock taken from RTxC* pin */
+#define ZSWR11_TXCLK_TRXC 0x08 /* xmit clock taken from TRxC* pin */
#define ZSWR11_TXCLK_BAUD 0x10 /* xmit clock taken from BRG */
#define ZSWR11_TXCLK_DPLL 0x18 /* xmit clock taken from DPLL */
@@ -367,15 +378,19 @@ struct zsdevice {
* Bits in Write Register 15 (`External/Status Interrupt Control').
* Most of these cause status interrupts whenever the corresponding
* bit or pin changes state (i.e., any rising or falling edge).
+ *
+ * NOTE: ZSWR15_SDLC_FIFO & ZSWR15_ENABLE_ENHANCED should not be
+ * set on an NMOS 8530. Also, ZSWR15_ENABLE_ENHANCED is only
+ * available on the 85230.
*/
#define ZSWR15_BREAK_IE 0x80 /* enable break/abort status int */
#define ZSWR15_TXUEOM_IE 0x40 /* enable TX underrun/EOM status int */
#define ZSWR15_CTS_IE 0x20 /* enable CTS* pin status int */
#define ZSWR15_SYNCHUNT_IE 0x10 /* enable SYNC* pin/hunt status int */
#define ZSWR15_DCD_IE 0x08 /* enable DCD* pin status int */
- /* 0x04 unused, must be zero */
+#define ZSWR15_SDLC_FIFO 0x04 /* enable SDLC FIFO enhancements */
#define ZSWR15_ZERO_COUNT_IE 0x02 /* enable BRG-counter = 0 status int */
- /* 0x01 unused, must be zero */
+#define ZSWR15_ENABLE_ENHANCED 0x01 /* enable writing WR7' at reg 7 */
/*
* Bits in Read Register 0 (`Transmit/Receive Buffer Status and External
diff --git a/sys/arch/mac68k/include/adbsys.h b/sys/arch/mac68k/include/adbsys.h
index ecb9a549e62..31fde4f235c 100644
--- a/sys/arch/mac68k/include/adbsys.h
+++ b/sys/arch/mac68k/include/adbsys.h
@@ -1,4 +1,4 @@
-/* $NetBSD: adbsys.h,v 1.3 1994/12/03 23:34:28 briggs Exp $ */
+/* $NetBSD: adbsys.h,v 1.5 1996/05/05 14:34:07 briggs Exp $ */
/*-
* Copyright (C) 1993, 1994 Allen K. Briggs, Chris P. Caputo,
@@ -33,6 +33,8 @@
* OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*/
+#ifndef _ADBSYS_MACHINE_
+#define _ADBSYS_MACHINE_
#include <sys/time.h> /* timeval stuff */
#include <sys/ioctl.h> /* ioctls */
@@ -92,8 +94,11 @@ typedef struct adb_dev_s{
/* Interesting handler IDs */
#define ADB_STDKBD 1
#define ADB_EXTKBD 2
+#define ADB_PBKBD 12
#define ADBMS_100DPI 1
#define ADBMS_200DPI 2
+#define ADBMS_EXTENDED 4
+#define ADBMS_USPEED 47 /* MicroSpeed mouse */
/* Get device info from ADB system */
@@ -124,3 +129,7 @@ typedef struct adb_listencmd_s{
u_char bytes[8]; /* bytes */
} adb_listencmd_t;
#define ADBIOC_LISTENCMD _IOW('A', 133, adb_listencmd_t)
+
+void adb_init __P((void));
+
+#endif /* _ADBSYS_MACHINE_ */
diff --git a/sys/arch/mac68k/include/autoconf.h b/sys/arch/mac68k/include/autoconf.h
new file mode 100644
index 00000000000..fe2321c7889
--- /dev/null
+++ b/sys/arch/mac68k/include/autoconf.h
@@ -0,0 +1,84 @@
+/* $NetBSD: autoconf.h,v 1.2 1996/05/18 18:52:48 briggs Exp $ */
+
+/*
+ * Copyright (c) 1994 Gordon W. Ross
+ * Copyright (c) 1993 Adam Glass
+ * 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. All advertising materials mentioning features or use of this software
+ * must display the following acknowledgement:
+ * This product includes software developed by Adam Glass.
+ * 4. 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 Adam Glass ``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 REGENTS 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.
+ */
+
+#include <sys/device.h>
+
+/*
+ * Autoconfiguration information.
+ * From sun3 port--adapted for mac68k platform by Allen Briggs.
+ */
+
+/* These are the "bus" types: */
+#define BUS_OBIO 0 /* On-board I/O */
+#define BUS_NUBUS 1 /* "nubus" */
+
+/*
+ * This is the "args" parameter to the bus match/attach functions.
+ */
+struct confargs {
+ int ca_bustype; /* BUS_INTERNAL0, ... */
+ int slot;
+};
+
+/* autoconf.c */
+void setconf __P((void));
+int bus_scan __P((struct device *, void *, void *));
+int bus_print __P((void *, char *));
+int bus_peek __P((int, vm_offset_t, int));
+char *bus_mapin __P((int, int, int));
+void configure __P((void));
+
+/* machdep.c */
+void mac68k_set_io_offsets __P((vm_offset_t));
+void dumpconf __P((void));
+int badbaddr __P((register caddr_t addr));
+int badwaddr __P((register caddr_t addr));
+int badladdr __P((register caddr_t addr));
+
+int mac68k_name_match __P((struct device *, void *, void *));
+
+/* clock.h */
+
+void enablertclock __P((void));
+void cpu_initclocks __P((void));
+void setstatclockrate __P((int));
+void disablertclock __P((void));
+u_long clkread __P((void));
+void inittodr __P((time_t));
+void resettodr __P((void));
+void mac68k_calibrate_delay __P((void));
+void startrtclock __P((void));
+
+/* macrom.c */
+void mrg_init __P((void));
diff --git a/sys/arch/mac68k/include/cdefs.h b/sys/arch/mac68k/include/cdefs.h
index e9324975a62..9ff33796cfd 100644
--- a/sys/arch/mac68k/include/cdefs.h
+++ b/sys/arch/mac68k/include/cdefs.h
@@ -1,8 +1,8 @@
-/* $NetBSD: cdefs.h,v 1.1 1995/01/19 01:42:13 jtc Exp $ */
+/* $NetBSD: cdefs.h,v 1.2 1996/05/05 06:17:34 briggs Exp $ */
-#ifndef _MACHINE_CDEFS_H_
-#define _MACHINE_CDEFS_H_
+#ifndef _CDEFS_MACHINE_
+#define _CDEFS_MACHINE_
#include <m68k/cdefs.h>
-#endif
+#endif /* _CDEFS_MACHINE_ */
diff --git a/sys/arch/mac68k/include/cpu.h b/sys/arch/mac68k/include/cpu.h
index 6380aa61150..f0498c54ffa 100644
--- a/sys/arch/mac68k/include/cpu.h
+++ b/sys/arch/mac68k/include/cpu.h
@@ -1,4 +1,4 @@
-/* $NetBSD: cpu.h,v 1.26 1995/12/21 05:02:01 mycroft Exp $ */
+/* $NetBSD: cpu.h,v 1.36 1996/05/25 14:48:38 briggs Exp $ */
/*
* Copyright (c) 1988 University of Utah.
@@ -69,8 +69,10 @@
but there isn't time to do anything about that right now...
*/
-#ifndef _MACHINE_CPU_H_
-#define _MACHINE_CPU_H_ 1
+#ifndef _CPU_MACHINE_
+#define _CPU_MACHINE_
+
+#include <machine/pcb.h>
/*
* definitions of cpu-dependent requirements
@@ -79,6 +81,7 @@
#define cpu_swapin(p) /* nothing */
#define cpu_wait(p) /* nothing */
#define cpu_swapout(p) /* nothing */
+void cpu_set_kpc __P((struct proc *, void (*)(struct proc *)));
/*
* Arguments to hardclock, softclock and gatherstats
@@ -205,8 +208,10 @@ extern unsigned char ssir;
#define MACH_CLASSIIvx 0x0006 /* Similar to IIsi -- different via2 emul? */
#define MACH_CLASSLC 0x0007 /* Low-Cost/Performa/Wal-Mart Macs. */
#define MACH_CLASSPB 0x0008 /* Powerbooks. Power management. */
+#define MACH_CLASSDUO 0x0009 /* Powerbooks Duos. More integration/Docks. */
#define MACH_CLASSIIfx 0x0080 /* The IIfx is in a class by itself. */
-#define MACH_CLASSQ 0x0100 /* Centris/Quadras. */
+#define MACH_CLASSQ 0x0100 /* non-A/V Centris/Quadras. */
+#define MACH_CLASSAV 0x0101 /* A/V Centris/Quadras. */
#define MACH_68020 0
#define MACH_68030 1
@@ -267,13 +272,9 @@ extern unsigned long load_addr;
/* physical memory sections */
#define ROMBASE (0x40800000)
-#define ROMLEN (0x00100000) /* 1MB should be enough! */
-#define ROMMAPSIZE btoc(ROMLEN) /* 1k of page tables. */
-
-/* This should not be used. Use IOBase, instead. */
-#define INTIOBASE (0x50F00000)
+#define ROMLEN (0x00200000) /* 2MB should be enough! */
+#define ROMMAPSIZE btoc(ROMLEN) /* 32k of page tables. */
-#define INTIOTOP (IOBase+0x00100000)
#define IIOMAPSIZE btoc(0x00100000)
/* XXX -- Need to do something about superspace.
@@ -350,4 +351,31 @@ extern unsigned long load_addr;
#define CACHE4_ON (IC4_ENABLE|DC4_ENABLE)
#define CACHE4_OFF 0x00000000
-#endif /* !_MACHINE_CPU_H_ */
+__BEGIN_DECLS
+/* machdep.c */
+u_int get_mapping __P((void));
+
+/* locore.s */
+void m68881_restore __P((struct fpframe *));
+void m68881_save __P((struct fpframe *));
+u_int getsfc __P((void));
+u_int getdfc __P((void));
+void TBIA __P((void));
+void TBIAS __P((void));
+void TBIS __P((vm_offset_t));
+void DCFP __P((vm_offset_t));
+void ICPP __P((vm_offset_t));
+void DCIU __P((void));
+void ICIA __P((void));
+void DCFL __P((vm_offset_t));
+int suline __P((caddr_t, caddr_t));
+int susword __P((caddr_t, u_int));
+void savectx __P((struct pcb *));
+void proc_trampoline __P((void));
+
+/* trap.c */
+void child_return __P((struct proc *, struct frame));
+
+__END_DECLS
+
+#endif /* _CPU_MACHINE_ */
diff --git a/sys/arch/mac68k/include/disklabel.h b/sys/arch/mac68k/include/disklabel.h
index 7445c16608b..1ca0509a6e6 100644
--- a/sys/arch/mac68k/include/disklabel.h
+++ b/sys/arch/mac68k/include/disklabel.h
@@ -1,4 +1,4 @@
-/* $NetBSD: disklabel.h,v 1.1 1994/10/14 18:27:05 cgd Exp $ */
+/* $NetBSD: disklabel.h,v 1.2 1996/05/05 06:17:38 briggs Exp $ */
/*
* Copyright (c) 1994 Christopher G. Demetriou
@@ -30,8 +30,8 @@
* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*/
-#ifndef _MACHINE_DISKLABEL_H_
-#define _MACHINE_DISKLABEL_H_
+#ifndef _DISKLABEL_MACHINE_
+#define _DISKLABEL_MACHINE_
#define LABELSECTOR 0 /* sector containing label */
#define LABELOFFSET 64 /* offset of label in sector */
@@ -43,4 +43,4 @@ struct cpu_disklabel {
int cd_dummy; /* must have one element. */
};
-#endif /* _MACHINE_DISKLABEL_H_ */
+#endif /* _DISKLABEL_MACHINE_ */
diff --git a/sys/arch/mac68k/include/exec.h b/sys/arch/mac68k/include/exec.h
index 891056552e6..e27c767bfbb 100644
--- a/sys/arch/mac68k/include/exec.h
+++ b/sys/arch/mac68k/include/exec.h
@@ -1,4 +1,4 @@
-/* $NetBSD: exec.h,v 1.7 1994/10/26 08:46:29 cgd Exp $ */
+/* $NetBSD: exec.h,v 1.8 1996/05/05 06:17:40 briggs Exp $ */
/*-
* Copyright (C) 1993 Allen K. Briggs, Chris P. Caputo,
@@ -33,8 +33,8 @@
* OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*
*/
-#ifndef _MACHINE_EXEC_H
-#define _MACHINE_EXEC_H
+#ifndef _EXEC_MACHINE_
+#define _EXEC_MACHINE_
#define __LDPGSZ 8192
@@ -54,4 +54,4 @@ struct relocation_info_mac68k {
};
#define relocation_info relocation_info_mac68k
-#endif
+#endif /* _EXEC_MACHINE_ */
diff --git a/sys/arch/mac68k/include/float.h b/sys/arch/mac68k/include/float.h
index b5dce5122e3..e01c84548b3 100644
--- a/sys/arch/mac68k/include/float.h
+++ b/sys/arch/mac68k/include/float.h
@@ -1,8 +1,8 @@
-/* $NetBSD: float.h,v 1.5 1995/06/20 20:45:44 jtc Exp $ */
+/* $NetBSD: float.h,v 1.6 1996/05/05 06:17:44 briggs Exp $ */
-#ifndef _MACHINE_FLOAT_H_
-#define _MACHINE_FLOAT_H_
+#ifndef _FLOAT_MACHINE_
+#define _FLOAT_MACHINE_
#include <m68k/float.h>
-#endif
+#endif /* _FLOAT_MACHINE */
diff --git a/sys/arch/mac68k/include/frame.h b/sys/arch/mac68k/include/frame.h
index 97a43ec5b9c..1f5d8e671b0 100644
--- a/sys/arch/mac68k/include/frame.h
+++ b/sys/arch/mac68k/include/frame.h
@@ -1,3 +1,8 @@
-/* $NetBSD: frame.h,v 1.4 1994/10/26 08:46:31 cgd Exp $ */
+/* $NetBSD: frame.h,v 1.5 1996/05/05 06:17:46 briggs Exp $ */
+
+#ifndef _FRAME_MACHINE_
+#define _FRAME_MACHINE_
#include <m68k/frame.h>
+
+#endif /* _FRAME_MACHINE_ */
diff --git a/sys/arch/mac68k/include/keyboard.h b/sys/arch/mac68k/include/keyboard.h
index 3b65fd1bc47..c7519c50ce5 100644
--- a/sys/arch/mac68k/include/keyboard.h
+++ b/sys/arch/mac68k/include/keyboard.h
@@ -1,4 +1,4 @@
-/* $NetBSD: keyboard.h,v 1.4 1994/12/03 23:34:32 briggs Exp $ */
+/* $NetBSD: keyboard.h,v 1.5 1996/02/23 05:43:48 scottr Exp $ */
/*-
* Copyright (C) 1993 Allen K. Briggs, Chris P. Caputo,
@@ -98,12 +98,12 @@ unsigned char keyboard[128][3] = {
{ /* 0x13, */ '2', '@', 0x00 },
{ /* 0x14, */ '3', '#', 0x00 },
{ /* 0x15, */ '4', '$', 0x00 },
- { /* 0x16, */ '6', '^', 0x00 },
+ { /* 0x16, */ '6', '^', 0x1E },
{ /* 0x17, */ '5', '%', 0x00 },
{ /* 0x18, */ '=', '+', 0x00 },
{ /* 0x19, */ '9', '(', 0x00 },
{ /* 0x1A, */ '7', '&', 0x00 },
- { /* 0x1B, */ '-', '_', 0x00 },
+ { /* 0x1B, */ '-', '_', 0x1F },
{ /* 0x1C, */ '8', '*', 0x00 },
{ /* 0x1D, */ '0', ')', 0x00 },
{ /* 0x1E, */ ']', '}', 0x1D },
diff --git a/sys/arch/mac68k/include/param.h b/sys/arch/mac68k/include/param.h
index 021eb051798..08c045e1e4b 100644
--- a/sys/arch/mac68k/include/param.h
+++ b/sys/arch/mac68k/include/param.h
@@ -1,4 +1,4 @@
-/* $NetBSD: param.h,v 1.24 1996/02/17 14:50:40 briggs Exp $ */
+/* $NetBSD: param.h,v 1.26 1996/05/05 06:17:49 briggs Exp $ */
/*
* Copyright (c) 1988 University of Utah.
@@ -76,8 +76,8 @@
* @(#)param.h 7.8 (Berkeley) 6/28/91
*/
-#ifndef _MACHINE_PARAM_H_
-#define _MACHINE_PARAM_H_ 1
+#ifndef _PARAM_MACHINE_
+#define _PARAM_MACHINE_
#ifndef PSL_IPL
#include <machine/psl.h>
@@ -86,7 +86,9 @@
/*
* Machine dependent constants for Macintosh II-and-similar series.
*/
+#define _MACHINE mac68k
#define MACHINE "mac68k"
+#define _MACHINE_ARCH m68k
#define MACHINE_ARCH "m68k"
#define MID_MACHINE MID_M68K
@@ -186,4 +188,4 @@ void delay __P((unsigned));
#define DELAY(ms) delay(ms)
#endif /* _KERNEL && !_LOCORE */
-#endif /* _MACHINE_PARAM_H_ */
+#endif /* _PARAM_MACHINE_ */
diff --git a/sys/arch/mac68k/include/pcb.h b/sys/arch/mac68k/include/pcb.h
index 4c8614cff05..f7225fff6a7 100644
--- a/sys/arch/mac68k/include/pcb.h
+++ b/sys/arch/mac68k/include/pcb.h
@@ -1,4 +1,4 @@
-/* $NetBSD: pcb.h,v 1.6 1995/06/21 03:10:44 briggs Exp $ */
+/* $NetBSD: pcb.h,v 1.7 1996/05/05 06:17:51 briggs Exp $ */
/*
* Copyright (c) 1988 University of Utah.
@@ -75,6 +75,8 @@
*
* @(#)pcb.h 7.4 (Berkeley) 5/4/91
*/
+#ifndef _PCB_MACHINE_
+#define _PCB_MACHINE_
#include <machine/frame.h>
@@ -103,3 +105,5 @@ struct pcb
struct md_coredump {
int md_exec[16]; /* Exec structure for HP-UX (sic) core dumps */
};
+
+#endif
diff --git a/sys/arch/mac68k/include/pmap.h b/sys/arch/mac68k/include/pmap.h
index df869cc2703..6da3e599cd3 100644
--- a/sys/arch/mac68k/include/pmap.h
+++ b/sys/arch/mac68k/include/pmap.h
@@ -1,4 +1,4 @@
-/* $NetBSD: pmap.h,v 1.11 1995/06/24 16:18:50 briggs Exp $ */
+/* $NetBSD: pmap.h,v 1.13 1996/05/18 18:52:41 briggs Exp $ */
/*
* Copyright (c) 1987 Carnegie-Mellon University
@@ -77,6 +77,7 @@
#ifndef _PMAP_MACHINE_
#define _PMAP_MACHINE_
+#include <machine/pcb.h>
#include <machine/pte.h>
#if defined(M68040)
@@ -185,6 +186,33 @@ extern struct pv_entry *pv_table; /* array of entries, one per page */
extern pt_entry_t *Sysmap;
extern char *vmmap; /* map for mem, dumps, etc. */
+
+__BEGIN_DECLS
+/* pmap.c */
+void mac68k_set_pte __P((vm_offset_t va, vm_offset_t pge));
+void pmap_remove_mapping __P((pmap_t, vm_offset_t, pt_entry_t *, int));
+boolean_t pmap_testbit __P((vm_offset_t, int));
+void pmap_changebit __P((vm_offset_t, int, boolean_t));
+void pmap_enter_ptpage __P((pmap_t, vm_offset_t));
+void pmap_pvdump __P((vm_offset_t));
+void pmap_check_wiring __P((char *, vm_offset_t));
+void pmap_collect_pv __P((void));
+void pmap_activate __P((register pmap_t, struct pcb *));
+void pmap_deactivate __P((register pmap_t, struct pcb *));
+
+/* pmap_bootstrap.c */
+void pmap_bootstrap __P((vm_offset_t, register vm_offset_t));
+void bootstrap_mac68k __P((int));
+
+/* locore.s */
+void loadustp __P((vm_offset_t));
+void TBIA __P((void));
+void TBIS __P((vm_offset_t));
+void DCFP __P((vm_offset_t));
+void ICPP __P((vm_offset_t));
+void copypage __P((caddr_t, caddr_t));
+__END_DECLS
+
#endif /* _KERNEL */
-#endif _PMAP_MACHINE_
+#endif /* _PMAP_MACHINE_ */
diff --git a/sys/arch/mac68k/include/profile.h b/sys/arch/mac68k/include/profile.h
index 2f7fc94a260..7053b6a1297 100644
--- a/sys/arch/mac68k/include/profile.h
+++ b/sys/arch/mac68k/include/profile.h
@@ -1,8 +1,8 @@
-/* $NetBSD: profile.h,v 1.2 1994/10/26 08:46:41 cgd Exp $ */
+/* $NetBSD: profile.h,v 1.3 1996/05/05 06:17:55 briggs Exp $ */
-#ifndef _MACHINE_PROFILE_H_
-#define _MACHINE_PROFILE_H_
+#ifndef _PROFILE_MACHINE_
+#define _PROFILE_MACHINE_
#include <m68k/profile.h>
-#endif
+#endif _PROFILE_MACHINE_
diff --git a/sys/arch/mac68k/include/psl.h b/sys/arch/mac68k/include/psl.h
index a2bb48afb9e..d5c0eb41f50 100644
--- a/sys/arch/mac68k/include/psl.h
+++ b/sys/arch/mac68k/include/psl.h
@@ -1,4 +1,4 @@
-/* $NetBSD: psl.h,v 1.5 1996/02/17 14:50:42 briggs Exp $ */
+/* $NetBSD: psl.h,v 1.9 1996/05/19 04:30:32 briggs Exp $ */
#ifndef PSL_C
#include <m68k/psl.h>
@@ -26,29 +26,32 @@
#define spl6() _spl(PSL_S|PSL_IPL6)
#define spl7() _spl(PSL_S|PSL_IPL7)
-/* These should be used for:
- 1) ensuring mutual exclusion (why use processor level?)
- 2) allowing faster devices to take priority
-
- Note that on the mac, most things are masked at spl1, almost
- everything at spl2, and everything but the panic switch and
- power at spl4.
+/*
+ * These should be used for:
+ * 1) ensuring mutual exclusion (why use processor level?)
+ * 2) allowing faster devices to take priority
+ *
+ * Note that on the Mac, most things are masked at spl1, almost
+ * everything at spl2, and everything but the panic switch and
+ * power at spl4.
*/
-#define splsoftclock() spl1() /* disallow softclock */
-#define splsoftnet() spl1() /* disallow network */
-#define splclock() spl1() /* disallow clock interrupt */
-#define spltty() spl1() /* disallow tty (softserial&adb) interrupts */
-#define splbio() spl2() /* disallow block I/O */
-#define splnet() spl2() /* disallow network */
-#define splimp() spl2() /* disallow imput */
-#define splhigh() spl7() /* disallow everything */
-#define splsched() spl7() /* disallow scheduling */
-
-#define splstatclock() spl2() /* This should be splclock... */
+#define splsoftclock() spl1() /* disallow softclock */
+#define splsoftnet() spl1() /* disallow network */
+#define spltty() spl1() /* disallow tty (softserial & ADB) */
+#define splbio() spl2() /* disallow block I/O */
+#define splnet() spl2() /* disallow network */
+#define splimp() spl2() /* disallow goblins and other nonsense */
+#define splclock() spl2() /* disallow clock (and other) interrupts */
+#define splstatclock() spl2() /* ditto */
+#define splzs() spl4() /* disallow serial hw interrupts */
+#define splhigh() spl7() /* disallow everything */
+#define splsched() spl7() /* disallow scheduling */
/* watch out for side effects */
#define splx(s) ((s) & PSL_IPL ? _spl(s) : spl0())
+int spl0 __P((void));
+
#endif /* _KERNEL && !_LOCORE */
#endif /* ndef PSL_C */
diff --git a/sys/arch/mac68k/include/pte.h b/sys/arch/mac68k/include/pte.h
index a496e389521..e9c94228d47 100644
--- a/sys/arch/mac68k/include/pte.h
+++ b/sys/arch/mac68k/include/pte.h
@@ -1,4 +1,4 @@
-/* $NetBSD: pte.h,v 1.8 1995/06/21 03:14:11 briggs Exp $ */
+/* $NetBSD: pte.h,v 1.9 1996/05/05 06:17:58 briggs Exp $ */
/*
* Copyright (c) 1988 University of Utah.
@@ -76,8 +76,8 @@
* @(#)pte.h 7.3 (Berkeley) 5/8/91
*/
-#ifndef _MACHINE_PTE_H_
-#define _MACHINE_PTE_H_ 1
+#ifndef _PTE_MACHINE_
+#define _PTE_MACHINE_
/*
* Mac hardware segment/page table entries
@@ -152,4 +152,4 @@ typedef int pt_entry_t; /* Mach page table entry */
#define kvtophys(va) \
((kvtopte(va)->pg_pfnum << PGSHIFT) | ((int)(va) & PGOFSET))
-#endif /* _MACHINE_PTE_H_ */
+#endif /* _PTE_MACHINE_ */
diff --git a/sys/arch/mac68k/include/reg.h b/sys/arch/mac68k/include/reg.h
index dd2eb83b9c8..332cbe6c779 100644
--- a/sys/arch/mac68k/include/reg.h
+++ b/sys/arch/mac68k/include/reg.h
@@ -1,8 +1,14 @@
-/* $NetBSD: reg.h,v 1.9 1994/10/26 08:46:44 cgd Exp $ */
+/* $NetBSD: reg.h,v 1.10 1996/05/05 06:18:00 briggs Exp $ */
-#ifndef _MACHINE_REG_H_
-#define _MACHINE_REG_H_
+#ifndef _REG_MACHINE_
+#define _REG_MACHINE_
+#include <machine/frame.h>
#include <m68k/reg.h>
-#endif /* _MACHINE_REG_H_ */
+__BEGIN_DECLS
+/* machdep.c */
+void regdump __P((struct frame *, int));
+__END_DECLS
+
+#endif /* _REG_MACHINE_ */
diff --git a/sys/arch/mac68k/include/scsi96reg.h b/sys/arch/mac68k/include/scsi96reg.h
index b9efc1ec8af..823edd01bd5 100644
--- a/sys/arch/mac68k/include/scsi96reg.h
+++ b/sys/arch/mac68k/include/scsi96reg.h
@@ -1,4 +1,4 @@
-/* $NetBSD: scsi96reg.h,v 1.4 1994/10/26 08:46:45 cgd Exp $ */
+/* $NetBSD: scsi96reg.h,v 1.5 1996/05/05 06:18:02 briggs Exp $ */
/*
* Copyright (C) 1994 Allen K. Briggs
@@ -27,8 +27,8 @@
* ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*/
-#ifndef _MACHINE_SCSI96REG_H_
-#define _MACHINE_SCSI96REG_H_
+#ifndef _SCSI96REG_MACHINE_
+#define _SCSI96REG_MACHINE_
typedef volatile unsigned char v_uchar;
@@ -170,4 +170,4 @@ struct ncr53c96regs {
#define NCR96_DALREG 0xF /* Data alignment register. W */
-#endif /* _MACHINE_SCSI96REG_H_ */
+#endif /* _SCSI96REG_MACHINE_ */
diff --git a/sys/arch/mac68k/include/types.h b/sys/arch/mac68k/include/types.h
index 8f42fcea4cc..48d2ed316b3 100644
--- a/sys/arch/mac68k/include/types.h
+++ b/sys/arch/mac68k/include/types.h
@@ -1,8 +1,8 @@
-/* $NetBSD: types.h,v 1.7 1995/07/01 18:47:51 briggs Exp $ */
+/* $NetBSD: types.h,v 1.8 1996/05/05 06:18:05 briggs Exp $ */
-#ifndef _MACHINE_TYPES_H_
-#define _MACHINE_TYPES_H_
+#ifndef _TYPES_MACHINE_
+#define _TYPES_MACHINE_
#include <m68k/types.h>
-#endif
+#endif /* _TYPES_MACHINE_ */
diff --git a/sys/arch/mac68k/mac68k/via.h b/sys/arch/mac68k/include/viareg.h
index b6b63aa9add..8c9cbe22813 100644
--- a/sys/arch/mac68k/mac68k/via.h
+++ b/sys/arch/mac68k/include/viareg.h
@@ -1,4 +1,4 @@
-/* $NetBSD: via.h,v 1.15 1996/02/03 22:50:22 briggs Exp $ */
+/* $NetBSD: viareg.h,v 1.3 1996/05/05 06:18:07 briggs Exp $ */
/*-
* Copyright (C) 1993 Allen K. Briggs, Chris P. Caputo,
@@ -68,6 +68,7 @@
/* VIA2 data register A */
#define DA2O_v2Ram1 0x80
#define DA2O_v2Ram0 0x40
+#define DA2I_v2IRQ0 0x40
#define DA2I_v2IRQE 0x20
#define DA2I_v2IRQD 0x10
#define DA2I_v2IRQC 0x08
@@ -156,7 +157,7 @@ extern int VIA2;
#define RBVMonitorMask 0x38 /* Type numbers */
#define RBVOff 0x40 /* monitor turn off */
#define RBVMonIDNone 0x38 /* What RBV actually has for no video */
-#define RBVMonIDOff 0x0 /* What rbv_vidstatus() returns for no video */
+#define RBVMonIDOff 0x0 /* What rbv_vidstatus() returns for no video */
#define RBVMonID15BWP 0x08 /* BW portrait */
#define RBVMonIDRGB 0x10 /* color monitor */
#define RBVMonIDRGB15 0x28 /* 15 inch RGB */
@@ -164,20 +165,17 @@ extern int VIA2;
#define via_reg(v, r) (*(Via1Base+(v)*0x2000+(r)))
#define via2_reg(r) (*(Via2Base+(r)))
-#define via_SR_input(v) (via_reg((v), vACR) &= 0xef)
-#define via_SR_output(v) (via_reg((v), vACR) = ((via_reg((v), vACR) & \
- 0xe3) | 0x1c))
#define vDirA_ADBState 0x30
-void VIA_initialize (void);
-unsigned char VIA_get_SR (long vianum);
-long VIA_set_SR (long vianum, unsigned char data);
-int rbv_vidstatus (void);
-int add_nubus_intr (int addr, void (*func)(), void *client_data);
-void mac68k_register_scsi_irq(void (*irq_func)(void *), void *clnt);
-void mac68k_register_scsi_drq(void (*drq_func)(void *), void *clnt);
-void mac68k_register_via1_t1_irq(void (*irq_func)(void *));
-
-extern void (*via1itab[7])();
-extern void (*via2itab[7])();
+void VIA_initialize __P((void));
+int rbv_vidstatus __P((void));
+void via_shutdown __P((void));
+int add_nubus_intr __P((int, void (*) __P((void *, int)), void *));
+void enable_nubus_intr __P((void));
+void mac68k_register_scsi_irq __P((void (*)(void *), void *clnt));
+void mac68k_register_scsi_drq __P((void (*)(void *), void *clnt));
+void mac68k_register_via1_t1_irq __P((void (*)(void *)));
+
+extern void (*via1itab[7]) __P((void *));
+extern void (*via2itab[7]) __P((void *));
diff --git a/sys/arch/mac68k/include/z8530var.h b/sys/arch/mac68k/include/z8530var.h
new file mode 100644
index 00000000000..b202cc8d0c5
--- /dev/null
+++ b/sys/arch/mac68k/include/z8530var.h
@@ -0,0 +1,106 @@
+/* $NetBSD: z8530var.h,v 1.1 1996/05/18 18:54:45 briggs Exp $ */
+
+/*
+ * Copyright (c) 1994 Gordon W. Ross
+ * Copyright (c) 1992, 1993
+ * The Regents of the University of California. All rights reserved.
+ *
+ * This software was developed by the Computer Systems Engineering group
+ * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and
+ * contributed to Berkeley.
+ *
+ * All advertising materials mentioning features or use of this software
+ * must display the following acknowledgement:
+ * This product includes software developed by the University of
+ * California, Lawrence Berkeley Laboratory.
+ *
+ * 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. All advertising materials mentioning features or use of this software
+ * must display the following acknowledgement:
+ * This product includes software developed by the University of
+ * California, Berkeley and its contributors.
+ * 4. Neither the name of the University nor the names of its contributors
+ * may be used to endorse or promote products derived from this software
+ * without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE REGENTS 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 REGENTS 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.
+ *
+ * @(#)zsvar.h 8.1 (Berkeley) 6/11/93
+ */
+
+#include <arch/mac68k/dev/z8530sc.h>
+#include <arch/mac68k/dev/z8530tty.h>
+
+/*
+ * Functions to read and write individual registers in a channel.
+ * The ZS chip requires a 1.6 uSec. recovery time between accesses,
+ * and the Sun3 hardware does NOT take care of this for you.
+ * MacII hardware DOES dake care of the delay for us. :-)
+ */
+
+u_char zs_read_reg __P((struct zs_chanstate *cs, u_char reg));
+u_char zs_read_csr __P((struct zs_chanstate *cs));
+u_char zs_read_data __P((struct zs_chanstate *cs));
+
+void zs_write_reg __P((struct zs_chanstate *cs, u_char reg, u_char val));
+void zs_write_csr __P((struct zs_chanstate *cs, u_char val));
+void zs_write_data __P((struct zs_chanstate *cs, u_char val));
+
+/*
+ * abort detection on console will now timeout after iterating on a loop
+ * the following # of times. Cheep hack. Also, abort detection is turned
+ * off after a timeout (i.e. maybe there's not a terminal hooked up).
+ */
+#define ZSABORT_DELAY 3000000
+
+/*
+ * How to request a "soft" interrupt.
+ * This could be a macro if you like.
+ */
+void zsc_req_softint __P((struct zsc_softc *zsc));
+
+/* Handle user request to enter kernel debugger. */
+void zs_abort __P((struct zstty_softc *zst));
+
+/* Hook for MD ioctl support */
+int zsmdioctl __P((struct tty *tp, u_long com, caddr_t data, int flag,
+ struct proc *p));
+
+/* Clean up at end of tty attach */
+void zstty_mdattach __P((struct zsc_softc *zsc, struct zstty_softc *zst,
+ struct zs_chanstate *cs, struct tty *tp));
+
+/* Callback for "external" clock sources */
+void zsmd_setclock __P((struct zs_chanstate *cs));
+
+/*
+ * Some warts needed by z8530tty.c -
+ */
+#define ZSTTY_MAJOR 12 /* XXX */
+#undef ZSTTY_DEF_CFLAG
+#define ZSTTY_DEF_CFLAG (CREAD | CS8 | HUPCL)
+
+#define ZSTTY_RAW_CFLAG (CS8 | CREAD | HUPCL )
+#define ZSTTY_RAW_IFLAG (IXANY | IMAXBEL)
+#define ZSTTY_RAW_LFLAG (ECHOE|ECHOKE|ECHOCTL)
+#define ZSTTY_RAW_OFLAG (ONLCR | OXTABS)
+/* Above taken from looking at a tty after a stty raw */
+
+#define zsprintf printf
diff --git a/sys/arch/mac68k/mac68k/autoconf.c b/sys/arch/mac68k/mac68k/autoconf.c
index 57307883091..ef6eec9ded8 100644
--- a/sys/arch/mac68k/mac68k/autoconf.c
+++ b/sys/arch/mac68k/mac68k/autoconf.c
@@ -1,4 +1,4 @@
-/* $NetBSD: autoconf.c,v 1.21 1996/01/07 22:02:39 thorpej Exp $ */
+/* $NetBSD: autoconf.c,v 1.29 1996/05/15 02:51:00 briggs Exp $ */
/*
* Copyright (c) 1988 University of Utah.
@@ -104,10 +104,17 @@
#include <sys/disklabel.h>
#include <sys/disk.h>
+#include <vm/vm.h>
+#include <vm/vm_kern.h>
+#include <vm/vm_map.h>
+
+#include <machine/adbsys.h>
+#include <machine/autoconf.h>
#include <machine/vmparam.h>
#include <machine/param.h>
#include <machine/cpu.h>
#include <machine/pte.h>
+#include <machine/viareg.h>
#include <scsi/scsi_all.h>
#include <scsi/scsiconf.h>
@@ -123,22 +130,28 @@ int cold; /* if 1 (locore.s), still working on cold-start */
int acdebug = 0;
#endif
+static void findbootdev __P((void));
+static int mainbus_match __P((struct device *, void *, void *));
+static void mainbus_attach __P((struct device *parent,
+ struct device *self, void *aux));
+static void setroot __P((void));
+static void swapconf __P((void));
+
/*
* Determine mass storage and memory configuration for a machine.
*/
-configure()
+void
+configure(void)
{
- int found;
-
VIA_initialize();
mrg_init(); /* Init Mac ROM Glue */
+ startrtclock(); /* start before adb_init() */
+
adb_init(); /* ADB device subsystem & driver */
- startrtclock();
-
- if (config_rootfound("mainbus", "mainbus") == 0)
+ if (config_rootfound("mainbus", "mainbus") == NULL)
panic("No main device!");
#if GENERIC
@@ -161,10 +174,11 @@ configure()
/*
* Configure swap space and related parameters.
*/
-swapconf()
+static void
+swapconf(void)
{
register struct swdevt *swp;
- register int nblks, tblks;
+ register int nblks;
for (swp = swdevt; swp->sw_dev != NODEV ; swp++) {
int maj = major(swp->sw_dev);
@@ -195,23 +209,22 @@ struct device *bootdv = NULL;
static int
target_to_unit(u_long bus, u_long target, u_long lun)
{
- int targ;
struct scsibus_softc *scsi;
struct scsi_link *sc_link;
struct device *sc_dev;
-extern struct cfdriver scsibuscd;
+extern struct cfdriver scsibus_cd;
if (target < 0 || target > 7 || lun < 0 || lun > 7) {
- printf("scsi target to unit, target (%d) or lun (%d)"
+ printf("scsi target to unit, target (%ld) or lun (%ld)"
" out of range.\n", target, lun);
return -1;
}
if (bus == -1) {
- for (bus = 0 ; bus < scsibuscd.cd_ndevs ; bus++) {
- if (scsibuscd.cd_devs[bus]) {
+ for (bus = 0 ; bus < scsibus_cd.cd_ndevs ; bus++) {
+ if (scsibus_cd.cd_devs[bus]) {
scsi = (struct scsibus_softc *)
- scsibuscd.cd_devs[bus];
+ scsibus_cd.cd_devs[bus];
if (scsi->sc_link[target][lun]) {
sc_link = scsi->sc_link[target][lun];
sc_dev = (struct device *)
@@ -222,12 +235,12 @@ extern struct cfdriver scsibuscd;
}
return -1;
}
- if (bus < 0 || bus >= scsibuscd.cd_ndevs) {
- printf("scsi target to unit, bus (%d) out of range.\n", bus);
+ if (bus < 0 || bus >= scsibus_cd.cd_ndevs) {
+ printf("scsi target to unit, bus (%ld) out of range.\n", bus);
return -1;
}
- if (scsibuscd.cd_devs[bus]) {
- scsi = (struct scsibus_softc *) scsibuscd.cd_devs[bus];
+ if (scsibus_cd.cd_devs[bus]) {
+ scsi = (struct scsibus_softc *) scsibus_cd.cd_devs[bus];
if (scsi->sc_link[target][lun]) {
sc_link = scsi->sc_link[target][lun];
sc_dev = (struct device *) sc_link->device_softc;
@@ -254,8 +267,8 @@ findblkmajor(register struct disk *dv)
/*
* Yanked from i386/i386/autoconf.c
*/
-void
-findbootdev()
+static void
+findbootdev(void)
{
register struct device *dv;
register struct disk *diskp;
@@ -275,7 +288,7 @@ findbootdev()
if (disk_count <= 0)
return;
- for (dv = alldevs ; dv ; dv = dv->dv_next) {
+ for (dv = alldevs.tqh_first; dv != NULL; dv = dv->dv_list.tqe_next) {
if ((dv->dv_class == DV_DISK) && (unit == dv->dv_unit)) {
/*
* Find the disk corresponding to the current
@@ -297,11 +310,12 @@ findbootdev()
* If we can do so, and not instructed not to do so,
* change rootdev to correspond to the load device.
*/
-setroot()
+static void
+setroot(void)
{
register struct swdevt *swp;
register int majdev, mindev, part;
- dev_t nrootdev, nswapdev, temp;
+ dev_t nrootdev, temp;
if (boothowto & RB_DFLTROOT)
return;
@@ -311,10 +325,11 @@ setroot()
delay(10000000);
/* panic("ARGH!! No boot device????"); */
}
+ nrootdev = 0;
switch (bootdv->dv_class) {
case DV_DISK:
nrootdev = makedev(B_TYPE(bootdev),
- B_UNIT(bootdev) << UNITSHIFT
+ (B_UNIT(bootdev) << UNITSHIFT)
+ B_PARTITION(bootdev));
break;
default:
@@ -350,86 +365,203 @@ setroot()
dumpdev = swdevt[0].sw_dev;
}
-struct newconf_S {
- char *name;
- int req;
-};
+/*
+ * Generic "bus" support functions. From NetBSD/sun3.
+ *
+ * bus_scan:
+ * This function is passed to config_search() by the attach function
+ * for each of the "bus" drivers (obio, nubus).
+ * The purpose of this function is to copy the "locators" into our
+ * confargs structure, so child drivers may use the confargs both
+ * as match parameters and as temporary storage for the defaulted
+ * locator values determined in the child_match and preserved for
+ * the child_attach function. If the bus attach functions just
+ * used config_found, then we would not have an opportunity to
+ * setup the confargs for each child match and attach call.
+ *
+ * bus_print:
+ * Just prints out the final (non-default) locators.
+ */
+int
+bus_scan(parent, child, aux)
+ struct device *parent;
+ void *child, *aux;
+{
+ struct cfdata *cf = child;
+ struct confargs *ca = aux;
+ cfmatch_t mf;
+
+#ifdef DIAGNOSTIC
+ if (parent->dv_cfdata->cf_driver->cd_indirect)
+ panic("bus_scan: indirect?");
+ if (cf->cf_fstate == FSTATE_STAR)
+ panic("bus_scan: FSTATE_STAR");
+#endif
-static int
-mbprint(aux, name)
- void *aux;
- char *name;
+ /* ca->ca_bustype set by parent */
+
+ /*
+ * Note that this allows the match function to save
+ * defaulted locators in the confargs that will be
+ * preserved for the related attach call.
+ */
+ mf = cf->cf_attach->ca_match;
+ if ((*mf)(parent, cf, ca) > 0) {
+ config_attach(parent, cf, ca, bus_print);
+ }
+ return (0);
+}
+
+/*
+ * From NetBSD/sun3.
+ * Print out the confargs. The parent name is non-NULL
+ * when there was no match found by config_found().
+ */
+int
+bus_print(args, name)
+ void *args;
+ char *name;
{
- struct newconf_S *c = (struct newconf_S *) aux;
+/* struct confargs *ca = args; */
if (name)
- printf("%s at %s", c->name, name);
+ printf("%s:", name);
+
return(UNCONF);
}
-static int
-root_matchbyname(parent, cf, aux)
- struct device *parent;
- struct cfdata *cf;
- void *aux;
+vm_offset_t tmp_vpages[1];
+
+/*
+ * Read addr with size len (1,2,4) into val.
+ * If this generates a bus error, return -1
+ *
+ * Create a temporary mapping,
+ * Try the access using peek_*
+ * Clean up temp. mapping
+ */
+int
+bus_peek(bustype, paddr, sz)
+ int bustype;
+ vm_offset_t paddr;
+ int sz;
{
- return (strcmp(cf->cf_driver->cd_name, (char *)aux) == 0);
+ int off, pte, rv;
+ vm_offset_t pgva;
+ caddr_t va;
+
+ if (bustype != BUS_NUBUS)
+ return -1;
+
+ off = paddr & PGOFSET;
+ paddr -= off;
+ pte = (paddr & PG_FRAME) | (PG_V | PG_W | PG_CI);
+
+ pgva = tmp_vpages[0];
+ va = (caddr_t)pgva + off;
+
+ mac68k_set_pte(pgva, pte);
+ TBIS(pgva);
+
+ /*
+ * OK, try the access using one of the assembly routines
+ * that will set pcb_onfault and catch any bus errors.
+ */
+ rv = -1;
+ switch (sz) {
+ case 1:
+ if (!badbaddr(va))
+ rv = *((u_char *) va);
+ break;
+ case 2:
+ if (!badwaddr(va))
+ rv = *((u_int16_t *) va);
+ break;
+ case 4:
+ if (!badladdr(va))
+ rv = *((u_int32_t *) va);
+ break;
+ default:
+ printf("bus_peek: invalid size=%d\n", sz);
+ rv = -1;
+ }
+
+ mac68k_set_pte(pgva, PG_NV);
+ TBIS(pgva);
+
+ return rv;
}
-extern int
-matchbyname(parent, match, aux)
- struct device *parent;
- void *match;
- void *aux;
+char *
+bus_mapin(bustype, paddr, sz)
+ int bustype, paddr, sz;
{
- struct newconf_S *c = (struct newconf_S *) aux;
- struct device *dv = (struct device *) match;
+ int off, pa, pmt;
+ vm_offset_t va, retval;
+
+ if (bustype != BUS_NUBUS)
+ return (NULL);
+
+ off = paddr & PGOFSET;
+ pa = paddr - off;
+ sz += off;
+ sz = mac68k_round_page(sz);
+
+ /* Get some kernel virtual address space. */
+ va = kmem_alloc_wait(kernel_map, sz);
+ if (va == 0)
+ panic("bus_mapin");
+ retval = va + off;
+
+ /* Map it to the specified bus. */
+#if 0 /* XXX */
+ /* This has a problem with wrap-around... */
+ pmap_map((int)va, pa | pmt, pa + sz, VM_PROT_ALL);
+#else
+ do {
+ pmap_enter(pmap_kernel(), va, pa | pmt, VM_PROT_ALL, FALSE);
+ va += NBPG;
+ pa += NBPG;
+ } while ((sz -= NBPG) > 0);
+#endif
-/* printf("matchbyname: (%s) and (%s).\n", dv->dv_xname, c->name);
-*/
+ return ((char*)retval);
+}
- return (strcmp(dv->dv_xname, c->name) == 0);
+static int
+mainbus_match(parent, match, aux)
+ struct device *parent;
+ void *match, *aux;
+{
+ return 1;
}
+static int bus_order[] = {
+ BUS_OBIO, /* For On-board I/O */
+ BUS_NUBUS
+};
+#define BUS_ORDER_SZ (sizeof(bus_order)/sizeof(bus_order[0]))
+
static void
mainbus_attach(parent, self, aux)
struct device *parent, *self;
void *aux;
{
- struct newconf_S conf_data[] = {
- {"ite0", 1},
- {"adb0", 1},
- {"ser0", 0},
- {"sn0", 0},
- {"nubus0", 1},
- {"sbc0", 0},
- {"ncrscsi0", 0},
- {"ncr96scsi0", 0},
- {"asc0", 0},
- {"fpu0", 0},
- {"floppy0", 0},
- {NULL, 0}
- };
- struct newconf_S *c;
- int fail=0, warn=0;
+ struct confargs ca;
+ int i;
printf("\n");
- for (c=conf_data ; c->name ; c++) {
- if (config_found(self, c, mbprint)) {
- } else {
- if (c->req) {
- fail++;
- }
- warn++;
- }
- }
- if (fail) {
- printf("Failed to find %d required devices.\n", fail);
- panic("Can't continue.");
+ for (i = 0; i < BUS_ORDER_SZ; i++) {
+ ca.ca_bustype = bus_order[i];
+ (void) config_found(self, &ca, NULL);
}
}
-struct cfdriver mainbuscd =
- { NULL, "mainbus", root_matchbyname, mainbus_attach,
- DV_DULL, sizeof(struct device), 1, 0 };
+struct cfattach mainbus_ca = {
+ sizeof(struct device), mainbus_match, mainbus_attach
+};
+
+struct cfdriver mainbus_cd = {
+ NULL, "mainbus", DV_DULL
+};
diff --git a/sys/arch/mac68k/mac68k/clock.c b/sys/arch/mac68k/mac68k/clock.c
index e6a46d43a59..128d24c3a10 100644
--- a/sys/arch/mac68k/mac68k/clock.c
+++ b/sys/arch/mac68k/mac68k/clock.c
@@ -1,4 +1,4 @@
-/* $NetBSD: clock.c,v 1.22 1996/02/19 21:40:48 scottr Exp $ */
+/* $NetBSD: clock.c,v 1.29 1996/05/05 06:18:17 briggs Exp $ */
/*
* Copyright (c) 1988 University of Utah.
@@ -77,30 +77,27 @@
* @(#)clock.c 7.6 (Berkeley) 5/7/91
*/
-#if !defined(STANDALONE)
#include <sys/param.h>
+#include <sys/device.h>
#include <sys/kernel.h>
+#include <sys/systm.h>
+#include <machine/autoconf.h>
#include <machine/psl.h>
#include <machine/cpu.h>
+#include <machine/limits.h>
#if defined(GPROF) && defined(PROFTIMER)
#include <sys/gprof.h>
#endif
-#else /* STANDALONE */
-#include "stand.h"
-#endif /* STANDALONE */
-
+#include "pram.h"
#include "clockreg.h"
-#include "via.h"
+#include <machine/viareg.h>
-static int month_days[12] = {
- 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31
-};
-#define DIFF19041970 2082844800
-#define DIFF19701990 630720000
-#define DIFF19702010 1261440000
+#define DIFF19041970 2082844800
+#define DIFF19701990 630720000
+#define DIFF19702010 1261440000
/*
* Mac II machine-dependent clock routines.
@@ -111,12 +108,13 @@ static int month_days[12] = {
*
* We use VIA1 timer 1.
*/
-void
-startrtclock(void)
+void
+startrtclock()
{
-/* BARF MF startrt clock is called twice in init_main, configure,
- the reason why is doced in configure */
-
+/*
+ * BARF MF startrt clock is called twice in init_main, configure,
+ * the reason why is doced in configure
+ */
/* be certain clock interrupts are off */
via_reg(VIA1, vIER) = V1IF_T1;
@@ -133,7 +131,7 @@ startrtclock(void)
}
void
-enablertclock(void)
+enablertclock()
{
/* clear then enable clock interrupt. */
via_reg(VIA1, vIFR) |= V1IF_T1;
@@ -141,18 +139,19 @@ enablertclock(void)
}
void
-cpu_initclocks(void)
+cpu_initclocks()
{
enablertclock();
}
void
-setstatclockrate(int rateinhz)
+setstatclockrate(rateinhz)
+ int rateinhz;
{
}
void
-disablertclock(void)
+disablertclock()
{
/* disable clock interrupt */
via_reg(VIA1, vIER) = V1IF_T1;
@@ -164,7 +163,7 @@ disablertclock(void)
* Check high byte twice to prevent missing a roll-over.
* (race condition?)
*/
-u_long
+u_long
clkread()
{
register int high, high2, low;
@@ -198,12 +197,12 @@ int profscale = 0; /* Scale factor from sys clock to prof clock */
char profon = 0; /* Is profiling clock on? */
/* profon values - do not change, locore.s assumes these values */
-#define PRF_NONE 0x00
-#define PRF_USER 0x01
-#define PRF_KERNEL 0x80
+#define PRF_NONE 0x00
+#define PRF_USER 0x01
+#define PRF_KERNEL 0x80
-void
-initprofclock(void)
+void
+initprofclock()
{
/* profile interval must be even divisor of system clock interval */
if (profint > CLK_INTERVAL)
@@ -219,8 +218,8 @@ initprofclock(void)
profintlow = profint & 0xff;
}
-void
-startprofclock(void)
+void
+startprofclock()
{
via_reg(VIA2, vT1L) = (profint - 1) & 0xff;
via_reg(VIA2, vT1LH) = (profint - 1) >> 8;
@@ -229,8 +228,8 @@ startprofclock(void)
via_reg(VIA2, vT1CH) = (profint - 1) >> 8;
}
-void
-stopprofclock(void)
+void
+stopprofclock()
{
via_reg(VIA2, vT1L) = 0;
via_reg(VIA2, vT1LH) = 0;
@@ -245,21 +244,22 @@ stopprofclock(void)
* profclock() is expanded in line in lev6intr() unless profiling kernel.
* Assumes it is called with clock interrupts blocked.
*/
-void
-profclock(clockframe * pclk)
+void
+profclock(pclk)
+ clockframe *pclk;
{
/*
- * Came from user mode.
- * If this process is being profiled record the tick.
- */
+ * Came from user mode.
+ * If this process is being profiled record the tick.
+ */
if (USERMODE(pclk->ps)) {
if (p->p_stats.p_prof.pr_scale)
addupc_task(&curproc, pclk->pc, 1);
}
/*
- * Came from kernel (supervisor) mode.
- * If we are profiling the kernel, record the tick.
- */
+ * Came from kernel (supervisor) mode.
+ * If we are profiling the kernel, record the tick.
+ */
else
if (profiling < 2) {
register int s = pclk->pc - s_lowpc;
@@ -268,10 +268,10 @@ profclock(clockframe * pclk)
kcount[s / (HISTFRACTION * sizeof(*kcount))]++;
}
/*
- * Kernel profiling was on but has been disabled.
- * Mark as no longer profiling kernel and if all profiling done,
- * disable the clock.
- */
+ * Kernel profiling was on but has been disabled.
+ * Mark as no longer profiling kernel and if all profiling done,
+ * disable the clock.
+ */
if (profiling && (profon & PRF_KERNEL)) {
profon &= ~PRF_KERNEL;
if (profon == PRF_NONE)
@@ -281,38 +281,43 @@ profclock(clockframe * pclk)
#endif
#endif
+static u_long ugmt_2_pramt __P((u_long));
+static u_long pramt_2_ugmt __P((u_long));
+
/*
* Convert GMT to Mac PRAM time, using global timezone
* GMT bias adjustment is done elsewhere.
*/
-static u_long
-ugmt_2_pramt(u_long t)
+static u_long
+ugmt_2_pramt(t)
+ u_long t;
{
/* don't know how to open a file properly. */
/* assume compiled timezone is correct. */
- return (t = t + DIFF19041970 - 60*tz.tz_minuteswest);
+ return (t = t + DIFF19041970 - 60 * tz.tz_minuteswest);
}
/*
* Convert a Mac PRAM time value to GMT, using compiled-in timezone
* GMT bias adjustment is done elsewhere.
*/
-static u_long
-pramt_2_ugmt(u_long t)
+static u_long
+pramt_2_ugmt(t)
+ u_long t;
{
- return (t = t - DIFF19041970 + 60*tz.tz_minuteswest);
+ return (t = t - DIFF19041970 + 60 * tz.tz_minuteswest);
}
/*
* Time from the booter.
*/
-u_long macos_boottime;
+u_long macos_boottime;
/*
* Bias in minutes east from GMT (also from booter).
*/
-long macos_gmtbias;
+long macos_gmtbias;
/*
* Flag for whether or not we can trust the PRAM. If we don't
@@ -320,33 +325,33 @@ long macos_gmtbias;
* that is passed from the booter (which will only be a second
* or two off by now).
*/
-int mac68k_trust_pram = 1;
+int mac68k_trust_pram = 1;
/*
* Set global GMT time register, using a file system time base for comparison
* and sanity checking.
*/
-void
-inittodr(time_t base)
+void
+inittodr(base)
+ time_t base;
{
- u_long timbuf;
- u_long pramtime;
+ u_long timbuf;
timbuf = pramt_2_ugmt(pram_readtime());
if ((timbuf - (macos_boottime + 60 * tz.tz_minuteswest)) > 10 * 60) {
#if DIAGNOSTIC
printf(
- "PRAM time does not appear to have been read correctly.\n");
- printf("PRAM: 0x%x, macos_boottime: 0x%x.\n",
- timbuf, macos_boottime + 60 * tz.tz_minuteswest);
+ "PRAM time does not appear to have been read correctly.\n");
+ printf("PRAM: 0x%lx, macos_boottime: 0x%lx.\n",
+ timbuf, macos_boottime + 60 * tz.tz_minuteswest);
#endif
timbuf = macos_boottime;
mac68k_trust_pram = 0;
}
#ifdef DIAGNOSTIC
else
- printf("PRAM: 0x%x, macos_boottime: 0x%x.\n",
- timbuf, macos_boottime);
+ printf("PRAM: 0x%lx, macos_boottime: 0x%lx.\n",
+ timbuf, macos_boottime);
#endif
/*
@@ -384,8 +389,8 @@ inittodr(time_t base)
* Set battery backed clock to a new time, presumably after someone has
* changed system time.
*/
-void
-resettodr(void)
+void
+resettodr()
{
if (mac68k_trust_pram)
/*
@@ -400,7 +405,6 @@ resettodr(void)
"to the pram on this system.\n");
#endif
}
-
/*
* The Macintosh timers decrement once every 1.2766 microseconds.
* MGFH2, p. 180
@@ -410,8 +414,8 @@ resettodr(void)
#define DELAY_CALIBRATE (0xffffff << 7) /* Large value for calibration */
#define LARGE_DELAY 0x40000 /* About 335 msec */
-int delay_factor = DELAY_CALIBRATE;
-volatile int delay_flag = 1;
+unsigned delay_factor = DELAY_CALIBRATE;
+volatile int delay_flag = 1;
/*
* delay(usec)
@@ -423,7 +427,8 @@ volatile int delay_flag = 1;
* due to adjustments for calculations involving 32 bit values.
*/
void
-delay(unsigned usec)
+delay(usec)
+ unsigned usec;
{
register unsigned int cycles;
@@ -432,15 +437,15 @@ delay(unsigned usec)
else
cycles = ((usec > 0 ? usec : 1) * delay_factor) >> 7;
- while ((cycles-- > 0) && delay_flag)
- ;
+ while ((cycles-- > 0) && delay_flag);
}
+static unsigned dummy_delay __P((unsigned));
/*
* Dummy delay calibration. Functionally identical to delay(), but
* returns the number of times through the loop.
*/
-static int
+static unsigned
dummy_delay(usec)
unsigned usec;
{
@@ -451,14 +456,16 @@ dummy_delay(usec)
else
cycles = ((usec > 0 ? usec : 1) * delay_factor) >> 7;
- while ((cycles-- > 0) && delay_flag)
- ;
+ while ((cycles-- > 0) && delay_flag);
return ((delay_factor >> 7) - cycles);
}
+static void delay_timer1_irq __P((void *));
+
static void
-delay_timer1_irq()
+delay_timer1_irq(dummy)
+ void *dummy;
{
delay_flag = 0;
}
@@ -470,7 +477,7 @@ void
mac68k_calibrate_delay()
{
int n;
- int sum;
+ unsigned sum;
/* Disable VIA1 timer 1 interrupts and set up service routine */
via_reg(VIA1, vIER) = V1IF_T1;
@@ -478,7 +485,7 @@ mac68k_calibrate_delay()
/* Set the timer for one-shot mode, then clear and enable interrupts */
via_reg(VIA1, vACR) &= ~ACR_T1LATCH;
- via_reg(VIA1, vIFR) = V1IF_T1; /* (this is needed for IIsi) */
+ via_reg(VIA1, vIFR) = V1IF_T1; /* (this is needed for IIsi) */
via_reg(VIA1, vIER) = 0x80 | V1IF_T1;
for (sum = 0, n = 8; n > 0; n--) {
@@ -499,13 +506,13 @@ mac68k_calibrate_delay()
* delay_factor = ((sum / 8) / (1024 * 1.2766)) * 128;
* That is, average the sum, divide by the number of usec,
* and multiply by a scale factor of 128.
- *
+ *
* We can accomplish the same thing by simplifying and using
* shifts, being careful to avoid as much loss of precision
- * as possible. (If the sum exceeds (2^31-1)/10000, we need
+ * as possible. (If the sum exceeds UINT_MAX/10000, we need
* to rearrange the calculation slightly to do this.)
*/
- if (sum > 214748) /* This is a _fast_ machine! */
+ if (sum > (UINT_MAX / 10000)) /* This is a _fast_ machine! */
delay_factor = (((sum >> 3) * 10000) / CLK_RATE) >> 3;
else
delay_factor = (((sum * 10000) >> 3) / CLK_RATE) >> 3;
diff --git a/sys/arch/mac68k/mac68k/clockreg.h b/sys/arch/mac68k/mac68k/clockreg.h
index d65fde29b12..ffbdb736bc9 100644
--- a/sys/arch/mac68k/mac68k/clockreg.h
+++ b/sys/arch/mac68k/mac68k/clockreg.h
@@ -1,4 +1,4 @@
-/* $NetBSD: clockreg.h,v 1.4 1996/02/01 03:40:26 briggs Exp $ */
+/* $NetBSD: clockreg.h,v 1.5 1996/04/01 05:16:52 scottr Exp $ */
/*-
* Copyright (C) 1993 Allen K. Briggs, Chris P. Caputo,
@@ -40,19 +40,24 @@
#define CLK_SPEED 0.0000012766 /* time to complete a clock (3 MHz) */
-#define CLK_INTERVAL 13055 /* clks to hit HZ ticks/sec */
/*
- * The VIA1 clock speed is 1.2766us, so the timer value above is:
+ * Calculate clocks needed to hit HZ ticks/sec.
+ *
+ * The VIA clock speed is 1.2766us, so the timer value needed is:
*
* 1 1,000,000us 1
* CLK_INTERVAL = -------- * ----------- * ------
* 1.2766us 1s HZ
*
- * where HZ == 60. This gives us 13055.5 and change... We round down.
+ * While it may be tempting to simplify the following further, we can run
+ * into integer overflow problems. Also note: do *not* define HZ to be
+ * less than 12; overflow will occur, yielding invalid results.
*/
-#define CLK_INTH (CLK_INTERVAL >> 8)
-#define CLK_INTL (CLK_INTERVAL & 0xff)
+#define CLK_INTERVAL ((int)((((100000000L / HZ) * 100) / 12766)))
+
+#define CLK_INTH ((CLK_INTERVAL >> 8) & 0xff) /* high byte */
+#define CLK_INTL (CLK_INTERVAL & 0xff) /* low byte */
#if !defined(PRF_INTERVAL)
#define PRF_INTERVAL CLK_INTERVAL
diff --git a/sys/arch/mac68k/mac68k/conf.c b/sys/arch/mac68k/mac68k/conf.c
index 7279072c47a..9212f80de3c 100644
--- a/sys/arch/mac68k/mac68k/conf.c
+++ b/sys/arch/mac68k/mac68k/conf.c
@@ -1,4 +1,4 @@
-/* $OpenBSD: conf.c,v 1.5 1996/05/04 18:50:46 mickey Exp $ */
+/* $NetBSD: conf.c,v 1.33 1996/05/18 18:54:49 briggs Exp $ */
/*
* Copyright (c) 1990 The Regents of the University of California.
@@ -149,20 +149,23 @@ cdev_decl(ptc);
cdev_decl(log);
cdev_decl(st);
cdev_decl(sd);
+cdev_decl(cd);
cdev_decl(fd);
#include "grf.h"
cdev_decl(grf);
#define NADB 1 /* #include "adb.h" */
cdev_decl(adb);
-#include "ser.h"
-cdev_decl(ser);
-cdev_decl(cd);
+#include "zsc.h"
+cdev_decl(zsc);
+#include "zstty.h"
+cdev_decl(zs);
cdev_decl(vnd);
cdev_decl(ccd);
#include "bpfilter.h"
cdev_decl(bpf);
#include "tun.h"
cdev_decl(tun);
+dev_decl(filedesc,open);
#ifdef LKM
#define NLKM 1
@@ -194,7 +197,7 @@ struct cdevsw cdevsw[] =
cdev_notdef(), /* 9 */
cdev_grf_init(1,grf), /* 10: frame buffer */
cdev_tty_init(NITE,ite), /* 11: console terminal emulator */
- cdev_tty_init(NSER,ser), /* 12: 2 mac serial ports -- BG*/
+ cdev_tty_init(NZSTTY,zs), /* 12: 2 mac serial ports -- BG*/
cdev_disk_init(NSD,sd), /* 13: SCSI disk */
cdev_tape_init(NST,st), /* 14: SCSI tape */
cdev_disk_init(NCD,cd), /* 15: SCSI CD-ROM */
@@ -204,7 +207,7 @@ struct cdevsw cdevsw[] =
cdev_notdef(), /* 18 */
cdev_disk_init(NVND,vnd), /* 19: vnode disk driver */
cdev_disk_init(NCCD,ccd), /* 20: concatenated disk driver */
- cdev_fd_init(1,fd), /* 21: file descriptor pseudo-device */
+ cdev_fd_init(1,filedesc), /* 21: file descriptor pseudo-device */
cdev_bpftun_init(NBPFILTER,bpf),/* 22: Berkeley packet filter */
cdev_mouse_init(NADB,adb), /* 23: ADB event interface */
cdev_bpftun_init(NTUN,tun), /* 24: network tunnel */
@@ -246,6 +249,7 @@ iskmemdev(dev)
/*
* Returns true if dev is /dev/zero.
*/
+int
iszerodev(dev)
dev_t dev;
{
@@ -290,6 +294,7 @@ static int chrtoblktab[] = {
/* 31 */ NODEV,
};
+dev_t
chrtoblk(dev)
dev_t dev;
{
@@ -305,15 +310,15 @@ chrtoblk(dev)
#define itecnpollc nullcnpollc
cons_decl(ite);
-#define sercnpollc nullcnpollc
-cons_decl(ser);
+#define zscnpollc nullcnpollc
+cons_decl(zs);
struct consdev constab[] = {
#if NITE > 0
cons_init(ite),
#endif
-#if NSER > 0
- cons_init(ser),
+#if NZSTTY > 0
+ cons_init(zs),
#endif
{ 0 },
};
diff --git a/sys/arch/mac68k/mac68k/disksubr.c b/sys/arch/mac68k/mac68k/disksubr.c
index beea6e3c66f..b8db36692f3 100644
--- a/sys/arch/mac68k/mac68k/disksubr.c
+++ b/sys/arch/mac68k/mac68k/disksubr.c
@@ -1,4 +1,4 @@
-/* $NetBSD: disksubr.c,v 1.13 1996/02/14 14:20:54 briggs Exp $ */
+/* $NetBSD: disksubr.c,v 1.14 1996/05/05 06:18:22 briggs Exp $ */
/*
* Copyright (c) 1982, 1986, 1988 Regents of the University of California.
@@ -81,6 +81,7 @@
#include <sys/param.h>
#include <sys/systm.h>
#include <sys/buf.h>
+#include <sys/disk.h>
#include <sys/disklabel.h>
#include <sys/syslog.h>
@@ -89,7 +90,6 @@
#define b_cylin b_resid
#define NUM_PARTS_PROBED 32
-static int print = 0;
#define ROOT_PART 1
#define UFS_PART 2
@@ -97,11 +97,24 @@ static int print = 0;
#define HFS_PART 4
#define SCRATCH_PART 5
+static int getFreeLabelEntry __P((struct disklabel *));
+static int whichType __P((struct partmapentry *));
+static void fixPartTable __P((struct partmapentry *, long, char *, int *));
+static void setRoot __P((struct partmapentry *, struct disklabel *, int));
+static void setSwap __P((struct partmapentry *, struct disklabel *, int));
+static void setUfs __P((struct partmapentry *, struct disklabel *, int));
+static void setHfs __P((struct partmapentry *, struct disklabel *, int));
+static void setScratch __P((struct partmapentry *, struct disklabel *, int));
+static int getNamedType
+__P((struct partmapentry *, int, struct disklabel *, int, int, int *));
+static char *read_mac_label __P((dev_t, void (*)(struct buf *),
+ register struct disklabel *, struct cpu_disklabel *));
+
/*
* Find an entry in the disk label that is unused and return it
* or -1 if no entry
*/
-int
+static int
getFreeLabelEntry(lp)
struct disklabel *lp;
{
@@ -119,7 +132,7 @@ getFreeLabelEntry(lp)
/*
* figure out what the type of the given part is and return it
*/
-int
+static int
whichType(part)
struct partmapentry *part;
{
@@ -296,7 +309,7 @@ setScratch(part, lp, slot)
part->pmPartType[0] = '\0';
}
-int
+static int
getNamedType(part, num_parts, lp, type, alt, maxslot)
struct partmapentry *part;
int num_parts;
@@ -330,7 +343,7 @@ getNamedType(part, num_parts, lp, type, alt, maxslot)
if (*maxslot < 1) *maxslot = 1;
break;
default:
- printf("disksubr.c: can't do type \n", type);
+ printf("disksubr.c: can't do type %d\n", type);
break;
}
@@ -365,10 +378,10 @@ skip:
* NetBSD to live on cluster 0--regardless of the actual order on the
* disk. This whole algorithm should probably be changed in the future.
*/
-char *
+static char *
read_mac_label(dev, strat, lp, osdep)
dev_t dev;
- void (*strat)();
+ void (*strat)(struct buf *);
register struct disklabel *lp;
struct cpu_disklabel *osdep;
{
@@ -456,7 +469,7 @@ done:
char *
readdisklabel(dev, strat, lp, osdep)
dev_t dev;
- void (*strat)();
+ void (*strat)(struct buf *);
register struct disklabel *lp;
struct cpu_disklabel *osdep;
{
@@ -551,9 +564,10 @@ setdisklabel(olp, nlp, openmask, osdep)
* MF - 8-14-93 This function is never called. It is here just in case
* we want to write dos disklabels some day. Really!
*/
+int
writedisklabel(dev, strat, lp, osdep)
dev_t dev;
- void (*strat)();
+ void (*strat)(struct buf *);
register struct disklabel *lp;
struct cpu_disklabel *osdep;
{
@@ -611,7 +625,9 @@ bounds_check_with_label(bp, lp, wlabel)
int wlabel;
{
struct partition *p = lp->d_partitions + DISKPART(bp->b_dev);
+#if 0
int labelsect = lp->d_partitions[0].p_offset;
+#endif
int maxsz = p->p_size;
int sz = (bp->b_bcount + DEV_BSIZE - 1) >> DEV_BSHIFT;
@@ -663,7 +679,7 @@ bad:
void
dk_establish(dk, dev)
- struct dkdevice *dk;
+ struct disk *dk;
struct device *dev;
{
/* Empty for now. -- XXX */
diff --git a/sys/arch/mac68k/mac68k/fpu.c b/sys/arch/mac68k/mac68k/fpu.c
index 847ae46a235..c5011dbb779 100644
--- a/sys/arch/mac68k/mac68k/fpu.c
+++ b/sys/arch/mac68k/mac68k/fpu.c
@@ -1,4 +1,4 @@
-/* $NetBSD: fpu.c,v 1.10 1995/08/12 04:10:37 briggs Exp $ */
+/* $NetBSD: fpu.c,v 1.15 1996/05/05 17:19:04 briggs Exp $ */
/*
* Copyright (c) 1995 Gordon W. Ross
@@ -45,18 +45,28 @@
#include <machine/cpu.h>
#include <machine/frame.h>
-#include <setjmp.h>
-
extern int fpu_type;
extern int *nofault;
-extern int matchbyname __P((struct device *, void *, void *));
+static int fpu_match __P((struct device *, void *, void *));
static void fpu_attach __P((struct device *, struct device *, void *));
static int fpu_probe __P((void));
-struct cfdriver fpucd = {
- NULL, "fpu", matchbyname, fpu_attach,
- DV_DULL, sizeof(struct device), 0 };
+struct cfattach fpu_ca = {
+ sizeof(struct device), fpu_match, fpu_attach
+};
+
+struct cfdriver fpu_cd = {
+ NULL, "fpu", DV_DULL, 0
+};
+
+static int
+fpu_match(pdp, match, auxp)
+ struct device *pdp;
+ void *match, *auxp;
+{
+ return 1;
+}
static char *fpu_descr[] = {
#ifdef FPU_EMULATE
@@ -76,7 +86,6 @@ fpu_attach(parent, self, args)
void *args;
{
char *descr;
- int enab_reg;
fpu_type = fpu_probe();
if ((0 <= fpu_type) && (fpu_type <= 2))
@@ -95,11 +104,11 @@ fpu_probe()
* We, of course, need to have enough room for either.
*/
int fpframe[60 / sizeof(int)];
- jmp_buf faultbuf;
+ label_t faultbuf;
u_char b;
nofault = (int *) &faultbuf;
- if (setjmp(faultbuf)) {
+ if (setjmp(&faultbuf)) {
nofault = (int *) 0;
return(0);
}
@@ -135,7 +144,7 @@ fpu_probe()
* Now, restore a NULL state to reset the FPU.
*/
fpframe[0] = fpframe[1] = 0;
- m68881_restore(fpframe);
+ m68881_restore((struct fpframe *) fpframe);
/*
* The size of a 68881 IDLE frame is 0x18
diff --git a/sys/arch/mac68k/mac68k/genassym.c b/sys/arch/mac68k/mac68k/genassym.c
index 2d6f3f64ac2..89513a01699 100644
--- a/sys/arch/mac68k/mac68k/genassym.c
+++ b/sys/arch/mac68k/mac68k/genassym.c
@@ -1,4 +1,4 @@
-/* $NetBSD: genassym.c,v 1.14 1995/06/21 03:20:22 briggs Exp $ */
+/* $NetBSD: genassym.c,v 1.18 1996/05/05 06:18:27 briggs Exp $ */
/*
* Copyright (c) 1990 The Regents of the University of California.
@@ -40,17 +40,23 @@
#include <sys/proc.h>
#include <sys/mbuf.h>
#include <sys/msgbuf.h>
+#include <sys/syscall.h>
+#include <sys/systm.h>
+#include <sys/types.h>
+#include <sys/user.h>
+
+#include <vm/vm.h>
+
#include <machine/cpu.h>
#include <machine/trap.h>
#include <machine/psl.h>
#include <machine/reg.h>
-#include "clockreg.h"
-#include <sys/syscall.h>
-#include <vm/vm.h>
-#include <sys/user.h>
#include <machine/pte.h>
-main()
+#include "clockreg.h"
+
+int
+main(void)
{
register struct proc *p = (struct proc *)0;
register struct mdproc *mdproc = (struct mdproc *)0;
@@ -61,33 +67,32 @@ main()
struct vmspace *vms = (struct vmspace *)0;
pmap_t pmap = (pmap_t)0;
struct pcb *pcb = (struct pcb *)0;
- register unsigned i;
-
- printf("#define\tP_FORW %d\n", &p->p_forw);
- printf("#define\tP_BACK %d\n", &p->p_back);
- printf("#define\tP_VMSPACE %d\n", &p->p_vmspace);
- printf("#define\tP_ADDR %d\n", &p->p_addr);
- printf("#define\tP_MD %d\n", &p->p_md);
- printf("#define\tP_PID %d\n", &p->p_pid);
- printf("#define\tP_PRIORITY %d\n", &p->p_priority);
- printf("#define\tP_STAT %d\n", &p->p_stat);
- printf("#define\tP_WCHAN %d\n", &p->p_wchan);
- printf("#define\tP_FLAG %d\n", &p->p_flag);
- printf("#define\tP_MD_REGS %d\n", &p->p_md.md_regs);
- printf("#define\tP_MD_FLAGS %d\n", &p->p_md.md_flags);
+
+ printf("#define\tP_FORW %p\n", &p->p_forw);
+ printf("#define\tP_BACK %p\n", &p->p_back);
+ printf("#define\tP_VMSPACE %p\n", &p->p_vmspace);
+ printf("#define\tP_ADDR %p\n", &p->p_addr);
+ printf("#define\tP_MD %p\n", &p->p_md);
+ printf("#define\tP_PID %p\n", &p->p_pid);
+ printf("#define\tP_PRIORITY %p\n", &p->p_priority);
+ printf("#define\tP_STAT %p\n", &p->p_stat);
+ printf("#define\tP_WCHAN %p\n", &p->p_wchan);
+ printf("#define\tP_FLAG %p\n", &p->p_flag);
+ printf("#define\tP_MD_REGS %p\n", &p->p_md.md_regs);
+ printf("#define\tP_MD_FLAGS %p\n", &p->p_md.md_flags);
printf("#define\tSSLEEP %d\n", SSLEEP);
printf("#define\tSRUN %d\n", SRUN);
- printf("#define\tMD_REGS %d\n", &mdproc->md_regs);
+ printf("#define\tMD_REGS %p\n", &mdproc->md_regs);
- printf("#define\tPM_STCHG %d\n", &pmap->pm_stchanged);
+ printf("#define\tPM_STCHG %p\n", &pmap->pm_stchanged);
- printf("#define\tVM_PMAP %d\n", &vms->vm_pmap);
- printf("#define\tV_SWTCH %d\n", &vm->v_swtch);
- printf("#define\tV_TRAP %d\n", &vm->v_trap);
- printf("#define\tV_SYSCALL %d\n", &vm->v_syscall);
- printf("#define\tV_INTR %d\n", &vm->v_intr);
- printf("#define\tV_SOFT %d\n", &vm->v_soft);
+ printf("#define\tVM_PMAP %p\n", &vms->vm_pmap);
+ printf("#define\tV_SWTCH %p\n", &vm->v_swtch);
+ printf("#define\tV_TRAP %p\n", &vm->v_trap);
+ printf("#define\tV_SYSCALL %p\n", &vm->v_syscall);
+ printf("#define\tV_INTR %p\n", &vm->v_intr);
+ printf("#define\tV_SOFT %p\n", &vm->v_soft);
printf("#define\tUPAGES %d\n", UPAGES);
printf("#define\tUSPACE %d\n", USPACE);
@@ -109,9 +114,9 @@ main()
#ifdef SYSVSHM
printf("#define\tSHMMAXPGS %d\n", SHMMAXPGS);
#endif
- printf("#define\tU_PROF %d\n", &up->u_stats.p_prof);
- printf("#define\tU_PROFSCALE %d\n", &up->u_stats.p_prof.pr_scale);
- printf("#define\tRU_MINFLT %d\n", &rup->ru_minflt);
+ printf("#define\tU_PROF %p\n", &up->u_stats.p_prof);
+ printf("#define\tU_PROFSCALE %p\n", &up->u_stats.p_prof.pr_scale);
+ printf("#define\tRU_MINFLT %p\n", &rup->ru_minflt);
printf("#define\tT_BUSERR %d\n", T_BUSERR);
printf("#define\tT_ADDRERR %d\n", T_ADDRERR);
@@ -156,18 +161,18 @@ main()
printf("#define\tPG_FRAME %d\n", PG_FRAME);
printf("#define\tSIZEOF_PCB %d\n", sizeof(struct pcb));
- printf("#define\tPCB_FLAGS %d\n", &pcb->pcb_flags);
- printf("#define\tPCB_PS %d\n", &pcb->pcb_ps);
- printf("#define\tPCB_USTP %d\n", &pcb->pcb_ustp);
- printf("#define\tPCB_USP %d\n", &pcb->pcb_usp);
- printf("#define\tPCB_REGS %d\n", pcb->pcb_regs);
- printf("#define\tPCB_ONFAULT %d\n", &pcb->pcb_onfault);
- printf("#define\tPCB_FPCTX %d\n", &pcb->pcb_fpregs);
+ printf("#define\tPCB_FLAGS %p\n", &pcb->pcb_flags);
+ printf("#define\tPCB_PS %p\n", &pcb->pcb_ps);
+ printf("#define\tPCB_USTP %p\n", &pcb->pcb_ustp);
+ printf("#define\tPCB_USP %p\n", &pcb->pcb_usp);
+ printf("#define\tPCB_REGS %p\n", pcb->pcb_regs);
+ printf("#define\tPCB_ONFAULT %p\n", &pcb->pcb_onfault);
+ printf("#define\tPCB_FPCTX %p\n", &pcb->pcb_fpregs);
printf("#define\tPCB_TRCB %d\n", 5);
- printf("#define\tFR_SP %d\n", &frame->f_regs[15]);
- printf("#define\tFR_HW %d\n", &frame->f_sr);
- printf("#define\tFR_ADJ %d\n", &frame->f_stackadj);
+ printf("#define\tFR_SP %p\n", &frame->f_regs[15]);
+ printf("#define\tFR_HW %p\n", &frame->f_sr);
+ printf("#define\tFR_ADJ %p\n", &frame->f_stackadj);
printf("#define\tB_READ %d\n", B_READ);
@@ -179,13 +184,6 @@ main()
printf("#define\tSYS_execve %d\n", SYS_execve);
printf("#define\tSYS_sigreturn %d\n", SYS_sigreturn);
- printf("#define\tINTIOBASE %d\n", INTIOBASE);
- printf("#define\tNBBASE %d\n", NBBASE);
- printf("#define\tROMBASE %d\n", ROMBASE);
- printf("#define\tROMMAPSIZE %d\n", ROMMAPSIZE);
- printf("#define\tIIOMAPSIZE %d\n", IIOMAPSIZE);
- printf("#define\tNBMAPSIZE %d\n", NBMAPSIZE);
-
printf("#define\tMMU_68040 %d\n", MMU_68040);
printf("#define\tMMU_68030 %d\n", MMU_68030);
printf("#define\tMMU_68851 %d\n", MMU_68851);
diff --git a/sys/arch/mac68k/mac68k/locore.s b/sys/arch/mac68k/mac68k/locore.s
index aa10796e158..36df8da1d59 100644
--- a/sys/arch/mac68k/mac68k/locore.s
+++ b/sys/arch/mac68k/mac68k/locore.s
@@ -1,4 +1,4 @@
-/* $NetBSD: locore.s,v 1.52 1995/12/11 02:38:08 thorpej Exp $ */
+/* $NetBSD: locore.s,v 1.63 1996/05/17 02:11:47 briggs Exp $ */
/*
* Copyright (c) 1988 University of Utah.
@@ -77,12 +77,18 @@
* @(#)locore.s 7.11 (Berkeley) 5/9/91
*/
+/*
+ * This is for kvm_mkdb, and should be the address of the beginning
+ * of the kernel text segment (not necessarily the same as kernbase).
+ */
+ .text
+ .globl _kernel_text
+_kernel_text:
+
#include "assym.h"
#include "vectors.s"
#include "macglobals.s"
- .text
-
/*
* This is where we wind up if the kernel jumps to location 0.
* (i.e. a bogus PC) This is known to immediately follow the vector
@@ -112,6 +118,14 @@ Ljmp0panic:
_buserr:
tstl _nofault | device probe?
jeq Lberr | no, handle as usual
+#if defined(M68040)
+ cmpl #MMU_68040,_mmutype | 68040?
+ jne Lberrfault30 | no, handle as 030
+ movl sp@(0x14),_mac68k_buserr_addr
+ movl _nofault,sp@- | yes,
+ jbsr _longjmp
+#endif
+Lberrfault30:
movl sp@(0x10),_mac68k_buserr_addr
movl _nofault,sp@- | yes,
jbsr _longjmp | longjmp(nofault)
@@ -553,6 +567,7 @@ Lsigr1:
*/
/* BARF We must re-configure this. */
.globl _hardclock, _nmihand
+ .globl _mrg_VBLQueue
_spurintr:
_lev3intr:
@@ -602,21 +617,30 @@ _lev4intr:
addql #4,sp
rte | return from exception
+/*
+ * We could tweak rtclock_intr and gain 12 cycles on the 020 and 030 by
+ * saving the status register directly to the stack, but this would lose
+ * badly on the 040. Aligning the stack takes 10 more cycles than this
+ * code does, so it's a good compromise.
+ */
.globl _rtclock_intr
-/* MAJORBARF: Fix this routine to be like Mac clocks */
_rtclock_intr:
+ movl d2,sp@- | save d2
+ movw sr,d2 | save SPL
+ movw #SPL2,sr | raise SPL to splclock()
movl a6@(8),a1 | get pointer to frame in via1_intr
- movl a1@(64), sp@- | push ps
- movl a1@(68), sp@- | push pc
- movl sp, sp@- | push pointer to ps, pc
+ movl a1@(64),sp@- | push ps
+ movl a1@(68),sp@- | push pc
+ movl sp,sp@- | push pointer to ps, pc
jbsr _hardclock | call generic clock int routine
- lea sp@(12), sp | pop params
+ lea sp@(12),sp | pop params
+ jbsr _mrg_VBLQueue | give programs in the VBLqueue a chance
addql #1,_intrcnt+20 | add another system clock interrupt
-
addql #1,_cnt+V_INTR | chalk up another interrupt
-
- movl #1, d0 | clock taken care of
+ movw d2,sr | restore SPL
+ movl sp@+,d2 | restore d2
+ movl #1,d0 | clock taken care of
rts | go back from whence we came
_lev7intr:
@@ -797,12 +821,6 @@ _esym: .long 0
.globl _edata
.globl _etext
.globl start
- .globl _videoaddr, _videorowbytes
- .globl _videobitdepth
- .globl _machineid
- .globl _videosize
- .globl _IOBase
- .globl _NuBusBase
start:
movw #PSL_HIGHIPL,sr | no interrupts. ever.
@@ -1040,7 +1058,7 @@ _esigcode:
* Primitives
*/
-#include "m68k/asm.h"
+#include <m68k/asm.h>
/*
* copypage(fromaddr, toaddr)
@@ -1446,8 +1464,10 @@ __TBIA:
Lmotommu3:
#endif
pflusha
+#if defined(M68020)
tstl _mmutype
jgt Ltbia851
+#endif
movl #DC_CLEAR,d0
movc d0,cacr | invalidate on-chip d-cache
Ltbia851:
@@ -1476,15 +1496,17 @@ ENTRY(TBIS)
rts
Lmotommu4:
#endif
+#if defined(M68020)
tstl _mmutype
- jgt Ltbis851
+ jle Ltbis851
+ pflushs #0,#0,a0@ | flush address from both sides
+ rts
+Ltbis851:
+#endif
pflush #0,#0,a0@ | flush address from both sides
movl #DC_CLEAR,d0
movc d0,cacr | invalidate on-chip data cache
rts
-Ltbis851:
- pflushs #0,#0,a0@ | flush address from both sides
- rts
/*
* Invalidate supervisor side of TLB
@@ -1501,15 +1523,17 @@ ENTRY(TBIAS)
rts
Lmotommu5:
#endif
+#if defined(M68020)
tstl _mmutype
- jgt Ltbias851
+ jle Ltbias851
+ pflushs #4,#4 | flush supervisor TLB entries
+ rts
+Ltbias851:
+#endif
pflush #4,#4 | flush supervisor TLB entries
movl #DC_CLEAR,d0
movc d0,cacr | invalidate on-chip d-cache
rts
-Ltbias851:
- pflushs #4,#4 | flush supervisor TLB entries
- rts
/*
* Invalidate user side of TLB
@@ -1525,14 +1549,16 @@ ENTRY(TBIAU)
.word 0xf518 | yes, pflusha (for now) XXX
Lmotommu6:
#endif
+#if defined(M68020)
tstl _mmutype
- jgt Ltbiau851
+ jle Ltbiau851
pflush #0,#4 | flush user TLB entries
- movl #DC_CLEAR,d0
- movc d0,cacr | invalidate on-chip d-cache
rts
Ltbiau851:
+#endif
pflush #0,#4 | flush user TLB entries
+ movl #DC_CLEAR,d0
+ movc d0,cacr | invalidate on-chip d-cache
rts
/*
@@ -1767,11 +1793,8 @@ Lm68881rdone:
/*
* Handle the nitty-gritty of rebooting the machine.
- * Basically we just turn off the MMU and jump to the appropriate ROM routine.
- * Note that we must be running in an address range that is mapped one-to-one
- * logical to physical so that the PC is still valid immediately after the MMU
- * is turned off. We have conveniently mapped the last page of physical
- * memory this way.
+ * Basically we just jump to the appropriate ROM routine after mapping
+ * the ROM into its proper home (back in machdep).
*/
.globl _doboot, _ROMBase
_doboot:
@@ -2105,7 +2128,6 @@ _mac68k_vrsrc_cnt:
_mac68k_vrsrc_vec:
.word 0, 0, 0, 0, 0, 0
_mac68k_buserr_addr:
- .long 0
.globl _SONICSPACE, _SONICSPACE_size
_SONICSPACE:
.space 108123
diff --git a/sys/arch/mac68k/mac68k/macglobals.s b/sys/arch/mac68k/mac68k/macglobals.s
index 2891c1ec9e6..46c8086b887 100644
--- a/sys/arch/mac68k/mac68k/macglobals.s
+++ b/sys/arch/mac68k/mac68k/macglobals.s
@@ -1,4 +1,4 @@
-/* $NetBSD: macglobals.s,v 1.2 1995/08/16 13:18:24 briggs Exp $ */
+/* $NetBSD: macglobals.s,v 1.3 1996/05/14 04:00:48 briggs Exp $ */
/* Copyright 1994 by Bradley A. Grantham, All rights reserved */
@@ -8,8 +8,12 @@
*/
.text
- .space 0xF00 /* did I miss something? this is a bad fix for
+ .space 0x2a00 /* did I miss something? this is a bad fix for
someone who is writing over low mem */
+/* changed from 0xf00 to 0x2a00 as some routine running before ADBReInit
+ chooses to write to 0x1fb8. With the trap table from 0x0 to 0x3ff,
+ this additional space of 0x2a00 should be sufficient (WRU) */
+
/*
* This has not been included for some time and things seem to still
* be working.
diff --git a/sys/arch/mac68k/mac68k/machdep.c b/sys/arch/mac68k/mac68k/machdep.c
index e83c3415da9..efe4c2eb1b4 100644
--- a/sys/arch/mac68k/mac68k/machdep.c
+++ b/sys/arch/mac68k/mac68k/machdep.c
@@ -1,4 +1,4 @@
-/* $NetBSD: machdep.c,v 1.82 1995/11/21 04:00:43 briggs Exp $ */
+/* $NetBSD: machdep.c,v 1.105 1996/05/25 14:45:31 briggs Exp $ */
/*
* Copyright (c) 1988 University of Utah.
@@ -107,6 +107,11 @@
#include <sys/shm.h>
#endif
+#include <machine/db_machdep.h>
+#include <ddb/db_sym.h>
+#include <ddb/db_extern.h>
+
+#include <machine/autoconf.h>
#include <machine/cpu.h>
#include <machine/reg.h>
#include <machine/psl.h>
@@ -123,7 +128,7 @@
#include <dev/cons.h>
-#include "via.h"
+#include <machine/viareg.h>
#include "macrom.h"
#include "ether.h"
@@ -235,8 +240,6 @@ consinit(void)
void
cpu_startup(void)
{
- extern struct map *useriomap;
- extern long Usrptsize;
register caddr_t v, firstaddr;
register unsigned i;
int vers;
@@ -424,7 +427,7 @@ again:
for (i = 1; i < ncallout; i++)
callout[i - 1].c_next = &callout[i];
- printf("avail mem = %d\n", ptoa(cnt.v_free_count));
+ printf("avail mem = %ld\n", ptoa(cnt.v_free_count));
printf("using %d buffers containing %d bytes of memory\n",
nbuf, bufpages * CLBYTES);
@@ -437,24 +440,11 @@ again:
* Configure the system.
*/
configure();
-
- if (current_mac_model->class == MACH_CLASSII) {
- /*
- * For the bloody Mac II ROMs, we have to map this space
- * so that the PRam functions will work.
- * Gee, Apple, is that a hard-coded hardware address in
- * your code? I think so! (_ReadXPRam + 0x0062) We map
- * the first
- */
-#ifdef DIAGNOSTIC
- printf("I/O map kludge for old ROMs that use hardware %s",
- "addresses directly.\n");
-#endif
- pmap_map(0x50f00000, 0x50f00000, 0x50f00000 + 0x4000,
- VM_PROT_READ|VM_PROT_WRITE);
- }
}
+void doboot __P((void));
+void via_shutdown __P((void));
+
/*
* Set registers on exec.
* XXX Should clear registers except sp, pc,
@@ -814,7 +804,7 @@ boot(howto)
/* take a snap shot before clobbering any registers */
if (curproc)
- savectx(curproc->p_addr);
+ savectx((struct pcb *) curproc->p_addr);
boothowto = howto;
if ((howto & RB_NOSYNC) == 0 && waittime < 0) {
@@ -830,11 +820,18 @@ boot(howto)
*/
vfs_shutdown();
+#ifdef notyet
/*
* If we've been adjusting the clock, the todr
* will be out of synch; adjust it now.
*/
resettodr();
+#else
+# ifdef DIAGNOSTIC
+ printf("NetBSD/mac68k does not trust itself to update the "
+ "RTC on shutdown.\n");
+# endif
+#endif
}
splhigh(); /* extreme priority */
if (howto & RB_HALT) {
@@ -872,6 +869,8 @@ u_long dumpmag = 0x8fca0101; /* magic number */
int dumpsize = 0; /* pages */
long dumplo = 0; /* blocks */
+static int get_max_page __P((void));
+
static int
get_max_page()
{
@@ -930,6 +929,10 @@ dumpconf()
#define BYTES_PER_DUMP NBPG /* Must be a multiple of pagesize XXX small */
static vm_offset_t dumpspace;
+vm_offset_t reserve_dumppages __P((vm_offset_t));
+static int find_range __P((vm_offset_t));
+static int find_next_range __P((vm_offset_t));
+
vm_offset_t
reserve_dumppages(p)
vm_offset_t p;
@@ -942,7 +945,7 @@ static int
find_range(pa)
vm_offset_t pa;
{
- int i, max = 0;
+ int i;
for (i = 0; i < numranges; i++) {
if (low[i] <= pa && pa < high[i])
@@ -982,7 +985,6 @@ dumpsys()
daddr_t blkno;
int (*dump) __P((dev_t, daddr_t, caddr_t, size_t));
int error = 0;
- int c;
msgbufmapped = 0; /* don't record dump msgs in msgbuf */
if (dumpdev == NODEV)
@@ -996,7 +998,7 @@ dumpsys()
dumpconf();
if (dumplo < 0)
return;
- printf("\ndumping to dev %x, offset %d\n", dumpdev, dumplo);
+ printf("\ndumping to dev %x, offset %ld\n", dumpdev, dumplo);
psize = (*bdevsw[major(dumpdev)].d_psize) (dumpdev);
printf("dump ");
@@ -1108,6 +1110,9 @@ microtime(tvp)
splx(s);
}
+void straytrap __P((int, int));
+
+void
straytrap(pc, evec)
int pc;
int evec;
@@ -1118,6 +1123,9 @@ straytrap(pc, evec)
int *nofault;
+int badaddr __P((caddr_t));
+
+int
badaddr(addr)
register caddr_t addr;
{
@@ -1139,6 +1147,7 @@ badaddr(addr)
return (0);
}
+int
badbaddr(addr)
register caddr_t addr;
{
@@ -1155,11 +1164,63 @@ badbaddr(addr)
nofault = (int *) 0;
return (1);
}
- i = *(volatile char *) addr;
+ i = *(volatile u_int8_t *) addr;
+ nofault = (int *) 0;
+ return (0);
+}
+
+int
+badwaddr(addr)
+ register caddr_t addr;
+{
+ register int i;
+ label_t faultbuf;
+
+#ifdef lint
+ i = *addr;
+ if (i)
+ return (0);
+#endif
+ nofault = (int *) &faultbuf;
+ if (setjmp((label_t *) nofault)) {
+ nofault = (int *) 0;
+ return (1);
+ }
+ i = *(volatile u_int16_t *) addr;
+ nofault = (int *) 0;
+ return (0);
+}
+
+int
+badladdr(addr)
+ register caddr_t addr;
+{
+ register int i;
+ label_t faultbuf;
+
+#ifdef lint
+ i = *addr;
+ if (i)
+ return (0);
+#endif
+ nofault = (int *) &faultbuf;
+ if (setjmp((label_t *) nofault)) {
+ nofault = (int *) 0;
+ return (1);
+ }
+ i = *(volatile u_int32_t *) addr;
nofault = (int *) 0;
return (0);
}
+void arpintr __P((void));
+void ipintr __P((void));
+void nsintr __P((void));
+void clnlintr __P((void));
+void pppintr __P((void));
+void netintr __P((void));
+
+void
netintr()
{
#ifdef INET
@@ -1195,24 +1256,11 @@ netintr()
#endif
}
-#if defined(DEBUG) && !defined(PANICBUTTON)
-#define PANICBUTTON
-#endif
-
-#ifdef PANICBUTTON
-int panicbutton = 1; /* non-zero if panic buttons are enabled */
-int crashandburn = 0;
-int candbdelay = 50; /* give em half a second */
-
-candbtimer()
-{
- crashandburn = 0;
-}
-#endif
-
/*
* Level 7 interrupts can be caused by the keyboard or parity errors.
*/
+void nmihand __P((struct frame));
+
void
nmihand(frame)
struct frame frame;
@@ -1230,6 +1278,9 @@ nmihand(frame)
nmihanddeep = 0;
}
+void dumpmem __P((u_int *, int));
+
+void
regdump(frame, sbytes)
struct frame *frame;
int sbytes;
@@ -1269,11 +1320,14 @@ regdump(frame, sbytes)
splx(s);
}
+void dumpmem __P((u_int *, int));
+
+void
dumpmem(ptr, sz)
register u_int *ptr;
int sz;
{
- register int i, val, same;
+ register int i;
sz /= 4;
for (i = 0; i < sz; i++) {
@@ -1292,19 +1346,18 @@ dumpmem(ptr, sz)
* for RAM to be aliased across all memory--or for it to appear that
* there is more RAM than there really is.
*/
+int get_top_of_ram __P((void));
+
int
get_top_of_ram()
{
- u_long search = 0xb00bfade;
- u_long i, found, store;
- char *p, *zero;
-
return ((mac68k_machine.mach_memsize * (1024 * 1024)) - 4096);
}
/*
* machine dependent system variables.
*/
+int
cpu_sysctl(name, namelen, oldp, oldlenp, newp, newlen, p)
int *name;
u_int namelen;
@@ -1334,6 +1387,7 @@ cpu_sysctl(name, namelen, oldp, oldlenp, newp, newlen, p)
/* NOTREACHED */
}
+int
cpu_exec_aout_makecmds(p, epp)
struct proc *p;
struct exec_package *epp;
@@ -1343,7 +1397,7 @@ cpu_exec_aout_makecmds(p, epp)
#ifdef COMPAT_NOMID
if (execp->a_midmag == ZMAGIC) /* i.e., MID == 0. */
- return cpu_exec_prep_oldzmagic(p, epp);
+ return exec_aout_prep_oldzmagic(p, epp);
#endif
#ifdef COMPAT_SUNOS
@@ -1357,55 +1411,10 @@ cpu_exec_aout_makecmds(p, epp)
return error;
}
-#ifdef COMPAT_NOMID
-int
-cpu_exec_prep_oldzmagic(p, epp)
- struct proc *p;
- struct exec_package *epp;
-{
- struct exec *execp = epp->ep_hdr;
- struct exec_vmcmd *ccmdp;
-
- epp->ep_taddr = 0;
- epp->ep_tsize = execp->a_text;
- epp->ep_daddr = epp->ep_taddr + execp->a_text;
- epp->ep_dsize = execp->a_data + execp->a_bss;
- epp->ep_entry = execp->a_entry;
-
- /* check if vnode is in open for writing, because we want to
- * demand-page out of it. if it is, don't do it, for various reasons */
- if ((execp->a_text != 0 || execp->a_data != 0) &&
- epp->ep_vp->v_writecount != 0) {
-#ifdef DIAGNOSTIC
- if (epp->ep_vp->v_flag & VTEXT)
- panic("exec: a VTEXT vnode has writecount != 0\n");
-#endif
- return ETXTBSY;
- }
- epp->ep_vp->v_flag |= VTEXT;
-
- /* set up command for text segment */
- NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_pagedvn, execp->a_text,
- epp->ep_taddr, epp->ep_vp, NBPG, /* should NBPG be CLBYTES? */
- VM_PROT_READ | VM_PROT_EXECUTE);
-
- /* set up command for data segment */
- NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_pagedvn, execp->a_data,
- epp->ep_daddr, epp->ep_vp,
- execp->a_text + NBPG, /* should NBPG be CLBYTES? */
- VM_PROT_READ | VM_PROT_WRITE | VM_PROT_EXECUTE);
-
- /* set up command for bss segment */
- NEW_VMCMD(&epp->ep_vmcmds, vmcmd_map_zero, execp->a_bss,
- epp->ep_daddr + execp->a_data, NULLVP, 0,
- VM_PROT_READ | VM_PROT_WRITE | VM_PROT_EXECUTE);
-
- return exec_aout_setup_stack(p, epp);
-}
-#endif /* COMPAT_NOMID */
-
static char *envbuf = NULL;
+void initenv __P((u_long, char *));
+
void
initenv(flag, buf)
u_long flag;
@@ -1423,6 +1432,8 @@ initenv(flag, buf)
}
}
+static char toupper __P((char));
+
static char
toupper(c)
char c;
@@ -1434,6 +1445,8 @@ toupper(c)
}
}
+static long getenv __P((char *));
+
static long
getenv(str)
char *str;
@@ -1447,7 +1460,7 @@ getenv(str)
* without an "=val".
*/
- char *s, *s1, *s2;
+ char *s, *s1;
int val, base;
s = envbuf;
@@ -1495,7 +1508,24 @@ getenv(str)
}
/*
- *ROM Vector information for calling drivers in ROMs
+ * ROM Vector information for calling drivers in ROMs
+ *
+ * Egret, ADBReInit_JTBL and ROMResourceMap were added to these
+ * tables. Egret probably isn't used anyplace anymore, but I was
+ * inspired by the default value that was used in "macrom.c". That
+ * value was most likely non-functional for all but a few systems,
+ * so putting it here will hopefully localize system-specific ROM
+ * addresses. Likewise ADBReInit_JTBL and ROMResourceMap are
+ * currently used on only a few systems, but changes in the Booter
+ * and changes in ROM Mapping were causing problems. Hopefully
+ * those problems will be eliminated by having the proper addresses
+ * for those machines in this table.
+ *
+ * What we probably need is a little MacOS Utility that can suck all
+ * these addresses from the System, tell the user if his/er system
+ * is currently supported via the romvec tables, and provide a
+ * formatted output file for inclusion here if it isn't.
+ * Bob Nestor - <rnestor@metronet.com>
*/
static romvec_t romvecs[] =
{
@@ -1503,7 +1533,7 @@ static romvec_t romvecs[] =
{ /* 0 */
"Mac II class ROMs",
(caddr_t) 0x40807002, /* where does ADB interrupt */
- 0, /* PM interrupt (?) */
+ (caddr_t) 0x0, /* PM interrupt (?) */
(caddr_t) 0x4080a4d8, /* ADBBase + 130 interrupt; whatzit? */
(caddr_t) 0x40807778, /* CountADBs */
(caddr_t) 0x40807792, /* GetIndADB */
@@ -1511,18 +1541,23 @@ static romvec_t romvecs[] =
(caddr_t) 0x408077c4, /* SetADBInfo */
(caddr_t) 0x40807704, /* ADBReInit */
(caddr_t) 0x408072fa, /* ADBOp */
- 0, /* PMgrOp */
+ (caddr_t) 0x0, /* PMgrOp */
(caddr_t) 0x4080d6d0, /* WriteParam */
(caddr_t) 0x4080d6fa, /* SetDateTime */
(caddr_t) 0x4080dbe8, /* InitUtil */
(caddr_t) 0x4080dd78, /* ReadXPRam */
(caddr_t) 0x4080dd82, /* WriteXPRam */
(caddr_t) 0x4080ddd6, /* jClkNoMem */
- 0, /* ADBAlternateInit */
- 0, /* InitEgret */
+ (caddr_t) 0x0, /* ADBAlternateInit */
+ (caddr_t) 0x0, /* Egret */
+ (caddr_t) 0x0, /* InitEgret */
+ (caddr_t) 0x0, /* ADBReInit_JTBL */
+ (caddr_t) 0x0, /* ROMResourceMap List Head */
+ (caddr_t) 0x40814c58, /* FixDiv */
+ (caddr_t) 0x40814b64, /* FixMul */
},
/*
- * Vectors verified for PB 140, PB 170
+ * Vectors verified for PB 140, PB 145, PB 170
* (PB 100?)
*/
{ /* 1 */
@@ -1544,7 +1579,12 @@ static romvec_t romvecs[] =
(caddr_t) 0x4080b190, /* WriteXPRam */
(caddr_t) 0x4080b1e4, /* jClkNoMem */
(caddr_t) 0x4080a818, /* ADBAlternateInit */
+ (caddr_t) 0x40814800, /* Egret */
(caddr_t) 0x408147c4, /* InitEgret */
+ (caddr_t) 0x0, /* ADBReInit_JTBL */
+ (caddr_t) 0x0, /* ROMResourceMap List Head */
+ (caddr_t) 0x4081c406, /* FixDiv */
+ (caddr_t) 0x4081c312, /* FixMul */
},
/*
* Vectors verified for IIsi, IIvx, IIvi
@@ -1552,7 +1592,7 @@ static romvec_t romvecs[] =
{ /* 2 */
"Mac IIsi class ROMs",
(caddr_t) 0x40814912, /* ADB interrupt */
- (caddr_t) 0, /* PM ADB interrupt */
+ (caddr_t) 0x0, /* PM ADB interrupt */
(caddr_t) 0x408150f0, /* ADBBase + 130 interrupt; whatzit? */
(caddr_t) 0x4080a360, /* CountADBs */
(caddr_t) 0x4080a37a, /* GetIndADB */
@@ -1560,15 +1600,20 @@ static romvec_t romvecs[] =
(caddr_t) 0x4080a3ac, /* SetADBInfo */
(caddr_t) 0x4080a752, /* ADBReInit */
(caddr_t) 0x4080a3dc, /* ADBOp */
- (caddr_t) 0, /* PMgrOp */
- (caddr_t) 0x4080c05c, /* WriteParam */
- (caddr_t) 0x4080c086, /* SetDateTime */
- (caddr_t) 0x4080c5cc, /* InitUtil */
- (caddr_t) 0x4080b186, /* ReadXPRam */
- (caddr_t) 0x4080b190, /* WriteXPRam */
- (caddr_t) 0x4080b1e4, /* jClkNoMem */
- (caddr_t) 0x4080a818, /* ADBAlternateInit */
- (caddr_t) 0x408147c4, /* InitEgret */
+ (caddr_t) 0x0, /* PMgrOp */
+ (caddr_t) 0x40a0c05c, /* WriteParam */
+ (caddr_t) 0x40a0c086, /* SetDateTime */
+ (caddr_t) 0x40a0c5cc, /* InitUtil */
+ (caddr_t) 0x40a0b186, /* ReadXPRam */
+ (caddr_t) 0x40a0b190, /* WriteXPRam */
+ (caddr_t) 0x40ab39b6, /* jClkNoMem */
+ (caddr_t) 0x40a0a818, /* ADBAlternateInit */
+ (caddr_t) 0x40a14800, /* Egret */
+ (caddr_t) 0x40a147c4, /* InitEgret */
+ (caddr_t) 0x0, /* ADBReInit_JTBL */
+ (caddr_t) 0x0, /* ROMResourceMap List Head */
+ (caddr_t) 0x40a1c406, /* FixDiv */
+ (caddr_t) 0x40a1c312, /* FixMul */
},
/*
* Vectors verified for Mac Classic II and LC II
@@ -1577,7 +1622,7 @@ static romvec_t romvecs[] =
{ /* 3 */
"Mac Classic II ROMs",
(caddr_t) 0x40a14912, /* ADB interrupt */
- (caddr_t) 0, /* PM ADB interrupt */
+ (caddr_t) 0x0, /* PM ADB interrupt */
(caddr_t) 0x40a150f0, /* ADBBase + 130 interrupt; whatzit? */
(caddr_t) 0x40a0a360, /* CountADBs */
(caddr_t) 0x40a0a37a, /* GetIndADB */
@@ -1586,14 +1631,14 @@ static romvec_t romvecs[] =
(caddr_t) 0x40a0a752, /* ADBReInit */
(caddr_t) 0x40a0a3dc, /* ADBOp */
(caddr_t) 0, /* PMgrOp */
- (caddr_t) 0x40a0c05c, /* WriteParam */
- (caddr_t) 0x40a0c086, /* SetDateTime */
- (caddr_t) 0x40a0c5cc, /* InitUtil */
- (caddr_t) 0x40a0b186, /* ReadXPRam */
- (caddr_t) 0x40a0b190, /* WriteXPRam */
- (caddr_t) 0x40ab39b6, /* jClkNoMem */
- (caddr_t) 0x40a0a818, /* ADBAlternateInit */
- (caddr_t) 0x40a147c4, /* InitEgret */
+ (caddr_t) 0x4080c05c, /* WriteParam */
+ (caddr_t) 0x4080c086, /* SetDateTime */
+ (caddr_t) 0x4080c5cc, /* InitUtil */
+ (caddr_t) 0x4080b186, /* ReadXPRam */
+ (caddr_t) 0x4080b190, /* WriteXPRam */
+ (caddr_t) 0x408b39b6, /* jClkNoMem */
+ (caddr_t) 0x4080a818, /* ADBAlternateInit */
+ (caddr_t) 0x408147c4, /* InitEgret */
},
/*
* Vectors verified for IIci, Q700
@@ -1601,7 +1646,7 @@ static romvec_t romvecs[] =
{ /* 4 */
"Mac IIci/Q700 ROMs",
(caddr_t) 0x4080a700, /* ADB interrupt */
- (caddr_t) 0, /* PM ADB interrupt */
+ (caddr_t) 0x0, /* PM ADB interrupt */
(caddr_t) 0x4080a5aa, /* ADBBase + 130 interrupt; whatzit? */
(caddr_t) 0x4080a360, /* CountADBs */
(caddr_t) 0x4080a37a, /* GetIndADB */
@@ -1609,7 +1654,7 @@ static romvec_t romvecs[] =
(caddr_t) 0x4080a3ac, /* SetADBInfo */
(caddr_t) 0x4080a752, /* ADBReInit */
(caddr_t) 0x4080a3dc, /* ADBOp */
- (caddr_t) 0, /* PMgrOp */
+ (caddr_t) 0x0, /* PMgrOp */
(caddr_t) 0x4080c05c, /* WriteParam */
(caddr_t) 0x4080c086, /* SetDateTime */
(caddr_t) 0x4080c5cc, /* InitUtil */
@@ -1617,7 +1662,12 @@ static romvec_t romvecs[] =
(caddr_t) 0x4080b190, /* WriteXPRam */
(caddr_t) 0x4080b1e4, /* jClkNoMem */
(caddr_t) 0x4080a818, /* ADBAlternateInit */
+ (caddr_t) 0x0, /* Egret */
(caddr_t) 0x408147c4, /* InitEgret */
+ (caddr_t) 0x0, /* ADBReInit_JTBL */
+ (caddr_t) 0x0, /* ROMResourceMap List Head */
+ (caddr_t) 0x4081c406, /* FixDiv */
+ (caddr_t) 0x4081c312, /* FixMul */
},
/*
* Vectors verified for Duo 230, PB 180, PB 165
@@ -1640,9 +1690,14 @@ static romvec_t romvecs[] =
(caddr_t) 0x4080c5cc, /* InitUtil */
(caddr_t) 0x4080b186, /* ReadXPRam */
(caddr_t) 0x4080b190, /* WriteXPRam */
- (caddr_t) 0x0, /* jClkNoMem */
+ (caddr_t) 0x408b39b2, /* jClkNoMem */ /* From PB180 */
(caddr_t) 0x4080a818, /* ADBAlternateInit */
- (caddr_t) 0x408147c4, /* InitEgret */
+ (caddr_t) 0x40814800, /* Egret */
+ (caddr_t) 0x40888400, /* InitPwrMgr */ /* From PB180 */
+ (caddr_t) 0x0, /* ADBReInit_JTBL */
+ (caddr_t) 0x0, /* ROMResourceMap List Head */
+ (caddr_t) 0x4081c406, /* FixDiv, wild guess */
+ (caddr_t) 0x4081c312, /* FixMul, wild guess */
},
/*
* Quadra, Centris merged table (C650, 610, Q800?)
@@ -1650,7 +1705,7 @@ static romvec_t romvecs[] =
{ /* 6 */
"Quadra/Centris ROMs",
(caddr_t) 0x408b2dea, /* ADB int */
- 0, /* PM intr */
+ (caddr_t) 0x0, /* PM intr */
(caddr_t) 0x408b2c72, /* ADBBase + 130 */
(caddr_t) 0x4080a360, /* CountADBs */
(caddr_t) 0x4080a37a, /* GetIndADB */
@@ -1666,7 +1721,12 @@ static romvec_t romvecs[] =
(caddr_t) 0x4080b190, /* WriteXPRam */
(caddr_t) 0x408b39b6, /* jClkNoMem */
(caddr_t) 0x4080a818, /* ADBAlternateInit */
+ (caddr_t) 0x40814800, /* Egret */
(caddr_t) 0x408147c4, /* InitEgret */
+ (caddr_t) 0x0, /* ADBReInit_JTBL */
+ (caddr_t) 0x0, /* ROMResourceMap List Head */
+ (caddr_t) 0x4081c406, /* FixDiv, wild guess */
+ (caddr_t) 0x4081c312, /* FixMul, wild guess */
},
/*
* Quadra 840AV (but ADBBase + 130 intr is unknown)
@@ -1675,23 +1735,28 @@ static romvec_t romvecs[] =
{ /* 7 */
"Quadra AV ROMs",
(caddr_t) 0x4080cac6, /* ADB int */
- 0, /* PM int */
- /* !?! */ 0, /* ADBBase + 130 */
+ (caddr_t) 0x0, /* PM int */
+ (caddr_t) 0x40805cd4, /* ADBBase + 130 */
(caddr_t) 0x40839600, /* CountADBs */
(caddr_t) 0x4083961a, /* GetIndADB */
(caddr_t) 0x40839646, /* GetADBInfo */
(caddr_t) 0x4083964c, /* SetADBInfo */
(caddr_t) 0x408397b8, /* ADBReInit */
(caddr_t) 0x4083967c, /* ADBOp */
- 0, /* PMgrOp */
- (caddr_t) 0x0, /* WriteParam */
- (caddr_t) 0x0, /* SetDateTime */
- (caddr_t) 0x0, /* InitUtil */
- (caddr_t) 0x0, /* ReadXPRam */
- (caddr_t) 0x0, /* WriteXPRam */
- (caddr_t) 0x0, /* jClkNoMem */
- 0, /* ADBAlternateInit */
- 0, /* InitEgret */
+ (caddr_t) 0x0, /* PMgrOp */
+ (caddr_t) 0x4081141c, /* WriteParam */
+ (caddr_t) 0x4081144e, /* SetDateTime */
+ (caddr_t) 0x40811930, /* InitUtil */
+ (caddr_t) 0x4080b624, /* ReadXPRam */
+ (caddr_t) 0x4080b62e, /* WriteXPRam */
+ (caddr_t) 0x40806884, /* jClkNoMem */
+ (caddr_t) 0x408398c2, /* ADBAlternateInit */
+ (caddr_t) 0x4080cada, /* Egret */
+ (caddr_t) 0x4080de14, /* InitEgret */
+ (caddr_t) 0x408143b8, /* ADBReInit_JTBL */
+ (caddr_t) 0x409bdb60, /* ROMResourceMap List Head */
+ (caddr_t) 0x4083b3d8, /* FixDiv */
+ (caddr_t) 0x4083b2e4, /* FixMul */
},
/*
* PB 540 (but ADBBase + 130 intr and PMgrOp is unknown)
@@ -1701,22 +1766,27 @@ static romvec_t romvecs[] =
"68040 PowerBook ROMs",
(caddr_t) 0x400b2efc, /* ADB int */
(caddr_t) 0x400d8e66, /* PM int */
- /* !?! */ 0, /* ADBBase + 130 */
+ (caddr_t) 0x0, /* ADBBase + 130 */
(caddr_t) 0x4000a360, /* CountADBs */
(caddr_t) 0x4000a37a, /* GetIndADB */
(caddr_t) 0x4000a3a6, /* GetADBInfo */
(caddr_t) 0x4000a3ac, /* SetADBInfo */
(caddr_t) 0x4000a752, /* ADBReInit */
(caddr_t) 0x4000a3dc, /* ADBOp */
- /* !?! */ 0, /* PmgrOp */
- (caddr_t) 0x4080c05c, /* WriteParam */
- (caddr_t) 0x4080c086, /* SetDateTime */
- (caddr_t) 0x4080c5cc, /* InitUtil */
- (caddr_t) 0x4080b186, /* ReadXPRam */
- (caddr_t) 0x4080b190, /* WriteXPRam */
- (caddr_t) 0x0, /* jClkNoMem */
- (caddr_t) 0x4080a818, /* ADBAlternateInit */
- (caddr_t) 0x408147c4, /* InitEgret */
+ (caddr_t) 0x0, /* PmgrOp */
+ (caddr_t) 0x4000c05c, /* WriteParam */
+ (caddr_t) 0x4000c086, /* SetDateTime */
+ (caddr_t) 0x4000c5cc, /* InitUtil */
+ (caddr_t) 0x4000b186, /* ReadXPRam */
+ (caddr_t) 0x4000b190, /* WriteXPRam */
+ (caddr_t) 0x0, /* jClkNoMem */
+ (caddr_t) 0x4000a818, /* ADBAlternateInit */
+ (caddr_t) 0x40814800, /* Egret */
+ (caddr_t) 0x400147c4, /* InitEgret */
+ (caddr_t) 0x0, /* ADBReInit_JTBL */
+ (caddr_t) 0x0, /* ROMResourceMap List Head */
+ (caddr_t) 0x4001c406, /* FixDiv, wild guess */
+ (caddr_t) 0x4001c312, /* FixMul, wild guess */
},
/*
* Q 605 (but guessing at ADBBase + 130, based on Q 650)
@@ -1724,7 +1794,7 @@ static romvec_t romvecs[] =
{ /* 9 */
"Quadra/Centris 605 ROMs",
(caddr_t) 0x408a9b56, /* ADB int */
- 0, /* PM int */
+ (caddr_t) 0x0, /* PM int */
(caddr_t) 0x408a99de, /* ADBBase + 130 */
(caddr_t) 0x4080a360, /* CountADBs */
(caddr_t) 0x4080a37a, /* GetIndADB */
@@ -1732,18 +1802,23 @@ static romvec_t romvecs[] =
(caddr_t) 0x4080a3ac, /* SetADBInfo */
(caddr_t) 0x4080a752, /* ADBReInit */
(caddr_t) 0x4080a3dc, /* ADBOp */
- 0, /* PmgrOp */
+ (caddr_t) 0x0, /* PmgrOp */
(caddr_t) 0x4080c05c, /* WriteParam */
(caddr_t) 0x4080c086, /* SetDateTime */
(caddr_t) 0x4080c5cc, /* InitUtil */
(caddr_t) 0x4080b186, /* ReadXPRam */
(caddr_t) 0x4080b190, /* WriteXPRam */
- (caddr_t) 0x0, /* jClkNoMem */
+ (caddr_t) 0x0, /* jClkNoMem */
(caddr_t) 0x4080a818, /* ADBAlternateInit */
+ (caddr_t) 0x40814800, /* Egret */
(caddr_t) 0x408147c4, /* InitEgret */
+ (caddr_t) 0x0, /* ADBReInit_JTBL */
+ (caddr_t) 0x0, /* ROMResourceMap List Head */
+ (caddr_t) 0x4081c406, /* FixDiv, wild guess */
+ (caddr_t) 0x4081c312, /* FixMul, wild guess */
},
/*
- * Vectors verified for Duo 270c
+ * Vectors verified for Duo 270c, PB150
*/
{ /* 10 */
"Duo 270C ROMs",
@@ -1762,9 +1837,72 @@ static romvec_t romvecs[] =
(caddr_t) 0x4080c5cc, /* InitUtil */
(caddr_t) 0x4080b186, /* ReadXPRam */
(caddr_t) 0x4080b190, /* WriteXPRam */
- (caddr_t) 0x0, /* jClkNoMem */
+ (caddr_t) 0x408b3bf8, /* jClkNoMem */ /* from PB 150 */
+ (caddr_t) 0x4080a818, /* ADBAlternateInit */
+ (caddr_t) 0x40814800, /* Egret */
+ (caddr_t) 0x408147c4, /* InitEgret */
+ (caddr_t) 0x0, /* ADBReInit_JTBL */
+ (caddr_t) 0x0, /* ROMResourceMap List Head */
+ (caddr_t) 0x4081c406, /* FixDiv, wild guess */
+ (caddr_t) 0x4081c312, /* FixMul, wild guess */
+ },
+ /*
+ * Vectors verified for Performa/LC 550
+ */
+ { /* 11 */
+ "P/LC 550 ROMs",
+ (caddr_t) 0x408d16d6, /* ADB interrupt */
+ (caddr_t) 0x0, /* PB ADB interrupt */
+ (caddr_t) 0x408b2f84, /* ADBBase + 130 interrupt; whatzit? */
+ (caddr_t) 0x4080a360, /* CountADBs */
+ (caddr_t) 0x4080a37a, /* GetIndADB */
+ (caddr_t) 0x4080a3a6, /* GetADBInfo */
+ (caddr_t) 0x4080a3ac, /* SetADBInfo */
+ (caddr_t) 0x4080a752, /* ADBReInit */
+ (caddr_t) 0x4080a3dc, /* ADBOp */
+ (caddr_t) 0x0, /* PMgrOp */
+ (caddr_t) 0x4080c05c, /* WriteParam */
+ (caddr_t) 0x4080c086, /* SetDateTime */
+ (caddr_t) 0x4080c5cc, /* InitUtil */
+ (caddr_t) 0x4080b186, /* ReadXPRam */
+ (caddr_t) 0x4080b190, /* WriteXPRam */
+ (caddr_t) 0x408b3c04, /* jClkNoMem */
(caddr_t) 0x4080a818, /* ADBAlternateInit */
+ (caddr_t) 0x408d1450, /* Egret */
(caddr_t) 0x408147c4, /* InitEgret */
+ (caddr_t) 0x408d24a4, /* ADBReInit_JTBL */
+ (caddr_t) 0x4087eb90, /* ROMResourceMap List Head */
+ (caddr_t) 0x4081c406, /* FixDiv for P550 */
+ (caddr_t) 0x4081c312, /* FixMul for P550 */
+ },
+ /*
+ * Vectors for the MacTV
+ */
+ { /* 12 */
+ "MacTV ROMs",
+ (caddr_t) 0x40acfed6, /* ADB interrupt */
+ (caddr_t) 0x0, /* PB ADB interrupt */
+ (caddr_t) 0x40ab2f84, /* ADBBase + 130 interrupt; whatzit? */
+ (caddr_t) 0x40a0a360, /* CountADBs */
+ (caddr_t) 0x40a0a37a, /* GetIndADB */
+ (caddr_t) 0x40a0a3a6, /* GetADBInfo */
+ (caddr_t) 0x40a0a3ac, /* SetADBInfo */
+ (caddr_t) 0x40a0a752, /* ADBReInit */
+ (caddr_t) 0x40a0a3dc, /* ADBOp */
+ (caddr_t) 0x0, /* PMgrOp */
+ (caddr_t) 0x40a0c05c, /* WriteParam */
+ (caddr_t) 0x40a0c086, /* SetDateTime */
+ (caddr_t) 0x40a0c5cc, /* InitUtil */
+ (caddr_t) 0x40a0b186, /* ReadXPRam */
+ (caddr_t) 0x40a0b190, /* WriteXPRam */
+ (caddr_t) 0x40ab3bf4, /* jClkNoMem */
+ (caddr_t) 0x40a0a818, /* ADBAlternateInit */
+ (caddr_t) 0x40ad1450, /* Egret */
+ (caddr_t) 0x40a147c4, /* InitEgret */
+ (caddr_t) 0x0, /* ADBReInit_JTBL */
+ (caddr_t) 0x0, /* ROMResourceMap List Head */
+ (caddr_t) 0x40a1c406, /* FixDiv */
+ (caddr_t) 0x40a1c312, /* FixMul */
},
/* Please fill these in! -BG */
};
@@ -1788,7 +1926,7 @@ struct cpu_model_info cpu_models[] = {
/* The Centris/Quadra series. */
{MACH_MACQ700, "Quadra", " 700 ", MACH_CLASSQ, &romvecs[4]},
{MACH_MACQ900, "Quadra", " 900 ", MACH_CLASSQ, &romvecs[6]},
- {MACH_MACQ950, "Quadra", " 950 ", MACH_CLASSQ, &romvecs[6]},
+ {MACH_MACQ950, "Quadra", " 950 ", MACH_CLASSQ, &romvecs[2]},
{MACH_MACQ800, "Quadra", " 800 ", MACH_CLASSQ, &romvecs[6]},
{MACH_MACQ650, "Quadra", " 650 ", MACH_CLASSQ, &romvecs[6]},
{MACH_MACC650, "Centris", " 650 ", MACH_CLASSQ, &romvecs[6]},
@@ -1796,45 +1934,46 @@ struct cpu_model_info cpu_models[] = {
{MACH_MACC610, "Centris", " 610 ", MACH_CLASSQ, &romvecs[6]},
{MACH_MACQ610, "Quadra", " 610 ", MACH_CLASSQ, &romvecs[6]},
{MACH_MACQ630, "Quadra", " 630 ", MACH_CLASSQ, &romvecs[6]},
- {MACH_MACC660AV, "Centris", " 660AV ", MACH_CLASSQ, &romvecs[7]},
- {MACH_MACQ840AV, "Quadra", " 840AV ", MACH_CLASSQ, &romvecs[7]},
+ {MACH_MACC660AV, "Centris", " 660AV ", MACH_CLASSAV, &romvecs[7]},
+ {MACH_MACQ840AV, "Quadra", " 840AV ", MACH_CLASSAV, &romvecs[7]},
/* The Powerbooks/Duos... */
{MACH_MACPB100, "PowerBook", " 100 ", MACH_CLASSPB, &romvecs[1]},
/* PB 100 has no MMU! */
{MACH_MACPB140, "PowerBook", " 140 ", MACH_CLASSPB, &romvecs[1]},
{MACH_MACPB145, "PowerBook", " 145 ", MACH_CLASSPB, &romvecs[1]},
+ {MACH_MACPB150, "PowerBook", " 150 ", MACH_CLASSPB, &romvecs[10]},
{MACH_MACPB160, "PowerBook", " 160 ", MACH_CLASSPB, &romvecs[5]},
{MACH_MACPB165, "PowerBook", " 165 ", MACH_CLASSPB, &romvecs[5]},
{MACH_MACPB165C, "PowerBook", " 165c ", MACH_CLASSPB, &romvecs[5]},
{MACH_MACPB170, "PowerBook", " 170 ", MACH_CLASSPB, &romvecs[1]},
{MACH_MACPB180, "PowerBook", " 180 ", MACH_CLASSPB, &romvecs[5]},
{MACH_MACPB180C, "PowerBook", " 180c ", MACH_CLASSPB, &romvecs[5]},
- {MACH_MACPB210, "PowerBook", " 210 ", MACH_CLASSPB, &romvecs[5]},
- {MACH_MACPB230, "PowerBook", " 230 ", MACH_CLASSPB, &romvecs[5]},
- {MACH_MACPB250, "PowerBook", " 250 ", MACH_CLASSPB, &romvecs[5]},
- {MACH_MACPB270, "PowerBook", " 270 ", MACH_CLASSPB, &romvecs[5]},
- {MACH_MACPB280, "PowerBook", " 280 ", MACH_CLASSPB, &romvecs[5]},
- {MACH_MACPB280C, "PowerBook", " 280C ", MACH_CLASSPB, &romvecs[5]},
+
+/* The Duos */
+ {MACH_MACPB210, "PowerBook Duo", " 210 ", MACH_CLASSDUO, &romvecs[5]},
+ {MACH_MACPB230, "PowerBook Duo", " 230 ", MACH_CLASSDUO, &romvecs[5]},
+ {MACH_MACPB250, "PowerBook Duo", " 250 ", MACH_CLASSDUO, &romvecs[5]},
+ {MACH_MACPB270, "PowerBook Duo", " 270 ", MACH_CLASSDUO, &romvecs[5]},
+ {MACH_MACPB280, "PowerBook Duo", " 280 ", MACH_CLASSDUO, &romvecs[5]},
+ {MACH_MACPB280C, "PowerBook Duo", " 280C ", MACH_CLASSDUO, &romvecs[5]},
/* The Performas... */
{MACH_MACP600, "Performa", " 600 ", MACH_CLASSIIvx, &romvecs[2]},
{MACH_MACP460, "Performa", " 460 ", MACH_CLASSLC, &romvecs[3]},
- {MACH_MACP550, "Performa", " 550 ", MACH_CLASSLC, &romvecs[3]},
+ {MACH_MACP550, "Performa", " 550 ", MACH_CLASSLC, &romvecs[11]},
+ {MACH_MACTV, "TV ", "", MACH_CLASSLC, &romvecs[12]},
/* The LCs... */
{MACH_MACLCII, "LC", " II ", MACH_CLASSLC, &romvecs[3]},
{MACH_MACLCIII, "LC", " III ", MACH_CLASSLC, &romvecs[3]},
- {MACH_MACLC475, "LC", " 475 ", MACH_CLASSLC, &romvecs[3]},
+ {MACH_MACLC475, "LC", " 475 ", MACH_CLASSQ, &romvecs[9]},
{MACH_MACLC520, "LC", " 520 ", MACH_CLASSLC, &romvecs[3]},
{MACH_MACLC575, "LC", " 575 ", MACH_CLASSLC, &romvecs[3]},
{MACH_MACCCLASSIC, "Color Classic ", "", MACH_CLASSLC, &romvecs[3]},
/* Does this belong here? */
{MACH_MACCLASSICII, "Classic", " II ", MACH_CLASSLC, &romvecs[3]},
-/* The hopeless ones... */
- {MACH_MACTV, "TV ", "", MACH_CLASSH, NULL},
-
/* The unknown one and the end... */
{0, "Unknown", "", MACH_CLASSII, NULL},
{0, NULL, NULL, 0, NULL},
@@ -1856,6 +1995,8 @@ struct cpu_model_info cpu_models[] = {
char cpu_model[120]; /* for sysctl() */
+int mach_cputype __P((void));
+
int
mach_cputype()
{
@@ -1889,10 +2030,11 @@ identifycpu()
printf("%s\n", cpu_model);
}
+static void get_machine_info __P((void));
+
static void
get_machine_info()
{
- char *proc;
int i;
for (i = 0; cpu_models[i].model_major; i++) {
@@ -1909,7 +2051,9 @@ get_machine_info()
/*
* getenvvars: Grab a few useful variables
*/
-extern void
+void getenvvars __P((void));
+
+void
getenvvars()
{
extern u_long bootdev, videobitdepth, videosize;
@@ -1996,10 +2140,13 @@ getenvvars()
}
struct cpu_model_info *current_mac_model;
+romvec_t *mrg_MacOSROMVectors = 0;
/*
* Sets a bunch of machine-specific variables
*/
+void setmachdep __P((void));
+
void
setmachdep()
{
@@ -2023,10 +2170,13 @@ setmachdep()
return;
/*
- * Set up current ROM Glue vectors
+ * Set up current ROM Glue vectors. Actually now all we do
+ * is save the address of the ROM Glue Vector table. This gets
+ * used later when we re-map the vectors from MacOS Address
+ * Space to NetBSD Address Space.
*/
if ((mac68k_machine.serial_console & 0x01) == 0)
- mrg_setvectors(cpui->rom_vectors);
+ mrg_MacOSROMVectors = cpui->rom_vectors;
/*
* Set up any machine specific stuff that we have to before
@@ -2053,7 +2203,24 @@ setmachdep()
/* Are we disabling something important? */
via_reg(VIA2, vIER) = 0x7f; /* disable VIA2 int */
break;
+ case MACH_CLASSDUO:
+ /*
+ * The Duo definitely does not use a VIA2, but it looks
+ * like the VIA2 functions might be on the MSC at the RBV
+ * locations. The rest is copied from the Powerbooks.
+ */
+ VIA2 = 0x13;
+ IOBase = 0x50f00000;
+ Via1Base = (volatile u_char *) IOBase;
+ mac68k_machine.scsi80 = 1;
+ mac68k_machine.sccClkConst = 115200;
+ /* Disable everything but PM; we need it. */
+ via_reg(VIA1, vIER) = 0x6f; /* disable VIA1 int */
+ /* Are we disabling something important? */
+ via_reg(VIA2, rIER) = 0x7f; /* disable VIA2 int */
+ break;
case MACH_CLASSQ:
+ case MACH_CLASSAV:
VIA2 = 1;
IOBase = 0x50f00000;
Via1Base = (volatile u_char *) IOBase;
@@ -2118,42 +2285,18 @@ mac68k_set_io_offsets(base)
extern volatile u_char *ASCBase;
switch (current_mac_model->class) {
- case MACH_CLASSII:
- Via1Base = (volatile u_char *) base;
- sccA = (volatile u_char *) base + 0x4000;
- ASCBase = (volatile u_char *) base + 0x14000;
- SCSIBase = base;
- break;
- case MACH_CLASSPB:
- Via1Base = (volatile u_char *) base;
- sccA = (volatile u_char *) base + 0x4000;
- ASCBase = (volatile u_char *) base + 0x14000;
- SCSIBase = base;
- break;
case MACH_CLASSQ:
Via1Base = (volatile u_char *) base;
sccA = (volatile u_char *) base + 0xc000;
ASCBase = (volatile u_char *) base + 0x14000;
SCSIBase = base;
break;
+ case MACH_CLASSII:
+ case MACH_CLASSPB:
+ case MACH_CLASSAV:
case MACH_CLASSIIci:
- Via1Base = (volatile u_char *) base;
- sccA = (volatile u_char *) base + 0x4000;
- ASCBase = (volatile u_char *) base + 0x14000;
- SCSIBase = base;
- break;
case MACH_CLASSIIsi:
- Via1Base = (volatile u_char *) base;
- sccA = (volatile u_char *) base + 0x4000;
- ASCBase = (volatile u_char *) base + 0x14000;
- SCSIBase = base;
- break;
case MACH_CLASSIIvx:
- Via1Base = (volatile u_char *) base;
- sccA = (volatile u_char *) base + 0x4000;
- ASCBase = (volatile u_char *) base + 0x14000;
- SCSIBase = base;
- break;
case MACH_CLASSLC:
Via1Base = (volatile u_char *) base;
sccA = (volatile u_char *) base + 0x4000;
@@ -2209,7 +2352,7 @@ gray_bar()
#endif
/* in locore */
-extern int get_pte(u_int addr, u_long pte[2], u_short * psr);
+extern int get_pte __P((u_int addr, u_long pte[2], u_short * psr));
/*
* LAK (7/24/94): given a logical address, puts the physical address
@@ -2217,7 +2360,9 @@ extern int get_pte(u_int addr, u_long pte[2], u_short * psr);
* to look through MacOS page tables.
*/
-u_long
+static u_long get_physical __P((u_int, u_long *));
+
+static u_long
get_physical(u_int addr, u_long * phys)
{
u_long pte[2], ph;
@@ -2265,7 +2410,9 @@ get_physical(u_int addr, u_long * phys)
return 1;
}
-void
+static void check_video __P((char *, u_long, u_long));
+
+static void
check_video(id, limit, maxm)
char *id;
u_long limit, maxm;
@@ -2287,7 +2434,7 @@ check_video(id, limit, maxm)
printf("mapping: %s. Does it never end?\n",
id);
printf(" Forcing VRAM size ");
- printf("to a conservative %dK.\n", maxm / 1024);
+ printf("to a conservative %ldK.\n", maxm/1024);
mac68k_vidlen = maxm;
break;
}
@@ -2332,9 +2479,9 @@ get_mapping(void)
}
}
#if 1
- printf("System RAM: %d bytes in %d pages.\n", addr, addr / NBPG);
+ printf("System RAM: %ld bytes in %ld pages.\n", addr, addr / NBPG);
for (i = 0; i < numranges; i++) {
- printf(" Low = 0x%x, high = 0x%x\n", low[i], high[i]);
+ printf(" Low = 0x%lx, high = 0x%lx\n", low[i], high[i]);
}
#endif
@@ -2361,7 +2508,7 @@ get_mapping(void)
if (!get_physical(addr, &phys)) {
continue;
}
- len = nblen[nbnumranges - 1];
+ len = nbnumranges == 0 ? 0 : nblen[nbnumranges - 1];
/* printf ("0x%x --> 0x%x\n", addr, phys); */
if (nbnumranges > 0
@@ -2370,10 +2517,10 @@ get_mapping(void)
nblen[nbnumranges - 1] += 32768;
same = 1;
} else {
- if (nbnumranges > 0
+ if ((nbnumranges > 0)
&& !same
- && addr == nblog[nbnumranges - 1] + len
- && phys == nbphys[nbnumranges - 1] + len) {
+ && (addr == nblog[nbnumranges - 1] + len)
+ && (phys == nbphys[nbnumranges - 1] + len)) {
nblen[nbnumranges - 1] += 32768;
} else {
if (same) {
@@ -2396,10 +2543,10 @@ get_mapping(void)
nblen[nbnumranges - 1] = -nblen[nbnumranges - 1];
same = 0;
}
-#if 1
+#if 0
printf("Non-system RAM (nubus, etc.):\n");
for (i = 0; i < nbnumranges; i++) {
- printf(" Log = 0x%x, Phys = 0x%x, Len = 0x%x (%ud)\n",
+ printf(" Log = 0x%lx, Phys = 0x%lx, Len = 0x%lx (%lu)\n",
nblog[i], nbphys[i], nblen[i], nblen[i]);
}
#endif
@@ -2423,29 +2570,25 @@ get_mapping(void)
}
if (i == nbnumranges) {
if (0x60000000 <= videoaddr && videoaddr < 0x70000000) {
+ printf("Checking for Internal Video ");
/*
* Kludge for IIvx internal video (60b0 0000).
* PB 520 (6000 0000)
*/
- check_video("IIvx/PB kludge", 1 * 1024 * 1024,
+ check_video("PB/IIvx (0x60?00000)", 1 * 1024 * 1024,
1 * 1024 * 1024);
} else if (0x50F40000 <= videoaddr && videoaddr < 0x50FBFFFF) {
/*
* Kludge for LC internal video
*/
- check_video("LC video kludge", 512 * 1024, 512 * 1024);
- } else if (0x90000000 <= videoaddr && videoaddr < 0xF0000000) {
- /*
- * Kludge for NuBus Superspace video
- */
- check_video("NuBus Super kludge",
- 4 * 1024 * 1024, 1 * 1024 * 1024);
+ check_video("LC video (0x50f40000)",
+ 512 * 1024, 512 * 1024);
} else {
printf( " no internal video at address 0 -- "
- "videoaddr is 0x%x.\n", videoaddr);
+ "videoaddr is 0x%lx.\n", videoaddr);
}
} else {
- printf(" Video address = 0x%x\n", videoaddr);
+ printf(" Video address = 0x%lx\n", videoaddr);
printf(" Int video starts at 0x%x\n",
mac68k_vidlog);
printf(" Length = 0x%x (%d) bytes\n",
@@ -2458,6 +2601,7 @@ get_mapping(void)
/*
* Debugging code for locore page-traversal routine.
*/
+void printstar __P((void));
void
printstar(void)
{
diff --git a/sys/arch/mac68k/mac68k/macrom.c b/sys/arch/mac68k/mac68k/macrom.c
index 09d832a52f3..8e3eead7308 100644
--- a/sys/arch/mac68k/mac68k/macrom.c
+++ b/sys/arch/mac68k/mac68k/macrom.c
@@ -1,4 +1,4 @@
-/* $NetBSD: macrom.c,v 1.18 1995/10/01 02:29:32 briggs Exp $ */
+/* $NetBSD: macrom.c,v 1.25 1996/05/25 14:45:34 briggs Exp $ */
/*-
* Copyright (C) 1994 Bradley A. Grantham
@@ -45,9 +45,16 @@
* are similar to the IIsi ("Universal ROMs"?).
*/
-#include <sys/types.h>
#include <sys/param.h>
-#include "via.h"
+#include <sys/systm.h>
+#include <sys/queue.h>
+
+#include <vm/vm_prot.h>
+#include <vm/vm_param.h>
+#include <vm/lock.h>
+#include <vm/pmap.h>
+
+#include <machine/viareg.h>
#include "macrom.h"
#include <sys/malloc.h>
#include <machine/cpu.h>
@@ -69,13 +76,47 @@
u_char mrg_adbstore[512];
u_char mrg_adbstore2[512];
u_char mrg_adbstore3[512];
+u_char mrg_ExpandMem[512]; /* 0x1ea Bytes minimum */
+u_char mrg_adbstore4[32]; /* 0x16 bytes was the largest I found yet */
+u_char mrg_adbstore5[80]; /* 0x46 bytes minimum */
+
+/*
+ * InitEgret in the AV ROMs requires a low memory global at 0x2010 to be
+ * pointed at this jump table, which can be found at 0x40803280. It's
+ * included here so we can do mrg_fixupROMBase on it.
+ */
-caddr_t mrg_romadbintr = (caddr_t)0x40807002; /* ROM ADB interrupt */
+u_int32_t mrg_AVInitEgretJT[] = {
+ 0x408055D0, 0x4083985A, 0x40839AB6, 0x4080F180,
+ 0x4080C0B6, 0x4080C30A, 0x4080C380, 0x4080C482,
+ 0x4080C496, 0x4080C82E, 0x4080C9FE, 0x4080CA16,
+ 0x4081D1D6, 0x4085CDDE, 0x4080DF28, 0x4080DFC6,
+ 0x4080E292, 0x4080E2C0, 0x4080E348, 0x4080E600,
+ 0x4080E632, 0x4080E6B8, 0x4080E6E4, 0x4080E750,
+ 0x4080E776, 0x4080E7B4, 0x408B90E0, 0x40852490,
+ 0x40852280, 0x40852410, 0x4080E8F0, 0x4080E940,
+ 0x4080E960, 0x4080E9B0, 0x4080E9E0, 0x4080EA50,
+ 0x4080EA70, 0x4080EB14, 0x4080EBC0, 0x4081D1D6,
+ 0x40810AB0, 0x40810BDA, 0x40810CCA, 0x40810FF2,
+ 0x4080FF8C, 0x40810292, 0x40812CE2, 0x40813AAE,
+ 0x40813AE0, 0x408113DE, 0x40811EB0, 0x40811FA0,
+ 0x40811DD0, 0x4083B720, 0x408412E0, 0x40841300,
+ 0x40841380, 0x4083A390, 0x408411F0
+};
+
+caddr_t mrg_romadbintr = (caddr_t)0; /* ROM ADB interrupt */
caddr_t mrg_rompmintr = 0; /* ROM PM (?) interrupt */
char *mrg_romident = NULL; /* ident string for ROMs */
caddr_t mrg_ADBAlternateInit = 0;
caddr_t mrg_InitEgret = 0;
caddr_t mrg_ADBIntrPtr = (caddr_t)0x0; /* ADB interrupt taken from MacOS vector table*/
+caddr_t ROMResourceMap = 0;
+extern romvec_t *mrg_MacOSROMVectors;
+#if defined(MRG_TEST) || defined(MRG_DEBUG)
+caddr_t ResHndls[] = {0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};
+#else
+caddr_t ResHndls[] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
+#endif
/*
* Last straw functions; we didn't set them up, so freak out!
@@ -83,6 +124,186 @@ caddr_t mrg_ADBIntrPtr = (caddr_t)0x0; /* ADB interrupt taken from MacOS vector
* bother to implement them.
*/
+int
+mrg_Delay()
+{
+#define TICK_DURATION 16625
+
+ u_int32_t ticks;
+
+ asm(" movl a0, %0" /* get arguments */
+ :
+ : "g" (ticks)
+ : "a0" );
+
+#if defined(MRG_DEBUG)
+ printf("mrg: mrg_Delay(%d) = %d ms\n", ticks, ticks * 60);
+#endif
+ delay(ticks * TICK_DURATION);
+ return(ticks); /* The number of ticks since startup should be
+ * returned here. Until someone finds a need for
+ * this, we just return the requested number
+ * of ticks */
+}
+
+
+void
+mrg_VBLQueue()
+{
+#define qLink 0
+#define qType 4
+#define vblAddr 6
+#define vblCount 10
+#define vblPhase 12
+
+ caddr_t vbltask;
+ caddr_t last_vbltask;
+
+ last_vbltask = (caddr_t) &VBLQueue_head;
+ vbltask = VBLQueue_head;
+ while (0 != vbltask)
+ {
+ if ( 0 != *((u_int16_t *)(vbltask + vblPhase)) )
+ {
+ *((u_int16_t *)(vbltask + vblPhase)) -= 1;
+ } else
+ {
+ if ( 0 != *((u_int16_t *)(vbltask + vblCount)) )
+ {
+ *((u_int16_t *)(vbltask + vblCount)) -= 1;
+ } else
+ {
+#if defined(MRG_DEBUG)
+printf("mrg: mrg_VBLQueue: calling VBL task at 0x%x with VBLTask block at %p\n",
+ *((u_int32_t *)(vbltask + vblAddr)), vbltask);
+#endif
+ asm(" movml #0xfffe, sp@-
+ movl %0, a0
+ movl %1, a1
+ jbsr a1@
+ movml sp@+, #0x7fff"
+ :
+ : "g" (vbltask), "g" (*((caddr_t)(vbltask + vblAddr)))
+ : "a0", "a1");
+#if defined(MRG_DEBUG)
+ printf("mrg: mrg_VBLQueue: back from VBL task\n");
+#endif
+ if ( 0 == *((u_int16_t *)(vbltask + vblCount)) )
+ {
+#if defined(MRG_DEBUG)
+ printf("mrg: mrg_VBLQueue: removing VBLTask block at %p\n",
+ vbltask);
+#endif
+ *((u_int32_t *)(last_vbltask + qLink)) = *((u_int32_t *)(vbltask + qLink));
+ /* can't free memory from VBLTask block as
+ * we don't know where it came from */
+ if (vbltask == VBLQueue_tail)
+ { /* last task of do{}while */
+ VBLQueue_tail = last_vbltask;
+ }
+ }
+ }
+ }
+ last_vbltask = vbltask;
+ vbltask = (caddr_t) *((u_int32_t *)(vbltask + qLink));
+ } /* while */
+}
+
+void
+mrg_init_stub_1()
+{
+ asm("movml #0xffff, sp@-");
+ printf("mrg: hit mrg_init_stub_1\n");
+ asm("movml sp@+, #0xffff");
+}
+
+void
+mrg_init_stub_2()
+{
+ panic("mrg: hit mrg_init_stub_2\n");
+}
+
+short
+Count_Resources(u_int32_t rsrc_type)
+{
+ rsrc_t *rsrc = (rsrc_t *)ROMResourceMap;
+ short count = 0;
+
+#if defined(MRG_DEBUG)
+ printf("Count_Resources looking for 0x%08lx at 0x%08lx\n",
+ (long)rsrc_type, (long)rsrc);
+#endif
+/*
+ * Return a Count of all the ROM Resouces of the requested type.
+ */
+ if (ROMResourceMap == 0)
+ panic("Oops! Need ROM Resource Map ListHead address!\n");
+
+ while (rsrc != 0) {
+#if defined(MRG_DEBUG)
+ if (rsrc_type == 0)
+ printf("0x%08lx: %04x %04x %04x %04x %08x %08x %08x %04x\n",
+ (long)rsrc, rsrc->unknown[0], rsrc->unknown[1],
+ rsrc->unknown[2], rsrc->unknown[3], rsrc->next,
+ rsrc->body, rsrc->name, rsrc->index);
+#endif
+ if (rsrc_type == 0 || (rsrc_type == rsrc->name))
+ count++;
+ rsrc = rsrc->next == 0 ? 0 : (rsrc_t *)(rsrc->next + ROMBase);
+ }
+#if defined(MRG_DEBUG)
+ printf("Count_Resources found %d\n", count);
+#endif
+ return count;
+}
+
+caddr_t *
+Get_Ind_Resource(u_int32_t rsrc_type, u_int16_t rsrc_ind)
+{
+ rsrc_t *rsrc = (rsrc_t *)ROMResourceMap;
+ short i = 0;
+
+/*
+ * This routine return the "Handle" to a ROM Resource. Since few
+ * ROM Resources are called for in NetBSD we keep a small table
+ * for the Handles we return. (Can't reuse the Handle without
+ * defeating the purpose for a Handle in the first place!) If
+ * we get more requests than we have space for, we panic.
+ */
+
+ if (ROMResourceMap == 0)
+ panic("Oops! Need ROM Resource Map ListHead address!\n");
+
+ while (rsrc != 0) {
+ if (rsrc_type == rsrc->name) {
+ rsrc_ind--;
+ if (rsrc_ind == 0) {
+ for (i = 0;i < sizeof(ResHndls)/sizeof(caddr_t);i++)
+ if ((ResHndls[i] == 0) ||
+ (ResHndls[i] == (caddr_t)(rsrc->next + ROMBase))) {
+ ResHndls[i] = (caddr_t)(rsrc->body + ROMBase);
+ return (caddr_t *)&ResHndls[i];
+ }
+ panic("ResHndls table to small!\n");
+ }
+ }
+ rsrc = rsrc->next == 0 ? 0 : (rsrc_t *)(rsrc->next + ROMBase);
+ }
+ return (caddr_t *) 0;
+}
+
+void
+mrg_FixDiv()
+{
+ panic("Oops! Need ROM address of _FixDiv for this system!\n");
+}
+
+void
+mrg_FixMul()
+{
+ panic("Oops! Need ROM address of _FixMul for this system!\n");
+}
+
void
mrg_1sec_timer_tick()
{
@@ -136,13 +357,14 @@ mrg_adbintr() /* Call ROM ADB Interrupt */
/* Gotta load a1 with VIA address. */
/* ADB int expects it from Mac intr routine. */
asm("
- movml #0xffff, sp@- | better save all registers!
+ movml #0xffff, sp@-
movl %0, a0
movl _VIA, a1
jbsr a0@
- movml sp@+, #0xffff" /* better restore all registers! */
+ movml sp@+, #0xffff"
:
- : "g" (mrg_romadbintr));
+ : "g" (mrg_romadbintr)
+ : "a0", "a1");
#if defined(MRG_TRACE)
troff();
@@ -164,13 +386,14 @@ mrg_pmintr() /* Call ROM PM Interrupt */
/* Gotta load a1 with VIA address. */
/* ADB int expects it from Mac intr routine. */
asm("
- movml #0xffff, sp@- | better save all registers!
+ movml #0xffff, sp@-
movl %0, a0
movl _VIA, a1
jbsr a0@
- movml sp@+, #0xffff" /* better restore all registers! */
+ movml sp@+, #0xffff"
:
- : "g" (mrg_rompmintr));
+ : "g" (mrg_rompmintr)
+ : "a0", "a1");
#if defined(MRG_TRACE)
troff();
@@ -194,7 +417,6 @@ myowntrap()
return(50);
}
-
int
mrg_NewPtr()
{
@@ -205,7 +427,7 @@ mrg_NewPtr()
asm(" movl d1, %0
movl d0, %1"
- : "=g" (trapword), "=g" (numbytes));
+ : "=g" (trapword), "=g" (numbytes) : : "d0", "d1");
#if defined(MRG_SHOWTRAPS)
printf("mrg: NewPtr(%d bytes, %sclear, %ssys)", numbytes,
@@ -229,9 +451,10 @@ mrg_NewPtr()
#endif
*(u_int32_t *)ptr = numbytes;
ptr += 4;
+ bzero(ptr, numbytes); /* NewPtr, Clear ! */
}
- asm(" movl %0, a0" : : "g" (ptr));
+ asm(" movl %0, a0" : : "g" (ptr) : "a0");
return(result);
}
@@ -241,7 +464,7 @@ mrg_DisposPtr()
int result = noErr;
caddr_t ptr;
- asm(" movl a0, %0" : "=g" (ptr));
+ asm(" movl a0, %0" : "=g" (ptr) : : "a0");
#if defined(MRG_SHOWTRAPS)
printf("mrg: DisposPtr(%x)\n", ptr);
@@ -259,10 +482,9 @@ mrg_DisposPtr()
int
mrg_GetPtrSize()
{
- int result = noErr;
caddr_t ptr;
- asm(" movl a0, %0" : "=g" (ptr));
+ asm(" movl a0, %0" : "=g" (ptr) : : "a0");
#if defined(MRG_SHOWTRAPS)
printf("mrg: GetPtrSize(%x)\n", ptr);
@@ -277,13 +499,12 @@ mrg_GetPtrSize()
int
mrg_SetPtrSize()
{
- int result = noErr;
caddr_t ptr;
int newbytes;
asm(" movl a1, %0
movl d0, %1"
- : "=g" (ptr), "=g" (newbytes));
+ : "=g" (ptr), "=g" (newbytes) : : "d0", "a1");
#if defined(MRG_SHOWTRAPS)
printf("mrg: SetPtrSize(%x, %d) failed\n", ptr, newbytes);
@@ -298,11 +519,49 @@ mrg_PostEvent()
return 0;
}
+void
+mrg_StripAddress()
+{
+}
+
+int
+mrg_SetTrapAddress()
+{
+ extern caddr_t mrg_OStraps[];
+ caddr_t ptr;
+ int trap_num;
+
+ asm(" movl a0, %0
+ movl d0, %1"
+ : "=g" (ptr), "=g" (trap_num) : : "d0", "a0");
+
+#if defined(MRG_DEBUG)
+ printf("mrg: trap 0x%x set to 0x%lx\n", trap_num, (long)ptr);
+#endif
+ mrg_OStraps[trap_num] = ptr;
+/*
+ * If the Trap for Egret was changed, we'd better remember it!
+ */
+ if (trap_num == 0x92) {
+#if defined(MRG_DEBUG)
+ printf("mrg: reconfigured Egret address from 0x%lx to 0x%lx\n",
+ (long)jEgret, (long)ptr);
+#endif
+ jEgret = (void (*))ptr;
+ }
+ return 0;
+}
+
/*
* trap jump address tables (different per machine?)
* Can I just use the tables stored in the ROMs?
* *Is* there a table stored in the ROMs?
- * (BTW, this table is initialized for Mac II.)
+ * We only initialize the A-Traps for the routines we have
+ * provided ourselves. The routines we will be trying to
+ * use out of the MacROMs will be initialized at run-time.
+ * I did this to make the code easier to follow and to keep
+ * from taking an unexpected side trip into the MacROMs on
+ * those systems we don't have fully decoded.
*/
caddr_t mrg_OStraps[256] = {
#ifdef __GNUC__
@@ -313,20 +572,17 @@ caddr_t mrg_OStraps[256] = {
(caddr_t)mrg_SetPtrSize,
(caddr_t)mrg_GetPtrSize,
[0x2f] (caddr_t)mrg_PostEvent,
- [0x77] (caddr_t)0x40807778, /* CountADBs */
- (caddr_t)0x40807792, /* GetIndADB */
- (caddr_t)0x408077be, /* GetADBInfo */
- (caddr_t)0x408077c4, /* SetADBInfo */
- (caddr_t)0x40807704, /* ADBReInit */
- (caddr_t)0x408072fa, /* ADBOp */
- [0x85] 0, /* PMgrOp (not on II) */
- [0x92] (caddr_t)0x40814800, /* Egret */
+ [0x3b] (caddr_t)mrg_Delay,
+ [0x47] (caddr_t)mrg_SetTrapAddress,
+ [0x55] (caddr_t)mrg_StripAddress,
#else
#error "Using a GNU C extension."
#endif
};
caddr_t mrg_ToolBoxtraps[1024] = {
+ [0x19c] (caddr_t)mrg_CountResources,
+ [0x19d] (caddr_t)mrg_GetIndResource,
[0x1a0] (caddr_t)mrg_GetResource,
[0x1af] (caddr_t)mrg_ResError,
};
@@ -355,16 +611,21 @@ mrg_aline_super(struct frame *frame)
danprint = 1;
#if defined(MRG_DEBUG)
- printf(" wd 0x%x", trapword);
+ printf(" wd 0x%lx", (long)trapword);
#endif
isOStrap = ! TRAP_TOOLBOX(trapword);
trapnum = TRAP_NUM(trapword);
- if (danprint)
- {
- /* Without these print statements, ADBReInit fails on IIsi */
- printf(""); printf("");
- }
+ if (danprint) {
+ /*
+ * Without these print statements, ADBReInit fails on IIsi
+ * It is unclear why--perhaps a compiler bug? delay()s do not
+ * work, nor does some assembly similar to the printf calls.
+ * A printf(""); is sufficient, but gcc -Wall is noisy about
+ * it, so I figured backspace is harmless enough...
+ */
+ printf("\010"); printf("\010");
+ }
#if defined(MRG_DEBUG)
printf(" %s # 0x%x", isOStrap? "OS" :
@@ -376,7 +637,9 @@ mrg_aline_super(struct frame *frame)
trapaddr = mrg_OStraps[trapnum];
#if defined(MRG_DEBUG)
- printf(" addr 0x%x\n", trapaddr);
+ printf(" addr 0x%lx\n", (long)trapaddr);
+ printf(" got: d0 = 0x%8x, a0 = 0x%8x, called from: 0x%8x\n",
+ frame->f_regs[0], frame->f_regs[8], frame->f_pc );
#endif
if(trapaddr == NULL){
printf("unknown %s trap 0x%x, no trap address available\n",
@@ -422,6 +685,8 @@ mrg_aline_super(struct frame *frame)
troff();
#endif
#if defined(MRG_DEBUG)
+ printf(" result: d0 = 0x%8x, a0 = 0x%8x\n",
+ d0bucket, a0bucket );
printf(" bk");
#endif
@@ -473,69 +738,6 @@ dumptrace()
#endif
}
- /* Set ROM Vectors */
-void
-mrg_setvectors(rom)
- romvec_t *rom;
-{
- if (rom == NULL)
- return; /* whoops! ROM vectors not defined! */
-
- mrg_romident = rom->romident;
-
- if (0 != mrg_ADBIntrPtr) {
- mrg_romadbintr = mrg_ADBIntrPtr;
- printf("mrg_setvectors: using ADBIntrPtr from booter: 0x%08x\n",
- mrg_ADBIntrPtr);
- } else
- mrg_romadbintr = rom->adbintr;
- mrg_rompmintr = rom->pmintr;
- mrg_ADBAlternateInit = rom->ADBAlternateInit;
- mrg_InitEgret = rom->InitEgret;
-
- /*
- * mrg_adbstore becomes ADBBase
- */
- *((u_int32_t *)(mrg_adbstore + 0x130)) = (u_int32_t) rom->adb130intr;
-
- jEgret = (void (*))0x40814800;
-
- mrg_OStraps[0x77] = rom->CountADBs;
- mrg_OStraps[0x78] = rom->GetIndADB;
- mrg_OStraps[0x79] = rom->GetADBInfo;
- mrg_OStraps[0x7a] = rom->SetADBInfo;
- mrg_OStraps[0x7b] = rom->ADBReInit;
- mrg_OStraps[0x7c] = rom->ADBOp;
- mrg_OStraps[0x85] = rom->PMgrOp;
- mrg_OStraps[0x51] = rom->ReadXPRam;
-
- mrg_OStraps[0x38] = rom->WriteParam; /* WriteParam */
- mrg_OStraps[0x3a] = rom->SetDateTime; /* SetDateTime */
- mrg_OStraps[0x3f] = rom->InitUtil; /* InitUtil */
- mrg_OStraps[0x51] = rom->ReadXPRam; /* ReadXPRam */
- mrg_OStraps[0x52] = rom->WriteXPRam; /* WriteXPRam */
- jClkNoMem = (void (*)) rom->jClkNoMem;
-
- if (0 == jClkNoMem) {
- printf("WARNING: don't have a value for jClkNoMem, please contact: walter@ghpc8.ihf.rwth-aachen.de\n");
- printf("Can't read RTC without it. Using MacOS boot time.\n");
- }
-
-#if defined(MRG_DEBUG)
- printf("mrg: ROM adbintr 0x%08x\n", mrg_romadbintr);
- printf("mrg: ROM pmintr 0x%08x\n", mrg_rompmintr);
- printf("mrg: OS trap 0x77 (CountADBs) = 0x%08x\n", mrg_OStraps[0x77]);
- printf("mrg: OS trap 0x78 (GetIndADB) = 0x%08x\n", mrg_OStraps[0x78]);
- printf("mrg: OS trap 0x79 (GetADBInfo) = 0x%08x\n", mrg_OStraps[0x79]);
- printf("mrg: OS trap 0x7a (SetADBInfo) = 0x%08x\n", mrg_OStraps[0x7a]);
- printf("mrg: OS trap 0x7b (ADBReInit) = 0x%08x\n", mrg_OStraps[0x7b]);
- printf("mrg: OS trap 0x7c (ADBOp) = 0x%08x\n", mrg_OStraps[0x7c]);
- printf("mrg: OS trap 0x85 (PMgrOp) = 0x%08x\n", mrg_OStraps[0x85]);
- printf("mrg: ROM ADBAltInit 0x%08x\n", mrg_ADBAlternateInit);
- printf("mrg: ROM InitEgret 0x%08x\n", mrg_InitEgret);
-#endif
-}
-
/* To find out if we're okay calling ROM vectors */
int
mrg_romready()
@@ -550,15 +752,68 @@ extern volatile u_char *sccA;
void
mrg_init()
{
- int i;
char *findername = "MacBSD FakeFinder";
+ int i;
+#if defined(MRG_TEST)
caddr_t ptr;
- caddr_t *handle;
+ short rcnt;
int sizeptr;
extern short mrg_ResErr;
-
+ caddr_t *handle;
+#endif
+
+ VBLQueue = (u_int16_t) 0; /* No vertical blanking routines in the queue */
+ VBLQueue_head = (caddr_t) 0; /* Let's hope that this init happens
+ VBLQueue_tail = (caddr_t) 0; * before the RTC interrupts are enabled */
+
+#if defined(MRG_TEST)
+ if (ROMResourceMap) {
+ printf("mrg: testing CountResources\n");
+ asm(" clrl sp@-
+ clrl sp@-
+ .word 0xa99c
+ movw sp@+, %0"
+ : "=g" (rcnt));
+ printf("mrg: found %d resources in ROM\n", rcnt);
+ asm(" clrl sp@-
+ movl #0x44525652, sp@-
+ .word 0xa99c
+ movw sp@+, %0"
+ : "=g" (rcnt));
+ printf("mrg: %d are DRVR resources\n", rcnt);
+ if (rcnt == 0)
+ panic("Oops! No DRVR Resources found in ROM\n");
+ }
+#endif
+#if defined(MRG_TEST)
+ if (ROMResourceMap) {
+ printf("mrg: testing GetIndResource\n");
+ asm(" clrl sp@-
+ movl #0x44525652, sp@-
+ movw #0x01, sp@-
+ .word 0xa99d
+ movl sp@+, %0"
+ : "=g" (handle));
+ printf("Handle to first DRVR resource is 0x%08lx\n", (long)handle);
+ printf("DRVR: 0x%08lx -> 0x%08lx -> 0x%08lx\n",
+ (long)Get_Ind_Resource(0x44525652, 1),
+ (long)*Get_Ind_Resource(0x44525652, 1),
+ (long) *((u_int32_t *) *Get_Ind_Resource(0x44525652, 1)));
+ asm(" clrl sp@-
+ movl #0x44525652, sp@-
+ movw #0x02, sp@-
+ .word 0xa99d
+ movl sp@+, %0"
+ : "=g" (handle));
+ printf("Handle to second DRVR resource is 0x%08lx\n", (long)handle);
+ printf("DRVR: 0x%08lx -> 0x%08lx -> 0x%08lx\n",
+ (long)Get_Ind_Resource(0x44525652, 2),
+ (long)*Get_Ind_Resource(0x44525652, 2),
+ (long) *((u_int32_t *) *Get_Ind_Resource(0x44525652, 2)));
+ }
+#endif
if(mrg_romready()){
- printf("mrg: '%s' rom glue", mrg_romident);
+ printf("mrg: '%s' ROM glue", mrg_romident);
#if defined(MRG_TRACE)
#if defined(MRG_FOLLOW)
@@ -592,6 +847,19 @@ mrg_init()
printf("mrg: start init\n");
#endif
/* expected globals */
+ ExpandMem = &mrg_ExpandMem[0];
+ *((u_int16_t *)(mrg_ExpandMem + 0x00) ) = 0x0123; /* magic (word) */
+ *((u_int32_t *)(mrg_ExpandMem + 0x02) ) = 0x000001ea; /* Length of table (long) */
+ *((u_int32_t *)(mrg_ExpandMem + 0x1e0)) = (u_int32_t) &mrg_adbstore4[0];
+
+ *((u_int32_t *)(mrg_adbstore4 + 0x8)) = (u_int32_t) mrg_init_stub_1;
+ *((u_int32_t *)(mrg_adbstore4 + 0xc)) = (u_int32_t) mrg_init_stub_2;
+ *((u_int32_t *)(mrg_adbstore4 + 0x4)) = (u_int32_t) &mrg_adbstore5[0];
+
+ *((u_int32_t *)(mrg_adbstore5 + 0x08)) = (u_int32_t) 0x00100000;
+ *((u_int32_t *)(mrg_adbstore5 + 0x0c)) = (u_int32_t) 0x00100000;
+ *((u_int32_t *)(mrg_adbstore5 + 0x16)) = (u_int32_t) 0x00480000;
+
ADBBase = &mrg_adbstore[0];
ADBState = &mrg_adbstore2[0];
ADBYMM = &mrg_adbstore3[0];
@@ -615,17 +883,21 @@ mrg_init()
Lvl1DT[i] = mrg_lvl1dtpanic;
for(i = 0; i < 8; i++) /* Set up fake Lvl2DT */
Lvl2DT[i] = mrg_lvl2dtpanic;
- Lvl1DT[0] = (void (*)())mrg_1sec_timer_tick;
- Lvl1DT[2] = (void (*)())mrg_romadbintr;
- Lvl1DT[4] = (void (*)())mrg_rompmintr;
+ Lvl1DT[0] = (void (*)(void))mrg_1sec_timer_tick;
+ Lvl1DT[2] = (void (*)(void))mrg_romadbintr;
+ Lvl1DT[4] = (void (*)(void))mrg_rompmintr;
JADBProc = mrg_jadbprocpanic; /* Fake JADBProc for the time being */
jSwapMMU = mrg_jswapmmupanic; /* Fake jSwapMMU for the time being */
JKybdTask = mrg_jkybdtaskpanic; /* Fake jSwapMMU for the time being */
- jADBOp = (void (*)())mrg_OStraps[0x7c]; /* probably very dangerous */
+ jADBOp = (void (*)(void))
+ mrg_OStraps[0x7c]; /* probably very dangerous */
mrg_VIA2 = (caddr_t)(Via1Base + VIA2 * 0x2000); /* see via.h */
SCCRd = (caddr_t)(IOBase + sccA); /* ser.c ; we run before serinit */
+ /* AV ROMs want this low memory vector to point to a jump table */
+ InitEgretJTVec = (u_int32_t **)&mrg_AVInitEgretJT;
+
switch(mach_cputype()){
case MACH_68020: CPUFlag = 2; break;
case MACH_68030: CPUFlag = 3; break;
@@ -638,7 +910,7 @@ mrg_init()
#if defined(MRG_TEST)
printf("Allocating a pointer...\n");
ptr = (caddr_t)NewPtr(1024);
- printf("Result is 0x%x.\n", ptr);
+ printf("Result is 0x%lx.\n", (long)ptr);
sizeptr = GetPtrSize((Ptr)ptr);
printf("Pointer size is %d\n", sizeptr);
printf("Freeing the pointer...\n");
@@ -653,9 +925,9 @@ mrg_init()
printf("Getting error code...\n");
i = ResError();
printf("Result code (0xdeadbaaf): %x\n", i);
- printf("Getting a Resource...\n");
- handle = GetResource('ADBS', 2);
- printf("Handle result from GetResource: 0x%x\n", handle);
+ printf("Getting an ADBS Resource...\n");
+ handle = GetResource(0x41244253, 2);
+ printf("Handle result from GetResource: 0x%lx\n", (long)handle);
printf("Getting error code...\n");
i = ResError();
printf("Result code (-192?) : %d\n", i);
@@ -682,9 +954,27 @@ mrg_init()
printf("after setting jump points\n");
printf("mrg: end init\n");
#endif
+
+ if (current_mac_model->class == MACH_CLASSII) {
+ /*
+ * For the bloody Mac II ROMs, we have to map this space
+ * so that the PRam functions will work.
+ * Gee, Apple, is that a hard-coded hardware address in
+ * your code? I think so! (_ReadXPRam + 0x0062) We map
+ * the first
+ */
+#ifdef DIAGNOSTIC
+ printf("mrg: I/O map kludge for old ROMs that use hardware %s",
+ "addresses directly.\n");
+#endif
+ pmap_map(0x50f00000, 0x50f00000, 0x50f00000 + 0x4000,
+ VM_PROT_READ|VM_PROT_WRITE);
+ }
}
-void
+static void setup_egret __P((void));
+
+static void
setup_egret(void)
{
if (0 != mrg_InitEgret){
@@ -697,16 +987,24 @@ setup_egret(void)
jbsr a1@
movml sp@+, a0-a2 "
:
- : "g" (mrg_InitEgret), "g" (ADBState));
+ : "g" (mrg_InitEgret), "g" (ADBState)
+ : "a0", "a1");
+ jEgret = (void (*)) mrg_OStraps[0x92]; /* may have been set in asm() */
}
- else printf("Help ... No vector for InitEgret!!");
+ else printf("Help ... No vector for InitEgret!!\n");
+
+#if defined(MRG_DEBUG)
+ printf("mrg: ADBIntrVector: 0x%8lx, mrg_ADBIntrVector: 0x%8lx\n",
+ (long) mrg_romadbintr,
+ *((long *) 0x19a));
+ printf("mrg: EgretOSTrap: 0x%8lx\n",
+ (long) mrg_OStraps[0x92]);
+#endif
}
void
mrg_initadbintr()
{
- int i;
-
if (mac68k_machine.do_graybars)
printf("Got following HwCfgFlags: 0x%4x, 0x%8x, 0x%8x, 0x%8x\n",
HwCfgFlags, HwCfgFlags2, HwCfgFlags3, ADBReInit_JTBL);
@@ -734,7 +1032,8 @@ mrg_initadbintr()
* set it up. If not, just enable the interrupts (only on
* some machines, others are already on from ADBReInit?).
*/
- if ( (HwCfgFlags3 & 0x0e) == 0x06 ) {
+ if ( ((HwCfgFlags3 & 0x0e) == 0x06 )
+ || ((HwCfgFlags3 & 0x70) == 0x20 )) {
if (mac68k_machine.do_graybars)
printf("mrg: setup_egret:\n");
@@ -756,54 +1055,172 @@ mrg_initadbintr()
}
}
-#define IS_ROM_ADDR(addr) ( ((u_int) (addr)) > oldbase \
- && ((u_int) (addr)) < oldbase + ROMLEN)
-
+/*
+ * NOTE: By eliminating the setvectors routine and moving it's function
+ * to here we only have to deal with re-locating MacOS Addresses
+ * once and all in one place.
+ */
void
mrg_fixupROMBase(obase, nbase)
caddr_t obase;
caddr_t nbase;
{
- int i;
- u_int32_t temp, *p, oldbase, newbase;
+ u_int32_t oldbase, newbase;
+ romvec_t *rom;
+ int i;
oldbase = (u_int32_t) obase;
newbase = (u_int32_t) nbase;
- for (i=0 ; i<256 ; i++)
- if (IS_ROM_ADDR(mrg_OStraps[i])) {
- temp = (u_int) mrg_OStraps[i];
- temp = (temp - oldbase) + newbase;
- mrg_OStraps[i] = (caddr_t) temp;
- }
- p = (u_int32_t *) mrg_adbstore;
- for (i=0 ; i<512/4 ; i++)
- if (IS_ROM_ADDR(p[i]))
- p[i] = (p[i] - oldbase) + newbase;
-
- if (IS_ROM_ADDR(jEgret))
- jEgret = (void (*)) ((((u_int) jEgret) - oldbase) + newbase);
-
- if (IS_ROM_ADDR(mrg_romadbintr))
- mrg_romadbintr = mrg_romadbintr - oldbase + newbase;
-
- if (IS_ROM_ADDR(mrg_rompmintr))
- mrg_rompmintr = mrg_rompmintr - oldbase + newbase;
-
- if (IS_ROM_ADDR(mrg_romident))
- mrg_romident = mrg_romident - oldbase + newbase;
-
- if (IS_ROM_ADDR(jClkNoMem))
- jClkNoMem = jClkNoMem - oldbase + newbase;
-
- if (IS_ROM_ADDR(mrg_ADBAlternateInit))
- mrg_ADBAlternateInit = mrg_ADBAlternateInit - oldbase + newbase;
-
- if (IS_ROM_ADDR(mrg_InitEgret))
- mrg_InitEgret = mrg_InitEgret - oldbase + newbase;
+/*
+ * Grab the pointer to the Mac ROM Glue Vector table
+ */
+ rom = mrg_MacOSROMVectors;
+
+ if (rom == NULL)
+ return; /* whoops! ROM vectors not defined! */
+
+ mrg_romident = rom->romident;
+
+ if (0 != mrg_ADBIntrPtr) {
+ mrg_romadbintr = mrg_ADBIntrPtr;
+ printf("mrg_fixup: using ADBIntrPtr from booter: 0x%08lx\n",
+ (long)mrg_ADBIntrPtr);
+ } else
+ mrg_romadbintr = rom->adbintr == 0 ?
+ 0 : rom->adbintr - oldbase + newbase;
+
+ mrg_rompmintr = rom->pmintr == 0 ?
+ 0 : rom->pmintr - oldbase + newbase;
+ mrg_ADBAlternateInit = rom->ADBAlternateInit == 0 ?
+ 0 : rom->ADBAlternateInit - oldbase + newbase;
+
+ /*
+ * mrg_adbstore becomes ADBBase
+ */
+ *((u_int32_t *)(mrg_adbstore + 0x130)) = rom->adb130intr == 0 ?
+ 0 : (u_int32_t) rom->adb130intr - oldbase + newbase;
+
+ mrg_OStraps[0x77] = rom->CountADBs == 0 ?
+ 0 : rom->CountADBs - oldbase + newbase;
+ mrg_OStraps[0x78] = rom->GetIndADB == 0 ?
+ 0 : rom->GetIndADB - oldbase + newbase;
+ mrg_OStraps[0x79] = rom-> GetADBInfo == 0 ?
+ 0 : rom->GetADBInfo - oldbase + newbase;
+ mrg_OStraps[0x7a] = rom->SetADBInfo == 0 ?
+ 0 : rom->SetADBInfo - oldbase + newbase;
+ mrg_OStraps[0x7b] = rom->ADBReInit == 0 ?
+ 0 : rom->ADBReInit - oldbase + newbase;
+ mrg_OStraps[0x7c] = rom->ADBOp == 0 ?
+ 0 : rom->ADBOp - oldbase + newbase;
+ mrg_OStraps[0x85] = rom->PMgrOp == 0 ?
+ 0 : rom->PMgrOp - oldbase + newbase;
+ mrg_OStraps[0x51] = rom->ReadXPRam == 0 ?
+ 0 : rom->ReadXPRam - oldbase + newbase;
+ mrg_OStraps[0x38] = rom->WriteParam == 0 ?
+ 0 : rom->WriteParam - oldbase + newbase;/* WriteParam*/
+ mrg_OStraps[0x3a] = rom->SetDateTime == 0 ?
+ 0 : rom->SetDateTime - oldbase + newbase;/*SetDateTime*/
+ mrg_OStraps[0x3f] = rom->InitUtil == 0 ?
+ 0 : rom->InitUtil - oldbase + newbase; /* InitUtil */
+ mrg_OStraps[0x51] = rom->ReadXPRam == 0 ?
+ 0 : rom->ReadXPRam - oldbase + newbase; /* ReadXPRam */
+ mrg_OStraps[0x52] = rom->WriteXPRam == 0 ?
+ 0 : rom->WriteXPRam - oldbase + newbase;/* WriteXPRam */
+
+ if (rom->Egret == 0) {
+ jEgret = 0;
+ mrg_OStraps[0x92] = 0;
+ }
+ else {
+ jEgret = (void (*))rom->Egret - oldbase + newbase;
+ mrg_OStraps[0x92] = rom->Egret - oldbase + newbase;
+ }
+ mrg_InitEgret = rom->InitEgret == 0 ?
+ 0 : rom->InitEgret - oldbase + newbase;
+
+ if (rom->jClkNoMem == 0) {
+ printf("WARNING: don't have a value for jClkNoMem, please contac
+t: walter@ghpc8.ihf.rwth-aachen.de\n");
+ printf("Can't read RTC without it. Using MacOS boot time.\n");
+ jClkNoMem = 0;
+ }
+ else
+ jClkNoMem = (void (*)) rom->jClkNoMem - oldbase + newbase;
+ /*
+ * Get the ToolBox Routines we may need. These are
+ * used in the ADB Initialization of some systems.
+ * If we don't have the ROM addresses for these routines
+ * we'll setup to catch the calls in our own dummy
+ * routines. That way we can politely tell the user
+ * what we'll need to complete initialization on the system.
+ */
+ mrg_ToolBoxtraps[0x04d] = rom->FixDiv == 0 ?
+ (caddr_t)mrg_FixDiv : rom->FixDiv - oldbase + newbase;
+ mrg_ToolBoxtraps[0x068] = rom->FixMul == 0 ?
+ (caddr_t)mrg_FixMul : rom->FixMul - oldbase + newbase;
+
+ /*
+ * Some systems also require this to be setup for use in
+ * ADB Initialization. Use whatever address was provided
+ * to us in the romvec table for this system. This may
+ * cause a problem on some systems, and may need a better
+ * Trap handler in the future.
+ */
+ ADBReInit_JTBL = rom->ADBReInit_JTBL == 0 ?
+ 0 : (u_int32_t)rom->ADBReInit_JTBL - oldbase + newbase;
+
+ /*
+ * Setup to trap unexpected access to ADBProc which is used in
+ * ADB Initialization on some systems. If the correct entry
+ * point in the ADBInit code is selected, this address is
+ * re-configured by the ROM during initialization. This feature
+ * is not currently used by NetBSD.
+ */
+ JADBProc = mrg_jadbprocpanic;
+
+ /*
+ * Get the address of the first (top) Resource in the ROM.
+ * This will be the head of a linked list of all Resources
+ * in the ROM which will be mapped in mrg_InitResources.
+ */
+ ROMResourceMap = rom->ROMResourceMap == 0 ?
+ 0 : (void (*))rom->ROMResourceMap - oldbase + newbase;
+
+ for (i = 0; i < sizeof(mrg_AVInitEgretJT) / sizeof(mrg_AVInitEgretJT[0]); i++)
+ mrg_AVInitEgretJT[i] = mrg_AVInitEgretJT[i] == 0 ?
+ 0 : mrg_AVInitEgretJT[i] - oldbase + newbase;
- if (IS_ROM_ADDR(ADBReInit_JTBL))
- ADBReInit_JTBL = ADBReInit_JTBL - oldbase + newbase;
-}
+#if defined(MRG_DEBUG)
+ printf("mrg: ROM adbintr 0x%08lx -> 0x%08lx\n",
+ (long)rom->adbintr, (long)mrg_romadbintr);
+ printf("mrg: ROM pmintr 0x%08lx -> 0x%08lx\n",
+ (long)rom->pmintr, (long)mrg_rompmintr);
+ printf("mrg: OS trap 0x77 (CountADBs) = 0x%08lx -> 0x%08lx\n",
+ (long)rom->CountADBs, (long)mrg_OStraps[0x77]);
+ printf("mrg: OS trap 0x78 (GetIndADB) = 0x%08lx -> 0x%08lx\n",
+ (long)rom->GetIndADB, (long)mrg_OStraps[0x78]);
+ printf("mrg: OS trap 0x79 (GetADBInfo) = 0x%08lx -> 0x%08lx\n",
+ (long)rom->GetADBInfo, (long)mrg_OStraps[0x79]);
+ printf("mrg: OS trap 0x7a (SetADBInfo) = 0x%08lx -> 0x%08lx\n",
+ (long)rom->SetADBInfo, (long)mrg_OStraps[0x7a]);
+ printf("mrg: OS trap 0x7b (ADBReInit) = 0x%08lx -> 0x%08lx\n",
+ (long)rom->ADBReInit, (long)mrg_OStraps[0x7b]);
+ printf("mrg: OS trap 0x7c (ADBOp) = 0x%08lx -> 0x%08lx\n",
+ (long)rom->ADBOp, (long)mrg_OStraps[0x7c]);
+ printf("mrg: OS trap 0x85 (PMgrOp) = 0x%08lx -> 0x%08lx\n",
+ (long)rom->PMgrOp, (long)mrg_OStraps[0x85]);
+ printf("mrg: OS trap 0x92 (Egret) = 0x%08lx -> 0x%08lx\n",
+ (long)rom->Egret, (long)mrg_OStraps[0x92]);
+ printf("mrg: ROM ADBAltInit 0x%08lx -> 0x%08lx\n",
+ (long)rom->ADBAlternateInit, (long)mrg_ADBAlternateInit);
+ printf("mrg: ROM ADBReInit_JTBL 0x%08lx -> 0x%08lx\n",
+ (long)rom->ADBReInit_JTBL, (long)ADBReInit_JTBL);
+ printf("mrg: ROM InitEgret 0x%08lx -> 0x%08lx\n",
+ (long)rom->InitEgret, (long)mrg_InitEgret);
+ printf("mrg: ROM Resource list-head 0x%08lx -> 0x%08lx\n",
+ (long)rom->ROMResourceMap, (long)ROMResourceMap);
+#endif
+}
void
ADBAlternateInit(void)
@@ -817,8 +1234,8 @@ ADBAlternateInit(void)
movl %1, a3
jbsr a1@
movml sp@+, a0-a6/d0-d7"
-
:
- : "g" (mrg_ADBAlternateInit), "g" (ADBBase) );
+ : "g" (mrg_ADBAlternateInit), "g" (ADBBase)
+ : "a1", "a3");
}
}
diff --git a/sys/arch/mac68k/mac68k/macrom.h b/sys/arch/mac68k/mac68k/macrom.h
index 28190048a89..14ed51c11ce 100644
--- a/sys/arch/mac68k/mac68k/macrom.h
+++ b/sys/arch/mac68k/mac68k/macrom.h
@@ -1,4 +1,4 @@
-/* $NetBSD: macrom.h,v 1.5 1995/09/17 21:28:37 briggs Exp $ */
+/* $NetBSD: macrom.h,v 1.9 1996/05/25 14:45:35 briggs Exp $ */
/*-
* Copyright (C) 1994 Bradley A. Grantham
@@ -32,6 +32,7 @@
#include <sys/types.h>
+#include <machine/frame.h>
/* Low-memory Globals */
@@ -39,16 +40,16 @@ extern caddr_t ROMBase; /* Base address of ROM space */
extern caddr_t ADBBase; /* Base address of ADB scratch */
extern caddr_t ADBYMM; /* Base address of yet more ADB mem */
extern caddr_t ADBState; /* Base address of ADB scratch ? */
-extern void (*JADBProc)(); /* ADBReInit pre/post processing */
-extern void (*Lvl1DT[8])(); /* VIA1 interrupt table by bit */
-extern void (*Lvl2DT[8])(); /* VIA2 interrupt table by bit */
-extern void (*jADBOp)(); /* low memory pointer to ADBOp */
-extern void (*jUnimplTrap)(); /* Unimplemented trap */
- /* loglob(KbdLast, 0x218) /* addr of last kbd to send */
- /* loglob(KbdType, 0x21E) /* type of last kbd to send */
-extern void (*JKybdTask)(); /* Keyboard task ptr? */
+extern void (*JADBProc) __P((void)); /* ADBReInit pre/post processing */
+extern void (*Lvl1DT[8]) __P((void)); /* VIA1 interrupt table by bit */
+extern void (*Lvl2DT[8]) __P((void)); /* VIA2 interrupt table by bit */
+extern void (*jADBOp) __P((void)); /* low memory pointer to ADBOp */
+extern void (*jUnimplTrap) __P((void)); /* Unimplemented trap */
+ /* loglob(KbdLast, 0x218) * addr of last kbd to send */
+ /* loglob(KbdType, 0x21E) * type of last kbd to send */
+extern void (*JKybdTask) __P((void)); /* Keyboard task ptr? */
extern u_char CPUFlag; /* Type of CPU in this machine */
-extern void (*MacJmp)(); /* ??? */
+extern void (*MacJmp) __P((void)); /* ??? */
extern u_long Lo3Bytes; /* 0x00ffffff */
extern u_long MinusOne; /* 0xffffffff */
extern u_short MMU32Bit; /* MMU mode; short? */
@@ -63,14 +64,23 @@ extern caddr_t VIA; /* VIA1 base address */
extern caddr_t mrg_VIA2; /* VIA2 base address */
extern caddr_t SCCRd; /* SCC read base address */
extern u_char FinderName[20]; /* FinderName - Pascal string */
-extern void (*jSwapMMU)(); /* Pointer to MMU Swap routine */
-extern void (*jEgret)(); /* Pointer to MMU Swap routine */
+extern void (*jSwapMMU) __P((void)); /* Pointer to MMU Swap routine */
+extern void (*jEgret) __P((void)); /* Pointer to MMU Swap routine */
extern u_int16_t HwCfgFlags; /* Hardware config flags */
extern u_int32_t HwCfgFlags2; /* more hardware config flags */
extern u_int32_t HwCfgFlags3; /* more hardware config flags */
extern u_int32_t ADBReInit_JTBL; /* pointer to patch table */
-extern void (*jClkNoMem)(); /* pointer to ClkNoMem */
+extern void (*jClkNoMem) __P((void)); /* pointer to ClkNoMem */
extern u_char SysParam[20]; /* Place where PRam data gets stored */
+extern caddr_t ExpandMem; /* pointer to Expanded Memory used by */
+ /* newer ADB routines (since LCIII) */
+extern u_int16_t VBLQueue; /* Vertical blanking Queue, unused ? */
+extern caddr_t VBLQueue_head; /* Vertical blanking Queue, head */
+extern caddr_t VBLQueue_tail; /* Vertical blanking Queue, tail */
+
+extern u_int32_t **InitEgretJTVec; /* pointer to a jump table for */
+ /* InitEgret on AV machines */
+
/* Types */
typedef caddr_t Ptr;
@@ -136,6 +146,13 @@ Handle GetResource(
short theID);
short ResError(
void);
+short mrg_CountResources(
+ u_int32_t type);
+short Count_Resources(
+ u_int32_t rsrc_type);
+caddr_t *mrg_GetIndResource(
+ u_int16_t index,
+ u_int32_t type);
/* Mac ROM Glue globals for BSD kernel */
@@ -158,6 +175,14 @@ void dumptrace(void);
/* Stuff for configuring ROM Glue */
+typedef struct rsrc_s {
+ u_int16_t unknown[4]; /* ???? */
+ u_int32_t next; /* pointer to next resoure in list */
+ u_int32_t body; /* pointer to resource body? */
+ u_int32_t name; /* resource name */
+ u_int16_t index; /* ???? */
+} rsrc_t;
+
typedef struct romvec_s {
char *romident; /* just to print it out */
caddr_t adbintr; /* where is ADB interrupt */
@@ -180,13 +205,56 @@ typedef struct romvec_s {
caddr_t WriteXPRam;
caddr_t jClkNoMem;
caddr_t ADBAlternateInit; /* more fundamental than ABDReInit */
+ caddr_t Egret;
caddr_t InitEgret; /* Set up Buffer for Egret routines */
+ caddr_t ADBReInit_JTBL;
+ caddr_t ROMResourceMap; /* Address of first Resource in linked list */
+ caddr_t FixDiv;
+ caddr_t FixMul;
} romvec_t;
-void mrg_setvectors(romvec_t *rom_vectors);
-int mrg_romready(void);
+/*
+ * Function prototypes.
+ */
+
+/* macrom.c */
+void mrg_setvectors __P((romvec_t *rom_vectors));
+int mrg_romready __P((void));
+caddr_t *Get_Ind_Resource __P((u_int32_t, u_int16_t));
+void mrg_initadbintr __P((void));
+long mrg_adbintr __P((void));
+long mrg_pmintr __P((void));
+void mrg_fixupROMBase __P((caddr_t, caddr_t));
+int mrg_Delay __P((void));
+void mrg_VBLQueue __P((void));
+void mrg_init_stub_1 __P((void));
+void mrg_init_stub_2 __P((void));
+void mrg_1sec_timer_tick __P((void));
+void mrg_lvl1dtpanic __P((void));
+void mrg_lvl2dtpanic __P((void));
+void mrg_jadbprocpanic __P((void));
+void mrg_jswapmmupanic __P((void));
+void mrg_jkybdtaskpanic __P((void));
+void mrg_notrap __P((void));
+int myowntrap __P((void));
+int mrg_NewPtr __P((void));
+int mrg_DisposPtr __P((void));
+int mrg_GetPtrSize __P((void));
+int mrg_SetPtrSize __P((void));
+int mrg_PostEvent __P((void));
+int mrg_SetTrapAddress __P((void));
+void mrg_StripAddress __P((void));
+void mrg_aline_super __P((struct frame *));
+void mrg_aline_user __P((void));
+void mrg_init __P((void));
+void mrg_FixDiv __P((void));
+void mrg_FixMul __P((void));
+
+/* machdep.c */
+int mach_cputype __P((void));
+
+/* Tracing aids */
- /* Tracing aids */
/* trace all instructions, not just flow changes. */
#define tron() \
asm("movw sr, d0 ; orw #0x8000, d0 ; movw d0, sr" : : : "d0")
diff --git a/sys/arch/mac68k/mac68k/macromasm.s b/sys/arch/mac68k/mac68k/macromasm.s
index 1c289c3c3bc..a0fa47d1770 100644
--- a/sys/arch/mac68k/mac68k/macromasm.s
+++ b/sys/arch/mac68k/mac68k/macromasm.s
@@ -1,4 +1,4 @@
-/* $NetBSD: macromasm.s,v 1.7 1995/09/17 21:28:39 briggs Exp $ */
+/* $NetBSD: macromasm.s,v 1.11 1996/05/25 14:45:37 briggs Exp $ */
/*-
* Copyright (C) 1994 Bradley A. Grantham
@@ -35,7 +35,7 @@
*/
-#include "assym.s"
+#include "assym.h"
/* Define this symbol as global with (v) value */
@@ -98,7 +98,14 @@
loglob(jClkNoMem, 0x54c) /* Pointer to ClkNoMem function */
loglob(PramTransfer, 0x1e4) /* Transfer buffer used with PRam */
loglob(SysParam, 0x1f8) /* Place where PRam data gets stored */
+ loglob(ExpandMem, 0x2b6) /* pointer to Expanded Memory used by */
+ /* newer ADB routines */
+ loglob(VBLQueue, 0x160) /* Vertical blanking Queue, unused ? */
+ loglob(VBLQueue_head, 0x162) /* Vertical blanking Queue, head */
+ loglob(VBLQueue_tail, 0x166) /* Vertical blanking Queue, tail */
+ loglob(InitEgretJTVec, 0x2010) /* pointer to a jump table for */
+ /* InitEgret on AV machines */
#if 0
/* I wish I knew what these things were */
@@ -125,6 +132,16 @@
* to the ROMs; none of this is called.
*/
+/* Initialize Utils, mainly XPRam */
+ .global _InitUtil
+ /*
+ * void
+ */
+_InitUtil:
+ .word 0xa03f
+ rts
+
+
/* Initialize the ADB ------------------------------------------------------*/
.global _ADBReInit
/*
@@ -340,6 +357,36 @@ LRE_enter:
movw d0, _mrg_ResErr | set current ResMan error
pascalret(6) | I hate Pascal.
+
+
+function(mrg_CountResources)
+/* Original from WRU: 960120
+ * sp@(4) u_int32_t rsrc_type
+ * sp@(8) u_int16_t nr_of_rsrcs
+ */
+ movl sp@(4), d0
+ movl d0, sp@-
+ jbsr _Count_Resources
+ addl #4, sp | pop C params
+ movw d0, sp@(8) | store result
+ pascalret(4)
+
+function(mrg_GetIndResource)
+/* Original from WRU: 960120
+ * sp@(4) u_int16_t rsrc_index
+ * sp@(6) u_int32_t rsrc_type
+ * sp@(10) caddr_t *rsrc_handle
+ */
+ movl sp@(6), a0
+ clrl d0
+ movw sp@(4), d0
+ movl d0, sp@-
+ movl a0, sp@-
+ jbsr _Get_Ind_Resource
+ addl #8, sp | pop C params
+ movl d0, sp@(10) | store result
+ pascalret(6)
+
/*
* I'd like to take a moment here to talk about the calling convention
* for ToolBox routines. Inside Mac "Operating System Utilities,"
diff --git a/sys/arch/mac68k/mac68k/pmap.c b/sys/arch/mac68k/mac68k/pmap.c
index 89fe92aaf42..03e1a18e1d6 100644
--- a/sys/arch/mac68k/mac68k/pmap.c
+++ b/sys/arch/mac68k/mac68k/pmap.c
@@ -1,4 +1,4 @@
-/* $NetBSD: pmap.c,v 1.22 1995/12/03 13:52:50 briggs Exp $ */
+/* $NetBSD: pmap.c,v 1.25 1996/05/07 01:45:22 briggs Exp $ */
/*
* Copyright (c) 1991, 1993
@@ -175,14 +175,6 @@ int pmapdebug = 0x2000;
#define PDB_WIRING 0x4000
#define PDB_PVDUMP 0x8000
-#ifdef HAVEVAC
-int pmapvacflush = 0;
-#define PVF_ENTER 0x01
-#define PVF_REMOVE 0x02
-#define PVF_PROTECT 0x04
-#define PVF_TOTAL 0x80
-#endif
-
#if defined(M68040)
int dowriteback = 1; /* 68040: enable writeback caching */
int dokwriteback = 1; /* 68040: enable writeback caching of kernel AS */
@@ -291,9 +283,6 @@ extern int numranges;
extern unsigned long low[8];
extern unsigned long high[8];
-#ifdef HAVEVAC
-int pmap_aliasmask; /* seperation at which VA aliasing ok */
-#endif
#if defined(M68040)
int protostfree; /* prototype (default) free ST map */
#endif
@@ -506,7 +495,10 @@ pmap_init()
pmap_initialized = TRUE;
}
-struct pv_entry *
+static struct pv_entry *pmap_alloc_pv __P((void));
+static void pmap_free_pv __P((struct pv_entry *));
+
+static struct pv_entry *
pmap_alloc_pv()
{
struct pv_page *pvp;
@@ -540,12 +532,11 @@ pmap_alloc_pv()
return pv;
}
-void
+static void
pmap_free_pv(pv)
struct pv_entry *pv;
{
register struct pv_page *pvp;
- register int i;
pvp = (struct pv_page *) trunc_page(pv);
switch (++pvp->pvp_pgi.pgi_nfree) {
@@ -564,6 +555,8 @@ pmap_free_pv(pv)
}
}
+void pmap_collect_pv __P((void));
+
void
pmap_collect_pv()
{
@@ -797,6 +790,9 @@ pmap_reference(pmap)
simple_unlock(&pmap->pm_lock);
}
+void loadustp __P((vm_offset_t));
+void pmap_activate __P((register pmap_t, struct pcb *));
+
void
pmap_activate(pmap, pcbp)
register pmap_t pmap;
@@ -814,6 +810,8 @@ pmap_activate(pmap, pcbp)
PMAP_ACTIVATE(pmap, pcbp, pmap == curproc->p_vmspace->vm_map.pmap);
}
+void pmap_deactivate __P((register pmap_t, struct pcb *));
+
void
pmap_deactivate(pmap, pcb)
register pmap_t pmap;
@@ -869,29 +867,6 @@ pmap_remove(pmap, sva, eva)
pte = pmap_pte(pmap, sva);
while (sva < nssva) {
if (pmap_pte_v(pte)) {
-#ifdef HAVEVAC
- if (pmap_aliasmask) {
- /*
- * Purge kernel side of VAC to ensure
- * we get the correct state of any
- * hardware maintained bits.
- */
- if (firstpage) {
- DCIS();
-#ifdef PMAPSTATS
- remove_stats.sflushes++;
-#endif
- }
- /*
- * Remember if we may need to
- * flush the VAC due to a non-CI
- * mapping.
- */
- if (!needcflush && !pmap_pte_ci(pte))
- needcflush = TRUE;
-
- }
-#endif
pmap_remove_mapping(pmap, sva, pte, flags);
firstpage = FALSE;
}
@@ -904,42 +879,6 @@ pmap_remove(pmap, sva, eva)
*/
if (firstpage)
return;
-#ifdef HAVEVAC
- /*
- * In a couple of cases, we don't need to worry about flushing
- * the VAC:
- * 1. if this is a kernel mapping,
- * we have already done it
- * 2. if it is a user mapping not for the current process,
- * it won't be there
- */
- if (pmap_aliasmask &&
- (pmap == pmap_kernel() || pmap != curproc->p_vmspace->vm_map.pmap))
- needcflush = FALSE;
-#ifdef DEBUG
- if (pmap_aliasmask && (pmapvacflush & PVF_REMOVE)) {
- if (pmapvacflush & PVF_TOTAL)
- DCIA();
- else if (pmap == pmap_kernel())
- DCIS();
- else
- DCIU();
- } else
-#endif
- if (needcflush) {
- if (pmap == pmap_kernel()) {
- DCIS();
-#ifdef PMAPSTATS
- remove_stats.sflushes++;
-#endif
- } else {
- DCIU();
-#ifdef PMAPSTATS
- remove_stats.uflushes++;
-#endif
- }
- }
-#endif
}
/*
@@ -1057,18 +996,6 @@ pmap_protect(pmap, sva, eva, prot)
pte = pmap_pte(pmap, sva);
while (sva < nssva) {
if (pmap_pte_v(pte) && pmap_pte_prot_chg(pte, isro)) {
-#ifdef HAVEVAC
- /*
- * Purge kernel side of VAC to ensure we
- * get the correct state of any hardware
- * maintained bits.
- *
- * XXX do we need to clear the VAC in
- * general to reflect the new protection?
- */
- if (firstpage && pmap_aliasmask)
- DCIS();
-#endif
#if defined(M68040)
/*
* Clear caches if making RO (see section
@@ -1101,16 +1028,21 @@ pmap_protect(pmap, sva, eva, prot)
sva += NBPG;
}
}
-#if defined(HAVEVAC) && defined(DEBUG)
- if (pmap_aliasmask && (pmapvacflush & PVF_PROTECT)) {
- if (pmapvacflush & PVF_TOTAL)
- DCIA();
- else if (pmap == pmap_kernel())
- DCIS();
- else
- DCIU();
- }
-#endif
+}
+
+void
+mac68k_set_pte(va, pge)
+ vm_offset_t va;
+ vm_offset_t pge;
+{
+extern vm_offset_t tmp_vpages[];
+ register pt_entry_t *pte;
+
+ if (va != tmp_vpages[0])
+ return;
+
+ pte = pmap_pte(pmap_kernel(), va);
+ *pte = (pt_entry_t) pge;
}
/*
@@ -1296,56 +1228,6 @@ pmap_enter(pmap, va, pa, prot, wired)
if (!npv->pv_next)
enter_stats.secondpv++;
#endif
-#ifdef HAVEVAC
- /*
- * Since there is another logical mapping for the
- * same page we may need to cache-inhibit the
- * descriptors on those CPUs with external VACs.
- * We don't need to CI if:
- *
- * - No two mappings belong to the same user pmaps.
- * Since the cache is flushed on context switches
- * there is no problem between user processes.
- *
- * - Mappings within a single pmap are a certain
- * magic distance apart. VAs at these appropriate
- * boundaries map to the same cache entries or
- * otherwise don't conflict.
- *
- * To keep it simple, we only check for these special
- * cases if there are only two mappings, otherwise we
- * punt and always CI.
- *
- * Note that there are no aliasing problems with the
- * on-chip data-cache when the WA bit is set.
- */
- if (pmap_aliasmask) {
- if (pv->pv_flags & PV_CI) {
-#ifdef DEBUG
- if (pmapdebug & PDB_CACHE)
- printf("enter: pa %x already CI'ed\n",
- pa);
-#endif
- checkpv = cacheable = FALSE;
- } else if (npv->pv_next ||
- ((pmap == pv->pv_pmap ||
- pmap == pmap_kernel() ||
- pv->pv_pmap == pmap_kernel()) &&
- ((pv->pv_va & pmap_aliasmask) !=
- (va & pmap_aliasmask)))) {
-#ifdef DEBUG
- if (pmapdebug & PDB_CACHE)
- printf("enter: pa %x CI'ing all\n",
- pa);
-#endif
- cacheable = FALSE;
- pv->pv_flags |= PV_CI;
-#ifdef PMAPSTATS
- enter_stats.ci++;
-#endif
- }
- }
-#endif
}
splx(s);
}
@@ -1368,14 +1250,6 @@ pmap_enter(pmap, va, pa, prot, wired)
pmap->pm_stats.wired_count++;
validate:
-#ifdef HAVEVAC
- /*
- * Purge kernel side of VAC to ensure we get correct state
- * of HW bits so we don't clobber them.
- */
- if (pmap_aliasmask)
- DCIS();
-#endif
/*
* Build the new PTE.
*/
@@ -1416,37 +1290,6 @@ validate:
*pte = npte;
if (!wired && active_pmap(pmap))
TBIS(va);
-#ifdef HAVEVAC
- /*
- * The following is executed if we are entering a second
- * (or greater) mapping for a physical page and the mappings
- * may create an aliasing problem. In this case we must
- * cache inhibit the descriptors involved and flush any
- * external VAC.
- */
- if (checkpv && !cacheable) {
- pmap_changebit(pa, PG_CI, TRUE);
- DCIA();
-#ifdef PMAPSTATS
- enter_stats.flushes++;
-#endif
-#ifdef DEBUG
- if ((pmapdebug & (PDB_CACHE|PDB_PVDUMP)) ==
- (PDB_CACHE|PDB_PVDUMP))
- pmap_pvdump(pa);
-#endif
- }
-#ifdef DEBUG
- else if (pmapvacflush & PVF_ENTER) {
- if (pmapvacflush & PVF_TOTAL)
- DCIA();
- else if (pmap == pmap_kernel())
- DCIS();
- else
- DCIU();
- }
-#endif
-#endif
#ifdef DEBUG
if ((pmapdebug & PDB_WIRING) && pmap != pmap_kernel())
pmap_check_wiring("enter", trunc_page(pmap_pte(pmap, va)));
@@ -1630,6 +1473,7 @@ void
pmap_copy_page(src, dst)
vm_offset_t src, dst;
{
+void copypage __P((caddr_t, caddr_t));
register vm_offset_t skva, dkva;
extern caddr_t CADDR1, CADDR2;
@@ -1842,30 +1686,6 @@ pmap_remove_mapping(pmap, va, pte, flags)
if (*pte == PG_NV)
return;
}
-#ifdef HAVEVAC
- if (pmap_aliasmask && (flags & PRM_CFLUSH)) {
- /*
- * Purge kernel side of VAC to ensure we get the correct
- * state of any hardware maintained bits.
- */
- DCIS();
-#ifdef PMAPSTATS
- remove_stats.sflushes++;
-#endif
- /*
- * If this is a non-CI user mapping for the current process,
- * flush the VAC. Note that the kernel side was flushed
- * above so we don't worry about non-CI kernel mappings.
- */
- if (pmap == curproc->p_vmspace->vm_map.pmap &&
- !pmap_pte_ci(pte)) {
- DCIU();
-#ifdef PMAPSTATS
- remove_stats.uflushes++;
-#endif
- }
- }
-#endif
pa = pmap_pte_pa(pte);
#ifdef DEBUG
opte = *pte;
@@ -1956,25 +1776,6 @@ pmap_remove_mapping(pmap, va, pte, flags)
pmap_free_pv(npv);
pv = pa_to_pvh(pa);
}
-#ifdef HAVEVAC
- /*
- * If only one mapping left we no longer need to cache inhibit
- */
- if (pmap_aliasmask &&
- pv->pv_pmap && pv->pv_next == NULL && (pv->pv_flags & PV_CI)) {
-#ifdef DEBUG
- if (pmapdebug & PDB_CACHE)
- printf("remove: clearing CI for pa %x\n", pa);
-#endif
- pv->pv_flags &= ~PV_CI;
- pmap_changebit(pa, PG_CI, FALSE);
-#ifdef DEBUG
- if ((pmapdebug & (PDB_CACHE|PDB_PVDUMP)) ==
- (PDB_CACHE|PDB_PVDUMP))
- pmap_pvdump(pa);
-#endif
- }
-#endif
/*
* If this was a PT page we must also remove the
* mapping from the associated segment table.
@@ -2087,13 +1888,6 @@ pmap_testbit(pa, bit)
splx(s);
return(TRUE);
}
-#ifdef HAVEVAC
- /*
- * Flush VAC to get correct state of any hardware maintained bits.
- */
- if (pmap_aliasmask && (bit & (PG_U|PG_M)))
- DCIS();
-#endif
/*
* Not found, check current mappings returning
* immediately if found.
@@ -2122,7 +1916,9 @@ pmap_changebit(pa, bit, setem)
register pt_entry_t *pte, npte;
vm_offset_t va;
int s;
+#if defined(M68040)
boolean_t firstpage = TRUE;
+#endif
#ifdef PMAPSTATS
struct chgstats *chgp;
#endif
@@ -2151,7 +1947,6 @@ pmap_changebit(pa, bit, setem)
pmap_attributes[pmap_page_index(pa)] &= ~bit;
/*
* Loop over all current mappings setting/clearing as appropos
- * If setting RO do we need to clear the VAC?
*/
if (pv->pv_pmap != NULL) {
#ifdef DEBUG
@@ -2174,16 +1969,6 @@ pmap_changebit(pa, bit, setem)
}
pte = pmap_pte(pv->pv_pmap, va);
-#ifdef HAVEVAC
- /*
- * Flush VAC to ensure we get correct state of HW bits
- * so we don't clobber them.
- */
- if (firstpage && pmap_aliasmask) {
- firstpage = FALSE;
- DCIS();
- }
-#endif
if (setem)
npte = *pte | bit;
else
@@ -2196,7 +1981,7 @@ pmap_changebit(pa, bit, setem)
* flushed (but only once).
*/
if (firstpage && mmutype == MMU_68040 &&
- (bit == PG_RO && setem ||
+ ((bit == PG_RO && setem) ||
(bit & PG_CMASK))) {
firstpage = FALSE;
DCFP(pa);
@@ -2222,16 +2007,6 @@ pmap_changebit(pa, bit, setem)
}
#endif
}
-#if defined(HAVEVAC) && defined(DEBUG)
- if (setem && bit == PG_RO && (pmapvacflush & PVF_PROTECT)) {
- if ((pmapvacflush & PVF_TOTAL) || toflush == 3)
- DCIA();
- else if (toflush == 2)
- DCIS();
- else
- DCIU();
- }
-#endif
}
splx(s);
}
@@ -2389,7 +2164,7 @@ pmap_enter_ptpage(pmap, va)
#endif
s = vm_fault(pt_map, va, VM_PROT_READ|VM_PROT_WRITE, FALSE);
if (s != KERN_SUCCESS) {
- printf("vm_fault(pt_map, %x, RW, 0) -> %d\n", va, s);
+ printf("vm_fault(pt_map, 0x%lx, RW, 0) -> %d\n",va,s);
panic("pmap_enter: vm_fault failed");
}
ptpa = pmap_extract(pmap_kernel(), va);
@@ -2412,8 +2187,8 @@ pmap_enter_ptpage(pmap, va)
if (dowriteback && dokwriteback)
#endif
if (mmutype == MMU_68040) {
- pt_entry_t *pte = pmap_pte(pmap_kernel(), va);
#ifdef DEBUG
+ pt_entry_t *pte = pmap_pte(pmap_kernel(), va);
if ((pmapdebug & PDB_PARANOIA) && (*pte & PG_CCB) == 0)
printf("%s PT no CCB: kva=%x ptpa=%x pte@%x=%x\n",
pmap == pmap_kernel() ? "Kernel" : "User",
@@ -2434,7 +2209,7 @@ pmap_enter_ptpage(pmap, va)
do {
if (pv->pv_pmap == pmap_kernel() && pv->pv_va == va)
break;
- } while (pv = pv->pv_next);
+ } while ((pv = pv->pv_next) != NULL);
}
#ifdef DEBUG
if (pv == NULL)
diff --git a/sys/arch/mac68k/mac68k/pmap_bootstrap.c b/sys/arch/mac68k/mac68k/pmap_bootstrap.c
index 06b81922821..3ab1bc826c4 100644
--- a/sys/arch/mac68k/mac68k/pmap_bootstrap.c
+++ b/sys/arch/mac68k/mac68k/pmap_bootstrap.c
@@ -1,4 +1,4 @@
-/* $NetBSD: pmap_bootstrap.c,v 1.18 1996/02/10 23:12:46 briggs Exp $ */
+/* $NetBSD: pmap_bootstrap.c,v 1.26 1996/05/18 18:54:52 briggs Exp $ */
/*
* Copyright (c) 1991, 1993
@@ -40,14 +40,22 @@
*/
#include <sys/param.h>
+#include <sys/systm.h>
#include <sys/msgbuf.h>
#include <sys/reboot.h>
+
+#include <vm/vm.h>
+
#include <machine/pte.h>
#include <mac68k/mac68k/clockreg.h>
#include <machine/vmparam.h>
#include <machine/cpu.h>
+#include <machine/pmap.h>
+#include <machine/autoconf.h>
-#include <vm/vm.h>
+#include <ufs/mfs/mfs_extern.h>
+
+#include "macrom.h"
#define PA2VA(v, t) (t)((u_int)(v) - firstpa)
@@ -76,10 +84,14 @@ extern int nbnumranges;
extern u_long nbphys[];
extern u_long nblog[];
extern signed long nblen[];
-#define VIDMAPSIZE btoc(mac68k_round_page(mac68k_vidlen))
-extern u_int32_t mac68k_vidlen;
+#define VIDMAPSIZE btoc(mac68k_round_page(vidlen))
extern u_int32_t mac68k_vidlog;
extern u_int32_t mac68k_vidphys;
+extern u_int32_t videoaddr;
+extern u_int32_t videorowbytes;
+extern u_int32_t videosize;
+static int vidlen;
+static u_int32_t newvideoaddr;
extern caddr_t ROMBase;
@@ -100,19 +112,24 @@ struct msgbuf *msgbufp;
* This is called with the MMU either on or off. If it's on, we assume
* that it's mapped with the same PA <=> LA mapping that we eventually
* want. The page sizes and the protections will be wrong, anyway.
+ *
+ * nextpa is the first address following the loaded kernel. On a IIsi
+ * on 12 May 1996, that was 0xf9000 beyond firstpa.
*/
void
pmap_bootstrap(nextpa, firstpa)
vm_offset_t nextpa;
register vm_offset_t firstpa;
{
- vm_offset_t kstpa, kptpa, vidpa, iiopa, nbpa, rompa;
+ vm_offset_t kstpa, kptpa, vidpa, iiopa, rompa;
vm_offset_t kptmpa, lkptpa, p0upa;
u_int nptpages, kstsize;
int i;
register st_entry_t protoste, *ste;
register pt_entry_t protopte, *pte, *epte;
+ vidlen = ((videosize >> 16) & 0xffff) * videorowbytes + PGOFSET;
+
/*
* Calculate important physical addresses:
*
@@ -125,9 +142,6 @@ pmap_bootstrap(nextpa, firstpa)
* vidpa internal video space for some machines
* PT pages VIDMAPSIZE pages
*
- * nbpa NuBus IO space
- * PT pages NBMAPSIZE pages
- *
* rompa ROM space
* PT pages ROMMAPSIZE pages
*
@@ -153,12 +167,10 @@ pmap_bootstrap(nextpa, firstpa)
nextpa += kstsize * NBPG;
kptpa = nextpa;
nptpages = Sysptsize +
- (IIOMAPSIZE + NBMAPSIZE + ROMMAPSIZE + VIDMAPSIZE
- + NPTEPG - 1) / NPTEPG;
+ (IIOMAPSIZE + ROMMAPSIZE + VIDMAPSIZE + NPTEPG - 1) / NPTEPG;
nextpa += nptpages * NBPG;
vidpa = nextpa - VIDMAPSIZE * sizeof(pt_entry_t);
- nbpa = vidpa - NBMAPSIZE * sizeof(pt_entry_t);
- rompa = nbpa - ROMMAPSIZE * sizeof(pt_entry_t);
+ rompa = vidpa - ROMMAPSIZE * sizeof(pt_entry_t);
iiopa = rompa - IIOMAPSIZE * sizeof(pt_entry_t);
kptmpa = nextpa;
nextpa += NBPG;
@@ -168,7 +180,7 @@ pmap_bootstrap(nextpa, firstpa)
nextpa += USPACE;
if (nextpa > high[0]) {
- printf("Failure in BSD boot. nextpa=0x%x, high[0]=0x%x.\n",
+ printf("Failure in BSD boot. nextpa=0x%lx, high[0]=0x%lx.\n",
nextpa, high[0]);
printf("You're hosed! Try booting with 32-bit addressing ");
printf("enabled in the memory control panel.\n");
@@ -363,29 +375,21 @@ pmap_bootstrap(nextpa, firstpa)
*/
pte = PA2VA(iiopa, u_int *);
epte = PA2VA(rompa, u_int *);
- protopte = INTIOBASE | PG_RW | PG_CI | PG_V;
+ protopte = IOBase | PG_RW | PG_CI | PG_V;
while (pte < epte) {
*pte++ = protopte;
protopte += NBPG;
}
pte = PA2VA(rompa, u_int *);
- epte = PA2VA(nbpa, u_int *);
+ epte = PA2VA(vidpa, u_int *);
protopte = ((u_int) ROMBase) | PG_RO | PG_V;
while (pte < epte) {
*pte++ = protopte;
protopte += NBPG;
}
- pte = PA2VA(nbpa, u_int *);
- epte = pte + NBMAPSIZE;
- protopte = NBBASE | PG_RW | PG_V | PG_CI;
- while (pte < epte) {
- *pte++ = protopte;
- protopte += NBPG;
- }
-
- if (mac68k_vidlog) {
+ if (vidlen) {
pte = PA2VA(vidpa, u_int *);
epte = pte + VIDMAPSIZE;
protopte = mac68k_vidphys | PG_RW | PG_V | PG_CI;
@@ -413,18 +417,18 @@ pmap_bootstrap(nextpa, firstpa)
Sysmap = (pt_entry_t *)mac68k_ptob(nptpages * NPTEPG);
IOBase = (u_long)mac68k_ptob(nptpages*NPTEPG -
- (IIOMAPSIZE + ROMMAPSIZE + NBMAPSIZE + VIDMAPSIZE));
+ (IIOMAPSIZE + ROMMAPSIZE + VIDMAPSIZE));
ROMBase = (char *)mac68k_ptob(nptpages*NPTEPG -
- (ROMMAPSIZE + NBMAPSIZE + VIDMAPSIZE));
-
- NuBusBase = (u_long)mac68k_ptob(nptpages*NPTEPG -
- (NBMAPSIZE + VIDMAPSIZE));
+ (ROMMAPSIZE + VIDMAPSIZE));
- if (mac68k_vidlog)
- mac68k_vidlog = (u_int32_t)
+ if (vidlen) {
+ newvideoaddr = (u_int32_t)
mac68k_ptob(nptpages*NPTEPG - VIDMAPSIZE)
+ (mac68k_vidphys & PGOFSET);
+ if (mac68k_vidlog)
+ mac68k_vidlog = newvideoaddr;
+ }
/*
* Setup u-area for process 0.
@@ -534,7 +538,8 @@ pmap_bootstrap(nextpa, firstpa)
* Allocate some fixed, special purpose kernel virtual addresses
*/
{
- vm_offset_t va = virtual_avail;
+ extern vm_offset_t tmp_vpages[];
+ vm_offset_t va = virtual_avail;
CADDR1 = (caddr_t)va;
va += NBPG;
@@ -542,6 +547,8 @@ pmap_bootstrap(nextpa, firstpa)
va += NBPG;
vmmap = (caddr_t)va;
va += NBPG;
+ tmp_vpages[0] = va;
+ va += NBPG;
msgbufp = (struct msgbuf *)va;
va += NBPG;
virtual_avail = reserve_dumppages(va);
@@ -552,9 +559,8 @@ void
bootstrap_mac68k(tc)
int tc;
{
+ extern void zs_init __P((void));
extern caddr_t esym;
- extern u_long videoaddr, boothowto;
- u_long newvideoaddr = 0;
vm_offset_t nextpa;
caddr_t oldROMBase;
@@ -562,12 +568,13 @@ bootstrap_mac68k(tc)
printf("Bootstrapping NetBSD/mac68k.\n");
oldROMBase = ROMBase;
+ mac68k_vidphys = videoaddr;
if ((tc & 0x80000000) && (mmutype == MMU_68030)) {
if (mac68k_machine.do_graybars)
printf("Getting mapping from MMU.\n");
- get_mapping();
+ (void) get_mapping();
if (mac68k_machine.do_graybars)
printf("Done.\n");
} else {
@@ -577,16 +584,16 @@ bootstrap_mac68k(tc)
low[0] = 0;
high[0] = mac68k_machine.mach_memsize * (1024 * 1024);
if (mac68k_machine.do_graybars)
- printf("Faked range to byte 0x%x.\n", high[0]);
+ printf("Faked range to byte 0x%lx.\n", high[0]);
}
- nextpa = load_addr + ((int)esym + NBPG - 1) & PG_FRAME;
+ nextpa = load_addr + (((int)esym + NBPG - 1) & PG_FRAME);
#if MFS
if (boothowto & RB_MINIROOT) {
int v;
boothowto |= RB_DFLTROOT;
nextpa = mac68k_round_page(nextpa);
- if ((v = mfs_initminiroot(nextpa-load_addr)) == 0) {
+ if ((v = mfs_initminiroot((caddr_t) nextpa-load_addr)) == 0) {
printf("Error loading miniroot.\n");
}
printf("Loaded %d byte miniroot.\n", v);
@@ -602,25 +609,34 @@ bootstrap_mac68k(tc)
if (mac68k_machine.do_graybars)
printf("Pmap bootstrapped.\n");
- if (mac68k_vidlog)
- newvideoaddr = mac68k_vidlog;
- else {
- if (NBBASE <= videoaddr && videoaddr <= NBTOP)
- newvideoaddr = videoaddr - NBBASE + NuBusBase;
- else
- panic("Don't know how to relocate video!\n");
- }
+ if (!vidlen)
+ panic("Don't know how to relocate video!\n");
if (mac68k_machine.do_graybars)
- printf("Moving ROMBase from 0x%x to 0x%x.\n",
+ printf("Moving ROMBase from %p to %p.\n",
oldROMBase, ROMBase);
mrg_fixupROMBase(oldROMBase, ROMBase);
if (mac68k_machine.do_graybars)
- printf("Video address 0x%x -> 0x%x.\n",
- videoaddr, newvideoaddr);
+ printf("Video address 0x%lx -> 0x%lx.\n",
+ (unsigned long) videoaddr,
+ (unsigned long) newvideoaddr);
mac68k_set_io_offsets(IOBase);
+
+ /*
+ * If the serial ports are going (for console or 'echo'), then
+ * we need to make sure the IO change gets propagated properly.
+ * This resets the base addresses for the 8530 (serial) driver.
+ *
+ * WARNING!!! No printfs() (etc) BETWEEN zs_init() and the end
+ * of this function (where we start using the MMU, so the new
+ * address is correct.
+ */
+ if ( (mac68k_machine.serial_boot_echo)
+ || (mac68k_machine.serial_console))
+ zs_init();
+
videoaddr = newvideoaddr;
}
diff --git a/sys/arch/mac68k/mac68k/pram.c b/sys/arch/mac68k/mac68k/pram.c
index 219bde3b888..b3cb6e6db11 100644
--- a/sys/arch/mac68k/mac68k/pram.c
+++ b/sys/arch/mac68k/mac68k/pram.c
@@ -1,4 +1,4 @@
-/* $NetBSD: pram.c,v 1.6 1995/09/17 18:50:17 briggs Exp $ */
+/* $NetBSD: pram.c,v 1.8 1996/03/31 14:21:03 scottr Exp $ */
/*-
* Copyright (C) 1993 Allen K. Briggs, Chris P. Caputo,
@@ -35,7 +35,8 @@
/* #include "stand.h" */
-#include "via.h"
+#include <sys/types.h>
+#include <machine/viareg.h>
#include "pram.h"
#include "macrom.h"
diff --git a/sys/arch/mac68k/mac68k/pram.h b/sys/arch/mac68k/mac68k/pram.h
index 4cdfa358a5c..41c563d2ede 100644
--- a/sys/arch/mac68k/mac68k/pram.h
+++ b/sys/arch/mac68k/mac68k/pram.h
@@ -1,4 +1,4 @@
-/* $NetBSD: pram.h,v 1.2 1995/02/16 00:02:12 briggs Exp $ */
+/* $NetBSD: pram.h,v 1.3 1996/05/05 06:18:53 briggs Exp $ */
/*
* RTC toolkit version 1.08b, copyright 1995, erik vogan
@@ -69,3 +69,6 @@ void writeExtPram(char *addr, int loc, int len);
unsigned long getPramTime(void);
void setPramTime(unsigned long time);
+unsigned long pram_readtime __P((void));
+void pram_settime __P((unsigned long));
+
diff --git a/sys/arch/mac68k/mac68k/swapgeneric.c b/sys/arch/mac68k/mac68k/swapgeneric.c
index 23c7405ee5a..dcf49c5f7ae 100644
--- a/sys/arch/mac68k/mac68k/swapgeneric.c
+++ b/sys/arch/mac68k/mac68k/swapgeneric.c
@@ -1,4 +1,4 @@
-/* $NetBSD: swapgeneric.c,v 1.7 1995/08/09 03:22:50 briggs Exp $ */
+/* $NetBSD: swapgeneric.c,v 1.9 1996/05/05 06:18:56 briggs Exp $ */
/*
* Copyright (c) 1982, 1986 Regents of the University of California.
@@ -43,6 +43,10 @@
#include <sys/device.h>
#include <sys/disklabel.h>
+#include <dev/cons.h>
+
+#include <ufs/ffs/ffs_extern.h>
+
#include <machine/pte.h>
#include "sd.h"
@@ -57,10 +61,10 @@ struct swdevt swdevt[] = {
};
#if NSD > 0
-extern struct cfdriver sdcd;
+extern struct cfdriver sd_cd;
#endif
#if NCD > 0
-extern struct cfdriver cdcd;
+extern struct cfdriver cd_cd;
#endif
struct genericconf {
@@ -69,17 +73,20 @@ struct genericconf {
dev_t gc_root;
} genericconf[] = {
#if NSD > 0
- { &sdcd, "sd", makedev(4,0) },
+ { &sd_cd, "sd", makedev(4,0) },
#endif
#if NCD > 0
- { &cdcd, "cd", makedev(6,0) },
+ { &cd_cd, "cd", makedev(6,0) },
#endif
{ 0 }
};
-extern int ffs_mountroot();
-int (*mountroot)() = ffs_mountroot;
+void setconf __P((void));
+void doboot __P((void));
+void gets __P((char *));
+int (*mountroot) __P((void)) = ffs_mountroot;
+void
setconf()
{
register struct genericconf *gc = NULL;
@@ -136,7 +143,7 @@ verybad:
printf("\n");
goto doswap;
}
- printf(" -- hit any key to reboot\n", root_swap);
+ printf(" -- hit any key to reboot\n");
cngetc();
doboot();
printf(" Automatic reboot failed.\n");
@@ -160,6 +167,7 @@ doswap:
rootdev = dumpdev;
}
+void
gets(cp)
char *cp;
{
diff --git a/sys/arch/mac68k/mac68k/sys_machdep.c b/sys/arch/mac68k/mac68k/sys_machdep.c
index a7bd11a0dbb..062480901d6 100644
--- a/sys/arch/mac68k/mac68k/sys_machdep.c
+++ b/sys/arch/mac68k/mac68k/sys_machdep.c
@@ -1,4 +1,4 @@
-/* $NetBSD: sys_machdep.c,v 1.7 1995/10/10 03:48:33 briggs Exp $ */
+/* $NetBSD: sys_machdep.c,v 1.9 1996/05/05 06:18:58 briggs Exp $ */
/*
* Copyright (c) 1990 The Regents of the University of California.
@@ -69,18 +69,18 @@
* @(#)sys_machdep.c 7.7 (Berkeley) 5/7/91
*/
-#include "sys/param.h"
-#include "sys/systm.h"
-#include "sys/ioctl.h"
-#include "sys/file.h"
-#include "sys/time.h"
-#include "sys/proc.h"
-#include "sys/uio.h"
-#include "sys/kernel.h"
-#include "sys/mtio.h"
-#include "sys/buf.h"
-#include "sys/trace.h"
-#include "sys/mount.h"
+#include <sys/param.h>
+#include <sys/systm.h>
+#include <sys/ioctl.h>
+#include <sys/file.h>
+#include <sys/time.h>
+#include <sys/proc.h>
+#include <sys/uio.h>
+#include <sys/kernel.h>
+#include <sys/mtio.h>
+#include <sys/buf.h>
+#include <sys/trace.h>
+#include <sys/mount.h>
#include <sys/syscallargs.h>
@@ -140,7 +140,7 @@ vdoualarm(arg)
}
#endif
-#include "machine/cpu.h"
+#include <machine/cpu.h>
/* XXX should be in an include file somewhere */
#define CC_PURGE 1
@@ -149,7 +149,12 @@ vdoualarm(arg)
#define CC_EXTPURGE 0x80000000
/* XXX end should be */
+int cachectl __P((int, caddr_t, int));
+void DCIU __P((void));
+void ICIA __P((void));
+
/*ARGSUSED1*/
+int
cachectl(req, addr, len)
int req;
caddr_t addr;
@@ -182,10 +187,12 @@ int sys_sysarch(p, v, retval)
void *v;
register_t *retval;
{
+#if 0
struct sysarch_args /* {
syscallarg(int) op;
syscallarg(char *) parms;
} */ *uap = v;
+#endif
return ENOSYS;
}
diff --git a/sys/arch/mac68k/mac68k/trap.c b/sys/arch/mac68k/mac68k/trap.c
index 9798285fb7e..1c5598aa824 100644
--- a/sys/arch/mac68k/mac68k/trap.c
+++ b/sys/arch/mac68k/mac68k/trap.c
@@ -1,4 +1,4 @@
-/* $NetBSD: trap.c,v 1.32.2.2 1995/10/15 03:49:49 briggs Exp $ */
+/* $NetBSD: trap.c,v 1.37 1996/05/05 06:54:23 briggs Exp $ */
/*
* Copyright (c) 1988 University of Utah.
@@ -56,11 +56,14 @@
#include <sys/ktrace.h>
#endif
+#include <machine/db_machdep.h>
#include <machine/psl.h>
#include <machine/trap.h>
#include <machine/cpu.h>
#include <machine/reg.h>
+#include <m68k/fpe/fpu_emulate.h>
+
#include <vm/vm.h>
#include <vm/pmap.h>
@@ -125,6 +128,21 @@ int mmupid = -1;
#define MDB_ISPID(p) (p) == mmupid
#endif
+/* trap() and syscall() only called from locore */
+void trap __P((int, unsigned, register unsigned, struct frame));
+void syscall __P((register_t, struct frame));
+
+static inline void userret __P((register struct proc *,
+ register struct frame *,
+ u_quad_t, u_int, int));
+
+#if defined(M68040)
+static int writeback __P((struct frame *, int));
+#if DEBUG
+static int dumpssw __P((register u_short));
+#endif
+#endif
+
/*
* Trap and syscall both need the following work done before returning
* to user mode.
@@ -194,7 +212,7 @@ again:
"pid %d(%s): writeback aborted in sigreturn, pc=%x\n",
p->p_pid, p->p_comm, fp->f_pc, faultaddr);
#endif
- } else if (sig = writeback(fp, fromtrap)) {
+ } else if ((sig = writeback(fp, fromtrap))) {
beenhere = 1;
oticks = p->p_sticks;
trapsignal(p, sig, faultaddr);
@@ -211,6 +229,7 @@ again:
* System calls are broken out for efficiency.
*/
/*ARGSUSED*/
+void
trap(type, code, v, frame)
int type;
unsigned code;
@@ -223,9 +242,8 @@ trap(type, code, v, frame)
#endif
register struct proc *p;
register int i;
- u_int ncode, ucode;
+ u_int ucode;
u_quad_t sticks;
- int s;
cnt.v_trap++;
p = curproc;
@@ -242,7 +260,7 @@ trap(type, code, v, frame)
dopanic:
printf("trap type %d, code = %x, v= %x\n", type, code, v);
#ifdef DDB
- if (kdb_trap(type, &frame))
+ if (kdb_trap(type, (db_regs_t *) &frame))
return;
#endif
regdump(&frame, 128);
@@ -384,7 +402,7 @@ copyfault:
(caddr_t) frame.f_pc != trap12 &&
(caddr_t) frame.f_pc != trap15 &&
(caddr_t) frame.f_pc != illinst)) {
- if (kdb_trap(type, &frame))
+ if (kdb_trap(type, (db_regs_t *) &frame))
return;
}
#endif
@@ -429,16 +447,19 @@ copyfault:
case T_SSIR: /* Software interrupt */
case T_SSIR|T_USER:
if (ssir & SIR_SERIAL) {
+ void zssoft __P((int));
siroff(SIR_SERIAL);
cnt.v_soft++;
zssoft(0);
}
if (ssir & SIR_NET) {
+ void netintr __P((void));
siroff(SIR_NET);
cnt.v_soft++;
netintr();
}
if (ssir & SIR_CLOCK) {
+ void softclock __P((void));
siroff(SIR_CLOCK);
cnt.v_soft++;
softclock();
@@ -542,7 +563,7 @@ copyfault:
if (p->p_addr->u_pcb.pcb_onfault)
goto copyfault;
printf("vm_fault(%x, %x, %x, 0) -> %x\n",
- map, va, ftype, rv);
+ (unsigned) map, (unsigned) va, ftype, rv);
printf(" type %x, code [mmu,,ssw]: %x\n",
type, code);
goto dopanic;
@@ -577,6 +598,7 @@ char wberrstr[] =
"WARNING: pid %d(%s) writeback [%s] failed, pc=%x fa=%x wba=%x wbd=%x\n";
#endif
+static int
writeback(fp, docachepush)
struct frame *fp;
int docachepush;
@@ -811,6 +833,7 @@ writeback(fp, docachepush)
}
#ifdef DEBUG
+static int
dumpssw(ssw)
register u_short ssw;
{
@@ -837,6 +860,7 @@ dumpssw(ssw)
f7tm[ssw & SSW4_TMMASK]);
}
+int
dumpwb(num, s, a, d)
int num;
u_short s;
@@ -862,6 +886,7 @@ dumpwb(num, s, a, d)
/*
* Process a system call.
*/
+void
syscall(code, frame)
register_t code;
struct frame frame;
@@ -1006,6 +1031,8 @@ syscall(code, frame)
#endif
}
+void child_return __P((struct proc *, struct frame));
+
/*
* Process the tail end of a fork() for the child.
*/
diff --git a/sys/arch/mac68k/mac68k/via.c b/sys/arch/mac68k/mac68k/via.c
index 0659f39de71..36a96f89492 100644
--- a/sys/arch/mac68k/mac68k/via.c
+++ b/sys/arch/mac68k/mac68k/via.c
@@ -1,4 +1,4 @@
-/* $NetBSD: via.c,v 1.36 1996/02/03 22:50:19 briggs Exp $ */
+/* $NetBSD: via.c,v 1.44 1996/05/25 16:31:04 briggs Exp $ */
/*-
* Copyright (C) 1993 Allen K. Briggs, Chris P. Caputo,
@@ -41,22 +41,28 @@
#include <sys/param.h>
#include <sys/kernel.h>
#include <sys/syslog.h>
+#include <sys/systm.h>
#include <machine/cpu.h>
#include <machine/frame.h>
-#include "via.h"
+#include <machine/viareg.h>
#include "ncrscsi.h"
#include "ncr96scsi.h"
-static void via1_noint __P((int));
+static void via1_noint __P((void *));
static void via2_noint __P((void *));
-void mrg_adbintr(), mrg_pmintr(), rtclock_intr(), profclock();
-void via2_nubus_intr();
-void rbv_nubus_intr();
-void slot_noint(void *, int);
+static void slot_ignore __P((void *, int));
+static void slot_noint __P((void *, int));
+void mrg_adbintr __P((void *));
+void mrg_pmintr __P((void *));
+void rtclock_intr __P((void *));
+void profclock __P((void *));
+void via1_intr __P((struct frame *));
+void via2_nubus_intr __P((void *));
+void rbv_nubus_intr __P((void *));
int VIA2 = 1; /* default for II, IIx, IIcx, SE/30. */
-void (*via1itab[7])()={
+void (*via1itab[7]) __P((void *))={
via1_noint,
via1_noint,
mrg_adbintr,
@@ -66,7 +72,7 @@ void (*via1itab[7])()={
rtclock_intr,
}; /* VIA1 interrupt handler table */
-void (*via2itab[7])()={
+void (*via2itab[7]) __P((void *))={
via2_noint,
via2_nubus_intr,
via2_noint,
@@ -81,22 +87,31 @@ void *via2iarg[7] = {
(void *) 4, (void *) 5, (void *) 6
}; /* Arg array for VIA2 interrupts. */
-void via2_intr(struct frame *);
-void rbv_intr(struct frame *);
+void via2_intr __P((struct frame *));
+void rbv_intr __P((struct frame *));
void (*real_via2_intr)(struct frame *);
-/* nubus slot interrupt routines */
-void (*slotitab[6])(void *, int) = {
+/*
+ * Nubus slot interrupt routines and parameters for slots 9-15. Note
+ * that for simplicity of code, "v2IRQ0" for internal video is treated
+ * as a slot 15 interrupt; this slot is quite ficticious in real-world
+ * Macs. See also GMGH, pp. 165-167, and "Monster, Loch Ness."
+ */
+void (*slotitab[7]) __P((void *, int)) = {
slot_noint,
slot_noint,
slot_noint,
slot_noint,
slot_noint,
- slot_noint
+ slot_noint,
+ slot_noint /* int_video_intr */
};
-void *slotptab[6];
+void *slotptab[7] = {
+ (void *) 0, (void *) 1, (void *) 2, (void *) 3,
+ (void *) 4, (void *) 5, (void *) 6
+};
void
VIA_initialize()
@@ -152,102 +167,125 @@ VIA_initialize()
}
real_via2_intr = rbv_intr;
via2itab[1] = rbv_nubus_intr;
+ add_nubus_intr(0, slot_ignore, NULL);
}
}
void
-via1_intr(struct frame *fp)
+via1_intr(fp)
+ struct frame *fp;
{
register unsigned char intbits;
+ register unsigned char mask;
register unsigned char bitnum;
- intbits = via_reg(VIA1, vIFR); /* get interrupts pending */
- intbits &= via_reg(VIA1, vIER); /* only care about enabled ones */
+ intbits = via_reg(VIA1, vIFR) & via_reg(VIA1, vIER);
if (intbits == 0)
return;
+ /*
+ * Unflag interrupts here. If we do it after each interrupt,
+ * the MRG ADB hangs up.
+ */
via_reg(VIA1, vIFR) = intbits;
+ mask = (unsigned char) 1;
+
bitnum = 0;
do {
- if (intbits & 0x1) {
- via1itab[bitnum](bitnum); /* run interrupt handler */
+ if (intbits & mask) {
+ via1itab[bitnum]((void *)((int) bitnum));
+ /* via_reg(VIA1, vIFR) = mask; */
}
- intbits >>= 1;
- } while (++bitnum != 7 && intbits);
+ mask <<= 1;
+ } while (intbits >= mask && ++bitnum < 7);
}
void
-via2_intr(struct frame *fp)
+via2_intr(fp)
+ struct frame *fp;
{
- register unsigned char intbits;
- register char bitnum;
+ register unsigned char intbits;
+ register unsigned char mask;
+ register unsigned char bitnum;
- intbits = via2_reg(vIFR); /* get interrupts pending */
- intbits &= via2_reg(vIER); /* only care about enabled */
+ intbits = via2_reg(vIFR) & via2_reg(vIER);
- if (intbits == 0) return;
+ if (intbits == 0)
+ return;
- /*
- * Unflag interrupts we're about to process.
- */
via2_reg(vIFR) = intbits;
+ mask = (unsigned char) 1;
+
bitnum = 0;
do {
- if (intbits & 0x1)
+ if (intbits & mask) {
via2itab[bitnum](via2iarg[bitnum]);
- intbits >>= 1;
- } while (++bitnum != 7 && intbits);
+ }
+ mask <<= 1;
+ } while (intbits >= mask && ++bitnum < 7);
}
void
-rbv_intr(struct frame *fp)
+rbv_intr(fp)
+ struct frame *fp;
{
- register unsigned char intbits;
- register char bitnum, bitmsk;
+ register unsigned char intbits;
+ register unsigned char mask;
+ register unsigned char bitnum;
intbits = (via2_reg(vIFR + rIFR) & via2_reg(vIER + rIER));
- if (intbits == 0) return;
+ if (intbits == 0)
+ return;
- /*
- * Unflag interrupts we're about to process.
- */
via2_reg(rIFR) = intbits;
+ mask = (unsigned char) 1;
+
bitnum = 0;
do {
- if (intbits & 0x1)
+ if (intbits & mask) {
via2itab[bitnum](via2iarg[bitnum]);
- intbits >>= 1;
- } while (++bitnum != 7 && intbits);
+ }
+ mask <<= 1;
+ } while (intbits >= mask && ++bitnum < 7);
}
static void
-via1_noint(int bitnum)
+via1_noint(bitnum)
+ void *bitnum;
{
- printf("via1_noint(%d)\n", bitnum);
+ printf("via1_noint(%d)\n", (int) bitnum);
}
static void
-via2_noint(void *bitnum)
+via2_noint(bitnum)
+ void *bitnum;
{
- printf("via2_noint(%d)\n", (int) bitnum);
+ printf("via2_noint(%d)\n", (int) bitnum);
}
static int nubus_intr_mask = 0;
int
add_nubus_intr(slot, func, client_data)
-int slot;
-void (*func)();
-void *client_data;
+ int slot;
+ void (*func) __P((void *, int));
+ void *client_data;
{
int s = splhigh();
- if (slot < 9 || slot > 15) return 0;
+ /*
+ * Map Nubus slot 0 to "slot" 15; see note on Nubus slot
+ * interrupt tables.
+ */
+ if (slot == 0)
+ slot = 15;
+ if (slot < 9 || slot > 15)
+ return 0;
slotitab[slot-9] = func;
slotptab[slot-9] = client_data;
@@ -266,75 +304,89 @@ void *client_data;
}
void
-enable_nubus_intr(void)
+enable_nubus_intr()
{
- if (VIA2 == VIA2OFF) {
+ if (VIA2 == VIA2OFF)
via2_reg(vIER) = V2IF_SLOTINT | 0x80;
- } else {
+ else
via2_reg(rIER) = V2IF_SLOTINT | 0x80;
- }
}
+/*ARGSUSED*/
void
-via2_nubus_intr(int bit)
+via2_nubus_intr(bitarg)
+ void *bitarg;
{
register int i, mask, ints;
try_again:
- via2_reg(vIFR) = V2IF_SLOTINT;
- if (ints = ((~via2_reg(vBufA)) & nubus_intr_mask)) {
- mask = (1 << 5);
- i = 6;
+ via2_reg(vIFR) = 0x80 | V2IF_SLOTINT;
+ if ((ints = ((~via2_reg(vBufA)) & nubus_intr_mask)) != 0) {
+ mask = (1 << 6);
+ i = 7;
while (i--) {
- if (ints & mask) {
+ if (ints & mask)
(*slotitab[i])(slotptab[i], i+9);
- }
mask >>= 1;
}
- } else {
+ } else
return;
- }
goto try_again;
}
+/*ARGSUSED*/
void
-rbv_nubus_intr(int bit)
+rbv_nubus_intr(bitarg)
+ void *bitarg;
{
register int i, mask, ints;
try_again:
- via2_reg(rIFR) = V2IF_SLOTINT;
- if (ints = ((~via2_reg(rBufA)) & via2_reg(rSlotInt))) {
- mask = (1 << 5);
- i = 6;
+ via2_reg(rIFR) = 0x80 | V2IF_SLOTINT;
+ if ((ints = ((~via2_reg(rBufA)) & via2_reg(rSlotInt))) != 0) {
+ mask = (1 << 6);
+ i = 7;
while (i--) {
- if (ints & mask) {
+ if (ints & mask)
(*slotitab[i])(slotptab[i], i+9);
- }
mask >>= 1;
}
- } else {
+ } else
return;
- }
goto try_again;
}
-void
-slot_noint(void *client_data, int slot)
+static void
+slot_ignore(client_data, slot)
+ void *client_data;
+ int slot;
{
- printf("slot_noint() slot %x\n", slot);
+ register int mask = (1 << (slot-9));
+
+ if (VIA2 == VIA2OFF) {
+ via2_reg(vDirA) |= mask;
+ via2_reg(vBufA) = mask;
+ via2_reg(vDirA) &= ~mask;
+ } else
+ via2_reg(rBufA) = mask;
}
+static void
+slot_noint(client_data, slot)
+ void *client_data;
+ int slot;
+{
+ printf("slot_noint() slot %x\n", slot);
+}
void
via_shutdown()
{
- if(VIA2 == VIA2OFF){
+ if (VIA2 == VIA2OFF) {
via2_reg(vDirB) |= 0x04; /* Set write for bit 2 */
via2_reg(vBufB) &= ~0x04; /* Shut down */
- }else if(VIA2 == RBVOFF){
+ } else if (VIA2 == RBVOFF)
via2_reg(rBufB) &= ~0x04;
- }
}
int
@@ -350,7 +402,7 @@ rbv_vidstatus()
return(0);
}
-extern void
+void
mac68k_register_scsi_drq(drq_func, client_data)
void (*drq_func)(void *);
void *client_data;
@@ -364,7 +416,7 @@ mac68k_register_scsi_drq(drq_func, client_data)
}
}
-extern void
+void
mac68k_register_scsi_irq(irq_func, client_data)
void (*irq_func)(void *);
void *client_data;
@@ -378,7 +430,7 @@ mac68k_register_scsi_irq(irq_func, client_data)
}
}
-extern void
+void
mac68k_register_via1_t1_irq(irq_func)
void (*irq_func)(void *);
{
diff --git a/sys/arch/mac68k/mac68k/vm_machdep.c b/sys/arch/mac68k/mac68k/vm_machdep.c
index 741ec9a3d39..9d007c1babf 100644
--- a/sys/arch/mac68k/mac68k/vm_machdep.c
+++ b/sys/arch/mac68k/mac68k/vm_machdep.c
@@ -1,4 +1,4 @@
-/* $NetBSD: vm_machdep.c,v 1.16 1996/02/05 02:10:00 christos Exp $ */
+/* $NetBSD: vm_machdep.c,v 1.20 1996/05/05 16:50:34 briggs Exp $ */
/*
* Copyright (c) 1988 University of Utah.
@@ -64,6 +64,8 @@
extern int fpu_type;
+void savectx __P((struct pcb *));
+
/*
* Finish a fork operation, with process p2 nearly set up.
* Copy and update the kernel stack and pcb, making the child
@@ -81,7 +83,6 @@ cpu_fork(p1, p2)
register struct trapframe *tf;
register struct switchframe *sf;
extern struct pcb *curpcb;
- extern void proc_trampoline(), child_return();
p2->p_md.md_flags = p1->p_md.md_flags;
@@ -118,20 +119,21 @@ cpu_fork(p1, p2)
*/
void
cpu_set_kpc(p, pc)
- struct proc *p;
- u_int32_t pc;
+ struct proc *p;
+ void (*pc) __P((struct proc *));
{
struct pcb *pcbp;
struct switchframe *sf;
- extern void proc_trampoline();
pcbp = &p->p_addr->u_pcb;
sf = (struct switchframe *) pcbp->pcb_regs[11];
sf->sf_pc = (u_int) proc_trampoline;
- pcbp->pcb_regs[6] = pc; /* A2 */
+ pcbp->pcb_regs[6] = (int)pc; /* A2 */
pcbp->pcb_regs[7] = (int)p; /* A3 */
}
+void switch_exit __P((struct proc *));
+
/*
* cpu_exit is called as the last action during exit.
* We release the address space and machine-dependent resources,
@@ -232,9 +234,10 @@ cpu_coredump(p, vp, cred, chdr)
* Both addresses are assumed to reside in the Sysmap,
* and size must be a multiple of CLSIZE.
*/
+void
pagemove(from, to, size)
register caddr_t from, to;
- int size;
+ size_t size;
{
register vm_offset_t pa;
@@ -260,11 +263,15 @@ pagemove(from, to, size)
}
}
+void physaccess __P((caddr_t, caddr_t, register int, register int));
+void TBIAS __P((void));
+
/*
* Map `size' bytes of physical memory starting at `paddr' into
* kernel VA space at `vaddr'. Read/write and cache-inhibit status
* are specified by `prot'.
*/
+void
physaccess(vaddr, paddr, size, prot)
caddr_t vaddr, paddr;
register int size, prot;
@@ -281,6 +288,9 @@ physaccess(vaddr, paddr, size, prot)
TBIAS();
}
+void physunaccess __P((caddr_t, register int));
+
+void
physunaccess(vaddr, size)
caddr_t vaddr;
register int size;
@@ -293,6 +303,8 @@ physunaccess(vaddr, size)
TBIAS();
}
+void setredzone __P((void *, caddr_t));
+
/*
* Set a red zone in the kernel stack after the u. area.
* We don't support a redzone right now. It really isn't clear
@@ -305,15 +317,19 @@ physunaccess(vaddr, size)
* Look at _lev6intr in locore.s for more details.
*/
/*ARGSUSED*/
+void
setredzone(pte, vaddr)
- struct pte *pte;
+ void *pte;
caddr_t vaddr;
{
}
+int kvtop __P((register caddr_t addr));
+
/*
* Convert kernel VA to physical address
*/
+int
kvtop(addr)
register caddr_t addr;
{