-
Notifications
You must be signed in to change notification settings - Fork 59
Expand file tree
/
Copy pathshell-s2.patch
More file actions
44 lines (44 loc) · 1.13 KB
/
shell-s2.patch
File metadata and controls
44 lines (44 loc) · 1.13 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
--- build/sh.clean 2008-05-11 10:41:44.000000000 -1000
+++ build/sh.s 2008-05-11 10:42:49.000000000 -1000
@@ -142,6 +146,8 @@
inc r5 / inc r5 to point to return
bic $1,r5 / make it even
clr r0 / set for input
+ rts r5
+
sys seek; 0; 2 / exit from runcom. skip to end of
/ input file
chcom: / has no effect if tty input
@@ -232,14 +238,6 @@
sys exec; parbuf; parp / no, execute this commend
sys exec; binpb; parp / or /bin/this command
2:
- sys stat; binpb; inbuf / if can't execute does it
- / exist?
- bes 2f / branch if it doesn't
- mov $shell,parp-2 / does exist, not executable
- mov $binpb,parp / so it must be
- sys exec; shell; parp-2 / a command file, get it with
- / sh /bin/x (if x name of file)
-2:
jsr r5,error / a return for exec is the diagnostic
<No command\n\0>; .even
sys exit
@@ -257,6 +255,8 @@
beq 1f / yes
cmp r0,$'? / is it ?
beq 3f
+ cmp r0,$'* / is it *
+ beq 3f
cmp r0,$'[ / is it beginning of character string
/ (for glob)
bne 2f
@@ -359,8 +359,6 @@
<chdir\0>
glogin:
<login\0>
-shell:
- </bin/sh\0>
glob:
</etc/glob\0>
binpb: