File:  [CSRG BSD Unix] / 42BSD / ucb / lisp / lisplib / autorun / unisoft
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Tue Apr 24 16:12:54 2018 UTC (8 years, 1 month ago) by root
Branches: MAIN, BSD
CVS tags: HEAD, BSD42
BSD 4.2

; $Header: /var/lib/cvsd/repos/CSRG/42BSD/ucb/lisp/lisplib/autorun/unisoft,v 1.1.1.1 2018/04/24 16:12:54 root Exp $

"
OFFSET = 0xOFF
start:	movl	a7@(4),a0
clrl	a0@(-4)
movl	a7,a0
subql	#0x8,a7
movl	a0@,a7@
addql	#0x4,a0
movl	a0,a7@(4)
LL0:	tstl	a0@+
bnes	LL0
movl	a7@(4),a1
cmpl	a1@,a0
blts	LL1
subql	#0x4,a0
LL1:	movl	a0,a7@(8)
movl	a0,a1
movl	#OFFSET+file,a2
movl	a2,sp@(4)	| setup new argv[0]
movl	a2,a0		| file to execute
movl	#OFFSET+flag,a2
movl	a2,sp@(8)	| setup new argv[1]
lea	sp@(4),a2
movl	a2,d1
movw	#0x3B,d0
trap	#0x0
file:	.asciz	\"/usr/ucb/lisp\"
flag:	.asciz	\"-f\"
.even
"

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.