home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1994 March / Source_Code_CD-ROM_Walnut_Creek_March_1994.iso / compsrcs / misc / volume32 / xbbs / part10 < prev    next >
Encoding:
Text File  |  1992-09-08  |  62.7 KB  |  1,798 lines

  1. Newsgroups: comp.sources.misc
  2. From: sandy@godzilla.Quotron.COM (Sanford Zelkovitz)
  3. Subject:  v32i025:  xbbs - A Bulletin Board System for System V, Part10/11
  4. Message-ID: <1992Sep9.045521.26727@sparky.imd.sterling.com>
  5. X-Md4-Signature: 1cdf415fa2f15c7117332bcba0a72d2a
  6. Date: Wed, 9 Sep 1992 04:55:21 GMT
  7. Approved: kent@sparky.imd.sterling.com
  8.  
  9. Submitted-by: sandy@godzilla.Quotron.COM (Sanford Zelkovitz)
  10. Posting-number: Volume 32, Issue 25
  11. Archive-name: xbbs/part10
  12. Environment: SYSV, Xenix
  13.  
  14. #! /bin/sh
  15. # This is a shell archive.  Remove anything before this line, then feed it
  16. # into a shell via "sh file" or similar.  To overwrite existing files,
  17. # type "sh file -c".
  18. # Contents:  MAKE_areas.bbs MAKE_msg.bbs MAKEfeatures MAKElistfile
  19. #   MAKEmsg.bbs MAKEquestion Makefile.386 Makefile.SVR4L My.config.bbs
  20. #   Read.Me Sep02.msg allign/allign.c allign/fallign.c areas.bbs
  21. #   bulletin.2400 bulletin.bbs bulletin.cmn bulletin.dvr bulletin.enh
  22. #   bulletin.ext bulletin.inp bulletin.path bulletin.red bulletin.sys
  23. #   bulletin.upl bulletin.uucp chatbbs/chat.h dlmsg.bbs etc_profile
  24. #   features.bbs help.bbs helpfile.bbs helpmsg.bbs helpsig.bbs
  25. #   listfile.bbs listuser/listuser.c listuser/listuser.read.
  26. #   listuser/listusers.c msgareas.bbs msgpack/packmisc.c question.qst
  27. #   sealink/Makefile.286 sealink/Makefile.386 sealink/Readme sigs.bbs
  28. #   system.bbs today/moontx.h today/potm.c unixmsg.bbs
  29. # Wrapped by kent@sparky on Fri Sep  4 12:48:56 1992
  30. PATH=/bin:/usr/bin:/usr/ucb:/usr/local/bin:/usr/lbin ; export PATH
  31. echo If this archive is complete, you will see the following message:
  32. echo '          "shar: End of archive 10 (of 11)."'
  33. if test -f 'MAKE_areas.bbs' -a "${1}" != "-c" ; then 
  34.   echo shar: Will not clobber existing file \"'MAKE_areas.bbs'\"
  35. else
  36.   echo shar: Extracting \"'MAKE_areas.bbs'\" \(1319 characters\)
  37.   sed "s/^X//" >'MAKE_areas.bbs' <<'END_OF_FILE'
  38. XThe file, areas.bbs, contains the path information for uploading, downloading,
  39. Xand listing of files along with the access privilege of the download 
  40. Xdirectory. The format of the file is as follows:
  41. X    1) The first line of the file can be used as a RULER SINCE IT IS NOT USED.
  42. X    2) The following lines in the file have the following format:
  43. X       a) Columns 1-13 The download path. Please note the ORGPATH is added
  44. X          to the contents. An example is as follows: ORGPATH = /usr/sandy/bbs
  45. X          and columns 1-13 contain bbssoftware; therefore, the entire path
  46. X          name = /usr/sandy/bbs/bbssoftware.
  47. X     3) Column 14 must be a space
  48. X     4) Columns 15-55 contain the description of the download directory
  49. X     5) Column 56 must be a space
  50. X     6) Columns 57-61 contain the DIRECTORY PRIVILEGE - left justified.
  51. X        Therefore, you can set your privileges from 1 - 32767. WARNING, if
  52. X        you give your user access to the files section from the main menu and
  53. X        DO NOT give him access to any of the directories, he will NOT be able
  54. X        to get out of the initial directory change!
  55. X     7) Columns 62-63 must be spaces
  56. X     8) Columns 64-79 contain the UPLOAD path for that download directory.
  57. X
  58. XPlease download areas.bbs and use it as an example.
  59. XA MAXIMUM of 99 directories can be used!
  60. END_OF_FILE
  61.   if test 1319 -ne `wc -c <'MAKE_areas.bbs'`; then
  62.     echo shar: \"'MAKE_areas.bbs'\" unpacked with wrong size!
  63.   fi
  64.   # end of 'MAKE_areas.bbs'
  65. fi
  66. if test -f 'MAKE_msg.bbs' -a "${1}" != "-c" ; then 
  67.   echo shar: Will not clobber existing file \"'MAKE_msg.bbs'\"
  68. else
  69.   echo shar: Extracting \"'MAKE_msg.bbs'\" \(1390 characters\)
  70.   sed "s/^X//" >'MAKE_msg.bbs' <<'END_OF_FILE'
  71. XThe file, msgareas.bbs, contain the path information for the different message
  72. Xbases. The format is as follows:
  73. X    1) The first line of the file can be used as a RULER SINCE IT IS NOT USED.
  74. X    2) The following lines in the file have the following format:
  75. X       a) Columns 1-13 The download path. Please note the ORGPATH is added
  76. X          to the contents. An example is as follows: ORGPATH = /usr/sandy/bbs
  77. X          and columns 1-13 contain general; therefore, the entire path
  78. X          name = /usr/sandy/bbs/general.
  79. X     3) Column 14 must be a space
  80. X     4) Columns 15-55 contain the description of the download directory
  81. X     5) Column 56 must be a space
  82. X     6) Columns 57-61 contain the DIRECTORY PRIVILEGE - left justified.
  83. X        Therefore, you can set your privileges from 1 - 32767. WARNING, if
  84. X        you give your user access to the msg section from the main menu and
  85. X        DO NOT give him access to any of the directories, he will NOT be able
  86. X        to get out of the initial directory change!
  87. X
  88. XPlease download msgareas.bbs and use it as an example.
  89. XA MAXIMUM of 99 directories can be used!
  90. X                         New as of 11/20/86
  91. XTo select the message area to use for the "GOOD-BYE" message, immediately
  92. Xfollowing the privilege level for that message base, insert an asterisk (*).
  93. XThis will then, automatically, select that msg base for the parting message.
  94. END_OF_FILE
  95.   if test 1390 -ne `wc -c <'MAKE_msg.bbs'`; then
  96.     echo shar: \"'MAKE_msg.bbs'\" unpacked with wrong size!
  97.   fi
  98.   # end of 'MAKE_msg.bbs'
  99. fi
  100. if test -f 'MAKEfeatures' -a "${1}" != "-c" ; then 
  101.   echo shar: Will not clobber existing file \"'MAKEfeatures'\"
  102. else
  103.   echo shar: Extracting \"'MAKEfeatures'\" \(1056 characters\)
  104.   sed "s/^X//" >'MAKEfeatures' <<'END_OF_FILE'
  105. XTo make features.bbs, you can use the file, features.bbs as a guide. 
  106. XThe format of the file is as follows:
  107. XLINE 1 ------------ruler
  108. XLine 2 - N              The actual programs that you make available to you
  109. X                        users.
  110. XEach line is broken up into fields. The fields are as follows:
  111. XColumn 01 - 50         The full path name of the program plus commandline
  112. XColumn   51            A space
  113. XColumn 52 - 72         Description of program
  114. XColumn   73            A space
  115. XColumn 74 - 78         Privilege level assigned to the program
  116. XColumn   79            An asterisk or space
  117. XIf column 79 is an asterisk, '*', then the BBS software will switch back to
  118. Xthe default terminal parameters and then execute the program. After the 
  119. Xprogram completes, it will then switch back to the BBS terminal parameters.
  120. XThe user will be notified of the switching so that he/she can change his/her
  121. Xterminal program if necessary.
  122. XIf column 79 is a space, the BBS program will redirect stdout to a temporary
  123. Xfile and then send the output to the bbs user.
  124. END_OF_FILE
  125.   if test 1056 -ne `wc -c <'MAKEfeatures'`; then
  126.     echo shar: \"'MAKEfeatures'\" unpacked with wrong size!
  127.   fi
  128.   # end of 'MAKEfeatures'
  129. fi
  130. if test -f 'MAKElistfile' -a "${1}" != "-c" ; then 
  131.   echo shar: Will not clobber existing file \"'MAKElistfile'\"
  132. else
  133.   echo shar: Extracting \"'MAKElistfile'\" \(445 characters\)
  134.   sed "s/^X//" >'MAKElistfile' <<'END_OF_FILE'
  135. XTo make listfile.bbs, you can use the file, listfile.bbs as a guide. 
  136. XThe format of the file is as follows:
  137. XLINE 1 ------------ruler
  138. XLine 2 - N              The actual files that you make available to you
  139. X                        users.
  140. XEach line is broken up into fields. The fields are as follows:
  141. XColumn 01 - 50         The full path name of the file to list.
  142. XColumn   51            A space
  143. XColumn 52 - 72         Description of the file.
  144. END_OF_FILE
  145.   if test 445 -ne `wc -c <'MAKElistfile'`; then
  146.     echo shar: \"'MAKElistfile'\" unpacked with wrong size!
  147.   fi
  148.   # end of 'MAKElistfile'
  149. fi
  150. if test -f 'MAKEmsg.bbs' -a "${1}" != "-c" ; then 
  151.   echo shar: Will not clobber existing file \"'MAKEmsg.bbs'\"
  152. else
  153.   echo shar: Extracting \"'MAKEmsg.bbs'\" \(861 characters\)
  154.   sed "s/^X//" >'MAKEmsg.bbs' <<'END_OF_FILE'
  155. XA new option has been added to Version 4.10 and above that allows you to make
  156. Xdifferent daily messages for each day of the week for a FULL year. This message
  157. Xis then printed out to your users during their login process into the bbs.
  158. X
  159. XYou can put whatever you wish into this file. The file can be as little as
  160. Xone line or as large as you desire! Page control is automatically supported
  161. Xduring the output.
  162. XYou may wish to use this option to wish your users a "Merry Christmas" or a
  163. X"Happy New Year".
  164. XThe file name is in the form of Month_Day.msg. An example of the file that
  165. Xwould be displayed on September 02, 1987 would be as follows:
  166. X
  167. X                               Sep02.msg
  168. X
  169. X
  170. XPlease note that if the file is not found, NO message will be displayed to
  171. Xyour user; therefore, this is option is COMPLETELY optional and can be
  172. Xignored when not needed.
  173. X
  174. XSandy
  175. END_OF_FILE
  176.   if test 861 -ne `wc -c <'MAKEmsg.bbs'`; then
  177.     echo shar: \"'MAKEmsg.bbs'\" unpacked with wrong size!
  178.   fi
  179.   # end of 'MAKEmsg.bbs'
  180. fi
  181. if test -f 'MAKEquestion' -a "${1}" != "-c" ; then 
  182.   echo shar: Will not clobber existing file \"'MAKEquestion'\"
  183. else
  184.   echo shar: Extracting \"'MAKEquestion'\" \(1383 characters\)
  185.   sed "s/^X//" >'MAKEquestion' <<'END_OF_FILE'
  186. XThis file contains the information needed to make your questionnaire.
  187. XThe following commands are available in column 1:
  188. X!       Output the rest of the line and wait for an input
  189. X@       Output the rest of the line and send a crlf
  190. X&       Same as '@' without the terminal crlf
  191. X$       Outputs a '?' and waits for an input
  192. X%       Output crlf
  193. XY || y  Output the rest of the line and set FLAG true if response is a Y or y
  194. XN || n  Output the rest of the line and set FLAG true if response is an N or n
  195. X{       Start conditional statements ( execute the following lines if FLAG
  196. X        is equal to true
  197. X}       End conditional statements
  198. X/       Exit questionnaire - Normally used as a conditional statement
  199. X
  200. X
  201. XAn example of a questionnaire is as follows:
  202. X@XBBS QUESTIONNAIRE
  203. XNDo you want to continue the questionnaire (y/n)
  204. X{
  205. X/
  206. X}
  207. X!Input your full name
  208. X!Input your home telephone number
  209. X!Input your work telephone number
  210. X&Input your full address ( 5 lines available )
  211. X$
  212. X$
  213. X$
  214. X$
  215. X$
  216. X!Input your profession
  217. X@Thank you for answering my questionnaire
  218. X
  219. X
  220. X
  221. XYou may use the above example as your questionnaire.
  222. X
  223. X
  224. XThe file that you generate is called question.bbs and is located in the same
  225. Xdirectory as the rest of the .bbs files.
  226. X
  227. XThe file that is generated by the bbs software ( the answers to the
  228. Xquestionnaire ) is called answer.bbs and is located in the same directory as
  229. Xquestion.bbs.
  230. X
  231. X
  232. XSandy
  233. END_OF_FILE
  234.   if test 1383 -ne `wc -c <'MAKEquestion'`; then
  235.     echo shar: \"'MAKEquestion'\" unpacked with wrong size!
  236.   fi
  237.   # end of 'MAKEquestion'
  238. fi
  239. if test -f 'Makefile.386' -a "${1}" != "-c" ; then 
  240.   echo shar: Will not clobber existing file \"'Makefile.386'\"
  241. else
  242.   echo shar: Extracting \"'Makefile.386'\" \(1534 characters\)
  243.   sed "s/^X//" >'Makefile.386' <<'END_OF_FILE'
  244. Xbbsc1: bbsc1.o bbsc2.o bbscport.o bbsclock.o bbscfile.o bbscmisc.o bbscio.o \
  245. Xbbscarea.o bbscmsga.o bbscqust.o bbscbult.o bbscadds.o bbsclist.o bbsczip.o \
  246. Xbbscconf.o bbscsumm.o bbscsigs.o bbscmenu.o bbscarc.o bbscunzip.o
  247. X    cc  bbsc1.o bbsc2.o bbscport.o bbsclock.o bbscfile.o bbscmisc.o \
  248. Xbbscio.o bbscarea.o bbscmsga.o bbscqust.o bbscbult.o bbscadds.o bbsclist.o \
  249. Xbbsczip.o bbscconf.o bbscsumm.o bbscsigs.o bbscmenu.o bbscarc.o bbscunzip.o \
  250. X-lx -o bbsc1
  251. X    strip bbsc1
  252. Xbbsc1.o: bbsc1.c bbscdef.h bbsc12.h
  253. X    cc -c -O bbsc1.c
  254. Xbbsc2.o: bbsc2.c bbscdef.h bbsc12.h
  255. X    cc -c -O bbsc2.c
  256. Xbbscmenu.o: bbscmenu.c bbscdef.h bbsc12.h
  257. X    cc -c -O bbscmenu.c
  258. Xbbscport.o: bbscport.c bbscdef.h
  259. X    cc -c -O bbscport.c
  260. Xbbsclock.o: bbsclock.c bbscdef.h
  261. X    cc -c -O bbsclock.c
  262. Xbbscfile.o: bbscfile.c bbscdef.h
  263. X    cc -c -O bbscfile.c
  264. Xbbscmisc.o: bbscmisc.c bbscdef.h
  265. X    cc -c -O bbscmisc.c
  266. Xbbscio.o: bbscio.c bbscdef.h
  267. X    cc -c -O bbscio.c
  268. Xbbscarea.o: bbscarea.c bbscdef.h
  269. X    cc -c -O bbscarea.c
  270. Xbbscsigs.o: bbscsigs.c bbscdef.h
  271. X    cc -c -O bbscsigs.c
  272. Xbbscmsga.o: bbscmsga.c bbscdef.h
  273. X    cc -c -O bbscmsga.c
  274. Xbbscqust.o: bbscqust.c bbscdef.h
  275. X    cc -c -O bbscqust.c
  276. Xbbscbult.o: bbscbult.c bbscdef.h
  277. X    cc -c -O bbscbult.c
  278. Xbbscadds.o: bbscadds.c bbscdef.h
  279. X    cc -c -O bbscadds.c
  280. Xbbsczip.o: bbsczip.c bbscdef.h
  281. X    cc -c -O bbsczip.c
  282. Xbbsclist.o: bbsclist.c bbscdef.h
  283. X    cc -c -O bbsclist.c
  284. Xbbscconf.o: bbscconf.c bbscdef.h
  285. X    cc -c -O bbscconf.c
  286. Xbbscsumm.o: bbscsumm.c bbscdef.h
  287. X    cc -c -O bbscsumm.c
  288. Xbbscarc.o: bbscarc.c
  289. X    cc -c -O -Zp bbscarc.c
  290. Xbbscunzip.o: bbscunzip.c
  291. X    cc -c -O bbscunzip.c
  292. END_OF_FILE
  293.   if test 1534 -ne `wc -c <'Makefile.386'`; then
  294.     echo shar: \"'Makefile.386'\" unpacked with wrong size!
  295.   fi
  296.   chmod +x 'Makefile.386'
  297.   # end of 'Makefile.386'
  298. fi
  299. if test -f 'Makefile.SVR4L' -a "${1}" != "-c" ; then 
  300.   echo shar: Will not clobber existing file \"'Makefile.SVR4L'\"
  301. else
  302.   echo shar: Extracting \"'Makefile.SVR4L'\" \(1557 characters\)
  303.   sed "s/^X//" >'Makefile.SVR4L' <<'END_OF_FILE'
  304. Xbbsc1: bbsc1.o bbsc2.o bbscport.o bbsclock.o bbscfile.o bbscmisc.o bbscio.o \
  305. Xbbscarea.o bbscmsga.o bbscqust.o bbscbult.o bbscadds.o bbsclist.o bbsczip.o \
  306. Xbbscconf.o bbscsumm.o bbscsigs.o bbscmenu.o bbscarc.o bbscunzip.o
  307. X    cc  bbsc1.o bbsc2.o bbscport.o bbsclock.o bbscfile.o bbscmisc.o \
  308. Xbbscio.o bbscarea.o bbscmsga.o bbscqust.o bbscbult.o bbscadds.o bbsclist.o \
  309. Xbbsczip.o bbscconf.o bbscsumm.o bbscsigs.o bbscmenu.o bbscarc.o bbscunzip.o \
  310. X-lx -o bbsc1
  311. X    strip bbsc1
  312. Xbbsc1.o: bbsc1.c bbscdef.h bbsc12.h
  313. X    cc -c -O -DSYSV bbsc1.c
  314. Xbbsc2.o: bbsc2.c bbscdef.h bbsc12.h
  315. X    cc -c -O bbsc2.c
  316. Xbbscmenu.o: bbscmenu.c bbscdef.h bbsc12.h
  317. X    cc -c -O bbscmenu.c
  318. Xbbscport.o: bbscport.c bbscdef.h
  319. X    cc -c -O bbscport.c
  320. Xbbsclock.o: bbsclock.c bbscdef.h
  321. X    cc -c -O bbsclock.c
  322. Xbbscfile.o: bbscfile.c bbscdef.h
  323. X    cc -c -O bbscfile.c
  324. Xbbscmisc.o: bbscmisc.c bbscdef.h
  325. X    cc -c -O bbscmisc.c
  326. Xbbscio.o: bbscio.c bbscdef.h
  327. X    cc -c -O bbscio.c
  328. Xbbscarea.o: bbscarea.c bbscdef.h
  329. X    cc -c -O bbscarea.c
  330. Xbbscsigs.o: bbscsigs.c bbscdef.h
  331. X    cc -c -O bbscsigs.c
  332. Xbbscmsga.o: bbscmsga.c bbscdef.h
  333. X    cc -c -O bbscmsga.c
  334. Xbbscqust.o: bbscqust.c bbscdef.h
  335. X    cc -c -O bbscqust.c
  336. Xbbscbult.o: bbscbult.c bbscdef.h
  337. X    cc -c -O bbscbult.c
  338. Xbbscadds.o: bbscadds.c bbscdef.h
  339. X    cc -c -O bbscadds.c
  340. Xbbsczip.o: bbsczip.c bbscdef.h
  341. X    cc -c -O bbsczip.c
  342. Xbbsclist.o: bbsclist.c bbscdef.h
  343. X    cc -c -O bbsclist.c
  344. Xbbscconf.o: bbscconf.c bbscdef.h
  345. X    cc -c -O -DSYSV -DESIX54 bbscconf.c
  346. Xbbscsumm.o: bbscsumm.c bbscdef.h
  347. X    cc -c -O bbscsumm.c
  348. Xbbscarc.o: bbscarc.c
  349. X    cc -c -O -Zp bbscarc.c
  350. Xbbscunzip.o: bbscunzip.c
  351. X    cc -c -O bbscunzip.c
  352. END_OF_FILE
  353.   if test 1557 -ne `wc -c <'Makefile.SVR4L'`; then
  354.     echo shar: \"'Makefile.SVR4L'\" unpacked with wrong size!
  355.   fi
  356.   chmod +x 'Makefile.SVR4L'
  357.   # end of 'Makefile.SVR4L'
  358. fi
  359. if test -f 'My.config.bbs' -a "${1}" != "-c" ; then 
  360.   echo shar: Will not clobber existing file \"'My.config.bbs'\"
  361. else
  362.   echo shar: Extracting \"'My.config.bbs'\" \(1205 characters\)
  363.   sed "s/^X//" >'My.config.bbs' <<'END_OF_FILE'
  364. X/user/bbsfiles/welcome.bbs
  365. X/user/bbsfiles/bulletin.bbs
  366. X/user/bbsfiles/newuser.bbs
  367. X/user/bbsfiles/system.bbs
  368. X/user/bbsfiles/callers.bbs
  369. X/user/bbsfiles/lastcall.bbs
  370. X/user/bbsfiles/users.bbs
  371. X/user/bbsfiles/unixmsg.bbs
  372. X/user/bbsfiles/dlmsg.bbs
  373. X/user/bbsfiles/humor.bbs
  374. X/user/bbsfiles/help.bbs
  375. X/user/bbsfiles/helpfile.bbs
  376. X/user/bbsfiles/helpmsg.bbs
  377. X/user/bbsfiles/userpriv.bbs
  378. X/user/bbsfiles/mainpriv.bbs
  379. X/user/bbsfiles/filepriv.bbs
  380. X/user/bbsfiles/question.bbs
  381. X/user/bbsfiles/answer.bbs
  382. X/user/bbsfiles/features.bbs
  383. X/user/bbsfiles/listfile.bbs
  384. X/user/bbsfiles/today > /tmp/today
  385. X/user/bbsfiles/
  386. X/user/bbsfiles/areas.bbs
  387. X/user/bbsfiles/msgareas.bbs
  388. X/user/bbs/
  389. X/user/bbsfiles/checksum r 
  390. X/user/bbsfiles/checksum s 
  391. X/user/bbsfiles/crc r 
  392. X/user/bbsfiles/crc s 
  393. X/user/bbsfiles/ymod r 
  394. X/user/bbsfiles/ymod s 
  395. X/user/bbsfiles/rb
  396. X/user/bbsfiles/sb -k 
  397. X/user/bbsfiles/rz
  398. X/user/bbsfiles/sz 
  399. X/user/bbsfiles/kermit -i -q -s 
  400. X/user/bbsfiles/kermit -i -w -q -r
  401. Xls /user/bbs > /tmp/flist
  402. X/user/bbsfiles/sealink -r 
  403. X/user/bbsfiles/sealink -s 
  404. XSanford Zelkovitz
  405. X300
  406. X5400
  407. X180
  408. X5
  409. X32767
  410. X32767
  411. X500
  412. X/bin/tar -tvf 
  413. X/usr/bin/zcat 
  414. X/usr/bin/arc -v 
  415. X/usr/bin/unzip -v 
  416. X/dev/tty12
  417. X/dev/tty01
  418. X/bin/sh -i
  419. X1
  420. X/usr/bin/readnews
  421. X/usr/bin/postnews
  422. END_OF_FILE
  423.   if test 1205 -ne `wc -c <'My.config.bbs'`; then
  424.     echo shar: \"'My.config.bbs'\" unpacked with wrong size!
  425.   fi
  426.   # end of 'My.config.bbs'
  427. fi
  428. if test -f 'Read.Me' -a "${1}" != "-c" ; then 
  429.   echo shar: Will not clobber existing file \"'Read.Me'\"
  430. else
  431.   echo shar: Extracting \"'Read.Me'\" \(322 characters\)
  432.   sed "s/^X//" >'Read.Me' <<'END_OF_FILE'
  433. XMy address is as follows:
  434. X                Sanford Zelkovitz
  435. X                5852 Maxson Drive
  436. X                Cypress, Ca   90630
  437. XPlease drop me a line and let me know how this code is working for you.
  438. X
  439. XIf you would like to send a donation to help cover my equipment expense, that
  440. Xwould be greatly appreciated!
  441. XSandy
  442. X
  443. END_OF_FILE
  444.   if test 322 -ne `wc -c <'Read.Me'`; then
  445.     echo shar: \"'Read.Me'\" unpacked with wrong size!
  446.   fi
  447.   # end of 'Read.Me'
  448. fi
  449. if test -f 'Sep02.msg' -a "${1}" != "-c" ; then 
  450.   echo shar: Will not clobber existing file \"'Sep02.msg'\"
  451. else
  452.   echo shar: Extracting \"'Sep02.msg'\" \(669 characters\)
  453.   sed "s/^X//" >'Sep02.msg' <<'END_OF_FILE'
  454. XSeptember 02, 1987
  455. X
  456. XVersion 4.10 is now online. This version gives you the following additional
  457. Xcapabilities over 4.00:
  458. X   1) The optional capability of having a daily message for your users.
  459. X      ( This message utilizes this new capabity.) You can now make up different
  460. X      messages for each day of the week for one full year! The software will
  461. X      only output the predetermined message for that day. The format of the
  462. X      file is as follows: Month_day.msg. As an example, the message for today
  463. X      is as follows: Sep02.msg
  464. X
  465. X   2) You can now select which SHELL you wish to use for the U(nix) command
  466. X      from the main menu.
  467. X   3) Cosmetic improvements
  468. END_OF_FILE
  469.   if test 669 -ne `wc -c <'Sep02.msg'`; then
  470.     echo shar: \"'Sep02.msg'\" unpacked with wrong size!
  471.   fi
  472.   # end of 'Sep02.msg'
  473. fi
  474. if test -f 'allign/allign.c' -a "${1}" != "-c" ; then 
  475.   echo shar: Will not clobber existing file \"'allign/allign.c'\"
  476. else
  477.   echo shar: Extracting \"'allign/allign.c'\" \(1464 characters\)
  478.   sed "s/^X//" >'allign/allign.c' <<'END_OF_FILE'
  479. X#include <stdio.h>
  480. X#include <string.h>
  481. X/* This is the NEW version for 4.00 and above */
  482. X/*               July 22, 1987                */
  483. Xmain()
  484. X    {
  485. X    FILE *inbuf, *outbuf;
  486. X    int code;
  487. X    int count;
  488. X    char infile[99], outfile[99];
  489. X    char u_fname[99], u_lname[99], u_password[99], u_time1[99];
  490. X    char u_date1[99], u_time2[99], u_date2[99], u_city[99];
  491. X    char l_f_base[4], l_m_base[4], xprt[4], toggl[4];
  492. X    printf("\nInput the old user file name: ");
  493. X    scanf("%s", infile);
  494. X    printf("\n");
  495. X    strcpy(outfile, infile);
  496. X    strcat(outfile,".OLD");
  497. X    (void)unlink(outfile);
  498. X    (void)link(infile,outfile);
  499. X    (void)unlink(infile);
  500. X    if((inbuf = fopen(outfile, "r" )) == NULL)
  501. X        {
  502. X        printf("\n\rError opening old users file.\n\r");
  503. X        exit(1);
  504. X        }
  505. X    if((outbuf = fopen(infile, "w" )) == NULL)
  506. X        {
  507. X        printf("\n\rError opening new users file.\n\r");
  508. X        exit(1);
  509. X        }
  510. X    while(1)
  511. X        {
  512. X        code = fscanf(inbuf,"%[^~]~%[^~]~%[^~]~%[^~]~%[^~]~%[^~]~%[^~]~%[^~]~%[^~]~%[^~]~%[^~]~%[^~]~\n",
  513. X            u_fname, u_lname, u_password, u_time1, u_date1,
  514. X            u_time2, u_date2, u_city,l_f_base,l_m_base,xprt,toggl);
  515. X        if(code < 12 ) break;
  516. X        code = fprintf(outbuf,"%s~%s~%s~%s~%s~%s~%s~%s~%s~%s~%s~%s~\n",
  517. X            u_fname, u_lname, u_password, u_time1, u_date1,
  518. X            u_time2, u_date2, u_city,l_f_base,l_m_base,xprt,toggl);
  519. X        }
  520. X        fclose(inbuf);
  521. X        fclose(outbuf);
  522. X        strcpy(outfile,"chmod 660 ");
  523. X        strcat(outfile, infile);
  524. X        (void)system(outfile);
  525. X        strcpy(outfile,"chown bbs ");
  526. X        strcat(outfile, infile);
  527. X        (void)system(outfile);
  528. X    }
  529. END_OF_FILE
  530.   if test 1464 -ne `wc -c <'allign/allign.c'`; then
  531.     echo shar: \"'allign/allign.c'\" unpacked with wrong size!
  532.   fi
  533.   # end of 'allign/allign.c'
  534. fi
  535. if test -f 'allign/fallign.c' -a "${1}" != "-c" ; then 
  536.   echo shar: Will not clobber existing file \"'allign/fallign.c'\"
  537. else
  538.   echo shar: Extracting \"'allign/fallign.c'\" \(1114 characters\)
  539.   sed "s/^X//" >'allign/fallign.c' <<'END_OF_FILE'
  540. X#include <stdio.h>
  541. X#include <string.h>
  542. X#include <sys/locking.h>
  543. Xmain()
  544. X{
  545. X    FILE           *inbuf, *outbuf;
  546. X    int             code;
  547. X    int             count;
  548. X    char            infile[99], outfile[99];
  549. X    int            datar;
  550. X    int        fds;
  551. X    printf("\nInput the old user file name: ");
  552. X    scanf("%s", infile);
  553. X    printf("\n");
  554. X    strcpy(outfile, infile);
  555. X    strcat(outfile, ".OLD");
  556. X    (void) unlink(outfile);
  557. X    (void) link(infile, outfile);
  558. X    (void) unlink(infile);
  559. X    if ((inbuf = fopen(outfile, "r")) == NULL) {
  560. X        printf("\n\rError opening old users file.\n\r");
  561. X        exit(1);
  562. X    }
  563. X    if ((outbuf = fopen(infile, "a+")) == NULL) {
  564. X        printf("\n\rError opening new users file.\n\r");
  565. X        exit(1);
  566. X    }
  567. X    fds = fileno(outbuf);
  568. X    rewind(outbuf);
  569. X    locking(fds, LK_LOCK, 0L);
  570. X    while ((datar = fgetc(inbuf)) != EOF) {
  571. X        if (datar == '~')
  572. X            {
  573. X            datar = fgetc(inbuf);
  574. X            if( datar == ' ') datar = '\n';
  575. X            putc('~', outbuf);
  576. X            }
  577. X        putc(datar, outbuf);
  578. X    }
  579. X    fclose(inbuf);
  580. X    fclose(outbuf);
  581. X    strcpy(outfile, "chmod 660 ");
  582. X    strcat(outfile, infile);
  583. X    (void) system(outfile);
  584. X    strcpy(outfile, "chown bbs ");
  585. X    strcat(outfile, infile);
  586. X    (void) system(outfile);
  587. X}
  588. END_OF_FILE
  589.   if test 1114 -ne `wc -c <'allign/fallign.c'`; then
  590.     echo shar: \"'allign/fallign.c'\" unpacked with wrong size!
  591.   fi
  592.   # end of 'allign/fallign.c'
  593. fi
  594. if test -f 'areas.bbs' -a "${1}" != "-c" ; then 
  595.   echo shar: Will not clobber existing file \"'areas.bbs'\"
  596. else
  597.   echo shar: Extracting \"'areas.bbs'\" \(366 characters\)
  598.   sed "s/^X//" >'areas.bbs' <<'END_OF_FILE'
  599. XDownload Path Description of File Area                  Privs  Upload Path    
  600. Xbbssoftware   BBS Software                              1      uploads 
  601. Xunix          Unix/Xenix Files                          4      uploads 
  602. Xmsdos         MS/PC DOS Files                           5      uploads
  603. Xuploads       New Uploads ----- Not as yet checked      5      uploads 
  604. END_OF_FILE
  605.   if test 366 -ne `wc -c <'areas.bbs'`; then
  606.     echo shar: \"'areas.bbs'\" unpacked with wrong size!
  607.   fi
  608.   # end of 'areas.bbs'
  609. fi
  610. if test -f 'bulletin.2400' -a "${1}" != "-c" ; then 
  611.   echo shar: Will not clobber existing file \"'bulletin.2400'\"
  612. else
  613.   echo shar: Extracting \"'bulletin.2400'\" \(705 characters\)
  614.   sed "s/^X//" >'bulletin.2400' <<'END_OF_FILE'
  615. X
  616. XThere seems to be a misunderstanding on how to utilize the bbs at 2400 baud.
  617. XAs my welcome message states and from many messages that I have left, still,
  618. Xmany users still do not know how to switch to 2400 baud! Therefore, I will
  619. Xrepeat the instructions once again as a bulletin. Please, DO NOT leave
  620. Xme any more messages on this subject.
  621. X
  622. XTo switch to 2400 baud, once you get the initial connect and the garbage
  623. Xcharacters stop being displayed, sent me a BREAK and the getty will switch the
  624. Xcomm port to 2400 baud. If you send another break, the system will switch back
  625. Xto 1200 baud. As stated above, the BREAK sequence is used by Unix/Xenix as the
  626. Xcommand to change baud rates prior to a login.
  627. XSandy
  628. END_OF_FILE
  629.   if test 705 -ne `wc -c <'bulletin.2400'`; then
  630.     echo shar: \"'bulletin.2400'\" unpacked with wrong size!
  631.   fi
  632.   # end of 'bulletin.2400'
  633. fi
  634. if test -f 'bulletin.bbs' -a "${1}" != "-c" ; then 
  635.   echo shar: Will not clobber existing file \"'bulletin.bbs'\"
  636. else
  637.   echo shar: Extracting \"'bulletin.bbs'\" \(891 characters\)
  638.   sed "s/^X//" >'bulletin.bbs' <<'END_OF_FILE'
  639. XBulletin_name Description of Bulletin                   Privs    
  640. Xbulletin.mod  Modification history to XBBS              1             
  641. Xbulletin.hot  All about the "hot keys" used by the bbs! 1
  642. Xbulletin.msg  How to set up the system!                 1
  643. Xbulletin.reg  Registration policy                       1
  644. Xbulletin.sys  This system                               1
  645. Xbulletin.ext  Primary & secondary extensions used on sys1
  646. Xbulletin.sun  SUN version of XBBS                       1
  647. Xbulletin.cmn  Common user mistakes (** Please Read **)  1
  648. Xbulletin.9600 How to connect at 19.2K/9600 baud!        1
  649. Xbulletin.path UUCP path to alphacm                      1
  650. Xbulletin.uucp How to connect to this system via uucp    1
  651. Xbulletin.bug  Bug fix for SCO HDBuucp in version 2.3.0  1
  652. Xbulletin.job  Jobs available at Braintec Corporation    1
  653. Xbulletin.zip  The Z(ip file menu)                       1
  654. END_OF_FILE
  655.   if test 891 -ne `wc -c <'bulletin.bbs'`; then
  656.     echo shar: \"'bulletin.bbs'\" unpacked with wrong size!
  657.   fi
  658.   # end of 'bulletin.bbs'
  659. fi
  660. if test -f 'bulletin.cmn' -a "${1}" != "-c" ; then 
  661.   echo shar: Will not clobber existing file \"'bulletin.cmn'\"
  662. else
  663.   echo shar: Extracting \"'bulletin.cmn'\" \(870 characters\)
  664.   sed "s/^X//" >'bulletin.cmn' <<'END_OF_FILE'
  665. X
  666. XA COMMON mistake that MANY users have been making is that ALL COMMANDS are
  667. XNOT case sensitive. That is, you can use either upper or lower case 
  668. Xcharacters. The ONLY thing that is case sensitive are the file names used
  669. Xin downloading and uploading. Like all other BBS software, both upper and lower
  670. Xcases can be used in any of the menus or options.
  671. XAnother option, which is neglected, is the capability of stacking a directory
  672. Xnumber to the A(rea change) option from within the message and file sections.
  673. XBasically, you do not have to list out the list of directories, unless you
  674. Xwant to. If you know that you want to switch to directory 3, all you have to
  675. Xtype is 'a 3' ( note: the ' characters were added only for clarification ).
  676. XActually, any of the following combinations will work: 'a 3' 'a3' 'a;3' or
  677. Xand non-numeric character between the a and the 3!
  678. X
  679. X
  680. XSandy
  681. X
  682. END_OF_FILE
  683.   if test 870 -ne `wc -c <'bulletin.cmn'`; then
  684.     echo shar: \"'bulletin.cmn'\" unpacked with wrong size!
  685.   fi
  686.   # end of 'bulletin.cmn'
  687. fi
  688. if test -f 'bulletin.dvr' -a "${1}" != "-c" ; then 
  689.   echo shar: Will not clobber existing file \"'bulletin.dvr'\"
  690. else
  691.   echo shar: Extracting \"'bulletin.dvr'\" \(1511 characters\)
  692.   sed "s/^X//" >'bulletin.dvr' <<'END_OF_FILE'
  693. X              ######  ####### #     #   ###    #####  #######
  694. X              #     # #       #     #    #    #     # #
  695. X              #     # #       #     #    #    #       #
  696. X              #     # #####   #     #    #    #       #####
  697. X              #     # #        #   #     #    #       #
  698. X              #     # #         # #      #    #     # #
  699. X              ######  #######    #      ###    #####  #######
  700. X          ######  ######    ###   #     # ####### ######   #####
  701. X          #     # #     #    #    #     # #       #     # #     #
  702. X          #     # #     #    #    #     # #       #     # #
  703. X          #     # ######     #    #     # #####   ######   #####
  704. X          #     # #   #      #     #   #  #       #   #         #
  705. X          #     # #    #     #      # #   #       #    #  #     #
  706. X          ######  #     #   ###      #    ####### #     #  #####
  707. X              #     # ####### ####### ######  ####### ######
  708. X              ##    # #       #       #     # #       #     #
  709. X              # #   # #       #       #     # #       #     #
  710. X              #  #  # #####   #####   #     # #####   #     #
  711. X              #   # # #       #       #     # #       #     #
  712. X              #    ## #       #       #     # #       #     #
  713. X              #     # ####### ####### ######  ####### ######
  714. X
  715. X
  716. X
  717. XThere have been MANY request made to me for device drivers for Xenix. If you
  718. Xhappen to have written one that you use, could you please upload load them to
  719. Xme so that other users may also benefit.
  720. XThank you,
  721. XSandy
  722. END_OF_FILE
  723.   if test 1511 -ne `wc -c <'bulletin.dvr'`; then
  724.     echo shar: \"'bulletin.dvr'\" unpacked with wrong size!
  725.   fi
  726.   # end of 'bulletin.dvr'
  727. fi
  728. if test -f 'bulletin.enh' -a "${1}" != "-c" ; then 
  729.   echo shar: Will not clobber existing file \"'bulletin.enh'\"
  730. else
  731.   echo shar: Extracting \"'bulletin.enh'\" \(720 characters\)
  732.   sed "s/^X//" >'bulletin.enh' <<'END_OF_FILE'
  733. X
  734. XThe following system enhancements are NOW in effect:
  735. X1) The system is running under a standard SysV.3 init using a standard
  736. X   inittab.
  737. X2) The getty for the comm lines is now /usr/lib/uucp/uugetty ( modified to use
  738. X   the SCO ungetty ).
  739. X3) The default baud rate is now 2400 baud and ANY character will switch the
  740. X   baud rate to 1200 baud if a framing error is detected. Therefore, the
  741. X   BREAK sequence is now no longer needed!
  742. X
  743. X
  744. XNote: To see the difference, while in the main menu, use the A(dditional
  745. X      features) option. Perform the following commands: who -a, who -r,  
  746. X      and ps -ef.
  747. X      I am presently awaiting a release, to place into the public domain,
  748. X      my ported executables for Xenix.
  749. X
  750. X
  751. END_OF_FILE
  752.   if test 720 -ne `wc -c <'bulletin.enh'`; then
  753.     echo shar: \"'bulletin.enh'\" unpacked with wrong size!
  754.   fi
  755.   # end of 'bulletin.enh'
  756. fi
  757. if test -f 'bulletin.ext' -a "${1}" != "-c" ; then 
  758.   echo shar: Will not clobber existing file \"'bulletin.ext'\"
  759. else
  760.   echo shar: Extracting \"'bulletin.ext'\" \(803 characters\)
  761.   sed "s/^X//" >'bulletin.ext' <<'END_OF_FILE'
  762. X
  763. X                     Primary and Secondary Extensions
  764. X                            Used on This BBS
  765. X
  766. X        
  767. XA) Primary Extension
  768. X
  769. X   1) .arc             Use arc to "unarchive" and "uncompress the file"
  770. X   2) .tar             Use tar to "unarchive" the file
  771. X   3) .cpio            Use cpio to "unarchive" the file
  772. X   4) .ar              Use ar to "unarchive" the file
  773. X   5) .shar            Use /bin/sh to separate the file
  774. X   6) .shr             Use /bin/sh to separate the file
  775. X
  776. XB) Secondary Extension
  777. X
  778. X   1) .Z               Use uncompress to "uncompress" the file
  779. X   2) .z               Use unpack to "uncompress" the file
  780. X
  781. XNote: Files that end with a .Z may be either 12 bit or 16 bit compression.
  782. X      Normally, when 16 bit compression was used, it will be noted in the
  783. X      file desciption.
  784. X
  785. X
  786. END_OF_FILE
  787.   if test 803 -ne `wc -c <'bulletin.ext'`; then
  788.     echo shar: \"'bulletin.ext'\" unpacked with wrong size!
  789.   fi
  790.   # end of 'bulletin.ext'
  791. fi
  792. if test -f 'bulletin.inp' -a "${1}" != "-c" ; then 
  793.   echo shar: Will not clobber existing file \"'bulletin.inp'\"
  794. else
  795.   echo shar: Extracting \"'bulletin.inp'\" \(231 characters\)
  796.   sed "s/^X//" >'bulletin.inp' <<'END_OF_FILE'
  797. X
  798. XI am trying to implement additional features into the bbs software; however,
  799. XI am running out of ideas! If you have any ideas, that would enhance the
  800. Xsoftware, please leave me a message so that I can evaluate the request.
  801. XSandy
  802. END_OF_FILE
  803.   if test 231 -ne `wc -c <'bulletin.inp'`; then
  804.     echo shar: \"'bulletin.inp'\" unpacked with wrong size!
  805.   fi
  806.   # end of 'bulletin.inp'
  807. fi
  808. if test -f 'bulletin.path' -a "${1}" != "-c" ; then 
  809.   echo shar: Will not clobber existing file \"'bulletin.path'\"
  810. else
  811.   echo shar: Extracting \"'bulletin.path'\" \(1554 characters\)
  812.   sed "s/^X//" >'bulletin.path' <<'END_OF_FILE'
  813. X      #     # #     #  #####  ######          #     #    #    ######
  814. X      #     # #     # #     # #     #         ##   ##   # #   #     #
  815. X      #     # #     # #       #     #         # # # #  #   #  #     #
  816. X      #     # #     # #       ######          #  #  # #     # ######
  817. X      #     # #     # #       #               #     # ####### #
  818. X      #     # #     # #     # #               #     # #     # #
  819. X       #####   #####   #####  #               #     # #     # #
  820. X                               ####### #######
  821. X                                  #    #     #
  822. X                                  #    #     #
  823. X                                  #    #     #
  824. X                                  #    #     #
  825. X                                  #    #     #
  826. X                                  #    #######
  827. X              #    #       ######  #     #    #     #####  #     #
  828. X             # #   #       #     # #     #   # #   #     # ##   ##
  829. X            #   #  #       #     # #     #  #   #  #       # # # #
  830. X           #     # #       ######  ####### #     # #       #  #  #
  831. X           ####### #       #       #     # ####### #       #     #
  832. X           #     # #       #       #     # #     # #     # #     #
  833. X           #     # ####### #       #     # #     #  #####  #     #
  834. X
  835. X
  836. X
  837. X
  838. X
  839. X            {trwrb|ucla-cs|cepu}\
  840. X                                  !ucla-an\
  841. X       {ihnp4|decvax|sco}!hermix/          \
  842. X                                             !alphacm!{root|sandy}
  843. X                                           /
  844. X                      ucbvax!ucivax!mickey/
  845. X
  846. X
  847. END_OF_FILE
  848.   if test 1554 -ne `wc -c <'bulletin.path'`; then
  849.     echo shar: \"'bulletin.path'\" unpacked with wrong size!
  850.   fi
  851.   # end of 'bulletin.path'
  852. fi
  853. if test -f 'bulletin.red' -a "${1}" != "-c" ; then 
  854.   echo shar: Will not clobber existing file \"'bulletin.red'\"
  855. else
  856.   echo shar: Extracting \"'bulletin.red'\" \(194 characters\)
  857.   sed "s/^X//" >'bulletin.red' <<'END_OF_FILE'
  858. X
  859. XWhile you are in the main menu, you may want to use the R(ead selected files)
  860. Xoption. You will find the latest info-ibmpc, info-unix, and unix-wizards 
  861. Xavailable ( plus other files ).
  862. XSandy
  863. X
  864. END_OF_FILE
  865.   if test 194 -ne `wc -c <'bulletin.red'`; then
  866.     echo shar: \"'bulletin.red'\" unpacked with wrong size!
  867.   fi
  868.   # end of 'bulletin.red'
  869. fi
  870. if test -f 'bulletin.sys' -a "${1}" != "-c" ; then 
  871.   echo shar: Will not clobber existing file \"'bulletin.sys'\"
  872. else
  873.   echo shar: Extracting \"'bulletin.sys'\" \(1044 characters\)
  874.   sed "s/^X//" >'bulletin.sys' <<'END_OF_FILE'
  875. X
  876. X                        This system .......
  877. XHARDWARE
  878. X              IBM-AT running at 10mhz with 4 megabytes of memory
  879. X              80287-8 math coprocessor
  880. X              Two hard disks  ( 120 & 30 megabytes )
  881. X              Two high density floppy disk drives
  882. X              Archive 60 megabyte tape drive
  883. X              EGA monitor and controller
  884. X              Four serial ports
  885. X              Three parallel ports
  886. X              US Robotics 2400 baud modem
  887. X              DC Hayes 1200 baud modem
  888. X
  889. X    LAN to    IBM-AT running at 12mhz with 4 megabytes of memory
  890. X              80287-10 math coprocessor
  891. X              Two hard disks  ( 40 & 20 megabytes )
  892. X              One high density floppy disk drive
  893. X              One low density floppy disk drive
  894. X              Hercules monographics controller with monochrome monitor
  895. X              Two serial ports
  896. X              Three parallel ports
  897. X              DC Hayes 1200 baud modem
  898. X
  899. X
  900. XSOFTWARE
  901. X              10 mhz AT is running SCO Xenix 2.2.0
  902. X              12 mhz AT is running SCO Xenix 2.2.0
  903. X
  904. X
  905. X
  906. END_OF_FILE
  907.   if test 1044 -ne `wc -c <'bulletin.sys'`; then
  908.     echo shar: \"'bulletin.sys'\" unpacked with wrong size!
  909.   fi
  910.   # end of 'bulletin.sys'
  911. fi
  912. if test -f 'bulletin.upl' -a "${1}" != "-c" ; then 
  913.   echo shar: Will not clobber existing file \"'bulletin.upl'\"
  914. else
  915.   echo shar: Extracting \"'bulletin.upl'\" \(1328 characters\)
  916.   sed "s/^X//" >'bulletin.upl' <<'END_OF_FILE'
  917. XI have made my source code for this bbs available to all to use and run. All
  918. XI have asked or will ask is that the users please upload software to this
  919. Xsystem so others may benefit. To date, I am really embarrassed to say that
  920. Xthe uploads to this system are virtually non existent. I get private
  921. Xmessages saying that "it is too expensive to upload". This may be true;
  922. Xhowever, the users that leave such messages will stay on the system and
  923. Xdownload until either their time limit expires or their download limit reaches
  924. Xzero! I guess that it isn't too expensive to take, just give! 
  925. X
  926. XAs you know, I have the capability in this software to restrict downloads. I
  927. Xwould rather not do this; however, if the needed support is not forth
  928. Xcoming, I will do so. 
  929. X
  930. XThere are other Unix/Xenix bbs programs available. Some of the programs are
  931. Xfree, however limited, while others are VERY expensive and really not that
  932. Xpowerful. I am constantly making modifications to the code to make it more
  933. Xversitle, easier to use, and more complete. I give it out without any costs
  934. Xboth in executable form and source form. I was on on system today which runs
  935. Xmy software and the "sysop" had the gull to remove my name from the code
  936. Xand put in his own! I don't appreciate such actions!!! Not only is it illegal
  937. Xbut immoral! 
  938. X
  939. X
  940. XSanford ( Sandy ) Zelkovitz 
  941. END_OF_FILE
  942.   if test 1328 -ne `wc -c <'bulletin.upl'`; then
  943.     echo shar: \"'bulletin.upl'\" unpacked with wrong size!
  944.   fi
  945.   # end of 'bulletin.upl'
  946. fi
  947. if test -f 'bulletin.uucp' -a "${1}" != "-c" ; then 
  948.   echo shar: Will not clobber existing file \"'bulletin.uucp'\"
  949. else
  950.   echo shar: Extracting \"'bulletin.uucp'\" \(1084 characters\)
  951.   sed "s/^X//" >'bulletin.uucp' <<'END_OF_FILE'
  952. X
  953. X
  954. XThere have been MANY questions left for me on how to connect to this system
  955. Xvia uucp to request files. Actually, the procedure is very simple. Just
  956. Xlogin as nuucp with no password. All of the directories used by this bbs
  957. Xhave read privileges; therefore, you can request and receive any file or
  958. Xfiles that are available for downloading. You must remember the full
  959. Xpath names of the files. Any file that is in the bbssoftware directory
  960. Xhas the path name of /user/bbsfiles/bbssoftware/. Likewise, the unix
  961. Xdirectory has the path name of /user/bbsfiles/unix/. This is also true
  962. Xfor each and every file directory on the system. You can get the directory
  963. Xname from the A(rea change) command while in the file section. You will
  964. Xrecognize the name by the first field displayed on each and every line.
  965. XJust add /user/bbsfiles/ to whatever is displayed.
  966. X
  967. XAs an example, if you want the file, ALLbbs.tar.Z, the full pathname is
  968. X/user/bbsfiles/bbssoftware/ALLbbs.tar.Z.
  969. X
  970. XIf you have a file that you would like to send to this system for others
  971. Xto use, please send it to /usr/spool/uucppublic.
  972. X
  973. END_OF_FILE
  974.   if test 1084 -ne `wc -c <'bulletin.uucp'`; then
  975.     echo shar: \"'bulletin.uucp'\" unpacked with wrong size!
  976.   fi
  977.   # end of 'bulletin.uucp'
  978. fi
  979. if test -f 'chatbbs/chat.h' -a "${1}" != "-c" ; then 
  980.   echo shar: Will not clobber existing file \"'chatbbs/chat.h'\"
  981. else
  982.   echo shar: Extracting \"'chatbbs/chat.h'\" \(1056 characters\)
  983.   sed "s/^X//" >'chatbbs/chat.h' <<'END_OF_FILE'
  984. X#include <termio.h>
  985. X#include <errno.h>
  986. X#include <fcntl.h>
  987. X#include <stdio.h>
  988. X#define lowbyte(w) ((w) & 0377)
  989. X#define highbyte(w) lowbyte((w)>>8)
  990. X#define EMPTY '\0'
  991. Xtypedef enum {
  992. X    FALSE, TRUE
  993. X}               BOOLEAN;
  994. Xstatic char     cbuf = EMPTY;
  995. Xstatic struct termio tbufsave;
  996. X
  997. Xsyserr(msg)
  998. X    char           *msg;
  999. X{
  1000. X    extern int      errno, sys_nerr;
  1001. X    extern char    *sys_errlist[];
  1002. X
  1003. X    fprintf(stderr, "ERROR:%s (%d", msg, errno);
  1004. X    if (errno > 0 && errno < sys_nerr)
  1005. X        fprintf(stderr, ";%s)\n", sys_errlist[errno]);
  1006. X    else
  1007. X        fprintf(stderr, ")\n");
  1008. X    exit(1);
  1009. X}
  1010. Xfatal(msg)
  1011. X    char           *msg;
  1012. X{
  1013. X    fprintf(stderr, "ERROR:%s\n", msg);
  1014. X    exit(1);
  1015. X}
  1016. X
  1017. Xsetraw()
  1018. X{
  1019. X    struct termio   tbuf;
  1020. X    if (ioctl(0, TCGETA, &tbuf) == -1)
  1021. X        syserr("ioctl");
  1022. X    tbufsave = tbuf;
  1023. X    tbuf.c_iflag = 0;
  1024. X    tbuf.c_iflag |= IXON;
  1025. X    tbuf.c_iflag |= IXANY;
  1026. X
  1027. X    tbuf.c_oflag &= ~OPOST;
  1028. X    tbuf.c_lflag &= ~(ICANON | ISIG | ECHO);
  1029. X    tbuf.c_cc[4] = 1;
  1030. X    tbuf.c_cc[5] = 0;
  1031. X    if (ioctl(0, TCSETAF, &tbuf) == -1)
  1032. X        syserr("ioctl2");
  1033. X}
  1034. X
  1035. Xrestore()
  1036. X{
  1037. X    if (ioctl(0, TCSETAF, &tbufsave) == -1)
  1038. X        syserr("ioctl3");
  1039. X}
  1040. END_OF_FILE
  1041.   if test 1056 -ne `wc -c <'chatbbs/chat.h'`; then
  1042.     echo shar: \"'chatbbs/chat.h'\" unpacked with wrong size!
  1043.   fi
  1044.   # end of 'chatbbs/chat.h'
  1045. fi
  1046. if test -f 'dlmsg.bbs' -a "${1}" != "-c" ; then 
  1047.   echo shar: Will not clobber existing file \"'dlmsg.bbs'\"
  1048. else
  1049.   echo shar: Extracting \"'dlmsg.bbs'\" \(221 characters\)
  1050.   sed "s/^X//" >'dlmsg.bbs' <<'END_OF_FILE'
  1051. X
  1052. XPlease remember that the file or files that you about to download was/were
  1053. Xput on this system by someone else at their expense. If you have a file or
  1054. Xfiles that you would like to upload, others can also benefit.
  1055. XSandy
  1056. END_OF_FILE
  1057.   if test 221 -ne `wc -c <'dlmsg.bbs'`; then
  1058.     echo shar: \"'dlmsg.bbs'\" unpacked with wrong size!
  1059.   fi
  1060.   # end of 'dlmsg.bbs'
  1061. fi
  1062. if test -f 'etc_profile' -a "${1}" != "-c" ; then 
  1063.   echo shar: Will not clobber existing file \"'etc_profile'\"
  1064. else
  1065.   echo shar: Extracting \"'etc_profile'\" \(250 characters\)
  1066.   sed "s/^X//" >'etc_profile' <<'END_OF_FILE'
  1067. X
  1068. XSHELL=/bin/sh
  1069. Xexport SHELL
  1070. Xpspool=/usr/spool/uucppublic
  1071. Xmspool=/usr/spool/mail
  1072. Xulib=/usr/lib/uucp
  1073. Xuspool=/usr/spool/uucp
  1074. Xbbs=/usr/sandy/bbs
  1075. Xsl=/usr/sandy/lib
  1076. Xsb=/usr/sandy/bin
  1077. Xa=`who am i | cut -c1-3`
  1078. Xif test "$a" != bbs
  1079. Xthen
  1080. X    cat /etc/motd.motd
  1081. Xfi
  1082. END_OF_FILE
  1083.   if test 250 -ne `wc -c <'etc_profile'`; then
  1084.     echo shar: \"'etc_profile'\" unpacked with wrong size!
  1085.   fi
  1086.   # end of 'etc_profile'
  1087. fi
  1088. if test -f 'features.bbs' -a "${1}" != "-c" ; then 
  1089.   echo shar: Will not clobber existing file \"'features.bbs'\"
  1090. else
  1091.   echo shar: Extracting \"'features.bbs'\" \(461 characters\)
  1092.   sed "s/^X//" >'features.bbs' <<'END_OF_FILE'
  1093. XProgram........................................... Description.......... Privs
  1094. X/usr/bin/finger                                    Finger                5 
  1095. X/bin/df -t                                         Diskspace             5
  1096. X/bin/who                                           On system             5 
  1097. X/usr/bin/w                                         Who and Where         5
  1098. X/bin/vi /usr/sandy/bbs/callers.bbs1A               Edit callers file     32767*
  1099. END_OF_FILE
  1100.   if test 461 -ne `wc -c <'features.bbs'`; then
  1101.     echo shar: \"'features.bbs'\" unpacked with wrong size!
  1102.   fi
  1103.   # end of 'features.bbs'
  1104. fi
  1105. if test -f 'help.bbs' -a "${1}" != "-c" ; then 
  1106.   echo shar: Will not clobber existing file \"'help.bbs'\"
  1107. else
  1108.   echo shar: Extracting \"'help.bbs'\" \(1222 characters\)
  1109.   sed "s/^X//" >'help.bbs' <<'END_OF_FILE'
  1110. X                      MAIN MENU HELP SECTION
  1111. X
  1112. XB    Go to the bulletin section
  1113. XG    Good-bye
  1114. XN    Read the NEW USER INFO
  1115. XW    Read the welcome message
  1116. XX    eXpert mode ( toggle )
  1117. XF    Go to the Files Section
  1118. XM    Go to the Message Section
  1119. XH    Read the HUMOR file
  1120. XV    Print out the version and date of XBBS
  1121. XT    Toggle full page stop/continue mode (useful for file capture)
  1122. XD    Daily sunrise/sunset information (with present time and date)
  1123. XU    Goto Unix/Xenix --- Extremely High Privilege Required
  1124. XP    Change your existing password
  1125. XC    Request a CHAT with the SYSOP
  1126. XQ    Answer my questionnaire
  1127. XA    Additional user defined programs and shell scripts
  1128. XR    Read sysop selected files
  1129. XZ    Zip mail --- Read all messages in all message bases that are addressed
  1130. X     to you. You will be able to delete them after reading them. Or, you can
  1131. X     Read all new public messages in all the message bases. 
  1132. X     privilege level is high enough, respond to the individual messages.
  1133. XO    Online conference section (CB section)
  1134. XE    Check to see who is presently in conference
  1135. XL    Check to see who is logged onto the bbs
  1136. XS    USENET ACCESS --set terminal type, postnews, & readnews
  1137. XI    Enter SIG <Special Interest Group> Section
  1138. X
  1139. X
  1140. END_OF_FILE
  1141.   if test 1222 -ne `wc -c <'help.bbs'`; then
  1142.     echo shar: \"'help.bbs'\" unpacked with wrong size!
  1143.   fi
  1144.   # end of 'help.bbs'
  1145. fi
  1146. if test -f 'helpfile.bbs' -a "${1}" != "-c" ; then 
  1147.   echo shar: Will not clobber existing file \"'helpfile.bbs'\"
  1148. else
  1149.   echo shar: Extracting \"'helpfile.bbs'\" \(751 characters\)
  1150.   sed "s/^X//" >'helpfile.bbs' <<'END_OF_FILE'
  1151. XA  Area change - Note you can insert the area number after the A/a and it
  1152. X   will go directly to that area.
  1153. XF  List the files in the present file area
  1154. XU  Upload a file ---- From you to me
  1155. XD  Download a file --- From me to you
  1156. XM  Return to the MAIN menu
  1157. XX  Expert mode (toggle)
  1158. XT  Toggle page control
  1159. XG  Goodbye - Disconnect
  1160. XC  List the contents of a .tar, .tar.Z, .zip  or .arc file
  1161. XR  Raw list of files ( Unix/Xenix format )
  1162. XN  List new files since last day you logged in
  1163. XZ  ZIP through all allowable directories with options L F N R
  1164. XL  Locate a file or files which has a file name containing the input substring
  1165. X   Do NOT use an asterisk as part of the substring!
  1166. XS  Summary of the present directory statistics
  1167. X?  help ( display this information )
  1168. X
  1169. END_OF_FILE
  1170.   if test 751 -ne `wc -c <'helpfile.bbs'`; then
  1171.     echo shar: \"'helpfile.bbs'\" unpacked with wrong size!
  1172.   fi
  1173.   # end of 'helpfile.bbs'
  1174. fi
  1175. if test -f 'helpmsg.bbs' -a "${1}" != "-c" ; then 
  1176.   echo shar: Will not clobber existing file \"'helpmsg.bbs'\"
  1177. else
  1178.   echo shar: Extracting \"'helpmsg.bbs'\" \(701 characters\)
  1179.   sed "s/^X//" >'helpmsg.bbs' <<'END_OF_FILE'
  1180. X
  1181. X
  1182. X                       MESSAGE MENU HELP SECTION
  1183. X
  1184. X
  1185. XA    Change message AREA
  1186. XK    Kill a message
  1187. XQ    Quick scan
  1188. XS    Scan the messages
  1189. XR    Read the messages
  1190. XC    Check your mail status ( to you, from you, and since last call )
  1191. XY    Your messages ( messages addressed to you ) - read and optional kill
  1192. XE    Enter message to another user
  1193. XN    Enter message to another user and block, if possible, each line.
  1194. XM    Return to the MAIN MENU
  1195. XX    Toggle expert/novice mode
  1196. XT    Toggle page control
  1197. XB    You can select a series of messages to read in a particular order.
  1198. X     Arguments are required after the B argument.
  1199. X     example: b 1 2 3 9 55 3
  1200. X     or:      B;1;2;3;9;55;3
  1201. XG    Good-bye
  1202. X           
  1203. X
  1204. END_OF_FILE
  1205.   if test 701 -ne `wc -c <'helpmsg.bbs'`; then
  1206.     echo shar: \"'helpmsg.bbs'\" unpacked with wrong size!
  1207.   fi
  1208.   # end of 'helpmsg.bbs'
  1209. fi
  1210. if test -f 'helpsig.bbs' -a "${1}" != "-c" ; then 
  1211.   echo shar: Will not clobber existing file \"'helpsig.bbs'\"
  1212. else
  1213.   echo shar: Extracting \"'helpsig.bbs'\" \(357 characters\)
  1214.   sed "s/^X//" >'helpsig.bbs' <<'END_OF_FILE'
  1215. X
  1216. X                     SIG MAIN MENU HELP INFORMATION
  1217. X
  1218. XM       Go to the SIG message section
  1219. XF       Go to the SIG file section
  1220. XA       Additional user defined programs and/or shell scripts
  1221. XL       Leave this SIG
  1222. XX       Novice/Expert mode toggle
  1223. XT       Toggle page control  < stop/continuous mode >
  1224. XG       Leave XBBS --- Goodbye
  1225. X?       Output this file
  1226. X
  1227. END_OF_FILE
  1228.   if test 357 -ne `wc -c <'helpsig.bbs'`; then
  1229.     echo shar: \"'helpsig.bbs'\" unpacked with wrong size!
  1230.   fi
  1231.   # end of 'helpsig.bbs'
  1232. fi
  1233. if test -f 'listfile.bbs' -a "${1}" != "-c" ; then 
  1234.   echo shar: Will not clobber existing file \"'listfile.bbs'\"
  1235. else
  1236.   echo shar: Extracting \"'listfile.bbs'\" \(304 characters\)
  1237.   sed "s/^X//" >'listfile.bbs' <<'END_OF_FILE'
  1238. XFile to List...................................... Description.......... Privs
  1239. X/user/info_files/info-unix                         Latest info-unix      2
  1240. X/user/info_files/unix-wizards                      Latest unix-wizards   2
  1241. X/user/bbs.lst                                      IBM National BBS List 2
  1242. END_OF_FILE
  1243.   if test 304 -ne `wc -c <'listfile.bbs'`; then
  1244.     echo shar: \"'listfile.bbs'\" unpacked with wrong size!
  1245.   fi
  1246.   # end of 'listfile.bbs'
  1247. fi
  1248. if test -f 'listuser/listuser.c' -a "${1}" != "-c" ; then 
  1249.   echo shar: Will not clobber existing file \"'listuser/listuser.c'\"
  1250. else
  1251.   echo shar: Extracting \"'listuser/listuser.c'\" \(1142 characters\)
  1252.   sed "s/^X//" >'listuser/listuser.c' <<'END_OF_FILE'
  1253. X#include <stdio.h>
  1254. X#include <string.h>
  1255. Xmain()
  1256. X    {
  1257. X    FILE *inbuf;
  1258. X    int code;
  1259. X    int count;
  1260. X    char infile[99], outfile[99];
  1261. X    char u_fname[99], u_lname[99], u_password[99], u_time1[99];
  1262. X    char u_date1[99], u_time2[99], u_date2[99], u_city[99];
  1263. X    char l_m_base[5], l_f_base[5], xprt[3], toggle[3];
  1264. X    printf("\n\r");
  1265. X    strcpy(infile,"/user/bbsfiles/users.bbs");
  1266. X    if((inbuf = fopen(infile, "r" )) == NULL)
  1267. X        {
  1268. X        printf("\n\rError opening users file.\n\r");
  1269. X        exit(1);
  1270. X        }
  1271. X    while(1)
  1272. X        {
  1273. X        code = fscanf(inbuf,"%[^~]~%[^~]~%[^~]~%[^~]~%[^~]~%[^~]~%[^~]~%[^~]~%[^~]~%[^~]~%[^~]~%[^~]~\n",
  1274. X            u_fname, u_lname, u_password, u_time1, u_date1,
  1275. X            u_time2, u_date2, u_city, l_m_base, l_f_base, xprt, toggle);
  1276. X        if(code < 12 ) break;
  1277. X        term_space(u_fname);
  1278. X        term_space(u_lname);
  1279. X        term_space(u_city);
  1280. X        term_space(u_time2);
  1281. X        term_space(u_date2);
  1282. X        printf("%s %s from %s was last on at %s on %s\n",u_fname,u_lname,u_city,u_time2,u_date2);
  1283. X
  1284. X        }
  1285. X    fclose(inbuf);
  1286. X    }
  1287. Xterm_space(adr) char *adr;
  1288. X    {
  1289. X    int l;
  1290. X    char *str_ptr;
  1291. X    str_ptr = adr;
  1292. X    l = strlen(adr);
  1293. X    str_ptr = str_ptr + l - 1;
  1294. X    while (str_ptr >= adr)
  1295. X        {
  1296. X        if( *str_ptr != ' ')return;
  1297. X        *str_ptr-- = '\0';
  1298. X        }
  1299. X    }
  1300. END_OF_FILE
  1301.   if test 1142 -ne `wc -c <'listuser/listuser.c'`; then
  1302.     echo shar: \"'listuser/listuser.c'\" unpacked with wrong size!
  1303.   fi
  1304.   # end of 'listuser/listuser.c'
  1305. fi
  1306. if test -f 'listuser/listuser.read.' -a "${1}" != "-c" ; then 
  1307.   echo shar: Will not clobber existing file \"'listuser/listuser.read.'\"
  1308. else
  1309.   echo shar: Extracting \"'listuser/listuser.read.'\" \(449 characters\)
  1310.   sed "s/^X//" >'listuser/listuser.read.' <<'END_OF_FILE'
  1311. XThere are two different versions of program which will list the users
  1312. Xon your bbs: listuser and listusers.
  1313. XThe two programs are basically the same except for how they get the file
  1314. Xname. Listuser expects the file to be called users.bbs and also that it
  1315. Xresides in the same directory. This is the version that I use as an
  1316. XA(dditional features) program. Listusers prompts you for the full pathname
  1317. Xof the file.
  1318. X
  1319. XSandy
  1320. X                  714-828-0288
  1321. X
  1322. END_OF_FILE
  1323.   if test 449 -ne `wc -c <'listuser/listuser.read.'`; then
  1324.     echo shar: \"'listuser/listuser.read.'\" unpacked with wrong size!
  1325.   fi
  1326.   # end of 'listuser/listuser.read.'
  1327. fi
  1328. if test -f 'listuser/listusers.c' -a "${1}" != "-c" ; then 
  1329.   echo shar: Will not clobber existing file \"'listuser/listusers.c'\"
  1330. else
  1331.   echo shar: Extracting \"'listuser/listusers.c'\" \(1176 characters\)
  1332.   sed "s/^X//" >'listuser/listusers.c' <<'END_OF_FILE'
  1333. X#include <stdio.h>
  1334. X#include <string.h>
  1335. Xmain()
  1336. X    {
  1337. X    FILE *inbuf;
  1338. X    int code;
  1339. X    int count;
  1340. X    char infile[99], outfile[99];
  1341. X    char u_fname[99], u_lname[99], u_password[99], u_time1[99];
  1342. X    char u_date1[99], u_time2[99], u_date2[99], u_city[99];
  1343. X    char l_m_base[5], l_f_base[5], xprt[3], toggle[3];
  1344. X    printf("\nInput the full path name of the user file: ");
  1345. X    scanf("%s", infile);
  1346. X    printf("\n");
  1347. X    if((inbuf = fopen(infile, "r" )) == NULL)
  1348. X        {
  1349. X        printf("\n\rError opening users file.\n\r");
  1350. X        exit(1);
  1351. X        }
  1352. X    while(1)
  1353. X        {
  1354. X        code = fscanf(inbuf,"%[^~]~%[^~]~%[^~]~%[^~]~%[^~]~%[^~]~%[^~]~%[^~]~%[^~]~%[^~]~%[^~]~%[^~]~\n",
  1355. X            u_fname, u_lname, u_password, u_time1, u_date1,
  1356. X            u_time2, u_date2, u_city, l_m_base, l_f_base, xprt, toggle);
  1357. X        if(code < 12 ) break;
  1358. X        term_space(u_fname);
  1359. X        term_space(u_lname);
  1360. X        term_space(u_city);
  1361. X        term_space(u_time2);
  1362. X        term_space(u_date2);
  1363. X        printf("%s %s from %s was last on at %s on %s\n",u_fname,u_lname,u_city,u_time2,u_date2);
  1364. X
  1365. X        }
  1366. X    fclose(inbuf);
  1367. X    }
  1368. Xterm_space(adr) char *adr;
  1369. X    {
  1370. X    int l;
  1371. X    char *str_ptr;
  1372. X    str_ptr = adr;
  1373. X    l = strlen(adr);
  1374. X    str_ptr = str_ptr + l - 1;
  1375. X    while (str_ptr >= adr)
  1376. X        {
  1377. X        if( *str_ptr != ' ')return;
  1378. X        *str_ptr-- = '\0';
  1379. X        }
  1380. X    }
  1381. END_OF_FILE
  1382.   if test 1176 -ne `wc -c <'listuser/listusers.c'`; then
  1383.     echo shar: \"'listuser/listusers.c'\" unpacked with wrong size!
  1384.   fi
  1385.   # end of 'listuser/listusers.c'
  1386. fi
  1387. if test -f 'msgareas.bbs' -a "${1}" != "-c" ; then 
  1388.   echo shar: Will not clobber existing file \"'msgareas.bbs'\"
  1389. else
  1390.   echo shar: Extracting \"'msgareas.bbs'\" \(344 characters\)
  1391.   sed "s/^X//" >'msgareas.bbs' <<'END_OF_FILE'
  1392. XMessage  Path Description of Message Area               Privs    
  1393. Xgeneral       General Message Area                      1             
  1394. Xhelpwanted    Posting of Positions                      1              
  1395. Xforsale       Computer Equipment for Sale               1         
  1396. Xspecial       Sysop Level Messages                      32767*     
  1397. END_OF_FILE
  1398.   if test 344 -ne `wc -c <'msgareas.bbs'`; then
  1399.     echo shar: \"'msgareas.bbs'\" unpacked with wrong size!
  1400.   fi
  1401.   # end of 'msgareas.bbs'
  1402. fi
  1403. if test -f 'msgpack/packmisc.c' -a "${1}" != "-c" ; then 
  1404.   echo shar: Will not clobber existing file \"'msgpack/packmisc.c'\"
  1405. else
  1406.   echo shar: Extracting \"'msgpack/packmisc.c'\" \(1326 characters\)
  1407.   sed "s/^X//" >'msgpack/packmisc.c' <<'END_OF_FILE'
  1408. X/*
  1409. X * bbscmisc.c 
  1410. X *
  1411. X * Support routines used by BBSc.c. Mike Kelly 
  1412. X *
  1413. X * 06/12/83 v1.0    written 07/07/83 v1.0    updated 
  1414. X */
  1415. X
  1416. X#include "packdef.h"
  1417. X#include <sys/types.h>
  1418. X#include <sys/stat.h>
  1419. X
  1420. X#define LASTDATE  " 07/07/83 "
  1421. X
  1422. X#define PGMNAME "BBSCMISC "
  1423. X#define VERSION " 1.0 "
  1424. X
  1425. X
  1426. Xstrfill(buf, fillchar, length)    /* fill a string with fillchar */
  1427. X    char           *buf;    /* for length -1 */
  1428. X    int             fillchar, length;
  1429. X{
  1430. X    while (--length) {    /* really is length -1 */
  1431. X        *buf++ = fillchar;
  1432. X    }
  1433. X    *buf++ = '\0';        /* need room for this */
  1434. X}
  1435. X
  1436. Xsubstr(from, to, start, length)    /* moves chars from "from" to "to" */
  1437. X    char           *from, *to;    /* starting at "start" for */
  1438. X/* "length" number of chars */
  1439. X    int             start, length;    /* for beginning of string use 1, not
  1440. X                     * 0 */
  1441. X{
  1442. X    int             cnt;
  1443. X
  1444. X    cnt = 0;
  1445. X
  1446. X    while (--start) {    /* adjust sending field pointer */
  1447. X        from++;
  1448. X    }
  1449. X
  1450. X    while ((cnt < length) && (*to++ = *from++)) {    /* do the moving */
  1451. X        cnt++;
  1452. X    }
  1453. X
  1454. X    *to = '\0';
  1455. X
  1456. X}
  1457. X
  1458. Xitoa(str, n)            /* taken from float.c */
  1459. X    char           *str;
  1460. X{
  1461. X    sprintf(str, "%d", n);
  1462. X}
  1463. X/* end of function         */
  1464. X
  1465. Xseek(fildes, posit, dummy) int 
  1466. X    fildes, posit, dummy;
  1467. X{
  1468. X    long            pos;
  1469. X    pos = posit * 128L;
  1470. X    /* return(lseek(fildes,posit << 7,0)) ;    */
  1471. X    return (lseek(fildes, pos, 0));
  1472. X}
  1473. X/* end of function         */
  1474. X
  1475. X/* end of program       */
  1476. END_OF_FILE
  1477.   if test 1326 -ne `wc -c <'msgpack/packmisc.c'`; then
  1478.     echo shar: \"'msgpack/packmisc.c'\" unpacked with wrong size!
  1479.   fi
  1480.   chmod +x 'msgpack/packmisc.c'
  1481.   # end of 'msgpack/packmisc.c'
  1482. fi
  1483. if test -f 'question.qst' -a "${1}" != "-c" ; then 
  1484.   echo shar: Will not clobber existing file \"'question.qst'\"
  1485. else
  1486.   echo shar: Extracting \"'question.qst'\" \(435 characters\)
  1487.   sed "s/^X//" >'question.qst' <<'END_OF_FILE'
  1488. X@XBBS New User Questionnaire
  1489. XNDo you wish to continue (y/n)
  1490. X{
  1491. X/
  1492. X}
  1493. X^Input your full name
  1494. X^Input your home (voice) telephone number 
  1495. X^Input your data telephone number
  1496. X!Input your work telephone number
  1497. X&Input your full address ( 3 lines available )
  1498. X*
  1499. X$
  1500. X$
  1501. X^Input your profession
  1502. X^Where did you hear about this system
  1503. X!What is your uucp address ( from a major node )
  1504. X@     
  1505. X@Thank you for taking the time to answer my questionnaire.
  1506. X@Sandy
  1507. END_OF_FILE
  1508.   if test 435 -ne `wc -c <'question.qst'`; then
  1509.     echo shar: \"'question.qst'\" unpacked with wrong size!
  1510.   fi
  1511.   # end of 'question.qst'
  1512. fi
  1513. if test -f 'sealink/Makefile.286' -a "${1}" != "-c" ; then 
  1514.   echo shar: Will not clobber existing file \"'sealink/Makefile.286'\"
  1515. else
  1516.   echo shar: Extracting \"'sealink/Makefile.286'\" \(575 characters\)
  1517.   sed "s/^X//" >'sealink/Makefile.286' <<'END_OF_FILE'
  1518. X# This makefile is specifically for XENIX; you can delete most of the
  1519. X# options when using non-segmented architectures.  Pay attention to
  1520. X# libraries needed, e.g. to use nap() in XENIX you must use the
  1521. X# -lx library.
  1522. X#
  1523. X# This program assumes the existence of getopt() in the standard
  1524. X# library!
  1525. X
  1526. XCFLAGS=-Ms -i -Ox -K
  1527. XLFLAGS=-F 0400 -s
  1528. XLIBS=
  1529. X
  1530. Xsealink: sealink.c
  1531. X    cc $(CFLAGS) $(LFLAGS) -o sealink $(LIBS) sealink.c
  1532. X    rm -f sealink.o
  1533. X
  1534. Xtar: sealink.c
  1535. X    -chmod o-rw sealink.c
  1536. X    -chmod ug+rw sealink.c
  1537. X    -chown bin sealink.c
  1538. X    tar cvnf sealink.tar Readme _HISTORY sealink.mk sealink.c
  1539. END_OF_FILE
  1540.   if test 575 -ne `wc -c <'sealink/Makefile.286'`; then
  1541.     echo shar: \"'sealink/Makefile.286'\" unpacked with wrong size!
  1542.   fi
  1543.   # end of 'sealink/Makefile.286'
  1544. fi
  1545. if test -f 'sealink/Makefile.386' -a "${1}" != "-c" ; then 
  1546.   echo shar: Will not clobber existing file \"'sealink/Makefile.386'\"
  1547. else
  1548.   echo shar: Extracting \"'sealink/Makefile.386'\" \(564 characters\)
  1549.   sed "s/^X//" >'sealink/Makefile.386' <<'END_OF_FILE'
  1550. X# This makefile is specifically for XENIX386; you can delete most of the
  1551. X# options when using non-segmented architectures.  Pay attention to
  1552. X# libraries needed, e.g. to use nap() in XENIX you must use the
  1553. X# -lx library.
  1554. X#
  1555. X# This program assumes the existence of getopt() in the standard
  1556. X# library!
  1557. X
  1558. XCFLAGS=-Ox 
  1559. XLFLAGS=-s
  1560. XLIBS=-lx
  1561. X
  1562. Xsealink: sealink.c
  1563. X    cc $(CFLAGS) $(LFLAGS) -o sealink $(LIBS) sealink.c
  1564. X    rm -f sealink.o
  1565. X
  1566. Xtar: sealink.c
  1567. X    -chmod o-rw sealink.c
  1568. X    -chmod ug+rw sealink.c
  1569. X    -chown bin sealink.c
  1570. X    tar cvnf sealink.tar Readme _HISTORY sealink.mk sealink.c
  1571. END_OF_FILE
  1572.   if test 564 -ne `wc -c <'sealink/Makefile.386'`; then
  1573.     echo shar: \"'sealink/Makefile.386'\" unpacked with wrong size!
  1574.   fi
  1575.   # end of 'sealink/Makefile.386'
  1576. fi
  1577. if test -f 'sealink/Readme' -a "${1}" != "-c" ; then 
  1578.   echo shar: Will not clobber existing file \"'sealink/Readme'\"
  1579. else
  1580.   echo shar: Extracting \"'sealink/Readme'\" \(1300 characters\)
  1581.   sed "s/^X//" >'sealink/Readme' <<'END_OF_FILE'
  1582. XSEAlink/SYSV and SEAlink/BSD support full pathnames locally (but not in
  1583. Xthe file name transmitted to the remote SEAlink program).
  1584. X
  1585. XThe only known bug at this point is really a flaw in the original design
  1586. Xof the protocol; rather than using time measured in seconds starting in
  1587. X1970, the design called for time measured in seconds starting in 1980.
  1588. XSince then the protocol definition has been changed to reflect the
  1589. X"real" standard.  At this point I haven't worked out a method to
  1590. Xdetermine which time is used in a particular SEAlink implementation.
  1591. X
  1592. XBe sure to check the #defines in sealink.c for compiling on different
  1593. Xsystems.  Note that with Ultrix v1.2, you must use BSD/V7 functions, NOT
  1594. Xthe System V emulation -- it simply will not work correctly.  Also be
  1595. Xaware that getopt.o is expected to be in the standard library; if it
  1596. Xisn't there are PD versions available from many sources (including
  1597. Xmy system, clmqt, see address below).
  1598. X
  1599. XThe makefile supplied (sealink.mk) is specific to XENIX for 80286-based
  1600. Xmachines and will have to be modified slightly for other systems.  In
  1601. Xmost cases a simple "cc -O sealink.c -o sealink" will do what you need
  1602. Xafter you have checked the compile-time switches in the code.
  1603. X
  1604. XNOTE:  this program will probably not work with cu!
  1605. X
  1606. XScott Reynolds
  1607. Xuucp:  clmqt!scott
  1608. END_OF_FILE
  1609.   if test 1300 -ne `wc -c <'sealink/Readme'`; then
  1610.     echo shar: \"'sealink/Readme'\" unpacked with wrong size!
  1611.   fi
  1612.   # end of 'sealink/Readme'
  1613. fi
  1614. if test -f 'sigs.bbs' -a "${1}" != "-c" ; then 
  1615.   echo shar: Will not clobber existing file \"'sigs.bbs'\"
  1616. else
  1617.   echo shar: Extracting \"'sigs.bbs'\" \(234 characters\)
  1618.   sed "s/^X//" >'sigs.bbs' <<'END_OF_FILE'
  1619. XProgram........................................... Description.......... Privs
  1620. Xxbbssysops                                         SIG for XBBS sysops   5    *
  1621. Xxbbsusers                                          SIG for XBBS users    5
  1622. END_OF_FILE
  1623.   if test 234 -ne `wc -c <'sigs.bbs'`; then
  1624.     echo shar: \"'sigs.bbs'\" unpacked with wrong size!
  1625.   fi
  1626.   # end of 'sigs.bbs'
  1627. fi
  1628. if test -f 'system.bbs' -a "${1}" != "-c" ; then 
  1629.   echo shar: Will not clobber existing file \"'system.bbs'\"
  1630. else
  1631.   echo shar: Extracting \"'system.bbs'\" \(1150 characters\)
  1632.   sed "s/^X//" >'system.bbs' <<'END_OF_FILE'
  1633. X
  1634. X
  1635. X
  1636. X        --------------------------------------------------------- 
  1637. X       |                                                         |
  1638. X       |       x      x    bbbbbb      bbbbbb       ssssss       |
  1639. X       |        x    x     b      b    b      b    s             |
  1640. X       |         x  x      b      b    b      b    s             |
  1641. X       |          xx       bbbbbb      bbbbbb        sss         |
  1642. X       |         x  x      b      b    b      b           s      |
  1643. X       |        x    x     b      b    b      b           s      |
  1644. X       |       x      x    bbbbbb      bbbbbb      sssssss       |
  1645. X       |                                                         |
  1646. X       |                                                         |
  1647. X       |        T H A N K    Y O U   F O R   C A L L I N G       |
  1648. X       |                  Please call back soon                  |
  1649. X       |                                                         |
  1650. X       |                          "C" ya                         |
  1651. X       |                                                         |
  1652. X        --------------------------------------------------------- 
  1653. X(click)
  1654. END_OF_FILE
  1655.   if test 1150 -ne `wc -c <'system.bbs'`; then
  1656.     echo shar: \"'system.bbs'\" unpacked with wrong size!
  1657.   fi
  1658.   # end of 'system.bbs'
  1659. fi
  1660. if test -f 'today/moontx.h' -a "${1}" != "-c" ; then 
  1661.   echo shar: Will not clobber existing file \"'today/moontx.h'\"
  1662. else
  1663.   echo shar: Extracting \"'today/moontx.h'\" \(529 characters\)
  1664.   sed "s/^X//" >'today/moontx.h' <<'END_OF_FILE'
  1665. X# include    <stdio.h>
  1666. X# include    <time.h>
  1667. X# include    <math.h>
  1668. X
  1669. X#define EPOCH   1985
  1670. X#define EPSILONg 279.611371     /* solar ecliptic long at EPOCH */
  1671. X#define RHOg     282.680403     /* solar ecliptic long of perigee at EPOCH */
  1672. X#define e          0.01671542   /* solar orbit eccentricity */
  1673. X#define lzero     18.251907     /* lunar mean long at EPOCH */
  1674. X#define Pzero    192.917585     /* lunar mean long of perigee at EPOCH */
  1675. X#define Nzero     55.204723     /* lunar mean long of node at EPOCH */
  1676. X
  1677. X# define    PI         3.141592654
  1678. END_OF_FILE
  1679.   if test 529 -ne `wc -c <'today/moontx.h'`; then
  1680.     echo shar: \"'today/moontx.h'\" unpacked with wrong size!
  1681.   fi
  1682.   # end of 'today/moontx.h'
  1683. fi
  1684. if test -f 'today/potm.c' -a "${1}" != "-c" ; then 
  1685.   echo shar: Will not clobber existing file \"'today/potm.c'\"
  1686. else
  1687.   echo shar: Extracting \"'today/potm.c'\" \(273 characters\)
  1688.   sed "s/^X//" >'today/potm.c' <<'END_OF_FILE'
  1689. X/*
  1690. X**    <potm.c> --    Print out the phase of the moon ...
  1691. X**
  1692. X**    programmer:    John Dilley    (mordred:jad)
  1693. X**
  1694. X**    creation date:    Sat Feb  9 14:27
  1695. X**
  1696. X**
  1697. X**    modification history
  1698. X**
  1699. X*/
  1700. X
  1701. Xstatic    char    potm[64];
  1702. X
  1703. Xmain()
  1704. X{
  1705. X    moontxt(potm);
  1706. X    printf("Phase-of-the-Moon:%s\n", potm+11);
  1707. X}
  1708. END_OF_FILE
  1709.   if test 273 -ne `wc -c <'today/potm.c'`; then
  1710.     echo shar: \"'today/potm.c'\" unpacked with wrong size!
  1711.   fi
  1712.   # end of 'today/potm.c'
  1713. fi
  1714. if test -f 'unixmsg.bbs' -a "${1}" != "-c" ; then 
  1715.   echo shar: Will not clobber existing file \"'unixmsg.bbs'\"
  1716. else
  1717.   echo shar: Extracting \"'unixmsg.bbs'\" \(1296 characters\)
  1718.   sed "s/^X//" >'unixmsg.bbs' <<'END_OF_FILE'
  1719. X
  1720. XSince your privilege level is high enough, you will be entering in to Xenix.
  1721. XThere are a few things that I must relay to you:
  1722. X   
  1723. X         1) The system will be switching from 8N1 to 7E1.
  1724. X         2) To return to the BBS, you must type a control-d ( ^d ).
  1725. X         3) Once you are in Xenix and you wish to switch to Unix, which is
  1726. X            running on another IBM-AT, you can type /etc/callit and the local
  1727. X            network will connect you. Please remember that you will have to
  1728. X            type a control-d to exit Unix and, at the login prompt on
  1729. X            the Unix system, type an enter or return followed by a ~.
  1730. X            ( tilde period ) to return to Xenix. The next control-d will then
  1731. X            return you to the BBS.
  1732. X         4) Once you return back to the BBS, the system will switch back to
  1733. X            8N1.
  1734. X         5) If you do switch to the Unix system, login in as guest with a
  1735. X            password of guest. The Unix system is NOT accessable via the
  1736. X            modem and can only be connected through the local network.
  1737. X
  1738. XPlease note that if you attempted to switch to Unix and you DID NOT get a
  1739. Xlogin prompt, that means that the Unix system is OFFLINE. If this is the case,
  1740. Xtype a ~. ( tilde period ) followed by an enter or return to return back to
  1741. XXenix.
  1742. X
  1743. XSandy
  1744. X
  1745. X
  1746. END_OF_FILE
  1747.   if test 1296 -ne `wc -c <'unixmsg.bbs'`; then
  1748.     echo shar: \"'unixmsg.bbs'\" unpacked with wrong size!
  1749.   fi
  1750.   # end of 'unixmsg.bbs'
  1751. fi
  1752. echo shar: End of archive 10 \(of 11\).
  1753. cp /dev/null ark10isdone
  1754. MISSING=""
  1755. for I in 1 2 3 4 5 6 7 8 9 10 11 ; do
  1756.     if test ! -f ark${I}isdone ; then
  1757.     MISSING="${MISSING} ${I}"
  1758.     fi
  1759. done
  1760. if test "${MISSING}" = "" ; then
  1761.     echo You have unpacked all 11 archives.
  1762.     rm -f ark[1-9]isdone ark[1-9][0-9]isdone
  1763. else
  1764.     echo You still must unpack the following archives:
  1765.     echo "        " ${MISSING}
  1766. fi
  1767. exit 0
  1768. exit 0 # Just in case...
  1769.