home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1994 March / Source_Code_CD-ROM_Walnut_Creek_March_1994.iso / compsrcs / misc / volume35 / mbox / part12 < prev    next >
Encoding:
Text File  |  1993-02-04  |  54.6 KB  |  1,982 lines
  1. Newsgroups: comp.sources.misc
  2. From: Volker.Schuermann@unnet.w.open.de (Volker Schuermann)
  3. Subject: v35i047:  mbox - ix/Mbox, A BBS for UNIX and MINIX v1.6 PL10j7, Part12/15
  4. Message-ID: <1993Feb5.185924.10723@sparky.imd.sterling.com>
  5. X-Md4-Signature: 7efb0bf7e626b95e31085c80df1ce32b
  6. Date: Fri, 5 Feb 1993 18:59:24 GMT
  7. Approved: kent@sparky.imd.sterling.com
  8.  
  9. Submitted-by: Volker.Schuermann@unnet.w.open.de (Volker Schuermann)
  10. Posting-number: Volume 35, Issue 47
  11. Archive-name: mbox/part12
  12. Environment: MINIX, ISC, ESIX, SVR3
  13. Supersedes: mbox: Volume 31, Issue 16-27
  14.  
  15. #! /bin/sh
  16. # This is a shell archive.  Remove anything before this line, then feed it
  17. # into a shell via "sh file" or similar.  To overwrite existing files,
  18. # type "sh file -c".
  19. # Contents:  etc/deutsch.s.U etc/help.s.U src/control.c src/getline.c
  20. #   src/main.c wendy/misc.c wendy/wendy.c
  21. # Wrapped by kent@sparky on Fri Feb  5 12:18:15 1993
  22. PATH=/bin:/usr/bin:/usr/ucb:/usr/local/bin:/usr/lbin ; export PATH
  23. echo If this archive is complete, you will see the following message:
  24. echo '          "shar: End of archive 12 (of 15)."'
  25. if test -f 'etc/deutsch.s.U' -a "${1}" != "-c" ; then 
  26.   echo shar: Will not clobber existing file \"'etc/deutsch.s.U'\"
  27. else
  28.   echo shar: Extracting \"'etc/deutsch.s.U'\" \(7113 characters\)
  29.   sed "s/^X//" >'etc/deutsch.s.U' <<'END_OF_FILE'
  30. Xbegin 644 etc/deutsch.shorth
  31. XM/R @(" @(" @(" @(" @(" @(" @(" @(" @0F5F96AL<X%B97)S:6-H=" H
  32. XM;&5V96QA8FB$;F=I9RD*/R J(" @(" @(" @(" @(" @(" @(" @(" @0F5F
  33. XM96AL<X%B97)S:6-H=" H86QL92!"969E:&QE*0I"969E:&P@/R @(" @(" @
  34. XM(" @(" @(" @("!);F9O<FUA=&EO;F5N('IU(")"969E:&PB"@HP(" @(" @
  35. XM(" @(" @(" @(" @(" @(" @("!);FAA;'0@9&5S($)E9F5H;'-P=69F97)S
  36. XM"C$M.2 @(" @(" @(" @(" @(" @(" @(" @($)E9F5H;"!A=7,@9&5M(%!U
  37. XM9F9E<B!A8G)U9F5N"@HK(" @(" @(" @(" @(" @(" @(" @(" @("!796-H
  38. XM<V5L;B!I;G,@;H1C:'-T92!"<F5T="!M:70@;F5U96X@07)T:6ME;&X*"BT@
  39. XM(" @(" @(" @(" @(" @(" @(" @(" @(%=E8VAS96QN(&EN<R!V;W)H97)I
  40. XM9V4@0G)E='0@;6ET(&YE=65N($%R=&EK96QN"@I!3E)51D52(" @(" @(" @
  41. XM(" @(" @(" @("!!;G)U9F5R<')O=&]K;VQL"D%.4E5&15(@*B @(" @(" @
  42. XM(" @(" @(" @($%N<G5F97)P<F]T;VMO;&P@*&MO;7!L971T*0I!3E)51D52
  43. XM(",@(" @(" @(" @(" @(" @("!3=&%T:7-T:6L@9&5R($%N<G5F90I!3E)5
  44. XM1D52("4@(" @(" @(" @(" @(" @("!3=&%T:7-T:6L@9&5R($%N<G5F97(@
  45. XM*$AI=&QI<W1E*0H*04Y304=%(" @(" @(" @(" @(" @(" @(" @36ET=&5I
  46. XM;'5N9W-T97AT(&%N>F5I9V5N+X1N9&5R;@H*0E)%5%0@(" @(" @(" @(" @
  47. XM(" @(" @(" @0G)E='1E<B!M:70@86MT=65L;&5N($%R=&EK96QN(&%N>F5I
  48. XM9V5N"D)21514("H@(" @(" @(" @(" @(" @(" @($%L;&4@0G)E='1E<B!A
  49. XM;GIE:6=E;B H;&5V96QA8FB$;F=I9RD*0E)%5%0@*BH@(" @(" @(" @(" @
  50. XM(" @(" @04Q,12!"<F5T=&5R(&%N>F5I9V5N"D)21514("L@(" @(" @(" @
  51. XM(" @(" @(" @(%=E8VAS96QN(&EN<R!NA&-H<W1E($)R971T"D)21514("T@
  52. XM(" @(" @(" @(" @(" @(" @(%=E8VAS96QN(&EN<R!V;W)H97)I9V4@0G)E
  53. XM='0*0E)%5%0@(2 @(" @(" @(" @(" @(" @(" @06MT=65L;&5N($)R971T
  54. XM;F%M96X@875S9V5B96X*0E)%5%0@(R @(" @(" @(" @(" @(" @(" @1W)U
  55. XM<'!E;B H07)E87,I(&%U<V=E8F5N"D)21514("XN(" @(" @(" @(" @(" @
  56. XM(" @($EN;F5R:&%L8B!E:6YE<B!'<G5P<&4@:6YS('9O<FAE<FEG92!"<F5T
  57. XM="!W96-H<V5L;@I"4D545"!"<F5T=&YA;64@(" @(" @(" @("!);G,@0G)E
  58. XM='0@(D)R971T;F%M92(@=V5C:'-E;&X*"D)2245&(%5S97(@(" @(" @(" @
  59. XM(" @(" @(%!E<G.4;FQI8VAE($YA8VAR:6-H="!A;B B57-E<B(@<V5N9&5N
  60. XM"D)2245&($AO<W0A57-E<B @(" @(" @(" @(%!E<G.4;FQI8VAE($YA8VAR
  61. XM:6-H="!A;B B57-E<B(@875F(")(;W-T(@H*0TA!5" @(" @(" @(" @(" @
  62. XM(" @(" @(" @375L=&EP;W)T($-H871S>7-T96T*"D1)4TM54U-)3TX@*B @
  63. XM(" @(" @(" @(" @($%N('=E;&-H96X@1&ES:W5S<VEO;F5N(&)I;B!I8V@@
  64. XM8F5T96EL:6=T/PI$25-+55-324].(" @(" @(" @(" @(" @("!$96T@5&AE
  65. XM;6$@96EN97(@1&ES:W5S<VEO;B!D=7)C:"!E:6YE($=R=7!P92!F;VQG96X*
  66. XM"D1/5TY,3T%$(" @(" @(" @(" @(" @(" @($1I97-E($9U;FMT:6]N(&5R
  67. XM;&%U8G0@97,L($%R=&EK96P@=6YD(%!R;V=R86UM90H@(" @(" @(" @(" @
  68. XM(" @(" @(" @(" @("!U;G1E<B!0<F]T;VMO;&PM2V]N=')O;&QE;B!Z=2!E
  69. XM;7!F86YG96X*"D5$250@07)T:6ME;" @(" @(" @(" @(" @($1E<B!!<G1I
  70. XM:V5L(&UI="!D97(@3G5M;65R(")!<G1I:V5L(B!K86YN"B @(" @(" @(" @
  71. XM(" @(" @(" @(" @(" @(&YA8VAT<H1G;&EC:"!E9&ET:65R="!W97)D96X*
  72. XM"D5.1$4@(" @(" @(" @(" @(" @(" @(" @($UA:6QB;W@@=F5R;&%S<V5N
  73. XM"D5.1$4@*B @(" @(" @(" @(" @(" @(" @($UA:6QB;W@@=F5R;&%S<V5N
  74. XM("A38V%N;F5R(&YI8VAT(&%K='5A;&QI<VEE<F5N*0H*1U)54%!%("L@(" @
  75. XM(" @(" @(" @(" @(" @6G5R(&YE>'1E;B!'<G5P<&4@96EN97(@56YT97)G
  76. XM<G5P<&4*1U)54%!%("LK(" @(" @(" @(" @(" @(" @6G5R(&YE>'1E;B!'
  77. XM<G5P<&4*1U)54%!%("T@(" @(" @(" @(" @(" @(" @6G5R('9O<FAE<FEG
  78. XM96X@1W)U<'!E(&5I;F5R(%5N=&5R9W)U<'!E"D=255!012 M+2 @(" @(" @
  79. XM(" @(" @(" @(%IU<B!V;W)H97)I9V5N($=R=7!P90H*2$E,1D4@(" @(" @
  80. XM(" @(" @(" @(" @(" @1&EE<V4@2W5R>FAI;&9E(&%N>F5I9V5N"DA)3$9%
  81. XM("H@(" @(" @(" @(" @(" @(" @($AI;&9S=&5X=&4@:V]M<&QE='0@875S
  82. XM9V5B96X*2$E,1D4@0F5F96AL(" @(" @(" @(" @(" @2&EL9G-T97AT('IU
  83. XM;2!"969E:&P@(D)E9F5H;"(@>F5I9V5N"@I)3DA!3%0@(" @(" @(" @(" @
  84. XM(" @(" @("!);F1E>"!D97(@86MT=65L;&5N($%R=&EK96P@875S9V5B96X*
  85. XM24Y(04Q4("H@(" @(" @(" @(" @(" @(" @06QL92!!<G1I:V5L(&5I;F5S
  86. XM($)R971T97,@86YZ96EG96X*"DQ%4T5.(" @(" @(" @(" @(" @(" @(" @
  87. XM($YE=64@07)T:6ME;"!L:7-T96X*3$5314X@*B @(" @(" @(" @(" @(" @
  88. XM(" @06QL92!!<G1I:V5L(&QI<W1E;@I,15-%3B!!<G1I:V5L(" @(" @(" @
  89. XM(" @("!!<G1I:V5L(&UI="!D97(@3G5M;65R(")!<G1I:V5L(B!A=7-G96)E
  90. XM;@I,15-%3B!!<G1I:V5L+4%R=&EK96P@(" @("!!<G1I:V5L('9O;B!.=6UM
  91. XM97(@(D%R=&EK96PB(&)I<R B07)T:6ME;"(@>F5I9V5N"@I,3T530TA%3B!!
  92. XM<G1I:V5L(" @(" @(" @("!!<G1I:V5L($YU;6UE<B B07)T:6ME;"(@;)1S
  93. XM8VAE;@I,3T530TA%3B!!<G1I:V5L+4%R=&EK96P@("!,E'-C:&5N('9O;B B
  94. XM07)T:6ME;"(@8FES(")!<G1I:V5L(@I,3T530TA%3B ^(" @(" @(" @(" @
  95. XM(" @("!!;&QE($MO<&EE;B H(2D@96EG96YE<B!-86EL<R!LE'-C:&5N"@I-
  96. XM04M23R @(" @(" @(" @(" @(" @(" @("!-86MR;W9E<F5I;F)A<G5N9V5N
  97. XM('IE:6=E;B^$;F1E<FX*"DU)3DE8(%-H96QL+4)E9F5H;" @(" @(" @($5X
  98. XM=&5R;F5S($MO;6UA;F1O(")3:&5L;"U"969E:&PB(&%U<V:!:')E;@H*3U54
  99. XM1$E!3" @(" @(" @(" @(" @(" @(" @5F5R8FEN9'5N9R!Z=2!E>'1E<FYE
  100. XM;B!(;W-T<R!V:6$@1&%T97@M4 H*4$T@(" @(" @(" @(" @(" @(" @(" @
  101. XM(" @26YS('!E<G.4;FQI8VAE(%9E<GIE:6-H;FES('=E8VAS96QN"@I03U)4
  102. XM24Y&3R @(" @(" @(" @(" @(" @("!!:W1I=FETA'1E;B!D97(@=F5R<V-H
  103. XM:65D96YE;B!497)M:6YA;',@>F5I9V5N"@I03U-41D%#2" @(" @(" @(" @
  104. XM(" @(" @("!0;W-T9F%C:"!E:6YR:6-H=&5N"@I224-(5%5.1R @(" @(" @
  105. XM(" @(" @(" @("!,97-E<FEC:'1U;F<@*&%L=" \+3X@;F5U*2"$;F1E<FX*
  106. XM"E-#2%)%24)%3B @(" @(" @(" @(" @(" @($%R=&EK96P@97)F87-S96X@
  107. XM=6YD('-P96EC:&5R;@H*4T5455 @(" @(" @(" @(" @(" @(" @(" @4&5R
  108. XM<Y1N;&EC:&4@06YP87-S=6YG96X*"E-0245,12 @(" @(" @(" @(" @(" @
  109. XM(" @(%9E<G-C:&EE9&5N92!3<&EE;&4@=V5R9&5N(&%U9F=E;&ES=&5T+V%U
  110. XM9F=E<G5F96X*"E-405154R @(" @(" @(" @(" @(" @(" @($%U<V=A8F4@
  111. XM9&5R(&5I9V5N96X@06YP87-S=6YG96X*"E-4051)4U1)2R @(" @(" @(" @
  112. XM(" @(" @($1A=&5I+5-T871I<W1I:R!D97(@=F5R<V-H+B!"<F5T=&5R(&%N
  113. XM>F5I9V5N"E-4051)4U1)2R J(" @(" @(" @(" @(" @(%-T871I<W1I:R!K
  114. XM;VUP;&5T="!A=7-G96)E;@I35$%425-424L@)" @(" @(" @(" @(" @("":
  115. XM8F5R<VEC:'0@9&5R(%550U M1V5B@6AR96X*4U1!5$E35$E+(",@(" @(" @
  116. XM(" @(" @(" @4')O=&]K;VQL(&1E<B!$;W=N;&]A9',@*%!$+4)R971T97(I
  117. XM"E-4051)4U1)2R E(" @(" @(" @(" @(" @(%!R;W1O:V]L;"!D97(@1&]W
  118. XM;FQO861S("A(251,25-412D*4U1!5$E35$E+(#X@(" @(" @(" @(" @(" @
  119. XM4')O=&]K;VQL(&1E<R!8340@*$UA:6QE<BD*"E-50TA%3B!-=7-T97(@(" @
  120. XM(" @(" @(" @($%R=&EK96P@96EN97,@0G)E='1E<R!N86-H(")-=7-T97(B
  121. XM(&1U<F-H<W5C:&5N"@I365-)3D9/(" @(" @(" @(" @(" @(" @("!!;&QG
  122. XM96UE:6YE($EN9F]R;6%T:6]N96X@>G5R($UA:6QB;W@*"E5.5$524T-(4DE&
  123. XM5" @(" @(" @(" @(" @(%5N=&5R<V-H<FEF="!A;GIE:6=E;B^$;F1E<FX*
  124. XM"E503$]!1" @(" @(" @(" @(" @(" @(" @($1I97-E($9U;FMT:6]N('=I
  125. XM<F0@=65B97(@9&5N($)E9F5H;"!30TA214E"14X*(" @(" @(" @(" @(" @
  126. XM(" @(" @(" @(" @875T;VUA=&ES8V@@875F9V5R=69E;@H*55-%4B @(" @
  127. XM(" @(" @(" @(" @(" @(" @57-E<FQI<W1E(&%U<V=E8F5N"E5315(@*B @
  128. XM(" @(" @(" @(" @(" @(" @(%5S97)L:7-T92!M:70@97)W96ET97)E;B!)
  129. XM;F9O<FUA=&EO;F5N"E5315(@(R @(" @(" @(" @(" @(" @(" @(%5S97)L
  130. XM:7-T92!M:70@57 M+T1O=VYL;V%D(%9E<FB$;'1N:7,*55-%4B E(" @(" @
  131. XM(" @(" @(" @(" @(" @57-E<FQI<W1E(&UI="!!;F=A8F4@9&5R($=R=7!P
  132. XM96XO3F5W<V=R;W5P<PI54T52("0@(" @(" @(" @(" @(" @(" @("!5<V5R
  133. XM;&ES=&4@>G5R($=E8H%H<F5N86)R96-H;G5N9PI54T52($YA;64@(" @(" @
  134. XM(" @(" @(" @("!);F9O<FUA=&EO;F5N((%B97(@9&5N(%1E:6QN96AM97)N
  135. XM(").86UE(@H*54U,0554(" @(" @(" @(" @(" @(" @(" @56UL875T+4MO
  136. XM;G9E<G1I97)U;F<@96EN+2!U;F0@875S<V-H86QT96X*"E9%4E-)3TX@(" @
  137. XM(" @(" @(" @(" @(" @(%9E<G-I;VYS;G5M;65R(&%U<V=E8F5N"E9%4E-)
  138. XM3TX@*B @(" @(" @(" @(" @(" @(%9E<G-I;VYS;G5M;65R('5N9"!$969I
  139. XM;FET:6]N96X@875S9V5B96X*5D524TE/3B C(" @(" @(" @(" @(" @(" @
  140. XM5F5R<VEO;G-N=6UM97(@=6YD(")(86QL(&]F($9A;64B(&%U<V=E8F5N"@I7
  141. XM14E415),14E414X@(" @(" @(" @(" @("!796ET97)L96ET8F%R92!037,@
  142. XM86YZ96EG96X*5T5)5$523$5)5$5.(%5S97(@(" @(" @(" @5V5I=&5R;&5I
  143. XM=&)A<F4@4$T@86X@(E5S97(B('-E;F1E;@I714E415),14E414X@07)T:6ME
  144. XM;"!5<V5R("!!<G1I:V5L($YU;6UE<B B07)T:6ME;"(@86X@(E5S97(B('-E
  145. X%;F1E;@IR
  146. X 
  147. Xend
  148. END_OF_FILE
  149.   if test 7113 -ne `wc -c <'etc/deutsch.s.U'`; then
  150.     echo shar: \"'etc/deutsch.s.U'\" unpacked with wrong size!
  151.   else
  152.     echo shar: Uudecoding \"'etc/deutsch.shorth'\" \(5135 characters\)
  153.     cat etc/deutsch.s.U | uudecode
  154.     if test 5135 -ne `wc -c <'etc/deutsch.shorth'`; then
  155.       echo shar: \"'etc/deutsch.shorth'\" uudecoded with wrong size!
  156.     else
  157.       rm etc/deutsch.s.U
  158.     fi
  159.   fi
  160.   # end of 'etc/deutsch.s.U'
  161. fi
  162. if test -f 'etc/help.s.U' -a "${1}" != "-c" ; then 
  163.   echo shar: Will not clobber existing file \"'etc/help.s.U'\"
  164. else
  165.   echo shar: Extracting \"'etc/help.s.U'\" \(7113 characters\)
  166.   sed "s/^X//" >'etc/help.s.U' <<'END_OF_FILE'
  167. Xbegin 644 etc/help.shorthelp
  168. XM/R @(" @(" @(" @(" @(" @(" @(" @(" @0F5F96AL<X%B97)S:6-H=" H
  169. XM;&5V96QA8FB$;F=I9RD*/R J(" @(" @(" @(" @(" @(" @(" @(" @0F5F
  170. XM96AL<X%B97)S:6-H=" H86QL92!"969E:&QE*0I"969E:&P@/R @(" @(" @
  171. XM(" @(" @(" @("!);F9O<FUA=&EO;F5N('IU(")"969E:&PB"@HP(" @(" @
  172. XM(" @(" @(" @(" @(" @(" @("!);FAA;'0@9&5S($)E9F5H;'-P=69F97)S
  173. XM"C$M.2 @(" @(" @(" @(" @(" @(" @(" @($)E9F5H;"!A=7,@9&5M(%!U
  174. XM9F9E<B!A8G)U9F5N"@HK(" @(" @(" @(" @(" @(" @(" @(" @("!796-H
  175. XM<V5L;B!I;G,@;H1C:'-T92!"<F5T="!M:70@;F5U96X@07)T:6ME;&X*"BT@
  176. XM(" @(" @(" @(" @(" @(" @(" @(" @(%=E8VAS96QN(&EN<R!V;W)H97)I
  177. XM9V4@0G)E='0@;6ET(&YE=65N($%R=&EK96QN"@I!3E)51D52(" @(" @(" @
  178. XM(" @(" @(" @("!!;G)U9F5R<')O=&]K;VQL"D%.4E5&15(@*B @(" @(" @
  179. XM(" @(" @(" @($%N<G5F97)P<F]T;VMO;&P@*&MO;7!L971T*0I!3E)51D52
  180. XM(",@(" @(" @(" @(" @(" @("!3=&%T:7-T:6L@9&5R($%N<G5F90I!3E)5
  181. XM1D52("4@(" @(" @(" @(" @(" @("!3=&%T:7-T:6L@9&5R($%N<G5F97(@
  182. XM*$AI=&QI<W1E*0H*04Y304=%(" @(" @(" @(" @(" @(" @(" @36ET=&5I
  183. XM;'5N9W-T97AT(&%N>F5I9V5N+X1N9&5R;@H*0E)%5%0@(" @(" @(" @(" @
  184. XM(" @(" @(" @0G)E='1E<B!M:70@86MT=65L;&5N($%R=&EK96QN(&%N>F5I
  185. XM9V5N"D)21514("H@(" @(" @(" @(" @(" @(" @($%L;&4@0G)E='1E<B!A
  186. XM;GIE:6=E;B H;&5V96QA8FB$;F=I9RD*0E)%5%0@*BH@(" @(" @(" @(" @
  187. XM(" @(" @04Q,12!"<F5T=&5R(&%N>F5I9V5N"D)21514("L@(" @(" @(" @
  188. XM(" @(" @(" @(%=E8VAS96QN(&EN<R!NA&-H<W1E($)R971T"D)21514("T@
  189. XM(" @(" @(" @(" @(" @(" @(%=E8VAS96QN(&EN<R!V;W)H97)I9V4@0G)E
  190. XM='0*0E)%5%0@(2 @(" @(" @(" @(" @(" @(" @06MT=65L;&5N($)R971T
  191. XM;F%M96X@875S9V5B96X*0E)%5%0@(R @(" @(" @(" @(" @(" @(" @1W)U
  192. XM<'!E;B H07)E87,I(&%U<V=E8F5N"D)21514("XN(" @(" @(" @(" @(" @
  193. XM(" @($EN;F5R:&%L8B!E:6YE<B!'<G5P<&4@:6YS('9O<FAE<FEG92!"<F5T
  194. XM="!W96-H<V5L;@I"4D545"!"<F5T=&YA;64@(" @(" @(" @("!);G,@0G)E
  195. XM='0@(D)R971T;F%M92(@=V5C:'-E;&X*"D)2245&(%5S97(@(" @(" @(" @
  196. XM(" @(" @(%!E<G.4;FQI8VAE($YA8VAR:6-H="!A;B B57-E<B(@<V5N9&5N
  197. XM"D)2245&($AO<W0A57-E<B @(" @(" @(" @(%!E<G.4;FQI8VAE($YA8VAR
  198. XM:6-H="!A;B B57-E<B(@875F(")(;W-T(@H*0TA!5" @(" @(" @(" @(" @
  199. XM(" @(" @(" @375L=&EP;W)T($-H871S>7-T96T*"D1)4TM54U-)3TX@*B @
  200. XM(" @(" @(" @(" @($%N('=E;&-H96X@1&ES:W5S<VEO;F5N(&)I;B!I8V@@
  201. XM8F5T96EL:6=T/PI$25-+55-324].(" @(" @(" @(" @(" @("!$96T@5&AE
  202. XM;6$@96EN97(@1&ES:W5S<VEO;B!D=7)C:"!E:6YE($=R=7!P92!F;VQG96X*
  203. XM"D1/5TY,3T%$(" @(" @(" @(" @(" @(" @($1I97-E($9U;FMT:6]N(&5R
  204. XM;&%U8G0@97,L($%R=&EK96P@=6YD(%!R;V=R86UM90H@(" @(" @(" @(" @
  205. XM(" @(" @(" @(" @("!U;G1E<B!0<F]T;VMO;&PM2V]N=')O;&QE;B!Z=2!E
  206. XM;7!F86YG96X*"D5$250@07)T:6ME;" @(" @(" @(" @(" @($1E<B!!<G1I
  207. XM:V5L(&UI="!D97(@3G5M;65R(")!<G1I:V5L(B!K86YN"B @(" @(" @(" @
  208. XM(" @(" @(" @(" @(" @(&YA8VAT<H1G;&EC:"!E9&ET:65R="!W97)D96X*
  209. XM"D5.1$4@(" @(" @(" @(" @(" @(" @(" @($UA:6QB;W@@=F5R;&%S<V5N
  210. XM"D5.1$4@*B @(" @(" @(" @(" @(" @(" @($UA:6QB;W@@=F5R;&%S<V5N
  211. XM("A38V%N;F5R(&YI8VAT(&%K='5A;&QI<VEE<F5N*0H*1U)54%!%("L@(" @
  212. XM(" @(" @(" @(" @(" @6G5R(&YE>'1E;B!'<G5P<&4@96EN97(@56YT97)G
  213. XM<G5P<&4*1U)54%!%("LK(" @(" @(" @(" @(" @(" @6G5R(&YE>'1E;B!'
  214. XM<G5P<&4*1U)54%!%("T@(" @(" @(" @(" @(" @(" @6G5R('9O<FAE<FEG
  215. XM96X@1W)U<'!E(&5I;F5R(%5N=&5R9W)U<'!E"D=255!012 M+2 @(" @(" @
  216. XM(" @(" @(" @(%IU<B!V;W)H97)I9V5N($=R=7!P90H*2$E,1D4@(" @(" @
  217. XM(" @(" @(" @(" @(" @1&EE<V4@2W5R>FAI;&9E(&%N>F5I9V5N"DA)3$9%
  218. XM("H@(" @(" @(" @(" @(" @(" @($AI;&9S=&5X=&4@:V]M<&QE='0@875S
  219. XM9V5B96X*2$E,1D4@0F5F96AL(" @(" @(" @(" @(" @2&EL9G-T97AT('IU
  220. XM;2!"969E:&P@(D)E9F5H;"(@>F5I9V5N"@I)3DA!3%0@(" @(" @(" @(" @
  221. XM(" @(" @("!);F1E>"!D97(@86MT=65L;&5N($%R=&EK96P@875S9V5B96X*
  222. XM24Y(04Q4("H@(" @(" @(" @(" @(" @(" @06QL92!!<G1I:V5L(&5I;F5S
  223. XM($)R971T97,@86YZ96EG96X*"DQ%4T5.(" @(" @(" @(" @(" @(" @(" @
  224. XM($YE=64@07)T:6ME;"!L:7-T96X*3$5314X@*B @(" @(" @(" @(" @(" @
  225. XM(" @06QL92!!<G1I:V5L(&QI<W1E;@I,15-%3B!!<G1I:V5L(" @(" @(" @
  226. XM(" @("!!<G1I:V5L(&UI="!D97(@3G5M;65R(")!<G1I:V5L(B!A=7-G96)E
  227. XM;@I,15-%3B!!<G1I:V5L+4%R=&EK96P@(" @("!!<G1I:V5L('9O;B!.=6UM
  228. XM97(@(D%R=&EK96PB(&)I<R B07)T:6ME;"(@>F5I9V5N"@I,3T530TA%3B!!
  229. XM<G1I:V5L(" @(" @(" @("!!<G1I:V5L($YU;6UE<B B07)T:6ME;"(@;)1S
  230. XM8VAE;@I,3T530TA%3B!!<G1I:V5L+4%R=&EK96P@("!,E'-C:&5N('9O;B B
  231. XM07)T:6ME;"(@8FES(")!<G1I:V5L(@I,3T530TA%3B ^(" @(" @(" @(" @
  232. XM(" @("!!;&QE($MO<&EE;B H(2D@96EG96YE<B!-86EL<R!LE'-C:&5N"@I-
  233. XM04M23R @(" @(" @(" @(" @(" @(" @("!-86MR;W9E<F5I;F)A<G5N9V5N
  234. XM('IE:6=E;B^$;F1E<FX*"DU)3DE8(%-H96QL+4)E9F5H;" @(" @(" @($5X
  235. XM=&5R;F5S($MO;6UA;F1O(")3:&5L;"U"969E:&PB(&%U<V:!:')E;@H*3U54
  236. XM1$E!3" @(" @(" @(" @(" @(" @(" @5F5R8FEN9'5N9R!Z=2!E>'1E<FYE
  237. XM;B!(;W-T<R!V:6$@1&%T97@M4 H*4$T@(" @(" @(" @(" @(" @(" @(" @
  238. XM(" @26YS('!E<G.4;FQI8VAE(%9E<GIE:6-H;FES('=E8VAS96QN"@I03U)4
  239. XM24Y&3R @(" @(" @(" @(" @(" @("!!:W1I=FETA'1E;B!D97(@=F5R<V-H
  240. XM:65D96YE;B!497)M:6YA;',@>F5I9V5N"@I03U-41D%#2" @(" @(" @(" @
  241. XM(" @(" @("!0;W-T9F%C:"!E:6YR:6-H=&5N"@I224-(5%5.1R @(" @(" @
  242. XM(" @(" @(" @("!,97-E<FEC:'1U;F<@*&%L=" \+3X@;F5U*2"$;F1E<FX*
  243. XM"E-#2%)%24)%3B @(" @(" @(" @(" @(" @($%R=&EK96P@97)F87-S96X@
  244. XM=6YD('-P96EC:&5R;@H*4T5455 @(" @(" @(" @(" @(" @(" @(" @4&5R
  245. XM<Y1N;&EC:&4@06YP87-S=6YG96X*"E-0245,12 @(" @(" @(" @(" @(" @
  246. XM(" @(%9E<G-C:&EE9&5N92!3<&EE;&4@=V5R9&5N(&%U9F=E;&ES=&5T+V%U
  247. XM9F=E<G5F96X*"E-405154R @(" @(" @(" @(" @(" @(" @($%U<V=A8F4@
  248. XM9&5R(&5I9V5N96X@06YP87-S=6YG96X*"E-4051)4U1)2R @(" @(" @(" @
  249. XM(" @(" @($1A=&5I+5-T871I<W1I:R!D97(@=F5R<V-H+B!"<F5T=&5R(&%N
  250. XM>F5I9V5N"E-4051)4U1)2R J(" @(" @(" @(" @(" @(%-T871I<W1I:R!K
  251. XM;VUP;&5T="!A=7-G96)E;@I35$%425-424L@)" @(" @(" @(" @(" @("":
  252. XM8F5R<VEC:'0@9&5R(%550U M1V5B@6AR96X*4U1!5$E35$E+(",@(" @(" @
  253. XM(" @(" @(" @4')O=&]K;VQL(&1E<B!$;W=N;&]A9',@*%!$+4)R971T97(I
  254. XM"E-4051)4U1)2R E(" @(" @(" @(" @(" @(%!R;W1O:V]L;"!D97(@1&]W
  255. XM;FQO861S("A(251,25-412D*4U1!5$E35$E+(#X@(" @(" @(" @(" @(" @
  256. XM4')O=&]K;VQL(&1E<R!8340@*$UA:6QE<BD*"E-50TA%3B!-=7-T97(@(" @
  257. XM(" @(" @(" @($%R=&EK96P@96EN97,@0G)E='1E<R!N86-H(")-=7-T97(B
  258. XM(&1U<F-H<W5C:&5N"@I365-)3D9/(" @(" @(" @(" @(" @(" @("!!;&QG
  259. XM96UE:6YE($EN9F]R;6%T:6]N96X@>G5R($UA:6QB;W@*"E5.5$524T-(4DE&
  260. XM5" @(" @(" @(" @(" @(%5N=&5R<V-H<FEF="!A;GIE:6=E;B^$;F1E<FX*
  261. XM"E503$]!1" @(" @(" @(" @(" @(" @(" @($1I97-E($9U;FMT:6]N('=I
  262. XM<F0@=65B97(@9&5N($)E9F5H;"!30TA214E"14X*(" @(" @(" @(" @(" @
  263. XM(" @(" @(" @(" @875T;VUA=&ES8V@@875F9V5R=69E;@H*55-%4B @(" @
  264. XM(" @(" @(" @(" @(" @(" @57-E<FQI<W1E(&%U<V=E8F5N"E5315(@*B @
  265. XM(" @(" @(" @(" @(" @(" @(%5S97)L:7-T92!M:70@97)W96ET97)E;B!)
  266. XM;F9O<FUA=&EO;F5N"E5315(@(R @(" @(" @(" @(" @(" @(" @(%5S97)L
  267. XM:7-T92!M:70@57 M+T1O=VYL;V%D(%9E<FB$;'1N:7,*55-%4B E(" @(" @
  268. XM(" @(" @(" @(" @(" @57-E<FQI<W1E(&UI="!!;F=A8F4@9&5R($=R=7!P
  269. XM96XO3F5W<V=R;W5P<PI54T52("0@(" @(" @(" @(" @(" @(" @("!5<V5R
  270. XM;&ES=&4@>G5R($=E8H%H<F5N86)R96-H;G5N9PI54T52($YA;64@(" @(" @
  271. XM(" @(" @(" @("!);F9O<FUA=&EO;F5N((%B97(@9&5N(%1E:6QN96AM97)N
  272. XM(").86UE(@H*54U,0554(" @(" @(" @(" @(" @(" @(" @56UL875T+4MO
  273. XM;G9E<G1I97)U;F<@96EN+2!U;F0@875S<V-H86QT96X*"E9%4E-)3TX@(" @
  274. XM(" @(" @(" @(" @(" @(%9E<G-I;VYS;G5M;65R(&%U<V=E8F5N"E9%4E-)
  275. XM3TX@*B @(" @(" @(" @(" @(" @(%9E<G-I;VYS;G5M;65R('5N9"!$969I
  276. XM;FET:6]N96X@875S9V5B96X*5D524TE/3B C(" @(" @(" @(" @(" @(" @
  277. XM5F5R<VEO;G-N=6UM97(@=6YD(")(86QL(&]F($9A;64B(&%U<V=E8F5N"@I7
  278. XM14E415),14E414X@(" @(" @(" @(" @("!796ET97)L96ET8F%R92!037,@
  279. XM86YZ96EG96X*5T5)5$523$5)5$5.(%5S97(@(" @(" @(" @5V5I=&5R;&5I
  280. XM=&)A<F4@4$T@86X@(E5S97(B('-E;F1E;@I714E415),14E414X@07)T:6ME
  281. XM;"!5<V5R("!!<G1I:V5L($YU;6UE<B B07)T:6ME;"(@86X@(E5S97(B('-E
  282. X%;F1E;@IR
  283. X 
  284. Xend
  285. END_OF_FILE
  286.   if test 7113 -ne `wc -c <'etc/help.s.U'`; then
  287.     echo shar: \"'etc/help.s.U'\" unpacked with wrong size!
  288.   else
  289.     echo shar: Uudecoding \"'etc/help.shorthelp'\" \(5135 characters\)
  290.     cat etc/help.s.U | uudecode
  291.     if test 5135 -ne `wc -c <'etc/help.shorthelp'`; then
  292.       echo shar: \"'etc/help.shorthelp'\" uudecoded with wrong size!
  293.     else
  294.       rm etc/help.s.U
  295.     fi
  296.   fi
  297.   # end of 'etc/help.s.U'
  298. fi
  299. if test -f 'src/control.c' -a "${1}" != "-c" ; then 
  300.   echo shar: Will not clobber existing file \"'src/control.c'\"
  301. else
  302.   echo shar: Extracting \"'src/control.c'\" \(2626 characters\)
  303.   sed "s/^X//" >'src/control.c' <<'END_OF_FILE'
  304. X/***************************************************************************/
  305. X/*        PROGRAMM  ix/Mbox                           */
  306. X/*             DATEI  control.c                           */
  307. X/*        FUNKTIONEN  control(), whodo()                   */
  308. X/*             AUTOR  vs (Volker Schuermann/MINIX-Version)           */
  309. X/*  LETZTE AENDERUNG  24.11.1991                       */
  310. X/***************************************************************************/
  311. X
  312. X#include <stdio.h>
  313. X
  314. X#include "mbox.h"
  315. X
  316. X
  317. X
  318. X/***************************************************************************/
  319. X/*      FUNKTION  control()                           */
  320. X/*  BESCHREIBUNG  Fuehrt ein "Logbuch" in zwei versch. Dateien/auf zwei    */
  321. X/*          versch. Geraeten (CONSOLE & CPRN).                       */
  322. X/*     PARAMETER  text  =  Ansage-Text                                     */
  323. X/*          mode  =  '< 99'  =  Ausgabe auf CONSOLE                  */
  324. X/*          mode  =  '= 99'  =  Ausgabe auf CPRN                     */
  325. X/*     RUECKGABE  keine                                                       */
  326. X/***************************************************************************/
  327. X
  328. XFILE *contfp = NULL;
  329. X
  330. Xvoid control(text, mode)
  331. Xunsigned char text[];
  332. Xint mode;
  333. X{
  334. X  if (mode < 99) {
  335. X
  336. X#ifdef _MINIX
  337. X    if(tty() >= FIRST_EX_TTY){
  338. X#endif
  339. X        contfp = fopen(CONSOLE_REDIRECT, "a");
  340. X        if (contfp == NULL) {
  341. X            printf("\n\n%s [%s]\n\n", CTL01_MSG, CONSOLE_REDIRECT);
  342. X            exit(-1);
  343. X        }
  344. X#ifdef _DATESTAMP
  345. X        fprintf(contfp, "%s %s <%s>  %s\n", mydate(1), mytime(1), ttyna(), text);
  346. X#else
  347. X        fprintf(contfp, "MBOX: (%s:) %s\n", ttyna(), text);
  348. X#endif
  349. X        fflush(contfp);
  350. X        fclose(contfp);
  351. X#ifdef _MINIX
  352. X    }
  353. X#endif
  354. X
  355. X  }
  356. X  if (mode == 99) {
  357. X    contfp = fopen(CPRN, "a");
  358. X    if (contfp == NULL) {
  359. X        printf("\n\n%s [%s]\n\n", CTL01_MSG, CPRN);
  360. X        exit(-1);
  361. X    }
  362. X    fprintf(contfp, "\n%s  -  %s\n", mydate(1), mytime(1));
  363. X    fprintf(contfp, "MBOX: (%s:) %s\n", ttyna(), text);
  364. X    fflush(contfp);
  365. X    fclose(contfp);
  366. X  }
  367. X}
  368. X
  369. X
  370. X
  371. X/***************************************************************************/
  372. X/*      FUNKTION  whodo()                           */
  373. X/*  BESCHREIBUNG  Erstellt eine Datei fuer die "portinfo()"-Routine.       */
  374. X/*     PARAMETER  text = Ansage-Text (aktiver Befehl etc.)                 */
  375. X/*     RUECKGABE  keine                                                       */
  376. X/***************************************************************************/
  377. X
  378. Xvoid whodo(text)
  379. Xunsigned char text[];
  380. X{
  381. X  FILE *fp;
  382. X  unsigned char s[STRING];
  383. X
  384. X  s[0] = '\0'; strcat(s, HOME); strcat(s, "/etc/");
  385. X  strcat(s, (unsigned char *) ttyna()); strcat(s, ".");
  386. X
  387. X  fp = fopen(s, "w");
  388. X  if (fp == NULL) {
  389. X    nerror("control.c", 44, "whodo", "Datei-Schreibfehler", s);
  390. X  }
  391. X  fputs(text, fp);
  392. X  fclose(fp);
  393. X}
  394. END_OF_FILE
  395.   if test 2626 -ne `wc -c <'src/control.c'`; then
  396.     echo shar: \"'src/control.c'\" unpacked with wrong size!
  397.   fi
  398.   # end of 'src/control.c'
  399. fi
  400. if test -f 'src/getline.c' -a "${1}" != "-c" ; then 
  401.   echo shar: Will not clobber existing file \"'src/getline.c'\"
  402. else
  403.   echo shar: Extracting \"'src/getline.c'\" \(8445 characters\)
  404.   sed "s/^X//" >'src/getline.c' <<'END_OF_FILE'
  405. X/***************************************************************************/
  406. X/*        PROGRAMM  ix/Mbox                           */
  407. X/*             DATEI  getline.c                           */
  408. X/*        FUNKTIONEN  getline(), getint(), yesno()               */
  409. X/*             AUTOR  vs (Volker Schuermann/MINIX-Version)           */
  410. X/*  LETZTE AENDERUNG  17.11.1992                       */
  411. X/***************************************************************************/
  412. X
  413. X#include <stdio.h>
  414. X
  415. X#ifdef _MBOX
  416. X#include "mbox.h"
  417. X#else
  418. X#define BS        8
  419. X#define CR        13
  420. X#define LF        10
  421. X#define CTRL_X        24
  422. X#define CTRL_D        4
  423. X#define BELL        7
  424. X#define ESC        27
  425. X#define DEL        127
  426. X#define GBL06_MSG    'J'     
  427. X#define GBL07_MSG    'N'    
  428. X
  429. Xint UMLAUT = 0;
  430. X
  431. X#ifdef _SYS7
  432. X#define ENTER        13
  433. X#else
  434. X#define ENTER         10
  435. X#endif
  436. X#endif
  437. X
  438. X#ifndef STRING
  439. X#define STRING 85
  440. X#endif
  441. X
  442. X/***************************************************************************/
  443. X/*      FUNKTION  getline()                           */
  444. X/*  BESCHREIBUNG  Eine Zeile (STRING) einlesen. Beendet wird mit ENTER,       */
  445. X/*          oder wenn die max. zulaessige Anzahl von Zeichen er-     */
  446. X/*          reicht ist.                                               */
  447. X/*     PARAMETER  siehe unten                                              */
  448. X/*     RUECKGABE  Eingelesene Zeile (STRING)                   */
  449. X/*  ---------------------------------------------------------------------  */
  450. X/*  len     -> Anzahl der max. einzulesenden Zeichen                */
  451. X/*                                       */
  452. X/*  mode    ->      >0 = 7BIT                           */
  453. X/*             0 = Kein Echo                       */
  454. X/*                1 = Mit Echo                           */
  455. X/*                2 = '*' als Echo                           */
  456. X/*             3 = ':' als drittes & sechstes Zeichen (Uhrzeit)      */
  457. X/*                 4 = '.' als drittes & sechstes Zeichen (Datum)        */
  458. X/*              5 = Ausschliesslich BUCHSTABEN               */
  459. X/*            10 = "bsc" vor der Eingabe "len"-mal ausgeben          */
  460. X/*           100 = nur Zahlen (und '.', ':')                         */
  461. X/*           1000 = String "deftext" + "bsc" ausgeben                 */
  462. X/*         10000 = bei "0-9" als erstes Zeichen -> sofort zurueck    */
  463. X/*                                           */
  464. X/*  bsc     -> Mit diesem Zeichen wird geloescht               */
  465. X/*                                           */
  466. X/*  deftext -> Text-Vorgabe                                                */
  467. X/*                                                               */
  468. X/***************************************************************************/
  469. X
  470. Xstatic int endless;
  471. X
  472. Xunsigned char *getline(len, mode, bsc, deftext)
  473. Xint len, mode;
  474. Xint bsc;
  475. Xunsigned char deftext[];
  476. X{
  477. X  static unsigned char gls[STRING];
  478. X  int c;
  479. X  int gli, gll;
  480. X  int delim = '\0';
  481. X  int matrix = 0;
  482. X  int echo = 1, numerics = 0, defmode = 0, letters = 0;
  483. X  int escape = 0;
  484. X  int lenmem = len;
  485. X  int lastwasblank = 0;
  486. X  int siebenbit = 0;
  487. X  
  488. X  if (mode < 0) {
  489. X    siebenbit++;
  490. X    mode *= -1;
  491. X  }
  492. X  if (mode > 10000) {
  493. X    escape++;
  494. X    mode -= 10000;
  495. X  }
  496. X  if (mode > 1000) {
  497. X    mode -= 1000;
  498. X    defmode++;
  499. X  }
  500. X  if (mode > 100) {
  501. X    mode -= 100;
  502. X    numerics++;
  503. X  }
  504. X  if (mode > 10) {
  505. X    mode -= 10;
  506. X    matrix++;
  507. X  }
  508. X  if (mode > 2) {
  509. X    switch(mode){
  510. X        case 3    : delim = ':';
  511. X              break;
  512. X        case 4  : delim = '.';        
  513. X              break;
  514. X         case 5  : letters++;
  515. X              break;
  516. X    }
  517. X    mode = 1;
  518. X  }
  519. X  echo = mode;
  520. X
  521. X  if (defmode != 0) {
  522. X    if((deftext[0] < 32) || (deftext[0] > 126)) deftext[0] = '\0';
  523. X    gll = length(deftext);
  524. X    lenmem = len - gll;
  525. X    if(deftext[0] != '\0'){
  526. X        sprintf(gls, "%s", deftext);
  527. X        printf("%s", deftext);
  528. X    }
  529. X    else gls[0] = '\0';
  530. X  }
  531. X  else {
  532. X    gll = 0;
  533. X    strcpy(gls, (unsigned char *) "OOPS");
  534. X  }
  535. X
  536. X  if (matrix != 0) {
  537. X    for (gli = 0; gli < lenmem; gli++) {
  538. X        if (((gli == 2) || (gli == 5)) && (delim != '\0') && (gli != len)) {
  539. X            printf("%c", delim);
  540. X        }
  541. X        else {
  542. X            printf("%c", bsc);
  543. X        }
  544. X    }
  545. X    for (gli = 0; gli < lenmem; gli++) printf("%c", BS);
  546. X  }
  547. X
  548. X  do {
  549. X
  550. X    if (delim != '\0') {
  551. X        if (((gll == 2) || (gll == 5)) && (gll < len)){
  552. X            c = delim;
  553. X        }
  554. X        else {
  555. X            c = getint();  
  556. X        }
  557. X    }
  558. X    else {
  559. X        c = getint();  
  560. X    }        
  561. X
  562. X    if(siebenbit != 0){
  563. X        if(c > 127) c = 0;
  564. X    }
  565. X
  566. X    if (c == ESC) {
  567. X        c = getint();  
  568. X        c = getint();  
  569. X        if ((c == 'A') || (c == 'B')) {
  570. X            if (c == 'A') endless++;
  571. X            if (c == 'B') endless--;
  572. X            if (endless < 1) endless = 9;
  573. X            if (endless > 9) endless = 1;
  574. X            sprintf(gls, "%d", endless);
  575. X            return (unsigned char *) gls;
  576. X        }
  577. X        if (c == 'D') c = BS;
  578. X        if (c == 'C') c = ENTER;
  579. X    }
  580. X    if ((c == CTRL_X) || (c == CTRL_D) || (c == DEL)) {
  581. X        return("<BREAK>");
  582. X    }
  583. X    if (c != ENTER) {
  584. X        if ((c == BS) && (gll > 0)) {
  585. X            if (((gll == 3) || (gll == 6)) && (delim != '\0')) {
  586. X                gll -= 2;
  587. X                printf("%c%c%c%c", BS, BS, bsc, BS);
  588. X            } else {
  589. X                gll--;
  590. X                printf("%c%c%c", BS, bsc, BS);
  591. X            }
  592. X        }
  593. X        if (numerics == 0) {
  594. X            if (c >= 32) {
  595. X                if(letters != 0){
  596. X                    if((c < 'A') && (c != ' ')) c = 0;
  597. X                    if(c > 'z') c = 0;
  598. X                    if((c > 'Z') && (c < 'a')) c = 0;
  599. X
  600. X                    if(c == ' '){
  601. X                        if(lastwasblank != 0) c = 0;
  602. X                        lastwasblank++;
  603. X                    }
  604. X                    else{
  605. X                        if(c != 0) lastwasblank = 0;
  606. X                    }                
  607. X
  608. X                    /*
  609. X                    if((c == 0) && (USER.bell == 1))
  610. X                        printf("%c", BELL);
  611. X                    */
  612. X                    if(c == 0)
  613. X                        printf("%c", BELL);
  614. X                }
  615. X                if(c != 0){
  616. X                    gls[gll] = c;
  617. X                    gll++;
  618. X                }
  619. X            }
  620. X            else {
  621. X                c = 0;
  622. X            }
  623. X        }
  624. X        else {
  625. X            if ((c == '.') || (c == ':') || ((c >= '0') && (c <= '9'))) {
  626. X                if (((delim != '\0') && ((c == '.') || (c == ':'))) &&
  627. X                    ((gll != 2) && (gll != 5))) {
  628. X                    printf("%c", BELL);
  629. X                    c = 0;
  630. X                }
  631. X                else {
  632. X                    gls[gll] = c;
  633. X                    gll++;
  634. X                    gls[gll] = '\0';
  635. X                }
  636. X            }
  637. X            else {
  638. X                if (c != BS) printf("%c", BELL);
  639. X                c = 0;
  640. X            }
  641. X        }
  642. X        if (c != 0) {
  643. X            if (echo == 1) printf("%c", c);
  644. X            if (echo == 2) printf("*");
  645. X        }
  646. X    }
  647. X    if (gll == 1) {
  648. X        if ((escape != 0) && ((c > 47) && (c < 58))) {
  649. X            gls[gll] = '\0';
  650. X            return (unsigned char *) gls;
  651. X        }
  652. X    }
  653. X
  654. X  } while ((c != ENTER) && (gll < len));
  655. X
  656. X  gls[gll] = '\0';
  657. X
  658. X  return (unsigned char *) gls;
  659. X}
  660. X
  661. X
  662. X
  663. X
  664. X
  665. X/***************************************************************************/
  666. X/*      FUNKTION  getint()                            */
  667. X/*  BESCHREIBUNG  Ein Zeichen wird mit Hilfe der "getch"-Funktion einge-   */
  668. X/*          lesen. Es wird gewartet bis ein Zeichen erfasst ist.     */
  669. X/*     PARAMETER  keine                                                    */
  670. X/*     RUECKGABE  Eingelesenes Zeichen (INT)                   */
  671. X/***************************************************************************/
  672. X
  673. X
  674. Xint getint()
  675. X{
  676. X  int c;
  677. X
  678. X
  679. X  if(UMLAUT != 0){
  680. X    c = UMLAUT;
  681. X    UMLAUT = 0;
  682. X    return (int) c;
  683. X  }
  684. X
  685. X  do{
  686. X    c = (int) getch();
  687. X
  688. X#ifndef _UMLAUT
  689. X
  690. X    if(c > 127){
  691. X
  692. X        UMLAUT = 'e';
  693. X
  694. X        switch(c){
  695. X            case 142 : c = 'A'; /* IBM 'Ae' */
  696. X                   break;
  697. X            case 153 : c = 'O'; /* IBM 'Oe' */
  698. X                   break;
  699. X            case 154 : c = 'U'; /* IBM 'Ue' */
  700. X                   break;
  701. X            case 132 : c = 'a'; /* IBM 'ae' */
  702. X                   break;
  703. X            case 148 : c = 'o'; /* IBM 'oe' */
  704. X                   break;
  705. X            case 129 : c = 'u'; /* IBM 'ue' */
  706. X                   break;
  707. X            case 225 : c = 's'; /* IBM 'ss' */
  708. X                   UMLAUT = 's';
  709. X                   break;
  710. X
  711. X            case 196 : c = 'A'; /* AMIGA 'Ae' */
  712. X                   break;
  713. X            case 214 : c = 'O'; /* AMIGA 'Oe' */
  714. X                   break;
  715. X            case 220 : c = 'U'; /* AMIGA 'Ue' */
  716. X                   break;
  717. X            case 228 : c = 'a'; /* AMIGA 'ae' */
  718. X                   break;
  719. X            case 246 : c = 'o'; /* AMIGA 'oe' */
  720. X                   break;
  721. X            case 252 : c = 'u'; /* AMIGA 'ue' */
  722. X                   break;
  723. X            case 223 : c = 's'; /* AMIGA 'ss' */
  724. X                   UMLAUT = 's';
  725. X                   break;
  726. X
  727. X#ifdef I_LIKE_CONFUSIONS
  728. X                case 128 : c = 'A'; /* APPLE 'Ae' */
  729. X                   break;
  730. X            case 133 : c = 'O'; /* APPLE 'Oe' */
  731. X                   break;
  732. X            case 134 : c = 'U'; /* APPLE 'Ue' */
  733. X                   break;
  734. X            case 138 : c = 'a'; /* APPLE 'ae' */
  735. X                   break;
  736. X            case 154 : c = 'o'; /* APPLE 'oe' */
  737. X                   break;
  738. X            case 159 : c = 'u'; /* APPLE 'ue' */
  739. X                   break;
  740. X            case 167 : c = 's'; /* APPLE 'ss' */
  741. X                   UMLAUT = 's';
  742. X                   break;
  743. X#endif /* _CONFUSION */
  744. X            default  : UMLAUT = 0;
  745. X        }        
  746. X        }
  747. X
  748. X  }while((c == 0) || (c > 127));
  749. X
  750. X#else /* _UMLAUT */
  751. X
  752. X  }while(c == 0);
  753. X
  754. X#endif /* _UMLAUT */
  755. X
  756. X
  757. X  return (int) c;
  758. X}
  759. X
  760. X
  761. X
  762. X
  763. X/***************************************************************************/
  764. X/*      FUNKTION  yesno()                           */
  765. X/*  BESCHREIBUNG  Die Zeichen "j", "J", "n" oder "N" werden ausschliess-   */
  766. X/*          lich eingelesen und zurueckgegeben.                       */
  767. X/*     PARAMETER  keine                                                       */
  768. X/*     RUECKGABE  Eines der Zeichen (siehe oben) (INT)               */
  769. X/***************************************************************************/
  770. X
  771. Xint yesno()
  772. X{
  773. X  int c;
  774. X
  775. X  do {
  776. X    c = getint();
  777. X    if (c >= 97) c -= 32;
  778. X    if ((c != GBL06_MSG) && (c != GBL07_MSG)) c = 0;
  779. X  } while (c == 0);
  780. X
  781. X  printf("%c", c);
  782. X
  783. X  return (int) c;
  784. X}
  785. X
  786. X
  787. END_OF_FILE
  788.   if test 8445 -ne `wc -c <'src/getline.c'`; then
  789.     echo shar: \"'src/getline.c'\" unpacked with wrong size!
  790.   fi
  791.   # end of 'src/getline.c'
  792. fi
  793. if test -f 'src/main.c' -a "${1}" != "-c" ; then 
  794.   echo shar: Will not clobber existing file \"'src/main.c'\"
  795. else
  796.   echo shar: Extracting \"'src/main.c'\" \(7181 characters\)
  797.   sed "s/^X//" >'src/main.c' <<'END_OF_FILE'
  798. X/***************************************************************************/
  799. X/*        PROGRAMM  ix/Mbox                           */
  800. X/*             DATEI  main.c                           */
  801. X/*        FUNKTIONEN  logout(), init(), fixoutput(), main()           */
  802. X/*             AUTOR  vs (Volker Schuermann/MINIX-Version)           */
  803. X/*  LETZTE AENDERUNG  13.06.1992                       */
  804. X/***************************************************************************/
  805. X   
  806. X#include <sys/types.h>
  807. X#include <unistd.h>
  808. X#include <stdio.h>
  809. X#include <time.h>
  810. X#include <fcntl.h>
  811. X
  812. X#include "mbox.h"
  813. X
  814. Xextern time_t time_start, time_now;
  815. X
  816. X
  817. X
  818. X/***************************************************************************/
  819. X/*      FUNKTION  logout()                           */
  820. X/*  BESCHREIBUNG  Entfernt den User aus "WHO" und reorganisiert seine      */
  821. X/*          Teilnehmerdaten.                                         */
  822. X/*     PARAMETER  keine                                                       */
  823. X/*     RUECKGABE  keine                               */
  824. X/***************************************************************************/
  825. X
  826. Xvoid logout()
  827. X{
  828. X  FILE *fp;
  829. X  FILE *ff;
  830. X  unsigned char s[STRING];
  831. X  unsigned char t[STRING];
  832. X  unsigned char u[STRING];
  833. X  unsigned char f[STRING];
  834. X  long ll;
  835. X  int a, b;
  836. X  int fd;
  837. X  struct tm *timeptr;
  838. X  struct userdaten DUMMY;
  839. X  int dummy = sizeof(DUMMY);
  840. X
  841. X  printf("\n");
  842. X
  843. X
  844. X  time(&time_now);
  845. X  USER.elapsed += (long) (time_now - time_start);
  846. X
  847. X  sprintf(f, "%s/who%d", TMP, getpid());
  848. X  maybe_locked(WHO, "r"); mblock(WHO);
  849. X  fp = fopen(WHO, "r");
  850. X  if (fp == NULL) {
  851. X    nerror("main.c", 34, "logout", "Datei-Lesefehler", WHO);
  852. X  }
  853. X 
  854. X  strcpy(t, (unsigned char *) ttyna()); t[9] = '\0';
  855. X
  856. X  ff = fopen(f, "w");
  857. X  if (ff == NULL) {
  858. X    nerror("main.c", 38, "logout", "Datei-Schreibfehler", f);
  859. X  }
  860. X  while (fgets(s, 80, fp) != NULL) {
  861. X    if(strcomp(t, s) != 0) fputs(s, ff);
  862. X  }
  863. X  fclose(ff);
  864. X  fclose(fp);
  865. X  sprintf(s, "cp %s %s", f, WHO);
  866. X  system(s);
  867. X  unlink(f);
  868. X  mbunlock(WHO);
  869. X
  870. X  strcpy(s, HOME); strcat(s, "/etc/");
  871. X  strcat(s, (unsigned char *) ttyna()); strcat(s, ".");
  872. X  unlink( s );
  873. X
  874. X  sprintf(USER.abused, "%ld", IDX_SIZE);
  875. X
  876. X  USER.seq--;        
  877. X  printf("\n");
  878. X  init_user( MAI01_MSG );
  879. X
  880. X#ifdef _NOINDEX
  881. X  sprintf(s, "%s/inhalt.%d", TMP, getpid());
  882. X  unlink(s);
  883. X#endif
  884. X
  885. X  control(MAI02_MSG, 3);
  886. X}
  887. X
  888. X
  889. X
  890. X/***************************************************************************/
  891. X/*      FUNKTION  init()                           */
  892. X/*  BESCHREIBUNG  Liest die Befehle aus "BEFEHLE", fuellt die Befehl-      */
  893. X/*          Stuktur und verteilt die Level-Vorgaben.                 */
  894. X/*     PARAMETER  keine                                                       */
  895. X/*     RUECKGABE  keine                               */
  896. X/***************************************************************************/
  897. X
  898. Xvoid init()
  899. X{
  900. X  FILE *fp;
  901. X  FILE *ff;
  902. X  unsigned char s[STRING];
  903. X  unsigned char t[STRING];
  904. X  unsigned char udcc[STRING];
  905. X  int udcl;
  906. X  unsigned char udcp[STRING];
  907. X  int b = 0;
  908. X  int ok = 0;
  909. X
  910. X  ff = fopen(UDCS, "r");
  911. X  if (ff == NULL) {
  912. X    nerror("main.c", 115, "init", "Datei-Lesefehler", "./etc/mbox.udc");
  913. X    exit(0);
  914. X  }  
  915. X  while((fgets(s, 80, ff) != NULL) && (s[0] == '/'));
  916. X  if(fgets(s, 80, ff) != NULL) ok = 1;
  917. X  sscanf(s, "%s %d %s %s", udcc, &udcl, udcp, t);
  918. X  if(udcc[0] > 96) udcc[0] -= 32;
  919. X  strcat(udcp, " "); strcat(udcp, t);
  920. X
  921. X  fp = fopen(BEFEHLE, "r");
  922. X  if (fp == NULL) {
  923. X    nerror("main.c", 68, "init", "Datei-Lesefehler", BEFEHLE);
  924. X  }
  925. X  while((fgets(s, 80, fp) != NULL) && (s[0] == '/'));
  926. X  
  927. X  fgets(s, 80, fp); /* 3 Zeilen nach dem Kommentar (exakt 3 Zeilen !!!) */
  928. X  fgets(s, 80, fp);
  929. X
  930. X  while (fscanf(fp, "%d %d %d %d %s", &BEF[b].id, &BEF[b].in, &BEF[b].ex, &BEF[b].prototyp, BEF[b].befehl) > 0) {
  931. X
  932. X    if (BEF[b].id == 160) MAILOUT_LEV = BEF[b].ex;
  933. X    if (BEF[b].id == 125) ADMIN_LEV = BEF[b].ex;
  934. X    if (BEF[b].id == 230) WRITE_EX_LEV = BEF[b].ex;
  935. X    if (BEF[b].id == 230) WRITE_IN_LEV = BEF[b].in;
  936. X    if (BEF[b].id == 998) WRITE_INTERNAT = BEF[b].in;
  937. X    if (BEF[b].id == 195) PD_D_LEV = BEF[b].in;
  938. X    if (BEF[b].id == 195) PD_U_LEV = BEF[b].ex;
  939. X    if (BEF[b].id == 240) EXE_LEV = BEF[b].ex;
  940. X    if (BEF[b].id == 320) GUEST_LEV = BEF[b].in;
  941. X    if (BEF[b].id == 130) BB1 = b;
  942. X    if (BEF[b].id == 150) BB2 = b;
  943. X    if (BEF[b].id == 160) BB3 = b;
  944. X    if (BEF[b].id == 170) BB4 = b;
  945. X    if (BEF[b].id == 210) BB5 = b;
  946. X    if (BEF[b].id == 180) BB6 = b;
  947. X    if (BEF[b].id == 190) BB7 = b;
  948. X    if (BEF[b].id == 200) BB8 = b;
  949. X    if (BEF[b].id == 270) BB9 = b;
  950. X
  951. X    if((ok == 1) && (BEF[b].prototyp == 1) && (udcc[0] < BEF[b].befehl[0])){
  952. X        BEF[(b+1)].id = BEF[b].id;
  953. X        BEF[(b+1)].in = BEF[b].in;
  954. X        BEF[(b+1)].ex = BEF[b].ex;
  955. X        BEF[(b+1)].prototyp = BEF[b].prototyp;
  956. X        strcpy(BEF[(b+1)].befehl, (unsigned char *) BEF[b].befehl);
  957. X        BEF[b].id = 1000;
  958. X        BEF[b].in = udcl;
  959. X        BEF[b].ex = udcl;
  960. X        BEF[b].prototyp = 1;
  961. X        strcpy(BEF[b].befehl, (unsigned char *) udcc);
  962. X        strcpy(BEF[b].pfad, (unsigned char *) udcp);
  963. X        b++;
  964. X        if(fgets(s, 80, ff) == NULL) ok = 0;
  965. X        sscanf(s, "%s %d %s %s", udcc, &udcl, udcp, t);
  966. X        if(udcc[0] > 96) udcc[0] -= 32;
  967. X        strcat(udcp, " "); strcat(udcp, t);
  968. X    }
  969. X
  970. X    b++;
  971. X    if (b >= MAX_BEF) {
  972. X        nerror("main.c", 85, "init", "MAX_BEF ueberschritten !!", "???");
  973. X    }
  974. X  }
  975. X  BEF[b].id = -1;
  976. X
  977. X  fclose(fp);
  978. X  fclose(ff);
  979. X}
  980. X
  981. X
  982. X
  983. X/***************************************************************************/
  984. X/*      FUNKTION  fixoutput()                           */
  985. X/*  BESCHREIBUNG  Legt fest an welches Geraet, oder in welche Datei, die   */
  986. X/*          Logbuch-Eintraege geschickt werden.               */
  987. X/*     PARAMETER  keine                                                       */
  988. X/*     RUECKGABE  keine                               */
  989. X/***************************************************************************/
  990. X
  991. Xvoid fixoutput()
  992. X{
  993. X  unsigned char s[STRING];
  994. X
  995. X  FILE *fp;
  996. X
  997. X  strcpy(s, CONSOLE); CONSOLE_REDIRECT[0] = '\0';
  998. X
  999. X  if(strcomp("REDIRECT", CONSOLE) == 0){
  1000. X    fp = fopen( CDIRECTFL, "r" );
  1001. X    if(fp != NULL){
  1002. X        fgets(s, STRING, fp);
  1003. X        fclose(fp);
  1004. X        
  1005. X    }
  1006. X   }
  1007. X   strcat(CONSOLE_REDIRECT, (unsigned char *) stripped(s));
  1008. X}
  1009. X
  1010. X
  1011. X
  1012. X
  1013. X/***************************************************************************/
  1014. X/*      FUNKTION  main()                           */
  1015. X/*  BESCHREIBUNG  Hauptfunktion. Rettet UID/GID, initialisiert, startet    */
  1016. X/*          die MBox-Funktionen und terminiert.                      */
  1017. X/*     PARAMETER  keine                                                       */
  1018. X/*     RUECKGABE  "Exit-Status"                           */
  1019. X/***************************************************************************/
  1020. X
  1021. Xint main(argc, argv)
  1022. Xint argc;
  1023. Xunsigned char *argv[];
  1024. X{
  1025. X  FILE *fp;
  1026. X  int i;
  1027. X
  1028. X#if defined(_ESTDIO) || !defined(_SYS7)
  1029. X  setbuf(stdout, NULL);
  1030. X#endif
  1031. X
  1032. X
  1033. X  chdir(HOME);
  1034. X
  1035. X  OLDUID = getuid();
  1036. X  OLDGID = getgid();
  1037. X
  1038. X  sprintf(MYNAME, "%s", "J. Random Looser");
  1039. X
  1040. X  fp = fopen( UDBASE, "r" );
  1041. X  if(fp == NULL){
  1042. X    strcpy(TERMINAL, "ansi");
  1043. X    ansi("INIT");
  1044. X
  1045. X    headline( MAI03_MSG );
  1046. X    ansi("md");
  1047. X    printf("\n%s", MAI04_MSG);
  1048. X    printf("\n%s", MAI05_MSG);
  1049. X    printf("\n%s", MAI06_MSG);
  1050. X    printf("\n");
  1051. X    printf("\n%s", MAI07_MSG);
  1052. X    printf("\n%s", MAI08_MSG);
  1053. X    printf("\n%s\n\n", MAI09_MSG);
  1054. X    ansi("me");
  1055. X
  1056. X    postfach( "#1" );
  1057. X    postfach( "#2" );
  1058. X
  1059. X    ansi("md");
  1060. X    printf("\n%s\n\n", MAI10_MSG);
  1061. X    ansi("me");
  1062. X    return 0;
  1063. X  }
  1064. X  fclose(fp);
  1065. X
  1066. X  fixoutput();
  1067. X  init();  
  1068. X  intro();
  1069. X  get_makros();
  1070. X  ctrlx();
  1071. X
  1072. X  loop();
  1073. X
  1074. X  logout();
  1075. X  noctrlx();
  1076. X  ansi("md");
  1077. X  printf("\n\n%s\n\n", MAI11_MSG);
  1078. X  ansi("me");
  1079. X
  1080. X  return 0;
  1081. X}
  1082. END_OF_FILE
  1083.   if test 7181 -ne `wc -c <'src/main.c'`; then
  1084.     echo shar: \"'src/main.c'\" unpacked with wrong size!
  1085.   fi
  1086.   # end of 'src/main.c'
  1087. fi
  1088. if test -f 'wendy/misc.c' -a "${1}" != "-c" ; then 
  1089.   echo shar: Will not clobber existing file \"'wendy/misc.c'\"
  1090. else
  1091.   echo shar: Extracting \"'wendy/misc.c'\" \(8395 characters\)
  1092.   sed "s/^X//" >'wendy/misc.c' <<'END_OF_FILE'
  1093. X#include "wendy.h"
  1094. X
  1095. X
  1096. Xunsigned char *right_stripped();
  1097. X
  1098. X
  1099. X
  1100. X/*    Eingabe zeilenweise in Blocksatz umformen     */
  1101. X
  1102. Xblockset()
  1103. X{
  1104. X  FILE *fp;
  1105. X
  1106. X  unsigned char s[STRING];
  1107. X  unsigned char a[STRING];
  1108. X  unsigned char q[LONGSTRING];
  1109. X
  1110. X  int i, j = 0, l;
  1111. X  int WIDE = MAXX;
  1112. X  int whitespace = 1;
  1113. X
  1114. X  
  1115. X  strcpy(s, (unsigned char *) SCREEN[y]); l = strlen((unsigned char *) right_stripped(s));
  1116. X
  1117. X  if(l < ((WIDE / 10) * 8)) return;
  1118. X
  1119. X  while(l < WIDE){
  1120. X    i = 0; whitespace = 1;
  1121. X
  1122. X    while((l < WIDE) && (i < WIDE)){
  1123. X        if(SCREEN[y][i] != BLANK) whitespace = 0;
  1124. X        if(whitespace == 1){
  1125. X            i++;
  1126. X            continue;
  1127. X        }
  1128. X        strcpy(s, (unsigned char *) SCREEN[y]);
  1129. X        strcpy(a, (unsigned char *) ATTRIB[y]);
  1130. X
  1131. X        if(isin(".!?,;:", SCREEN[y][i]) != 0){
  1132. X            if((WIDE - l - 3) > 0){
  1133. X                i++;
  1134. X                SCREEN[y][i] = '\0';
  1135. X                strcat(SCREEN[y], (unsigned char *) "   ");
  1136. X                strcat(SCREEN[y], (unsigned char *) strcopy(s, i, l));
  1137. X                ATTRIB[y][i]   = ATTRIB[y][i-1];
  1138. X                ATTRIB[y][i+1] = ATTRIB[y][i-1];
  1139. X                ATTRIB[y][i+2] = ATTRIB[y][i-1];
  1140. X                ATTRIB[y][i+3] = '\0';
  1141. X                strcat(ATTRIB[y], (unsigned char *) strcopy(a, i, l));                
  1142. X                i += 2;
  1143. X            }
  1144. X        }
  1145. X        if(SCREEN[y][i] == BLANK){
  1146. X            i++;
  1147. X            SCREEN[y][i] = '\0';
  1148. X            strcat(SCREEN[y], (unsigned char *) " ");
  1149. X            strcat(SCREEN[y], (unsigned char *) strcopy(s, i, l));
  1150. X            ATTRIB[y][i] = ATTRIB[y][i-1];
  1151. X            ATTRIB[y][i+1] = '\0';
  1152. X            strcat(ATTRIB[y], (unsigned char *) strcopy(a, i, l));                
  1153. X        }
  1154. X        i++;
  1155. X        strcpy(q, (unsigned char *) SCREEN[y]);
  1156. X        l = strlen((unsigned char *) right_stripped(q));
  1157. X    }
  1158. X  }
  1159. X}
  1160. X
  1161. X
  1162. X
  1163. X/*    Datei einfuegen        */  
  1164. X
  1165. Xinsert_file( t )
  1166. Xunsigned char t[];
  1167. X{
  1168. X  unsigned char s[STRING];
  1169. X  unsigned char path[STRING];
  1170. X  unsigned char tmp[STRING];
  1171. X  int i = 0, ynow;
  1172. X
  1173. X  FILE *fp, *ff;  
  1174. X
  1175. X  while((t[i] != ' ') && (t[i] != '\0')) i++;
  1176. X  strcpy(path, (unsigned char *) strcopy(t, (i+1), strlen(t)));
  1177. X
  1178. X  fp = fopen( path, "r" );
  1179. X  if(fp == 0){
  1180. X#ifdef _LOCAL
  1181. X    sprintf(t, "Datei <%s> nicht gefunden.", path);
  1182. X#else
  1183. X    sprintf(t, "File <%s> not found.", path);
  1184. X#endif
  1185. X        return;
  1186. X  }
  1187. X
  1188. X  sprintf(tmp, "/tmp/wendy.%d", getpid());
  1189. X
  1190. X  ynow = ypos + y;
  1191. X
  1192. X  restore_screen( ypos );
  1193. X
  1194. X  ff = fopen( tmp, "w" );
  1195. X  for(i = ynow; i <= lastline; i++){
  1196. X    fprintf(ff, "%s\n", TEXT[i]);
  1197. X  }
  1198. X  fclose(ff);
  1199. X
  1200. X  lastline = ynow;
  1201. X
  1202. X  while(fgets(TEXT[lastline], LINELENGTH, fp) != 0) lastline++;
  1203. X  fclose(fp);   
  1204. X
  1205. X  fp = fopen( tmp, "r" );
  1206. X  while(fgets(TEXT[lastline], LINELENGTH, fp) != 0) lastline++;
  1207. X  fclose(fp);
  1208. X
  1209. X  unlink( tmp );
  1210. X 
  1211. X  prep_screen( ypos );
  1212. X  show_screen( START );
  1213. X}
  1214. X
  1215. X
  1216. X
  1217. X/*    ASCII-Schrott (incl. BLANK ;-) auf der rechten Seite abschneiden    */
  1218. X
  1219. Xunsigned char *right_stripped( s )
  1220. Xunsigned char s[];
  1221. X{
  1222. X  int i;
  1223. X  
  1224. X  i = strlen( (unsigned char *) s);
  1225. X
  1226. X  while(((s[i] < 33) || (s[i] == BLANK)) && (i > -1)) i--;
  1227. X  i++;
  1228. X  s[i] = '\0';
  1229. X
  1230. X  return (unsigned char *) s;
  1231. X}
  1232. X
  1233. X
  1234. X
  1235. X/*    Hilfe!        */
  1236. X
  1237. Xhelp()
  1238. X{
  1239. X  FILE *fp;
  1240. X  unsigned char s[STRING];
  1241. X  int c, i;
  1242. X
  1243. X  restore_screen( ypos );
  1244. X
  1245. X  ansi( "cl" );
  1246. X  c = MAXY;
  1247. X  MAXY = 0;
  1248. X  show_status( VERSION ); /* !! */
  1249. X  MAXY = c;
  1250. X
  1251. X  i = START;
  1252. X
  1253. X  fp = fopen( HILFE, "r" );
  1254. X  if(fp == NULL){
  1255. X#ifdef _LOCAL
  1256. X    printf("\n\nDatei <%s> nicht gefunden!\n\n", HILFE);
  1257. X#else
  1258. X    printf("\n\nDatei <%s> not found!\n\n", HILFE);
  1259. X#endif
  1260. X  }
  1261. X  else{
  1262. X    while(fgets(s, STRING, fp) != 0){
  1263. X        ansi2( "cm", 1, i );
  1264. X        printf("%s\n", right_stripped(s));    
  1265. X        i++;
  1266. X    }
  1267. X    fclose(fp);
  1268. X  }
  1269. X
  1270. X  c = getch();
  1271. X
  1272. X  ansi( "cl" );
  1273. X
  1274. X  show_status( version );
  1275. X  prep_screen( ypos );
  1276. X  show_screen( START );
  1277. X}
  1278. X
  1279. X
  1280. X
  1281. X
  1282. X
  1283. X/*    Zeichen einfuegen    */
  1284. X
  1285. Xinsert( c )
  1286. Xunsigned char c;
  1287. X{
  1288. X  unsigned char s[STRING];
  1289. X  unsigned char q[LONGSTRING];
  1290. X
  1291. X  strcpy(q, (unsigned char *) SCREEN[y]);
  1292. X
  1293. X  if(strlen((unsigned char *) right_stripped(q)) >= MAXX){
  1294. X    printf("%c", 7);
  1295. X    if(x >= MAXX) x = MAXX;
  1296. X    ansi2( "cm", x, y );
  1297. X    return;
  1298. X  }
  1299. X
  1300. X  if(c == ' ') c = BLANK;
  1301. X
  1302. X  strcpy(s, (unsigned char *) SCREEN[y]);
  1303. X  s[x] = '\0'; 
  1304. X  s[(x-1)] = c; 
  1305. X  strcpy(q, (unsigned char *) SCREEN[y]);
  1306. X  strcat(s, (unsigned char *) right_stripped(strcopy(q, (x-1), strlen(q))));
  1307. X  strcat(s, " ");
  1308. X  s[MAXX] = '\0';    
  1309. X  strcpy(SCREEN[y], (unsigned char *) s);
  1310. X
  1311. X  strcpy(s, (unsigned char *) ATTRIB[y]);
  1312. X  s[x] = '\0';
  1313. X  s[(x-1)] = RTF_attrib;
  1314. X  strcpy(q, (unsigned char *) ATTRIB[y]);
  1315. X  strcat(s, (unsigned char *) right_stripped(strcopy(q, (x-1), strlen(q))));
  1316. X  strcat(s, "0");
  1317. X  s[MAXX] = '\0';    
  1318. X  strcpy(ATTRIB[y], (unsigned char *) s);
  1319. X
  1320. X  if(ansi( "ic") != 0){
  1321. X    show_line( SCREEN[y], ATTRIB[y], x );
  1322. X  }
  1323. X  else{
  1324. X    if(c == BLANK)
  1325. X        printf(" ");
  1326. X    else
  1327. X        printf("%c", c);        
  1328. X  }
  1329. X  x++;
  1330. X  ansi2( "cm", x, y );
  1331. X}
  1332. X
  1333. X
  1334. X
  1335. X/*    ENTER    */
  1336. X
  1337. Xenter()
  1338. X{
  1339. X  int i, j;
  1340. X  int memo;
  1341. X  int ymem = y;
  1342. X  
  1343. X      
  1344. X  if(FORMATTER == 'b'){
  1345. X    blockset();
  1346. X    ansi( "me" );
  1347. X    show_line( SCREEN[y], ATTRIB[y], 1 );  
  1348. X    activate( RTF_attrib );
  1349. X  }
  1350. X 
  1351. X  if(INS_mode != 0){
  1352. X    memo = SCREEN[y][x]; 
  1353. X    SCREEN[y][x] = (126);
  1354. X    restore_screen( ypos );
  1355. X    j = ypos + y - 2;
  1356. X        for(i = lastline; i > j; i--){
  1357. X        strcpy(TEXT[i+1], (unsigned char *) TEXT[i]);
  1358. X        FLAG[i+1] = FLAG[i];
  1359. X    } 
  1360. X    lastline++;
  1361. X
  1362. X    i = 0; j++;
  1363. X    while((TEXT[j][i] != (126)) && (TEXT[j][i] != '\0')) i++;
  1364. X    TEXT[j][i] = memo;
  1365. X
  1366. X    strcpy(TEXT[(j+1)], (unsigned char *) strcopy(TEXT[j], (i-1), strlen(TEXT[j])));
  1367. X    TEXT[j][(i-1)] = '\0'; strcat(TEXT[j], (unsigned char *) "<nl>\n");
  1368. X
  1369. X    prep_screen( ypos );
  1370. X    ansi2( "cm", 1, MAXY );
  1371. X    ansi( "ce" );
  1372. X    ansi2( "cm", x, y );
  1373. X
  1374. X    if(ansi( "al" ) != 0){
  1375. X        show_screen( (y-1) );    
  1376. X    }
  1377. X    else{
  1378. X        show_line( SCREEN[y], ATTRIB[y], 1);
  1379. X        y++;
  1380. X        show_line( SCREEN[y], ATTRIB[y], 1);
  1381. X        y--;
  1382. X    }
  1383. X  }
  1384. X  if(y < MAXY){
  1385. X    lastline++;
  1386. X    ansi( "do" );
  1387. X    y++; 
  1388. X  }
  1389. X  else{
  1390. X    ctrlj();
  1391. X  }
  1392. X  x = 1;
  1393. X  ansi2( "cm", x, y );
  1394. X}
  1395. X
  1396. X
  1397. X
  1398. X/*    VI Kommando-Modus (SUBSET!)    */
  1399. X
  1400. Xint vi( f )
  1401. Xunsigned char f[];
  1402. X{
  1403. X  unsigned char s[STRING];
  1404. X  int mode = 0;
  1405. X  int newp = 0;
  1406. X
  1407. X  show_status( ":" );
  1408. X  ansi( "mr" );
  1409. X  strcpy(s, (unsigned char *) getline( 70, 1, 32, "" ));
  1410. X
  1411. X
  1412. X  newp = atoi(s);
  1413. X  if(newp > 0){
  1414. X    restore_screen( ypos );    
  1415. X
  1416. X    if(newp > (lastline - MAXY))
  1417. X        ypos = (lastline - MAXY);
  1418. X    else
  1419. X        ypos = newp;
  1420. X
  1421. X    y = START;
  1422. X
  1423. X    prep_screen( ypos );
  1424. X    show_screen( START );     
  1425. X  }
  1426. X
  1427. X  if((strcomp(s, "w")    == 0) || (strcomp(s, "w!") == 0)) ctrlw( f );
  1428. X  if(strcomp("set ", s)  == 0) ctrls();
  1429. X  if((strcomp(s, "q")    == 0) || (strcomp(s, "q!") == 0)){
  1430. X    ctrlx( f );
  1431. X    mode = CTRL_X;
  1432. X  }
  1433. X  if(strcomp(s, "i")    == 0) ctrlv();
  1434. X  if(strcomp("r ", s)    == 0) insert_file( s );
  1435. X
  1436. X  activate( RTF_attrib );
  1437. X  ansi2( "cm", x, y );
  1438. X
  1439. X  return mode;
  1440. X}
  1441. X
  1442. X
  1443. X
  1444. X/*    PGUP    */
  1445. X
  1446. Xpgup()
  1447. X{
  1448. X  int oldypos = ypos;
  1449. X  
  1450. X
  1451. X  if((ypos - (MAXY -1)) > 1) 
  1452. X    ypos -= (MAXY -1);
  1453. X  else
  1454. X    ypos = 1;
  1455. X
  1456. X  if(ypos == oldypos) return;
  1457. X
  1458. X  restore_screen( oldypos );
  1459. X  prep_screen( ypos );
  1460. X  show_screen( START );
  1461. X}
  1462. X
  1463. X
  1464. X
  1465. X/*    PGDN    */
  1466. X
  1467. Xpgdn()
  1468. X{
  1469. X  int oldypos = ypos;
  1470. X
  1471. X  if((ypos + (MAXY -1)) < (lastline - (MAXY -1))) 
  1472. X    ypos += (MAXY -1);
  1473. X  else
  1474. X    ypos = lastline - MAXY;
  1475. X  if(ypos < 1) ypos = 1;
  1476. X
  1477. X  if(ypos == oldypos) return;
  1478. X
  1479. X  restore_screen( oldypos );
  1480. X  prep_screen( ypos );
  1481. X  show_screen( START );
  1482. X}
  1483. X
  1484. X
  1485. X
  1486. X
  1487. X/*    Eingabe direkt zentriert ausgeben     */
  1488. X
  1489. Xcenter()
  1490. X{
  1491. X  int i, j = strlen((unsigned char *) stripped(SCREEN[y]));
  1492. X
  1493. X  unsigned char s[LONGSTRING];
  1494. X  unsigned char t[STRING];
  1495. X 
  1496. X
  1497. X  i = (MAXX - j) / 2;
  1498. X 
  1499. X  strcpy(s, (unsigned char *) "                                                    ");
  1500. X  s[i] = '\0'; strcat(s, (unsigned char *) stripped(SCREEN[y]));
  1501. X  strcat(s, (unsigned char *) "                                                    ");
  1502. X  s[MAXX] = '\0';
  1503. X  strcpy(SCREEN[y], (unsigned char *) s);
  1504. X 
  1505. X  strcpy(ATTRIB[y], (unsigned char *) "00000000000000000000000000000000000000000000000000000000000000000000000000000000");
  1506. X 
  1507. X  show_line( SCREEN[y], ATTRIB[y], 1 );
  1508. X  strcpy(s, (unsigned char *) SCREEN[y]);
  1509. X  x = strlen( (unsigned char *) right_stripped(s)) + 1;
  1510. X  FLAG[(ypos + y - 1)] |= is_centered;
  1511. X  ansi2( "cm", x, y );
  1512. X}
  1513. X 
  1514. X
  1515. X
  1516. X/*    Cursor zum Zeilenende     */
  1517. X
  1518. Xlines_end()
  1519. X{
  1520. X  unsigned char s[STRING];
  1521. X
  1522. X  strcpy(s, (unsigned char *) SCREEN[y]);
  1523. X  x = strlen((unsigned char *) right_stripped(s)) + 1;
  1524. X  if(x > MAXX) x = MAXX;
  1525. X  ansi2( "cm", x, y );
  1526. X}
  1527. X
  1528. X
  1529. X
  1530. X/*    Wordwrap: Beim Schreiben ueber das Zeilenende hinaus     */
  1531. X
  1532. Xint wordwrap()
  1533. X{
  1534. X  unsigned char s[STRING];
  1535. X  int i = MAXX -1, j = 0;
  1536. X  int a = y;
  1537. X  int b = y + 1;
  1538. X
  1539. X  while((i > 1) && (j == 0)){
  1540. X     if((SCREEN[a][i] == BLANK) || (SCREEN[a][i] < 33)) j = i;
  1541. X    i--;
  1542. X  }
  1543. X
  1544. X  if(j == 0) return 1;
  1545. X
  1546. X  j++; x = 0;
  1547. X
  1548. X  for(i = j; i <= MAXX; i++){
  1549. X    SCREEN[b][x] = SCREEN[a][i];
  1550. X    SCREEN[a][i] = BLANK;
  1551. X
  1552. X    ATTRIB[b][x] = ATTRIB[a][i];
  1553. X    ATTRIB[a][i] = '0';
  1554. X
  1555. X    x++; 
  1556. X  } 
  1557. X  show_line( SCREEN[a], ATTRIB[a], 1 );
  1558. X  y++;
  1559. X  show_line( SCREEN[b], ATTRIB[b], 1 );  
  1560. X  y = a;
  1561. X
  1562. X  return x;
  1563. X}
  1564. END_OF_FILE
  1565.   if test 8395 -ne `wc -c <'wendy/misc.c'`; then
  1566.     echo shar: \"'wendy/misc.c'\" unpacked with wrong size!
  1567.   fi
  1568.   # end of 'wendy/misc.c'
  1569. fi
  1570. if test -f 'wendy/wendy.c' -a "${1}" != "-c" ; then 
  1571.   echo shar: Will not clobber existing file \"'wendy/wendy.c'\"
  1572. else
  1573.   echo shar: Extracting \"'wendy/wendy.c'\" \(8407 characters\)
  1574.   sed "s/^X//" >'wendy/wendy.c' <<'END_OF_FILE'
  1575. X#include "wendy.h"
  1576. X
  1577. X
  1578. X 
  1579. X/*      Zeichen einlesen und bearbeiten         */
  1580. X 
  1581. Xloop( f )
  1582. Xunsigned char f[];
  1583. X{
  1584. X  unsigned char s[STRING];
  1585. X  int c;
  1586. X  int oldy = -1;
  1587. X 
  1588. X  ansi2( "cm", x, y );
  1589. X 
  1590. X  do{
  1591. X    c = getch();
  1592. X 
  1593. X    if(c == ESC){
  1594. X        c = getch();
  1595. X        if(c == ':'){
  1596. X                c = vi( f );
  1597. X                goto ENDLOOP;
  1598. X        }
  1599. X        else c *= 100;
  1600. X        c = c + getch();
  1601. X    }
  1602. X    /*
  1603. X    ansi2( "cm", 75, 1 );
  1604. X    ansi( "mr" );
  1605. X    printf("<%d> ", c);
  1606. X    ansi2( "cm", x, y );
  1607. X    activate( RTF_attrib );
  1608. X    */ 
  1609. X 
  1610. X    switch(c){
  1611. X        case ENTER      :       enter();
  1612. X                                break;
  1613. X        case CTRL_K     :
  1614. X        case UP         :       ctrlk();
  1615. X                                break;
  1616. X        case CTRL_J     :
  1617. X        case DOWN       :       ctrlj();
  1618. X                                break;
  1619. X        case LEFT       :       if(x > 1){
  1620. X                                        ansi( "kl" );
  1621. X                                        x--;
  1622. X                                }
  1623. X                else{
  1624. X                    ctrlk();
  1625. X                    lines_end();
  1626. X                }
  1627. X                                break;
  1628. X        case RIGHT      :       if(x < MAXX){
  1629. X                                        ansi( "kr" );
  1630. X                                        x++;
  1631. X                                }
  1632. X                else{
  1633. X                    ctrlj();
  1634. X                    x = 1;
  1635. X                    ansi2( "cm", x, y );
  1636. X                }
  1637. X                                break;
  1638. X        case CTRL_B     :
  1639. X        case PGUP       :       pgup();
  1640. X                                break;
  1641. X        case CTRL_F     :
  1642. X        case PGDN       :       pgdn();
  1643. X                                break;
  1644. X        case CTRL_A     :
  1645. X        case HOME       :       x = 1;
  1646. X                ansi2( "cm", x, y );
  1647. X                                break;
  1648. X    case CTRL_E    :
  1649. X    case TLX_END    :
  1650. X        case CTRL_Z     :
  1651. X        case END        :       lines_end();
  1652. X                                break;
  1653. X        case BS         :       ctrlh();
  1654. X                                CHANGED++;
  1655. X                                break;
  1656. X    case TLX_DEL    :
  1657. X        case DEL        :       x++;
  1658. X                                CHANGED++;
  1659. X                                ctrlh();
  1660. X                                break;
  1661. X    case TAB    :     x = (int)((x+8)/8*8) + 1;
  1662. X                if(x > MAXX) x = MAXX; 
  1663. X                ansi2( "cm", x, y ); 
  1664. X                break;
  1665. X        case CTRL_O     :       help();
  1666. X                                break;
  1667. X        case CTRL_P     :       if(RULER == 0){
  1668. X                    strcpy(version, (unsigned char *) RULERLINE);
  1669. X                    RULER++;
  1670. X                    xruler = -1;
  1671. X                }
  1672. X                else{
  1673. X                    RULER = 0;
  1674. X                    strcpy(version, (unsigned char *) VERSION);
  1675. X                }
  1676. X                show_status( version );
  1677. X                STATUSM = 0;
  1678. X                ansi2( "cm", x, y );
  1679. X                break;
  1680. X        case CTRL_L     :       ansi( "me" );
  1681. X                ansi2( "cm", 1, y );
  1682. X                                show_line( SCREEN[y], ATTRIB[y], 1 );
  1683. X                activate( RTF_attrib );
  1684. X                ansi2( "cm", x, y );
  1685. X                                break;
  1686. X        case CTRL_R     :       show_status( version );
  1687. X                                show_screen( START );
  1688. X                                break;
  1689. X    case CTRL_X    :    ctrlx( f );
  1690. X                break;
  1691. X    case CTRL_W    :    ctrlw( f );
  1692. X                break;
  1693. X    case CTRL_N    :    ctrln();
  1694. X                break;
  1695. X    case CTRL_U    :    ctrlu();
  1696. X                break;
  1697. X    case CTRL_T    :    ctrlt();
  1698. X                break;
  1699. X    case CTRL_S    :    ctrls();
  1700. X                break;
  1701. X    case CTRL_Y    :    ctrly();
  1702. X                break;
  1703. X    case CTRL_Q    :    block_set();
  1704. X                break;
  1705. X    case TLX_INS    :    
  1706. X    case INS    :
  1707. X    case CTRL_V    :    ctrlv();
  1708. X                break;
  1709. X    case NUM5    :
  1710. X    case CTRL_G    :    ctrlg( f );
  1711. X                break;
  1712. X    default        :       if(c > 9100){
  1713. X#ifdef _LOCAL
  1714. X                    show_status( " WENDY: Unbekannte Taste " );
  1715. X#else
  1716. X                    show_status( " WENDY: Unknown key " );    
  1717. X#endif
  1718. X                    ansi( "mr" );
  1719. X                    printf("<%d>. ", c);
  1720. X                    ansi( "me" );
  1721. X                    ansi2( "cm", x, y );
  1722. X                }
  1723. X                if((c > 31) && (c < 9100)){
  1724. X                    CHANGED++;
  1725. X                    if(INS_mode == 0){
  1726. X                        printf("%c", c);    
  1727. X                        if(c == ' ') c = BLANK;    
  1728. X                        SCREEN[y][(x-1)] = c;
  1729. X                        ATTRIB[y][(x-1)] = RTF_attrib;
  1730. X                        x++;
  1731. X                        if(x > MAXX){
  1732. X                            if(FORMATTER != 'b')
  1733. X                                x = wordwrap();
  1734. X                            if((y < MAXY) && (y < lastline))
  1735. X                                y++;
  1736. X                            else
  1737. X                                ctrlj();
  1738. X                            ansi2( "cm", x, y );
  1739. X                        }
  1740. X                    }
  1741. X                    else{
  1742. X                        insert( c );
  1743. X                    }
  1744. X                    if(FORMATTER == 'c'){
  1745. X                        center();
  1746. X                    }
  1747. X                    if((ypos + y) > lastline)
  1748. X                    lastline = ypos + y;
  1749. X                }
  1750. X    }
  1751. X
  1752. X
  1753. X
  1754. X
  1755. X    ENDLOOP:
  1756. X
  1757. X    if(oldy != y){
  1758. X    if((FLAG[(ypos + y - 1)] & is_richtext) == is_richtext){
  1759. X#ifdef _LOCAL
  1760. X        show_status( "Der folgende Text ist klassifiziert als 'text/richtext'." );
  1761. X#else
  1762. X        show_status( "The following text is classified as 'text/richtext'.");
  1763. X#endif
  1764. X    }
  1765. X    if((FLAG[(ypos + y - 1)] & is_plain) == is_plain){
  1766. X#ifdef _LOCAL
  1767. X        show_status( "Der folgende Text ist klassifiziert als 'text/plain'." );
  1768. X#else
  1769. X        show_status( "The following text is classified as 'text/plain'.");
  1770. X#endif
  1771. X    }
  1772. X    ansi2( "cm", x, y );
  1773. X        /*
  1774. X    if(CHANGED != 0){
  1775. X        fprintf(ROLLBACK, "%05.5d %s\n", oldy, (unsigned char *) make_rtf( SCREEN[oldy], ATTRIB[oldy] ));
  1776. X    }
  1777. X    */
  1778. X    }
  1779. X    oldy = y;
  1780. X
  1781. X    if(RULER){
  1782. X    if(x != xruler){
  1783. X        if(STATUSM != 0) show_status( version );
  1784. X        if(xruler != -1){
  1785. X            ansi( "mr" );
  1786. X            ansi2( "cm", xruler, 1 );
  1787. X            printf("%c", version[(xruler - 1)]);
  1788. X        }
  1789. X        ansi( "me" );
  1790. X        xruler = x;
  1791. X        ansi2( "cm", xruler, 1 );
  1792. X        printf("%c", version[(xruler - 1)]);
  1793. X        ansi2( "cm", x, y );
  1794. X        STATUSM = 0;
  1795. X        activate( RTF_attrib );
  1796. X    }
  1797. X    }
  1798. X
  1799. X  }while(c != CTRL_X);
  1800. X}
  1801. X
  1802. X
  1803. X
  1804. X/*    MAIN    */
  1805. X
  1806. Xmain(argc, argv)
  1807. Xint argc;
  1808. Xunsigned char *argv[];
  1809. X{
  1810. X  FILE *fp;
  1811. X
  1812. X  unsigned char s[LONGSTRING];
  1813. X  unsigned char *home;
  1814. X  int i, j;
  1815. X  int RTF = 0;
  1816. X
  1817. X#if defined(_ESTDIO) || !defined(_SYS7)
  1818. X  setbuf(stdout, NULL);
  1819. X#endif
  1820. X
  1821. X  RTF_attrib = '0';
  1822. X
  1823. X  MAXX = 79;    /* Default Parameter */
  1824. X  MAXY = 24;
  1825. X  strcpy(terminal, (unsigned char *) "ansi" );
  1826. X  strcpy(umlaut, (unsigned char *) "ibm" );
  1827. X  
  1828. X  home = (unsigned char *) getenv( "HOME" );
  1829. X  sprintf(s, "%s/.wendy", home);
  1830. X
  1831. X  fp = fopen( s, "r" );
  1832. X  if(fp != NULL){
  1833. X    fgets(s, 80, fp); MAXY = atoi(s);
  1834. X    fgets(s, 80, fp); MAXX = atoi(s);
  1835. X    fgets(s, 80, fp); sscanf(s, "%s", &terminal);
  1836. X    fgets(s, 80, fp); sscanf(s, "%s", ¨aut);    
  1837. X    fclose(fp);
  1838. X  }
  1839. X  if(MAXY > 24) MAXY = 24;
  1840. X  if(MAXY <  4) MAXY =  4;
  1841. X  
  1842. X  if(MAXX < 10) MAXX = 80;
  1843. X
  1844. X
  1845. X  ansi2( terminal, -1, -1 );
  1846. X  i = ansi2( "cm" );
  1847. X  ansi( "cl" );
  1848. X#ifdef _LOCAL
  1849. X  printf("\n\nMein Name ist "); 
  1850. X#else
  1851. X  printf("\n\nMy name is ");
  1852. X#endif
  1853. X  ansi( "md" ); printf("Wendy");
  1854. X  ansi( "me" ); printf("!\n\n");
  1855. X
  1856. X
  1857. X  if((i == 1) || (i == -1)){
  1858. X#ifdef _LOCAL
  1859. X    printf("Und ich kann Dein Terminal nicht bedienen!\n\n");
  1860. X#else
  1861. X    printf("And I can't handle your terminal!\n\n");
  1862. X#endif
  1863. X    return;
  1864. X  }
  1865. X 
  1866. X  if(argc < 2){
  1867. X#ifdef _LOCAL
  1868. X    printf("Und Du hast vergessen einen Dateinamen anzugeben!\n\n");
  1869. X#else
  1870. X    printf("And you've forgotten to mention a filename!\n\n");
  1871. X#endif
  1872. X    return;
  1873. X  }
  1874. X  /*
  1875. X  sprintf(s, "/usr/tmp/WENDY.%d", getpid());
  1876. X  ROLLBACK = fopen( s, "w" );
  1877. X  if(ROLLBACK == NULL){
  1878. X    printf("Rollback ???");
  1879. X  }
  1880. X  fprintf(ROLLBACK, "00000 %s, %s [%s] on %s\n\n", mydate( 0 ), mytime( 0 ), whoami(), ttyna());
  1881. X  */
  1882. X  lastline = 2;
  1883. X  NEU = 0;
  1884. X  RTF_toggle = 0;
  1885. X
  1886. X  i = LINELENGTH -2;
  1887. X
  1888. X  fp = fopen( argv[1], "r" );
  1889. X  if(fp != NULL){
  1890. X    FLAG[lastline] = 0;
  1891. X    while(fgets(TEXT[lastline], i, fp) != 0){
  1892. X        FLAG[lastline+1] = 0;
  1893. X        if(strcomp("Content-Type: text/richtext", TEXT[lastline]) == 0){
  1894. X            FLAG[lastline] |= is_richtext;
  1895. X            lastline--;
  1896. X        }
  1897. X        if(strcomp("Content-Type: text/plain", TEXT[lastline]) == 0){
  1898. X            FLAG[lastline] |= is_plain;
  1899. X            lastline--;
  1900. X        }
  1901. X        lastline++;
  1902. X        if(lastline > MAXLINES){
  1903. X#ifdef _LOCAL
  1904. X            printf("Und die Datei <%s> ist zu gross fuer mich!\n\n", argv[1]);
  1905. X#else
  1906. X            printf("And the file <%s> is much to big for me!\n\n", argv[1]);
  1907. X#endif
  1908. X            fclose(fp);
  1909. X            return;
  1910. X        }
  1911. X    }
  1912. X      fclose(fp);
  1913. X  }
  1914. X  else{
  1915. X    NEU++;
  1916. X    RTF_toggle++;
  1917. X    for(i = 0; i < 25; i++){
  1918. X        strcpy(TEXT[i], (unsigned char *) "\n");
  1919. X        FLAG[i] = 0;
  1920. X    }
  1921. X    lastline += 25;
  1922. X  }
  1923. X  strcpy(TEXT[lastline], (unsigned char *) "\n");
  1924. X
  1925. X  signal(SIGINT,  SIG_IGN);
  1926. X  signal(SIGQUIT, SIG_IGN);
  1927. X  signal(SIGHUP,  SIG_IGN);
  1928. X  signal(SIGABRT, SIG_IGN);
  1929. X  signal(SIGTERM, SIG_IGN);
  1930. X
  1931. X  strcpy(version, (unsigned char *) VERSION);
  1932. X  show_status( version );
  1933. X 
  1934. X  INS_mode     = 0;
  1935. X  CHANGED      = 0;
  1936. X  REALLY       = 0;
  1937. X  MARK           = 0;
  1938. X  START           = 2;
  1939. X  RULER           = 0;
  1940. X  STATUSM      = 0;
  1941. X  FORMATTER    = 0;
  1942. X  BLOCK.status = 0;
  1943. X
  1944. X  x = 1; y = START; ypos = 1;
  1945. X  
  1946. X  prep_screen( ypos );
  1947. X  show_screen( START );
  1948. X 
  1949. X  echo( 0 );
  1950. X  loop( argv[1] );
  1951. X  echo( 1 );
  1952. X  /*
  1953. X  fclose( ROLLBACK );
  1954. X  */
  1955. X  ansi( "me" );
  1956. X  ansi2( "cm", 1, MAXY );
  1957. X  ansi( "ce" );
  1958. X}
  1959. END_OF_FILE
  1960.   if test 8407 -ne `wc -c <'wendy/wendy.c'`; then
  1961.     echo shar: \"'wendy/wendy.c'\" unpacked with wrong size!
  1962.   fi
  1963.   # end of 'wendy/wendy.c'
  1964. fi
  1965. echo shar: End of archive 12 \(of 15\).
  1966. cp /dev/null ark12isdone
  1967. MISSING=""
  1968. for I in 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 ; do
  1969.     if test ! -f ark${I}isdone ; then
  1970.     MISSING="${MISSING} ${I}"
  1971.     fi
  1972. done
  1973. if test "${MISSING}" = "" ; then
  1974.     echo You have unpacked all 15 archives.
  1975.     rm -f ark[1-9]isdone ark[1-9][0-9]isdone
  1976. else
  1977.     echo You still must unpack the following archives:
  1978.     echo "        " ${MISSING}
  1979. fi
  1980. exit 0
  1981. exit 0 # Just in case...
  1982.