Merge pull request #94 from gartnerd/master

These changes allow to compile RetroBSD on a Linux Mint host with 32bit libraries installed.
The simulator in "tools/virtualmips/pic32" seems to work fine.

* removed the -Wall compiler flag (hopefully this will be temporary) from makefile recipes to prevent errors from stopping compilation. It mostly fails on printf type functions because of string size conflicts.
* added the "-m32" flag so that compilation and linking produced 32bit executables. I'm not sure is if this is strictly necessary.
* copied Makefile.kconfig to Makefile.kconfigpic32. The files in the pic32 directory compile after making this change
* modified the code in config.h to explicitly tag those function that are externally defined. This is required by newer versions of gcc
* hacked config.y so that the lexer/compiler stopped complaining.
* commented out the "compp" variable in main.c because of size mismatch errors. It doesn't seem to be used for anything.
* added a system header file to tools/kconfig/mkswapconf.c so that the compiler could find included functions

.gitignore

@@ -24,7 +24,10 @@
 *.dis
 *.0
 *.img
-sdcard.rd
-.profile
 
 Makefile.user
+
+#misc
+*.log
+*.txt
+

Makefile

@@ -8,40 +8,13 @@
 # The `make' will compile everything, including a kernel, utilities
 # and a root filesystem image.
 
-#
-# Supported boards
-#
-MAX32           = sys/pic32/max32/MAX32
-MAX32-ETH       = sys/pic32/max32-eth/MAX32-ETH
-UBW32           = sys/pic32/ubw32/UBW32
-UBW32UART       = sys/pic32/ubw32-uart/UBW32-UART
-UBW32UARTSDRAM  = sys/pic32/ubw32-uart-sdram/UBW32-UART-SDRAM
-MAXIMITE        = sys/pic32/maximite/MAXIMITE
-MAXCOLOR        = sys/pic32/maximite-color/MAXCOLOR
-EXPLORER16      = sys/pic32/explorer16/EXPLORER16
-STARTERKIT      = sys/pic32/starter-kit/STARTER-KIT
-DUINOMITE       = sys/pic32/duinomite/DUINOMITE
-DUINOMITEUART   = sys/pic32/duinomite-uart/DUINOMITE-UART
-DUINOMITEE      = sys/pic32/duinomite-e/DUINOMITE-E
-DUINOMITEEUART  = sys/pic32/duinomite-e-uart/DUINOMITE-E-UART
-PINGUINO        = sys/pic32/pinguino-micro/PINGUINO-MICRO
-DIP             = sys/pic32/dip/DIP
-BAREMETAL       = sys/pic32/baremetal/BAREMETAL
-RETROONE	    = sys/pic32/retroone/RETROONE
-FUBARINO	    = sys/pic32/fubarino/FUBARINO
-FUBARINOBIG	    = sys/pic32/fubarino/FUBARINO-UART2CONS-UART1-SRAMC
-MMBMX7          = sys/pic32/mmb-mx7/MMB-MX7
-
-# Select target board
-TARGET          ?= $(MAX32)
-
 # Filesystem and swap sizes.
-FS_KBYTES       = 102400
+FS_MBYTES       = 100
-U_KBYTES        = 102400
+U_MBYTES        = 100
-SWAP_KBYTES     = 2048
+SWAP_MBYTES     = 2
 
 # Set this to the device name for your SD card.  With this
-# enabled you can use "make installfs" to copy the filesys.img
+# enabled you can use "make installfs" to copy the sdcard.img
 # to the SD card.
 
 #SDCARD          = /dev/sdb
@@ -56,112 +29,29 @@ FSUTIL		= tools/fsutil/fsutil
 
 -include Makefile.user
 
-TARGETDIR    = $(shell dirname $(TARGET))
-TARGETNAME   = $(shell basename $(TARGET))
 TOPSRC       = $(shell pwd)
 CONFIG       = $(TOPSRC)/tools/configsys/config
