home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 October / usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso / misc / volume44 / rocat / part09 < prev    next >
Encoding:
Internet Message Format  |  1994-08-01  |  8.5 KB

  1. From: shaw@stortek.stortek.com (Greg Shaw)
  2. Newsgroups: comp.sources.misc
  3. Subject: v44i009:  rocat - Roman Catacombs BBS System v.0.75, Part09/09
  4. Date: 1 Aug 1994 12:09:32 -0500
  5. Organization: Sterling Software
  6. Sender: kent@sparky.sterling.com
  7. Approved: kent@sparky.sterling.com
  8. Message-ID: <31ja8c$b2b@sparky.sterling.com>
  9. X-Md4-Signature: fa8968ebf8ec40f9f0f5062b3662695e
  10.  
  11. Submitted-by: shaw@stortek.stortek.com (Greg Shaw)
  12. Posting-number: Volume 44, Issue 9
  13. Archive-name: rocat/part09
  14. Environment: Linux, GNU C++/libg++
  15.  
  16. #! /bin/sh
  17. # This is a shell archive.  Remove anything before this line, then feed it
  18. # into a shell via "sh file" or similar.  To overwrite existing files,
  19. # type "sh file -c".
  20. # Contents:  rocat-0.75/admin/.login rocat-0.75/bbs
  21. #   rocat-0.75/examples/issue rocat-0.75/text/badwords
  22. #   rocat-0.75/text/editors rocat-0.75/text/helpsysop
  23. #   rocat-0.75/text/helpuserinfo rocat-0.75/text/logoff
  24. #   rocat-0.75/text/system2.msg rocat-0.75/text/welcome
  25. # Wrapped by kent@sparky on Mon Jul 11 22:22:54 1994
  26. PATH=/bin:/usr/bin:/usr/ucb:/usr/local/bin:/usr/lbin:$PATH ; export PATH
  27. echo If this archive is complete, you will see the following message:
  28. echo '          "shar: End of archive 9 (of 9)."'
  29. if test -f 'rocat-0.75/admin/.login' -a "${1}" != "-c" ; then 
  30.   echo shar: Will not clobber existing file \"'rocat-0.75/admin/.login'\"
  31. else
  32.   echo shar: Extracting \"'rocat-0.75/admin/.login'\" \(0 characters\)
  33.   sed "s/^X//" >'rocat-0.75/admin/.login' <<'END_OF_FILE'
  34. END_OF_FILE
  35.   if test 0 -ne `wc -c <'rocat-0.75/admin/.login'`; then
  36.     echo shar: \"'rocat-0.75/admin/.login'\" unpacked with wrong size!
  37.   fi
  38.   # end of 'rocat-0.75/admin/.login'
  39. fi
  40. if test -f 'rocat-0.75/bbs' -a "${1}" != "-c" ; then 
  41.   echo shar: Will not clobber existing file \"'rocat-0.75/bbs'\"
  42. else
  43.   echo shar: Extracting \"'rocat-0.75/bbs'\" \(569 characters\)
  44.   sed "s/^X//" >'rocat-0.75/bbs' <<'END_OF_FILE'
  45. X#!/bin/sh
  46. X#
  47. X# file to execute prior to starting main bbs program
  48. X#
  49. X
  50. X
  51. X# some security holes can be used through use of IFS
  52. X# setting to NULL closes many holes
  53. XIFS=""
  54. X
  55. X# generic path
  56. XPATH=/bin:/usr/bin:/usr/games:/usr/local/bin:/usr/ucb
  57. Xexport PATH
  58. X
  59. X# path and sysop
  60. XBBSDIR=/bbs
  61. XSYSOP=shaw
  62. X
  63. X# generic preferences
  64. XVISUAL=pico
  65. XEDITOR=pico
  66. X
  67. Xexport BBSDIR SYSOP VISUAL EDITOR IFS
  68. X
  69. X# set shell environment variable
  70. XSHELL=$BBSDIR/rocat
  71. Xexport SHELL
  72. X
  73. X# setup defaults (like ctrl-h as backspace)
  74. X
  75. Xstty erase "^H" kill "^U" intr "^C" eof "^D" 
  76. Xstty hupcl ixon ixoff 
  77. X
  78. Xexec $SHELL
  79. END_OF_FILE
  80.   if test 569 -ne `wc -c <'rocat-0.75/bbs'`; then
  81.     echo shar: \"'rocat-0.75/bbs'\" unpacked with wrong size!
  82.   fi
  83.   chmod +x 'rocat-0.75/bbs'
  84.   # end of 'rocat-0.75/bbs'
  85. fi
  86. if test -f 'rocat-0.75/examples/issue' -a "${1}" != "-c" ; then 
  87.   echo shar: Will not clobber existing file \"'rocat-0.75/examples/issue'\"
  88. else
  89.   echo shar: Extracting \"'rocat-0.75/examples/issue'\" \(116 characters\)
  90.   sed "s/^X//" >'rocat-0.75/examples/issue' <<'END_OF_FILE'
  91. X
  92. XWelcome to the Roman Catacombs!
  93. X
  94. XRunning on Linux 1.12 (slackware)
  95. X
  96. XEnter your login or 'new' for a new account.
  97. X
  98. END_OF_FILE
  99.   if test 116 -ne `wc -c <'rocat-0.75/examples/issue'`; then
  100.     echo shar: \"'rocat-0.75/examples/issue'\" unpacked with wrong size!
  101.   fi
  102.   # end of 'rocat-0.75/examples/issue'
  103. fi
  104. if test -f 'rocat-0.75/text/badwords' -a "${1}" != "-c" ; then 
  105.   echo shar: Will not clobber existing file \"'rocat-0.75/text/badwords'\"
  106. else
  107.   echo shar: Extracting \"'rocat-0.75/text/badwords'\" \(60 characters\)
  108.   sed "s/^X//" >'rocat-0.75/text/badwords' <<'END_OF_FILE'
  109. Xshit
  110. Xfuck
  111. Xdamn
  112. Xpiss 
  113. Xhell
  114. Xcunt
  115. Xprick
  116. Xdick
  117. Xpussy
  118. Xbitch
  119. Xsuper
  120. END_OF_FILE
  121.   if test 60 -ne `wc -c <'rocat-0.75/text/badwords'`; then
  122.     echo shar: \"'rocat-0.75/text/badwords'\" unpacked with wrong size!
  123.   fi
  124.   # end of 'rocat-0.75/text/badwords'
  125. fi
  126. if test -f 'rocat-0.75/text/editors' -a "${1}" != "-c" ; then 
  127.   echo shar: Will not clobber existing file \"'rocat-0.75/text/editors'\"
  128. else
  129.   echo shar: Extracting \"'rocat-0.75/text/editors'\" \(317 characters\)
  130.   sed "s/^X//" >'rocat-0.75/text/editors' <<'END_OF_FILE'
  131. X
  132. XThese are the file editors currently available on the Roman Catacombs:
  133. X
  134. Xpico - the recommended full-screen editor for 'new' users.
  135. Xvi - original Unix editor.  Don't use unless you're familiar with it.
  136. Xemacs - not for the uninitiated.  Another programmer's editor.
  137. X
  138. XNote: All of the editors are full-screen editors.
  139. X
  140. END_OF_FILE
  141.   if test 317 -ne `wc -c <'rocat-0.75/text/editors'`; then
  142.     echo shar: \"'rocat-0.75/text/editors'\" unpacked with wrong size!
  143.   fi
  144.   # end of 'rocat-0.75/text/editors'
  145. fi
  146. if test -f 'rocat-0.75/text/helpsysop' -a "${1}" != "-c" ; then 
  147.   echo shar: Will not clobber existing file \"'rocat-0.75/text/helpsysop'\"
  148. else
  149.   echo shar: Extracting \"'rocat-0.75/text/helpsysop'\" \(216 characters\)
  150.   sed "s/^X//" >'rocat-0.75/text/helpsysop' <<'END_OF_FILE'
  151. XHow to contact the sysop:
  152. X
  153. XThere is a 'chat' option on the main menu.  Try that first.  If that
  154. Xdoesn't succeed, leave him feedback.  He is very responsive to mail, and
  155. Xwill generally get back to you within a day.
  156. X
  157. X
  158. END_OF_FILE
  159.   if test 216 -ne `wc -c <'rocat-0.75/text/helpsysop'`; then
  160.     echo shar: \"'rocat-0.75/text/helpsysop'\" unpacked with wrong size!
  161.   fi
  162.   # end of 'rocat-0.75/text/helpsysop'
  163. fi
  164. if test -f 'rocat-0.75/text/helpuserinfo' -a "${1}" != "-c" ; then 
  165.   echo shar: Will not clobber existing file \"'rocat-0.75/text/helpuserinfo'\"
  166. else
  167.   echo shar: Extracting \"'rocat-0.75/text/helpuserinfo'\" \(179 characters\)
  168.   sed "s/^X//" >'rocat-0.75/text/helpuserinfo' <<'END_OF_FILE'
  169. XHow to change your user information:
  170. X
  171. XUnder the main menu (the entrance), you'll find a menu called 'utilities'.
  172. XThere is where you will find the change user information command.
  173. END_OF_FILE
  174.   if test 179 -ne `wc -c <'rocat-0.75/text/helpuserinfo'`; then
  175.     echo shar: \"'rocat-0.75/text/helpuserinfo'\" unpacked with wrong size!
  176.   fi
  177.   # end of 'rocat-0.75/text/helpuserinfo'
  178. fi
  179. if test -f 'rocat-0.75/text/logoff' -a "${1}" != "-c" ; then 
  180.   echo shar: Will not clobber existing file \"'rocat-0.75/text/logoff'\"
  181. else
  182.   echo shar: Extracting \"'rocat-0.75/text/logoff'\" \(235 characters\)
  183.   sed "s/^X//" >'rocat-0.75/text/logoff' <<'END_OF_FILE'
  184. X
  185. XSome other fine BBSs in the Denver Area:
  186. X
  187. XMacCircles        526-2219
  188. XSneakers BBS        986-1411
  189. X
  190. XI hope you have enjoyed your stay.  Please visit again soon!
  191. X
  192. XPlease tell your friends about the TRC community.
  193. X
  194. XGoodbye from The Roman Catacombs!
  195. END_OF_FILE
  196.   if test 235 -ne `wc -c <'rocat-0.75/text/logoff'`; then
  197.     echo shar: \"'rocat-0.75/text/logoff'\" unpacked with wrong size!
  198.   fi
  199.   # end of 'rocat-0.75/text/logoff'
  200. fi
  201. if test -f 'rocat-0.75/text/system2.msg' -a "${1}" != "-c" ; then 
  202.   echo shar: Will not clobber existing file \"'rocat-0.75/text/system2.msg'\"
  203. else
  204.   echo shar: Extracting \"'rocat-0.75/text/system2.msg'\" \(108 characters\)
  205.   sed "s/^X//" >'rocat-0.75/text/system2.msg' <<'END_OF_FILE'
  206. XNew files in the last 7 days.  (06/03/94)
  207. XName           Section                     Date   by    Downloads
  208. END_OF_FILE
  209.   if test 108 -ne `wc -c <'rocat-0.75/text/system2.msg'`; then
  210.     echo shar: \"'rocat-0.75/text/system2.msg'\" unpacked with wrong size!
  211.   fi
  212.   # end of 'rocat-0.75/text/system2.msg'
  213. fi
  214. if test -f 'rocat-0.75/text/welcome' -a "${1}" != "-c" ; then 
  215.   echo shar: Will not clobber existing file \"'rocat-0.75/text/welcome'\"
  216. else
  217.   echo shar: Extracting \"'rocat-0.75/text/welcome'\" \(479 characters\)
  218.   sed "s/^X//" >'rocat-0.75/text/welcome' <<'END_OF_FILE'
  219. XWelcome to The Roman Catacombs!
  220. X
  221. XAs you descend from the streets of Rome, you are astonished to find a world
  222. Xdifferent from that above.  It is a world of close friends, stimulating
  223. Xconversation and great files.
  224. X
  225. XThis is the world of the Roman Catacombs.  Those of us that are already
  226. Xpart of the Catacombs welcome you to partake in our small group.
  227. X
  228. XPlease feel at home.  Have a sip from the flask, put your feet up and
  229. Xpartake of the conversation of the common room.
  230. X
  231. XWelcome!
  232. X
  233. END_OF_FILE
  234.   if test 479 -ne `wc -c <'rocat-0.75/text/welcome'`; then
  235.     echo shar: \"'rocat-0.75/text/welcome'\" unpacked with wrong size!
  236.   fi
  237.   # end of 'rocat-0.75/text/welcome'
  238. fi
  239. echo shar: End of archive 9 \(of 9\).
  240. cp /dev/null ark9isdone
  241. MISSING=""
  242. for I in 1 2 3 4 5 6 7 8 9 ; do
  243.     if test ! -f ark${I}isdone ; then
  244.     MISSING="${MISSING} ${I}"
  245.     fi
  246. done
  247. if test "${MISSING}" = "" ; then
  248.     echo You have unpacked all 9 archives.
  249.     rm -f ark[1-9]isdone ark[1-9][0-9]isdone
  250. else
  251.     echo You still must unpack the following archives:
  252.     echo "        " ${MISSING}
  253. fi
  254. exit 0
  255. exit 0 # Just in case...
  256.