/ Usenet 1994 October / usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso / misc / volume38 / menushell / part02 / sysvdiffs.A

< prev

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 46 72 6f 6d 20 73 7a 65 | 62 72 61 21 53 61 69 67 |From sze|bra!Saig|
|00000010| 6f 6e 2e 43 4f 4d 21 72 | 6f 6f 74 40 73 6f 6e 79 |on.COM!r|oot@sony|
|00000020| 75 73 61 2e 53 6f 6e 79 | 2e 43 4f 4d 20 53 75 6e |usa.Sony|.COM Sun|
|00000030| 20 4d 61 72 20 32 31 20 | 32 32 3a 31 35 3a 33 30 | Mar 21 |22:15:30|
|00000040| 20 31 39 39 33 0a 52 65 | 74 75 72 6e 2d 50 61 74 | 1993.Re|turn-Pat|
|00000050| 68 3a 20 3c 73 7a 65 62 | 72 61 21 53 61 69 67 6f |h: <szeb|ra!Saigo|
|00000060| 6e 2e 43 4f 4d 21 72 6f | 6f 74 40 73 6f 6e 79 75 |n.COM!ro|ot@sonyu|
|00000070| 73 61 2e 53 6f 6e 79 2e | 43 4f 4d 3e 0a 52 65 63 |sa.Sony.|COM>.Rec|
|00000080| 65 69 76 65 64 3a 20 66 | 72 6f 6d 20 53 6f 6e 79 |eived: f|rom Sony|
|00000090| 2e 43 4f 4d 20 62 79 20 | 6e 79 78 2e 63 73 2e 64 |.COM by |nyx.cs.d|
|000000a0| 75 2e 65 64 75 20 28 34 | 2e 31 2f 53 4d 49 2d 34 |u.edu (4|.1/SMI-4|
|000000b0| 2e 31 29 0a 09 69 64 20 | 41 41 31 38 35 38 31 3b |.1)..id |AA18581;|
|000000c0| 20 53 75 6e 2c 20 32 31 | 20 4d 61 72 20 39 33 20 | Sun, 21| Mar 93 |
|000000d0| 32 32 3a 31 35 3a 32 30 | 20 4d 53 54 0a 58 2d 44 |22:15:20| MST.X-D|
|000000e0| 69 73 63 6c 61 69 6d 65 | 72 3a 20 4e 79 78 20 69 |isclaime|r: Nyx i|
|000000f0| 73 20 61 20 70 75 62 6c | 69 63 20 61 63 63 65 73 |s a publ|ic acces|
|00000100| 73 20 55 6e 69 78 20 73 | 79 73 74 65 6d 20 72 75 |s Unix s|ystem ru|
|00000110| 6e 20 62 79 20 74 68 65 | 20 55 6e 69 76 65 72 73 |n by the| Univers|
|00000120| 69 74 79 0a 09 6f 66 20 | 44 65 6e 76 65 72 2e 20 |ity..of |Denver. |
|00000130| 20 54 68 65 20 55 6e 69 | 76 65 72 73 69 74 79 20 | The Uni|versity |
|00000140| 68 61 73 20 6e 65 69 74 | 68 65 72 20 63 6f 6e 74 |has neit|her cont|
|00000150| 72 6f 6c 20 6f 76 65 72 | 20 6e 6f 72 0a 09 72 65 |rol over| nor..re|
|00000160| 73 70 6f 6e 73 69 62 69 | 6c 69 74 79 20 66 6f 72 |sponsibi|lity for|
|00000170| 20 74 68 65 20 6f 70 69 | 6e 69 6f 6e 73 20 6f 72 | the opi|nions or|
|00000180| 20 63 6f 72 72 65 63 74 | 20 69 64 65 6e 74 69 74 | correct| identit|
|00000190| 79 20 6f 66 20 75 73 65 | 72 73 2e 0a 52 65 63 65 |y of use|rs..Rece|
|000001a0| 69 76 65 64 3a 20 66 72 | 6f 6d 20 73 6f 6e 79 75 |ived: fr|om sonyu|
|000001b0| 73 61 2e 53 6f 6e 79 2e | 43 4f 4d 21 73 7a 65 62 |sa.Sony.|COM!szeb|
|000001c0| 72 61 21 53 61 69 67 6f | 6e 2e 43 4f 4d 20 62 79 |ra!Saigo|n.COM by|
|000001d0| 20 53 6f 6e 79 2e 43 4f | 4d 20 28 35 2e 36 35 2b | Sony.CO|M (5.65+|
|000001e0| 2f 31 2e 33 34 29 0a 09 | 69 64 20 41 41 31 38 38 |/1.34)..|id AA188|
|000001f0| 33 33 3b 20 53 75 6e 2c | 20 32 31 20 4d 61 72 20 |33; Sun,| 21 Mar |
|00000200| 39 33 20 32 31 3a 30 35 | 3a 32 30 20 2d 30 38 30 |93 21:05|:20 -080|
|00000210| 30 0a 52 65 63 65 69 76 | 65 64 3a 20 62 79 20 73 |0.Receiv|ed: by s|
|00000220| 6f 6e 79 75 73 61 2e 53 | 6f 6e 79 2e 43 4f 4d 20 |onyusa.S|ony.COM |
|00000230| 28 34 2e 30 2f 53 4d 49 | 2d 34 2e 30 29 0a 09 69 |(4.0/SMI|-4.0)..i|
|00000240| 64 20 41 41 30 30 36 35 | 31 3b 20 53 75 6e 2c 20 |d AA0065|1; Sun, |
|00000250| 32 31 20 4d 61 72 20 39 | 33 20 32 31 3a 30 31 3a |21 Mar 9|3 21:01:|
|00000260| 30 36 20 50 53 54 0a 52 | 65 63 65 69 76 65 64 3a |06 PST.R|eceived:|
|00000270| 20 62 79 20 73 7a 65 62 | 72 61 2e 53 61 69 67 6f | by szeb|ra.Saigo|
|00000280| 6e 2e 43 4f 4d 20 28 34 | 2e 31 2f 53 56 52 34 2e |n.COM (4|.1/SVR4.|
|00000290| 69 33 38 36 2d 31 2e 30 | 32 29 0a 09 69 64 20 41 |i386-1.0|2)..id A|
|000002a0| 41 31 39 38 38 38 3b 20 | 53 75 6e 2c 20 32 31 20 |A19888; |Sun, 21 |
|000002b0| 4d 61 72 20 39 33 20 32 | 31 3a 35 35 3a 32 31 20 |Mar 93 2|1:55:21 |
|000002c0| 50 53 54 0a 44 61 74 65 | 3a 20 53 75 6e 2c 20 32 |PST.Date|: Sun, 2|
|000002d0| 31 20 4d 61 72 20 39 33 | 20 32 31 3a 35 35 3a 32 |1 Mar 93| 21:55:2|
|000002e0| 31 20 50 53 54 0a 4d 65 | 73 73 61 67 65 2d 49 64 |1 PST.Me|ssage-Id|
|000002f0| 3a 20 3c 39 33 30 33 32 | 32 30 35 35 35 2e 41 41 |: <93032|20555.AA|
|00000300| 31 39 38 38 38 40 73 7a | 65 62 72 61 2e 53 61 69 |19888@sz|ebra.Sai|
|00000310| 67 6f 6e 2e 43 4f 4d 3e | 0a 46 72 6f 6d 3a 20 72 |gon.COM>|.From: r|
|00000320| 6f 6f 74 40 73 7a 65 62 | 72 61 2e 53 61 69 67 6f |oot@szeb|ra.Saigo|
|00000330| 6e 2e 43 4f 4d 0a 54 6f | 3a 20 61 62 75 72 74 40 |n.COM.To|: aburt@|
|00000340| 6e 79 78 2e 63 73 2e 64 | 75 2e 65 64 75 0a 43 63 |nyx.cs.d|u.edu.Cc|
|00000350| 3a 20 74 69 6e 40 73 6d | 73 63 2e 53 6f 6e 79 2e |: tin@sm|sc.Sony.|
|00000360| 43 4f 4d 0a 53 75 62 6a | 65 63 74 3a 20 4d 53 48 |COM.Subj|ect: MSH|
|00000370| 20 63 64 69 66 73 0a 53 | 74 61 74 75 73 3a 20 4f | cdifs.S|tatus: O|
|00000380| 52 0a 0a 41 6e 64 72 65 | 77 2c 0a 0a 20 20 48 65 |R..Andre|w,..  He|
|00000390| 72 65 20 69 73 20 74 68 | 65 20 63 6f 6e 74 65 78 |re is th|e contex|
|000003a0| 74 20 64 69 66 20 6f 66 | 20 74 68 65 20 63 68 61 |t dif of| the cha|
|000003b0| 6e 67 65 73 20 49 20 6d | 61 64 65 20 74 6f 20 6d |nges I m|ade to m|
|000003c0| 73 68 2e 20 20 49 74 20 | 69 73 20 72 75 6e 6e 69 |sh.  It |is runni|
|000003d0| 6e 67 0a 6f 6e 20 53 61 | 69 67 6f 6e 2e 43 4f 4d |ng.on Sa|igon.COM|
|000003e0| 2c 20 6f 72 20 77 69 6c | 6c 20 62 65 20 77 68 65 |, or wil|l be whe|
|000003f0| 6e 20 49 20 68 61 76 65 | 20 61 6c 6c 20 74 68 65 |n I have| all the|
|00000400| 20 6d 65 6e 75 73 20 72 | 65 61 64 79 2e 0a 0a 52 | menus r|eady...R|
|00000410| 65 67 61 72 64 73 2c 0a | 54 69 6e 20 4c 65 0a 0a |egards,.|Tin Le..|
|00000420| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000430| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000440| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000450| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000460| 2d 0a 64 69 66 66 20 2d | 72 63 20 6d 73 68 2f 4d |-.diff -|rc msh/M|
|00000470| 61 6b 65 66 69 6c 65 20 | 6d 73 68 2e 6f 72 69 67 |akefile |msh.orig|
|00000480| 2f 4d 61 6b 65 66 69 6c | 65 0a 2a 2a 2a 20 6d 73 |/Makefil|e.*** ms|
|00000490| 68 2f 4d 61 6b 65 66 69 | 6c 65 09 54 75 65 20 4d |h/Makefi|le.Tue M|
|000004a0| 61 72 20 20 39 20 32 30 | 3a 33 37 3a 35 33 20 31 |ar  9 20|:37:53 1|
|000004b0| 39 39 33 0a 2d 2d 2d 20 | 6d 73 68 2e 6f 72 69 67 |993.--- |msh.orig|
|000004c0| 2f 4d 61 6b 65 66 69 6c | 65 09 4d 6f 6e 20 4d 61 |/Makefil|e.Mon Ma|
|000004d0| 72 20 31 35 20 32 33 3a | 32 36 3a 32 36 20 31 39 |r 15 23:|26:26 19|
|000004e0| 39 33 0a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |93.*****|********|
|000004f0| 2a 2a 0a 2a 2a 2a 20 38 | 2c 32 33 20 2a 2a 2a 2a |**.*** 8|,23 ****|
|00000500| 0a 20 20 23 0a 20 20 23 | 20 43 68 65 63 6b 20 6d |.  #.  #| Check m|
|00000510| 73 68 65 6c 6c 2e 68 20 | 66 6f 72 20 6f 74 68 65 |shell.h |for othe|
|00000520| 72 20 6f 70 74 69 6f 6e | 73 2c 20 65 2e 67 2e 2c |r option|s, e.g.,|
|00000530| 20 6d 61 78 20 6d 65 6e | 75 20 73 69 7a 65 73 2e | max men|u sizes.|
|00000540| 0a 20 20 0a 21 20 4d 45 | 4e 55 44 49 52 3d 27 22 |.  .! ME|NUDIR='"|
|00000550| 2f 75 73 72 2f 6c 6f 63 | 61 6c 2f 6d 73 68 65 6c |/usr/loc|al/mshel|
|00000560| 6c 2f 6d 65 6e 75 73 22 | 27 0a 21 20 4c 4f 47 44 |l/menus"|'.! LOGD|
|00000570| 49 52 3d 27 22 2f 75 73 | 72 2f 6c 6f 63 61 6c 2f |IR='"/us|r/local/|
|00000580| 6d 73 68 65 6c 6c 2f 6c | 6f 67 73 22 27 0a 21 20 |mshell/l|ogs"'.! |
|00000590| 0a 21 20 43 46 4c 41 47 | 53 20 3d 20 20 2d 67 20 |.! CFLAG|S =  -g |
|000005a0| 2d 44 53 59 53 56 20 2d | 44 4d 45 4e 55 44 49 52 |-DSYSV -|DMENUDIR|
|000005b0| 3d 24 28 4d 45 4e 55 44 | 49 52 29 20 2d 44 4c 4f |=$(MENUD|IR) -DLO|
|000005c0| 47 44 49 52 3d 24 28 4c | 4f 47 44 49 52 29 20 2d |GDIR=$(L|OGDIR) -|
|000005d0| 58 61 0a 21 20 4c 46 4c | 41 47 53 3d 20 2d 6c 63 |Xa.! LFL|AGS= -lc|
|000005e0| 75 72 73 65 73 20 2d 6c | 74 65 72 6d 63 61 70 0a |urses -l|termcap.|
|000005f0| 20 20 4f 42 4a 53 20 3d | 09 6d 73 68 65 6c 6c 2e |  OBJS =|.mshell.|
|00000600| 6f 20 6d 61 69 6e 2e 6f | 20 73 74 72 69 6e 67 2e |o main.o| string.|
|00000610| 6f 20 66 75 6e 63 74 69 | 6f 6e 73 31 2e 6f 20 66 |o functi|ons1.o f|
|00000620| 75 6e 63 74 69 6f 6e 73 | 32 2e 6f 20 63 68 64 69 |unctions|2.o chdi|
|00000630| 72 2e 6f 20 6d 61 69 6c | 2e 6f 20 5c 0a 20 20 09 |r.o mail|.o \.  .|
|00000640| 73 65 74 74 61 74 72 2e | 6f 20 73 65 74 65 6e 76 |settatr.|o setenv|
|00000650| 2e 6f 20 78 73 79 73 74 | 65 6d 2e 6f 20 64 6c 2e |.o xsyst|em.o dl.|
|00000660| 6f 20 6d 61 63 72 6f 2e | 6f 0a 20 20 0a 20 20 6d |o macro.|o.  .  m|
|00000670| 73 68 65 6c 6c 3a 20 24 | 28 4f 42 4a 53 29 0a 21 |shell: $|(OBJS).!|
|00000680| 20 09 63 63 20 24 28 43 | 46 4c 41 47 53 29 20 24 | .cc $(C|FLAGS) $|
|00000690| 28 4f 42 4a 53 29 20 24 | 28 4c 46 4c 41 47 53 29 |(OBJS) $|(LFLAGS)|
|000006a0| 20 2d 6f 20 6d 73 68 65 | 6c 6c 0a 20 20 0a 20 20 | -o mshe|ll.  .  |
|000006b0| 24 28 4f 42 4a 53 29 20 | 3a 20 6d 73 68 65 6c 6c |$(OBJS) |: mshell|
|000006c0| 2e 68 0a 20 20 0a 2d 2d | 2d 20 38 2c 31 39 20 2d |.h.  .--|- 8,19 -|
|000006d0| 2d 2d 2d 0a 20 20 23 0a | 20 20 23 20 43 68 65 63 |---.  #.|  # Chec|
|000006e0| 6b 20 6d 73 68 65 6c 6c | 2e 68 20 66 6f 72 20 6f |k mshell|.h for o|
|000006f0| 74 68 65 72 20 6f 70 74 | 69 6f 6e 73 2c 20 65 2e |ther opt|ions, e.|
|00000700| 67 2e 2c 20 6d 61 78 20 | 6d 65 6e 75 20 73 69 7a |g., max |menu siz|
|00000710| 65 73 2e 0a 20 20 0a 21 | 20 43 46 4c 41 47 53 20 |es..  .!| CFLAGS |
|00000720| 3d 20 20 2d 4f 20 2d 44 | 42 53 44 20 2d 44 4d 45 |=  -O -D|BSD -DME|
|00000730| 4e 55 44 49 52 3d 27 22 | 2f 6e 79 78 2f 6c 69 62 |NUDIR='"|/nyx/lib|
|00000740| 2f 6d 65 6e 75 73 22 27 | 20 2d 44 4c 4f 47 44 49 |/menus"'| -DLOGDI|
|00000750| 52 3d 27 22 2f 6e 79 78 | 2f 6c 69 62 2f 6c 6f 67 |R='"/nyx|/lib/log|
|00000760| 73 22 27 0a 20 20 4f 42 | 4a 53 20 3d 09 6d 73 68 |s"'.  OB|JS =.msh|
|00000770| 65 6c 6c 2e 6f 20 6d 61 | 69 6e 2e 6f 20 73 74 72 |ell.o ma|in.o str|
|00000780| 69 6e 67 2e 6f 20 66 75 | 6e 63 74 69 6f 6e 73 31 |ing.o fu|nctions1|
|00000790| 2e 6f 20 66 75 6e 63 74 | 69 6f 6e 73 32 2e 6f 20 |.o funct|ions2.o |
|000007a0| 63 68 64 69 72 2e 6f 20 | 6d 61 69 6c 2e 6f 20 5c |chdir.o |mail.o \|
|000007b0| 0a 20 20 09 73 65 74 74 | 61 74 72 2e 6f 20 73 65 |.  .sett|atr.o se|
|000007c0| 74 65 6e 76 2e 6f 20 78 | 73 79 73 74 65 6d 2e 6f |tenv.o x|system.o|
|000007d0| 20 64 6c 2e 6f 20 6d 61 | 63 72 6f 2e 6f 0a 20 20 | dl.o ma|cro.o.  |
|000007e0| 0a 20 20 6d 73 68 65 6c | 6c 3a 20 24 28 4f 42 4a |.  mshel|l: $(OBJ|
|000007f0| 53 29 0a 21 20 09 63 63 | 20 24 28 43 46 4c 41 47 |S).! .cc| $(CFLAG|
|00000800| 53 29 20 24 28 4f 42 4a | 53 29 20 2d 6c 63 75 72 |S) $(OBJ|S) -lcur|
|00000810| 73 65 73 20 2d 6c 74 65 | 72 6d 63 61 70 20 2d 6f |ses -lte|rmcap -o|
|00000820| 20 6d 73 68 65 6c 6c 0a | 20 20 0a 20 20 24 28 4f | mshell.|  .  $(O|
|00000830| 42 4a 53 29 20 3a 20 6d | 73 68 65 6c 6c 2e 68 0a |BJS) : m|shell.h.|
|00000840| 20 20 0a 4f 6e 6c 79 20 | 69 6e 20 6d 73 68 3a 20 |  .Only |in msh: |
|00000850| 52 43 53 0a 64 69 66 66 | 20 2d 72 63 20 6d 73 68 |RCS.diff| -rc msh|
|00000860| 2f 63 68 64 69 72 2e 63 | 20 6d 73 68 2e 6f 72 69 |/chdir.c| msh.ori|
|00000870| 67 2f 63 68 64 69 72 2e | 63 0a 2a 2a 2a 20 6d 73 |g/chdir.|c.*** ms|
|00000880| 68 2f 63 68 64 69 72 2e | 63 09 53 75 6e 20 4d 61 |h/chdir.|c.Sun Ma|
|00000890| 72 20 31 34 20 31 31 3a | 33 32 3a 31 35 20 31 39 |r 14 11:|32:15 19|
|000008a0| 39 33 0a 2d 2d 2d 20 6d | 73 68 2e 6f 72 69 67 2f |93.--- m|sh.orig/|
|000008b0| 63 68 64 69 72 2e 63 09 | 4d 6f 6e 20 4d 61 72 20 |chdir.c.|Mon Mar |
|000008c0| 31 35 20 32 33 3a 32 36 | 3a 32 36 20 31 39 39 33 |15 23:26|:26 1993|
|000008d0| 0a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.*******|********|
|000008e0| 0a 2a 2a 2a 20 31 2c 37 | 20 2a 2a 2a 2a 0a 20 20 |.*** 1,7| ****.  |
|000008f0| 23 69 6e 63 6c 75 64 65 | 20 22 6d 73 68 65 6c 6c |#include| "mshell|
|00000900| 2e 68 22 0a 20 20 0a 2d | 20 73 74 61 74 69 63 20 |.h".  .-| static |
|00000910| 63 68 61 72 20 63 68 64 | 69 72 5f 72 63 73 69 64 |char chd|ir_rcsid|
|00000920| 5b 5d 20 3d 20 22 24 48 | 65 61 64 65 72 3a 20 2f |[] = "$H|eader: /|
|00000930| 75 73 72 33 2f 73 72 63 | 2f 6d 73 68 2f 52 43 53 |usr3/src|/msh/RCS|
|00000940| 2f 63 68 64 69 72 2e 63 | 2c 76 20 31 2e 31 20 31 |/chdir.c|,v 1.1 1|
|00000950| 39 39 33 2f 30 33 2f 31 | 34 20 31 39 3a 33 32 3a |993/03/1|4 19:32:|
|00000960| 30 37 20 72 6f 6f 74 20 | 45 78 70 20 72 6f 6f 74 |07 root |Exp root|
|00000970| 20 24 22 3b 0a 2d 20 0a | 20 20 65 78 74 65 72 6e | $";.- .|  extern|
|00000980| 20 63 68 61 72 20 20 20 | 20 20 47 5f 68 6f 6d 65 | char   |  G_home|
|00000990| 76 61 72 20 20 20 20 20 | 20 5b 5d 3b 0a 20 20 65 |var     | [];.  e|
|000009a0| 78 74 65 72 6e 20 63 68 | 61 72 20 20 20 20 20 47 |xtern ch|ar     G|
|000009b0| 5f 75 73 65 72 76 61 72 | 20 20 20 20 20 20 5b 5d |_uservar|      []|
|000009c0| 3b 0a 20 20 65 78 74 65 | 72 6e 20 63 68 61 72 20 |;.  exte|rn char |
|000009d0| 09 47 5f 74 65 72 6d 76 | 61 72 20 20 20 20 20 20 |.G_termv|ar      |
|000009e0| 5b 5d 3b 0a 2d 2d 2d 20 | 31 2c 35 20 2d 2d 2d 2d |[];.--- |1,5 ----|
|000009f0| 0a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.*******|********|
|00000a00| 0a 2a 2a 2a 20 31 30 2c | 33 33 20 2a 2a 2a 2a 0a |.*** 10,|33 ****.|
|00000a10| 20 20 65 78 74 65 72 6e | 20 69 6e 74 20 20 20 20 |  extern| int    |
|00000a20| 20 20 47 5f 6d 61 69 6c | 73 69 7a 65 3b 20 0a 20 |  G_mail|size; . |
|00000a30| 20 65 78 74 65 72 6e 20 | 73 74 72 75 63 74 20 20 | extern |struct  |
|00000a40| 20 73 74 61 74 20 47 5f | 73 74 3b 0a 20 20 0a 21 | stat G_|st;.  .!|
|00000a50| 20 76 6f 69 64 20 63 68 | 61 6e 67 65 5f 64 69 72 | void ch|ange_dir|
|00000a60| 65 63 74 6f 72 79 28 63 | 68 61 72 20 2a 6e 65 77 |ectory(c|har *new|
|00000a70| 5f 64 69 72 29 0a 20 20 | 7b 0a 20 20 09 63 68 61 |_dir).  |{.  .cha|
|00000a80| 72 20 6f 6c 64 5f 64 69 | 72 20 5b 4d 41 58 4c 45 |r old_di|r [MAXLE|
|00000a90| 4e 5d 3b 20 0a 20 20 09 | 69 6e 74 20 69 3b 0a 20 |N]; .  .|int i;. |
|00000aa0| 20 0a 20 20 23 69 66 64 | 65 66 20 42 53 44 0a 21 | .  #ifd|ef BSD.!|
|00000ab0| 20 09 67 65 74 77 64 28 | 6f 6c 64 5f 64 69 72 29 | .getwd(|old_dir)|
|00000ac0| 3b 0a 20 20 23 65 6e 64 | 69 66 0a 20 20 23 69 66 |;.  #end|if.  #if|
|00000ad0| 64 65 66 20 53 59 53 56 | 0a 20 20 09 67 65 74 63 |def SYSV|.  .getc|
|00000ae0| 77 64 28 6f 6c 64 5f 64 | 69 72 2c 20 73 69 7a 65 |wd(old_d|ir, size|
|00000af0| 6f 66 28 6f 6c 64 5f 64 | 69 72 29 29 3b 0a 20 20 |of(old_d|ir));.  |
|00000b00| 23 65 6e 64 69 66 0a 20 | 20 0a 21 20 09 69 66 20 |#endif. | .! .if |
|00000b10| 28 20 73 74 72 63 6d 70 | 28 6e 65 77 5f 64 69 72 |( strcmp|(new_dir|
|00000b20| 2c 20 4e 55 4c 4c 53 54 | 52 29 20 3d 3d 20 30 20 |, NULLST|R) == 0 |
|00000b30| 29 0a 21 20 09 09 70 72 | 69 6e 74 77 28 22 5c 74 |).! ..pr|intw("\t|
|00000b40| 6e 6f 20 64 69 72 65 63 | 74 6f 72 79 20 63 68 61 |no direc|tory cha|
|00000b50| 6e 67 65 20 72 65 71 75 | 65 73 74 65 64 20 21 21 |nge requ|ested !!|
|00000b60| 5c 6e 5c 6e 22 29 3b 0a | 20 20 09 09 2f 2a 20 58 |\n\n");.|  ../* X|
|00000b70| 58 58 20 2d 20 63 6f 75 | 6c 64 20 63 64 20 68 6f |XX - cou|ld cd ho|
|00000b80| 6d 65 20 2a 2f 0a 20 20 | 09 65 6c 73 65 20 7b 0a |me */.  |.else {.|
|00000b90| 21 20 09 09 70 72 69 6e | 74 77 28 22 5c 6e 5c 6e |! ..prin|tw("\n\n|
|00000ba0| 22 29 3b 0a 21 20 09 09 | 69 66 20 28 63 68 64 69 |");.! ..|if (chdi|
|00000bb0| 72 28 6e 65 77 5f 64 69 | 72 29 20 21 3d 20 30 29 |r(new_di|r) != 0)|
|00000bc0| 20 0a 21 20 09 09 09 70 | 72 69 6e 74 77 28 22 5c | .! ...p|rintw("\|
|00000bd0| 74 4e 6f 20 73 75 63 68 | 20 64 69 72 65 63 74 6f |tNo such| directo|
|00000be0| 72 79 20 61 73 20 25 73 | 5c 6e 5c 6e 5c 6e 22 2c |ry as %s|\n\n\n",|
|00000bf0| 20 6e 65 77 5f 64 69 72 | 29 3b 0a 20 20 09 7d 09 | new_dir|);.  .}.|
|00000c00| 09 2f 2a 20 65 6e 64 20 | 65 6c 73 65 20 73 74 72 |./* end |else str|
|00000c10| 63 6d 70 20 2a 2f 0a 20 | 20 7d 09 09 09 2f 2a 20 |cmp */. | }.../* |
|00000c20| 74 65 72 6d 69 6e 61 74 | 65 20 66 75 6e 63 74 69 |terminat|e functi|
|00000c30| 6f 6e 20 63 68 61 6e 67 | 65 5f 64 69 72 65 63 74 |on chang|e_direct|
|00000c40| 6f 72 79 20 2a 2f 0a 2d | 2d 2d 20 38 2c 33 33 20 |ory */.-|-- 8,33 |
|00000c50| 2d 2d 2d 2d 0a 20 20 65 | 78 74 65 72 6e 20 69 6e |----.  e|xtern in|
|00000c60| 74 20 20 20 20 20 20 47 | 5f 6d 61 69 6c 73 69 7a |t      G|_mailsiz|
|00000c70| 65 3b 20 0a 20 20 65 78 | 74 65 72 6e 20 73 74 72 |e; .  ex|tern str|
|00000c80| 75 63 74 20 20 20 73 74 | 61 74 20 47 5f 73 74 3b |uct   st|at G_st;|
|00000c90| 0a 20 20 0a 21 20 76 6f | 69 64 20 63 68 61 6e 67 |.  .! vo|id chang|
|00000ca0| 65 5f 64 69 72 65 63 74 | 6f 72 79 28 6e 65 77 5f |e_direct|ory(new_|
|00000cb0| 64 69 72 29 0a 21 20 63 | 68 61 72 20 2a 6e 65 77 |dir).! c|har *new|
|00000cc0| 5f 64 69 72 3b 0a 21 20 | 0a 20 20 7b 0a 20 20 09 |_dir;.! |.  {.  .|
|00000cd0| 63 68 61 72 20 6f 6c 64 | 5f 64 69 72 20 5b 4d 41 |char old|_dir [MA|
|00000ce0| 58 4c 45 4e 5d 3b 20 0a | 20 20 09 69 6e 74 20 69 |XLEN]; .|  .int i|
|00000cf0| 3b 0a 20 20 0a 20 20 23 | 69 66 64 65 66 20 42 53 |;.  .  #|ifdef BS|
|00000d00| 44 0a 21 20 09 67 65 74 | 77 64 20 28 6f 6c 64 5f |D.! .get|wd (old_|
|00000d10| 64 69 72 29 3b 0a 20 20 | 23 65 6e 64 69 66 0a 20 |dir);.  |#endif. |
|00000d20| 20 23 69 66 64 65 66 20 | 53 59 53 56 0a 20 20 09 | #ifdef |SYSV.  .|
|00000d30| 67 65 74 63 77 64 28 6f | 6c 64 5f 64 69 72 2c 20 |getcwd(o|ld_dir, |
|00000d40| 73 69 7a 65 6f 66 28 6f | 6c 64 5f 64 69 72 29 29 |sizeof(o|ld_dir))|
|00000d50| 3b 0a 20 20 23 65 6e 64 | 69 66 0a 20 20 0a 21 20 |;.  #end|if.  .! |
|00000d60| 09 69 66 20 28 20 73 74 | 72 63 6d 70 20 28 20 6e |.if ( st|rcmp ( n|
|00000d70| 65 77 5f 64 69 72 2c 20 | 4e 55 4c 4c 53 54 52 20 |ew_dir, |NULLSTR |
|00000d80| 29 20 3d 3d 20 30 20 29 | 0a 21 20 09 09 70 72 69 |) == 0 )|.! ..pri|
|00000d90| 6e 74 66 20 28 22 5c 74 | 20 6e 6f 20 64 69 72 65 |ntf ("\t| no dire|
|00000da0| 63 74 6f 72 79 20 63 68 | 61 6e 67 65 20 72 65 71 |ctory ch|ange req|
|00000db0| 75 65 73 74 65 64 20 21 | 21 5c 6e 5c 6e 22 29 3b |uested !|!\n\n");|
|00000dc0| 0a 20 20 09 09 2f 2a 20 | 58 58 58 20 2d 20 63 6f |.  ../* |XXX - co|
|00000dd0| 75 6c 64 20 63 64 20 68 | 6f 6d 65 20 2a 2f 0a 20 |uld cd h|ome */. |
|00000de0| 20 09 65 6c 73 65 20 7b | 0a 21 20 09 09 70 72 69 | .else {|.! ..pri|
|00000df0| 6e 74 66 20 28 22 5c 6e | 5c 6e 22 29 3b 0a 21 20 |ntf ("\n|\n");.! |
|00000e00| 09 09 69 66 20 28 20 63 | 68 64 69 72 20 28 6e 65 |..if ( c|hdir (ne|
|00000e10| 77 5f 64 69 72 29 20 21 | 3d 20 30 20 29 20 0a 21 |w_dir) !|= 0 ) .!|
|00000e20| 20 09 09 09 70 72 69 6e | 74 66 20 28 22 5c 74 20 | ...prin|tf ("\t |
|00000e30| 4e 6f 20 73 75 63 68 20 | 64 69 72 65 63 74 6f 72 |No such |director|
|00000e40| 79 20 61 73 20 25 73 5c | 6e 5c 6e 5c 6e 22 2c 20 |y as %s\|n\n\n", |
|00000e50| 6e 65 77 5f 64 69 72 20 | 29 3b 0a 20 20 09 7d 09 |new_dir |);.  .}.|
|00000e60| 09 2f 2a 20 65 6e 64 20 | 65 6c 73 65 20 73 74 72 |./* end |else str|
|00000e70| 63 6d 70 20 2a 2f 0a 20 | 20 7d 09 09 09 2f 2a 20 |cmp */. | }.../* |
|00000e80| 74 65 72 6d 69 6e 61 74 | 65 20 66 75 6e 63 74 69 |terminat|e functi|
|00000e90| 6f 6e 20 63 68 61 6e 67 | 65 5f 64 69 72 65 63 74 |on chang|e_direct|
|00000ea0| 6f 72 79 20 2a 2f 0a 64 | 69 66 66 20 2d 72 63 20 |ory */.d|iff -rc |
|00000eb0| 6d 73 68 2f 64 6c 2e 63 | 20 6d 73 68 2e 6f 72 69 |msh/dl.c| msh.ori|
|00000ec0| 67 2f 64 6c 2e 63 0a 2a | 2a 2a 20 6d 73 68 2f 64 |g/dl.c.*|** msh/d|
|00000ed0| 6c 2e 63 09 53 75 6e 20 | 4d 61 72 20 31 34 20 31 |l.c.Sun |Mar 14 1|
|00000ee0| 31 3a 33 32 3a 31 35 20 | 31 39 39 33 0a 2d 2d 2d |1:32:15 |1993.---|
|00000ef0| 20 6d 73 68 2e 6f 72 69 | 67 2f 64 6c 2e 63 09 4d | msh.ori|g/dl.c.M|
|00000f00| 6f 6e 20 4d 61 72 20 31 | 35 20 32 33 3a 32 36 3a |on Mar 1|5 23:26:|
|00000f10| 32 39 20 31 39 39 33 0a | 2a 2a 2a 2a 2a 2a 2a 2a |29 1993.|********|
|00000f20| 2a 2a 2a 2a 2a 2a 2a 0a | 2a 2a 2a 20 31 2c 31 35 |*******.|*** 1,15|
|00000f30| 20 2a 2a 2a 2a 0a 20 20 | 2f 2a 20 3d 3d 3d 3d 3d | ****.  |/* =====|
|00000f40| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000f50| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 20 64 6c 2e 63 20 3d |========|= dl.c =|
|00000f60| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000f70| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 20 2a 2f |========|===== */|
|00000f80| 0a 20 20 23 69 6e 63 6c | 75 64 65 20 22 64 6c 2e |.  #incl|ude "dl.|
|00000f90| 68 22 0a 20 20 0a 2d 20 | 73 74 61 74 69 63 20 63 |h".  .- |static c|
|00000fa0| 68 61 72 20 64 6c 5f 72 | 63 73 69 64 5b 5d 20 3d |har dl_r|csid[] =|
|00000fb0| 20 22 24 48 65 61 64 65 | 72 3a 20 2f 75 73 72 33 | "$Heade|r: /usr3|
|00000fc0| 2f 73 72 63 2f 6d 73 68 | 2f 52 43 53 2f 64 6c 2e |/src/msh|/RCS/dl.|
|00000fd0| 63 2c 76 20 31 2e 31 20 | 31 39 39 33 2f 30 33 2f |c,v 1.1 |1993/03/|
|00000fe0| 31 34 20 31 39 3a 33 32 | 3a 30 37 20 72 6f 6f 74 |14 19:32|:07 root|
|00000ff0| 20 45 78 70 20 72 6f 6f | 74 20 24 22 3b 0a 2d 20 | Exp roo|t $";.- |
|00001000| 0a 2d 20 23 69 66 64 65 | 66 20 53 59 53 56 0a 2d |.- #ifde|f SYSV.-|
|00001010| 20 23 69 6e 63 6c 75 64 | 65 20 3c 73 74 64 6c 69 | #includ|e <stdli|
|00001020| 62 2e 68 3e 0a 2d 20 23 | 65 6c 73 65 0a 20 20 76 |b.h>.- #|else.  v|
|00001030| 6f 69 64 20 2a 6d 61 6c | 6c 6f 63 28 29 3b 0a 2d |oid *mal|loc();.-|
|00001040| 20 23 65 6e 64 69 66 0a | 20 20 0a 21 20 63 68 61 | #endif.|  .! cha|
|00001050| 72 20 2a 67 65 74 6e 6f | 64 65 28 69 6e 74 20 73 |r *getno|de(int s|
|00001060| 69 7a 65 29 0a 20 20 7b | 0a 20 20 09 44 4c 5f 4e |ize).  {|.  .DL_N|
|00001070| 4f 44 45 20 2a 6e 3b 0a | 20 20 0a 2d 2d 2d 20 31 |ODE *n;.|  .--- 1|
|00001080| 2c 39 20 2d 2d 2d 2d 0a | 20 20 2f 2a 20 3d 3d 3d |,9 ----.|  /* ===|
|00001090| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000010a0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 20 64 6c 2e 63 |========|=== dl.c|
|000010b0| 20 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d | =======|========|
|000010c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 20 |========|======= |
|000010d0| 2a 2f 0a 20 20 23 69 6e | 63 6c 75 64 65 20 22 64 |*/.  #in|clude "d|
|000010e0| 6c 2e 68 22 0a 20 20 0a | 20 20 76 6f 69 64 20 2a |l.h".  .|  void *|
|000010f0| 6d 61 6c 6c 6f 63 28 29 | 3b 0a 20 20 0a 21 20 63 |malloc()|;.  .! c|
|00001100| 68 61 72 20 2a 67 65 74 | 6e 6f 64 65 28 73 69 7a |har *get|node(siz|
|00001110| 65 29 0a 20 20 7b 0a 20 | 20 09 44 4c 5f 4e 4f 44 |e).  {. | .DL_NOD|
|00001120| 45 20 2a 6e 3b 0a 20 20 | 0a 2a 2a 2a 2a 2a 2a 2a |E *n;.  |.*******|
|00001130| 2a 2a 2a 2a 2a 2a 2a 2a | 0a 2a 2a 2a 20 31 37 2c |********|.*** 17,|
|00001140| 32 36 20 2a 2a 2a 2a 0a | 20 20 09 09 6d 65 6d 73 |26 ****.|  ..mems|
|00001150| 65 74 28 6e 2c 20 27 5c | 30 27 2c 20 73 69 7a 65 |et(n, '\|0', size|
|00001160| 29 3b 0a 20 20 09 09 6e | 2d 3e 73 69 7a 65 20 3d |);.  ..n|->size =|
|00001170| 20 73 69 7a 65 3b 0a 20 | 20 09 7d 0a 21 20 09 72 | size;. | .}.! .r|
|00001180| 65 74 75 72 6e 28 28 63 | 68 61 72 20 2a 29 6e 29 |eturn((c|har *)n)|
|00001190| 3b 0a 20 20 7d 0a 20 20 | 0a 21 20 66 72 65 65 6e |;.  }.  |.! freen|
|000011a0| 6f 64 65 28 44 4c 5f 4e | 4f 44 45 20 2a 6e 29 0a |ode(DL_N|ODE *n).|
|000011b0| 20 20 7b 0a 20 20 09 66 | 72 65 65 28 6e 29 3b 0a |  {.  .f|ree(n);.|
|000011c0| 20 20 7d 0a 2d 2d 2d 20 | 31 31 2c 32 31 20 2d 2d |  }.--- |11,21 --|
|000011d0| 2d 2d 0a 20 20 09 09 6d | 65 6d 73 65 74 28 6e 2c |--.  ..m|emset(n,|
|000011e0| 20 27 5c 30 27 2c 20 73 | 69 7a 65 29 3b 0a 20 20 | '\0', s|ize);.  |
|000011f0| 09 09 6e 2d 3e 73 69 7a | 65 20 3d 20 73 69 7a 65 |..n->siz|e = size|
|00001200| 3b 0a 20 20 09 7d 0a 21 | 20 09 72 65 74 75 72 6e |;.  .}.!| .return|
|00001210| 28 6e 29 3b 0a 20 20 7d | 0a 20 20 0a 21 20 66 72 |(n);.  }|.  .! fr|
|00001220| 65 65 6e 6f 64 65 28 6e | 29 0a 21 20 44 4c 5f 4e |eenode(n|).! DL_N|
|00001230| 4f 44 45 20 2a 6e 3b 0a | 20 20 7b 0a 20 20 09 66 |ODE *n;.|  {.  .f|
|00001240| 72 65 65 28 6e 29 3b 0a | 20 20 7d 0a 2a 2a 2a 2a |ree(n);.|  }.****|
|00001250| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 0a 2a 2a 2a 20 |********|***.*** |
|00001260| 32 38 2c 33 38 20 2a 2a | 2a 2a 0a 20 20 2f 2a 0a |28,38 **|**.  /*.|
|00001270| 20 20 20 2a 20 43 72 65 | 61 74 65 20 61 6e 20 65 |   * Cre|ate an e|
|00001280| 6d 70 74 79 20 6c 69 73 | 74 0a 20 20 20 2a 2f 0a |mpty lis|t.   */.|
|00001290| 21 20 44 4c 49 53 54 20 | 64 6c 5f 63 72 65 61 74 |! DLIST |dl_creat|
|000012a0| 65 28 69 6e 74 20 66 6c | 61 67 73 29 0a 20 20 7b |e(int fl|ags).  {|
|000012b0| 0a 20 20 09 44 4c 49 53 | 54 20 6c 3b 0a 20 20 0a |.  .DLIS|T l;.  .|
|000012c0| 21 20 09 69 66 20 28 28 | 6c 20 3d 20 28 44 4c 49 |! .if ((|l = (DLI|
|000012d0| 53 54 29 6d 61 6c 6c 6f | 63 28 73 69 7a 65 6f 66 |ST)mallo|c(sizeof|
|000012e0| 28 73 74 72 75 63 74 20 | 64 6c 29 29 29 20 3d 3d |(struct |dl))) ==|
|000012f0| 20 4e 55 4c 4c 29 0a 20 | 20 09 09 72 65 74 75 72 | NULL). | ..retur|
|00001300| 6e 20 4e 55 4c 4c 3b 0a | 20 20 0a 20 20 09 6c 2d |n NULL;.|  .  .l-|
|00001310| 3e 68 65 61 64 20 3d 20 | 6c 2d 3e 74 61 69 6c 20 |>head = |l->tail |
|00001320| 3d 20 6c 2d 3e 63 75 72 | 72 20 3d 20 4e 55 4c 4c |= l->cur|r = NULL|
|00001330| 3b 0a 2d 2d 2d 20 32 33 | 2c 33 34 20 2d 2d 2d 2d |;.--- 23|,34 ----|
|00001340| 0a 20 20 2f 2a 0a 20 20 | 20 2a 20 43 72 65 61 74 |.  /*.  | * Creat|
|00001350| 65 20 61 6e 20 65 6d 70 | 74 79 20 6c 69 73 74 0a |e an emp|ty list.|
|00001360| 20 20 20 2a 2f 0a 21 20 | 44 4c 49 53 54 20 64 6c |   */.! |DLIST dl|
|00001370| 5f 63 72 65 61 74 65 28 | 66 6c 61 67 73 29 0a 21 |_create(|flags).!|
|00001380| 20 69 6e 74 20 66 6c 61 | 67 73 3b 0a 20 20 7b 0a | int fla|gs;.  {.|
|00001390| 20 20 09 44 4c 49 53 54 | 20 6c 3b 0a 20 20 0a 21 |  .DLIST| l;.  .!|
|000013a0| 20 09 69 66 20 28 28 6c | 20 3d 20 28 44 4c 49 53 | .if ((l| = (DLIS|
|000013b0| 54 29 20 6d 61 6c 6c 6f | 63 28 73 69 7a 65 6f 66 |T) mallo|c(sizeof|
|000013c0| 28 73 74 72 75 63 74 20 | 64 6c 29 29 29 20 3d 3d |(struct |dl))) ==|
|000013d0| 20 4e 55 4c 4c 29 0a 20 | 20 09 09 72 65 74 75 72 | NULL). | ..retur|
|000013e0| 6e 20 4e 55 4c 4c 3b 0a | 20 20 0a 20 20 09 6c 2d |n NULL;.|  .  .l-|
|000013f0| 3e 68 65 61 64 20 3d 20 | 6c 2d 3e 74 61 69 6c 20 |>head = |l->tail |
|00001400| 3d 20 6c 2d 3e 63 75 72 | 72 20 3d 20 4e 55 4c 4c |= l->cur|r = NULL|
|00001410| 3b 0a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |;.******|********|
|00001420| 2a 0a 2a 2a 2a 20 34 34 | 2c 35 30 20 2a 2a 2a 2a |*.*** 44|,50 ****|
|00001430| 0a 20 20 2f 2a 0a 20 20 | 20 2a 20 46 72 65 65 20 |.  /*.  | * Free |
|00001440| 65 6e 74 69 72 65 20 6c | 69 73 74 0a 20 20 20 2a |entire l|ist.   *|
|00001450| 2f 0a 21 20 64 6c 5f 64 | 65 73 74 72 6f 79 28 44 |/.! dl_d|estroy(D|
|00001460| 4c 49 53 54 20 6c 29 0a | 20 20 7b 0a 20 20 09 77 |LIST l).|  {.  .w|
|00001470| 68 69 6c 65 20 28 64 6c | 5f 73 68 65 61 64 28 6c |hile (dl|_shead(l|
|00001480| 29 29 0a 20 20 09 09 64 | 6c 5f 64 65 6c 65 74 65 |)).  ..d|l_delete|
|00001490| 28 6c 29 3b 0a 2d 2d 2d | 20 34 30 2c 34 37 20 2d |(l);.---| 40,47 -|
|000014a0| 2d 2d 2d 0a 20 20 2f 2a | 0a 20 20 20 2a 20 46 72 |---.  /*|.   * Fr|
|000014b0| 65 65 20 65 6e 74 69 72 | 65 20 6c 69 73 74 0a 20 |ee entir|e list. |
|000014c0| 20 20 2a 2f 0a 21 20 64 | 6c 5f 64 65 73 74 72 6f |  */.! d|l_destro|
|000014d0| 79 28 6c 29 0a 21 20 44 | 4c 49 53 54 20 6c 3b 0a |y(l).! D|LIST l;.|
|000014e0| 20 20 7b 0a 20 20 09 77 | 68 69 6c 65 20 28 64 6c |  {.  .w|hile (dl|
|000014f0| 5f 73 68 65 61 64 28 6c | 29 29 0a 20 20 09 09 64 |_shead(l|)).  ..d|
|00001500| 6c 5f 64 65 6c 65 74 65 | 28 6c 29 3b 0a 2a 2a 2a |l_delete|(l);.***|
|00001510| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 0a 2a 2a 2a |********|****.***|
|00001520| 20 35 32 2c 36 34 20 2a | 2a 2a 2a 0a 20 20 09 20 | 52,64 *|***.  . |
|00001530| 2a 20 69 74 20 69 73 20 | 61 73 73 75 6d 65 64 20 |* it is |assumed |
|00001540| 74 68 61 74 20 74 68 65 | 20 6c 69 73 74 20 68 65 |that the| list he|
|00001550| 61 64 20 73 74 72 75 63 | 74 75 72 65 20 69 74 73 |ad struc|ture its|
|00001560| 65 6c 66 20 77 61 73 0a | 20 20 09 20 2a 20 66 72 |elf was.|  . * fr|
|00001570| 6f 6d 20 64 6c 5f 63 72 | 65 61 74 65 2c 20 74 68 |om dl_cr|eate, th|
|00001580| 75 73 20 77 69 6c 6c 20 | 61 6c 77 61 79 73 20 62 |us will |always b|
|00001590| 65 20 66 72 65 65 27 64 | 2e 0a 20 20 09 20 2a 2f |e free'd|..  . */|
|000015a0| 0a 21 20 09 66 72 65 65 | 28 28 63 68 61 72 20 2a |.! .free|((char *|
|000015b0| 29 6c 29 3b 0a 20 20 7d | 0a 20 20 0a 20 20 2f 2a |)l);.  }|.  .  /*|
|000015c0| 0a 20 20 20 2a 20 44 65 | 6c 65 74 65 20 73 70 65 |.   * De|lete spe|
|000015d0| 63 69 66 69 63 20 6e 6f | 64 65 0a 20 20 20 2a 2f |cific no|de.   */|
|000015e0| 0a 21 20 64 6c 5f 64 65 | 6c 65 74 65 5f 6e 6f 64 |.! dl_de|lete_nod|
|000015f0| 65 28 44 4c 49 53 54 20 | 6c 2c 20 44 4c 5f 4e 4f |e(DLIST |l, DL_NO|
|00001600| 44 45 20 2a 6e 29 0a 20 | 20 7b 0a 20 20 09 69 66 |DE *n). | {.  .if|
|00001610| 20 28 6e 29 20 7b 0a 20 | 20 09 09 64 6c 5f 64 65 | (n) {. | ..dl_de|
|00001620| 74 61 63 68 5f 6e 6f 64 | 65 28 6c 2c 20 6e 29 3b |tach_nod|e(l, n);|
|00001630| 0a 2d 2d 2d 20 34 39 2c | 36 33 20 2d 2d 2d 2d 0a |.--- 49,|63 ----.|
|00001640| 20 20 09 20 2a 20 69 74 | 20 69 73 20 61 73 73 75 |  . * it| is assu|
|00001650| 6d 65 64 20 74 68 61 74 | 20 74 68 65 20 6c 69 73 |med that| the lis|
|00001660| 74 20 68 65 61 64 20 73 | 74 72 75 63 74 75 72 65 |t head s|tructure|
|00001670| 20 69 74 73 65 6c 66 20 | 77 61 73 0a 20 20 09 20 | itself |was.  . |
|00001680| 2a 20 66 72 6f 6d 20 64 | 6c 5f 63 72 65 61 74 65 |* from d|l_create|
|00001690| 2c 20 74 68 75 73 20 77 | 69 6c 6c 20 61 6c 77 61 |, thus w|ill alwa|
|000016a0| 79 73 20 62 65 20 66 72 | 65 65 27 64 2e 0a 20 20 |ys be fr|ee'd..  |
|000016b0| 09 20 2a 2f 0a 21 20 09 | 66 72 65 65 28 6c 29 3b |. */.! .|free(l);|
|000016c0| 0a 20 20 7d 0a 20 20 0a | 20 20 2f 2a 0a 20 20 20 |.  }.  .|  /*.   |
|000016d0| 2a 20 44 65 6c 65 74 65 | 20 73 70 65 63 69 66 69 |* Delete| specifi|
|000016e0| 63 20 6e 6f 64 65 0a 20 | 20 20 2a 2f 0a 21 20 64 |c node. |  */.! d|
|000016f0| 6c 5f 64 65 6c 65 74 65 | 5f 6e 6f 64 65 28 6c 2c |l_delete|_node(l,|
|00001700| 20 6e 29 0a 21 20 44 4c | 49 53 54 20 6c 3b 0a 21 | n).! DL|IST l;.!|
|00001710| 20 44 4c 5f 4e 4f 44 45 | 20 2a 6e 3b 0a 20 20 7b | DL_NODE| *n;.  {|
|00001720| 0a 20 20 09 69 66 20 28 | 6e 29 20 7b 0a 20 20 09 |.  .if (|n) {.  .|
|00001730| 09 64 6c 5f 64 65 74 61 | 63 68 5f 6e 6f 64 65 28 |.dl_deta|ch_node(|
|00001740| 6c 2c 20 6e 29 3b 0a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |l, n);.*|********|
|00001750| 2a 2a 2a 2a 2a 2a 0a 2a | 2a 2a 20 37 31 2c 37 37 |******.*|** 71,77|
|00001760| 20 2a 2a 2a 2a 0a 20 20 | 2f 2a 0a 20 20 20 2a 20 | ****.  |/*.   * |
|00001770| 44 65 6c 65 74 65 20 6e | 6f 64 65 2c 20 62 75 74 |Delete n|ode, but|
|00001780| 20 6c 65 61 76 65 20 6d | 65 6d 6f 72 79 20 61 6c | leave m|emory al|
|00001790| 6f 6e 65 0a 20 20 20 2a | 2f 0a 21 20 64 6c 5f 64 |one.   *|/.! dl_d|
|000017a0| 65 74 61 63 68 5f 6e 6f | 64 65 28 44 4c 49 53 54 |etach_no|de(DLIST|
|000017b0| 20 6c 2c 20 44 4c 5f 4e | 4f 44 45 20 2a 6e 29 0a | l, DL_N|ODE *n).|
|000017c0| 20 20 7b 0a 20 20 09 6c | 2d 3e 73 69 7a 65 2d 2d |  {.  .l|->size--|
|000017d0| 3b 0a 20 20 0a 2d 2d 2d | 20 37 30 2c 37 38 20 2d |;.  .---| 70,78 -|
|000017e0| 2d 2d 2d 0a 20 20 2f 2a | 0a 20 20 20 2a 20 44 65 |---.  /*|.   * De|
|000017f0| 6c 65 74 65 20 6e 6f 64 | 65 2c 20 62 75 74 20 6c |lete nod|e, but l|
|00001800| 65 61 76 65 20 6d 65 6d | 6f 72 79 20 61 6c 6f 6e |eave mem|ory alon|
|00001810| 65 0a 20 20 20 2a 2f 0a | 21 20 64 6c 5f 64 65 74 |e.   */.|! dl_det|
|00001820| 61 63 68 5f 6e 6f 64 65 | 28 6c 2c 20 6e 29 0a 21 |ach_node|(l, n).!|
|00001830| 20 44 4c 49 53 54 20 6c | 3b 0a 21 20 44 4c 5f 4e | DLIST l|;.! DL_N|
|00001840| 4f 44 45 20 2a 6e 3b 0a | 20 20 7b 0a 20 20 09 6c |ODE *n;.|  {.  .l|
|00001850| 2d 3e 73 69 7a 65 2d 2d | 3b 0a 20 20 0a 2a 2a 2a |->size--|;.  .***|
|00001860| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 0a 2a 2a 2a |********|****.***|
|00001870| 20 38 39 2c 39 35 20 2a | 2a 2a 2a 0a 20 20 2f 2a | 89,95 *|***.  /*|
|00001880| 0a 20 20 20 2a 20 49 6e | 73 65 72 74 20 6e 6f 64 |.   * In|sert nod|
|00001890| 65 20 6e 20 62 65 66 6f | 72 65 20 74 68 65 20 63 |e n befo|re the c|
|000018a0| 75 72 72 65 6e 74 20 6c | 6f 63 61 74 69 6f 6e 20 |urrent l|ocation |
|000018b0| 69 6e 20 6c 69 73 74 20 | 6c 0a 20 20 20 2a 2f 0a |in list |l.   */.|
|000018c0| 21 20 64 6c 5f 69 6e 73 | 5f 62 65 66 6f 72 65 5f |! dl_ins|_before_|
|000018d0| 6e 6f 64 65 28 44 4c 49 | 53 54 20 6c 2c 20 44 4c |node(DLI|ST l, DL|
|000018e0| 5f 4e 4f 44 45 20 2a 6e | 5f 6f 6e 5f 6c 69 73 74 |_NODE *n|_on_list|
|000018f0| 2c 20 44 4c 5f 4e 4f 44 | 45 20 2a 6e 65 77 5f 6e |, DL_NOD|E *new_n|
|00001900| 29 0a 20 20 7b 0a 20 20 | 09 6c 2d 3e 73 69 7a 65 |).  {.  |.l->size|
|00001910| 2b 2b 3b 0a 20 20 0a 2d | 2d 2d 20 39 30 2c 39 38 |++;.  .-|-- 90,98|
|00001920| 20 2d 2d 2d 2d 0a 20 20 | 2f 2a 0a 20 20 20 2a 20 | ----.  |/*.   * |
|00001930| 49 6e 73 65 72 74 20 6e | 6f 64 65 20 6e 20 62 65 |Insert n|ode n be|
|00001940| 66 6f 72 65 20 74 68 65 | 20 63 75 72 72 65 6e 74 |fore the| current|
|00001950| 20 6c 6f 63 61 74 69 6f | 6e 20 69 6e 20 6c 69 73 | locatio|n in lis|
|00001960| 74 20 6c 0a 20 20 20 2a | 2f 0a 21 20 64 6c 5f 69 |t l.   *|/.! dl_i|
|00001970| 6e 73 5f 62 65 66 6f 72 | 65 5f 6e 6f 64 65 28 6c |ns_befor|e_node(l|
|00001980| 2c 20 6e 5f 6f 6e 5f 6c | 69 73 74 2c 20 6e 65 77 |, n_on_l|ist, new|
|00001990| 5f 6e 29 0a 21 20 44 4c | 49 53 54 20 6c 3b 0a 21 |_n).! DL|IST l;.!|
|000019a0| 20 44 4c 5f 4e 4f 44 45 | 20 2a 6e 5f 6f 6e 5f 6c | DL_NODE| *n_on_l|
|000019b0| 69 73 74 2c 20 2a 6e 65 | 77 5f 6e 3b 0a 20 20 7b |ist, *ne|w_n;.  {|
|000019c0| 0a 20 20 09 6c 2d 3e 73 | 69 7a 65 2b 2b 3b 0a 20 |.  .l->s|ize++;. |
|000019d0| 20 0a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a | .******|********|
|000019e0| 2a 0a 2a 2a 2a 20 31 31 | 34 2c 31 32 30 20 2a 2a |*.*** 11|4,120 **|
|000019f0| 2a 2a 0a 20 20 09 6c 2d | 3e 63 75 72 72 20 3d 20 |**.  .l-|>curr = |
|00001a00| 6e 65 77 5f 6e 3b 0a 20 | 20 7d 0a 20 20 0a 21 20 |new_n;. | }.  .! |
|00001a10| 64 6c 5f 69 6e 73 5f 61 | 66 74 65 72 5f 6e 6f 64 |dl_ins_a|fter_nod|
|00001a20| 65 28 44 4c 49 53 54 20 | 6c 2c 20 44 4c 5f 4e 4f |e(DLIST |l, DL_NO|
|00001a30| 44 45 20 2a 6e 5f 6f 6e | 5f 6c 69 73 74 2c 20 44 |DE *n_on|_list, D|
|00001a40| 4c 5f 4e 4f 44 45 20 2a | 6e 65 77 5f 6e 29 0a 20 |L_NODE *|new_n). |
|00001a50| 20 7b 0a 20 20 09 6c 2d | 3e 73 69 7a 65 2b 2b 3b | {.  .l-|>size++;|
|00001a60| 0a 20 20 0a 2d 2d 2d 20 | 31 31 37 2c 31 32 35 20 |.  .--- |117,125 |
|00001a70| 2d 2d 2d 2d 0a 20 20 09 | 6c 2d 3e 63 75 72 72 20 |----.  .|l->curr |
|00001a80| 3d 20 6e 65 77 5f 6e 3b | 0a 20 20 7d 0a 20 20 0a |= new_n;|.  }.  .|
|00001a90| 21 20 64 6c 5f 69 6e 73 | 5f 61 66 74 65 72 5f 6e |! dl_ins|_after_n|
|00001aa0| 6f 64 65 28 6c 2c 20 6e | 5f 6f 6e 5f 6c 69 73 74 |ode(l, n|_on_list|
|00001ab0| 2c 20 6e 65 77 5f 6e 29 | 0a 21 20 44 4c 49 53 54 |, new_n)|.! DLIST|
|00001ac0| 20 6c 3b 0a 21 20 44 4c | 5f 4e 4f 44 45 20 2a 6e | l;.! DL|_NODE *n|
|00001ad0| 5f 6f 6e 5f 6c 69 73 74 | 2c 20 2a 6e 65 77 5f 6e |_on_list|, *new_n|
|00001ae0| 3b 0a 20 20 7b 0a 20 20 | 09 6c 2d 3e 73 69 7a 65 |;.  {.  |.l->size|
|00001af0| 2b 2b 3b 0a 20 20 0a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |++;.  .*|********|
|00001b00| 2a 2a 2a 2a 2a 2a 0a 2a | 2a 2a 20 31 34 32 2c 31 |******.*|** 142,1|
|00001b10| 34 38 20 2a 2a 2a 2a 0a | 20 20 2f 2a 0a 20 20 20 |48 ****.|  /*.   |
|00001b20| 2a 20 4a 6f 69 6e 20 6c | 32 20 74 6f 20 74 68 65 |* Join l|2 to the|
|00001b30| 20 65 6e 64 20 6f 66 20 | 6c 31 3b 20 6c 32 20 69 | end of |l1; l2 i|
|00001b40| 73 20 6e 6f 20 6c 6f 6e | 67 65 72 20 75 73 61 62 |s no lon|ger usab|
|00001b50| 6c 65 0a 20 20 20 2a 2f | 0a 21 20 64 6c 5f 63 61 |le.   */|.! dl_ca|
|00001b60| 74 28 44 4c 49 53 54 20 | 6c 31 2c 20 44 4c 49 53 |t(DLIST |l1, DLIS|
|00001b70| 54 20 6c 32 29 0a 20 20 | 7b 0a 20 20 09 6c 31 2d |T l2).  |{.  .l1-|
|00001b80| 3e 73 69 7a 65 20 2b 3d | 20 6c 32 2d 3e 73 69 7a |>size +=| l2->siz|
|00001b90| 65 3b 0a 20 20 09 6c 31 | 2d 3e 74 61 69 6c 2d 3e |e;.  .l1|->tail->|
|00001ba0| 6e 65 78 74 20 3d 20 6c | 32 2d 3e 68 65 61 64 3b |next = l|2->head;|
|00001bb0| 0a 2d 2d 2d 20 31 34 37 | 2c 31 35 34 20 2d 2d 2d |.--- 147|,154 ---|
|00001bc0| 2d 0a 20 20 2f 2a 0a 20 | 20 20 2a 20 4a 6f 69 6e |-.  /*. |  * Join|
|00001bd0| 20 6c 32 20 74 6f 20 74 | 68 65 20 65 6e 64 20 6f | l2 to t|he end o|
|00001be0| 66 20 6c 31 3b 20 6c 32 | 20 69 73 20 6e 6f 20 6c |f l1; l2| is no l|
|00001bf0| 6f 6e 67 65 72 20 75 73 | 61 62 6c 65 0a 20 20 20 |onger us|able.   |
|00001c00| 2a 2f 0a 21 20 64 6c 5f | 63 61 74 28 6c 31 2c 20 |*/.! dl_|cat(l1, |
|00001c10| 6c 32 29 0a 21 20 44 4c | 49 53 54 20 6c 31 2c 20 |l2).! DL|IST l1, |
|00001c20| 6c 32 3b 0a 20 20 7b 0a | 20 20 09 6c 31 2d 3e 73 |l2;.  {.|  .l1->s|
|00001c30| 69 7a 65 20 2b 3d 20 6c | 32 2d 3e 73 69 7a 65 3b |ize += l|2->size;|
|00001c40| 0a 20 20 09 6c 31 2d 3e | 74 61 69 6c 2d 3e 6e 65 |.  .l1->|tail->ne|
|00001c50| 78 74 20 3d 20 6c 32 2d | 3e 68 65 61 64 3b 0a 2a |xt = l2-|>head;.*|
|00001c60| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 0a 2a |********|******.*|
|00001c70| 2a 2a 20 31 35 37 2c 31 | 36 33 20 2a 2a 2a 2a 0a |** 157,1|63 ****.|
|00001c80| 20 20 20 2a 20 20 72 65 | 74 75 72 6e 20 70 6f 69 |   *  re|turn poi|
|00001c90| 6e 74 65 72 20 74 6f 20 | 6e 65 77 20 6c 69 73 74 |nter to |new list|
|00001ca0| 2e 0a 20 20 20 2a 2f 0a | 20 20 2f 2a 20 20 55 6e |..   */.|  /*  Un|
|00001cb0| 63 6f 6d 6d 65 6e 74 20 | 61 6e 64 20 64 6f 20 61 |comment |and do a|
|00001cc0| 73 20 65 78 65 72 63 69 | 73 65 0a 21 20 44 4c 49 |s exerci|se.! DLI|
|00001cd0| 53 54 20 64 6c 5f 73 70 | 6c 69 74 5f 61 74 5f 6e |ST dl_sp|lit_at_n|
|00001ce0| 6f 64 65 28 44 4c 49 53 | 54 20 6c 2c 20 44 4c 5f |ode(DLIS|T l, DL_|
|00001cf0| 4e 4f 44 45 20 2a 6e 29 | 0a 20 20 7b 0a 20 20 09 |NODE *n)|.  {.  .|
|00001d00| 44 4c 49 53 54 20 6e 65 | 77 6c 3b 0a 20 20 0a 2d |DLIST ne|wl;.  .-|
|00001d10| 2d 2d 20 31 36 33 2c 31 | 37 31 20 2d 2d 2d 2d 0a |-- 163,1|71 ----.|
|00001d20| 20 20 20 2a 20 20 72 65 | 74 75 72 6e 20 70 6f 69 |   *  re|turn poi|
|00001d30| 6e 74 65 72 20 74 6f 20 | 6e 65 77 20 6c 69 73 74 |nter to |new list|
|00001d40| 2e 0a 20 20 20 2a 2f 0a | 20 20 2f 2a 20 20 55 6e |..   */.|  /*  Un|
|00001d50| 63 6f 6d 6d 65 6e 74 20 | 61 6e 64 20 64 6f 20 61 |comment |and do a|
|00001d60| 73 20 65 78 65 72 63 69 | 73 65 0a 21 20 44 4c 49 |s exerci|se.! DLI|
|00001d70| 53 54 20 64 6c 5f 73 70 | 6c 69 74 5f 61 74 5f 6e |ST dl_sp|lit_at_n|
|00001d80| 6f 64 65 28 6c 2c 20 6e | 29 0a 21 20 44 4c 49 53 |ode(l, n|).! DLIS|
|00001d90| 54 20 6c 3b 0a 21 20 44 | 4c 5f 4e 4f 44 45 20 2a |T l;.! D|L_NODE *|
|00001da0| 6e 3b 0a 20 20 7b 0a 20 | 20 09 44 4c 49 53 54 20 |n;.  {. | .DLIST |
|00001db0| 6e 65 77 6c 3b 0a 20 20 | 0a 2a 2a 2a 2a 2a 2a 2a |newl;.  |.*******|
|00001dc0| 2a 2a 2a 2a 2a 2a 2a 2a | 0a 2a 2a 2a 20 31 37 33 |********|.*** 173|
|00001dd0| 2c 31 37 39 20 2a 2a 2a | 2a 0a 20 20 7d 0a 20 20 |,179 ***|*.  }.  |
|00001de0| 2a 2f 0a 20 20 0a 21 20 | 44 4c 49 53 54 20 64 6c |*/.  .! |DLIST dl|
|00001df0| 5f 63 6f 70 79 28 44 4c | 49 53 54 20 6c 29 0a 20 |_copy(DL|IST l). |
|00001e00| 20 7b 0a 20 20 09 44 4c | 49 53 54 20 6e 65 77 6c | {.  .DL|IST newl|
|00001e10| 3b 0a 20 20 09 44 4c 5f | 4e 4f 44 45 20 2a 6e 2c |;.  .DL_|NODE *n,|
|00001e20| 20 2a 6e 65 77 6e 3b 0a | 2d 2d 2d 20 31 38 31 2c | *newn;.|--- 181,|
|00001e30| 31 38 38 20 2d 2d 2d 2d | 0a 20 20 7d 0a 20 20 2a |188 ----|.  }.  *|
|00001e40| 2f 0a 20 20 0a 21 20 44 | 4c 49 53 54 20 64 6c 5f |/.  .! D|LIST dl_|
|00001e50| 63 6f 70 79 28 6c 29 0a | 21 20 44 4c 49 53 54 20 |copy(l).|! DLIST |
|00001e60| 6c 3b 0a 20 20 7b 0a 20 | 20 09 44 4c 49 53 54 20 |l;.  {. | .DLIST |
|00001e70| 6e 65 77 6c 3b 0a 20 20 | 09 44 4c 5f 4e 4f 44 45 |newl;.  |.DL_NODE|
|00001e80| 20 2a 6e 2c 20 2a 6e 65 | 77 6e 3b 0a 2a 2a 2a 2a | *n, *ne|wn;.****|
|00001e90| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 0a 2a 2a 2a 20 |********|***.*** |
|00001ea0| 31 38 32 2c 31 38 38 20 | 2a 2a 2a 2a 0a 20 20 09 |182,188 |****.  .|
|00001eb0| 09 72 65 74 75 72 6e 28 | 4e 55 4c 4c 29 3b 0a 20 |.return(|NULL);. |
|00001ec0| 20 0a 20 20 09 66 6f 72 | 65 61 63 68 6e 6f 64 65 | .  .for|eachnode|
|00001ed0| 28 6c 2c 20 6e 29 20 7b | 0a 21 20 09 09 6e 65 77 |(l, n) {|.! ..new|
|00001ee0| 6e 20 3d 20 28 44 4c 5f | 4e 4f 44 45 20 2a 29 67 |n = (DL_|NODE *)g|
|00001ef0| 65 74 6e 6f 64 65 28 6e | 2d 3e 73 69 7a 65 29 3b |etnode(n|->size);|
|00001f00| 0a 20 20 09 09 69 66 20 | 28 6e 65 77 6e 20 3d 3d |.  ..if |(newn ==|
|00001f10| 20 4e 55 4c 4c 29 20 7b | 0a 20 20 09 09 09 64 6c | NULL) {|.  ...dl|
|00001f20| 5f 64 65 73 74 72 6f 79 | 28 6e 65 77 6c 29 3b 0a |_destroy|(newl);.|
|00001f30| 20 20 09 09 09 72 65 74 | 75 72 6e 28 4e 55 4c 4c |  ...ret|urn(NULL|
|00001f40| 29 3b 0a 2d 2d 2d 20 31 | 39 31 2c 31 39 37 20 2d |);.--- 1|91,197 -|
|00001f50| 2d 2d 2d 0a 20 20 09 09 | 72 65 74 75 72 6e 28 4e |---.  ..|return(N|
|00001f60| 55 4c 4c 29 3b 0a 20 20 | 0a 20 20 09 66 6f 72 65 |ULL);.  |.  .fore|
|00001f70| 61 63 68 6e 6f 64 65 28 | 6c 2c 20 6e 29 20 7b 0a |achnode(|l, n) {.|
|00001f80| 21 20 09 09 6e 65 77 6e | 20 3d 20 67 65 74 6e 6f |! ..newn| = getno|
|00001f90| 64 65 28 6e 2d 3e 73 69 | 7a 65 29 3b 0a 20 20 09 |de(n->si|ze);.  .|
|00001fa0| 09 69 66 20 28 6e 65 77 | 6e 20 3d 3d 20 4e 55 4c |.if (new|n == NUL|
|00001fb0| 4c 29 20 7b 0a 20 20 09 | 09 09 64 6c 5f 64 65 73 |L) {.  .|..dl_des|
|00001fc0| 74 72 6f 79 28 6e 65 77 | 6c 29 3b 0a 20 20 09 09 |troy(new|l);.  ..|
|00001fd0| 09 72 65 74 75 72 6e 28 | 4e 55 4c 4c 29 3b 0a 2a |.return(|NULL);.*|
|00001fe0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 0a 2a |********|******.*|
|00001ff0| 2a 2a 20 31 39 34 2c 32 | 30 30 20 2a 2a 2a 2a 0a |** 194,2|00 ****.|
|00002000| 20 20 09 72 65 74 75 72 | 6e 28 6e 65 77 6c 29 3b |  .retur|n(newl);|
|00002010| 0a 20 20 7d 0a 20 20 0a | 21 20 64 6c 5f 63 6f 6d |.  }.  .|! dl_com|
|00002020| 70 61 72 65 28 44 4c 49 | 53 54 20 6c 31 2c 20 44 |pare(DLI|ST l1, D|
|00002030| 4c 49 53 54 20 6c 32 2c | 20 69 6e 74 20 28 2a 66 |LIST l2,| int (*f|
|00002040| 75 6e 63 29 28 29 29 0a | 20 20 7b 0a 20 20 09 69 |unc)()).|  {.  .i|
|00002050| 6e 74 20 63 6f 6d 70 3b | 0a 20 20 0a 2d 2d 2d 20 |nt comp;|.  .--- |
|00002060| 32 30 33 2c 32 31 31 20 | 2d 2d 2d 2d 0a 20 20 09 |203,211 |----.  .|
|00002070| 72 65 74 75 72 6e 28 6e | 65 77 6c 29 3b 0a 20 20 |return(n|ewl);.  |
|00002080| 7d 0a 20 20 0a 21 20 64 | 6c 5f 63 6f 6d 70 61 72 |}.  .! d|l_compar|
|00002090| 65 28 6c 31 2c 20 6c 32 | 2c 20 66 75 6e 63 29 0a |e(l1, l2|, func).|
|000020a0| 21 20 44 4c 49 53 54 20 | 6c 31 2c 20 6c 32 3b 0a |! DLIST |l1, l2;.|
|000020b0| 21 20 69 6e 74 20 28 2a | 66 75 6e 63 29 28 29 3b |! int (*|func)();|
|000020c0| 0a 20 20 7b 0a 20 20 09 | 69 6e 74 20 63 6f 6d 70 |.  {.  .|int comp|
|000020d0| 3b 0a 20 20 0a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |;.  .***|********|
|000020e0| 2a 2a 2a 2a 0a 2a 2a 2a | 20 32 31 32 2c 32 31 38 |****.***| 212,218|
|000020f0| 20 2a 2a 2a 2a 0a 20 20 | 09 09 72 65 74 75 72 6e | ****.  |..return|
|00002100| 28 30 29 3b 09 2f 2a 20 | 62 6f 74 68 20 72 61 6e |(0);./* |both ran|
|00002110| 20 6f 75 74 20 61 74 20 | 73 61 6d 65 20 74 69 6d | out at |same tim|
|00002120| 65 20 2a 2f 0a 20 20 7d | 0a 20 20 0a 21 20 64 6c |e */.  }|.  .! dl|
|00002130| 5f 61 70 70 6c 79 28 44 | 4c 49 53 54 20 6c 2c 20 |_apply(D|LIST l, |
|00002140| 69 6e 74 20 28 2a 66 75 | 6e 63 29 28 29 2c 20 63 |int (*fu|nc)(), c|
|00002150| 68 61 72 20 2a 61 72 67 | 29 0a 20 20 7b 0a 20 20 |har *arg|).  {.  |
|00002160| 09 66 6f 72 65 61 63 68 | 28 6c 29 0a 20 20 09 09 |.foreach|(l).  ..|
|00002170| 28 2a 66 75 6e 63 29 28 | 64 6c 5f 63 75 72 72 28 |(*func)(|dl_curr(|
|00002180| 6c 29 2c 20 61 72 67 29 | 3b 0a 2d 2d 2d 20 32 32 |l), arg)|;.--- 22|
|00002190| 33 2c 32 33 32 20 2d 2d | 2d 2d 0a 20 20 09 09 72 |3,232 --|--.  ..r|
|000021a0| 65 74 75 72 6e 28 30 29 | 3b 09 2f 2a 20 62 6f 74 |eturn(0)|;./* bot|
|000021b0| 68 20 72 61 6e 20 6f 75 | 74 20 61 74 20 73 61 6d |h ran ou|t at sam|
|000021c0| 65 20 74 69 6d 65 20 2a | 2f 0a 20 20 7d 0a 20 20 |e time *|/.  }.  |
|000021d0| 0a 21 20 64 6c 5f 61 70 | 70 6c 79 28 6c 2c 20 66 |.! dl_ap|ply(l, f|
|000021e0| 75 6e 63 2c 20 61 72 67 | 29 0a 21 20 44 4c 49 53 |unc, arg|).! DLIS|
|000021f0| 54 20 6c 3b 0a 21 20 69 | 6e 74 20 28 2a 66 75 6e |T l;.! i|nt (*fun|
|00002200| 63 29 28 29 3b 0a 21 20 | 63 68 61 72 20 2a 61 72 |c)();.! |char *ar|
|00002210| 67 3b 0a 20 20 7b 0a 20 | 20 09 66 6f 72 65 61 63 |g;.  {. | .foreac|
|00002220| 68 28 6c 29 0a 20 20 09 | 09 28 2a 66 75 6e 63 29 |h(l).  .|.(*func)|
|00002230| 28 64 6c 5f 63 75 72 72 | 28 6c 29 2c 20 61 72 67 |(dl_curr|(l), arg|
|00002240| 29 3b 0a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |);.*****|********|
|00002250| 2a 2a 0a 2a 2a 2a 20 32 | 32 31 2c 32 32 38 20 2a |**.*** 2|21,228 *|
|00002260| 2a 2a 2a 0a 20 20 2f 2a | 0a 20 20 20 2a 20 44 6f |***.  /*|.   * Do|
|00002270| 20 61 20 6c 69 6e 65 61 | 72 20 73 65 61 72 63 68 | a linea|r search|
|00002280| 20 6f 6e 20 74 68 65 20 | 6c 69 73 74 2c 20 67 69 | on the |list, gi|
|00002290| 76 65 6e 20 61 20 73 74 | 61 72 74 2f 65 6e 64 20 |ven a st|art/end |
|000022a0| 70 6f 69 6e 74 0a 20 20 | 20 2a 2f 0a 21 20 64 6c |point.  | */.! dl|
|000022b0| 5f 6c 73 65 61 72 63 68 | 28 44 4c 49 53 54 20 6c |_lsearch|(DLIST l|
|000022c0| 2c 20 44 4c 5f 4e 4f 44 | 45 20 2a 62 65 67 69 6e |, DL_NOD|E *begin|
|000022d0| 2c 20 44 4c 5f 4e 4f 44 | 45 20 2a 65 6e 64 2c 0a |, DL_NOD|E *end,.|
|000022e0| 21 20 09 09 76 6f 69 64 | 20 2a 6b 65 79 2c 20 69 |! ..void| *key, i|
|000022f0| 6e 74 20 28 2a 66 75 6e | 63 29 28 29 29 0a 20 20 |nt (*fun|c)()).  |
|00002300| 7b 0a 20 20 09 44 4c 5f | 4e 4f 44 45 20 2a 6e 3b |{.  .DL_|NODE *n;|
|00002310| 0a 20 20 0a 2d 2d 2d 20 | 32 33 35 2c 32 34 35 20 |.  .--- |235,245 |
|00002320| 2d 2d 2d 2d 0a 20 20 2f | 2a 0a 20 20 20 2a 20 44 |----.  /|*.   * D|
|00002330| 6f 20 61 20 6c 69 6e 65 | 61 72 20 73 65 61 72 63 |o a line|ar searc|
|00002340| 68 20 6f 6e 20 74 68 65 | 20 6c 69 73 74 2c 20 67 |h on the| list, g|
|00002350| 69 76 65 6e 20 61 20 73 | 74 61 72 74 2f 65 6e 64 |iven a s|tart/end|
|00002360| 20 70 6f 69 6e 74 0a 20 | 20 20 2a 2f 0a 21 20 64 | point. |  */.! d|
|00002370| 6c 5f 6c 73 65 61 72 63 | 68 28 6c 2c 20 62 65 67 |l_lsearc|h(l, beg|
|00002380| 69 6e 2c 20 65 6e 64 2c | 20 6b 65 79 2c 20 66 75 |in, end,| key, fu|
|00002390| 6e 63 29 0a 21 20 44 4c | 49 53 54 20 6c 3b 0a 21 |nc).! DL|IST l;.!|
|000023a0| 20 44 4c 5f 4e 4f 44 45 | 20 2a 62 65 67 69 6e 2c | DL_NODE| *begin,|
|000023b0| 20 2a 65 6e 64 3b 0a 21 | 20 76 6f 69 64 20 2a 6b | *end;.!| void *k|
|000023c0| 65 79 3b 0a 21 20 69 6e | 74 20 28 2a 66 75 6e 63 |ey;.! in|t (*func|
|000023d0| 29 28 29 3b 0a 20 20 7b | 0a 20 20 09 44 4c 5f 4e |)();.  {|.  .DL_N|
|000023e0| 4f 44 45 20 2a 6e 3b 0a | 20 20 0a 2a 2a 2a 2a 2a |ODE *n;.|  .*****|
|000023f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 0a 2a 2a 2a 20 32 |********|**.*** 2|
|00002400| 34 36 2c 32 35 37 20 2a | 2a 2a 2a 0a 20 20 0a 20 |46,257 *|***.  . |
|00002410| 20 73 74 61 74 69 63 20 | 69 6e 74 20 28 2a 64 6c | static |int (*dl|
|00002420| 5f 73 6f 72 74 5f 75 73 | 65 72 5f 63 6d 70 5f 66 |_sort_us|er_cmp_f|
|00002430| 75 6e 29 28 29 3b 0a 20 | 20 0a 21 20 64 6c 5f 73 |un)();. | .! dl_s|
|00002440| 6f 72 74 5f 63 6d 70 5f | 66 75 6e 28 44 4c 5f 4e |ort_cmp_|fun(DL_N|
|00002450| 4f 44 45 20 2a 2a 70 31 | 2c 20 44 4c 5f 4e 4f 44 |ODE **p1|, DL_NOD|
|00002460| 45 20 2a 2a 70 32 29 0a | 20 20 7b 0a 20 20 09 72 |E **p2).|  {.  .r|
|00002470| 65 74 75 72 6e 28 28 2a | 64 6c 5f 73 6f 72 74 5f |eturn((*|dl_sort_|
|00002480| 75 73 65 72 5f 63 6d 70 | 5f 66 75 6e 29 28 2a 70 |user_cmp|_fun)(*p|
|00002490| 31 2c 20 2a 70 32 29 29 | 3b 0a 20 20 7d 0a 20 20 |1, *p2))|;.  }.  |
|000024a0| 0a 21 20 64 6c 5f 73 6f | 72 74 28 44 4c 49 53 54 |.! dl_so|rt(DLIST|
|000024b0| 20 6c 2c 20 69 6e 74 20 | 28 2a 66 75 6e 63 29 28 | l, int |(*func)(|
|000024c0| 29 29 0a 20 20 7b 0a 20 | 20 09 44 4c 5f 4e 4f 44 |)).  {. | .DL_NOD|
|000024d0| 45 20 2a 2a 61 72 72 61 | 79 3b 0a 20 20 09 69 6e |E **arra|y;.  .in|
|000024e0| 74 20 69 2c 20 6c 61 73 | 74 3b 0a 2d 2d 2d 20 32 |t i, las|t;.--- 2|
|000024f0| 36 33 2c 32 37 37 20 2d | 2d 2d 2d 0a 20 20 0a 20 |63,277 -|---.  . |
|00002500| 20 73 74 61 74 69 63 20 | 69 6e 74 20 28 2a 64 6c | static |int (*dl|
|00002510| 5f 73 6f 72 74 5f 75 73 | 65 72 5f 63 6d 70 5f 66 |_sort_us|er_cmp_f|
|00002520| 75 6e 29 28 29 3b 0a 20 | 20 0a 21 20 64 6c 5f 73 |un)();. | .! dl_s|
|00002530| 6f 72 74 5f 63 6d 70 5f | 66 75 6e 28 70 31 2c 20 |ort_cmp_|fun(p1, |
|00002540| 70 32 29 0a 21 20 44 4c | 5f 4e 4f 44 45 20 2a 2a |p2).! DL|_NODE **|
|00002550| 70 31 2c 20 2a 2a 70 32 | 3b 0a 20 20 7b 0a 20 20 |p1, **p2|;.  {.  |
|00002560| 09 72 65 74 75 72 6e 28 | 28 2a 64 6c 5f 73 6f 72 |.return(|(*dl_sor|
|00002570| 74 5f 75 73 65 72 5f 63 | 6d 70 5f 66 75 6e 29 28 |t_user_c|mp_fun)(|
|00002580| 2a 70 31 2c 20 2a 70 32 | 29 29 3b 0a 20 20 7d 0a |*p1, *p2|));.  }.|
|00002590| 20 20 0a 21 20 64 6c 5f | 73 6f 72 74 28 6c 2c 20 |  .! dl_|sort(l, |
|000025a0| 66 75 6e 63 29 0a 21 20 | 44 4c 49 53 54 20 6c 3b |func).! |DLIST l;|
|000025b0| 0a 21 20 69 6e 74 20 28 | 2a 66 75 6e 63 29 28 29 |.! int (|*func)()|
|000025c0| 3b 0a 20 20 7b 0a 20 20 | 09 44 4c 5f 4e 4f 44 45 |;.  {.  |.DL_NODE|
|000025d0| 20 2a 2a 61 72 72 61 79 | 3b 0a 20 20 09 69 6e 74 | **array|;.  .int|
|000025e0| 20 69 2c 20 6c 61 73 74 | 3b 0a 2a 2a 2a 2a 2a 2a | i, last|;.******|
|000025f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 0a 2a 2a 2a 20 32 37 |********|*.*** 27|
|00002600| 33 2c 32 37 39 20 2a 2a | 2a 2a 0a 20 20 7d 0a 20 |3,279 **|**.  }. |
|00002610| 20 0a 20 20 2f 2a 20 66 | 72 6f 6d 20 61 20 6c 69 | .  /* f|rom a li|
|00002620| 73 74 2c 20 6d 61 6b 65 | 20 61 6e 20 61 72 72 61 |st, make| an arra|
|00002630| 79 20 6f 66 20 70 6f 69 | 6e 74 65 72 73 20 74 6f |y of poi|nters to|
|00002640| 20 74 68 65 20 6c 69 73 | 74 20 69 74 65 6d 73 20 | the lis|t items |
|00002650| 2a 2f 0a 21 20 44 4c 5f | 4e 4f 44 45 20 2a 2a 64 |*/.! DL_|NODE **d|
|00002660| 6c 5f 6c 32 61 28 44 4c | 49 53 54 20 6c 29 0a 20 |l_l2a(DL|IST l). |
|00002670| 20 7b 0a 20 20 09 44 4c | 5f 4e 4f 44 45 20 2a 6e | {.  .DL|_NODE *n|
|00002680| 2c 20 2a 2a 61 72 72 61 | 79 2c 20 2a 2a 61 3b 0a |, **arra|y, **a;.|
|00002690| 20 20 0a 2d 2d 2d 20 32 | 39 33 2c 33 30 31 20 2d |  .--- 2|93,301 -|
|000026a0| 2d 2d 2d 0a 20 20 7d 0a | 20 20 0a 20 20 2f 2a 20 |---.  }.|  .  /* |
|000026b0| 66 72 6f 6d 20 61 20 6c | 69 73 74 2c 20 6d 61 6b |from a l|ist, mak|
|000026c0| 65 20 61 6e 20 61 72 72 | 61 79 20 6f 66 20 70 6f |e an arr|ay of po|
|000026d0| 69 6e 74 65 72 73 20 74 | 6f 20 74 68 65 20 6c 69 |inters t|o the li|
|000026e0| 73 74 20 69 74 65 6d 73 | 20 2a 2f 0a 21 20 44 4c |st items| */.! DL|
|000026f0| 5f 4e 4f 44 45 20 2a 2a | 0a 21 20 64 6c 5f 6c 32 |_NODE **|.! dl_l2|
|00002700| 61 28 6c 29 0a 21 20 44 | 4c 49 53 54 20 6c 3b 0a |a(l).! D|LIST l;.|
|00002710| 20 20 7b 0a 20 20 09 44 | 4c 5f 4e 4f 44 45 20 2a |  {.  .D|L_NODE *|
|00002720| 6e 2c 20 2a 2a 61 72 72 | 61 79 2c 20 2a 2a 61 3b |n, **arr|ay, **a;|
|00002730| 0a 20 20 0a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.  .****|********|
|00002740| 2a 2a 2a 0a 2a 2a 2a 20 | 32 38 38 2c 32 39 34 20 |***.*** |288,294 |
|00002750| 2a 2a 2a 2a 0a 20 20 7d | 0a 20 20 0a 20 20 2f 2a |****.  }|.  .  /*|
|00002760| 20 74 75 72 6e 20 61 6e | 20 61 72 72 61 79 20 6f | turn an| array o|
|00002770| 66 20 70 6f 69 6e 74 65 | 72 73 20 74 6f 20 74 68 |f pointe|rs to th|
|00002780| 65 20 6c 69 73 74 20 69 | 74 65 6d 73 20 69 6e 74 |e list i|tems int|
|00002790| 6f 20 61 20 6c 69 73 74 | 20 2a 2f 0a 21 20 64 6c |o a list| */.! dl|
|000027a0| 5f 61 32 6c 28 44 4c 49 | 53 54 20 6c 2c 20 44 4c |_a2l(DLI|ST l, DL|
|000027b0| 5f 4e 4f 44 45 20 2a 2a | 61 72 72 61 79 29 0a 20 |_NODE **|array). |
|000027c0| 20 7b 0a 20 20 09 69 6e | 74 20 69 2c 20 6c 61 73 | {.  .in|t i, las|
|000027d0| 74 3b 0a 20 20 0a 2d 2d | 2d 20 33 31 30 2c 33 31 |t;.  .--|- 310,31|
|000027e0| 38 20 2d 2d 2d 2d 0a 20 | 20 7d 0a 20 20 0a 20 20 |8 ----. | }.  .  |
|000027f0| 2f 2a 20 74 75 72 6e 20 | 61 6e 20 61 72 72 61 79 |/* turn |an array|
|00002800| 20 6f 66 20 70 6f 69 6e | 74 65 72 73 20 74 6f 20 | of poin|ters to |
|00002810| 74 68 65 20 6c 69 73 74 | 20 69 74 65 6d 73 20 69 |the list| items i|
|00002820| 6e 74 6f 20 61 20 6c 69 | 73 74 20 2a 2f 0a 21 20 |nto a li|st */.! |
|00002830| 64 6c 5f 61 32 6c 28 6c | 2c 20 61 72 72 61 79 29 |dl_a2l(l|, array)|
|00002840| 0a 21 20 44 4c 49 53 54 | 20 6c 3b 0a 21 20 44 4c |.! DLIST| l;.! DL|
|00002850| 5f 4e 4f 44 45 20 2a 2a | 61 72 72 61 79 3b 0a 20 |_NODE **|array;. |
|00002860| 20 7b 0a 20 20 09 69 6e | 74 20 69 2c 20 6c 61 73 | {.  .in|t i, las|
|00002870| 74 3b 0a 20 20 0a 64 69 | 66 66 20 2d 72 63 20 6d |t;.  .di|ff -rc m|
|00002880| 73 68 2f 64 6c 2e 68 20 | 6d 73 68 2e 6f 72 69 67 |sh/dl.h |msh.orig|
|00002890| 2f 64 6c 2e 68 0a 2a 2a | 2a 20 6d 73 68 2f 64 6c |/dl.h.**|* msh/dl|
|000028a0| 2e 68 09 53 75 6e 20 4d | 61 72 20 31 34 20 31 31 |.h.Sun M|ar 14 11|
|000028b0| 3a 33 32 3a 31 36 20 31 | 39 39 33 0a 2d 2d 2d 20 |:32:16 1|993.--- |
|000028c0| 6d 73 68 2e 6f 72 69 67 | 2f 64 6c 2e 68 09 4d 6f |msh.orig|/dl.h.Mo|
|000028d0| 6e 20 4d 61 72 20 31 35 | 20 32 33 3a 32 36 3a 32 |n Mar 15| 23:26:2|
|000028e0| 39 20 31 39 39 33 0a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |9 1993.*|********|
|000028f0| 2a 2a 2a 2a 2a 2a 0a 2a | 2a 2a 20 36 38 2c 37 32 |******.*|** 68,72|
|00002900| 20 2a 2a 2a 2a 0a 20 20 | 0a 20 20 23 64 65 66 69 | ****.  |.  #defi|
|00002910| 6e 65 20 66 6f 72 65 61 | 63 68 28 6c 29 09 09 66 |ne forea|ch(l)..f|
|00002920| 6f 72 20 28 64 6c 5f 73 | 68 65 61 64 28 6c 29 3b |or (dl_s|head(l);|
|00002930| 20 64 6c 5f 63 75 72 72 | 28 6c 29 3b 20 64 6c 5f | dl_curr|(l); dl_|
|00002940| 73 6e 65 78 74 28 6c 29 | 29 0a 20 20 23 64 65 66 |snext(l)|).  #def|
|00002950| 69 6e 65 20 66 6f 72 65 | 61 63 68 6e 6f 64 65 28 |ine fore|achnode(|
|00002960| 6c 2c 70 29 09 66 6f 72 | 20 28 28 70 29 3d 64 6c |l,p).for| ((p)=dl|
|00002970| 5f 73 68 65 61 64 28 6c | 29 3b 20 28 70 29 3b 20 |_shead(l|); (p); |
|00002980| 28 70 29 3d 64 6c 5f 73 | 6e 65 78 74 28 6c 29 29 |(p)=dl_s|next(l))|
|00002990| 0a 21 20 0a 21 20 23 65 | 6e 64 69 66 20 2f 2a 20 |.! .! #e|ndif /* |
|000029a0| 44 4c 5f 48 20 2a 2f 0a | 2d 2d 2d 20 36 38 2c 37 |DL_H */.|--- 68,7|
|000029b0| 31 20 2d 2d 2d 2d 0a 20 | 20 0a 20 20 23 64 65 66 |1 ----. | .  #def|
|000029c0| 69 6e 65 20 66 6f 72 65 | 61 63 68 28 6c 29 09 09 |ine fore|ach(l)..|
|000029d0| 66 6f 72 20 28 64 6c 5f | 73 68 65 61 64 28 6c 29 |for (dl_|shead(l)|
|000029e0| 3b 20 64 6c 5f 63 75 72 | 72 28 6c 29 3b 20 64 6c |; dl_cur|r(l); dl|
|000029f0| 5f 73 6e 65 78 74 28 6c | 29 29 0a 20 20 23 64 65 |_snext(l|)).  #de|
|00002a00| 66 69 6e 65 20 66 6f 72 | 65 61 63 68 6e 6f 64 65 |fine for|eachnode|
|00002a10| 28 6c 2c 70 29 09 66 6f | 72 20 28 28 70 29 3d 64 |(l,p).fo|r ((p)=d|
|00002a20| 6c 5f 73 68 65 61 64 28 | 6c 29 3b 20 28 70 29 3b |l_shead(|l); (p);|
|00002a30| 20 28 70 29 3d 64 6c 5f | 73 6e 65 78 74 28 6c 29 | (p)=dl_|snext(l)|
|00002a40| 29 0a 21 20 23 65 6e 64 | 69 66 0a 64 69 66 66 20 |).! #end|if.diff |
|00002a50| 2d 72 63 20 6d 73 68 2f | 66 75 6e 63 74 69 6f 6e |-rc msh/|function|
|00002a60| 73 31 2e 63 20 6d 73 68 | 2e 6f 72 69 67 2f 66 75 |s1.c msh|.orig/fu|
|00002a70| 6e 63 74 69 6f 6e 73 31 | 2e 63 0a 2a 2a 2a 20 6d |nctions1|.c.*** m|
|00002a80| 73 68 2f 66 75 6e 63 74 | 69 6f 6e 73 31 2e 63 09 |sh/funct|ions1.c.|
|00002a90| 53 75 6e 20 4d 61 72 20 | 31 34 20 31 31 3a 33 32 |Sun Mar |14 11:32|
|00002aa0| 3a 31 36 20 31 39 39 33 | 0a 2d 2d 2d 20 6d 73 68 |:16 1993|.--- msh|
|00002ab0| 2e 6f 72 69 67 2f 66 75 | 6e 63 74 69 6f 6e 73 31 |.orig/fu|nctions1|
|00002ac0| 2e 63 09 4d 6f 6e 20 4d | 61 72 20 31 35 20 32 33 |.c.Mon M|ar 15 23|
|00002ad0| 3a 32 36 3a 32 37 20 31 | 39 39 33 0a 2a 2a 2a 2a |:26:27 1|993.****|
|00002ae0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 0a 2a 2a 2a 20 |********|***.*** |
|00002af0| 31 2c 31 32 20 2a 2a 2a | 2a 0a 20 20 23 69 6e 63 |1,12 ***|*.  #inc|
|00002b00| 6c 75 64 65 20 22 6d 73 | 68 65 6c 6c 2e 68 22 0a |lude "ms|hell.h".|
|00002b10| 20 20 0a 2d 20 73 74 61 | 74 69 63 20 63 68 61 72 |  .- sta|tic char|
|00002b20| 20 66 75 6e 63 74 69 6f | 6e 73 31 5f 72 63 73 69 | functio|ns1_rcsi|
|00002b30| 64 5b 5d 20 3d 20 22 24 | 48 65 61 64 65 72 3a 20 |d[] = "$|Header: |
|00002b40| 2f 75 73 72 33 2f 73 72 | 63 2f 6d 73 68 2f 52 43 |/usr3/sr|c/msh/RC|
|00002b50| 53 2f 66 75 6e 63 74 69 | 6f 6e 73 31 2e 63 2c 76 |S/functi|ons1.c,v|
|00002b60| 20 31 2e 31 20 31 39 39 | 33 2f 30 33 2f 31 34 20 | 1.1 199|3/03/14 |
|00002b70| 31 39 3a 33 32 3a 30 37 | 20 72 6f 6f 74 20 45 78 |19:32:07| root Ex|
|00002b80| 70 20 72 6f 6f 74 20 24 | 22 3b 0a 2d 20 0a 2d 20 |p root $|";.- .- |
|00002b90| 23 69 66 64 65 66 20 53 | 59 53 56 0a 2d 20 23 69 |#ifdef S|YSV.- #i|
|00002ba0| 6e 63 6c 75 64 65 20 3c | 73 74 72 69 6e 67 2e 68 |nclude <|string.h|
|00002bb0| 3e 0a 2d 20 23 69 6e 63 | 6c 75 64 65 20 3c 73 74 |>.- #inc|lude <st|
|00002bc0| 64 6c 69 62 2e 68 3e 0a | 2d 20 23 65 6e 64 69 66 |dlib.h>.|- #endif|
|00002bd0| 0a 2d 20 0a 20 20 65 78 | 74 65 72 6e 20 63 68 61 |.- .  ex|tern cha|
|00002be0| 72 20 20 20 20 20 47 5f | 68 6f 6d 65 76 61 72 20 |r     G_|homevar |
|00002bf0| 20 20 20 20 20 5b 5d 3b | 0a 20 20 65 78 74 65 72 |     [];|.  exter|
|00002c00| 6e 20 63 68 61 72 20 20 | 20 20 20 47 5f 75 73 65 |n char  |   G_use|
|00002c10| 72 76 61 72 20 20 20 20 | 20 20 5b 5d 3b 0a 20 20 |rvar    |  [];.  |
|00002c20| 65 78 74 65 72 6e 20 63 | 68 61 72 20 09 47 5f 74 |extern c|har .G_t|
|00002c30| 65 72 6d 76 61 72 20 20 | 20 20 20 20 5b 5d 3b 0a |ermvar  |    [];.|
|00002c40| 2d 2d 2d 20 31 2c 35 20 | 2d 2d 2d 2d 0a 2a 2a 2a |--- 1,5 |----.***|
|00002c50| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 0a 2a 2a 2a |********|****.***|
|00002c60| 20 31 35 2c 36 38 20 2a | 2a 2a 2a 0a 20 20 65 78 | 15,68 *|***.  ex|
|00002c70| 74 65 72 6e 20 69 6e 74 | 20 20 20 20 20 20 47 5f |tern int|      G_|
|00002c80| 6d 61 69 6c 73 69 7a 65 | 3b 20 0a 20 20 65 78 74 |mailsize|; .  ext|
|00002c90| 65 72 6e 20 73 74 72 75 | 63 74 20 20 20 73 74 61 |ern stru|ct   sta|
|00002ca0| 74 20 47 5f 73 74 3b 0a | 20 20 0a 21 20 76 6f 69 |t G_st;.|  .! voi|
|00002cb0| 64 20 68 65 6c 70 66 69 | 6c 65 5f 64 69 73 70 6c |d helpfi|le_displ|
|00002cc0| 61 79 20 28 63 68 61 72 | 20 2a 66 69 6c 65 6e 61 |ay (char| *filena|
|00002cd0| 6d 65 29 0a 20 20 7b 0a | 20 20 09 46 49 4c 45 20 |me).  {.|  .FILE |
|00002ce0| 2a 20 66 70 3b 0a 20 20 | 09 63 68 61 72 20 72 65 |* fp;.  |.char re|
|00002cf0| 63 6f 72 64 20 5b 44 45 | 53 43 4c 45 4e 5d 3b 0a |cord [DE|SCLEN];.|
|00002d00| 20 20 09 69 66 20 28 28 | 20 66 70 20 3d 20 66 6f |  .if ((| fp = fo|
|00002d10| 70 65 6e 20 28 66 69 6c | 65 6e 61 6d 65 2c 20 22 |pen (fil|ename, "|
|00002d20| 72 22 29 29 20 3d 3d 20 | 4e 55 4c 4c 20 29 20 7b |r")) == |NULL ) {|
|00002d30| 0a 21 20 09 09 70 72 69 | 6e 74 77 28 22 5c 74 4e |.! ..pri|ntw("\tN|
|00002d40| 6f 20 73 75 63 68 20 68 | 65 6c 70 66 69 6c 65 20 |o such h|elpfile |
|00002d50| 61 73 20 25 73 21 21 5c | 6e 22 2c 20 66 69 6c 65 |as %s!!\|n", file|
|00002d60| 6e 61 6d 65 29 3b 0a 20 | 20 09 09 72 65 74 75 72 |name);. | ..retur|
|00002d70| 6e 3b 0a 20 20 09 7d 0a | 20 20 0a 20 20 09 77 68 |n;.  .}.|  .  .wh|
|00002d80| 69 6c 65 20 28 20 66 67 | 65 74 73 20 28 72 65 63 |ile ( fg|ets (rec|
|00002d90| 6f 72 64 2c 20 73 69 7a | 65 6f 66 28 72 65 63 6f |ord, siz|eof(reco|
|00002da0| 72 64 29 2c 20 66 70 29 | 20 29 0a 20 20 09 09 66 |rd), fp)| ).  ..f|
|00002db0| 70 75 74 73 20 28 72 65 | 63 6f 72 64 2c 20 73 74 |puts (re|cord, st|
|00002dc0| 64 6f 75 74 29 3b 0a 21 | 20 09 70 72 69 6e 74 77 |dout);.!| .printw|
|00002dd0| 28 22 5c 6e 22 29 3b 0a | 20 20 09 66 63 6c 6f 73 |("\n");.|  .fclos|
|00002de0| 65 20 28 66 70 29 3b 0a | 20 20 7d 0a 20 20 0a 20 |e (fp);.|  }.  . |
|00002df0| 20 2f 2a 20 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d | /* ====|========|
|00002e00| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002e10| 3d 3d 3d 3d 20 2a 2f 0a | 21 20 63 68 61 72 20 2a |==== */.|! char *|
|00002e20| 70 72 6f 6d 70 74 28 63 | 68 61 72 20 2a 70 29 0a |prompt(c|har *p).|
|00002e30| 20 20 2f 2a 20 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |  /* ===|========|
|00002e40| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002e50| 3d 3d 3d 3d 3d 20 2a 2f | 0a 20 20 7b 0a 20 20 09 |===== */|.  {.  .|
|00002e60| 73 74 61 74 69 63 20 63 | 68 61 72 20 61 6e 73 5b |static c|har ans[|
|00002e70| 57 4f 52 44 4c 45 4e 5d | 3b 0a 20 20 09 65 78 74 |WORDLEN]|;.  .ext|
|00002e80| 65 72 6e 20 69 6e 74 20 | 47 5f 6c 69 6d 69 74 65 |ern int |G_limite|
|00002e90| 64 3b 0a 20 20 0a 21 20 | 09 70 72 69 6e 74 77 28 |d;.  .! |.printw(|
|00002ea0| 22 25 73 20 3a 20 22 2c | 20 75 66 69 78 28 70 29 |"%s : ",| ufix(p)|
|00002eb0| 29 3b 0a 20 20 09 69 66 | 20 28 21 47 5f 6c 69 6d |);.  .if| (!G_lim|
|00002ec0| 69 74 65 64 29 20 7b 0a | 21 20 09 09 72 65 61 64 |ited) {.|! ..read|
|00002ed0| 5f 69 6e 70 75 74 5f 6c | 69 6e 65 28 61 6e 73 29 |_input_l|ine(ans)|
|00002ee0| 3b 0a 21 20 09 09 72 65 | 70 6c 61 63 65 5f 73 74 |;.! ..re|place_st|
|00002ef0| 72 69 6e 67 28 61 6e 73 | 2c 20 48 4f 4d 45 5f 43 |ring(ans|, HOME_C|
|00002f00| 48 41 52 2c 20 67 65 74 | 65 6e 76 28 26 47 5f 68 |HAR, get|env(&G_h|
|00002f10| 6f 6d 65 76 61 72 5b 31 | 5d 29 29 20 3b 0a 20 20 |omevar[1|])) ;.  |
|00002f20| 09 7d 0a 20 20 09 65 6c | 73 65 20 7b 0a 20 20 09 |.}.  .el|se {.  .|
|00002f30| 09 73 74 72 63 70 79 28 | 61 6e 73 2c 20 22 58 58 |.strcpy(|ans, "XX|
|00002f40| 58 22 29 3b 0a 21 20 09 | 09 70 72 69 6e 74 77 28 |X");.! .|.printw(|
|00002f50| 22 28 6e 6f 20 69 6e 70 | 75 74 20 66 6f 72 20 75 |"(no inp|ut for u|
|00002f60| 6e 76 61 6c 69 64 61 74 | 65 64 20 75 73 65 72 73 |nvalidat|ed users|
|00002f70| 29 22 29 3b 0a 20 20 09 | 7d 0a 21 20 09 70 72 69 |)");.  .|}.! .pri|
|00002f80| 6e 74 77 28 22 5c 6e 22 | 29 3b 0a 20 20 09 72 65 |ntw("\n"|);.  .re|
|00002f90| 74 75 72 6e 28 61 6e 73 | 29 3b 0a 20 20 7d 0a 20 |turn(ans|);.  }. |
|00002fa0| 20 0a 20 20 2f 2a 20 3d | 3d 3d 3d 3d 3d 3d 3d 3d | .  /* =|========|
|00002fb0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002fc0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002fd0| 3d 3d 3d 3d 3d 3d 3d 20 | 2a 2f 0a 21 20 76 6f 69 |======= |*/.! voi|
|00002fe0| 64 20 65 78 74 72 61 63 | 74 5f 61 63 74 69 6f 6e |d extrac|t_action|
|00002ff0| 5f 77 6f 72 64 28 63 68 | 61 72 20 2a 73 74 72 2c |_word(ch|ar *str,|
|00003000| 20 63 68 61 72 20 2a 73 | 75 62 5f 73 74 72 2c 20 | char *s|ub_str, |
|00003010| 63 68 61 72 20 2a 64 65 | 73 74 5f 73 74 72 2c 20 |char *de|st_str, |
|00003020| 69 6e 74 20 66 6c 61 67 | 29 0a 20 20 2f 2a 20 3d |int flag|).  /* =|
|00003030| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003040| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003050| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 20 |========|======= |
|00003060| 2a 2f 0a 20 20 7b 0a 20 | 20 09 63 68 61 72 20 2a |*/.  {. | .char *|
|00003070| 70 6f 73 69 74 69 6f 6e | 2c 20 2a 74 61 72 67 65 |position|, *targe|
|00003080| 74 3b 0a 20 20 09 69 6e | 74 20 73 74 61 72 74 70 |t;.  .in|t startp|
|00003090| 6f 73 20 3d 20 30 2c 20 | 73 74 72 69 6e 67 5f 6c |os = 0, |string_l|
|000030a0| 65 6e 67 74 68 20 3d 20 | 30 2c 20 69 20 3d 20 30 |ength = |0, i = 0|
|000030b0| 3b 0a 20 20 09 75 6e 73 | 69 67 6e 65 64 20 20 6e |;.  .uns|igned  n|
|000030c0| 6f 5f 6f 66 5f 63 68 61 | 72 73 20 3d 20 30 3b 0a |o_of_cha|rs = 0;.|
|000030d0| 20 20 0a 21 20 09 2a 64 | 65 73 74 5f 73 74 72 20 |  .! .*d|est_str |
|000030e0| 3d 20 45 4f 53 3b 09 09 | 2f 2a 20 69 6e 69 74 69 |= EOS;..|/* initi|
|000030f0| 61 6c 69 7a 65 20 64 65 | 73 74 5f 73 74 72 20 2a |alize de|st_str *|
|00003100| 2f 0a 20 20 0a 20 20 09 | 73 74 61 72 74 70 6f 73 |/.  .  .|startpos|
|00003110| 20 3d 20 73 74 72 73 65 | 61 72 63 68 20 28 73 74 | = strse|arch (st|
|00003120| 72 2c 20 73 75 62 5f 73 | 74 72 29 3b 0a 21 20 09 |r, sub_s|tr);.! .|
|00003130| 09 09 09 09 2f 2a 20 66 | 69 6e 64 20 70 6f 73 69 |..../* f|ind posi|
|00003140| 74 69 6f 6e 20 6f 66 20 | 73 75 62 2d 73 74 72 69 |tion of |sub-stri|
|00003150| 6e 67 20 0a 21 20 09 09 | 09 09 09 20 20 20 69 6e |ng .! ..|...   in|
|00003160| 20 6d 61 69 6e 20 73 74 | 72 69 6e 67 20 20 20 20 | main st|ring    |
|00003170| 20 20 20 20 20 20 20 20 | 20 2a 2f 0a 20 20 0a 20 |        | */.  . |
|00003180| 20 09 69 66 20 28 20 73 | 74 61 72 74 70 6f 73 20 | .if ( s|tartpos |
|00003190| 21 3d 20 2d 31 20 29 09 | 09 09 09 2f 2a 20 69 66 |!= -1 ).|.../* if|
|000031a0| 20 69 74 20 65 78 69 73 | 74 73 20 2a 2f 0a 20 20 | it exis|ts */.  |
|000031b0| 09 09 74 61 72 67 65 74 | 20 3d 20 26 73 74 72 5b |..target| = &str[|
|000031c0| 73 74 61 72 74 70 6f 73 | 5d 20 2b 20 73 74 72 6c |startpos|] + strl|
|000031d0| 65 6e 20 28 73 75 62 5f | 73 74 72 29 3b 09 0a 2d |en (sub_|str);..-|
|000031e0| 2d 2d 20 38 2c 36 38 20 | 2d 2d 2d 2d 0a 20 20 65 |-- 8,68 |----.  e|
|000031f0| 78 74 65 72 6e 20 69 6e | 74 20 20 20 20 20 20 47 |xtern in|t      G|
|00003200| 5f 6d 61 69 6c 73 69 7a | 65 3b 20 0a 20 20 65 78 |_mailsiz|e; .  ex|
|00003210| 74 65 72 6e 20 73 74 72 | 75 63 74 20 20 20 73 74 |tern str|uct   st|
|00003220| 61 74 20 47 5f 73 74 3b | 0a 20 20 0a 21 20 68 65 |at G_st;|.  .! he|
|00003230| 6c 70 66 69 6c 65 5f 64 | 69 73 70 6c 61 79 20 28 |lpfile_d|isplay (|
|00003240| 66 69 6c 65 6e 61 6d 65 | 29 0a 21 20 63 68 61 72 |filename|).! char|
|00003250| 20 2a 20 66 69 6c 65 6e | 61 6d 65 3b 0a 21 20 0a | * filen|ame;.! .|
|00003260| 20 20 7b 0a 20 20 09 46 | 49 4c 45 20 2a 20 66 70 |  {.  .F|ILE * fp|
|00003270| 3b 0a 20 20 09 63 68 61 | 72 20 72 65 63 6f 72 64 |;.  .cha|r record|
|00003280| 20 5b 44 45 53 43 4c 45 | 4e 5d 3b 0a 20 20 09 69 | [DESCLE|N];.  .i|
|00003290| 66 20 28 28 20 66 70 20 | 3d 20 66 6f 70 65 6e 20 |f (( fp |= fopen |
|000032a0| 28 66 69 6c 65 6e 61 6d | 65 2c 20 22 72 22 29 29 |(filenam|e, "r"))|
|000032b0| 20 3d 3d 20 4e 55 4c 4c | 20 29 20 7b 0a 21 20 09 | == NULL| ) {.! .|
|000032c0| 09 70 72 69 6e 74 66 20 | 28 22 5c 74 4e 6f 20 73 |.printf |("\tNo s|
|000032d0| 75 63 68 20 68 65 6c 70 | 66 69 6c 65 20 61 73 20 |uch help|file as |
|000032e0| 25 73 5c 21 5c 21 5c 6e | 22 2c 20 66 69 6c 65 6e |%s\!\!\n|", filen|
|000032f0| 61 6d 65 29 3b 0a 20 20 | 09 09 72 65 74 75 72 6e |ame);.  |..return|
|00003300| 3b 0a 20 20 09 7d 0a 20 | 20 0a 20 20 09 77 68 69 |;.  .}. | .  .whi|
|00003310| 6c 65 20 28 20 66 67 65 | 74 73 20 28 72 65 63 6f |le ( fge|ts (reco|
|00003320| 72 64 2c 20 73 69 7a 65 | 6f 66 28 72 65 63 6f 72 |rd, size|of(recor|
|00003330| 64 29 2c 20 66 70 29 20 | 29 0a 20 20 09 09 66 70 |d), fp) |).  ..fp|
|00003340| 75 74 73 20 28 72 65 63 | 6f 72 64 2c 20 73 74 64 |uts (rec|ord, std|
|00003350| 6f 75 74 29 3b 0a 21 20 | 09 70 72 69 6e 74 66 20 |out);.! |.printf |
|00003360| 28 22 5c 6e 22 29 3b 0a | 20 20 09 66 63 6c 6f 73 |("\n");.|  .fclos|
|00003370| 65 20 28 66 70 29 3b 0a | 20 20 7d 0a 20 20 0a 20 |e (fp);.|  }.  . |
|00003380| 20 2f 2a 20 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d | /* ====|========|
|00003390| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000033a0| 3d 3d 3d 3d 20 2a 2f 0a | 21 20 63 68 61 72 20 2a |==== */.|! char *|
|000033b0| 0a 21 20 70 72 6f 6d 70 | 74 28 70 29 0a 20 20 2f |.! promp|t(p).  /|
|000033c0| 2a 20 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |* ======|========|
|000033d0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000033e0| 3d 3d 20 2a 2f 0a 2b 20 | 63 68 61 72 20 2a 70 3b |== */.+ |char *p;|
|000033f0| 0a 20 20 7b 0a 20 20 09 | 73 74 61 74 69 63 20 63 |.  {.  .|static c|
|00003400| 68 61 72 20 61 6e 73 5b | 57 4f 52 44 4c 45 4e 5d |har ans[|WORDLEN]|
|00003410| 3b 0a 20 20 09 65 78 74 | 65 72 6e 20 69 6e 74 20 |;.  .ext|ern int |
|00003420| 47 5f 6c 69 6d 69 74 65 | 64 3b 0a 20 20 0a 21 20 |G_limite|d;.  .! |
|00003430| 09 70 72 69 6e 74 66 20 | 28 22 25 73 20 3a 20 22 |.printf |("%s : "|
|00003440| 2c 20 75 66 69 78 28 70 | 29 29 3b 0a 20 20 09 69 |, ufix(p|));.  .i|
|00003450| 66 20 28 21 47 5f 6c 69 | 6d 69 74 65 64 29 20 7b |f (!G_li|mited) {|
|00003460| 0a 21 20 09 09 72 65 61 | 64 5f 69 6e 70 75 74 5f |.! ..rea|d_input_|
|00003470| 6c 69 6e 65 20 28 61 6e | 73 29 3b 0a 21 20 09 09 |line (an|s);.! ..|
|00003480| 72 65 70 6c 61 63 65 5f | 73 74 72 69 6e 67 20 28 |replace_|string (|
|00003490| 61 6e 73 2c 20 48 4f 4d | 45 5f 43 48 41 52 2c 20 |ans, HOM|E_CHAR, |
|000034a0| 67 65 74 65 6e 76 28 26 | 47 5f 68 6f 6d 65 76 61 |getenv(&|G_homeva|
|000034b0| 72 5b 31 5d 29 29 20 3b | 0a 20 20 09 7d 0a 20 20 |r[1])) ;|.  .}.  |
|000034c0| 09 65 6c 73 65 20 7b 0a | 20 20 09 09 73 74 72 63 |.else {.|  ..strc|
|000034d0| 70 79 28 61 6e 73 2c 20 | 22 58 58 58 22 29 3b 0a |py(ans, |"XXX");.|
|000034e0| 21 20 09 09 70 72 69 6e | 74 66 28 22 28 6e 6f 20 |! ..prin|tf("(no |
|000034f0| 69 6e 70 75 74 20 66 6f | 72 20 75 6e 76 61 6c 69 |input fo|r unvali|
|00003500| 64 61 74 65 64 20 75 73 | 65 72 73 29 22 29 3b 0a |dated us|ers)");.|
|00003510| 20 20 09 7d 0a 21 20 09 | 70 72 69 6e 74 66 20 28 |  .}.! .|printf (|
|00003520| 22 5c 6e 22 29 3b 0a 20 | 20 09 72 65 74 75 72 6e |"\n");. | .return|
|00003530| 28 61 6e 73 29 3b 0a 20 | 20 7d 0a 20 20 0a 20 20 |(ans);. | }.  .  |
|00003540| 2f 2a 20 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |/* =====|========|
|00003550| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003560| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003570| 3d 3d 3d 20 2a 2f 0a 21 | 20 65 78 74 72 61 63 74 |=== */.!| extract|
|00003580| 5f 61 63 74 69 6f 6e 5f | 77 6f 72 64 20 28 20 73 |_action_|word ( s|
|00003590| 74 72 2c 20 73 75 62 5f | 73 74 72 2c 20 64 65 73 |tr, sub_|str, des|
|000035a0| 74 5f 73 74 72 2c 20 66 | 6c 61 67 29 0a 20 20 2f |t_str, f|lag).  /|
|000035b0| 2a 20 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |* ======|========|
|000035c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000035d0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000035e0| 3d 3d 20 2a 2f 0a 2b 20 | 63 68 61 72 20 2a 73 74 |== */.+ |char *st|
|000035f0| 72 2c 20 2a 73 75 62 5f | 73 74 72 2c 20 2a 64 65 |r, *sub_|str, *de|
|00003600| 73 74 5f 73 74 72 3b 0a | 2b 20 69 6e 74 20 20 66 |st_str;.|+ int  f|
|00003610| 6c 61 67 3b 0a 2b 20 0a | 20 20 7b 0a 20 20 09 63 |lag;.+ .|  {.  .c|
|00003620| 68 61 72 20 2a 70 6f 73 | 69 74 69 6f 6e 2c 20 2a |har *pos|ition, *|
|00003630| 74 61 72 67 65 74 3b 0a | 20 20 09 69 6e 74 20 73 |target;.|  .int s|
|00003640| 74 61 72 74 70 6f 73 20 | 3d 20 30 2c 20 73 74 72 |tartpos |= 0, str|
|00003650| 69 6e 67 5f 6c 65 6e 67 | 74 68 20 3d 20 30 2c 20 |ing_leng|th = 0, |
|00003660| 69 20 3d 20 30 3b 0a 20 | 20 09 75 6e 73 69 67 6e |i = 0;. | .unsign|
|00003670| 65 64 20 20 6e 6f 5f 6f | 66 5f 63 68 61 72 73 20 |ed  no_o|f_chars |
|00003680| 3d 20 30 3b 0a 20 20 0a | 21 20 09 73 74 72 63 70 |= 0;.  .|! .strcp|
|00003690| 79 20 28 64 65 73 74 5f | 73 74 72 2c 20 4e 55 4c |y (dest_|str, NUL|
|000036a0| 4c 53 54 52 29 3b 09 09 | 2f 2a 20 69 6e 69 74 69 |LSTR);..|/* initi|
|000036b0| 61 6c 69 7a 65 20 64 65 | 73 74 5f 73 74 72 20 2a |alize de|st_str *|
|000036c0| 2f 0a 20 20 0a 20 20 09 | 73 74 61 72 74 70 6f 73 |/.  .  .|startpos|
|000036d0| 20 3d 20 73 74 72 73 65 | 61 72 63 68 20 28 73 74 | = strse|arch (st|
|000036e0| 72 2c 20 73 75 62 5f 73 | 74 72 29 3b 0a 21 20 09 |r, sub_s|tr);.! .|
|000036f0| 09 09 09 09 09 2f 2a 20 | 66 69 6e 64 20 70 6f 73 |...../* |find pos|
|00003700| 69 74 69 6f 6e 20 6f 66 | 20 73 75 62 2d 73 74 72 |ition of| sub-str|
|00003710| 69 6e 67 20 0a 21 20 09 | 09 09 09 09 09 20 20 20 |ing .! .|.....   |
|00003720| 69 6e 20 6d 61 69 6e 20 | 73 74 72 69 6e 67 20 20 |in main |string  |
|00003730| 20 20 20 20 20 20 20 20 | 20 20 20 2a 2f 0a 20 20 |        |   */.  |
|00003740| 0a 20 20 09 69 66 20 28 | 20 73 74 61 72 74 70 6f |.  .if (| startpo|
|00003750| 73 20 21 3d 20 2d 31 20 | 29 09 09 09 09 2f 2a 20 |s != -1 |)..../* |
|00003760| 69 66 20 69 74 20 65 78 | 69 73 74 73 20 2a 2f 0a |if it ex|ists */.|
|00003770| 20 20 09 09 74 61 72 67 | 65 74 20 3d 20 26 73 74 |  ..targ|et = &st|
|00003780| 72 5b 73 74 61 72 74 70 | 6f 73 5d 20 2b 20 73 74 |r[startp|os] + st|
|00003790| 72 6c 65 6e 20 28 73 75 | 62 5f 73 74 72 29 3b 09 |rlen (su|b_str);.|
|000037a0| 0a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.*******|********|
|000037b0| 0a 2a 2a 2a 20 37 32 2c | 37 38 20 2a 2a 2a 2a 0a |.*** 72,|78 ****.|
|000037c0| 20 20 0a 20 20 09 66 6f | 72 20 28 70 6f 73 69 74 |  .  .fo|r (posit|
|000037d0| 69 6f 6e 20 3d 20 74 61 | 72 67 65 74 3b 20 09 09 |ion = ta|rget; ..|
|000037e0| 2f 2a 20 61 63 74 75 61 | 6c 20 76 61 6c 75 65 20 |/* actua|l value |
|000037f0| 6f 66 20 70 61 72 61 6d | 65 74 65 72 20 2a 2f 0a |of param|eter */.|
|00003800| 20 20 09 20 20 20 20 28 | 2a 70 6f 73 69 74 69 6f |  .    (|*positio|
|00003810| 6e 20 21 3d 20 42 4c 41 | 4e 4b 29 20 26 26 20 28 |n != BLA|NK) && (|
|00003820| 2a 70 6f 73 69 74 69 6f | 6e 20 21 3d 20 45 4f 53 |*positio|n != EOS|
|00003830| 29 3b 0a 21 20 09 20 20 | 20 20 20 2b 2b 70 6f 73 |);.! .  |   ++pos|
|00003840| 69 74 69 6f 6e 2c 20 2b | 2b 6e 6f 5f 6f 66 5f 63 |ition, +|+no_of_c|
|00003850| 68 61 72 73 29 20 3b 0a | 20 20 0a 20 20 09 73 74 |hars) ;.|  .  .st|
|00003860| 72 6e 63 70 79 20 28 64 | 65 73 74 5f 73 74 72 2c |rncpy (d|est_str,|
|00003870| 20 74 61 72 67 65 74 2c | 20 6e 6f 5f 6f 66 5f 63 | target,| no_of_c|
|00003880| 68 61 72 73 29 3b 20 20 | 2f 2a 20 63 6f 70 79 20 |hars);  |/* copy |
|00003890| 74 68 65 20 72 65 71 75 | 69 72 65 64 20 76 61 6c |the requ|ired val|
|000038a0| 75 65 20 2a 2f 0a 20 20 | 09 64 65 73 74 5f 73 74 |ue */.  |.dest_st|
|000038b0| 72 5b 6e 6f 5f 6f 66 5f | 63 68 61 72 73 5d 20 3d |r[no_of_|chars] =|
|000038c0| 20 45 4f 53 3b 0a 2d 2d | 2d 20 37 32 2c 37 38 20 | EOS;.--|- 72,78 |
|000038d0| 2d 2d 2d 2d 0a 20 20 0a | 20 20 09 66 6f 72 20 28 |----.  .|  .for (|
|000038e0| 70 6f 73 69 74 69 6f 6e | 20 3d 20 74 61 72 67 65 |position| = targe|
|000038f0| 74 3b 20 09 09 2f 2a 20 | 61 63 74 75 61 6c 20 76 |t; ../* |actual v|
|00003900| 61 6c 75 65 20 6f 66 20 | 70 61 72 61 6d 65 74 65 |alue of |paramete|
|00003910| 72 20 2a 2f 0a 20 20 09 | 20 20 20 20 28 2a 70 6f |r */.  .|    (*po|
|00003920| 73 69 74 69 6f 6e 20 21 | 3d 20 42 4c 41 4e 4b 29 |sition !|= BLANK)|
|00003930| 20 26 26 20 28 2a 70 6f | 73 69 74 69 6f 6e 20 21 | && (*po|sition !|
|00003940| 3d 20 45 4f 53 29 3b 0a | 21 20 09 20 20 20 20 20 |= EOS);.|! .     |
|00003950| 2b 2b 70 6f 73 69 74 69 | 6f 6e 2c 20 2b 2b 6e 6f |++positi|on, ++no|
|00003960| 5f 6f 66 5f 63 68 61 72 | 73 29 3b 0a 20 20 0a 20 |_of_char|s);.  . |
|00003970| 20 09 73 74 72 6e 63 70 | 79 20 28 64 65 73 74 5f | .strncp|y (dest_|
|00003980| 73 74 72 2c 20 74 61 72 | 67 65 74 2c 20 6e 6f 5f |str, tar|get, no_|
|00003990| 6f 66 5f 63 68 61 72 73 | 29 3b 20 20 2f 2a 20 63 |of_chars|);  /* c|
|000039a0| 6f 70 79 20 74 68 65 20 | 72 65 71 75 69 72 65 64 |opy the |required|
|000039b0| 20 76 61 6c 75 65 20 2a | 2f 0a 20 20 09 64 65 73 | value *|/.  .des|
|000039c0| 74 5f 73 74 72 5b 6e 6f | 5f 6f 66 5f 63 68 61 72 |t_str[no|_of_char|
|000039d0| 73 5d 20 3d 20 45 4f 53 | 3b 0a 2a 2a 2a 2a 2a 2a |s] = EOS|;.******|
|000039e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 0a 2a 2a 2a 20 39 31 |********|*.*** 91|
|000039f0| 2c 31 30 33 20 2a 2a 2a | 2a 0a 20 20 7d 0a 20 20 |,103 ***|*.  }.  |
|00003a00| 0a 20 20 2f 2a 20 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |.  /* ==|========|
|00003a10| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 20 2a 2f 0a 21 |========|=== */.!|
|00003a20| 20 69 6e 74 20 64 69 73 | 70 6c 61 79 5f 6d 65 6e | int dis|play_men|
|00003a30| 75 28 63 68 61 72 20 2a | 6d 65 6e 75 5f 6e 61 6d |u(char *|menu_nam|
|00003a40| 65 2c 20 63 68 61 72 20 | 2a 6d 65 6e 75 5f 61 72 |e, char |*menu_ar|
|00003a50| 72 61 79 5b 5d 2c 0a 21 | 20 09 09 09 69 6e 74 20 |ray[],.!| ...int |
|00003a60| 2a 6d 65 6e 75 5f 66 6c | 61 67 2c 20 69 6e 74 20 |*menu_fl|ag, int |
|00003a70| 2a 69 64 78 29 0a 20 20 | 2f 2a 20 3d 3d 3d 3d 3d |*idx).  |/* =====|
|00003a80| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003a90| 20 2a 2f 0a 20 20 7b 0a | 20 20 09 46 49 4c 45 20 | */.  {.|  .FILE |
|00003aa0| 2a 20 66 70 3b 0a 20 20 | 09 63 68 61 72 20 6a 75 |* fp;.  |.char ju|
|00003ab0| 6e 6b 5b 43 4f 4c 55 4d | 4e 53 5d 20 2c 20 6b 65 |nk[COLUM|NS] , ke|
|00003ac0| 79 77 6f 72 64 5b 44 45 | 53 43 4c 45 4e 5d 2c 20 |yword[DE|SCLEN], |
|00003ad0| 64 65 73 63 72 69 70 74 | 69 6f 6e 5b 44 45 53 43 |descript|ion[DESC|
|00003ae0| 4c 45 4e 5d 2c 0a 21 20 | 09 09 61 63 74 69 6f 6e |LEN],.! |..action|
|00003af0| 5f 64 65 73 63 72 69 70 | 74 69 6f 6e 5b 44 45 53 |_descrip|tion[DES|
|00003b00| 43 4c 45 4e 5d 2c 20 2a | 66 67 65 74 73 28 29 2c |CLEN], *|fgets(),|
|00003b10| 20 2a 69 6e 64 65 78 28 | 29 3b 0a 20 20 09 72 65 | *index(|);.  .re|
|00003b20| 67 69 73 74 65 72 20 69 | 6e 74 20 69 3b 0a 20 20 |gister i|nt i;.  |
|00003b30| 09 69 6e 74 20 64 65 6c | 61 79 3b 0a 20 20 0a 2d |.int del|ay;.  .-|
|00003b40| 2d 2d 20 39 31 2c 31 30 | 37 20 2d 2d 2d 2d 0a 20 |-- 91,10|7 ----. |
|00003b50| 20 7d 0a 20 20 0a 20 20 | 2f 2a 20 3d 3d 3d 3d 3d | }.  .  |/* =====|
|00003b60| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003b70| 20 2a 2f 0a 21 20 64 69 | 73 70 6c 61 79 5f 6d 65 | */.! di|splay_me|
|00003b80| 6e 75 20 28 6d 65 6e 75 | 5f 6e 61 6d 65 2c 20 6d |nu (menu|_name, m|
|00003b90| 65 6e 75 5f 61 72 72 61 | 79 2c 20 6d 65 6e 75 5f |enu_arra|y, menu_|
|00003ba0| 66 6c 61 67 2c 20 69 64 | 78 29 0a 20 20 2f 2a 20 |flag, id|x).  /* |
|00003bb0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00003bc0| 3d 3d 3d 3d 3d 20 2a 2f | 0a 2b 20 63 68 61 72 20 |===== */|.+ char |
|00003bd0| 2a 20 6d 65 6e 75 5f 6e | 61 6d 65 3b 0a 2b 20 63 |* menu_n|ame;.+ c|
|00003be0| 68 61 72 20 2a 20 6d 65 | 6e 75 5f 61 72 72 61 79 |har * me|nu_array|
|00003bf0| 20 5b 5d 3b 0a 2b 20 69 | 6e 74 20 20 2a 20 6d 65 | [];.+ i|nt  * me|
|00003c00| 6e 75 5f 66 6c 61 67 3b | 0a 2b 20 69 6e 74 20 20 |nu_flag;|.+ int  |
|00003c10| 2a 20 69 64 78 3b 0a 2b | 20 0a 20 20 7b 0a 20 20 |* idx;.+| .  {.  |
|00003c20| 09 46 49 4c 45 20 2a 20 | 66 70 3b 0a 20 20 09 63 |.FILE * |fp;.  .c|
|00003c30| 68 61 72 20 6a 75 6e 6b | 5b 43 4f 4c 55 4d 4e 53 |har junk|[COLUMNS|
|00003c40| 5d 20 2c 20 6b 65 79 77 | 6f 72 64 5b 44 45 53 43 |] , keyw|ord[DESC|
|00003c50| 4c 45 4e 5d 2c 20 64 65 | 73 63 72 69 70 74 69 6f |LEN], de|scriptio|
|00003c60| 6e 5b 44 45 53 43 4c 45 | 4e 5d 2c 0a 21 20 09 09 |n[DESCLE|N],.! ..|
|00003c70| 61 63 74 69 6f 6e 5f 64 | 65 73 63 72 69 70 74 69 |action_d|escripti|
|00003c80| 6f 6e 5b 44 45 53 43 4c | 45 4e 5d 2c 20 2a 73 74 |on[DESCL|EN], *st|
|00003c90| 72 73 61 76 65 28 29 2c | 20 2a 66 67 65 74 73 28 |rsave(),| *fgets(|
|00003ca0| 29 2c 20 2a 69 6e 64 65 | 78 28 29 3b 0a 20 20 09 |), *inde|x();.  .|
|00003cb0| 72 65 67 69 73 74 65 72 | 20 69 6e 74 20 69 3b 0a |register| int i;.|
|00003cc0| 20 20 09 69 6e 74 20 64 | 65 6c 61 79 3b 0a 20 20 |  .int d|elay;.  |
|00003cd0| 0a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.*******|********|
|00003ce0| 0a 2a 2a 2a 20 31 30 34 | 2c 31 32 30 20 2a 2a 2a |.*** 104|,120 ***|
|00003cf0| 2a 0a 20 20 09 69 66 20 | 28 21 6d 6f 72 65 69 6e |*.  .if |(!morein|
|00003d00| 70 75 74 28 29 29 0a 20 | 20 09 09 63 6c 65 61 72 |put()). | ..clear|
|00003d10| 5f 73 63 72 65 65 6e 28 | 29 3b 0a 20 20 0a 21 20 |_screen(|);.  .! |
|00003d20| 09 63 68 65 63 6b 5f 66 | 6f 72 5f 6e 65 77 5f 6d |.check_f|or_new_m|
|00003d30| 61 69 6c 28 47 5f 6d 61 | 69 6c 5f 6d 65 73 73 61 |ail(G_ma|il_messa|
|00003d40| 67 65 29 3b 0a 20 20 0a | 21 20 09 69 66 20 28 2a |ge);.  .|! .if (*|
|00003d50| 6d 65 6e 75 5f 66 6c 61 | 67 20 3d 3d 20 46 41 4c |menu_fla|g == FAL|
|00003d60| 53 45 29 20 7b 0a 20 20 | 09 09 2a 6d 65 6e 75 5f |SE) {.  |..*menu_|
|00003d70| 66 6c 61 67 20 3d 20 54 | 52 55 45 3b 0a 20 20 09 |flag = T|RUE;.  .|
|00003d80| 09 69 66 20 28 69 6e 64 | 65 78 28 6d 65 6e 75 5f |.if (ind|ex(menu_|
|00003d90| 6e 61 6d 65 2c 20 27 2f | 27 29 29 0a 20 20 09 09 |name, '/|')).  ..|
|00003da0| 09 73 74 72 63 70 79 28 | 6a 75 6e 6b 2c 20 6d 65 |.strcpy(|junk, me|
|00003db0| 6e 75 5f 6e 61 6d 65 29 | 3b 0a 20 20 09 09 65 6c |nu_name)|;.  ..el|
|00003dc0| 73 65 0a 20 20 09 09 09 | 73 70 72 69 6e 74 66 28 |se.  ...|sprintf(|
|00003dd0| 6a 75 6e 6b 2c 20 22 25 | 73 2f 25 73 25 73 22 2c |junk, "%|s/%s%s",|
|00003de0| 20 4d 45 4e 55 44 49 52 | 2c 20 6d 65 6e 75 5f 6e | MENUDIR|, menu_n|
|00003df0| 61 6d 65 2c 20 53 55 46 | 46 49 58 29 3b 0a 21 20 |ame, SUF|FIX);.! |
|00003e00| 09 09 69 66 20 28 28 66 | 70 20 3d 20 66 6f 70 65 |..if ((f|p = fope|
|00003e10| 6e 28 6a 75 6e 6b 2c 20 | 22 72 22 29 29 20 3d 3d |n(junk, |"r")) ==|
|00003e20| 20 4e 55 4c 4c 29 20 7b | 0a 21 20 09 09 09 70 72 | NULL) {|.! ...pr|
|00003e30| 69 6e 74 77 28 22 5c 74 | 4e 6f 20 73 75 63 68 20 |intw("\t|No such |
|00003e40| 6d 65 6e 75 20 61 73 20 | 25 73 21 21 21 5c 6e 22 |menu as |%s!!!\n"|
|00003e50| 2c 20 6a 75 6e 6b 29 3b | 0a 21 20 09 09 09 72 65 |, junk);|.! ...re|
|00003e60| 66 72 65 73 68 28 29 3b | 0a 20 20 09 09 09 72 65 |fresh();|.  ...re|
|00003e70| 74 75 72 6e 28 30 29 3b | 0a 20 20 09 09 7d 0a 20 |turn(0);|.  ..}. |
|00003e80| 20 0a 2d 2d 2d 20 31 30 | 38 2c 31 32 33 20 2d 2d | .--- 10|8,123 --|
|00003e90| 2d 2d 0a 20 20 09 69 66 | 20 28 21 6d 6f 72 65 69 |--.  .if| (!morei|
|00003ea0| 6e 70 75 74 28 29 29 0a | 20 20 09 09 63 6c 65 61 |nput()).|  ..clea|
|00003eb0| 72 5f 73 63 72 65 65 6e | 28 29 3b 0a 20 20 0a 21 |r_screen|();.  .!|
|00003ec0| 20 09 63 68 65 63 6b 5f | 66 6f 72 5f 6e 65 77 5f | .check_|for_new_|
|00003ed0| 6d 61 69 6c 20 28 47 5f | 6d 61 69 6c 5f 6d 65 73 |mail (G_|mail_mes|
|00003ee0| 73 61 67 65 29 3b 0a 20 | 20 0a 21 20 09 69 66 20 |sage);. | .! .if |
|00003ef0| 28 20 2a 6d 65 6e 75 5f | 66 6c 61 67 20 3d 3d 20 |( *menu_|flag == |
|00003f00| 46 41 4c 53 45 20 29 20 | 7b 0a 20 20 09 09 2a 6d |FALSE ) |{.  ..*m|
|00003f10| 65 6e 75 5f 66 6c 61 67 | 20 3d 20 54 52 55 45 3b |enu_flag| = TRUE;|
|00003f20| 0a 20 20 09 09 69 66 20 | 28 69 6e 64 65 78 28 6d |.  ..if |(index(m|
|00003f30| 65 6e 75 5f 6e 61 6d 65 | 2c 20 27 2f 27 29 29 0a |enu_name|, '/')).|
|00003f40| 20 20 09 09 09 73 74 72 | 63 70 79 28 6a 75 6e 6b |  ...str|cpy(junk|
|00003f50| 2c 20 6d 65 6e 75 5f 6e | 61 6d 65 29 3b 0a 20 20 |, menu_n|ame);.  |
|00003f60| 09 09 65 6c 73 65 0a 20 | 20 09 09 09 73 70 72 69 |..else. | ...spri|
|00003f70| 6e 74 66 28 6a 75 6e 6b | 2c 20 22 25 73 2f 25 73 |ntf(junk|, "%s/%s|
|00003f80| 25 73 22 2c 20 4d 45 4e | 55 44 49 52 2c 20 6d 65 |%s", MEN|UDIR, me|
|00003f90| 6e 75 5f 6e 61 6d 65 2c | 20 53 55 46 46 49 58 29 |nu_name,| SUFFIX)|
|00003fa0| 3b 0a 21 20 09 09 69 66 | 20 28 28 20 66 70 20 3d |;.! ..if| (( fp =|
|00003fb0| 20 66 6f 70 65 6e 20 28 | 6a 75 6e 6b 2c 20 22 72 | fopen (|junk, "r|
|00003fc0| 22 29 29 20 3d 3d 20 4e | 55 4c 4c 20 29 20 7b 0a |")) == N|ULL ) {.|
|00003fd0| 21 20 09 09 09 70 72 69 | 6e 74 66 20 28 22 5c 74 |! ...pri|ntf ("\t|
|00003fe0| 4e 6f 20 73 75 63 68 20 | 6d 65 6e 75 20 61 73 20 |No such |menu as |
|00003ff0| 25 73 21 21 5c 6e 22 2c | 20 6a 75 6e 6b 29 3b 0a |%s!!\n",| junk);.|
|00004000| 20 20 09 09 09 72 65 74 | 75 72 6e 28 30 29 3b 0a |  ...ret|urn(0);.|
|00004010| 20 20 09 09 7d 0a 20 20 | 0a 2a 2a 2a 2a 2a 2a 2a |  ..}.  |.*******|
|00004020| 2a 2a 2a 2a 2a 2a 2a 2a | 0a 2a 2a 2a 20 31 32 34 |********|.*** 124|
|00004030| 2c 31 33 33 20 2a 2a 2a | 2a 0a 20 20 09 09 09 28 |,133 ***|*.  ...(|
|00004040| 6d 65 6e 75 5f 61 72 72 | 61 79 5b 69 5d 20 3d 20 |menu_arr|ay[i] = |
|00004050| 73 74 72 73 61 76 65 28 | 66 67 65 74 73 28 6a 75 |strsave(|fgets(ju|
|00004060| 6e 6b 2c 20 43 4f 4c 55 | 4d 4e 53 2c 20 66 70 29 |nk, COLU|MNS, fp)|
|00004070| 29 29 3b 0a 20 20 09 09 | 20 20 20 20 20 20 69 2b |));.  ..|      i+|
|00004080| 2b 0a 20 20 09 09 20 20 | 20 20 29 0a 21 20 09 09 |+.  ..  |  ).! ..|
|00004090| 7b 0a 21 20 09 09 09 69 | 66 20 28 20 73 74 72 63 |{.! ...i|f ( strc|
|000040a0| 6d 70 28 6d 65 6e 75 5f | 61 72 72 61 79 5b 69 5d |mp(menu_|array[i]|
|000040b0| 2c 20 44 45 4c 49 4d 5f | 4c 49 4e 45 29 20 3d 3d |, DELIM_|LINE) ==|
|000040c0| 20 30 20 29 0a 20 20 09 | 09 09 09 2a 69 64 78 20 | 0 ).  .|...*idx |
|000040d0| 3d 20 69 3b 0a 2d 20 09 | 09 7d 0a 20 20 09 09 0a |= i;.- .|.}.  ...|
|000040e0| 20 20 09 09 66 63 6c 6f | 73 65 20 28 66 70 29 3b |  ..fclo|se (fp);|
|000040f0| 0a 20 20 0a 2d 2d 2d 20 | 31 32 37 2c 31 33 34 20 |.  .--- |127,134 |
|00004100| 2d 2d 2d 2d 0a 20 20 09 | 09 09 28 6d 65 6e 75 5f |----.  .|..(menu_|
|00004110| 61 72 72 61 79 5b 69 5d | 20 3d 20 73 74 72 73 61 |array[i]| = strsa|
|00004120| 76 65 28 66 67 65 74 73 | 28 6a 75 6e 6b 2c 20 43 |ve(fgets|(junk, C|
|00004130| 4f 4c 55 4d 4e 53 2c 20 | 66 70 29 29 29 3b 0a 20 |OLUMNS, |fp)));. |
|00004140| 20 09 09 20 20 20 20 20 | 20 69 2b 2b 0a 20 20 09 | ..     | i++.  .|
|00004150| 09 20 20 20 20 29 0a 21 | 20 09 09 09 69 66 20 28 |.    ).!| ...if (|
|00004160| 20 73 74 72 63 6d 70 20 | 28 6d 65 6e 75 5f 61 72 | strcmp |(menu_ar|
|00004170| 72 61 79 5b 69 5d 2c 20 | 44 45 4c 49 4d 5f 4c 49 |ray[i], |DELIM_LI|
|00004180| 4e 45 29 20 3d 3d 20 30 | 20 29 0a 20 20 09 09 09 |NE) == 0| ).  ...|
|00004190| 09 2a 69 64 78 20 3d 20 | 69 3b 0a 20 20 09 09 0a |.*idx = |i;.  ...|
|000041a0| 20 20 09 09 66 63 6c 6f | 73 65 20 28 66 70 29 3b |  ..fclo|se (fp);|
|000041b0| 0a 20 20 0a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.  .****|********|
|000041c0| 2a 2a 2a 0a 2a 2a 2a 20 | 31 33 38 2c 31 34 34 20 |***.*** |138,144 |
|000041d0| 2a 2a 2a 2a 0a 20 20 09 | 69 66 20 28 73 74 72 63 |****.  .|if (strc|
|000041e0| 6d 70 28 47 5f 6d 61 69 | 6c 5f 6d 65 73 73 61 67 |mp(G_mai|l_messag|
|000041f0| 65 2c 20 22 22 29 20 21 | 3d 20 30 29 20 7b 0a 20 |e, "") !|= 0) {. |
|00004200| 20 09 09 6a 75 6e 6b 5b | 30 5d 20 3d 20 45 4f 53 | ..junk[|0] = EOS|
|00004210| 3b 0a 20 20 09 09 73 73 | 63 61 6e 66 28 6d 65 6e |;.  ..ss|canf(men|
|00004220| 75 5f 61 72 72 61 79 5b | 30 5d 2c 20 22 25 5b 5e |u_array[|0], "%[^|
|00004230| 5c 6e 5d 22 2c 20 6a 75 | 6e 6b 29 3b 0a 21 20 09 |\n]", ju|nk);.! .|
|00004240| 09 70 72 69 6e 74 77 28 | 22 25 73 25 73 5c 6e 22 |.printw(|"%s%s\n"|
|00004250| 2c 20 6a 75 6e 6b 2c 20 | 47 5f 6d 61 69 6c 5f 6d |, junk, |G_mail_m|
|00004260| 65 73 73 61 67 65 29 3b | 0a 20 20 09 09 69 20 3d |essage);|.  ..i =|
|00004270| 20 31 3b 0a 20 20 09 7d | 0a 20 20 09 65 6c 73 65 | 1;.  .}|.  .else|
|00004280| 0a 2d 2d 2d 20 31 33 39 | 2c 31 34 35 20 2d 2d 2d |.--- 139|,145 ---|
|00004290| 2d 0a 20 20 09 69 66 20 | 28 73 74 72 63 6d 70 28 |-.  .if |(strcmp(|
|000042a0| 47 5f 6d 61 69 6c 5f 6d | 65 73 73 61 67 65 2c 20 |G_mail_m|essage, |
|000042b0| 22 22 29 20 21 3d 20 30 | 29 20 7b 0a 20 20 09 09 |"") != 0|) {.  ..|
|000042c0| 6a 75 6e 6b 5b 30 5d 20 | 3d 20 45 4f 53 3b 0a 20 |junk[0] |= EOS;. |
|000042d0| 20 09 09 73 73 63 61 6e | 66 28 6d 65 6e 75 5f 61 | ..sscan|f(menu_a|
|000042e0| 72 72 61 79 5b 30 5d 2c | 20 22 25 5b 5e 5c 6e 5d |rray[0],| "%[^\n]|
|000042f0| 22 2c 20 6a 75 6e 6b 29 | 3b 0a 21 20 09 09 70 72 |", junk)|;.! ..pr|
|00004300| 69 6e 74 66 28 22 25 73 | 25 73 5c 6e 22 2c 20 6a |intf("%s|%s\n", j|
|00004310| 75 6e 6b 2c 20 47 5f 6d | 61 69 6c 5f 6d 65 73 73 |unk, G_m|ail_mess|
|00004320| 61 67 65 29 3b 0a 20 20 | 09 09 69 20 3d 20 31 3b |age);.  |..i = 1;|
|00004330| 0a 20 20 09 7d 0a 20 20 | 09 65 6c 73 65 0a 2a 2a |.  .}.  |.else.**|
|00004340| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 0a 2a 2a |********|*****.**|
|00004350| 2a 20 31 34 36 2c 31 35 | 35 20 2a 2a 2a 2a 0a 20 |* 146,15|5 ****. |
|00004360| 20 0a 20 20 09 69 66 20 | 28 21 6d 6f 72 65 69 6e | .  .if |(!morein|
|00004370| 70 75 74 28 29 29 0a 20 | 20 09 09 66 6f 72 20 28 |put()). | ..for (|
|00004380| 3b 20 69 20 3c 20 2a 69 | 64 78 3b 20 69 2b 2b 29 |; i < *i|dx; i++)|
|00004390| 0a 21 20 09 09 09 70 72 | 69 6e 74 77 28 22 25 73 |.! ...pr|intw("%s|
|000043a0| 22 2c 20 6d 65 6e 75 5f | 61 72 72 61 79 5b 69 5d |", menu_|array[i]|
|000043b0| 29 3b 0a 21 20 09 61 64 | 64 63 68 28 27 5c 6e 27 |);.! .ad|dch('\n'|
|000043c0| 29 3b 0a 21 20 09 72 65 | 66 72 65 73 68 28 29 3b |);.! .re|fresh();|
|000043d0| 0a 20 20 0a 20 20 09 72 | 65 74 75 72 6e 28 31 29 |.  .  .r|eturn(1)|
|000043e0| 3b 0a 20 20 7d 0a 20 20 | 0a 2d 2d 2d 20 31 34 37 |;.  }.  |.--- 147|
|000043f0| 2c 31 35 35 20 2d 2d 2d | 2d 0a 20 20 0a 20 20 09 |,155 ---|-.  .  .|
|00004400| 69 66 20 28 21 6d 6f 72 | 65 69 6e 70 75 74 28 29 |if (!mor|einput()|
|00004410| 29 0a 20 20 09 09 66 6f | 72 20 28 3b 20 69 20 3c |).  ..fo|r (; i <|
|00004420| 20 2a 69 64 78 3b 20 69 | 2b 2b 29 0a 21 20 09 09 | *idx; i|++).! ..|
|00004430| 09 66 70 75 74 73 28 6d | 65 6e 75 5f 61 72 72 61 |.fputs(m|enu_arra|
|00004440| 79 5b 69 5d 2c 20 73 74 | 64 6f 75 74 29 3b 0a 20 |y[i], st|dout);. |
|00004450| 20 0a 2b 20 09 70 72 69 | 6e 74 66 20 28 22 5c 6e | .+ .pri|ntf ("\n|
|00004460| 22 29 3b 0a 20 20 09 72 | 65 74 75 72 6e 28 31 29 |");.  .r|eturn(1)|
|00004470| 3b 0a 20 20 7d 0a 20 20 | 0a 2a 2a 2a 2a 2a 2a 2a |;.  }.  |.*******|
|00004480| 2a 2a 2a 2a 2a 2a 2a 2a | 0a 2a 2a 2a 20 31 35 36 |********|.*** 156|
|00004490| 2c 31 36 36 20 2a 2a 2a | 2a 0a 20 20 2f 2a 20 66 |,166 ***|*.  /* f|
|000044a0| 69 6e 64 20 74 68 65 20 | 68 6f 6d 65 20 64 69 72 |ind the |home dir|
|000044b0| 65 63 74 6f 72 79 20 6f | 66 20 74 68 65 20 70 65 |ectory o|f the pe|
|000044c0| 72 73 6f 6e 20 69 6e 76 | 6f 6b 69 6e 67 20 4d 5f |rson inv|oking M_|
|000044d0| 53 68 65 6c 6c 20 2a 2f | 0a 20 20 2f 2a 20 3d 3d |Shell */|.  /* ==|
|000044e0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000044f0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004500| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004510| 3d 3d 3d 3d 20 2a 2f 0a | 20 20 0a 21 20 76 6f 69 |==== */.|  .! voi|
|00004520| 64 20 66 69 6e 64 5f 75 | 73 65 72 5f 64 65 74 61 |d find_u|ser_deta|
|00004530| 69 6c 73 20 28 63 68 61 | 72 20 2a 68 6f 6d 65 5f |ils (cha|r *home_|
|00004540| 64 69 72 2c 20 63 68 61 | 72 20 2a 75 73 65 72 5f |dir, cha|r *user_|
|00004550| 6e 61 6d 65 29 0a 20 20 | 7b 0a 20 20 09 73 74 72 |name).  |{.  .str|
|00004560| 75 63 74 20 70 61 73 73 | 77 64 20 2a 70 77 2c 20 |uct pass|wd *pw, |
|00004570| 2a 67 65 74 70 77 75 69 | 64 28 29 3b 0a 20 20 0a |*getpwui|d();.  .|
|00004580| 21 20 09 70 77 20 3d 20 | 67 65 74 70 77 75 69 64 |! .pw = |getpwuid|
|00004590| 20 28 67 65 74 75 69 64 | 28 29 29 3b 0a 20 20 0a | (getuid|());.  .|
|000045a0| 20 20 20 09 73 74 72 63 | 70 79 20 28 68 6f 6d 65 |   .strc|py (home|
|000045b0| 5f 64 69 72 2c 20 70 77 | 2d 3e 70 77 5f 64 69 72 |_dir, pw|->pw_dir|
|000045c0| 29 3b 0a 20 20 09 73 74 | 72 63 70 79 20 28 75 73 |);.  .st|rcpy (us|
|000045d0| 65 72 5f 6e 61 6d 65 2c | 20 70 77 2d 3e 70 77 5f |er_name,| pw->pw_|
|000045e0| 6e 61 6d 65 29 3b 0a 2d | 2d 2d 20 31 35 36 2c 31 |name);.-|-- 156,1|
|000045f0| 36 38 20 2d 2d 2d 2d 0a | 20 20 2f 2a 20 66 69 6e |68 ----.|  /* fin|
|00004600| 64 20 74 68 65 20 68 6f | 6d 65 20 64 69 72 65 63 |d the ho|me direc|
|00004610| 74 6f 72 79 20 6f 66 20 | 74 68 65 20 70 65 72 73 |tory of |the pers|
|00004620| 6f 6e 20 69 6e 76 6f 6b | 69 6e 67 20 4d 5f 53 68 |on invok|ing M_Sh|
|00004630| 65 6c 6c 20 2a 2f 0a 20 | 20 2f 2a 20 3d 3d 3d 3d |ell */. | /* ====|
|00004640| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004650| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004660| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004670| 3d 3d 20 2a 2f 0a 20 20 | 0a 21 20 66 69 6e 64 5f |== */.  |.! find_|
|00004680| 75 73 65 72 5f 64 65 74 | 61 69 6c 73 20 28 68 6f |user_det|ails (ho|
|00004690| 6d 65 5f 64 69 72 2c 20 | 75 73 65 72 5f 6e 61 6d |me_dir, |user_nam|
|000046a0| 65 29 0a 21 20 63 68 61 | 72 20 2a 20 68 6f 6d 65 |e).! cha|r * home|
|000046b0| 5f 64 69 72 3b 0a 21 20 | 63 68 61 72 20 2a 20 75 |_dir;.! |char * u|
|000046c0| 73 65 72 5f 6e 61 6d 65 | 3b 0a 20 20 7b 0a 20 20 |ser_name|;.  {.  |
|000046d0| 09 73 74 72 75 63 74 20 | 70 61 73 73 77 64 20 2a |.struct |passwd *|
|000046e0| 70 77 2c 20 2a 67 65 74 | 70 77 75 69 64 28 29 3b |pw, *get|pwuid();|
|000046f0| 0a 20 20 0a 21 20 09 70 | 77 20 3d 20 67 65 74 70 |.  .! .p|w = getp|
|00004700| 77 75 69 64 20 28 67 65 | 74 75 69 64 20 28 29 29 |wuid (ge|tuid ())|
|00004710| 3b 0a 20 20 0a 20 20 20 | 09 73 74 72 63 70 79 20 |;.  .   |.strcpy |
|00004720| 28 68 6f 6d 65 5f 64 69 | 72 2c 20 70 77 2d 3e 70 |(home_di|r, pw->p|
|00004730| 77 5f 64 69 72 29 3b 0a | 20 20 09 73 74 72 63 70 |w_dir);.|  .strcp|
|00004740| 79 20 28 75 73 65 72 5f | 6e 61 6d 65 2c 20 70 77 |y (user_|name, pw|
|00004750| 2d 3e 70 77 5f 6e 61 6d | 65 29 3b 0a 2a 2a 2a 2a |->pw_nam|e);.****|
|00004760| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 0a 2a 2a 2a 20 |********|***.*** |
|00004770| 31 36 37 2c 31 37 35 20 | 2a 2a 2a 2a 0a 20 20 7d |167,175 |****.  }|
|00004780| 0a 20 20 0a 20 20 2f 2a | 20 3d 3d 3d 3d 3d 3d 3d |.  .  /*| =======|
|00004790| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000047a0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000047b0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 20 |========|======= |
|000047c0| 2a 2f 0a 21 20 76 6f 69 | 64 20 73 65 61 72 63 68 |*/.! voi|d search|
|000047d0| 5f 6d 65 6e 75 5f 61 72 | 72 61 79 20 28 63 68 61 |_menu_ar|ray (cha|
|000047e0| 72 20 2a 6d 65 6e 75 5f | 61 72 72 61 79 5b 5d 2c |r *menu_|array[],|
|000047f0| 20 69 6e 74 20 69 6e 64 | 2c 0a 21 20 09 09 09 63 | int ind|,.! ...c|
|00004800| 68 61 72 20 2a 6f 70 74 | 69 6f 6e 2c 20 63 68 61 |har *opt|ion, cha|
|00004810| 72 20 2a 73 74 72 69 6e | 67 2c 20 69 6e 74 20 2a |r *strin|g, int *|
|00004820| 69 6e 76 61 6c 69 64 29 | 0a 20 20 2f 2a 20 3d 3d |invalid)|.  /* ==|
|00004830| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004840| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004850| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004860| 3d 3d 3d 3d 20 2a 2f 0a | 20 20 7b 0a 20 20 09 69 |==== */.|  {.  .i|
|00004870| 6e 74 20 69 3b 0a 20 20 | 09 63 68 61 72 20 6b 65 |nt i;.  |.char ke|
|00004880| 79 77 6f 72 64 20 5b 57 | 4f 52 44 4c 45 4e 5d 3b |yword [W|ORDLEN];|
|00004890| 0a 2d 2d 2d 20 31 36 39 | 2c 31 38 31 20 2d 2d 2d |.--- 169|,181 ---|
|000048a0| 2d 0a 20 20 7d 0a 20 20 | 0a 20 20 2f 2a 20 3d 3d |-.  }.  |.  /* ==|
|000048b0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000048c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000048d0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000048e0| 3d 3d 3d 3d 20 2a 2f 0a | 21 20 73 65 61 72 63 68 |==== */.|! search|
|000048f0| 5f 6d 65 6e 75 5f 61 72 | 72 61 79 20 28 6d 65 6e |_menu_ar|ray (men|
|00004900| 75 5f 61 72 72 61 79 2c | 20 69 6e 64 2c 20 6f 70 |u_array,| ind, op|
|00004910| 74 69 6f 6e 2c 20 73 74 | 72 69 6e 67 2c 20 69 6e |tion, st|ring, in|
|00004920| 76 61 6c 69 64 29 0a 20 | 20 2f 2a 20 3d 3d 3d 3d |valid). | /* ====|
|00004930| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004940| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004950| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00004960| 3d 3d 20 2a 2f 0a 2b 20 | 63 68 61 72 20 2a 20 6d |== */.+ |char * m|
|00004970| 65 6e 75 5f 61 72 72 61 | 79 20 5b 5d 3b 0a 2b 20 |enu_arra|y [];.+ |
|00004980| 69 6e 74 20 20 20 20 69 | 6e 64 3b 0a 2b 20 63 68 |int    i|nd;.+ ch|
|00004990| 61 72 20 2a 20 6f 70 74 | 69 6f 6e 2c 20 2a 20 73 |ar * opt|ion, * s|
|000049a0| 74 72 69 6e 67 3b 0a 2b | 20 69 6e 74 20 20 2a 20 |tring;.+| int  * |
|000049b0| 69 6e 76 61 6c 69 64 3b | 0a 2b 20 0a 20 20 7b 0a |invalid;|.+ .  {.|
|000049c0| 20 20 09 69 6e 74 20 69 | 3b 0a 20 20 09 63 68 61 |  .int i|;.  .cha|
|000049d0| 72 20 6b 65 79 77 6f 72 | 64 20 5b 57 4f 52 44 4c |r keywor|d [WORDL|
|000049e0| 45 4e 5d 3b 0a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |EN];.***|********|
|000049f0| 2a 2a 2a 2a 0a 2a 2a 2a | 20 31 37 36 2c 31 39 30 |****.***| 176,190|
|00004a00| 20 2a 2a 2a 2a 0a 20 20 | 09 63 68 61 72 20 61 63 | ****.  |.char ac|
|00004a10| 74 69 6f 6e 5f 64 65 73 | 63 72 69 70 74 69 6f 6e |tion_des|cription|
|00004a20| 5b 44 45 53 43 4c 45 4e | 5d 2c 20 6a 75 6e 6b 5b |[DESCLEN|], junk[|
|00004a30| 44 45 53 43 4c 45 4e 5d | 3b 0a 20 20 09 63 68 61 |DESCLEN]|;.  .cha|
|00004a40| 72 20 6f 70 74 31 5b 4f | 50 54 4c 45 4e 5d 2c 20 |r opt1[O|PTLEN], |
|00004a50| 6f 70 74 32 5b 4f 50 54 | 4c 45 4e 5d 3b 0a 20 20 |opt2[OPT|LEN];.  |
|00004a60| 0a 21 20 09 66 6f 72 20 | 28 69 20 3d 20 2b 2b 69 |.! .for |(i = ++i|
|00004a70| 6e 64 3b 20 69 20 3c 20 | 4c 49 4e 45 53 20 3b 20 |nd; i < |LINES ; |
|00004a80| 2b 2b 69 29 20 7b 0a 21 | 20 09 09 73 73 63 61 6e |++i) {.!| ..sscan|
|00004a90| 66 28 6d 65 6e 75 5f 61 | 72 72 61 79 5b 69 5d 2c |f(menu_a|rray[i],|
|00004aa0| 20 22 25 73 09 25 5b 5e | 5c 6e 5d 22 2c 20 6b 65 | "%s.%[^|\n]", ke|
|00004ab0| 79 77 6f 72 64 2c 20 61 | 63 74 69 6f 6e 5f 64 65 |yword, a|ction_de|
|00004ac0| 73 63 72 69 70 74 69 6f | 6e 29 3b 0a 21 20 09 09 |scriptio|n);.! ..|
|00004ad0| 69 66 20 28 69 6e 64 65 | 78 20 28 6f 70 74 69 6f |if (inde|x (optio|
|00004ae0| 6e 2c 20 42 4c 41 4e 4b | 29 20 21 3d 20 4e 55 4c |n, BLANK|) != NUL|
|00004af0| 4c 29 20 0a 21 20 09 09 | 09 73 73 63 61 6e 66 28 |L) .! ..|.sscanf(|
|00004b00| 6f 70 74 69 6f 6e 2c 20 | 22 25 73 20 25 5b 5e 5c |option, |"%s %[^\|
|00004b10| 6e 5d 22 2c 20 6f 70 74 | 31 2c 20 6f 70 74 32 29 |n]", opt|1, opt2)|
|00004b20| 3b 0a 20 20 09 09 65 6c | 73 65 0a 21 20 09 09 09 |;.  ..el|se.! ...|
|00004b30| 73 74 72 63 70 79 28 6f | 70 74 31 2c 20 6f 70 74 |strcpy(o|pt1, opt|
|00004b40| 69 6f 6e 29 3b 0a 20 20 | 0a 21 20 09 09 69 66 20 |ion);.  |.! ..if |
|00004b50| 28 20 73 74 72 63 6d 70 | 28 6f 70 74 31 2c 20 6b |( strcmp|(opt1, k|
|00004b60| 65 79 77 6f 72 64 29 20 | 3d 3d 20 30 20 29 20 7b |eyword) |== 0 ) {|
|00004b70| 0a 21 20 09 09 09 73 74 | 72 63 70 79 28 73 74 72 |.! ...st|rcpy(str|
|00004b80| 69 6e 67 2c 20 61 63 74 | 69 6f 6e 5f 64 65 73 63 |ing, act|ion_desc|
|00004b90| 72 69 70 74 69 6f 6e 29 | 3b 0a 20 20 09 09 09 2a |ription)|;.  ...*|
|00004ba0| 69 6e 76 61 6c 69 64 20 | 3d 20 46 41 4c 53 45 3b |invalid |= FALSE;|
|00004bb0| 0a 20 20 09 09 09 72 65 | 74 75 72 6e 3b 0a 20 20 |.  ...re|turn;.  |
|00004bc0| 09 09 7d 0a 2d 2d 2d 20 | 31 38 32 2c 31 39 36 20 |..}.--- |182,196 |
|00004bd0| 2d 2d 2d 2d 0a 20 20 09 | 63 68 61 72 20 61 63 74 |----.  .|char act|
|00004be0| 69 6f 6e 5f 64 65 73 63 | 72 69 70 74 69 6f 6e 5b |ion_desc|ription[|
|00004bf0| 44 45 53 43 4c 45 4e 5d | 2c 20 6a 75 6e 6b 5b 44 |DESCLEN]|, junk[D|
|00004c00| 45 53 43 4c 45 4e 5d 3b | 0a 20 20 09 63 68 61 72 |ESCLEN];|.  .char|
|00004c10| 20 6f 70 74 31 5b 4f 50 | 54 4c 45 4e 5d 2c 20 6f | opt1[OP|TLEN], o|
|00004c20| 70 74 32 5b 4f 50 54 4c | 45 4e 5d 3b 0a 20 20 0a |pt2[OPTL|EN];.  .|
|00004c30| 21 20 09 66 6f 72 20 28 | 20 69 20 3d 20 2b 2b 69 |! .for (| i = ++i|
|00004c40| 6e 64 3b 20 69 20 3c 20 | 4c 49 4e 45 53 20 3b 20 |nd; i < |LINES ; |
|00004c50| 2b 2b 69 20 29 20 7b 0a | 21 20 09 09 73 73 63 61 |++i ) {.|! ..ssca|
|00004c60| 6e 66 20 28 6d 65 6e 75 | 5f 61 72 72 61 79 5b 69 |nf (menu|_array[i|
|00004c70| 5d 2c 20 22 25 73 09 25 | 5b 5e 5c 6e 5d 22 2c 20 |], "%s.%|[^\n]", |
|00004c80| 6b 65 79 77 6f 72 64 2c | 20 61 63 74 69 6f 6e 5f |keyword,| action_|
|00004c90| 64 65 73 63 72 69 70 74 | 69 6f 6e 29 3b 0a 21 20 |descript|ion);.! |
|00004ca0| 09 09 69 66 20 28 20 69 | 6e 64 65 78 20 28 6f 70 |..if ( i|ndex (op|
|00004cb0| 74 69 6f 6e 2c 20 42 4c | 41 4e 4b 29 20 21 3d 20 |tion, BL|ANK) != |
|00004cc0| 4e 55 4c 4c 20 29 20 0a | 21 20 09 09 09 73 73 63 |NULL ) .|! ...ssc|
|00004cd0| 61 6e 66 20 28 6f 70 74 | 69 6f 6e 2c 20 22 25 73 |anf (opt|ion, "%s|
|00004ce0| 20 25 5b 5e 5c 6e 5d 22 | 2c 20 6f 70 74 31 2c 20 | %[^\n]"|, opt1, |
|00004cf0| 6f 70 74 32 29 3b 0a 20 | 20 09 09 65 6c 73 65 0a |opt2);. | ..else.|
|00004d00| 21 20 09 09 09 73 74 72 | 63 70 79 20 28 6f 70 74 |! ...str|cpy (opt|
|00004d10| 31 2c 20 6f 70 74 69 6f | 6e 29 3b 0a 20 20 0a 21 |1, optio|n);.  .!|
|00004d20| 20 09 09 69 66 20 28 20 | 73 74 72 63 6d 70 20 28 | ..if ( |strcmp (|
|00004d30| 6f 70 74 31 2c 20 6b 65 | 79 77 6f 72 64 29 20 3d |opt1, ke|yword) =|
|00004d40| 3d 20 30 20 29 20 7b 0a | 21 20 09 09 09 73 74 72 |= 0 ) {.|! ...str|
|00004d50| 63 70 79 20 28 73 74 72 | 69 6e 67 2c 20 61 63 74 |cpy (str|ing, act|
|00004d60| 69 6f 6e 5f 64 65 73 63 | 72 69 70 74 69 6f 6e 29 |ion_desc|ription)|
|00004d70| 3b 0a 20 20 09 09 09 2a | 69 6e 76 61 6c 69 64 20 |;.  ...*|invalid |
|00004d80| 3d 20 46 41 4c 53 45 3b | 0a 20 20 09 09 09 72 65 |= FALSE;|.  ...re|
|00004d90| 74 75 72 6e 3b 0a 20 20 | 09 09 7d 0a 2a 2a 2a 2a |turn;.  |..}.****|
|00004da0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 0a 2a 2a 2a 20 |********|***.*** |
|00004db0| 31 39 37 2c 32 31 33 20 | 2a 2a 2a 2a 0a 20 20 09 |197,213 |****.  .|
|00004dc0| 65 6c 73 65 0a 20 20 09 | 09 2a 69 6e 76 61 6c 69 |else.  .|.*invali|
|00004dd0| 64 20 3d 20 54 52 55 45 | 3b 0a 20 20 0a 21 20 09 |d = TRUE|;.  .! .|
|00004de0| 2a 73 74 72 69 6e 67 20 | 3d 20 27 5c 30 27 3b 0a |*string |= '\0';.|
|00004df0| 20 20 7d 0a 20 20 0a 21 | 20 76 6f 69 64 20 77 61 |  }.  .!| void wa|
|00004e00| 69 74 5f 66 6f 72 5f 75 | 73 65 72 20 28 29 0a 20 |it_for_u|ser (). |
|00004e10| 20 7b 0a 21 20 09 70 72 | 69 6e 74 77 28 22 5c 6e | {.! .pr|intw("\n|
|00004e20| 50 72 65 73 73 20 45 4e | 54 45 52 20 74 6f 20 63 |Press EN|TER to c|
|00004e30| 6f 6e 74 69 6e 75 65 20 | 2e 2e 2e 20 22 29 3b 0a |ontinue |... ");.|
|00004e40| 21 20 09 72 65 66 72 65 | 73 68 28 29 3b 0a 21 20 |! .refre|sh();.! |
|00004e50| 09 72 65 61 64 5f 69 6e | 70 75 74 5f 6c 69 6e 65 |.read_in|put_line|
|00004e60| 28 4e 55 4c 4c 29 3b 0a | 20 20 7d 0a 20 20 0a 21 |(NULL);.|  }.  .!|
|00004e70| 20 76 6f 69 64 20 63 6c | 65 61 72 5f 73 63 72 65 | void cl|ear_scre|
|00004e80| 65 6e 28 29 0a 20 20 7b | 0a 20 20 09 73 74 61 74 |en().  {|.  .stat|
|00004e90| 69 63 20 69 6e 74 20 64 | 6f 6e 65 69 6e 69 74 20 |ic int d|oneinit |
|00004ea0| 3d 20 30 3b 0a 20 20 0a | 2d 2d 2d 20 32 30 33 2c |= 0;.  .|--- 203,|
|00004eb0| 32 31 38 20 2d 2d 2d 2d | 0a 20 20 09 65 6c 73 65 |218 ----|.  .else|
|00004ec0| 0a 20 20 09 09 2a 69 6e | 76 61 6c 69 64 20 3d 20 |.  ..*in|valid = |
|00004ed0| 54 52 55 45 3b 0a 20 20 | 0a 21 20 09 73 74 72 63 |TRUE;.  |.! .strc|
|00004ee0| 70 79 20 28 73 74 72 69 | 6e 67 2c 20 4e 55 4c 4c |py (stri|ng, NULL|
|00004ef0| 53 54 52 29 3b 0a 20 20 | 7d 0a 20 20 0a 21 20 77 |STR);.  |}.  .! w|
|00004f00| 61 69 74 5f 66 6f 72 5f | 75 73 65 72 20 28 29 0a |ait_for_|user ().|
|00004f10| 20 20 7b 0a 21 20 09 70 | 72 69 6e 74 66 28 22 5c |  {.! .p|rintf("\|
|00004f20| 6e 48 69 74 20 45 4e 54 | 45 52 20 74 6f 20 63 6f |nHit ENT|ER to co|
|00004f30| 6e 74 69 6e 75 65 20 2e | 2e 2e 20 22 29 3b 0a 21 |ntinue .|.. ");.!|
|00004f40| 20 09 72 65 61 64 5f 69 | 6e 70 75 74 5f 6c 69 6e | .read_i|nput_lin|
|00004f50| 65 20 28 4e 55 4c 4c 29 | 3b 0a 20 20 7d 0a 20 20 |e (NULL)|;.  }.  |
|00004f60| 0a 21 20 63 6c 65 61 72 | 5f 73 63 72 65 65 6e 28 |.! clear|_screen(|
|00004f70| 29 0a 20 20 7b 0a 20 20 | 09 73 74 61 74 69 63 20 |).  {.  |.static |
|00004f80| 69 6e 74 20 64 6f 6e 65 | 69 6e 69 74 20 3d 20 30 |int done|init = 0|
|00004f90| 3b 0a 20 20 0a 64 69 66 | 66 20 2d 72 63 20 6d 73 |;.  .dif|f -rc ms|
|00004fa0| 68 2f 66 75 6e 63 74 69 | 6f 6e 73 32 2e 63 20 6d |h/functi|ons2.c m|
|00004fb0| 73 68 2e 6f 72 69 67 2f | 66 75 6e 63 74 69 6f 6e |sh.orig/|function|
|00004fc0| 73 32 2e 63 0a 2a 2a 2a | 20 6d 73 68 2f 66 75 6e |s2.c.***| msh/fun|
|00004fd0| 63 74 69 6f 6e 73 32 2e | 63 09 53 75 6e 20 4d 61 |ctions2.|c.Sun Ma|
|00004fe0| 72 20 31 34 20 31 31 3a | 33 32 3a 31 37 20 31 39 |r 14 11:|32:17 19|
|00004ff0| 39 33 0a 2d 2d 2d 20 6d | 73 68 2e 6f 72 69 67 2f |93.--- m|sh.orig/|
|00005000| 66 75 6e 63 74 69 6f 6e | 73 32 2e 63 09 4d 6f 6e |function|s2.c.Mon|
|00005010| 20 4d 61 72 20 31 35 20 | 32 33 3a 32 36 3a 32 37 | Mar 15 |23:26:27|
|00005020| 20 31 39 39 33 0a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a | 1993.**|********|
|00005030| 2a 2a 2a 2a 2a 0a 2a 2a | 2a 20 31 2c 31 32 20 2a |*****.**|* 1,12 *|
|00005040| 2a 2a 2a 0a 20 20 23 69 | 6e 63 6c 75 64 65 20 22 |***.  #i|nclude "|
|00005050| 6d 73 68 65 6c 6c 2e 68 | 22 0a 20 20 0a 2d 20 73 |mshell.h|".  .- s|
|00005060| 74 61 74 69 63 20 63 68 | 61 72 20 66 75 6e 63 74 |tatic ch|ar funct|
|00005070| 69 6f 6e 73 32 5f 72 63 | 73 69 64 5b 5d 20 3d 20 |ions2_rc|sid[] = |
|00005080| 22 24 48 65 61 64 65 72 | 3a 20 2f 75 73 72 33 2f |"$Header|: /usr3/|
|00005090| 73 72 63 2f 6d 73 68 2f | 52 43 53 2f 66 75 6e 63 |src/msh/|RCS/func|
|000050a0| 74 69 6f 6e 73 32 2e 63 | 2c 76 20 31 2e 31 20 31 |tions2.c|,v 1.1 1|
|000050b0| 39 39 33 2f 30 33 2f 31 | 34 20 31 39 3a 33 32 3a |993/03/1|4 19:32:|
|000050c0| 30 37 20 72 6f 6f 74 20 | 45 78 70 20 72 6f 6f 74 |07 root |Exp root|
|000050d0| 20 24 22 3b 0a 20 20 0a | 2d 20 23 69 66 64 65 66 | $";.  .|- #ifdef|
|000050e0| 20 53 59 53 56 0a 2d 20 | 23 69 6e 63 6c 75 64 65 | SYSV.- |#include|
|000050f0| 20 3c 73 74 72 69 6e 67 | 2e 68 3e 0a 2d 20 23 69 | <string|.h>.- #i|
|00005100| 6e 63 6c 75 64 65 20 3c | 73 74 64 6c 69 62 2e 68 |nclude <|stdlib.h|
|00005110| 3e 0a 2d 20 23 65 6e 64 | 69 66 0a 2d 20 0a 20 20 |>.- #end|if.- .  |
|00005120| 65 78 74 65 72 6e 20 63 | 68 61 72 20 20 20 20 20 |extern c|har     |
|00005130| 47 5f 68 6f 6d 65 76 61 | 72 20 20 20 20 20 20 5b |G_homeva|r      [|
|00005140| 5d 3b 0a 20 20 65 78 74 | 65 72 6e 20 63 68 61 72 |];.  ext|ern char|
|00005150| 20 20 20 20 20 47 5f 75 | 73 65 72 76 61 72 20 20 |     G_u|servar  |
|00005160| 20 20 20 20 5b 5d 3b 0a | 20 20 65 78 74 65 72 6e |    [];.|  extern|
|00005170| 20 63 68 61 72 20 09 47 | 5f 74 65 72 6d 76 61 72 | char .G|_termvar|
|00005180| 20 20 20 20 20 20 5b 5d | 3b 0a 2d 2d 2d 20 31 2c |      []|;.--- 1,|
|00005190| 36 20 2d 2d 2d 2d 0a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |6 ----.*|********|
|000051a0| 2a 2a 2a 2a 2a 2a 0a 2a | 2a 2a 20 31 36 2c 32 33 |******.*|** 16,23|
|000051b0| 20 2a 2a 2a 2a 0a 20 20 | 65 78 74 65 72 6e 20 73 | ****.  |extern s|
|000051c0| 74 72 75 63 74 20 20 20 | 73 74 61 74 20 47 5f 73 |truct   |stat G_s|
|000051d0| 74 3b 0a 20 20 0a 20 20 | 2f 2a 20 3d 3d 3d 3d 3d |t;.  .  |/* =====|
|000051e0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000051f0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00005200| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00005210| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00005220| 3d 3d 20 2a 2f 0a 21 20 | 76 6f 69 64 20 65 78 65 |== */.! |void exe|
|00005230| 63 75 74 65 5f 63 6f 6d | 6d 61 6e 64 28 63 68 61 |cute_com|mand(cha|
|00005240| 72 20 2a 63 6f 6d 6d 61 | 6e 64 2c 20 63 68 61 72 |r *comma|nd, char|
|00005250| 20 2a 61 72 67 73 5b 5d | 29 0a 20 20 2f 2a 20 3d | *args[]|).  /* =|
|00005260| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00005270| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00005280| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00005290| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000052a0| 3d 3d 3d 3d 3d 3d 20 2a | 2f 0a 20 20 7b 0a 20 20 |====== *|/.  {.  |
|000052b0| 09 2f 2a 0a 20 20 09 63 | 68 61 72 20 2a 20 76 61 |./*.  .c|har * va|
|000052c0| 72 5f 61 72 67 73 20 5b | 32 20 2a 20 4d 41 58 41 |r_args [|2 * MAXA|
|000052d0| 52 47 53 5d 3b 20 0a 2d | 2d 2d 20 31 30 2c 31 38 |RGS]; .-|-- 10,18|
|000052e0| 20 2d 2d 2d 2d 0a 20 20 | 65 78 74 65 72 6e 20 73 | ----.  |extern s|
|000052f0| 74 72 75 63 74 20 20 20 | 73 74 61 74 20 47 5f 73 |truct   |stat G_s|
|00005300| 74 3b 0a 20 20 0a 20 20 | 2f 2a 20 3d 3d 3d 3d 3d |t;.  .  |/* =====|
|00005310| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00005320| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00005330| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00005340| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00005350| 3d 3d 20 2a 2f 0a 21 20 | 65 78 65 63 75 74 65 5f |== */.! |execute_|
|00005360| 63 6f 6d 6d 61 6e 64 20 | 28 63 6f 6d 6d 61 6e 64 |command |(command|
|00005370| 2c 20 61 72 67 73 29 0a | 20 20 2f 2a 20 3d 3d 3d |, args).|  /* ===|
|00005380| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00005390| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000053a0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000053b0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000053c0| 3d 3d 3d 3d 20 2a 2f 0a | 2b 20 63 68 61 72 20 2a |==== */.|+ char *|
|000053d0| 63 6f 6d 6d 61 6e 64 2c | 20 2a 61 72 67 73 20 5b |command,| *args [|
|000053e0| 5d 3b 0a 20 20 7b 0a 20 | 20 09 2f 2a 0a 20 20 09 |];.  {. | ./*.  .|
|000053f0| 63 68 61 72 20 2a 20 76 | 61 72 5f 61 72 67 73 20 |char * v|ar_args |
|00005400| 5b 32 20 2a 20 4d 41 58 | 41 52 47 53 5d 3b 20 0a |[2 * MAX|ARGS]; .|
|00005410| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 0a |********|*******.|
|00005420| 2a 2a 2a 20 32 39 2c 33 | 36 20 2a 2a 2a 2a 0a 20 |*** 29,3|6 ****. |
|00005430| 20 09 47 5f 6d 61 69 6c | 5f 6d 65 73 73 61 67 65 | .G_mail|_message|
|00005440| 5b 30 5d 20 3d 20 45 4f | 53 3b 0a 20 20 0a 20 20 |[0] = EO|S;.  .  |
|00005450| 09 69 66 20 28 47 5f 6c | 69 6d 69 74 65 64 20 26 |.if (G_l|imited &|
|00005460| 26 20 69 6e 76 61 6c 69 | 64 63 6f 6d 6d 61 6e 64 |& invali|dcommand|
|00005470| 28 61 72 67 73 5b 30 5d | 29 29 20 7b 0a 21 20 09 |(args[0]|)) {.! .|
|00005480| 09 70 72 69 6e 74 77 28 | 22 49 6e 76 61 6c 69 64 |.printw(|"Invalid|
|00005490| 20 6f 70 74 69 6f 6e 20 | 69 6e 20 72 65 73 74 72 | option |in restr|
|000054a0| 69 63 74 65 64 20 6d 65 | 6e 75 73 2c 20 73 6f 72 |icted me|nus, sor|
|000054b0| 72 79 2e 5c 6e 22 29 3b | 0a 21 20 09 09 70 72 69 |ry.\n");|.! ..pri|
|000054c0| 6e 74 77 28 22 53 65 65 | 20 74 68 65 20 27 69 6e |ntw("See| the 'in|
|000054d0| 66 6f 27 20 6d 65 6e 75 | 20 66 6f 72 20 68 6f 77 |fo' menu| for how|
|000054e0| 20 74 6f 20 67 65 74 20 | 61 20 72 65 61 6c 20 6d | to get |a real m|
|000054f0| 65 6e 75 20 6f 72 20 73 | 68 65 6c 6c 2e 20 20 28 |enu or s|hell.  (|
|00005500| 49 74 27 73 20 66 72 65 | 65 2e 29 5c 6e 22 29 3b |It's fre|e.)\n");|
|00005510| 0a 20 20 09 09 72 65 74 | 75 72 6e 3b 0a 20 20 09 |.  ..ret|urn;.  .|
|00005520| 7d 0a 20 20 09 69 66 20 | 28 73 74 72 63 6f 6e 74 |}.  .if |(strcont|
|00005530| 61 69 6e 73 28 63 6f 6d | 6d 61 6e 64 2c 20 22 2a |ains(com|mand, "*|
|00005540| 3b 7c 3c 3e 26 28 29 5b | 5d 3f 27 5c 22 60 7e 5c |;|<>&()[|]?'\"`~\|
|00005550| 5c 22 29 29 20 7b 0a 2d | 2d 2d 20 32 34 2c 33 31 |\")) {.-|-- 24,31|
|00005560| 20 2d 2d 2d 2d 0a 20 20 | 09 47 5f 6d 61 69 6c 5f | ----.  |.G_mail_|
|00005570| 6d 65 73 73 61 67 65 5b | 30 5d 20 3d 20 45 4f 53 |message[|0] = EOS|
|00005580| 3b 0a 20 20 0a 20 20 09 | 69 66 20 28 47 5f 6c 69 |;.  .  .|if (G_li|
|00005590| 6d 69 74 65 64 20 26 26 | 20 69 6e 76 61 6c 69 64 |mited &&| invalid|
|000055a0| 63 6f 6d 6d 61 6e 64 28 | 61 72 67 73 5b 30 5d 29 |command(|args[0])|
|000055b0| 29 20 7b 0a 21 20 09 09 | 70 72 69 6e 74 66 28 22 |) {.! ..|printf("|
|000055c0| 49 6e 76 61 6c 69 64 20 | 6f 70 74 69 6f 6e 20 69 |Invalid |option i|
|000055d0| 6e 20 72 65 73 74 72 69 | 63 74 65 64 20 6d 65 6e |n restri|cted men|
|000055e0| 75 73 2c 20 73 6f 72 72 | 79 2e 5c 6e 22 29 3b 0a |us, sorr|y.\n");.|
|000055f0| 21 20 09 09 70 72 69 6e | 74 66 28 22 53 65 65 20 |! ..prin|tf("See |
|00005600| 74 68 65 20 27 69 6e 66 | 6f 27 20 6d 65 6e 75 20 |the 'inf|o' menu |
|00005610| 66 6f 72 20 68 6f 77 20 | 74 6f 20 67 65 74 20 61 |for how |to get a|
|00005620| 20 72 65 61 6c 20 6d 65 | 6e 75 20 6f 72 20 73 68 | real me|nu or sh|
|00005630| 65 6c 6c 2e 20 20 28 49 | 74 27 73 20 66 72 65 65 |ell.  (I|t's free|
|00005640| 2e 29 5c 6e 22 29 3b 0a | 20 20 09 09 72 65 74 75 |.)\n");.|  ..retu|
|00005650| 72 6e 3b 0a 20 20 09 7d | 0a 20 20 09 69 66 20 28 |rn;.  .}|.  .if (|
|00005660| 73 74 72 63 6f 6e 74 61 | 69 6e 73 28 63 6f 6d 6d |strconta|ins(comm|
|00005670| 61 6e 64 2c 20 22 2a 3b | 7c 3c 3e 26 28 29 5b 5d |and, "*;||<>&()[]|
|00005680| 3f 27 5c 22 60 7e 5c 5c | 22 29 29 20 7b 0a 2a 2a |?'\"`~\\|")) {.**|
|00005690| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 0a 2a 2a |********|*****.**|
|000056a0| 2a 20 31 31 38 2c 31 32 | 34 20 2a 2a 2a 2a 0a 20 |* 118,12|4 ****. |
|000056b0| 20 0a 20 20 2f 2a 20 66 | 75 6e 63 74 69 6f 6e 20 | .  /* f|unction |
|000056c0| 74 6f 20 72 65 6f 72 64 | 65 72 20 76 61 72 69 6f |to reord|er vario|
|000056d0| 75 73 20 63 6f 6d 6d 61 | 6e 64 20 6c 69 6e 65 20 |us comma|nd line |
|000056e0| 61 72 67 73 20 62 61 73 | 65 64 20 6f 6e 20 6f 72 |args bas|ed on or|
|000056f0| 69 67 69 6e 61 6c 20 73 | 74 72 69 6e 67 20 2a 0a |iginal s|tring *.|
|00005700| 20 20 20 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |   =====|========|
|00005710| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00005720| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00005730| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00005740| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 20 2a 2f 0a 21 |========|=== */.!|
|00005750| 20 61 73 73 69 67 6e 5f | 70 61 72 61 6d 65 74 65 | assign_|paramete|
|00005760| 72 73 28 76 61 72 67 5f | 70 74 72 2c 20 69 6e 70 |rs(varg_|ptr, inp|
|00005770| 75 74 5f 6c 69 6e 65 2c | 20 63 6f 6d 6d 61 6e 64 |ut_line,| command|
|00005780| 2c 20 61 72 67 73 2c 20 | 61 61 72 67 73 2c 20 70 |, args, |aargs, p|
|00005790| 72 6f 6d 70 74 76 61 6c | 29 0a 20 20 63 68 61 72 |romptval|).  char|
|000057a0| 20 2a 20 76 61 72 67 5f | 70 74 72 20 5b 32 20 2a | * varg_|ptr [2 *|
|000057b0| 20 4d 41 58 41 52 47 53 | 5d 3b 0a 20 20 63 68 61 | MAXARGS|];.  cha|
|000057c0| 72 20 69 6e 70 75 74 5f | 6c 69 6e 65 20 20 5b 44 |r input_|line  [D|
|000057d0| 45 53 43 4c 45 4e 5d 3b | 0a 20 20 63 68 61 72 20 |ESCLEN];|.  char |
|000057e0| 63 6f 6d 6d 61 6e 64 20 | 20 20 20 20 5b 57 4f 52 |command |    [WOR|
|000057f0| 44 4c 45 4e 5d 3b 0a 2d | 2d 2d 20 31 31 33 2c 31 |DLEN];.-|-- 113,1|
|00005800| 31 39 20 2d 2d 2d 2d 0a | 20 20 0a 20 20 2f 2a 20 |19 ----.|  .  /* |
|00005810| 66 75 6e 63 74 69 6f 6e | 20 74 6f 20 72 65 6f 72 |function| to reor|
|00005820| 64 65 72 20 76 61 72 69 | 6f 75 73 20 63 6f 6d 6d |der vari|ous comm|
|00005830| 61 6e 64 20 6c 69 6e 65 | 20 61 72 67 73 20 62 61 |and line| args ba|
|00005840| 73 65 64 20 6f 6e 20 6f | 72 69 67 69 6e 61 6c 20 |sed on o|riginal |
|00005850| 73 74 72 69 6e 67 20 2a | 0a 20 20 20 3d 3d 3d 3d |string *|.   ====|
|00005860| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00005870| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00005880| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00005890| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000058a0| 3d 3d 3d 3d 20 2a 2f 0a | 21 20 61 73 73 69 67 6e |==== */.|! assign|
|000058b0| 5f 70 61 72 61 6d 65 74 | 65 72 73 20 28 76 61 72 |_paramet|ers (var|
|000058c0| 67 5f 70 74 72 2c 20 69 | 6e 70 75 74 5f 6c 69 6e |g_ptr, i|nput_lin|
|000058d0| 65 2c 20 63 6f 6d 6d 61 | 6e 64 2c 20 61 72 67 73 |e, comma|nd, args|
|000058e0| 2c 20 61 61 72 67 73 2c | 20 70 72 6f 6d 70 74 76 |, aargs,| promptv|
|000058f0| 61 6c 29 0a 20 20 63 68 | 61 72 20 2a 20 76 61 72 |al).  ch|ar * var|
|00005900| 67 5f 70 74 72 20 5b 32 | 20 2a 20 4d 41 58 41 52 |g_ptr [2| * MAXAR|
|00005910| 47 53 5d 3b 0a 20 20 63 | 68 61 72 20 69 6e 70 75 |GS];.  c|har inpu|
|00005920| 74 5f 6c 69 6e 65 20 20 | 5b 44 45 53 43 4c 45 4e |t_line  |[DESCLEN|
|00005930| 5d 3b 0a 20 20 63 68 61 | 72 20 63 6f 6d 6d 61 6e |];.  cha|r comman|
|00005940| 64 20 20 20 20 20 5b 57 | 4f 52 44 4c 45 4e 5d 3b |d     [W|ORDLEN];|
|00005950| 0a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |.*******|********|
|00005960| 0a 2a 2a 2a 20 31 32 35 | 2c 31 33 30 20 2a 2a 2a |.*** 125|,130 ***|
|00005970| 2a 0a 2d 2d 2d 20 31 32 | 30 2c 31 32 36 20 2d 2d |*.--- 12|0,126 --|
|00005980| 2d 2d 0a 20 20 63 68 61 | 72 20 61 72 67 73 20 20 |--.  cha|r args  |
|00005990| 20 20 20 20 20 20 5b 4d | 41 58 41 52 47 53 5d 5b |      [M|AXARGS][|
|000059a0| 57 4f 52 44 4c 45 4e 5d | 3b 0a 20 20 63 68 61 72 |WORDLEN]|;.  char|
|000059b0| 20 61 61 72 67 73 20 20 | 20 20 20 20 20 5b 4d 41 | aargs  |     [MA|
|000059c0| 58 41 52 47 53 5d 5b 57 | 4f 52 44 4c 45 4e 5d 3b |XARGS][W|ORDLEN];|
|000059d0| 0a 20 20 63 68 61 72 20 | 70 72 6f 6d 70 74 76 61 |.  char |promptva|
|000059e0| 6c 20 20 20 5b 4d 41 58 | 41 52 47 53 5d 5b 57 4f |l   [MAX|ARGS][WO|
|000059f0| 52 44 4c 45 4e 5d 3b 0a | 2b 20 0a 20 20 7b 0a 20 |RDLEN];.|+ .  {. |
|00005a00| 20 09 63 68 61 72 20 74 | 61 72 67 65 74 5f 73 74 | .char t|arget_st|
|00005a10| 72 69 6e 67 20 5b 44 45 | 53 43 4c 45 4e 5d 3b 0a |ring [DE|SCLEN];.|
|00005a20| 20 20 09 69 6e 74 20 70 | 6f 73 69 74 69 6f 6e 2c |  .int p|osition,|
|00005a30| 20 69 20 3d 20 30 3b 0a | 2a 2a 2a 2a 2a 2a 2a 2a | i = 0;.|********|
|00005a40| 2a 2a 2a 2a 2a 2a 2a 0a | 2a 2a 2a 20 31 34 34 2c |*******.|*** 144,|
|00005a50| 31 35 36 20 2a 2a 2a 2a | 0a 20 20 09 09 69 66 20 |156 ****|.  ..if |
|00005a60| 28 20 73 74 72 73 65 61 | 72 63 68 20 28 74 61 72 |( strsea|rch (tar|
|00005a70| 67 65 74 5f 73 74 72 69 | 6e 67 2c 20 43 4d 44 56 |get_stri|ng, CMDV|
|00005a80| 41 4c 29 20 3e 3d 20 30 | 29 0a 20 20 09 09 09 76 |AL) >= 0|).  ...v|
|00005a90| 61 72 67 5f 70 74 72 20 | 5b 69 2b 2b 5d 20 3d 20 |arg_ptr |[i++] = |
|00005aa0| 63 6f 6d 6d 61 6e 64 3b | 0a 20 20 09 09 65 6c 73 |command;|.  ..els|
|00005ab0| 65 20 69 66 20 28 20 73 | 74 72 73 65 61 72 63 68 |e if ( s|trsearch|
|00005ac0| 20 28 74 61 72 67 65 74 | 5f 73 74 72 69 6e 67 2c | (target|_string,|
|00005ad0| 20 41 52 47 56 41 4c 29 | 20 3e 3d 20 30 29 20 0a | ARGVAL)| >= 0) .|
|00005ae0| 21 20 09 09 09 76 61 72 | 67 5f 70 74 72 20 5b 69 |! ...var|g_ptr [i|
|00005af0| 2b 2b 5d 20 3d 20 2a 28 | 61 72 67 73 2b 2b 29 3b |++] = *(|args++);|
|00005b00| 0a 20 20 09 09 65 6c 73 | 65 20 69 66 20 28 20 73 |.  ..els|e if ( s|
|00005b10| 74 72 73 65 61 72 63 68 | 20 28 74 61 72 67 65 74 |trsearch| (target|
|00005b20| 5f 73 74 72 69 6e 67 2c | 20 41 41 52 47 56 41 4c |_string,| AARGVAL|
|00005b30| 29 20 3e 3d 20 30 29 0a | 21 20 09 09 09 76 61 72 |) >= 0).|! ...var|
|00005b40| 67 5f 70 74 72 20 5b 69 | 2b 2b 5d 20 3d 20 2a 28 |g_ptr [i|++] = *(|
|00005b50| 61 61 72 67 73 2b 2b 29 | 3b 0a 20 20 09 09 65 6c |aargs++)|;.  ..el|
|00005b60| 73 65 20 69 66 20 28 20 | 73 74 72 73 65 61 72 63 |se if ( |strsearc|
|00005b70| 68 20 28 74 61 72 67 65 | 74 5f 73 74 72 69 6e 67 |h (targe|t_string|
|00005b80| 2c 20 50 52 4f 4d 50 54 | 56 41 4c 29 20 3e 3d 20 |, PROMPT|VAL) >= |
|00005b90| 30 29 0a 21 20 09 09 09 | 76 61 72 67 5f 70 74 72 |0).! ...|varg_ptr|
|00005ba0| 20 5b 69 2b 2b 5d 20 3d | 20 2a 28 70 72 6f 6d 70 | [i++] =| *(promp|
|00005bb0| 74 76 61 6c 2b 2b 29 3b | 0a 20 20 09 09 65 6c 73 |tval++);|.  ..els|
|00005bc0| 65 20 69 66 20 28 69 6e | 64 65 78 28 74 61 72 67 |e if (in|dex(targ|
|00005bd0| 65 74 5f 73 74 72 69 6e | 67 2c 20 27 3d 27 29 20 |et_strin|g, '=') |
|00005be0| 3d 3d 20 4e 55 4c 4c 29 | 20 2f 2a 20 73 61 6d 65 |== NULL)| /* same|
|00005bf0| 20 61 73 20 41 52 47 56 | 41 4c 20 2a 2f 0a 21 20 | as ARGV|AL */.! |
|00005c00| 09 09 09 76 61 72 67 5f | 70 74 72 20 5b 69 2b 2b |...varg_|ptr [i++|
|00005c10| 5d 20 3d 20 2a 28 61 72 | 67 73 2b 2b 29 3b 0a 20 |] = *(ar|gs++);. |
|00005c20| 20 09 09 0a 20 20 09 7d | 09 2f 2a 20 77 68 69 6c | ...  .}|./* whil|
|00005c30| 65 20 2a 2f 0a 20 20 7d | 09 09 2f 2a 20 61 73 73 |e */.  }|../* ass|
|00005c40| 69 67 6e 5f 70 61 72 61 | 6d 65 74 65 72 73 20 2a |ign_para|meters *|
|00005c50| 2f 0a 2d 2d 2d 20 31 34 | 30 2c 31 35 32 20 2d 2d |/.--- 14|0,152 --|
|00005c60| 2d 2d 0a 20 20 09 09 69 | 66 20 28 20 73 74 72 73 |--.  ..i|f ( strs|
|00005c70| 65 61 72 63 68 20 28 74 | 61 72 67 65 74 5f 73 74 |earch (t|arget_st|
|00005c80| 72 69 6e 67 2c 20 43 4d | 44 56 41 4c 29 20 3e 3d |ring, CM|DVAL) >=|
|00005c90| 20 30 29 0a 20 20 09 09 | 09 76 61 72 67 5f 70 74 | 0).  ..|.varg_pt|
|00005ca0| 72 20 5b 69 2b 2b 5d 20 | 3d 20 63 6f 6d 6d 61 6e |r [i++] |= comman|
|00005cb0| 64 3b 0a 20 20 09 09 65 | 6c 73 65 20 69 66 20 28 |d;.  ..e|lse if (|
|00005cc0| 20 73 74 72 73 65 61 72 | 63 68 20 28 74 61 72 67 | strsear|ch (targ|
|00005cd0| 65 74 5f 73 74 72 69 6e | 67 2c 20 41 52 47 56 41 |et_strin|g, ARGVA|
|00005ce0| 4c 29 20 3e 3d 20 30 29 | 20 0a 21 20 09 09 09 76 |L) >= 0)| .! ...v|
|00005cf0| 61 72 67 5f 70 74 72 20 | 5b 69 2b 2b 5d 20 3d 20 |arg_ptr |[i++] = |
|00005d00| 28 61 72 67 73 2b 2b 29 | 3b 0a 20 20 09 09 65 6c |(args++)|;.  ..el|
|00005d10| 73 65 20 69 66 20 28 20 | 73 74 72 73 65 61 72 63 |se if ( |strsearc|
|00005d20| 68 20 28 74 61 72 67 65 | 74 5f 73 74 72 69 6e 67 |h (targe|t_string|
|00005d30| 2c 20 41 41 52 47 56 41 | 4c 29 20 3e 3d 20 30 29 |, AARGVA|L) >= 0)|
|00005d40| 0a 21 20 09 09 09 76 61 | 72 67 5f 70 74 72 20 5b |.! ...va|rg_ptr [|
|00005d50| 69 2b 2b 5d 20 3d 20 28 | 61 61 72 67 73 2b 2b 29 |i++] = (|aargs++)|
|00005d60| 3b 0a 20 20 09 09 65 6c | 73 65 20 69 66 20 28 20 |;.  ..el|se if ( |
|00005d70| 73 74 72 73 65 61 72 63 | 68 20 28 74 61 72 67 65 |strsearc|h (targe|
|00005d80| 74 5f 73 74 72 69 6e 67 | 2c 20 50 52 4f 4d 50 54 |t_string|, PROMPT|
|00005d90| 56 41 4c 29 20 3e 3d 20 | 30 29 0a 21 20 09 09 09 |VAL) >= |0).! ...|
|00005da0| 76 61 72 67 5f 70 74 72 | 20 5b 69 2b 2b 5d 20 3d |varg_ptr| [i++] =|
|00005db0| 20 28 70 72 6f 6d 70 74 | 76 61 6c 2b 2b 29 3b 0a | (prompt|val++);.|
|00005dc0| 20 20 09 09 65 6c 73 65 | 20 69 66 20 28 69 6e 64 |  ..else| if (ind|
|00005dd0| 65 78 28 74 61 72 67 65 | 74 5f 73 74 72 69 6e 67 |ex(targe|t_string|
|00005de0| 2c 20 27 3d 27 29 20 3d | 3d 20 4e 55 4c 4c 29 20 |, '=') =|= NULL) |
|00005df0| 2f 2a 20 73 61 6d 65 20 | 61 73 20 41 52 47 56 41 |/* same |as ARGVA|
|00005e00| 4c 20 2a 2f 0a 21 20 09 | 09 09 76 61 72 67 5f 70 |L */.! .|..varg_p|
|00005e10| 74 72 20 5b 69 2b 2b 5d | 20 3d 20 28 61 72 67 73 |tr [i++]| = (args|
|00005e20| 2b 2b 29 3b 0a 20 20 09 | 09 0a 20 20 09 7d 09 2f |++);.  .|..  .}./|
|00005e30| 2a 20 77 68 69 6c 65 20 | 2a 2f 0a 20 20 7d 09 09 |* while |*/.  }..|
|00005e40| 2f 2a 20 61 73 73 69 67 | 6e 5f 70 61 72 61 6d 65 |/* assig|n_parame|
|00005e50| 74 65 72 73 20 2a 2f 0a | 2a 2a 2a 2a 2a 2a 2a 2a |ters */.|********|
|00005e60| 2a 2a 2a 2a 2a 2a 2a 0a | 2a 2a 2a 20 32 33 31 2c |*******.|*** 231,|
|00005e70| 32 35 33 20 2a 2a 2a 2a | 0a 20 20 0a 20 20 09 69 |253 ****|.  .  .i|
|00005e80| 66 20 28 21 69 6e 69 74 | 69 61 6c 69 7a 65 64 29 |f (!init|ialized)|
|00005e90| 20 7b 0a 20 20 09 09 46 | 49 4c 45 20 2a 66 70 3b | {.  ..F|ILE *fp;|
|00005ea0| 0a 21 20 09 09 63 68 61 | 72 20 6c 69 6e 65 5b 32 |.! ..cha|r line[2|
|00005eb0| 35 36 5d 2c 20 2a 70 2c | 20 2a 6d 61 6c 6c 6f 63 |56], *p,| *malloc|
|00005ec0| 28 29 3b 0a 20 20 09 09 | 73 74 72 75 63 74 20 63 |();.  ..|struct c|
|00005ed0| 6f 6d 6d 61 6e 64 20 2a | 63 3b 0a 20 20 0a 20 20 |ommand *|c;.  .  |
|00005ee0| 09 09 69 66 20 28 28 66 | 70 20 3d 20 66 6f 70 65 |..if ((f|p = fope|
|00005ef0| 6e 28 43 4f 4d 4d 41 4e | 44 5f 4c 49 53 54 2c 20 |n(COMMAN|D_LIST, |
|00005f00| 22 72 22 29 29 20 3d 3d | 20 4e 55 4c 4c 29 20 7b |"r")) ==| NULL) {|
|00005f10| 0a 21 20 09 09 09 70 72 | 69 6e 74 77 28 22 43 6f |.! ...pr|intw("Co|
|00005f20| 6d 6d 61 6e 64 20 6c 69 | 73 74 20 6d 69 73 73 69 |mmand li|st missi|
|00005f30| 6e 67 21 5c 6e 22 29 3b | 0a 20 20 09 09 09 72 65 |ng!\n");|.  ...re|
|00005f40| 74 75 72 6e 20 54 52 55 | 45 3b 0a 20 20 09 09 7d |turn TRU|E;.  ..}|
|00005f50| 0a 20 20 0a 20 20 09 09 | 69 66 20 28 28 63 6f 6d |.  .  ..|if ((com|
|00005f60| 6d 61 6e 64 73 20 3d 20 | 64 6c 5f 63 72 65 61 74 |mands = |dl_creat|
|00005f70| 65 28 44 4c 5f 46 52 45 | 45 29 29 20 3d 3d 20 4e |e(DL_FRE|E)) == N|
|00005f80| 55 4c 4c 29 20 7b 0a 21 | 20 09 09 09 70 72 69 6e |ULL) {.!| ...prin|
|00005f90| 74 77 28 22 4f 75 74 20 | 6f 66 20 6d 65 6d 6f 72 |tw("Out |of memor|
|00005fa0| 79 21 5c 6e 22 29 3b 0a | 20 20 09 09 09 65 78 69 |y!\n");.|  ...exi|
|00005fb0| 74 28 31 29 3b 0a 20 20 | 09 09 7d 0a 20 20 0a 20 |t(1);.  |..}.  . |
|00005fc0| 20 09 09 77 68 69 6c 65 | 20 28 66 67 65 74 73 28 | ..while| (fgets(|
|00005fd0| 6c 69 6e 65 2c 20 73 69 | 7a 65 6f 66 28 6c 69 6e |line, si|zeof(lin|
|00005fe0| 65 29 2c 20 66 70 29 29 | 20 7b 0a 20 20 09 09 09 |e), fp))| {.  ...|
|00005ff0| 69 66 20 28 28 70 20 3d | 20 6d 61 6c 6c 6f 63 28 |if ((p =| malloc(|
|00006000| 73 74 72 6c 65 6e 28 6c | 69 6e 65 29 2b 31 29 29 |strlen(l|ine)+1))|
|00006010| 20 3d 3d 20 4e 55 4c 4c | 20 7c 7c 0a 21 20 09 09 | == NULL| ||.! ..|
|00006020| 09 20 20 20 20 28 63 20 | 3d 20 28 73 74 72 75 63 |.    (c |= (struc|
|00006030| 74 20 63 6f 6d 6d 61 6e | 64 20 2a 29 67 65 74 6e |t comman|d *)getn|
|00006040| 6f 64 65 28 73 69 7a 65 | 6f 66 28 73 74 72 75 63 |ode(size|of(struc|
|00006050| 74 20 63 6f 6d 6d 61 6e | 64 29 29 29 20 3d 3d 20 |t comman|d))) == |
|00006060| 4e 55 4c 4c 29 20 7b 0a | 21 20 09 09 09 09 70 72 |NULL) {.|! ....pr|
|00006070| 69 6e 74 77 28 22 4f 75 | 74 20 6f 66 20 6d 65 6d |intw("Ou|t of mem|
|00006080| 6f 72 79 21 5c 6e 22 29 | 3b 0a 20 20 09 09 09 09 |ory!\n")|;.  ....|
|00006090| 65 78 69 74 28 31 29 3b | 0a 20 20 09 09 09 7d 0a |exit(1);|.  ...}.|
|000060a0| 20 20 09 09 09 73 74 72 | 63 70 79 28 70 2c 20 6c |  ...str|cpy(p, l|
|000060b0| 69 6e 65 29 3b 0a 2d 2d | 2d 20 32 32 37 2c 32 34 |ine);.--|- 227,24|
|000060c0| 39 20 2d 2d 2d 2d 0a 20 | 20 0a 20 20 09 69 66 20 |9 ----. | .  .if |
|000060d0| 28 21 69 6e 69 74 69 61 | 6c 69 7a 65 64 29 20 7b |(!initia|lized) {|
|000060e0| 0a 20 20 09 09 46 49 4c | 45 20 2a 66 70 3b 0a 21 |.  ..FIL|E *fp;.!|
|000060f0| 20 09 09 63 68 61 72 20 | 6c 69 6e 65 5b 32 35 36 | ..char |line[256|
|00006100| 5d 2c 20 2a 70 3b 0a 20 | 20 09 09 73 74 72 75 63 |], *p;. | ..struc|
|00006110| 74 20 63 6f 6d 6d 61 6e | 64 20 2a 63 3b 0a 20 20 |t comman|d *c;.  |
|00006120| 0a 20 20 09 09 69 66 20 | 28 28 66 70 20 3d 20 66 |.  ..if |((fp = f|
|00006130| 6f 70 65 6e 28 43 4f 4d | 4d 41 4e 44 5f 4c 49 53 |open(COM|MAND_LIS|
|00006140| 54 2c 20 22 72 22 29 29 | 20 3d 3d 20 4e 55 4c 4c |T, "r"))| == NULL|
|00006150| 29 20 7b 0a 21 20 09 09 | 09 70 72 69 6e 74 66 28 |) {.! ..|.printf(|
|00006160| 22 43 6f 6d 6d 61 6e 64 | 20 6c 69 73 74 20 6d 69 |"Command| list mi|
|00006170| 73 73 69 6e 67 21 5c 6e | 22 29 3b 0a 20 20 09 09 |ssing!\n|");.  ..|
|00006180| 09 72 65 74 75 72 6e 20 | 54 52 55 45 3b 0a 20 20 |.return |TRUE;.  |
|00006190| 09 09 7d 0a 20 20 0a 20 | 20 09 09 69 66 20 28 28 |..}.  . | ..if ((|
|000061a0| 63 6f 6d 6d 61 6e 64 73 | 20 3d 20 64 6c 5f 63 72 |commands| = dl_cr|
|000061b0| 65 61 74 65 28 44 4c 5f | 46 52 45 45 29 29 20 3d |eate(DL_|FREE)) =|
|000061c0| 3d 20 4e 55 4c 4c 29 20 | 7b 0a 21 20 09 09 09 70 |= NULL) |{.! ...p|
|000061d0| 72 69 6e 74 66 28 22 4f | 75 74 20 6f 66 20 6d 65 |rintf("O|ut of me|
|000061e0| 6d 6f 72 79 21 5c 6e 22 | 29 3b 0a 20 20 09 09 09 |mory!\n"|);.  ...|
|000061f0| 65 78 69 74 28 31 29 3b | 0a 20 20 09 09 7d 0a 20 |exit(1);|.  ..}. |
|00006200| 20 0a 20 20 09 09 77 68 | 69 6c 65 20 28 66 67 65 | .  ..wh|ile (fge|
|00006210| 74 73 28 6c 69 6e 65 2c | 20 73 69 7a 65 6f 66 28 |ts(line,| sizeof(|
|00006220| 6c 69 6e 65 29 2c 20 66 | 70 29 29 20 7b 0a 20 20 |line), f|p)) {.  |
|00006230| 09 09 09 69 66 20 28 28 | 70 20 3d 20 6d 61 6c 6c |...if ((|p = mall|
|00006240| 6f 63 28 73 74 72 6c 65 | 6e 28 6c 69 6e 65 29 2b |oc(strle|n(line)+|
|00006250| 31 29 29 20 3d 3d 20 4e | 55 4c 4c 20 7c 7c 0a 21 |1)) == N|ULL ||.!|
|00006260| 20 09 09 09 20 20 20 20 | 28 63 20 3d 20 67 65 74 | ...    |(c = get|
|00006270| 6e 6f 64 65 28 73 69 7a | 65 6f 66 28 73 74 72 75 |node(siz|eof(stru|
|00006280| 63 74 20 63 6f 6d 6d 61 | 6e 64 29 29 29 20 3d 3d |ct comma|nd))) ==|
|00006290| 20 4e 55 4c 4c 29 20 7b | 0a 21 20 09 09 09 09 70 | NULL) {|.! ....p|
|000062a0| 72 69 6e 74 66 28 22 4f | 75 74 20 6f 66 20 6d 65 |rintf("O|ut of me|
|000062b0| 6d 6f 72 79 21 5c 6e 22 | 29 3b 0a 20 20 09 09 09 |mory!\n"|);.  ...|
|000062c0| 09 65 78 69 74 28 31 29 | 3b 0a 20 20 09 09 09 7d |.exit(1)|;.  ...}|
|000062d0| 0a 20 20 09 09 09 73 74 | 72 63 70 79 28 70 2c 20 |.  ...st|rcpy(p, |
|000062e0| 6c 69 6e 65 29 3b 0a    |                         |line);. |        |
+--------+-------------------------+-------------------------+--------+--------+