-#
-# Filesystem contents.
-#
-BIN_FILES	:= $(wildcard bin/*)
-SBIN_FILES	:= $(wildcard sbin/*)
-GAMES_FILES	:= $(shell find games -type f ! -path '*/.*')
-LIBEXEC_FILES	:= $(wildcard libexec/*)
-LIB_FILES	:= lib/crt0.o lib/retroImage $(wildcard lib/*.a)
-ETC_FILES	= etc/rc etc/rc.local etc/ttys etc/gettytab etc/group \
-                  etc/passwd etc/shadow etc/fstab etc/motd etc/shells \
-                  etc/termcap etc/MAKEDEV etc/phones etc/remote
-INC_FILES	= $(wildcard include/*.h) \
-                  $(wildcard include/sys/*.h) \
-                  $(wildcard include/machine/*.h) \
-                  $(wildcard include/smallc/*.h) \
-                  $(wildcard include/smallc/sys/*.h) \
-                  $(wildcard include/arpa/*.h)
-SHARE_FILES	= share/re.help share/example/Makefile \
-                  share/example/ashello.S share/example/chello.c \
-                  share/example/blkjack.bas share/example/hilow.bas \
-                  share/example/stars.bas share/example/prime.scm \
-                  share/example/fact.fth share/example/echo.S \
-                  share/example/stdarg.c share/example/skeleton.c \
-                  $(wildcard share/smallc/*)
-MANFILES	= share/man/ share/man/cat1/ share/man/cat2/ share/man/cat3/ \
-		  share/man/cat4/ share/man/cat5/ share/man/cat6/ share/man/cat7/ \
-		  share/man/cat8/ $(wildcard share/man/cat?/*)
-ALLFILES	= $(SBIN_FILES) $(ETC_FILES) $(BIN_FILES) $(LIB_FILES) $(LIBEXEC_FILES) \
-                  $(INC_FILES) $(SHARE_FILES) $(GAMES_FILES) \
-                  var/log/messages var/log/wtmp .profile
-ALLDIRS         = games/ sbin/ bin/ dev/ etc/ tmp/ lib/ libexec/ share/ include/ \
-                  var/ u/ share/example/ share/misc/ share/smallc/ \
-                  var/run/ var/log/ var/lock/ games/ games/lib/ include/sys/ \
-                  include/machine/ include/arpa/ include/smallc/ \
-                  include/smallc/sys/ share/misc/ share/smallc/ include/sys/ \
-                  games/lib/
-BDEVS           = dev/rd0!b0:0 dev/rd0a!b0:1 dev/rd0b!b0:2 dev/rd0c!b0:3 dev/rd0d!b0:4
-BDEVS           += dev/rd1!b1:0 dev/rd1a!b1:1 dev/rd1b!b1:2 dev/rd1c!b1:3 dev/rd1d!b1:4
-BDEVS           += dev/rd2!b2:0 dev/rd2a!b2:1 dev/rd2b!b2:2 dev/rd2c!b2:3 dev/rd2d!b2:4
-BDEVS           += dev/rd3!b3:0 dev/rd3a!b3:1 dev/rd3b!b3:2 dev/rd3c!b3:3 dev/rd3d!b3:4
-BDEVS		    += dev/swap!b4:64 dev/swap0!b4:0 dev/swap1!b4:1 dev/swap2!b4:2
 
-D_CONSOLE        = dev/console!c0:0
+all:
-D_MEM		     = dev/mem!c1:0 dev/kmem!c1:1 dev/null!c1:2 dev/zero!c1:3
+		$(MAKE) -C tools
-D_TTY		     = dev/tty!c2:0
+		$(MAKE) -C lib
-D_FD		     = dev/stdin!c3:0 dev/stdout!c3:1 dev/stderr!c3:2
+		$(MAKE) -C src install
-D_TEMP           = dev/temp0!c4:0 dev/temp1!c4:1 dev/temp2!c4:2
+		$(MAKE) kernel
-
-U_DIRS           = $(addsuffix /,$(shell find u -type d ! -path '*/.svn*'))
-U_FILES          = $(shell find u -type f ! -path '*/.svn/*')
-#U_ALL            = $(patsubst u/%,%,$(U_DIRS) $(U_FILES))
-
-CDEVS            = $(D_CONSOLE) $(D_MEM) $(D_TTY) $(D_FD) $(D_TEMP)
-
-all:            tools build kernel
 		$(MAKE) fs
 
-fs:             sdcard.rd
+kernel:         $(CONFIG)
+		$(MAKE) -C sys/pic32 all
 
-.PHONY: 	tools
+fs:             sdcard.img
-tools:
-		$(MAKE) -C tools
 
-kernel: 	$(TARGETDIR)/Makefile
+.PHONY:         sdcard.img
-		$(MAKE) -C $(TARGETDIR)
+sdcard.img:	$(FSUTIL) rootfs.manifest userfs.manifest
-
-$(TARGETDIR)/Makefile: $(CONFIG) $(TARGETDIR)/$(TARGETNAME)
-		cd $(TARGETDIR) && ../../../tools/configsys/config $(TARGETNAME)
-
-.PHONY: 	lib
-lib:
-		$(MAKE) -C lib
-
-build: 		tools lib
-		$(MAKE) -C src install
-
-filesys.img:	$(FSUTIL) $(ALLFILES)
 		rm -f $@
-		$(FSUTIL) -n$(FS_KBYTES) $@
+		$(FSUTIL) --repartition=fs=$(FS_MBYTES)M:swap=$(SWAP_MBYTES)M:fs=$(U_MBYTES)M $@
-		$(FSUTIL) -a $@ $(ALLDIRS)
+		$(FSUTIL) --new --partition=1 --manifest=rootfs.manifest $@ .
-		$(FSUTIL) -a $@ $(CDEVS)
+# In case you need a separate /u partition,
-		$(FSUTIL) -a $@ $(BDEVS)
+# uncomment the following line.
-		$(FSUTIL) -a $@ $(ALLFILES)
+#		$(FSUTIL) --new --partition=3 --manifest=userfs.manifest $@ u
-		$(FSUTIL) -a $@ $(MANFILES)
-
-swap.img:
-		dd if=/dev/zero of=$@ bs=1k count=$(SWAP_KBYTES)
-
-user.img:	$(FSUTIL)
-ifneq ($(U_KBYTES), 0)
-		rm -f $@
-		$(FSUTIL) -n$(U_KBYTES) $@
-		(cd u; find . -type d -exec ../$(FSUTIL) -a ../$@ '{}/' \;)
-		(cd u; find . -type f -exec ../$(FSUTIL) -a ../$@ '{}' \+)
-endif
-
-sdcard.rd:	filesys.img swap.img user.img
-ifneq ($(U_KBYTES), 0)
-		tools/mkrd/mkrd -out $@ -boot filesys.img -swap swap.img -fs user.img
-else
-		tools/mkrd/mkrd -out $@ -boot filesys.img -swap swap.img
-endif
 
 $(FSUTIL):
 		cd tools/fsutil; $(MAKE)
@@ -175,21 +65,19 @@ clean:
 
 cleanall:       clean
 		$(MAKE) -C lib clean
-		rm -f sys/pic32/*/unix.hex bin/* sbin/* games/[a-k]* games/[m-z]* libexec/* share/man/cat*/*
+		rm -f sys/pic32/*/unix.hex bin/* sbin/* libexec/*
-		rm -f games/lib/adventure.dat
+		rm -f games/[a-k]* games/[m-z]* share/man/cat*/*
-		rm -f games/lib/cfscores
+		rm -f games/lib/adventure.dat games/lib/cfscores
-		rm -f share/re.help
+		rm -f share/re.help share/emg.keys share/misc/more.help
-		rm -f share/misc/more.help
 		rm -f etc/termcap etc/remote etc/phones
-		rm -rf share/unixbench
-		rm -f games/lib/adventure.dat games/lib/cfscores share/re.help share/misc/more.help etc/termcap
 		rm -f tools/configsys/.depend
-		rm -f var/log/aculog
+		rm -f var/log/aculog sdcard.img
-		rm -rf var/lock
+		rm -rf var/lock share/unixbench
 
-installfs: filesys.img
+installfs:
 ifdef SDCARD
-	sudo dd bs=32k if=sdcard.rd of=$(SDCARD)
+		@[ -f sdcard.img ] || $(MAKE) sdcard.img
+		sudo dd bs=32k if=sdcard.img of=$(SDCARD)
 else
 		@echo "Error: No SDCARD defined."
 endif
@@ -201,6 +89,3 @@ installflash:
 # TODO: make it relative to Target
 installboot:
 		sudo pic32prog sys/pic32/fubarino/bootloader.hex
-
-.profile:   etc/root/dot.profile
-		cp etc/root/dot.profile .profile

README.md

@@ -15,49 +15,35 @@
 
 ## Supported hardware
 
- * chipKIT Max32 board.
+ * Fubarino SD board.
- * Sparkfun UBW32 board.
+ * Olimex Duinomite, Duinomite-Mini, Duinomite-Mega and Duinomite-eMega boards.
+ * Olimex Pinguino-Micro board with PIC32MX795F512H microcontroller.
  * Maximite and Colour Maximite computers.
+ * Majenko SDXL board.
+ * 4D Systems Picadillo-35T board.
+ * MikroElektronika MultiMedia Board for PIC32MX7.
+ * chipKIT Max32 board with SD card shield.
+ * chipKIT WF32 board with 2.4" LCD TFT display shield.
+ * Sparkfun UBW32 board with SD card slot.
  * Microchip Explorer 16 board, with PIC32 CAN-USB plug-in module and SD & MMC pictail.
  * Microchip PIC32 USB or Ethernet Starter Kit, with I/O Expansion board and SD & MMC pictail.
- * Olimex Duinomite, Duinomite-Mini and Duinomite-Mega boards.
- * Olimex Pinguino-Micro board with PIC32MX795F512H microcontroller.
- * eflightworks DIP board.
 
 
 ## Build
 
-By default, the system is configured for the Max32 board.
+To compile everything from sources, you'll need some packages installed, namely:
-To select another target board, edit a top-level user-specific Makefile called "Makefile.user"
+Berkeley YACC, GNU bison, flex, groff, ELF library and FUSE library.
-and set a TARGET value:
+Under Ubuntu, for example, you can do it by command:
 
-```Makefile
+```shell
-TARGET = $(UBW32)          # for the UBW32 board with USB console
+$ sudo apt-get install bison byacc flex groff-base libelf-dev
-TARGET = $(UBW32UART)      # for the UBW32 board with UART console
-TARGET = $(UBW32UARTSDRAM) # for the UBW32 boars with UART console and 8MB SRAM ramdisk
-TARGET = $(MAXIMITE)       # for the Maximite board
-TARGET = $(MAXCOLOR)       # for the Colour Maximite board
-TARGET = $(EXPLORER16)     # for the Explorer 16 board
-TARGET = $(STARTERKIT)     # for the PIC32 USB or Ethernet Starter Kit
-TARGET = $(MAX32)          # default
-TARGET = $(MAX32-ETH)      # for the chipKIT MAX32 board with Arduino Ethernet shield
-TARGET = $(DUINOMITE)      # for the Duinomite board with USB console
-TARGET = $(DUINOMITEUART)  # for the Duinomite board with UART console
-TARGET = $(DUINOMITEE)     # for the Duinomite E board with USB console
-TARGET = $(DUINOMITEEUART) # for the Duinomite E board with UART console
-TARGET = $(PINGUINO)       # for the Pinguino-Micro board
-TARGET = $(DIP)            # for the DIP board
-TARGET = $(BAREMETAL)      # Bare PIC32 chip on a breakout board
-TARGET = $(FUBARINO)       # Fubarino SD board
-TARGET = $(FUBARINOBIG)    # Fubarino SD board with 8MB SRAM RAMDISK
-TARGET = $(MMBMX7)         # MMB MX7 board
 ```
 
-You can also change a desired filesystem size and swap area size,
+You can change a desired filesystem size and swap area size, as required.
-as required.  Default is:
+Default is:
 ```Makefile
-FS_KBYTES   = 16384
+FS_MBYTES   = 100
-SWAP_KBYTES = 2048
+SWAP_MBYTES = 2
 ```
 To compile the kernel and build a filesystem image, run:
 
@@ -65,7 +51,7 @@ To compile the kernel and build a filesystem image, run:
 $ make
 ```
 
-A resulting root filesystem image is in file `sdcard.rd`.
+A resulting root filesystem image is in file `sdcard.img`.
 A kernel is in file `unix.hex` in your target board subdirectory.
 
 
@@ -76,7 +62,7 @@ Win32DiskImager utility (https://launchpad.net/win32-image-writer/+download).
 On Linux, run:
 
 ```shell
-$ sudo dd if=sdcard.rd of=/dev/XYZ
+$ sudo dd if=sdcard.img of=/dev/XYZ
 ```
 
 Here `XYZ` is a device name of SD card, as recognized by Linux (sdb in my case).
@@ -88,11 +74,11 @@ Kernel image should be written to PIC32 flash memory.  The procedure depends
 on a board used.
 
 #### Max32 board:
+Use a pic32prog utility (http://code.google.com/p/pic32prog/)
+and a USB cable to install a kernel:
+
 ```shell
-$ cd sys/pic32/ubw32
+$ pic32prog -d /dev/ttyUSB0 sys/pic32/max32/unix.hex
-$ AVRTOOLS=/Applications/Mpide.app/Contents/Resources/Java/hardware/tools/avr
-    $AVRTOOLS/bin/avrdude -C$AVRTOOLS/etc/avrdude.conf -c stk500v2 -p pic32 \
-    -P /dev/tty.usbserial-* -b 115200 -v -U flash:w:unix.hex:i
 ```
 
 Here you need to change AVRTOOLS path and tty name according to your system.
@@ -154,13 +140,3 @@ $ ./pic32
 ```
 
 Configuration of simulated board is stored in file `pic32_max32.conf`.
-
-## Build packages
-
-
-For building under Ubuntu you need the following packages installed:
-
-```shell
-$ sudo apt-get install byacc libelf-dev
-```
-

cross.mk

@@ -1,7 +1,7 @@
 DESTDIR		= /usr/local/retrobsd
 MACHINE		= mips
 
-CC		= gcc
+CC		= gcc -m32
 
 AS		= $(CC) -x assembler-with-cpp
 LD		= ld

etc/.gitignore

@@ -1,3 +1,5 @@
+localtime
 phones
 remote
 termcap
+termcap.full

etc/MAKEDEV

@@ -4,46 +4,14 @@
 # All rights reserved.  The Berkeley software License Agreement
 # specifies the terms and conditions for redistribution.
 #
-#	@(#)MAKEDEV	4.27.6 (2.11BSD) 1999/2/19
-#
 # Device "make" file.  Valid arguments:
 #       std     standard devices
 #       local   configuration specific devices
 #       fd      file descriptor driver
-# Tapes:
-#	ht*	unibus tu77 & te16
-#	tm*	unibus tm11 & te10 emulations (e.g. Emulex tc-11)
-#	ts*	unibus ts11
-#	tu*	tmscp (tk50/tu81)
 # Disks:
-#	br*	unibus Eaton br1538 or br1711
+#       sd*     flash cards SecureDigital
-#	hk*	unibus rk06 and rk07
-#	ra*	unibus uda50 w/ ra??
-#	rk*	unibus rk05
-#	rl*	unibus rl01/rl02
-#	rx*	unibus rx02
-#	si*	unibus cdc 9766 w/ si 9500
-#	xp*	unibus rm02/03/05, rp04/05/06, diva, eagle, cdc9766, fuji 160.
-# Terminal multiplexors:
-#	dl*	dl-11 units other than the console
-#	dz*	unibus dz11 and dz32
-#	dh*	unibus dh11 and emulations (e.g. Able dmax, Emulex cs-11)
-#	dmf*	unibus dmf32
-#	dhu*    unibus dhu11
-#	dmz*    unibus dmz32
-#	dhv*    qbus dhv11
 # Pseudo terminals:
 #       pty*    set of 16 master and slave pseudo terminals
-# Printers:
-#	lp*	unibus lp11 parallel interface
-#	va*	unibus varian parallel interface
-#	vp*	unibus versatec parallel interface
-# Call units:
-# Special purpose devices:
-#	dr*		unibus dr11
-#	ram*		memory disk
-#	dn*		dn11 dialer
-#	ingreslock	Ingres lock driver.
 
 PATH=/etc:/sbin:/usr/sbin:/bin:/usr/bin
 umask 77

etc/Makefile

@@ -11,7 +11,6 @@ DESTDIR         = /foobar
 OWN             = root
 GRP             = wheel
 
-SUBDIR          = root
 FILES           = crontab fstab gettytab group motd passwd \
                   rc rc.local shells syslog.conf ttys
 
@@ -19,8 +18,6 @@ all install depend lint tags:
 
 clean:
 		rm -f *~
-		-for i in ${SUBDIR}; do \
-			(cd $$i; make DESTDIR=${DESTDIR} $@); done
 
 distribution:
 		-@mkdir -p ${DESTDIR}/dev
@@ -75,5 +72,3 @@ distribution:
 		    ${DESTDIR}/usr/adm/savacct
 		install -c -o uucp -g daemon -m 600 /dev/null \
 		    ${DESTDIR}/usr/adm/aculog
-		-for i in ${SUBDIR}; do \
-			(cd $$i; make DESTDIR=${DESTDIR} distribution); done

etc/fstab

@@ -1,2 +1,2 @@
-/dev/rd0a	/	ufs	rw,async	1	1
+/dev/sd0a	/	ufs	rw,async	1	1
-#/dev/rd0c	/u	ufs	rw,async	1	2
+#/dev/sd0c	/u	ufs	rw,async	1	2

etc/gettytab

@@ -16,7 +16,7 @@
 # entries, and in cases where getty is called with no table name
 #
 default:\
-	:ap:im=\r\n\r\n2.11 BSD UNIX (%h) (%t)\r\n\r\r\n\r:sp#1200:
+	:ap:im=\r\n\r\nRetroBSD (%h) (%t)\r\n\r\r\n\r:sp#1200:
 
 #
 # Fixed speed entries

etc/passwd

@@ -1,8 +1,7 @@
-root:5:0:1:The Man:/:/bin/sh
+root:5:0:1:The Man:/root:/bin/sh
-daemon:*:1:1:The devil himself:/:/bin/sh
+daemon:*:1:1:The devil himself:/root:/bin/sh
 sys:*:4:2:Operating System:/tmp:nologin
-operator:*:2:5:System &:/usr/guest/operator:/bin/csh
+operator:*:2:5:System &:/u/operator:/bin/sh
-bin:*:3:20:Binaries Commands and Source:/:/bin/csh
+bin:*:3:20:Binaries Commands and Source:/root:/bin/sh
 nobody:*:32767:31:Nobody:/nonexistent:/bin/sh
-uucp:*:66:1:UNIX-to-UNIX Copy:/usr/spool/uucppublic:/usr/sbin/uucico
+uucp:*:66:1:UNIX-to-UNIX Copy:/spool/uucppublic:/sbin/uucico
-ingres:*:39:74:INGRES Owner:/usr/ingres:/bin/csh

etc/rc

@@ -3,8 +3,6 @@ HOME=/; export HOME
 PATH=/bin:/sbin; export PATH
 exec >/dev/console 2>&1
 
-/sbin/devupdate
-
 if test "$1" != "autoboot"; then
     #
     # Switch from single-user to multi-user mode.

etc/root/Makefile

@@ -1,18 +0,0 @@
-#
-# DESTDIR is defined here to be something which does *NOT* exist - it must be
-#  specified on the command line when doing a "make DESTDIR=/mnt distribution".
-#  This is aimed at avoiding overwriting the system disk's /etc files.
-
-DESTDIR         = /foobar
-OWN             = root
-GRP             = wheel
-
-all install depend lint tags:
-
-distribution:
-		install -c -o ${OWN} -g ${GRP} -m 644 dot.cshrc ${DESTDIR}/.cshrc
-		install -c -o ${OWN} -g ${GRP} -m 644 dot.login ${DESTDIR}/.login
-		install -c -o ${OWN} -g ${GRP} -m 644 dot.profile ${DESTDIR}/.profile
-
-clean:
-		rm -f *~

etc/root/dot.cshrc

@@ -1,14 +0,0 @@
-set history=30
-set path=(/bin /sbin /etc /usr/sbin /usr/ucb /usr/bin /usr/new /usr/local)
-if ($?prompt) then
-	set prompt="\!% "
-endif
-
-set filec
-set mail=( 0 /usr/spool/mail/$USER )
-set cdpath=( ~ /usr/spool/mqueue)
-set prompt="\!% root--> "
-alias	mail /usr/ucb/Mail
-alias	pwd	'echo $cwd'
-alias	h	history
-alias	q5	'tail -5 /usr/spool/mqueue/syslog'

etc/root/dot.login

@@ -1,14 +0,0 @@
-unset noglob
-set path=(/bin /etc /sbin /usr/sbin /usr/ucb /usr/bin /usr/local /usr/new)
-umask 26
-stty dec erase ^H kill ^U eof ^D
-set prompt="[\!] root--> "
-
-if ( "$TERM" == dialup || "$TERM" == network) then
-  setenv TERM vt100
-  echo -n "Terminal ($TERM)? "
-  set argv = "$<"
-  if ( "$argv" != '' ) setenv TERM "$argv"
-endif
-
-biff y

etc/root/dot.profile

@@ -1,8 +0,0 @@
-echo 'erase, kill ^U, intr ^C'
-stty dec
-stty erase
-PATH=/bin:/sbin:/usr/sbin:/etc:/usr/ucb:/usr/bin:/usr/new
-export PATH
-HOME=/
-export HOME
-export TERM

etc/shadow

@@ -1,8 +1,7 @@
-root:ro46DZg1ViGBs:0:1:The Man:/:/bin/sh
+root:ro46DZg1ViGBs:0:1:The Man:/root:/bin/sh
-daemon:*:1:1:The devil himself:/:/bin/sh
+daemon:*:1:1:The devil himself:/root:/bin/sh
 sys:*:4:2:Operating System:/tmp:nologin
-operator:*:2:5:System &:/usr/guest/operator:/bin/csh
+operator:*:2:5:System &:/u/operator:/bin/sh
-bin:*:3:20:Binaries Commands and Source:/:/bin/csh
+bin:*:3:20:Binaries Commands and Source:/root:/bin/sh
 nobody:*:32767:31:Nobody:/nonexistent:/bin/sh
-uucp:*:66:1:UNIX-to-UNIX Copy:/usr/spool/uucppublic:/usr/sbin/uucico
+uucp:*:66:1:UNIX-to-UNIX Copy:/spool/uucppublic:/sbin/uucico
-ingres:*:39:74:INGRES Owner:/usr/ingres:/bin/csh

etc/ttys

@@ -1,16 +1,16 @@
 #
 # name	getty                           type	status		comments
 #
-console	"/libexec/getty std.default"	vt100	on secure	#special
+console	"/libexec/getty std.default"	xterm	on secure	#special
 
 # Enable some of these for additional logins.  Do NOT enable the same one as the
 # console port, or strange things will happen.  You can turn off the console port
 # if you would rather use the getty on the real tty - it's up to you.
 
-tty0	"/libexec/getty std.default"	vt100	off secure
+tty0	"/libexec/getty std.default"	xterm	off secure
-tty1	"/libexec/getty std.default"	vt100	off secure
+tty1	"/libexec/getty std.default"	xterm	off secure
-tty2	"/libexec/getty std.default"	vt100	off secure
+tty2	"/libexec/getty std.default"	xterm	off secure
-tty3	"/libexec/getty std.default"	vt100	off secure
+tty3	"/libexec/getty std.default"	xterm	off secure
-tty4	"/libexec/getty std.default"	vt100	off secure
+tty4	"/libexec/getty std.default"	xterm	off secure
-tty5	"/libexec/getty std.default"	vt100	off secure
+tty5	"/libexec/getty std.default"	xterm	off secure
-ttyUSB0	"/libexec/getty std.default"	vt100	off secure
+ttyUSB0	"/libexec/getty std.default"	xterm	off secure

include/.gitignore

@@ -0,0 +1 @@
+readline

include/assert.h

@@ -1,5 +1,3 @@
-/*	assert.h	4.2	85/01/21	*/
-
 # ifndef NDEBUG
 # define _assert(ex)    {if (!(ex)){fprintf(stderr,"Assertion failed: file \"%s\", line %d\n", __FILE__, __LINE__);exit(1);}}
 # define assert(ex)     _assert(ex)

include/ctype.h

@@ -1,5 +1,3 @@
-/*	ctype.h	4.2	85/09/04	*/
-
 #define _U      01
 #define _L      02
 #define _N      04

include/curses.h

@@ -10,7 +10,6 @@
 #include <term.h>
 
 #define bool        int
-#define	reg	register
 
 #define TRUE        (1)
 #define FALSE       (0)
@@ -33,7 +32,6 @@ typedef	struct sgttyb	SGTTY;
 /*
  * Capabilities from termcap
  */
-
 extern bool AM, BS, CA, DA, DB, EO, HC, HZ, IN, MI, MS, NC, NS, OS, UL,
             XB, XN, XT, XS, XX;
 extern char *AL, *BC, *BT, *CD, *CE, *CL, *CM, *CR, *CS, *DC, *DL,
@@ -131,7 +129,6 @@ int	__void__;
 /*
  * psuedo functions
  */
-
 #define clearok(win,bf)  (win->_clear = bf)
 #define leaveok(win,bf)  (win->_leave = bf)
 #define scrollok(win,bf) (win->_scroll = bf)
@@ -181,6 +178,10 @@ int     waddstr (WINDOW *, char *);
 int     wgetstr (WINDOW *, char *);
 int     wdeleteln (WINDOW *);
 void    mvcur(int ly, int lx, int y, int x);
+void    overwrite(WINDOW *win1, WINDOW *win2);
+void    wclrtobot(WINDOW *win);
+int     mvprintw(int y, int x, char *fmt, ...);
+int     mvwprintw(WINDOW *win, int y, int x, char *fmt, ...);
 
 /*
  * Used to be in unctrl.h.

include/dbm.h

@@ -1,28 +0,0 @@
-/*
- * Copyright (c) 1980 Regents of the University of California.
- * All rights reserved.  The Berkeley software License Agreement
- * specifies the terms and conditions for redistribution.
- *
- *	@(#)dbm.h	5.1 (Berkeley) 3/27/86
- */
-
-#ifndef NULL
-/*
- * this is lunacy, we no longer use it (and never should have
- * unconditionally defined it), but, this whole file is for
- * backwards compatability - someone may rely on this.
- */
-#define	NULL	((char *) 0)
-#endif
-
-#include <ndbm.h>
-
-datum	fetch();
-datum	firstkey();
-datum	nextkey();
-#if 0
-datum	makdatum();
-datum	firsthash();
-long	calchash();
-long	hashinc();
-#endif

include/fstab.h

@@ -47,9 +47,6 @@
  * if type is "rq", then use concatenation of fs_file and "quotas" to locate
  * quota file.
  */
-#define	_PATH_FSTAB	"/etc/fstab"
-#define	FSTAB		"/etc/fstab"	/* deprecated */
-
 #define FSTAB_RW    "rw"    /* read/write device */
 #define FSTAB_RQ    "rq"    /* read/write with quotas */
 #define FSTAB_RO    "ro"    /* read-only device */

include/limits.h

@@ -36,36 +36,6 @@
 #ifndef _LIMITS_H_
 #define	_LIMITS_H_
 
-/*
- * We don't need this crud at the moment so save on abuse of the C
- * preprocessor by not doing the defines.
-
-#define	_POSIX_ARG_MAX		4096
-#define	_POSIX_CHILD_MAX	6
-#define	_POSIX_LINK_MAX		8
-#define	_POSIX_MAX_CANON	255
-#define	_POSIX_MAX_INPUT	255
-#define	_POSIX_NAME_MAX		14
-#define	_POSIX_NGROUPS_MAX	0
-#define	_POSIX_OPEN_MAX		16
-#define	_POSIX_PATH_MAX		255
-#define	_POSIX_PIPE_BUF		512
-#define	_POSIX_SSIZE_MAX	32767
-#define	_POSIX_STREAM_MAX	8
-#define	_POSIX_TZNAME_MAX	3
-
-#define	_POSIX2_BC_BASE_MAX	99
-#define	_POSIX2_BC_DIM_MAX	2048
-#define	_POSIX2_BC_SCALE_MAX	99
-#define	_POSIX2_BC_STRING_MAX	1000
-#define	_POSIX2_EQUIV_CLASS_MAX	2
-#define	_POSIX2_EXPR_NEST_MAX	32
-#define	_POSIX2_LINE_MAX	2048
-#define	_POSIX2_RE_DUP_MAX	255
-
-*/
-
 #include <machine/limits.h>
-/* #include <sys/syslimits.h> */
 
 #endif /* !_LIMITS_H_ */

include/math.h

@@ -4,16 +4,16 @@
  * specifies the terms and conditions for redistribution.
  */
 
-extern	double	fabs(), floor(), ceil(), fmod(), ldexp();
+double  fabs(double), floor(double), ceil(double);
-extern	double	sqrt(), hypot(), atof();
+double  sqrt(double), hypot(double, double);
-extern	double	sin(), cos(), tan(), asin(), acos(), atan(), atan2();
+double  sin(double), cos(double), tan(double);
-extern	double	exp(), log(), log10(), pow();
+double  asin(double), acos(double), atan(double), atan2(double, double);
-extern	double	sinh(), cosh(), tanh();
+double  exp(double), log(double), log10(double), pow(double, double);
-extern	double	gamma();
+double  sinh(double), cosh(double), tanh(double);
-extern	double	j0(), j1(), jn(), y0(), y1(), yn();
+double  j0(double), j1(double), jn(int, double);
+double  y0(double), y1(double), yn(int, double);
 
-#define	HUGE	1.701411733192644270e38
+#define HUGE_VAL    3.40282347e+38 /* TBD??? use infinity? */
-#define	LOGHUGE	39
 
 int isnanf(float x);
 int isnan(double x);
@@ -31,3 +31,21 @@ float ldexpf(float x, int exp);
 double ldexp(double x, int exp);
 
 double fmod(double x, double y);
+
+#if !defined(_ANSI_SOURCE) && !defined(_POSIX_SOURCE)
+
+#define M_E             2.7182818284590452354   /* e */
+#define M_LOG2E         1.4426950408889634074   /* log 2e */
+#define M_LOG10E        0.43429448190325182765  /* log 10e */
+#define M_LN2           0.69314718055994530942  /* log e2 */
+#define M_LN10          2.30258509299404568402  /* log e10 */
+#define M_PI            3.14159265358979323846  /* pi */
+#define M_PI_2          1.57079632679489661923  /* pi/2 */
+#define M_PI_4          0.78539816339744830962  /* pi/4 */
+#define M_1_PI          0.31830988618379067154  /* 1/pi */
+#define M_2_PI          0.63661977236758134308  /* 2/pi */
+#define M_2_SQRTPI      1.12837916709551257390  /* 2/sqrt(pi) */
+#define M_SQRT2         1.41421356237309504880  /* sqrt(2) */
+#define M_SQRT1_2       0.70710678118654752440  /* 1/sqrt(2) */
+
+#endif /* !_ANSI_SOURCE && !_POSIX_SOURCE */

include/ndbm.h

@@ -10,11 +10,7 @@
  * Hashed key data base library.
  */
 #define PBLKSIZ             1024
-#ifdef pdp11
+#define DBLKSIZ             1024
-#define DBLKSIZ 512
-#else
-#define DBLKSIZ 4096
-#endif
 
 typedef struct {
     int     dbm_dirf;               /* open directory file */

include/nlist.h

@@ -39,7 +39,7 @@
  */
 struct  nlist {
     char    *n_name;        /* In memory address of symbol name,
-	                           or string table offset (file) */
+                             * or string table offset (file) */
     u_short n_len;          /* Length of name in bytes */
     u_short n_type;         /* Type of symbol - see below */
     u_int   n_value;        /* Symbol value */

include/paths.h

@@ -24,18 +24,25 @@
 #define _PATH_CORE      "/core"
 #define _PATH_DEV       "/dev/"
 #define _PATH_CONSOLE   "/dev/console"
+#define _PATH_LOG       "/dev/log"
 #define _PATH_DEVNULL   "/dev/null"
 #define _PATH_TTY       "/dev/tty"
 #define _PATH_MEM       "/dev/mem"
 #define _PATH_SWAP      "/dev/swap"
+#define _PATH_FSTAB     "/etc/fstab"
 #define _PATH_LOCALTIME "/etc/localtime"
 #define _PATH_MOTD      "/etc/motd"
 #define _PATH_NOLOGIN   "/etc/nologin"
+#define _PATH_PASSWD    "/etc/passwd"
+#define _PATH_PTMP      "/etc/ptmp"
+#define _PATH_SHADOW    "/etc/shadow"
+#define _PATH_TERMCAP   "/etc/termcap"
 #define _PATH_USRLIB    "/lib/"
 #define _PATH_CTIMED    "/libexec/ctimed"
 #define _PATH_LOCALLIB  "/local/lib/"
 #define _PATH_SBIN      "/sbin/"
 #define _PATH_USRSBIN   "/sbin/"
+#define _PATH_MKPASSWD  "/sbin/mkpasswd"
 #define _PATH_SENDMAIL  "/sbin/sendmail"
 #define _PATH_SHARE     "/share/"
 #define _PATH_ZONEINFO  "/share/zoneinfo"   /* Time zone object file directory */

include/pcc.h

@@ -1,229 +0,0 @@
-/*
- * Copyright (c) 1983 Regents of the University of California.
- * All rights reserved.  The Berkeley software License Agreement
- * specifies the terms and conditions for redistribution.
- *
- *	@(#)pcc.h	5.1 (Berkeley) 5/30/85
- */
-
-/*
- * This file contains definitions for all the constants and structures
- *	needed to use the intermediate code files generated and read by
- *	the Portable C Compiler and related compilers.
- *
- * Rules for changing this code:
- *   1)	All op values must be integer constants -- this permits us to run
- *	a 'sed' script on this file to create %term declarations for yacc.
- *   2)	Because the PCC uses fancy ASG and UNARY macros, assignment
- *	operators must have values 1 greater than corresponding normal
- *	operators, and unary operators must have values 2 greater ditto.
- *   3) Ops used only by f1 must have values >= 150 (PCCF_FORTOPS).
- *   4)	Other language-dependent ops must have values >= 200.
- */
-
-# ifndef	PCC_TOKENS
-
-# define	PCC_TOKENS	0
-
-# define	PCC_ERROR	1	/* an error node */
-# define	PCC_FREE	2	/* an unused node */
-
-/*
- * Constants.
- */
-# define	PCC_STRING	3	/* a string constant */
-# define	PCC_ICON	4	/* an integer constant */
-# define	PCC_FCON	5	/* a floating point constant */
-# define	PCC_DCON	6	/* a double precision f.p. constant */
-
-/*
- * Leaf types.
- */
-# define	PCC_NAME	7	/* an identifier */
-# define	PCC_REG		8	/* a register */
-# define	PCC_OREG	9	/* register and offset */
-# define	PCC_CCODES	10	/* condition codes */
-# define	PCC_FLD		11	/* a bit field */
-
-/*
- * Arithmetic operators.
- */
-# define	PCC_PLUS	12	/* + */
-# define	PCC_PLUSEQ	13	/* += */
-# define	PCC_UPLUS	14	/* unary + (for completeness) */
-# define	PCC_MINUS	15	/* - */
-# define	PCC_MINUSEQ	16	/* -= */
-# define	PCC_UMINUS	17	/* unary - */
-# define	PCC_MUL		18	/* * */
-# define	PCC_MULEQ	19	/* *= */
-/* Reserve a slot for 'unary *', which is PCC jargon for PCC_DEREF (yech) */
-# define	PCC_DIV		21	/* / */
-# define	PCC_DIVEQ	22	/* /= */
-# define	PCC_MOD		23	/* % */
-# define	PCC_MODEQ	24	/* %= */
-# define	PCC_INCR	25	/* ++ */
-# define	PCC_DECR	26	/* -- */
-# define	PCC_ASSIGN	27	/* = (these last 3 are stretching it) */
-
-/*
- * Bit operators.
- */
-# define	PCC_AND		28	/* & */
-# define	PCC_ANDEQ	29	/* &= */
-/* Reserve a slot for 'unary &', jargon for PCC_ADDROF */
-# define	PCC_OR		31	/* | */
-# define	PCC_OREQ	32	/* |= */
-# define	PCC_ER		33	/* ^ */
-# define	PCC_EREQ	34	/* ^= */
-# define	PCC_LS		35	/* << */
-# define	PCC_LSEQ	36	/* <<= */
-# define	PCC_RS		37	/* >> */
-# define	PCC_RSEQ	38	/* >>= */
-# define	PCC_COMPL	39	/* ~ */
-
-/*
- * Booleans.
- */
-# define	PCC_EQ		40	/* == */
-# define	PCC_NE		41	/* != */
-# define	PCC_LE		42	/* <= */
-# define	PCC_LT		43	/* < */
-# define	PCC_GE		44	/* >= */
-# define	PCC_GT		45	/* > */
-# define	PCC_ULE		46	/* unsigned <= */
-# define	PCC_ULT		47	/* unsigned < */
-# define	PCC_UGE		48	/* unsigned >= */
-# define	PCC_UGT		49	/* unsigned > */
-# define	PCC_QUEST	50	/* ? (for conditional expressions) */
-# define	PCC_COLON	51	/* : (for conditional expressions) */
-# define	PCC_ANDAND	52	/* && */
-# define	PCC_OROR	53	/* || */
-# define	PCC_NOT		54	/* ! */
-
-/*
- * Function calls.
- */
-# define	PCC_CALL	55	/* call by value */
-/* no ASG */
-# define	PCC_UCALL	57	/* call with no arguments */
-# define	PCC_FORTCALL	58	/* call by reference? */
-/* no ASG */
-# define	PCC_UFORTCALL	60	/* ??? */
-# ifdef INLINE
-# define	PCC_INLINE	61	/* inline function */
-/* no ASG */
-# define	PCC_UINLINE	63	/* inline with no arguments */
-# endif INLINE
-
-/*
- * Referencing and dereferencing.
- */
-# define	PCC_DEREF	20	/* * */
-# define	PCC_ADDROF	30	/* & */
-
-/*
- * Special structure operators.
- */
-# define	PCC_DOT		64	/* . */
-# define	PCC_STREF	65	/* -> */
-# define	PCC_STASG	66	/* structure assignment */
-# define	PCC_STARG	67	/* an argument of type structure */
-# define	PCC_STCALL	68	/* a function of type structure */
-/* no ASG */
-# define	PCC_USTCALL	70	/* unary structure function */
-
-/*
- * Conversions.
- */
-# define	PCC_SCONV	71	/* scalar conversion */
-# define	PCC_PCONV	72	/* pointer conversion */
-# define	PCC_PMCONV	73	/* pointer multiply conversion */
-# define	PCC_PVCONV	74	/* pointer divide conversion */
-# define	PCC_CAST	75	/* redundant? */
-
-/*
- * Bracket types.
- */
-# define	PCC_LB		76	/* [ */
-# define	PCC_RB		77	/* ] */
-
-/*
- * Comma nodes.
- */
-# define	PCC_COMOP	78	/* , (in expressions) */
-# define	PCC_CM		79	/* , (in argument lists) */
-
-/*
- * Miscellaneous.
- */
-# define	PCC_FORCE	80	/* result of last expression goes in r0 */
-# define	PCC_GOTO	81	/* unconditional goto */
-# define	PCC_CBRANCH	82	/* goto label if !test */
-# define	PCC_RETURN	83	/* return from function */
-# define	PCC_INIT	84	/* initialized data */
-# define	PCC_TYPE	85	/* a type */
-# define	PCC_CLASS	86	/* a storage class */
-
-# define	PCC_MAXOP	86	/* highest numbered PCC op */
-
-/*
- * Special codes for interfacing to /lib/f1.
- */
-# define	PCCF_FORTOPS	150
-# define	PCCF_FTEXT	150	/* pass literal assembler text */
-# define	PCCF_FEXPR	151	/* a statement */
-# define	PCCF_FSWITCH	152	/* not implemented */
-# define	PCCF_FLBRAC	153	/* beginning of subroutine */
-# define	PCCF_FRBRAC	154	/* end of subroutine */
-# define	PCCF_FEOF	155	/* end of file */
-# define	PCCF_FARIF	156	/* not implemented */
-# define	PCCF_FLABEL	157	/* an f77 label */
-
-# endif	PCC_TOKENS
-
-
-/*
- * Types, as encoded in intermediate file cookies.
- */
-# define	PCCT_UNDEF	0
-# define	PCCT_FARG	1	/* function argument */
-# define	PCCT_CHAR	2
-# define	PCCT_SHORT	3
-# define	PCCT_INT	4
-# define	PCCT_LONG	5
-# define	PCCT_FLOAT	6
-# define	PCCT_DOUBLE	7
-# define	PCCT_STRTY	8
-# define	PCCT_UNIONTY	9
-# define	PCCT_ENUMTY	10
-# define	PCCT_MOETY	11	/* member of enum */
-# define	PCCT_UCHAR	12
-# define	PCCT_USHORT	13
-# define	PCCT_UNSIGNED	14
-# define	PCCT_ULONG	15
-
-/*
- * Type modifiers.
- */
-# define	PCCTM_PTR	020
-# define	PCCTM_FTN	040
-# define	PCCTM_ARY	060
-# define	PCCTM_BASETYPE	017
-# define	PCCTM_TYPESHIFT	2
-
-
-/*
- * Useful macros.  'PCCOM' macros apply to ops.
- */
-# define	PCCOM_ASG	1+
-# define	PCCOM_UNARY	2+
-# define	PCCOM_NOASG	(-1)+
-# define	PCCOM_NOUNARY	(-2)+
-
-# define	PCCM_TRIPLE(op, var, type)	\
-	((op) | ((var) << 8) | (long) (type) << 16)
-# define	PCCM_TEXT(s)			\
-	PCCM_TRIPLE(PCCF_FTEXT, (strlen(s) + 3) / 4, 0)
-# define	PCCM_ADDTYPE(t, m)		\
-	((((t) &~ PCCTM_BASETYPE) << PCCTM_TYPESHIFT) | \
-	(m) | ((t) & PCCTM_BASETYPE))

include/psout.h

@@ -34,7 +34,7 @@ struct psout {
     time_t  o_cstime;               /* u_cstime */
     short   o_pgrp;                 /* p_pgrp */
     int     o_sigs;                 /* sum of SIGINT & SIGQUIT,
-				   if == 2 proc is ignoring both.*/
+                                     * if == 2 proc is ignoring both.*/
     char    o_comm[MAXCOMLEN+1];    /* u_comm */
     char    o_args[64];             /* best guess at args to process */
 };

include/pwd.h

@@ -15,11 +15,6 @@
  * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  */
 
-#define	_PATH_PASSWD		"/etc/passwd"
-#define	_PATH_SHADOW            "/etc/shadow"
-#define	_PATH_MKPASSWD		"/sbin/mkpasswd"
-#define	_PATH_PTMP		"/etc/ptmp"
-
 #define _PW_KEYBYNAME       '0'
 #define _PW_KEYBYUID        '1'
 

include/regexp.h

@@ -5,6 +5,7 @@
  * not the System V one.
  */
 #define NSUBEXP  10
+
 typedef struct regexp {
     char    *startp[NSUBEXP];
     char    *endp[NSUBEXP];

include/stab.h

@@ -1,42 +0,0 @@
-/*
- * Copyright (c) 1980 Regents of the University of California.
- * All rights reserved.  The Berkeley software License Agreement
- * specifies the terms and conditions for redistribution.
- *
- *	@(#)stab.h	5.1 (Berkeley) 5/30/85
- */
-
-/* IF YOU ADD DEFINITIONS, ADD THEM TO nm.c as well */
-/*
- * This file gives definitions supplementing <a.out.h>
- * for permanent symbol table entries.
- * These must have one of the N_STAB bits on,
- * and are subject to relocation according to the masks in <a.out.h>.
- */
-/*
- * for symbolic debugger, sdb(1):
- */
-#define	N_GSYM	0x20		/* global symbol: name,,0,type,0 */
-#define	N_FNAME	0x22		/* procedure name (f77 kludge): name,,0 */
-#define	N_FUN	0x24		/* procedure: name,,0,linenumber,address */
-#define	N_STSYM	0x26		/* static symbol: name,,0,type,address */
-#define	N_LCSYM	0x28		/* .lcomm symbol: name,,0,type,address */
-#define	N_RSYM	0x40		/* register sym: name,,0,type,register */
-#define	N_SLINE	0x44		/* src line: 0,,0,linenumber,address */
-#define	N_SSYM	0x60		/* structure elt: name,,0,type,struct_offset */
-#define	N_SO	0x64		/* source file name: name,,0,0,address */
-#define	N_LSYM	0x80		/* local sym: name,,0,type,offset */
-#define	N_SOL	0x84		/* #included file name: name,,0,0,address */
-#define	N_PSYM	0xa0		/* parameter: name,,0,type,offset */
-#define	N_ENTRY	0xa4		/* alternate entry: name,linenumber,address */
-#define	N_LBRAC	0xc0		/* left bracket: 0,,0,nesting level,address */
-#define	N_RBRAC	0xe0		/* right bracket: 0,,0,nesting level,address */
-#define	N_BCOMM	0xe2		/* begin common: name,, */
-#define	N_ECOMM	0xe4		/* end common: name,, */
-#define	N_ECOML	0xe8		/* end common (local name): ,,address */
-#define	N_LENG	0xfe		/* second stab entry with length information */
-
-/*
- * for the berkeley pascal compiler, pc(1):
- */
-#define	N_PC	0x30		/* global pascal symbol: name,,0,subtype,line */

include/stddef.h

@@ -1,8 +1,22 @@
+#ifndef _STDDEF_H_
+#define _STDDEF_H_
+
+typedef int ptrdiff_t;
+
+#ifndef _SIZE_T
+#define _SIZE_T
+typedef unsigned size_t;
+#endif
+
+#ifndef NULL
+#define NULL    0
+#endif
 
 /* Offset of member MEMBER in a struct of type TYPE. */
-
 #if defined(__GNUC__) && __GNUC__ > 3
 #define offsetof(TYPE, MEMBER) __builtin_offsetof (TYPE, MEMBER)
 #else
 #define offsetof(TYPE, MEMBER) ((size_t) &((TYPE*)0)->MEMBER)
 #endif
+
+#endif /* _STDDEF_H_ */

include/stdint.h

@@ -10,6 +10,4 @@ typedef unsigned char           uint8_t;
 typedef unsigned short int  uint16_t;
 typedef unsigned int        uint32_t;
 
-
 #endif
-

include/stdio.h

@@ -5,8 +5,6 @@
  */
 #ifndef FILE
 
-#include <sys/types.h>
-
 #define BUFSIZ  1024
 extern  struct  _iobuf {
     int     _cnt;
@@ -40,6 +38,11 @@ extern	struct	_iobuf {
 #define NULL        0
 #endif
 
+#ifndef _SIZE_T
+#define _SIZE_T
+typedef unsigned size_t;
+#endif
+
 #define FILE        struct _iobuf
 #define EOF         (-1)
 

include/stdlib.h

@@ -43,8 +43,6 @@
 #ifndef _STDLIB_H_
 #define _STDLIB_H_
 
-#include <sys/types.h>
-
 #ifndef NULL
 #define NULL            0
 #endif
@@ -54,6 +52,11 @@
 
 #define RAND_MAX        0x7fff
 
+#ifndef _SIZE_T
+#define _SIZE_T
+typedef unsigned size_t;
+#endif
+
 void    abort (void);
 int     abs (int);
 int     atexit (void (*)(void));
@@ -83,7 +86,7 @@ char	*_findenv (const char *name, int *offset);
 void    *alloca (size_t size);
 
 int     daemon (int, int);
-char	*devname (dev_t dev, mode_t type);
+char    *devname (int dev, int type);
 int     getloadavg (unsigned loadavg[], int nelem);
 
 extern char *suboptarg;                 /* getsubopt(3) external variable */
@@ -93,12 +96,10 @@ long	random (void);
 char    *setstate (char *);
 void    srandom (unsigned);
 
-#ifndef __SMALLER_C__
 double  atof (const char *);
 double  strtod (const char *, char **);
 char    *ecvt (double, int, int *, int *);
 char    *fcvt (double, int, int *, int *);
 char    *gcvt (double, int, char *);
-#endif
 
 #endif /* _STDLIB_H_ */

include/string.h

@@ -3,12 +3,15 @@
  * All rights reserved.  The Berkeley software License Agreement
  * specifies the terms and conditions for redistribution.
  */
-#include <sys/types.h>
-
 #ifndef NULL
 #define NULL    0
 #endif
 
+#ifndef _SIZE_T
+#define _SIZE_T
+typedef unsigned size_t;
+#endif
+
 char    *strcat (char *, const char *);
 char    *strncat (char *, const char *, size_t);
 char    *strcpy (char *, const char *);

include/strings.h

@@ -30,7 +30,10 @@
  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  * SUCH DAMAGE.
  */
-#include <sys/types.h>
+#ifndef _SIZE_T
+#define _SIZE_T
+typedef unsigned size_t;
+#endif
 
 int      bcmp(const void *, const void *, size_t);
 void     bcopy(const void *, void *, size_t);

include/termios-todo.h

@@ -4,8 +4,6 @@
 #include <sys/ioctl.h>
 #include <stdint.h>
 
-#define E_TERMCAP       "/etc/termcap"
-
 typedef unsigned char   cc_t;
 typedef unsigned int    speed_t;
 typedef unsigned int    tcflag_t;
@@ -145,5 +143,4 @@ extern int tcsetattr(int, int, struct termios *);
 #define TIOCSETAW   _IOW(i, 92, struct termios)
 #define TIOCSETAF   _IOW(i, 92, struct termios)
 
-
 #endif

include/time.h

@@ -6,7 +6,19 @@
 #ifndef _TIME_H
 #define _TIME_H
 
-#include <sys/types.h>		/* for time_t */
+#ifndef NULL
+#define NULL    0
+#endif
+
+#ifndef _TIME_T
+#define _TIME_T
+typedef long time_t;
+#endif
+
+#ifndef _SIZE_T
+#define _SIZE_T
+typedef unsigned size_t;
+#endif
 
 /*
  * Structure returned by gmtime and localtime calls (see ctime(3)).
@@ -25,9 +37,11 @@ struct tm {
     char    *tm_zone;
 };
 
-extern	struct tm *gmtime(), *localtime();
+struct tm *gmtime(const time_t *);
-extern	char *asctime(), *ctime();
+struct tm *localtime(const time_t *);
-extern	time_t	time();
+char *asctime(const struct tm *);
+char *ctime(const time_t *);
+time_t time(time_t *);
 
 size_t strftime (char *s, size_t maxsize, const char *format,
     const struct tm *timeptr);

include/tzfile.h

@@ -5,14 +5,13 @@
 /*
 ** Information about time zone files.
 */
-
             /* Time zone object file directory */
+#define TZDIR       "/usr/share/zoneinfo"
 #define TZDEFAULT   "/etc/localtime"
 
 /*
 ** Each file begins with. . .
 */
-
 struct tzhead {
     char    tzh_reserved[32];   /* reserved for future use */
     char    tzh_timecnt[4];     /* coded number of transition times */
@@ -96,5 +95,4 @@ struct tzhead {
 ** Accurate only for the past couple of centuries;
 ** that will probably do.
 */
-
 #define isleap(y)   ((((y) % 4) == 0 && ((y) % 100) != 0) || ((y) % 400) == 0)

include/vmf.h

@@ -11,8 +11,7 @@
  *                             Define segment+offset and modified macros.
  *                             Place into the public domain.
  *      --------------------------------------------------
-*/
+ */
-
 #include <sys/types.h>
 
 #define MAXSEGNO    16384       /* max number of segments in a space */
@@ -24,12 +23,12 @@ struct vspace {
     int     v_fd;               /* file for swapping */
     off_t   v_foffset;          /* offset for computing file addresses */
     int     v_maxsegno;         /* number of segments in this space */
-	};
+};
 
 struct dlink {                  /* general double link structure */
     struct dlink *fwd;          /* forward link */
     struct dlink *back;         /* back link */
-	};
+};
 
 struct  vseg {                  /* structure of a segment in memory */
     struct  dlink   s_link;     /* for linking into lru list */
@@ -37,12 +36,11 @@ struct	vseg {                    /* structure of a segment in memory */
     struct  vspace  *s_vspace;  /* which virtual space */
     int     s_lock_count;
     int     s_flags;
-	union
+    union {
-		{
         int     _winfo[WORDSPERSEG];    /* the actual segment */
         char    _cinfo[BYTESPERSEG];
     } v_un;
-	};
+};
 
 #define s_winfo v_un._winfo
 #define s_cinfo v_un._cinfo
@@ -50,15 +48,16 @@ struct	vseg {                    /* structure of a segment in memory */
 /* masks for s_flags */
 #define S_DIRTY     01          /* segment has been modified */
 
-	long	nswaps;         	/* number of swaps */
+long    nswaps;                 /* number of swaps */
-	long	nmapsegs;       	/* number of mapseg calls */
+long    nmapsegs;               /* number of mapseg calls */
 
-	int	vminit(), vmopen();
+int vminit(), vmopen();
-	struct	vseg	*vmmapseg();
+struct  vseg    *vmmapseg();
-	void	vmlock(), vmunlock(), vmclrseg(), vmmodify();
+void    vmlock(), vmunlock(), vmclrseg(), vmmodify();
-	void	vmflush(), vmclose();
+void    vmflush(), vmclose();
 
 typedef long    VADDR;
+
 #define VMMODIFY(seg) (seg->s_flags |= S_DIRTY)
 #define VSEG(va) ((short)(va >> LOG2BPS))
 #define VOFF(va) ((u_short)va % BYTESPERSEG)

lib/Makefile

@@ -1,21 +1,11 @@
 TOPSRC          = $(shell cd ..; pwd)
-SUBDIR		= startup libc libcurses libtermlib libwiznet
+SUBDIR		= startup libc libm libcurses libtermlib libwiznet libreadline libgpanel
 PROG		= ar as aout ld nm ranlib size strip
 
-# Build a list of the host include directories.
+CFLAGS          = -m32 -Os -std=gnu89 -fno-builtin -g -Wall -DCROSS -I. \
-CPP             = $(shell gcc -print-prog-name=cc1)
+                   -idirafter $(TOPSRC)/include \
-HOSTINC         = $(addprefix -I,$(shell echo | $(CPP) -v 2>&1 | grep '^ /.*include'))
+                   -idirafter $(TOPSRC)/src/cmd/ar \
-
+                   -idirafter $(TOPSRC)/src/cmd/as
-# Add system include path
-ifeq (,$(wildcard /usr/include/i386-linux-gnu))
-    HOSTINC     += -I/usr/include
-else
-    HOSTINC     += -I/usr/include/i386-linux-gnu
-endif
-
-CFLAGS		+= -nostdinc -fno-builtin -g -Werror -Wall -DCROSS -I. $(HOSTINC) \
-                   -I$(TOPSRC)/include -I$(TOPSRC)/src/cmd/ar \
-                   -I$(TOPSRC)/src/cmd/as
 LDFLAGS         += -g
 
 AR_OBJS         = ar.o append.o archive.o contents.o delete.o extract.o \
@@ -24,8 +14,9 @@ AOUT_OBJS       = aout.o mips-dis.o
 RANLIB_OBJS     = ranlib.o archive.o
 HEADERS         = a.out.h ar.h nlist.h ranlib.h
 
-vpath %.c $(TOPSRC)/src/cmd/ar $(TOPSRC)/src/cmd/as $(TOPSRC)/src/cmd/ld \
+vpath %.c $(TOPSRC)/src/cmd/aout $(TOPSRC)/src/cmd/ar $(TOPSRC)/src/cmd/as \
-    $(TOPSRC)/src/cmd/nm $(TOPSRC)/src/cmd/ranlib $(TOPSRC)/src/cmd
+    $(TOPSRC)/src/cmd/ld $(TOPSRC)/src/cmd/nm $(TOPSRC)/src/cmd/ranlib \
+    $(TOPSRC)/src/cmd
 
 all install depend: $(HEADERS) $(SUBDIR) $(PROG)
 		-for i in $(SUBDIR); do $(MAKE) -C $$i $(MFLAGS) DESTDIR=$(DESTDIR) $@; done
@@ -35,28 +26,28 @@ clean:
 		for i in $(SUBDIR); do $(MAKE) -C $$i $(MFLAGS) clean; done
 
 ar:             $(AR_OBJS)
-		$(CC) $(LDFLAGS) -o $@ $(AR_OBJS) $(LIBS)
+		$(CC) -m32 $(LDFLAGS) -o $@ $(AR_OBJS) $(LIBS)
 
 as:             as.o
-		$(CC) $(LDFLAGS) -o $@ $< $(LIBS)
+		$(CC) -m32 $(LDFLAGS) -o $@ $< $(LIBS)
 
 aout:           $(AOUT_OBJS)
-		$(CC) $(LDFLAGS) -o $@ $(AOUT_OBJS) $(LIBS)
+		$(CC) -m32 $(LDFLAGS) -o $@ $(AOUT_OBJS) $(LIBS)
 
 ld:             ld.o
-		$(CC) $(LDFLAGS) -o $@ $< $(LIBS)
+		$(CC) -m32 $(LDFLAGS) -o $@ $< $(LIBS)
 
 nm:             nm.o
-		$(CC) $(LDFLAGS) -o $@ $< $(LIBS)
+		$(CC) -m32 $(LDFLAGS) -o $@ $< $(LIBS)
 
 ranlib:         $(RANLIB_OBJS)
-		$(CC) $(LDFLAGS) -o $@ $(RANLIB_OBJS) $(LIBS)
+		$(CC) -m32 $(LDFLAGS) -o $@ $(RANLIB_OBJS) $(LIBS)
 
 size:           size.o
-		$(CC) $(LDFLAGS) -o $@ $< $(LIBS)
+		$(CC) -m32 $(LDFLAGS) -o $@ $< $(LIBS)
 
 strip:          strip.o
-		$(CC) $(LDFLAGS) -o $@ $< $(LIBS)
+		$(CC) -m32 $(LDFLAGS) -o $@ $< $(LIBS)
 
 $(HEADERS):
 		-ln -s -f ../include/a.out.h .

lib/libc/Makefile

@@ -8,7 +8,7 @@ vpath %.c $(LIBCDIR)/mips/sys $(LIBCDIR)/gen $(LIBCDIR)/stdio \
           $(LIBCDIR)/stdlib $(LIBCDIR)/string $(LIBCDIR)/inet \
           $(LIBCDIR)/compat $(LIBCDIR)/runtime
 
-CFLAGS		+= -B$(TOPSRC)/lib/ $(DEFS) -Wa,-x -Wall -Werror
+CFLAGS		= -Os -B$(TOPSRC)/lib/ $(DEFS) -Wa,-x -Wall -Werror
 ASFLAGS		+= -B$(TOPSRC)/lib/ $(DEFS) -Wa,-x -I$(LIBCDIR)/mips/sys
 
 # modules which can not use SYSCALL and must be assembled from sources.  The
@@ -87,15 +87,16 @@ OBJS            += inet_addr.o inet_network.o inet_netof.o \
                    inet_ntoa.o inet_lnaof.o inet_maddr.o
 
 # libc/compat
-OBJS            += creat.o ftime.o gethostid.o gtty.o memccpy.o memchr.o \
+OBJS            += creat.o ftime.o gethostid.o memccpy.o memchr.o \
                    memcmp.o memcpy.o memset.o nice.o pause.o rand.o \
                    sethostid.o setregid.o setreuid.o setrgid.o setruid.o \
-                   sigcompat.o strchr.o strrchr.o stty.o times.o tmpnam.o \
+                   sigcompat.o strchr.o strrchr.o times.o tmpnam.o \
                    utime.o
 
 # libc/runtime
 OBJS            += addsf3.o comparesf2.o divsf3.o fixsfsi.o floatsisf.o \
-                   mulsf3.o negsf2.o subsf3.o sc_case.o
+                   mulsf3.o negsf2.o subsf3.o sc_case.o fixunssfsi.o \
+                   floatunsisf.o
 
 all:            ../libc.a
 

lib/libcurses/Makefile

@@ -3,7 +3,7 @@ include $(TOPSRC)/target.mk
 
 vpath %.c $(TOPSRC)/src/libcurses
 
-CFLAGS		+= -B$(TOPSRC)/lib/ $(DEFS) -Wa,-x -Wall -Werror
+CFLAGS		= -Os -B$(TOPSRC)/lib/ $(DEFS) -Wa,-x -Wall -Werror
 
 OBJS		= addch.o addstr.o box.o clear.o clrtobot.o clrtoeol.o cr_put.o \
                   cr_tty.o curses.o delch.o deleteln.o delwin.o endwin.o erase.o \

lib/libgpanel/Makefile

@@ -0,0 +1,18 @@
+TOPSRC		= $(shell cd ../..; pwd)
+include $(TOPSRC)/target.mk
+
+vpath %.c $(TOPSRC)/src/libgpanel
+
+CFLAGS		= -Os -B$(TOPSRC)/lib/ $(DEFS) -Wa,-x -Wall -Werror
+
+OBJS            = open.o clear.o pixel.o line.o rect.o fill.o fill_triangle.o \
+                  circle.o image.o char.o text.o text_width.o
+
+all:            ../libgpanel.a
+
+../libgpanel.a: ../ar ../ranlib $(OBJS)
+		../ar rc $@ $(OBJS)
+		../ranlib $@
+
+clean:
+		rm -f *~ *.o a.out *.a

lib/libm/Makefile

@@ -0,0 +1,18 @@
+TOPSRC          = $(shell cd ../..; pwd)
+include $(TOPSRC)/target.mk
+
+vpath %.c $(TOPSRC)/src/libm
+
+CFLAGS          = -Os -B$(TOPSRC)/lib/ $(DEFS) -Wa,-x -Wall -Werror
+
+OBJS            = asin.o atan.o exp.o erf.o floor.o fmod.o hypot.o j0.o j1.o \
+                  jn.o log.o pow.o sin.o sinh.o sqrt.o tan.o tanh.o
+
+all:            ../libm.a
+
+../libm.a: ../ar ../ranlib $(OBJS)
+		../ar rc $@ $(OBJS)
+		../ranlib $@
+
+clean:
+		rm -f *~ *.o a.out *.a

lib/libreadline/Makefile

@@ -0,0 +1,17 @@
+TOPSRC		= $(shell cd ../..; pwd)
+include $(TOPSRC)/target.mk
+
+vpath %.c $(TOPSRC)/src/libreadline
+
+CFLAGS		= -Os -B$(TOPSRC)/lib/ $(DEFS) -Wa,-x -Wall -Werror
+
+OBJS		= readline.o
+
+all:            ../libreadline.a
+
+../libreadline.a: ../ar ../ranlib $(OBJS)
+		../ar rc $@ $(OBJS)
+		../ranlib $@
+
+clean:
+		rm -f *~ *.o a.out *.a

lib/libtermlib/Makefile

@@ -3,7 +3,7 @@ include $(TOPSRC)/target.mk
 
 vpath %.c $(TOPSRC)/src/libtermlib
 
-CFLAGS		+= -B$(TOPSRC)/lib/ $(DEFS) -Wa,-x -Wall -Werror
+CFLAGS		= -Os -B$(TOPSRC)/lib/ $(DEFS) -Wa,-x -Wall -Werror
 
 OBJS		= termcap.o tgoto.o tputs.o tcattr.o
 

lib/libwiznet/Makefile

@@ -3,7 +3,7 @@ include $(TOPSRC)/target.mk
 
 vpath %.c $(TOPSRC)/src/libwiznet
 
-CFLAGS		+= -B$(TOPSRC)/lib/ $(DEFS) -Wa,-x -Wall -Werror
+CFLAGS		= -Os -B$(TOPSRC)/lib/ $(DEFS) -Wa,-x -Wall -Werror
 
 OBJS		= w5100.o socket.o ethernet.o client.o server.o udp.o
 

lib/startup/Makefile

@@ -9,7 +9,7 @@ TOPSRC          = $(shell cd ../..; pwd)
 include $(TOPSRC)/target.mk
 vpath %.c $(TOPSRC)/src/startup-mips
 
-CFLAGS          = -B$(TOPSRC)/lib/ -O -Wa,-x $(DEFS)
+CFLAGS          = -Os -B$(TOPSRC)/lib/ -Wa,-x $(DEFS)
 
 OBJS		= ../crt0.o
 

root/.profile

@@ -0,0 +1,7 @@
+echo 'erase ^?, kill ^U, intr ^C'
+stty dec
+PATH=/bin:/sbin:/etc
+export PATH
+HOME=/
+export HOME
+export TERM

share/.gitignore

@@ -1,3 +1,6 @@
-re.help
+calendar
+emg.keys
 misc
+re.help
 unixbench
+zoneinfo

share/example/Makefile

@@ -1,14 +0,0 @@
-
-all:	ashello echo chello
-
-ashello: ashello.o
-	$(LD) ashello.o -o $@
-
-chello: chello.o
-	$(CC) chello.o -o $@
-
-echo:   echo.o
-	$(LD) $@.o -o $@
-
-clean:
-	rm -f *.o ashello echo chello *.dis *~

share/example/Makefile-host

@@ -1,29 +0,0 @@
-TOPSRC		= $(shell cd ../..; pwd)
-include $(TOPSRC)/target.mk
-
-CFLAGS		+= -Werror
-ASFLAGS		+= -DCROSS
-ASLDFLAGS       = --oformat=elf32-tradlittlemips -N -nostartfiles -T $(TOPSRC)/src/elf32-mips.ld
-
-all:            chello cplus echo stdarg
-
-chello:         chello.o
-		${CC} ${LDFLAGS} -o chello.elf chello.o ${LIBS}
-		${OBJDUMP} -S chello.elf > chello.dis
-		${SIZE} chello.elf
-		${ELF2AOUT} chello.elf $@
-
-cplus:          cplus.o
-		${CXX} ${LDFLAGS} -nostdlib -o cplus.elf cplus.o ${LIBS}
-		${OBJDUMP} -S cplus.elf > cplus.dis
-		${SIZE} cplus.elf
-		${ELF2AOUT} cplus.elf $@
-
-echo:           echo.o
-		${LD} ${ASLDFLAGS} -o $@.elf $@.o
-		${OBJDUMP} -S $@.elf > $@.dis
-		${SIZE} $@.elf
-		${ELF2AOUT} $@.elf $@
-
-clean:
-		rm -f *.o *.elf ${MAN} chello cplus echo stdarg *.elf *.dis tags *~

share/examples/asm/Makefile

@@ -0,0 +1,11 @@
+
+all:	ashello echo
+
+ashello: ashello.o
+	$(LD) ashello.o -o $@
+
+echo:   echo.o
+	$(LD) $@.o -o $@
+
+clean:
+	rm -f *.o ashello echo *.dis *~

share/examples/asm/Makefile-host

@@ -0,0 +1,17 @@
+TOPSRC		= $(shell cd ../../..; pwd)
+include $(TOPSRC)/target.mk
+
+CFLAGS		+= -Werror
+ASFLAGS		+= -DCROSS
+ASLDFLAGS       = --oformat=elf32-tradlittlemips -N -nostartfiles -T $(TOPSRC)/src/elf32-mips.ld
+
+all:            echo
+
+echo:           echo.o
+		${LD} ${ASLDFLAGS} -o $@.elf $@.o
+		${OBJDUMP} -S $@.elf > $@.dis
+		${SIZE} $@.elf
+		${ELF2AOUT} $@.elf $@
+
+clean:
+		rm -f *.o *.elf ${MAN} echo *.elf *.dis tags *~

share/examples/c/Makefile

@@ -0,0 +1,50 @@
+CC      = cc
+PROG    = hello stdarg skeleton primelist primesum test1 test2 test3 \
+          gpio adc rain q8 tetris lcd6
+
+all:    $(PROG)
+
+hello:	hello.c
+	$(CC) $(CFLAGS) -o $@ $(LDFLAGS) $?
+
+stdarg: stdarg.c
+	$(CC) $(CFLAGS) -o $@ $(LDFLAGS) $?
+
+skeleton: skeleton.c
+	$(CC) $(CFLAGS) -o $@ $(LDFLAGS) $?
+
+primelist: primelist.c
+	$(CC) $(CFLAGS) -o $@ $(LDFLAGS) $?
+
+primesum: primesum.c
+	$(CC) $(CFLAGS) -o $@ $(LDFLAGS) $?
+
+gpio:   gpio.c
+	$(CC) $(CFLAGS) -o $@ $(LDFLAGS) $?
+
+adc:    adc.c
+	$(CC) $(CFLAGS) -o $@ $(LDFLAGS) $?
+
+rain:   rain.c
+	$(CC) $(CFLAGS) -o $@ $(LDFLAGS) $?
+
+q8:     q8.c
+	$(CC) $(CFLAGS) -o $@ $(LDFLAGS) $?
+
+tetris: tetris.c
+	$(CC) $(CFLAGS) -o $@ $(LDFLAGS) $?
+
+lcd6:   lcd6.c
+	$(CC) $(CFLAGS) -o $@ $(LDFLAGS) $?
+
+test1:	test1.c
+	$(CC) $(CFLAGS) -o $@ $(LDFLAGS) $?
+
+test2:	test2.c
+	$(CC) $(CFLAGS) -o $@ $(LDFLAGS) $?
+
+test3:	test3.c
+	$(CC) $(CFLAGS) -o $@ $(LDFLAGS) $?
+
+clean:
+	rm -f *.o *~ $(PROG)

share/examples/c/Makefile-host

@@ -0,0 +1,27 @@
+TOPSRC		= $(shell cd ../../..; pwd)
+include $(TOPSRC)/target.mk
+
+CFLAGS		+= -Werror -Wall
+
+all:            chello stdarg lcd6
+
+chello:         chello.o
+		${CC} ${LDFLAGS} -o chello.elf chello.o ${LIBS}
+		${OBJDUMP} -S chello.elf > chello.dis
+		${SIZE} chello.elf
+		${ELF2AOUT} chello.elf $@
+
+tetris:         tetris.o
+		${CC} ${LDFLAGS} -o tetris.elf tetris.o ${LIBS}
+		${OBJDUMP} -S tetris.elf > tetris.dis
+		${SIZE} tetris.elf
+		${ELF2AOUT} tetris.elf $@
+
+lcd6:           lcd6.o
+		${CC} ${LDFLAGS} -o lcd6.elf lcd6.o ${LIBS}
+		${OBJDUMP} -S lcd6.elf > lcd6.dis
+		${SIZE} lcd6.elf
+		${ELF2AOUT} lcd6.elf $@
+
+clean:
+		rm -f *.o *.elf ${MAN} chello stdarg lcd6 *.elf *.dis tags *~

share/examples/c/adc.c

@@ -0,0 +1,29 @@
+/*
+ * Example of reading ADC data.
+ */
+#include <stdio.h>
+#include <stdlib.h>
+#include <fcntl.h>
+#include <unistd.h>
+
+char buf[100];
+
+int main(void)
+{
+    int i, fd, value;
+
+    for (i=0; i<16; i++) {
+        sprintf(buf, "/dev/adc%d", i);
+        fd = open(buf, O_RDWR);
+        if (fd < 0) {
+            printf("Error: unable to open %s\n", buf);
+        } else {
+            if (read(fd, buf, 20) > 0) {
+                value = strtol (buf, 0, 0);
+                printf("adc%-2d = %d\n", i, value);
+            }
+            close(fd);
+        }
+    }
+    return 0;
+}

share/examples/c/gpio.c

@@ -0,0 +1,26 @@
+/*
+ * Example of polling general purpose i/o pins.
+ */
+#include <stdio.h>
+#include <fcntl.h>
+#include <sys/ioctl.h>
+#include <sys/gpio.h>
+
+int main(void)
+{
+    int fd, pnum, value;
+
+    fd = open ("/dev/porta", O_RDWR);
+    if (fd < 0) {
+        perror ("/dev/porta");
+        return -1;
+    }
+
+    for (pnum=0; pnum<7; pnum++) {
+        value = ioctl (fd, GPIO_POLL | GPIO_PORT (pnum), 0);
+        if (value < 0)
+            perror ("GPIO_POLL");
+        printf ("port%c = 0x%04x\n", pnum + 'A', value);
+    }
+    return 0;
+}

share/examples/c/lcd6.c

@@ -0,0 +1,287 @@
+/*
+ * Demo for 6 digit LCD module based on HT1261 controller.
+ * Based on example sources from http://www.canton-electronics.com
+ *
+ * Copyright (C) 2015 Serge Vakulenko
+ *
+ * Permission to use, copy, modify, and distribute this software
+ * and its documentation for any purpose and without fee is hereby
+ * granted, provided that the above copyright notice appear in all
+ * copies and that both that the copyright notice and this
+ * permission notice and warranty disclaimer appear in supporting
+ * documentation, and that the name of the author not be used in
+ * advertising or publicity pertaining to distribution of the
+ * software without specific, written prior permission.
+ *
+ * The author disclaim all warranties with regard to this
+ * software, including all implied warranties of merchantability
+ * and fitness.  In no event shall the author be liable for any
+ * special, indirect or consequential damages or any damages
+ * whatsoever resulting from loss of use, data or profits, whether
+ * in an action of contract, negligence or other tortious action,
+ * arising out of or in connection with the use or performance of
+ * this software.
+ */
+#include <stdlib.h>
+#include <stdio.h>
+#include <unistd.h>
+#include <fcntl.h>
+#include <sys/time.h>
+#include <sys/gpio.h>
+
+/*
+ * Digits, decimal dots and battery levels:
+ *   A     B     C     D     E     F
+ *   --    --    --    --    --    --  z
+ *  |  |  |  |  |  |  |  |  |  |  |  | y
+ *   --    --    --    --    --    --  x
+ *  |  |  |  |  |  |  |  |  |  |  |  |
+ *   --    --    -- c  -- d  -- e  --
+ *
+ * Memory map:
+ *  Byte 0, bits 0-6    - segments of digit 'F'
+ *  Byte 0, bit 7       - decimal dot 'e'
+ *  Byte 1, bits 0-6    - segments of digit 'E'
+ *  Byte 1, bit 7       - decimal dot 'd'
+ *  Byte 2, bits 0-6    - segments of digit 'D'
+ *  Byte 2, bit 7       - decimal dot 'c'
+ *  Byte 3, bits 0-6    - segments of digit 'C'
+ *  Byte 3, bit 7       - battery level 'x'
+ *  Byte 4, bits 0-6    - segments of digit 'B'
+ *  Byte 4, bit 7       - battery level 'y'
+ *  Byte 5, bits 0-6    - segments of digit 'A'
+ *  Byte 5, bit 7       - battery level 'z'
+ *
+ * Segments are mapped to bits 0-6:
+ *  --4--
+ *  0---5
+ *  --1--
+ *  2---6
+ *  --3--
+ */
+
+/*
+ * Signal assignment.
+ * LED modulee is connected to pins 16,17,18 of Fubarino SD board.
+ *
+ * Fubarino PIC32  LED module
+ * --------------------------
+ *  16      RE0    CS
+ *  17      RE1    WR
+ *  18      RE2    DATA
+ */
+#define gpio_cs_clear()     ioctl(gpio, GPIO_PORTE | GPIO_CLEAR, 1 << 0)
+#define gpio_cs_set()       ioctl(gpio, GPIO_PORTE | GPIO_SET,   1 << 0)
+#define gpio_wr_clear()     ioctl(gpio, GPIO_PORTE | GPIO_CLEAR, 1 << 1)
+#define gpio_wr_set()       ioctl(gpio, GPIO_PORTE | GPIO_SET,   1 << 1)
+#define gpio_data_clear()   ioctl(gpio, GPIO_PORTE | GPIO_CLEAR, 1 << 2)
+#define gpio_data_set()     ioctl(gpio, GPIO_PORTE | GPIO_SET,   1 << 2)
+
+/*
+ * HT1621 commands
+ */
+#define HT_SYS_DIS      0x00    /* Turn off system osc and bias generator */
+#define HT_SYS_EN       0x01    /* Turn on system oscillator */
+#define HT_LCD_OFF      0x02    /* Turn off LCD bias generator */
+#define HT_LCD_ON       0x03    /* Turn on LCD bias generator */
+#define HT_CLOCK_XTAL   0x14    /* Crystal 32kHz */
+#define HT_CLOCK_RC     0x18    /* On-chip RC oscillator 256kHz */
+#define HT_CLOCK_EXT    0x1c    /* External clock */
+#define HT_BIAS_1_3     0x21    /* LCD 1/3 bias option, 2 commons default */
+#define HT_COMMONS_3    0x04    /* 3 commons option */
+#define HT_COMMONS_4    0x08    /* 4 commons option */
+
+/*
+ * Mapping of symbols to segments.
+ *  0, 1, 2, 3, 4, 5, 6, 7,
+ *  8, 9, A, b, C, c, d, E,
+ *  F, H, h, L, n, N, o, P,
+ *  r, t, U, -,  ,
+ */
+const char char_to_segm[] = {
+    0x7D,   0x60,   0x3E,   0x7A,   0x63,   0x5B,   0x5F,   0x70,
+    0x7F,   0x7B,   0x77,   0x4F,   0x1D,   0x0E,   0x6E,   0x1F,
+    0x17,   0x67,   0x47,   0x0D,   0x46,   0x75,   0x37,   0x06,
+    0x0F,   0x6D,   0x02,   0x00,
+};
+
+/*
+ * File descriptor for GPIO driver.
+ */
+int gpio;
+
+/*
+ * Suspend the process for some amount of milliseconds.
+ */
+void mdelay(unsigned msec)
+{
+    usleep(msec * 1000);
+}
+
+/*
+ * Send a series of bits to HT1621.
+ * Up to 8 bits, high bit first.
+ * Max clock rate is 150kHz.
+ */
+void ht_send(int nbits, int data)
+{
+    data <<= (8 - nbits);
+    gpio_wr_clear();
+    while (nbits-- > 0) {
+        if (data & 0x80)
+            gpio_data_set();
+        else
+            gpio_data_clear();
+        gpio_wr_set();
+        gpio_wr_clear();
+        data <<= 1;
+    }
+}
+
+/*
+ * Send command to HT1621.
+ */
+void ht_cmd(int command)
+{
+    gpio_cs_clear();
+    ht_send(3, 0x4);        /* Mode "100" */
+    ht_send(8, command);
+    gpio_cs_set();
+}
+
+/*
+ * Send data and command.
+ */
+void ht_write(int addr, int data)
+{
+    gpio_cs_clear();
+    ht_send(3, 0x5);        /* Mode "101" */
+    ht_send(6, addr << 1);  /* Half-byte address 6 bits */
+    ht_send(8, data);       /* Data 8 bits */
+    gpio_cs_set();
+}
+
+/*
+ * Initialize LCD controller.
+ */
+void lcd_init()
+{
+    /* Open GPIO driver. */
+    gpio = open("/dev/porta", 1);
+    if (gpio < 0) {
+        perror("/dev/porta");
+        exit(-1);
+    }
+
+    /* Configure pins RE0-RE2 as outputs. */
+    ioctl(gpio, GPIO_PORTE | GPIO_CONFOUT, 0x07);
+    gpio_cs_set();
+    gpio_wr_clear();
+
+    /* Setup appropriate HT1621 mode. */
+    ht_cmd(HT_SYS_EN);
+    ht_cmd(HT_CLOCK_RC);
+    ht_cmd(HT_BIAS_1_3 | HT_COMMONS_4);
+    ht_cmd(HT_LCD_ON);
+}
+
+/*
+ * Set display memory to given value.
+ */
+void lcd_clear(int value)
+{
+    int i;
+
+    for (i=0; i<6; i++) {
+        ht_write(i, value);
+    }
+}
+
+/*
+ * LCD on/off.
+ */
+void lcd_enable(int on)
+{
+    if (on)
+        ht_cmd(HT_LCD_ON);
+    else
+        ht_cmd(HT_LCD_OFF);
+}
+
+/*
+ * Display data.
+ *  val - Data to be displayed, 0-999999
+ *  dot - Display decimal dot, 0-3
+ *  bat - Battery level, 0-3
+ */
+void lcd_display(unsigned val, int dot, int bat)
+{
+    int i, byte[6];
+
+    /* Set numeric value. */
+    byte[5] = char_to_segm[val / 100000];
+    byte[4] = char_to_segm[(val / 10000) % 10];
+    byte[3] = char_to_segm[(val / 1000) % 10];
+    byte[2] = char_to_segm[(val / 100) % 10];
+    byte[1] = char_to_segm[(val / 10) % 10];
+    byte[0] = char_to_segm[val % 10];
+
+    /* Enable decimal dot/ */
+    switch (dot) {
+    case 1:
+        byte[0] |= 1 << 7;
+        break;
+    case 2:
+        byte[1] |= 1 << 7;
+        break;
+    case 3:
+        byte[2] |= 1 << 7;
+        break;
+    default:
+        break;
+    }
+    if (bat > 0)
+        byte[3] |= 1 << 7;
+    if (bat > 1)
+        byte[4] |= 1 << 7;
+    if (bat > 2)
+        byte[5] |= 1 << 7;
+
+    for (i=0; i<6; i++) {
+        ht_write(i, byte[i]);
+    }
+}
+
+int main()
+{
+    int i;
+
+    /* Initialize hardware. */
+    lcd_init();
+
+    /* Blink all segments twice. */
+    lcd_clear(0xff);
+    mdelay(1000);
+    lcd_clear(0);
+    mdelay(1000);
+    lcd_clear(0xff);
+    mdelay(1000);
+    lcd_clear(0);
+    mdelay(1000);
+
+    /* Show all characters on all segments. */
+    for (i=0; i<sizeof(char_to_segm); i++) {
+        lcd_clear(char_to_segm[i]);
+        mdelay(200);
+    }
+    lcd_clear(0);
+
+    /* Display counter 0 to 999999. */
+    for (;;) {
+       for (i=0; i<999999; i++) {
+            lcd_display(i, i/10%4, i/10%4);
+            mdelay(100);
+       }
+    }
+    return 0;
+}

share/examples/c/primelist.c

@@ -0,0 +1,35 @@
+/*
+ * Print the list of prime numbers up to 100.
+ */
+#include <stdio.h>
+
+int isprime(int);
+
+int main(void)
+{
+    int n;
+
+    for (n=2; n<100; ++n) {
+        if (isprime(n)) {
+            printf("%d ", n);
+        }
+    }
+    printf("\n");
+}
+
+int isprime(int n)
+{
+    int j;
+
+    if (n == 2)
+        return 1;
+
+    if (n % 2 == 0)
+        return 0;
+
+    for (j=3; j*j<=n; j+=2)
+        if (n % j == 0)
+            return 0;
+    return 1;
+}
+

share/examples/c/primesum.c

@@ -0,0 +1,35 @@
+/*
+ * Compute the sum of prime numbers up to 10000.
+ */
+#include <stdio.h>
+
+int isprime(int);
+
+int main(void)
+{
+    int sum, n;
+
+    sum = 0;
+    for (n=2; n<10000; ++n) {
+        if (isprime(n)) {
+            sum += n;
+        }
+    }
+    printf("Sum of primes less than 10000: %d\n", sum);
+}
+
+int isprime(int n)
+{
+    int j;
+
+    if (n == 2)
+        return 1;
+
+    if (n % 2 == 0)
+        return 0;
+
+    for (j=3; j*j<=n; j+=2)
+        if (n % j == 0)
+            return 0;
+    return 1;
+}

share/examples/c/q8.c

@@ -0,0 +1,209 @@
+/*
+ * Eight Queens puzzle
+ *
+ * (C) 2010 by Mark Sproul
+ * Open source as per standard Arduino code
+ * Modified by Pito 12/2012 for SmallC and then by Alexey Frunze for Smaller C
+ */
+#include <stdio.h>
+#define TRUE    1
+#define FALSE   0
+
+unsigned int gChessBoard[8];
+unsigned int gLoopCounter;
+int gValidCount;
+
+int CheckCurrentBoard(void)
+{
+    int ii;
+    int jj;
+    int theRow;
+    int theLongRow;
+    int theLongColumns;
+    int bitCount;
+
+    //* we know we have 1 in each row,
+    //* Check for 1 in each column
+    theRow = 0;
+    for (ii=0; ii<8; ii++) {
+        theRow |= gChessBoard[ii];
+    }
+    if (theRow != 0x0ff) {
+        return FALSE;
+    }
+
+    //* we have 1 in each column, now check the diagonals
+    theLongColumns = 0;
+    for (ii=0; ii<8; ii++) {
+        theLongRow = gChessBoard[ii] & 0x0ff;
+        theLongRow = theLongRow << ii;
+
+        theLongColumns |= theLongRow;
+    }
+
+    //* now count the bits
+    bitCount = 0;
+    for (ii=0; ii<16; ii++) {
+        if ((theLongColumns & 0x01) == 0x01) {
+            bitCount++;
+        }
+        theLongColumns = theLongColumns >> 1;
+    }
+
+    if (bitCount != 8) {
+        return FALSE;
+    }
+
+    //* we now have to check the other diagonal
+    theLongColumns = 0;
+    for (ii=0; ii<8; ii++) {
+        theLongRow = gChessBoard[ii] & 0x0ff;
+        theLongRow = theLongRow << 8;
+        theLongRow = theLongRow >> ii;
+
+        theLongColumns |= theLongRow;
+    }
+
+    //* now count the bits
+    bitCount = 0;
+    for (ii=0; ii<16; ii++) {
+        if ((theLongColumns & 0x01) == 0x01) {
+            bitCount++;
+        }
+        theLongColumns = theLongColumns >> 1;
+    }
+
+    if (bitCount != 8) {
+        return FALSE;
+    }
+    return TRUE;
+}
+
+int CheckForDone(void)
+{
+    int ii;
+    int weAreDone;
+    int theRow;
+
+    weAreDone = FALSE;
+
+    //* we know we have 1 in each row,
+    //* Check for 1 in each column
+    theRow = 0;
+    for (ii=0; ii<8; ii++) {
+        theRow |= gChessBoard[ii];
+    }
+
+    if (theRow == 0x01) {
+        weAreDone = TRUE;
+    }
+    return weAreDone;
+}
+
+void RotateQueens(void)
+{
+    int ii;
+    int keepGoing;
+    int theRow;
+
+    ii = 0;
+    keepGoing = TRUE;
+    while (keepGoing && (ii < 8)) {
+        theRow = gChessBoard[ii] & 0x0ff;
+        theRow = (theRow >> 1) & 0x0ff;
+        if (theRow != 0) {
+            gChessBoard[ii] = theRow;
+            keepGoing = FALSE;
+        } else {
+            gChessBoard[ii] = 0x080;
+        }
+        ii++;
+    }
+}
+
+void PrintChessBoard(void)
+{
+    int ii;
+    int jj;
+    int theRow;
+    char textString[32];
+
+    printf("\nLoop= %d\n", gLoopCounter);
+    printf("Solution count= %d\n", gValidCount);
+
+    printf("+----------------+\n");
+    for (ii=0; ii<8; ii++) {
+        theRow = gChessBoard[ii];
+
+        printf("|");
+        for (jj=0; jj<8; jj++) {
+            if (theRow & 0x080) {
+                printf("Q ");
+            } else {
+                printf(". ");
+            }
+            theRow = theRow << 1;
+        }
+        printf("|\n");
+    }
+    printf("+----------------+\n");
+}
+
+int main(void)
+{
+    int ii;
+
+    printf("\nEight Queens brute force");
+    printf("\n************************\n");
+    //* put the 8 queens on the board, 1 in each row
+    for (ii=0; ii<8; ii++) {
+        gChessBoard[ii] = 0x080;
+    }
+    PrintChessBoard();
+
+    gLoopCounter = 0;
+    gValidCount = 0;
+
+
+    while (1) {
+        gLoopCounter++;
+
+        if (CheckCurrentBoard()) {
+            gValidCount++;
+            PrintChessBoard();
+        } else if ((gLoopCounter % 1000) == 0) {
+            //PrintChessBoard();
+        }
+
+        RotateQueens();
+        if (CheckForDone()) {
+            //int elapsedSeconds;
+            //int elapsedMinutes;
+            //int elapsedHours;
+
+            //elapsedSeconds = millis() / 1000;
+            //elapsedMinutes = elapsedSeconds / 60;
+            //elapsedHours = elapsedMinutes / 60;
+
+            printf("----------------------------------\n");
+            printf("All done\n");
+
+            PrintChessBoard();
+            printf("----------------------------------\n");
+
+            //Serial.print("total seconds=");
+            //Serial.println(elapsedSeconds);
+
+            //Serial.print("hours=");
+            //Serial.println(elapsedHours);
+
+            //Serial.print("minutes=");
+            //Serial.println(elapsedMinutes % 60);
+
+            //Serial.print("seconds=");
+            //Serial.println(elapsedSeconds % 60);
+
+            return (1);
+        }
+    }
+}

share/examples/c/rain.c

@@ -0,0 +1,129 @@
+/*
+ * Example of using termcap library for SmallC.
+ * 11/3/1980 EPS/CITHEP
+ *
+ * Copyright (c) 1980 Regents of the University of California.
+ * All rights reserved.  The Berkeley software License Agreement
+ * specifies the terms and conditions for redistribution.
+ */
+#include <stdio.h>
+#include <stdlib.h>
+#include <signal.h>
+#include <unistd.h>
+
+#define CO 80               /* number of columns */
+#define LI 24               /* number of lines */
+
+#define CL "\33[H\33[J"     /* clear the screen */
+#define CM "\33[%u;%uH"     /* move the cursor to row, column */
+#define BC "\b"             /* move cursor left */
+#define DN "\33[B"          /* move cursor down */
+#define ND " "              /* move cursor right */
+
+int xpos[5], ypos[5];
+char outbuf[BUFSIZ];
+
+void moveto(int col, int row)
+{
+    printf(CM, row, col);
+}
+
+void onsig(int n)
+{
+    moveto(0, LI - 1);
+    fflush(stdout);
+    _exit(0);
+}
+
+int main(void)
+{
+    int x, y, j;
+
+    setbuf(stdout, outbuf);
+    for (j = SIGHUP; j <= SIGTERM; j++)
+        if (signal(j, SIG_IGN) != SIG_IGN)
+            signal(j, onsig);
+
+    fputs(CL, stdout);
+    fflush(stdout);
+    for (j = 5; --j >= 0; ) {
+        xpos[j] = 2 + rand() % (CO - 4);
+        ypos[j] = 2 + rand() % (LI - 4);
+    }
+    for (j = 0; ; ) {
+        x = 2 + rand() % (CO - 4);
+        y = 2 + rand() % (LI - 4);
+        moveto(x, y);
+        putchar('.');
+        moveto(xpos[j], ypos[j]);
+        putchar('o');
+        if (j == 0)
+            j = 4;
+        else
+            --j;
+        moveto(xpos[j], ypos[j]);
+        putchar('O');
+        if (j == 0)
+            j = 4;
+        else
+            --j;
+        moveto(xpos[j], ypos[j]-1);
+        putchar('-');
+        fputs(DN, stdout);
+        fputs(BC, stdout);
+        fputs(BC, stdout);
+        fputs("|.|", stdout);
+        fputs(DN, stdout);
+        fputs(BC, stdout);
+        fputs(BC, stdout);
+        putchar('-');
+        if (j == 0)
+            j = 4;
+        else
+            --j;
+        moveto(xpos[j], ypos[j]-2);
+        putchar('-');
+        fputs(DN, stdout);
+        fputs(BC, stdout);
+        fputs(BC, stdout);
+        fputs("/ \\", stdout);
+        moveto(xpos[j]-2, ypos[j]);
+        fputs("| O |", stdout);
+        moveto(xpos[j]-1, ypos[j]+1);
+        fputs("\\ /", stdout);
+        fputs(DN, stdout);
+        fputs(BC, stdout);
+        fputs(BC, stdout);
+        putchar('-');
+        if (j == 0)
+            j = 4;
+        else
+            --j;
+        moveto(xpos[j], ypos[j]-2);
+        putchar(' ');
+        fputs(DN, stdout);
+        fputs(BC, stdout);
+        fputs(BC, stdout);
+        putchar(' ');
+        fputs(ND, stdout);
+        putchar(' ');
+        moveto(xpos[j]-2, ypos[j]);
+        putchar(' ');
+        fputs(ND, stdout);
+        putchar(' ');
+        fputs(ND, stdout);
+        putchar(' ');
+        moveto(xpos[j]-1, ypos[j]+1);
+        putchar(' ');
+        fputs(ND, stdout);
+        putchar(' ');
+        fputs(DN, stdout);
+        fputs(BC, stdout);
+        fputs(BC, stdout);
+        putchar(' ');
+        xpos[j] = x;
+        ypos[j] = y;
+        fflush(stdout);
+        usleep(100000);
+    }
+}

share/examples/c/test1.c

@@ -0,0 +1,214 @@
+#include <stdio.h>
+
+int ga[5];
+
+int main(void)
+{
+    int a, b, c, d;
+    int arr[5];
+    int *pi;
+    char arrc[5];
+    char *pic;
+    int s1, s2;
+    int z;
+    int t;
+    int *pip;
+    int *picp;
+    int e1, e2;
+
+    ga[0] = 10;
+    ga[1] = 20;
+    ga[2] = 30;
+    ga[3] = 40;
+    ga[4] = 50;
+    
+    a = 21;
+    b = 31;
+    c = 71;
+    d = 82;
+
+    arr[0] = 10;
+    arr[1] = 20;
+    arr[2] = 30;
+    arr[3] = 40;
+    arr[4] = 50;
+    pi = &arr[0];
+
+    arrc[0] = 13;
+    arrc[1] = 23;
+    arrc[2] = 33;
+    arrc[3] = 43;
+    arrc[4] = 53;
+    pic = &arrc[0];
+
+    printf("          21 + 31 = %d (52)\n",   a + b);
+    printf("          21 - 31 = %d (-10)\n",  a - b);
+    printf("          21 & 71 = %d (5)\n",    a & c);
+    printf("          21 | 82 = %d (87)\n",   a | d);
+    printf("          21 ^ 82 = %d (71)\n",   a ^ d);
+    printf("          21 * 82 = %d (1722)\n", a * d);
+    printf("          82 %% 21 = %d (19)\n",  d % a);
+    printf("          82 / 21 = %d (3)\n",    d / a);
+    printf("              *pi = %d (10)\n",   *pi);
+    printf("          *pi + 1 = %d (11)\n",   *pi + 1);
+    printf("        *(pi + 1) = %d (20)\n",   *(pi + 1));
+    printf("&arr[3] - &arr[0] = %d (3)\n",    &arr[3] - &arr[0]);
+    printf("    arr[3]-arr[0] = %d (30)\n",   arr[3] - arr[0]);
+    printf("    arr[3]+arr[0] = %d (50)\n",   arr[3] + arr[0]);
+    printf("  &ga[3] - &ga[0] = %d (3)\n",    &ga[3] - &ga[0]);
+    printf("      ga[3]-ga[0] = %d (30)\n",   ga[3] - ga[0]);
+    printf("      ga[3]+ga[0] = %d (50)\n",   ga[3] + ga[0]);
+    printf("\n");
+
+    printf("               *pic = %d (13)\n", *pic);
+    printf("           *pic + 1 = %d (14)\n", *pic+1);
+    printf("         *(pic + 1) = %d (23)\n", *(pic+1));
+    printf("&arrc[3] - &arrc[0] = %d (3)\n",  &arrc[3]-&arrc[0]);
+    printf("\n");
+
+    s1 = 3;
+    s2 = -200;
+    printf("  82 << 3 = %d (656)\n",   d << s1);
+    printf("  82 >> 3 = %d (10)\n",    d >> s1);
+    printf("-200 >> 3 = %d (-25)\n",   s2 >> s1);
+    printf("-200 << 3 = %d (-1600)\n", s2 << s1);
+    printf("\n");
+
+    printf("-s1 = %d (-3)\n",  -s1);
+    printf("-s2 = %d (200)\n", -s2);
+    printf("\n");
+
+    printf("~82 = %d (-83)\n", ~d);
+    printf("\n");
+
+    z = 0;
+    printf("!82 = %d (0)\n", !d);
+    printf(" !0 = %d (1)\n", !z);
+    printf("\n");
+
+    printf(" 0 && 0  = %d (0)\n", z && z);
+    printf(" 0 && 21 = %d (0)\n", z && a);
+    printf(" 3 && 21 = %d (1)\n", s1 && a);
+    printf("21 && 3  = %d (1)\n", a && s1);
+    printf("\n");
+
+    printf(" 0 || 0  = %d (0)\n", z || z);
+    printf(" 0 || 21 = %d (1)\n", z || a);
+    printf(" 3 || 21 = %d (1)\n", s1 || a);
+    printf("21 || 3  = %d (1)\n", a || s1);
+    printf("\n");
+
+    pi = 4;
+    printf("pi++ = %d (4)\n",  pi++);
+    printf("  pi = %d (8)\n",  pi);
+    printf("++pi = %d (12)\n", ++pi);
+    printf("pi-- = %d (12)\n", pi--);
+    printf("  pi = %d (8)\n",  pi);
+    printf("--pi = %d (4)\n",  --pi);
+    printf("\n");
+
+    pic = 4;
+    printf("pic++ = %d (4)\n", pic++);
+    printf("  pic = %d (5)\n", pic);
+    printf("++pic = %d (6)\n", ++pic);
+    printf("pic-- = %d (6)\n", pic--);
+    printf("  pic = %d (5)\n", pic);
+    printf("--pic = %d (4)\n", --pic);
+    printf("\n");
+
+    t = 4;
+    printf("t++ = %d (4)\n", t++);
+    printf("  t = %d (5)\n", t);
+    printf("++t = %d (6)\n", ++t);
+    printf("t-- = %d (6)\n", t--);
+    printf("  t = %d (5)\n", t);
+    printf("--t = %d (4)\n", --t);
+    printf("\n");
+
+    t = 4;
+    printf(" t==4 = %d (1)\n", t == 4);
+    printf(" t==3 = %d (0)\n", t == 3);
+    printf(" t==5 = %d (0)\n", t == 5);
+    t = -4;
+    printf("t==-4 = %d (1)\n", t == -4);
+    printf("t==-3 = %d (0)\n", t == -3);
+    printf("t==-5 = %d (0)\n", t == -5);
+    printf(" t==4 = %d (0)\n", t == 4);
+    printf(" t==3 = %d (0)\n", t == 3);
+    printf(" t==5 = %d (0)\n", t == 5);
+    printf("\n");
+
+    t = 4;
+    printf(" t!=4 = %d (0)\n", t != 4);
+    printf(" t!=3 = %d (1)\n", t != 3);
+    printf(" t!=5 = %d (1)\n", t != 5);
+    t = -4;
+    printf("t!=-4 = %d (0)\n", t != -4);
+    printf("t!=-3 = %d (1)\n", t != -3);
+    printf("t!=-5 = %d (1)\n", t != -5);
+    printf(" t!=4 = %d (1)\n", t != 4);
+    printf(" t!=3 = %d (1)\n", t != 3);
+    printf(" t!=5 = %d (1)\n", t != 5);
+    printf("\n");
+
+    t = 4;
+    printf(" t<4 = %d (0)\n", t < 4);
+    printf(" t<3 = %d (0)\n", t < 3);
+    printf(" t<5 = %d (1)\n", t < 5);
+    printf("t<-1 = %d (0)\n", t < -1);
+    printf("\n");
+
+    printf(" t<=4 = %d (1)\n", t <= 4);
+    printf(" t<=3 = %d (0)\n", t <= 3);
+    printf(" t<=5 = %d (1)\n", t <= 5);
+    printf("t<=-1 = %d (0)\n", t <= -1);
+    printf("\n");
+
+    t = 4;
+    printf(" t>4 = %d (0)\n", t > 4);
+    printf(" t>3 = %d (1)\n", t > 3);
+    printf(" t>5 = %d (0)\n", t > 5);
+    printf("t>-1 = %d (1)\n", t > -1);
+    printf("\n");
+
+    printf(" t>=4 = %d (1)\n", t >= 4);
+    printf(" t>=3 = %d (1)\n", t >= 3);
+    printf(" t>=5 = %d (0)\n", t >= 5);
+    printf("t>=-1 = %d (1)\n", t >= -1);
+    printf("\n");
+
+    pi = -100;
+    printf("   pi<4 = %d (0)\n", pi < (int*)4);
+    printf("   pi<3 = %d (0)\n", pi < (int*)3);
+    printf("pi<-100 = %d (0)\n", pi < (int*)-100);
+    printf("  pi<-1 = %d (1)\n", pi < (int*)-1);
+    printf("\n");
+
+    printf("   pi<=4 = %d (0)\n", pi <= (int*)4);
+    printf("   pi<=3 = %d (0)\n", pi <= (int*)3);
+    printf("pi<=-100 = %d (1)\n", pi <= (int*)-100);
+    printf("  pi<=-1 = %d (1)\n", pi <= (int*)-1);
+    printf("\n");
+
+    pi = -100;
+    printf("   pi>4 = %d (1)\n", pi > (int*)4);
+    printf("   pi>3 = %d (1)\n", pi > (int*)3);
+    printf("pi>-100 = %d (0)\n", pi > (int*)-100);
+    printf("  pi>-1 = %d (0)\n", pi > (int*)-1);
+    printf("\n");
+
+    printf("   pi>=4 = %d (1)\n", pi >= (int*)4);
+    printf("   pi>=3 = %d (1)\n", pi >= (int*)3);
+    printf("pi>=-100 = %d (1)\n", pi >= (int*)-100);
+    printf("  pi>=-1 = %d (0)\n", pi >= (int*)-1);
+    printf("\n");
+
+    pi = &arr[0];
+    pip = &arr[3];
+    printf("    *pip - *pi: %d (30)\n", *pip - *pi);
+    printf("      pip - pi: %d (3)\n",  pip - pi);
+    printf("          *pip: %d (40)\n", *pip);
+    printf("    *(pip - 3): %d (10)\n", *(pip - 3));
+    printf("      *&arr[3]: %d (40)\n", *&arr[3]);
+    printf("*(&arr[3] - 3): %d (10)\n", *(&arr[3]-3));
+}

share/examples/c/test2.c

@@ -0,0 +1,128 @@
+#include <stdio.h>
+#include <errno.h>
+#include <fcntl.h>
+#include <unistd.h>
+
+int aaa;
+int bbb;
+int ccc;
+char gc;
+char gbuffer[3];
+int gibuffer[4];
+
+int main(void)
+{
+    char b;
+    int la;
+    unsigned int u1, u2;
+    int s1, s2;
+    unsigned char uc1, uc2;
+    char sc1, sc2;
+    int fd;
+    char buffer[6];
+    int ibuffer[7];
+
+    printf("                sizeof(uc1): %d 1\n",  sizeof(uc1));
+    printf("                sizeof(sc1): %d 1\n",  sizeof(sc1));
+    printf("                 sizeof(u1): %d 4\n",  sizeof(u1));
+    printf("                 sizeof(s1): %d 4\n",  sizeof(s1));
+    printf("                sizeof(aaa): %d 4\n",  sizeof(aaa));
+    printf("                sizeof(bbb): %d 4\n",  sizeof(bbb));
+    printf("                 sizeof(gc): %d 1\n",  sizeof(gc));
+    printf("             sizeof(buffer): %d 6\n",  sizeof(buffer));
+    printf("            sizeof(ibuffer): %d 28\n", sizeof(ibuffer));
+    printf("               sizeof(char): %d 1\n",  sizeof(char));
+    printf("                sizeof(int): %d 4\n",  sizeof(int));
+    printf("            sizeof(gbuffer): %d 3\n",  sizeof(gbuffer));
+    printf("           sizeof(gibuffer): %d 16\n", sizeof(gibuffer));
+    // sizeof(ibuffer[0]) is not supported, so the following can be used...
+    printf("sizeof(ibuffer)/sizeof(int): %d 7\n",  sizeof(ibuffer)/sizeof(int));
+
+    aaa = 1;
+    bbb = 2;
+    la = 4;
+    printf("%d 1\n", aaa);
+    printf("%d 2\n", bbb);
+    printf("%d 4\n", la);
+
+    uc1 = 0x80;
+    sc1 = 0x80;
+    s1 = uc1;
+    s2 = sc1;
+    printf("unsigned char (0x80) -> int: %d 128\n",  s1);
+    printf("  signed char (0x80) -> int: %d -128\n", s2);
+
+    u1 = uc1;
+    u2 = sc1;
+    printf("unsigned char (0x80) -> unsigned: %d 128\n", u1);
+    printf("  signed char (0x80) -> unsigned: %d -128\n", u2);
+
+    la = errno;
+    printf("errno: %d 0\n", la);
+
+    write(1, "abcd ", 5);
+    la = errno;
+    printf("errno after good write call: %d 0\n", la);
+
+    write(10, "abcde", 5);
+    la = errno;
+    printf("errno after bad write call: %d 9\n", la);
+
+    write(1, "abcd ", 5);
+    la = errno;
+    printf("good write after failed should not overwrite errno: %d 9\n", la);
+
+    errno = 0;
+    write(1, "abcd ", 5);
+    la = errno;
+    printf("good write after errno set to zero: %d 0\n", la);
+
+    la = write(1, "abcd ", 5);
+    printf("write() return: %d 5\n", la);
+
+    la = write(10, "abcd ", 5);
+    printf("write(bad fd) return: %d -1\n", la);
+
+    fd = open("/a.txt", O_WRONLY | O_CREAT, 0666);
+    if (fd != -1) {
+        printf("open success\n");
+        la = write(fd, "abcd\n", 5);
+        if (la == 5) printf("write success\n"); else  printf("write failed\n");
+        la = close(fd);
+        if (la != -1) printf("close success\n"); else printf("close failed\n");
+    } else {
+        printf("open failed\n");
+    }
+
+    buffer[0] = 0;
+    buffer[1] = 0;
+    buffer[2] = 0;
+    buffer[3] = 0;
+    buffer[4] = 0;
+    buffer[5] = 0;
+
+    fd = open("/a.txt", O_RDONLY, 0666);
+    if (fd != -1) {
+        printf("open success\n");
+        la = read(fd, buffer, 5);
+        printf(buffer);
+        if (la == 5) printf("read success\n"); else  printf("read failed\n");
+        la = close(fd);
+        if (la != -1) printf("close success\n"); else printf("close failed\n");
+    } else {
+        printf("open failed\n");
+    }
+
+    if (buffer[0] != 'a')  printf("data0 readback from file MISMATCH\n");
+    if (buffer[1] != 'b')  printf("data1 readback from file MISMATCH\n");
+    if (buffer[2] != 'c')  printf("data2 readback from file MISMATCH\n");
+    if (buffer[3] != 'd')  printf("data3 readback from file MISMATCH\n");
+    if (buffer[4] != '\n') printf("data4 readback from file MISMATCH\n");
+
+    if (buffer[0] != 'a' || buffer[1] != 'b' || buffer[2] != 'c' ||
+        buffer[3] != 'd' || buffer[4] != '\n') {
+        printf("data readback from file MISMATCH\n");
+    } else {
+        printf("data readback from file OK\n");
+    }
+}

share/examples/c/test3.c

@@ -0,0 +1,51 @@
+#include <stdio.h>
+
+void printt(int t, char* str);
+
+int main(void)
+{
+    int t;
+
+    t = 0;
+    if (t) printt(t, "failure"); else printt(t, "success");
+    t = 1;
+    if (t) printt(t, "success"); else printt(t, "failure");
+    t = 8;
+    if (t) printt(t, "success"); else printt(t, "failure");
+    t = -2;
+    if (t) printt(t, "success"); else printt(t, "failure");
+    printf("\n");
+
+    t = 4;
+    printf("switch test: ");
+    switch (t) {
+    case 3:
+        printf("failure");
+        break;
+    case 4:
+        printf("success");
+        break;
+    case 5:
+        printf("failure");
+        break;
+    }
+    printf("\n");
+
+    printf("switch fallthrough test: ");
+    switch (t) {
+    case 3:
+        printf("failure");
+        break;
+    case 4:
+        printf("OKSOFAR: ");
+    case 5:
+        printf("success if oksofar printed before this in caps");
+        break;
+    }
+    printf("\n");
+}
+
+void printt(int t, char* str)
+{
+    printf("bool test on value %d %s\n", t, str);
+}

share/examples/c/tetris.c

@@ -0,0 +1,666 @@
+/*
+ * Tetris (C) Copyright 1995, Vadim Antonov
+ * Port to RetroBSD (C) 2015, Serge Vakulenko
+ *
+ * This program is designed to run on Olimex Duinomite board
+ * with SainSmart Graphic LCD4884 shield, modified for 3.3V.
+ *
+ * Permission to use, copy, modify, and distribute this software
+ * and its documentation for any purpose and without fee is hereby
+ * granted, provided that the above copyright notice appear in all
+ * copies and that both that the copyright notice and this
+ * permission notice and warranty disclaimer appear in supporting
+ * documentation, and that the name of the author not be used in
+ * advertising or publicity pertaining to distribution of the
+ * software without specific, written prior permission.
+ *
+ * The author disclaim all warranties with regard to this
+ * software, including all implied warranties of merchantability
+ * and fitness.  In no event shall the author be liable for any
+ * special, indirect or consequential damages or any damages
+ * whatsoever resulting from loss of use, data or profits, whether
+ * in an action of contract, negligence or other tortious action,
+ * arising out of or in connection with the use or performance of
+ * this software.
+ */
+#include <stdlib.h>
+#include <stdio.h>
+#include <string.h>
+#include <unistd.h>
+#include <fcntl.h>
+#include <sys/gpio.h>
+
+#define PITWIDTH    12
+#define PITDEPTH    21
+
+#define NSHAPES     7
+#define NBLOCKS     5
+
+#define FIN         999
+
+typedef struct {
+    int x, y;
+} coord_t;
+
+typedef struct {
+    int dx, dy;
+    coord_t p[NBLOCKS];
+} shape_t;
+
+const shape_t shape [NSHAPES] = {
+/* OOOO */  { 0, 3, { {0,0}, {0,1}, {0,2}, {0,3}, {FIN,FIN} } },
+
+/* O   */   { 1, 2, { {0,0}, {1,0}, {1,1}, {1,2}, {FIN,FIN} } },
+/* OOO */
+
+/*  O  */   { 1, 2, { {0,1}, {1,0}, {1,1}, {1,2}, {FIN,FIN} } },
+/* OOO */
+
+/*   O */   { 1, 2, { {0,2}, {1,0}, {1,1}, {1,2}, {FIN,FIN} } },
+/* OOO */
+
+/*  OO */   { 1, 2, { {0,0}, {0,1}, {1,1}, {1,2}, {FIN,FIN} } },
+/* OO  */
+
+/* OO  */   { 1, 2, { {0,1}, {0,2}, {1,0}, {1,1}, {FIN,FIN} } },
+/*  OO */
+
+/* OO */    { 1, 1, { {0,0}, {0,1}, {1,0}, {1,1}, {FIN,FIN} } },
+/* OO */
+};
+
+int pit [PITDEPTH+1] [PITWIDTH];
+int pitcnt [PITDEPTH];
+coord_t old [NBLOCKS], new [NBLOCKS], chk [NBLOCKS];
+int gpio;                               /* File descriptor of GPIO driver. */
+int adc3;                               /* File descriptor of ADC3 driver. */
+
+/*-------------------------------------------------------------
+ * Definitions for a "digital" joystick at A0 analog input.
+ * Button values are determined by resistors on a board.
+ */
+enum {
+    JOYSTICK_LEFT,
+    JOYSTICK_SELECT,
+    JOYSTICK_DOWN,
+    JOYSTICK_RIGHT,
+    JOYSTICK_UP,
+    JOYSTICK_IDLE = -1,
+};
+
+/*
+ * Initialize ADC for a joystick.
+ */
+void joystick_init()
+{
+    /* Open ADC driver. */
+    adc3 = open("/dev/adc3", 0);
+    if (adc3 < 0) {
+        perror("/dev/adc3");
+        exit(-1);
+    }
+}
+
+/*
+ * Get a state of joystick.
+ * Convert ADC value to key number.
+ * Input buttons are connected to a series network of resistors:
+ * GND - 3.3k - 1k - 620 - 330 - 2k - +3.3V
+ * Expected values are:
+ * 0 - 144 - 329 - 506 - 741 - 1023
+ */
+int joystick_get()
+{
+    static const unsigned level[5] = { 72, 236, 417, 623, 882 };
+    unsigned input, k;
+    char buf[16];
+
+    if (read(adc3, buf, sizeof(buf)) <= 0) {
+        perror("adc");
+        exit(-1);
+    }
+    input = strtol(buf, 0, 10);
+    for (k=0; k<5; k++) {
+        if (input < level[k]) {
+            return k;
+        }
+    }
+    return JOYSTICK_IDLE;
+}
+
+/*-------------------------------------------------------------
+ * Routines for Nokia 5110 display.
+ * See Philips PCD8544 datasheet.
+ */
+#define NROW 48
+#define NCOL 84
+
+/*
+ * Pinout for SainSmart Graphic LCD4884 Shield.
+ */
+#define MASKE_LCD_SCK   (1 << 2)    /* signal D2, pin RE2 */
+#define MASKE_LCD_MOSI  (1 << 3)    /* signal D3, pin RE3 */
+#define MASKE_LCD_DC    (1 << 4)    /* signal D4, pin RE4 */
+#define MASKE_LCD_CS    (1 << 5)    /* signal D5, pin RE5 */
+#define MASKE_LCD_RST   (1 << 6)    /* signal D6, pin RE6 */
+#define MASKE_LCD_BL    (1 << 7)    /* signal D7, pin RE7 */
+
+static unsigned char gpanel_screen [NROW*NCOL/8];
+int gpanel_row, gpanel_col;
+
+static void lcd_cs(unsigned on)
+{
+    if (on) {
+        ioctl(gpio, GPIO_PORTE | GPIO_SET, MASKE_LCD_CS);
+    } else {
+        ioctl(gpio, GPIO_PORTE | GPIO_CLEAR, MASKE_LCD_CS);
+    }
+}
+
+static void lcd_rst(unsigned on)
+{
+    if (on) {
+        ioctl(gpio, GPIO_PORTE | GPIO_SET, MASKE_LCD_RST);
+    } else {
+        ioctl(gpio, GPIO_PORTE | GPIO_CLEAR, MASKE_LCD_RST);
+    }
+}
+
+static void lcd_dc(unsigned on)
+{
+    if (on) {
+        ioctl(gpio, GPIO_PORTE | GPIO_SET, MASKE_LCD_DC);
+    } else {
+        ioctl(gpio, GPIO_PORTE | GPIO_CLEAR, MASKE_LCD_DC);
+    }
+}
+
+static void lcd_bl(unsigned on)
+{
+    if (on) {
+        ioctl(gpio, GPIO_PORTE | GPIO_SET, MASKE_LCD_BL);
+    } else {
+        ioctl(gpio, GPIO_PORTE | GPIO_CLEAR, MASKE_LCD_BL);
+    }
+}
+
+static void lcd_mosi(unsigned on)
+{
+    if (on) {
+        ioctl(gpio, GPIO_PORTE | GPIO_SET, MASKE_LCD_MOSI);
+    } else {
+        ioctl(gpio, GPIO_PORTE | GPIO_CLEAR, MASKE_LCD_MOSI);
+    }
+}
+
+static void lcd_sck(unsigned on)
+{
+    if (on) {
+        ioctl(gpio, GPIO_PORTE | GPIO_SET, MASKE_LCD_SCK);
+    } else {
+        ioctl(gpio, GPIO_PORTE | GPIO_CLEAR, MASKE_LCD_SCK);
+    }
+}
+
+static void lcd_write(unsigned byte, unsigned data_flag)
+{
+    unsigned i;
+
+    lcd_cs(0);
+    lcd_dc(data_flag);
+    for (i=0; i<8; i++, byte<<=1) {
+        lcd_mosi(byte & 0x80);          /* SDIN = bit[i] */
+        lcd_sck(0);                     /* SCLK = 0 */
+        lcd_sck(1);                     /* SCLK = 1 */
+    }
+    lcd_cs(1);
+}
+
+/*
+ * Set up hardware for communication to Nokia 5110 LCD Display.
+ * Do not clear the display.
+ * Leave backlight turned off.
+ */
+void gpanel_init()
+{
+    gpanel_row = 0;
+    gpanel_col = 0;
+
+    /* Open GPIO driver. */
+    gpio = open("/dev/porta", 0);
+    if (gpio < 0) {
+        perror("/dev/porta");
+        exit(-1);
+    }
+
+    /*
+     * Set pins as outputs.
+     */
+    ioctl(gpio, GPIO_PORTE | GPIO_CONFOUT, MASKE_LCD_SCK |
+        MASKE_LCD_MOSI | MASKE_LCD_DC | MASKE_LCD_CS |
+        MASKE_LCD_RST | MASKE_LCD_BL);
+    ioctl(gpio, GPIO_PORTE | GPIO_SET, MASKE_LCD_RST | MASKE_LCD_CS);
+    ioctl(gpio, GPIO_PORTE | GPIO_CLEAR, MASKE_LCD_SCK |
+        MASKE_LCD_MOSI | MASKE_LCD_DC | MASKE_LCD_BL);
+
+    /* Turn off backlight. */
+    lcd_bl(0);
+
+    /* Reset the display. */
+    lcd_rst(0);
+    usleep(10000);          // need 1 usec
+    lcd_rst(1);
+    usleep(10000);          // need 1 usec
+
+    lcd_write(0x21, 0);     // Enable extended instruction set
+    lcd_write(0xbf, 0);     // Set Vop - contrast level
+    lcd_write(0x04, 0);     // Set temperature coefficient to 0
+    lcd_write(0x14, 0);     // Set bias to 4
+    lcd_write(0x20, 0);     // Back to normal instruction set
+    lcd_write(0x0c, 0);     // Set normal mode
+
+    /* Enable backlight. */
+    lcd_bl(1);
+}
+
+/*
+ * Clear the the LCD screen.
+ */
+void gpanel_clear()
+{
+    unsigned i;
+
+    /* Clear data */
+    lcd_write(0x40, 0);
+    lcd_write(0x80, 0);
+    for (i=0; i<NROW*NCOL/8; i++) {
+        gpanel_screen[i] = 0;
+        lcd_write(0, 1);
+    }
+    gpanel_row = 0;
+    gpanel_col = 0;
+}
+
+/*
+ * Lights a single pixel in the specified color
+ * at the specified x and y addresses
+ */
+void gpanel_pixel(int x, int y, int color)
+{
+    unsigned char *data;
+
+    if (x >= NCOL || y >= NROW)
+        return;
+    data = &gpanel_screen [(y >> 3) * NCOL + x];
+
+    if (color)
+        *data |= 1 << (y & 7);
+    else
+        *data &= ~(1 << (y & 7));
+
+    lcd_write(0x40 | (y >> 3), 0);
+    lcd_write(0x80 | x, 0);
+    lcd_write(*data, 1);
+}
+
+/*
+ * Draw a filled rectangle in the specified color from (x1,y1) to (x2,y2).
+ *
+ * The best way to fill a rectangle is to take advantage of the "wrap-around" featute
+ * built into the Philips PCF8833 controller. By defining a drawing box, the memory can
+ * be simply filled by successive memory writes until all pixels have been illuminated.
+ */
+void gpanel_rect_filled(int x0, int y0, int x1, int y1, int color)
+{
+    /* Temporary solution */
+    int xmin, xmax, ymin, ymax, x, y;
+
+    /* calculate the min and max for x and y directions */
+    if (x0 <= x1) {
+        xmin = x0;
+        xmax = x1;
+    } else {
+        xmin = x1;
+        xmax = x0;
+    }
+    if (y0 <= y1) {
+        ymin = y0;
+        ymax = y1;
+    } else {
+        ymin = y1;
+        ymax = y0;
+    }
+    for (y=ymin; y<=ymax; y++)
+        for (x=xmin; x<=xmax; x++)
+            gpanel_pixel(x, y, color);
+}
+
+/*-------------------------------------------------------------
+ * Output piece coordinates given its center and angle
+ */
+void translate(const shape_t *t, const coord_t *c, int a, coord_t *res)
+{
+    coord_t org, tmp;
+    int yw, xw, i;
+
+    if (a & 1) {            /* 90 deg */
+        xw = t->dy;
+        yw = t->dx;
+    } else {
+        xw = t->dx;
+        yw = t->dy;
+    }
+    org = *c;
+    org.x -= (xw + 1) / 2;
+    org.y -= yw / 2;
+    if (org.y < 0)
+        org.y = 0;
+    if (org.y + yw >= PITWIDTH && c->y <= PITWIDTH)
+        org.y = PITWIDTH-1 - yw;
+    for (i=0; t->p[i].x!=FIN; i++) {
+        switch (a) {
+        case 0:
+            res[i].x = t->p[i].x;
+            res[i].y = t->p[i].y;
+            break;
+        case 3:
+            res[i].x = xw - t->p[i].y;
+            res[i].y = t->p[i].x;
+            break;
+        case 2:
+            res[i].x = xw - t->p[i].x;
+            res[i].y = yw - t->p[i].y;
+            break;
+        case 1:
+            res[i].x = t->p[i].y;
+            res[i].y = yw - t->p[i].x;
+        }
+        res[i].x += org.x;
+        res[i].y += org.y;
+    }
+    res[i].x = res[i].y = FIN;
+
+    do {
+        xw = 0;
+        for (i=0; res[i+1].x!=FIN; i++) {
+            if (res[i].x < res[i+1].x)
+                continue;
+            if (res[i].x == res[i+1].x && res[i].y <= res[i+1].y)
+                continue;
+            xw++;
+            tmp = res[i];
+            res[i] = res[i+1];
+            res[i+1] = tmp;
+        }
+    } while (xw);
+}
+
+/*
+ * Draw the block
+ */
+void draw_block(int h, int w, int visible)
+{
+    h *= 4;
+    w *= 4;
+    if (visible) {
+        gpanel_rect_filled(NCOL-1 - h, w, NCOL-1 - (h + 3), w + 3, 1);
+    } else {
+        gpanel_rect_filled(NCOL-1 - h, w, NCOL-1 - (h + 3), w + 3, 0);
+
+        if (h == (PITDEPTH-1)*5)
+            gpanel_pixel(NCOL-1 - (h + 3), w + 2, 1);
+
+        if (w == 0)
+            gpanel_pixel(NCOL-1 - (h + 2), w, 1);
+        else if (w % 16 == 12)
+            gpanel_pixel(NCOL-1 - (h + 2), w + 3, 1);
+    }
+}
+
+/*
+ * Move the piece
+ */
+void move(coord_t *old, coord_t *new)
+{
+    for (;;) {
+        if (old->x == FIN) {
+draw:       if (new->x == FIN)
+                break;
+            if (new->x >= 0)
+                draw_block(new->x, new->y, 1);
+            new++;
+            continue;
+        }
+        if (new->x == FIN) {
+clear:      if (old->x >= 0)
+                draw_block(old->x, old->y, 0);
+            old++;
+            continue;
+        }
+        if (old->x > new->x)
+            goto draw;
+        if (old->x < new->x)
+            goto clear;
+        if (old->y > new->y)
+            goto draw;
+        if (old->y != new->y)
+            goto clear;
+        /* old & new at the same place */
+        old++;
+        new++;
+    }
+}
+
+/*
+ * Draw the pit
+ */
+void clear()
+{
+    int h, w;
+
+    for (h=0; h<PITDEPTH; h++) {
+        for (w=0; w<PITWIDTH; w++) {
+            draw_block(h, w, 0);
+            pit[h][w] = 0;
+        }
+        pitcnt[h] = 0;
+    }
+    for (w=0; w<PITWIDTH; w++)
+        pit[PITDEPTH][w] = 1;
+}
+
+/*
+ * The piece reached the bottom
+ */
+void stopped(coord_t *c)
+{
+    int h, nfull, w, k;
+
+    /* Count the full lines */
+    nfull = 0;
+    for (; c->x!=FIN; c++) {
+        if (c->x <= 0) {
+            /* Game over. */
+            clear();
+            return;
+        }
+        pit[c->x][c->y] = 1;
+        ++pitcnt[c->x];
+        if (pitcnt[c->x] == PITWIDTH)
+            nfull++;
+    }
+    if (! nfull)
+        return;
+
+    /* Clear upper nfull lines */
+    for (h=0; h<nfull; h++) {
+        for (w=0; w<PITWIDTH; w++) {
+            if (pit[h][w]) {
+                draw_block(h, w, 0);
+            }
+        }
+    }
+
+    /* Move lines down */
+    k = nfull;
+    for (h=nfull; h<PITDEPTH && k>0; h++) {
+        if (pitcnt[h-k] == PITWIDTH) {
+            k--;
+            h--;
+            continue;
+        }
+        for (w=0; w<PITWIDTH; w++) {
+            if (pit[h][w] != pit[h-k][w]) {
+                draw_block(h, w, pit[h-k][w]);
+            }
+        }
+    }
+
+    /* Now fix the pit contents */
+    for (h=PITDEPTH-1; h>0; h--) {
+        if (pitcnt[h] != PITWIDTH)
+            continue;
+        memmove(pit[0]+PITWIDTH, pit[0], h * sizeof(pit[0]));
+        memset(pit[0], 0, sizeof(pit[0]));
+        memmove(pitcnt+1, pitcnt, h * sizeof(pitcnt[0]));
+        pitcnt[0] = 0;
+        h++;
+    }
+}
+
+int main()
+{
+    int ptype;              /* Piece type */
+    int angle, anew;        /* Angle */
+    int msec;               /* Timeout */
+    coord_t c, cnew, *cp;
+    unsigned up_pressed = 0, left_pressed = 0;
+    unsigned right_pressed = 0, down_pressed = 0;
+
+    joystick_init();
+    gpanel_init();
+    gpanel_clear();
+
+    /* Draw the pit */
+    clear();
+
+newpiece:
+    ptype = rand() % NSHAPES;
+    angle = rand() % 3;
+
+    c.y = PITWIDTH/2 - 1;
+    for (c.x= -2; ; c.x++) {
+        translate(&shape[ptype], &c, angle, new);
+        for (cp=new; cp->x!=FIN; cp++) {
+            if (cp->x >= 0)
+                goto ok;
+        }
+    }
+ok:
+    /* Draw new piece */
+    for (cp=new; cp->x!=FIN; cp++) {
+        if (cp->x >= 0) {
+            draw_block(cp->x, cp->y, 1);
+        }
+    }
+    memcpy(old, new, sizeof old);
+
+    msec = 500;
+    for (;;) {
+        cnew = c;
+        anew = angle;
+
+        if (msec <= 0) {
+            /* Timeout: move down */
+            msec = 500;
+            cnew.x++;
+            translate(&shape[ptype], &cnew, anew, chk);
+            for (cp=chk; cp->x!=FIN; cp++) {
+                if (cp->x >= 0 && pit[cp->x][cp->y]) {
+                    stopped(new);
+                    goto newpiece;
+                }
+            }
+            goto check;
+        }
+
+        int key = joystick_get();
+        if (key != JOYSTICK_RIGHT)
+            right_pressed = 0;
+        else if (! right_pressed) {
+            right_pressed = 1;
+
+            /* Right: rotate */
+            if (--anew < 0)
+                anew = 3;
+            translate(&shape[ptype], &cnew, anew, chk);
+            goto check;
+        }
+
+        if (key != JOYSTICK_UP)
+            up_pressed = 0;
+        else if (! up_pressed) {
+            up_pressed = 1;
+
+            /* Up: move left. */
+            if (cnew.y <= 0)
+                continue;
+            cnew.y--;
+            translate(&shape[ptype], &cnew, anew, chk);
+            goto check;
+        }
+
+        if (key != JOYSTICK_DOWN)
+            down_pressed = 0;
+        else if (! down_pressed) {
+            down_pressed = 1;
+
+            /* Down: move right */
+            if (cnew.y >= PITWIDTH-1)
+                continue;
+            cnew.y++;
+            translate(&shape[ptype], &cnew, anew, chk);
+            goto check;
+        }
+
+        if (key != JOYSTICK_LEFT)
+            left_pressed = 0;
+        else if (! left_pressed) {
+            left_pressed = 1;
+
+            /* Right: drop */
+            for (;;) {
+                cnew.x++;
+                translate(&shape[ptype], &cnew, anew, chk);
+                for (cp=chk; cp->x!=FIN; cp++) {
+                    if (cp->x >= 0 && pit[cp->x][cp->y]) {
+                        cnew.x--;
+                        translate(&shape[ptype], &cnew, anew, chk);
+                        move(new, chk);
+                        stopped(chk);
+                        goto newpiece;
+                    }
+                }
+            }
+        }
+
+        usleep(10000);
+        msec -= 10;
+        continue;
+check:
+        for (cp=chk; cp->x!=FIN; cp++) {
+            if (cp->y < 0 || cp->y >= PITWIDTH)
+                goto done;
+        }
+        for (cp=chk; cp->x!=FIN; cp++) {
+            if (cp->x >= 0 && pit[cp->x][cp->y])
+                goto done;
+        }
+        c = cnew;
+        angle = anew;
+        memcpy(old, new, sizeof old);
+        memcpy(new, chk, sizeof new);
+        move(old, new);
+done:   ;
+    }
+}

share/examples/cplus/Makefile-host

@@ -0,0 +1,15 @@
+TOPSRC		= $(shell cd ../../..; pwd)
+include $(TOPSRC)/target.mk
+
+CFLAGS		+= -Werror
+
+all:            cplus
+
+cplus:          cplus.o
+		${CXX} ${LDFLAGS} -nostdlib -o cplus.elf cplus.o ${LIBS}
+		${OBJDUMP} -S cplus.elf > cplus.dis
+		${SIZE} cplus.elf
+		${ELF2AOUT} cplus.elf $@
+
+clean:
+		rm -f *.o *.elf ${MAN} cplus *.elf *.dis tags *~

share/examples/cube/Makefile

@@ -0,0 +1,24 @@
+PROG    = all backlight cube demo
+
+# Duinomite board
+#OBJS    = duinomite.o
+
+# Fubarino board
+OBJS    = fubarino.o
+
+all:    $(PROG)
+
+all:    all.c $(OBJS)
+	cc $@.c $(OBJS) -o $@
+
+backlight: backlight.c $(OBJS)
+	cc $@.c $(OBJS) -o $@
+
+cube:   cube.c $(OBJS)
+	cc $@.c $(OBJS) -o $@
+
+demo:   demo.c $(OBJS)
+	cc $@.c $(OBJS) -o $@
+
+clean:
+	rm -f *.o *~ $(PROG)

share/examples/cube/Makefile-host

@@ -0,0 +1,16 @@
+TOPSRC		= $(shell cd ../../..; pwd)
+include $(TOPSRC)/target.mk
+
+CFLAGS		+= -Werror
+LIBS            += -lm
+
+#all:           demo
+
+demo:           demo.o fubarino.o
+		${CC} ${LDFLAGS} -o demo.elf demo.o fubarino.o ${LIBS}
+		${OBJDUMP} -S demo.elf > demo.dis
+		${SIZE} demo.elf
+		${ELF2AOUT} demo.elf $@
+
+clean:
+		rm -f *.o *.elf ${MAN} demo *.elf *.dis tags *~

share/examples/cube/README.txt

@@ -0,0 +1 @@
+Examples for LED cube 8x8x8.

share/examples/cube/all.c

@@ -0,0 +1,25 @@
+/*
+ * Demo for LED cube 8x8x8.
+ * Turn on all LEDs.
+ */
+#include <stdio.h>
+#include "cube.h"
+
+int main()
+{
+    static unsigned char data[8] = {
+        0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff,
+    };
+    int i;
+
+    gpio_init();
+    gpio_le(0);
+    gpio_plane(data);
+    gpio_ext(1);
+    for (;;) {
+        for (i=0; i<8; i++) {
+            gpio_layer(i);
+        }
+    }
+    return 0;
+}

share/examples/cube/backlight.c

@@ -0,0 +1,20 @@
+/*
+ * Demo for LED cube 8x8x8.
+ * Test backlight LEDs.
+ */
+#include <stdio.h>
+#include "cube.h"
+
+int main()
+{
+    gpio_init();
+    for (;;) {
+        gpio_backlight_upper(1);
+        usleep(500000);
+        gpio_backlight_upper(0);
+        gpio_backlight_lower(1);
+        usleep(500000);
+        gpio_backlight_lower(0);
+    }
+    return 0;
+}

share/examples/cube/cube.c

@@ -0,0 +1,73 @@
+/*
+ * Demo for LED cube 8x8x8.
+ * Switch between two static images.
+ */
+#include <stdio.h>
+#include <sys/time.h>
+#include "cube.h"
+
+void display(int duration, unsigned char *data)
+{
+    struct timeval t0, now;
+    int z, msec;
+
+    gettimeofday(&t0, 0);
+    z = 0;
+    for (;;) {
+        /* Send layer data. Latch is active,
+         * so previous layer is still displayed. */
+        gpio_plane(data + z*CUBE_SIZE);
+
+        /* Disable output, activate latch,
+         * switch to next layer. */
+        gpio_oe(0);
+        gpio_le(0);
+        gpio_le(1);
+        gpio_layer(z);
+        gpio_oe(1);
+
+        /* Next layer. */
+        z++;
+        if (z >= CUBE_SIZE) {
+            z = 0;
+
+            /* Check time. */
+            gettimeofday(&now, 0);
+            msec = (now.tv_sec - t0.tv_sec) * 1000;
+            msec += (now.tv_usec - t0.tv_usec) / 1000;
+            if (msec >= duration)
+                break;
+        }
+    }
+}
+
+int main()
+{
+    static unsigned char foo[64] = {
+        0xff, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0xff,
+        0x81, 0,    0,    0,    0,    0,    0,    0x81,
+        0x81, 0,    0,    0,    0,    0,    0,    0x81,
+        0x81, 0,    0,    0,    0,    0,    0,    0x81,
+        0x81, 0,    0,    0,    0,    0,    0,    0x81,
+        0x81, 0,    0,    0,    0,    0,    0,    0x81,
+        0x81, 0,    0,    0,    0,    0,    0,    0x81,
+        0xff, 0x81, 0x81, 0x81, 0x81, 0x81, 0x81, 0xff,
+    };
+    static unsigned char bar[64] = {
+        0,    0,    0,    0,    0,    0,    0,    0,
+        0,    0x7e, 0x42, 0x42, 0x42, 0x42, 0x7e, 0,
+        0,    0x42, 0,    0,    0,    0,    0x42, 0,
+        0,    0x42, 0,    0,    0,    0,    0x42, 0,
+        0,    0x42, 0,    0,    0,    0,    0x42, 0,
+        0,    0x42, 0,    0,    0,    0,    0x42, 0,
+        0,    0x7e, 0x42, 0x42, 0x42, 0x42, 0x7e, 0,
+        0,    0,    0,    0,    0,    0,    0,    0,
+    };
+    gpio_init();
+    gpio_ext(1);
+    for (;;) {
+        display(500, foo);
+        display(500, bar);
+    }
+    return 0;
+}

share/examples/cube/cube.h

@@ -0,0 +1,13 @@
+/*
+ * Interface to LED cube 8x8x8.
+ */
+#define CUBE_SIZE 8
+
+void gpio_init(void);
+void gpio_ext(int on);
+void gpio_oe(int active);
+void gpio_le(int active);
+void gpio_backlight_upper(int on);
+void gpio_backlight_lower(int on);
+void gpio_layer(int z);
+void gpio_plane(unsigned char *data);

share/examples/cube/duinomite.c

@@ -0,0 +1,145 @@
+/*
+ * Interface to LED cube 8x8x8.
+ * The cube is connected to pins D0-D9 of Duinomite board.
+ *
+ * Pin  PIC32  Function
+ * ---------------
+ *  D0  RE0    Y0  \
+ *  D1  RE1    Y1  | Layer select
+ *  D2  RE2    Y2  /
+ *  D3  RE3    Y3  - Upper backlignt
+ *  D4  RE4    Y4  - Lower backlight
+ *  D5  RE5    SDI - Serial data   \
+ *  D6  RE6    CLK - Clock         | to shift registers
+ *  D7  RE7    /LE - Latch enable  |
+ *  D8  RB11   /OE - Output enable /
+ *  D10 RD11   EXT - Unknown
+ */
+#include <stdlib.h>
+#include <stdio.h>
+#include <sys/ioctl.h>
+#include <sys/gpio.h>
+#include "cube.h"
+
+static int gpio;
+
+void gpio_init()
+{
+    char *devname = "/dev/porta";
+
+    /* Open GPIO driver. */
+    gpio = open(devname, 1);
+    if (gpio < 0) {
+        perror(devname);
+        exit(-1);
+    }
+
+    /* Configure pins RE0-RE7, RB11 and RD11 as output. */
+    ioctl(gpio, GPIO_PORTE | GPIO_CONFOUT, 0xff);
+    ioctl(gpio, GPIO_PORTE | GPIO_CLEAR, 0xff);
+    ioctl(gpio, GPIO_PORTB | GPIO_CONFOUT, 1 << 11);
+    ioctl(gpio, GPIO_PORTB | GPIO_CLEAR, 1 << 11);
+    ioctl(gpio, GPIO_PORTD | GPIO_CONFOUT, 1 << 11);
+    ioctl(gpio, GPIO_PORTD | GPIO_CLEAR, 1 << 11);
+}
+
+void gpio_ext(int on)
+{
+    /* EXT signal at RD11. */
+    if (on)
+        ioctl(gpio, GPIO_PORTD | GPIO_SET, 1 << 11);
+    else
+        ioctl(gpio, GPIO_PORTD | GPIO_CLEAR, 1 << 11);
+}
+
+void gpio_oe(int active)
+{
+    /* /OE signal at RB11, active low. */
+    if (active)
+        ioctl(gpio, GPIO_PORTB | GPIO_CLEAR, 1 << 11);
+    else
+        ioctl(gpio, GPIO_PORTB | GPIO_SET, 1 << 11);
+}
+
+void gpio_le(int active)
+{
+    /* /LE signal at RE7, active low. */
+    if (active)
+        ioctl(gpio, GPIO_PORTE | GPIO_CLEAR, 1 << 7);
+    else
+        ioctl(gpio, GPIO_PORTE | GPIO_SET, 1 << 7);
+}
+
+void gpio_backlight_upper(int on)
+{
+    /* Y4 signal at RE4. */
+    if (on)
+        ioctl(gpio, GPIO_PORTE | GPIO_SET, 1 << 4);
+    else
+        ioctl(gpio, GPIO_PORTE | GPIO_CLEAR, 1 << 4);
+}
+
+void gpio_backlight_lower(int on)
+{
+    /* Y3 signal at RE3. */
+    if (on)
+        ioctl(gpio, GPIO_PORTE | GPIO_SET, 1 << 3);
+    else
+        ioctl(gpio, GPIO_PORTE | GPIO_CLEAR, 1 << 3);
+}
+
+void gpio_layer(int z)
+{
+    /* Y0-Y2 signals at RE0-RE23. */
+    if (z & 1)
+        ioctl(gpio, GPIO_PORTE | GPIO_CLEAR, 1 << 0);
+    else
+        ioctl(gpio, GPIO_PORTE | GPIO_SET, 1 << 0);
+
+    if (z & 2)
+        ioctl(gpio, GPIO_PORTE | GPIO_CLEAR, 1 << 1);
+    else
+        ioctl(gpio, GPIO_PORTE | GPIO_SET, 1 << 1);
+
+    if (z & 4)
+        ioctl(gpio, GPIO_PORTE | GPIO_CLEAR, 1 << 2);
+    else
+        ioctl(gpio, GPIO_PORTE | GPIO_SET, 1 << 2);
+}
+
+void gpio_plane(unsigned char *data)
+{
+    int i, n, val;
+
+    /* Send 8 bytes of tada to shift registers. */
+    for (i=0; i<8; i+=2) {
+        val = *data++;
+        for (n=0; n<8; n++) {
+            /* SDI signal at RE5. */
+            if (val & 0x80)
+                ioctl(gpio, GPIO_PORTE | GPIO_SET, 1 << 5);
+            else
+                ioctl(gpio, GPIO_PORTE | GPIO_CLEAR, 1 << 5);
+
+            /* CLK signal at RE6. */
+            ioctl(gpio, GPIO_PORTE | GPIO_SET, 1 << 6);
+            ioctl(gpio, GPIO_PORTE | GPIO_CLEAR, 1 << 6);
+
+            val <<= 1;
+        }
+        val = *data++;
+        for (n=0; n<8; n++) {
+            /* SDI signal at RE5. */
+            if (val & 1)
+                ioctl(gpio, GPIO_PORTE | GPIO_SET, 1 << 5);
+            else
+                ioctl(gpio, GPIO_PORTE | GPIO_CLEAR, 1 << 5);
+
+            /* CLK signal at RE6. */
+            ioctl(gpio, GPIO_PORTE | GPIO_SET, 1 << 6);
+            ioctl(gpio, GPIO_PORTE | GPIO_CLEAR, 1 << 6);
+
+            val >>= 1;
+        }
+    }
+}

share/examples/cube/fubarino.c

@@ -0,0 +1,143 @@
+/*
+ * Interface to LED cube 8x8x8.
+ * The cube is connected to pins 4-13 of Fubarino board.
+ *
+ * Pin  PIC32  Function
+ * ---------------
+ *  4   RD0    Y0  \
+ *  5   RC13   Y1  | Layer select
+ *  6   RC14   Y2  /
+ *  7   RD1    Y3  - Upper backlignt
+ *  8   RD2    Y4  - Lower backlight
+ *  9   RD3    SDI - Serial data   \
+ *  10  RD4    CLK - Clock         | to shift registers
+ *  11  RD5    /LE - Latch enable  |
+ *  12  RD6    /OE - Output enable /
+ *  13  RD7    EXT - Unknown
+ */
+#include <stdlib.h>
+#include <stdio.h>
+#include <sys/ioctl.h>
+#include <sys/gpio.h>
+#include "cube.h"
+
+static int gpio;
+
+void gpio_init()
+{
+    char *devname = "/dev/porta";
+
+    /* Open GPIO driver. */
+    gpio = open(devname, 1);
+    if (gpio < 0) {
+        perror(devname);
+        exit(-1);
+    }
+
+    /* Configure pins RD0-RD7, RC13 and RC14 as output. */
+    ioctl(gpio, GPIO_PORTD | GPIO_CONFOUT, 0xff);
+    ioctl(gpio, GPIO_PORTD | GPIO_CLEAR, 0xff);
+    ioctl(gpio, GPIO_PORTC | GPIO_CONFOUT, 3 << 13);
+    ioctl(gpio, GPIO_PORTC | GPIO_CLEAR, 3 << 13);
+}
+
+void gpio_ext(int on)
+{
+    /* EXT signal at RD7. */
+    if (on)
+        ioctl(gpio, GPIO_PORTD | GPIO_SET, 1 << 7);
+    else
+        ioctl(gpio, GPIO_PORTD | GPIO_CLEAR, 1 << 7);
+}
+
+void gpio_oe(int active)
+{
+    /* /OE signal at RD6, active low. */
+    if (active)
+        ioctl(gpio, GPIO_PORTD | GPIO_CLEAR, 1 << 6);
+    else
+        ioctl(gpio, GPIO_PORTD | GPIO_SET, 1 << 6);
+}
+
+void gpio_le(int active)
+{
+    /* /LE signal at RD5, active low. */
+    if (active)
+        ioctl(gpio, GPIO_PORTD | GPIO_CLEAR, 1 << 5);
+    else
+        ioctl(gpio, GPIO_PORTD | GPIO_SET, 1 << 5);
+}
+
+void gpio_backlight_upper(int on)
+{
+    /* Y4 signal at RD2. */
+    if (on)
+        ioctl(gpio, GPIO_PORTD | GPIO_SET, 1 << 2);
+    else
+        ioctl(gpio, GPIO_PORTD | GPIO_CLEAR, 1 << 2);
+}
+
+void gpio_backlight_lower(int on)
+{
+    /* Y3 signal at RD1. */
+    if (on)
+        ioctl(gpio, GPIO_PORTD | GPIO_SET, 1 << 1);
+    else
+        ioctl(gpio, GPIO_PORTD | GPIO_CLEAR, 1 << 1);
+}
+
+void gpio_layer(int z)
+{
+    /* Y0-Y2 signals at RD0, RC13, RC14. */
+    if (z & 1)
+        ioctl(gpio, GPIO_PORTD | GPIO_CLEAR, 1 << 0);
+    else
+        ioctl(gpio, GPIO_PORTD | GPIO_SET, 1 << 0);
+
+    if (z & 2)
+        ioctl(gpio, GPIO_PORTC | GPIO_CLEAR, 1 << 13);
+    else
+        ioctl(gpio, GPIO_PORTC | GPIO_SET, 1 << 13);
+
+    if (z & 4)
+        ioctl(gpio, GPIO_PORTC | GPIO_CLEAR, 1 << 14);
+    else
+        ioctl(gpio, GPIO_PORTC | GPIO_SET, 1 << 14);
+}
+
+void gpio_plane(unsigned char *data)
+{
+    int i, n, val;
+
+    /* Send 8 bytes of tada to shift registers. */
+    for (i=0; i<8; i+=2) {
+        val = *data++;
+        for (n=0; n<8; n++) {
+            /* SDI signal at RD3. */
+            if (val & 0x80)
+                ioctl(gpio, GPIO_PORTD | GPIO_SET, 1 << 3);
+            else
+                ioctl(gpio, GPIO_PORTD | GPIO_CLEAR, 1 << 3);
+
+            /* CLK signal at RD4. */
+            ioctl(gpio, GPIO_PORTD | GPIO_SET, 1 << 4);
+            ioctl(gpio, GPIO_PORTD | GPIO_CLEAR, 1 << 4);
+
+            val <<= 1;
+        }
+        val = *data++;
+        for (n=0; n<8; n++) {
+            /* SDI signal at RD3. */
+            if (val & 1)
+                ioctl(gpio, GPIO_PORTD | GPIO_SET, 1 << 3);
+            else
+                ioctl(gpio, GPIO_PORTD | GPIO_CLEAR, 1 << 3);
+
+            /* CLK signal at RD4. */
+            ioctl(gpio, GPIO_PORTD | GPIO_SET, 1 << 4);
+            ioctl(gpio, GPIO_PORTD | GPIO_CLEAR, 1 << 4);
+
+            val >>= 1;
+        }
+    }
+}

share/examples/curses/Makefile

@@ -0,0 +1,20 @@
+PROG    = flip jump timer typetext
+#CFLAGS  = -DNCURSES_OPAQUE=0
+LIBS    = -lcurses -ltermlib
+
+all:    $(PROG)
+
+clean:
+	rm -f *.o *~ $(PROG)
+
+flip:   flip.c
+	cc $(CFLAGS) -o $@ $@.c $(LIBS)
+
+jump:   jump.c
+	cc $(CFLAGS) -o $@ $@.c $(LIBS)
+
+timer:  timer.c
+	cc $(CFLAGS) -o $@ $@.c $(LIBS)
+
+typetext: typetext.c
+	cc $(CFLAGS) -o $@ $@.c $(LIBS)

share/examples/curses/flip.c

@@ -0,0 +1,57 @@
+#include <curses.h>
+#include <signal.h>
+#include <stdlib.h>
+#include <unistd.h>
+#include <string.h>
+
+#define W_LINES 10
+#define W_COLS  30
+
+#define center(WIND,LN,TEXT)    \
+	mvwaddstr((WIND), (LN), (W_COLS - strlen(TEXT))/2, (TEXT))
+
+void die(int sig)
+{
+    signal(sig, SIG_IGN);
+    clear();
+    refresh();
+    endwin();
+    exit(0);
+}
+
+int main()
+{
+    WINDOW *win1, *win2;
+
+    if (! initscr()) {
+        fprintf(stderr, "Sorry, unknown terminal.\n");
+        exit(1);
+    }
+
+    signal(SIGINT, die);
+    signal(SIGQUIT, die);
+    signal(SIGHUP, die);
+
+    noecho();
+
+    win1 = newwin(W_LINES, W_COLS, ((LINES - W_LINES)/2), ((COLS - W_COLS)/2));
+    win2 = newwin(W_LINES, W_COLS, ((LINES - W_LINES)/2 + 4), ((COLS - W_COLS)/2 + 10));
+
+    scrollok(win1, FALSE);
+    scrollok(win2, FALSE);
+
+    box(win1, '*', '*');
+    box(win2, '*', '*');
+
+    center(win1, 3, "This is window 1");
+    center(win2, 3, "This is window 2");
+
+    for (;;) {
+        wrefresh(win1);
+        touchwin(win1);
+        usleep(200000);
+        wrefresh(win2);
+        touchwin(win2);
+        usleep(200000);
+    }
+}

share/examples/curses/jump.c

@@ -0,0 +1,57 @@
+#include <curses.h>
+#include <signal.h>
+#include <stdlib.h>
+#include <unistd.h>
+#include <string.h>
+#include <time.h>
+
+#define W_LINES 7
+#define W_COLS  11
+
+void die(int sig)
+{
+    signal(sig, SIG_IGN);
+    werase(curscr);
+    wmove(curscr, 0, 0);
+    wrefresh(curscr);
+    endwin();
+    exit(0);
+}
+
+int main()
+{
+    WINDOW *win, *blank;
+    int x, y;
+
+    if (! initscr()) {
+        fprintf(stderr, "Sorry, unknown terminal.\n");
+        exit(1);
+    }
+
+    signal(SIGINT, die);
+    signal(SIGQUIT, die);
+    signal(SIGHUP, die);
+
+    noecho();
+
+    //delwin(stdscr);
+
+    win = newwin(W_LINES, W_COLS, 0, 0);
+    blank = newwin(W_LINES, W_COLS, 0, 0);
+
+    box(win, '*', '*');
+    mvwaddstr(win, W_LINES/2, (W_COLS - strlen("RetroBSD"))/2, "RetroBSD");
+
+    srand(time(0));
+
+    for (;;) {
+        x = rand() % (COLS - W_COLS);
+        y = rand() % (LINES - W_LINES);
+        wrefresh(blank);
+        if (mvwin(win, y, x) == OK) {
+            wrefresh(win);
+            usleep(500000);
+            mvwin(blank, y, x);
+        }
+    }
+}

share/examples/curses/timer.c

@@ -0,0 +1,82 @@
+#include <curses.h>
+#include <signal.h>
+#include <string.h>
+#include <strings.h>
+#include <stdlib.h>
+#include <unistd.h>
+#include <time.h>
+
+#define centered(y,str) mvaddstr(y, (COLS - strlen(str))/2, str)
+
+void die()
+{
+    alarm(0);
+    signal(SIGINT, SIG_IGN);
+    signal(SIGQUIT, SIG_IGN);
+    signal(SIGHUP, SIG_IGN);
+    signal(SIGTERM, SIG_IGN);
+    clear();
+    refresh();
+    endwin();
+    exit(0);
+}
+
+int main(int ac, char **av)
+{
+    int     move_col,
+            msec;
+    int     time_line,
+            move_line;
+    long    num_start_time,
+            num_now_time;
+    char    str_start_time[60],
+            str_now_time[60];
+
+    msec = 0;
+    if (ac > 1) {
+        msec = atoi(av[1]);
+	if (msec < 10)
+	    msec = 10;
+	else if (msec > 1000)
+	    msec = 1000;
+    }
+    if (! initscr())
+	exit(1);
+
+    signal(SIGINT, die);
+    signal(SIGQUIT, die);
+    signal(SIGHUP, die);
+    signal(SIGTERM, die);
+
+    box(stdscr, '*', '*');
+
+    time(&num_start_time);
+    strcpy(str_start_time, ctime(&num_start_time));
+    *(index(str_start_time, '\n')) = '\0';
+
+    centered(3, "*** Test started at: ***");
+    centered(4, str_start_time);
+
+    move_col = 1;
+    move_line = (LINES - 2) / 2;
+    time_line = move_line + (LINES - move_line - 1) / 2;
+
+    while (TRUE) {
+	time(&num_now_time);
+	strcpy(str_now_time, ctime(&num_now_time));
+	*(index(str_now_time, '\n')) = '\0';
+
+	centered(time_line, str_now_time);
+
+	mvaddstr(move_line, move_col, "<-*->");
+
+	refresh();
+
+	mvaddstr(move_line, move_col, "     ");
+	if (++move_col >= (COLS - 6))
+	    move_col = 1;
+
+	if (msec)
+	    usleep(msec * 1000);
+    }
+}

share/examples/curses/typetext.c

@@ -0,0 +1,103 @@
+#include <curses.h>
+#include <signal.h>
+#include <ctype.h>
+#include <stdlib.h>
+
+#define CNTRL(c)        ((c) &037)
+
+void die(int sig)
+{
+    signal(sig, SIG_IGN);
+    move((LINES - 1), 0);
+    refresh();
+    endwin();
+    exit(0);
+}
+
+int main()
+{
+    WINDOW *win, *boxing;
+    int c;
+    int x, y;
+
+    initscr();
+
+    signal(SIGINT, die);
+    noecho();
+    crmode();
+
+    win = subwin(stdscr,
+	    LINES / 2,
+	    COLS / 2,
+	    LINES / 4,
+	    COLS / 4);
+    scrollok(win, TRUE);
+
+    boxing = subwin(stdscr,
+	    LINES / 2 + 2,
+	    COLS / 2 + 2,
+	    LINES / 4 - 1,
+	    COLS / 4 - 1);
+
+    box(boxing, '!', '-');
+    refresh();
+
+    wmove(win, 0, 0);
+    wrefresh(win);
+
+    while ((c = wgetch(win)) != '#') {
+	if (iscntrl(c)) {
+	    switch (c) {
+            case CNTRL('E'):
+                werase(win);
+                wrefresh(win);
+                continue;
+
+            case CNTRL('R'):
+                wrefresh(curscr);
+                continue;
+
+            case CNTRL('['):
+                getyx(win, y, x);
+                c = wgetch(win);
+                if (c == '[' || c == 'O')
+                    c = wgetch(win);
+                switch (c) {
+                case 'H':
+                    x = 0;
+                    y = 0;
+                    goto change;
+                case 'A':
+                    y--;
+                    goto change;
+                case 'B':
+                    y++;
+                    goto change;
+                case 'C':
+                    x++;
+                    goto change;
+                case 'D':
+                    x--;
+change:
+                    if (x >= win->_maxx) {
+                        x = 0;
+                        y++;
+                    }
+                    if (y >= win->_maxy)
+                        y = 0;
+                    wmove(win, y, x);
+                    wrefresh(win);
+                    continue;
+                default:
+                    break;
+                }
+                break;
+            default:
+                continue;
+	    }
+        }
+	waddch(win, c);
+	wrefresh(win);
+    }
+    die(SIGINT);
+}