home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #27 / NN_1992_27.iso / spool / comp / sources / misc / 4130 < prev    next >
Encoding:
Text File  |  1992-11-23  |  9.1 KB  |  272 lines
  1. Newsgroups: comp.sources.misc
  2. Path: sparky!kent
  3. From: richid@owlnet.rice.edu (Richard Parvin Jernigan)
  4. Subject:  v33i126:  mbase - MetalBase 5.0, Portable database engine, Part08/08
  5. Message-ID: <1992Nov23.233106.9779@sparky.imd.sterling.com>
  6. Followup-To: comp.sources.d
  7. X-Md4-Signature: 573d2d7ad9a676da48548e96cf1e5ceb
  8. Sender: kent@sparky.imd.sterling.com (Kent Landfield)
  9. Organization: Sterling Software
  10. References: <csm-v33i119=mbase.165613@sparky.IMD.Sterling.COM>
  11. Date: Mon, 23 Nov 1992 23:31:06 GMT
  12. Approved: kent@sparky.imd.sterling.com
  13. Lines: 257
  14.  
  15. Submitted-by: richid@owlnet.rice.edu (Richard Parvin Jernigan)
  16. Posting-number: Volume 33, Issue 126
  17. Archive-name: mbase/part08
  18. Environment: AMIGA, MS-DOS, HP-UX, XENIX, UNIX, ULTRIX, SGI, SU, Curses
  19. Supersedes: mbase: Volume 28, Issue 40-44
  20.  
  21. #! /bin/sh
  22. # This is a shell archive.  Remove anything before this line, then feed it
  23. # into a shell via "sh file" or similar.  To overwrite existing files,
  24. # type "sh file -c".
  25. # Contents:  dox/author.dox dox/curses.dox sample/makefile.dos
  26. #   src/mailscr
  27. # Wrapped by kent@sparky on Mon Nov 23 16:33:15 1992
  28. PATH=/bin:/usr/bin:/usr/ucb:/usr/local/bin:/usr/lbin ; export PATH
  29. echo If this archive is complete, you will see the following message:
  30. echo '          "shar: End of archive 8 (of 8)."'
  31. if test -f 'dox/author.dox' -a "${1}" != "-c" ; then 
  32.   echo shar: Will not clobber existing file \"'dox/author.dox'\"
  33. else
  34.   echo shar: Extracting \"'dox/author.dox'\" \(1557 characters\)
  35.   sed "s/^X//" >'dox/author.dox' <<'END_OF_FILE'
  36. XAuthor                                                            MetalBase 5.0
  37. X-------------------------------------------------------------------------------
  38. X
  39. XI'm not around on the Internet as much as I'd like--my address keeps shifting
  40. Xaround.  I know one guy had a problem with this (granted, he flew off all
  41. Xkindsa shit my way about it, but...), so I decided to throw in a file about
  42. Xhow to get ahold of me.
  43. X
  44. XMy name is Richard Jernigan... and I _do_ do support for MetalBase.  Once you
  45. Xreach me anyway... the aforementioned guy seemed to think I should've read his
  46. Xmind and written him.  Reach me, and I'll fix it.  With 4.0+, there've been
  47. Xvery few requests for service... and all those that were have turned out to
  48. Xjust be implementation problems (ie, _my_ code worked.  Nya nya nya).  If
  49. Xyou're just dying to get a hold of me, and everything else fails, write me:
  50. X
  51. X            Richid Jernigan
  52. X            PO Box 827
  53. X            Norris TN 37828
  54. X
  55. XOkay, so you don't wanna do that.  Well, you've got a lot of options with
  56. Xregard to getting me on the Internet... if you're looking for me over the
  57. X
  58. Xsummer of '92, I'll be at.....................t-richj@microsoft.com
  59. XNice, eh?  Otherwise, try the default.........virtual!richid@owlnet.rice.edu
  60. XAnd, if that's gone, odds are this is too.....richid@owlnet.rice.edu
  61. XHummm... then you're in trouble.  How about...uunet!mwcbbs!virtual!richid
  62. X
  63. XOne of those should work.  Look for me on rec.games.programmer or sci.
  64. Xvirtual-worlds... when I've got an active net account, I usually post there.
  65. X
  66. XGood luck.  :)
  67. X
  68. END_OF_FILE
  69.   if test 1557 -ne `wc -c <'dox/author.dox'`; then
  70.     echo shar: \"'dox/author.dox'\" unpacked with wrong size!
  71.   fi
  72.   # end of 'dox/author.dox'
  73. fi
  74. if test -f 'dox/curses.dox' -a "${1}" != "-c" ; then 
  75.   echo shar: Will not clobber existing file \"'dox/curses.dox'\"
  76. else
  77.   echo shar: Extracting \"'dox/curses.dox'\" \(1650 characters\)
  78.   sed "s/^X//" >'dox/curses.dox' <<'END_OF_FILE'
  79. XCurses                                                            MetalBase 5.0
  80. X-------------------------------------------------------------------------------
  81. X
  82. X                                   Curses
  83. X
  84. XVR and SAMPLE require a curses package to run; MS-DOS users can get a public
  85. Xdomain curses package for VR and SAMPLE via anonymous ftp from
  86. X
  87. X   archive.umich.edu     as   /msdos/screen/pccurses.arc
  88. X   wuarchive.wustl.edu   as   /systems/msdos/umich.edu/screen/pccurses.arc
  89. X
  90. Xif you cannot reach either domain, contact me and I'll forward my copy to you.
  91. XThese people have no idea I'm using their address, so do be kind to the sites
  92. Xand don't call until it's late local time.  The package is rather nice; a bit
  93. Xof a bitch to set up initially, but it's a good implementation of curses. Only
  94. Xthing I've had a problem with is its standout()/standend() commands; they
  95. Xdon't work right for me.  Better luck to you.
  96. X
  97. X [  If you get the package from wolfen, you may need to change <alloc.h>     ]
  98. X [  to <malloc.h> in curses.h... for some god-forsaken reason, they use      ]
  99. X [  the old name for the thing.  The package comes with sources as well as   ]
  100. X [  Xcurses.lib, for every model, but DON'T USE THE PRE-BUILD LIBRARIES!     ]
  101. X [  Recompile 'em first or you'll get a problem with "@F_LDIV is undefined". ]
  102. X [  Nasty.  I don't know -what- compiler they were made with... if you can   ]
  103. X [  find out, lemme know.                                                    ]
  104. X
  105. XIf you're using MS-DOS to access a Unix-style server, ANSI.SYS may not cut
  106. Xit for you.  Try replacing it with VT52.SYS and using term type vt52 on your
  107. Xunix platform; that may help.
  108. X
  109. END_OF_FILE
  110.   if test 1650 -ne `wc -c <'dox/curses.dox'`; then
  111.     echo shar: \"'dox/curses.dox'\" unpacked with wrong size!
  112.   fi
  113.   # end of 'dox/curses.dox'
  114. fi
  115. if test -f 'sample/makefile.dos' -a "${1}" != "-c" ; then 
  116.   echo shar: Will not clobber existing file \"'sample/makefile.dos'\"
  117. else
  118.   echo shar: Extracting \"'sample/makefile.dos'\" \(892 characters\)
  119.   sed "s/^X//" >'sample/makefile.dos' <<'END_OF_FILE'
  120. X#
  121. X#  METALBASE 5.0
  122. X#
  123. X#  Released October 1st, 1992 by Huan-Ti [ richid@owlnet.rice.edu ]
  124. X#                                        [ t-richj@microsoft.com ]
  125. X#
  126. X#  Makefile for demonstration program  -- Microsoft C6 expected
  127. X#
  128. X#
  129. X#  If mbase.h and stdinc.h aren't in \include, put them there or add
  130. X#  -Idirectory to CFLAGS=.
  131. X
  132. XCFLAGS = -nologo -c -W3 -AL -DNEED_USHORT -DNEED_ULONG
  133. X
  134. XCC     = CL $(CFLAGS)
  135. X
  136. X###############################################################################
  137. X
  138. Xall : sample.exe bench.exe
  139. X
  140. X
  141. Xbench.exe : bench.obj
  142. X    link/nologo bench.obj, bench.exe,, mbase.lib lcurses;
  143. X
  144. Xbench.obj : bench.c bench.h
  145. X    $(CC) $*.c
  146. X
  147. Xbench.h : bench.s
  148. X    .\build -qh bench.s
  149. X
  150. X
  151. Xsample.exe : sample.obj
  152. X    link/nologo sample.obj, sample.exe,, mbase.lib lcurses;
  153. X
  154. Xsample.obj : sample.c sample.h sample_f.h
  155. X    $(CC) $*.c
  156. X
  157. Xsample.h : sample.s
  158. X    .\build -qh sample.s
  159. X
  160. Xsample_f.h : sample.frm
  161. X    .\form sample
  162. X
  163. END_OF_FILE
  164.   if test 892 -ne `wc -c <'sample/makefile.dos'`; then
  165.     echo shar: \"'sample/makefile.dos'\" unpacked with wrong size!
  166.   fi
  167.   # end of 'sample/makefile.dos'
  168. fi
  169. if test -f 'src/mailscr' -a "${1}" != "-c" ; then 
  170.   echo shar: Will not clobber existing file \"'src/mailscr'\"
  171. else
  172.   echo shar: Extracting \"'src/mailscr'\" \(1719 characters\)
  173.   sed "s/^X//" >'src/mailscr' <<'END_OF_FILE'
  174. X#!/bin/sh
  175. X#
  176. X
  177. Xif [ -r /coherent ]
  178. Xthen
  179. X   if [ ":`cat /etc/domain 2> /dev/null`" = ":virtual" ]
  180. X   then
  181. X      richid="richid"
  182. X   else
  183. X      richid="mwcbbs!virtual!richid"
  184. X   fi
  185. Xelse
  186. X   richid="richid@owlnet.rice.edu"
  187. Xfi
  188. X
  189. Xecho
  190. Xecho "MetalBase 5.0 is now installed.  Move to the directory ../sample and"
  191. Xecho "continue with the ../ReadMe file for a test run."
  192. Xecho
  193. Xecho "In order to see how much time I should spend developing this code, it"
  194. Xecho "would be helpful for me to know how many people got it.  There's also"
  195. Xecho "been talk of a mailing list, though I'm not sure I'm gonna start one."
  196. Xecho "May I send a message to $richid, telling him you've installed"
  197. Xecho -n "this code? [Yn] "
  198. Xans=x
  199. Xwhile [ ":$ans" != ":yes" -a ":$ans" != ":no" ]
  200. Xdo
  201. X   read ans
  202. X   if [ ":$ans" = ":Y" -o ":$ans" = ":y" -o ":$ans" = ":" ]; then
  203. X      ans="yes"
  204. X   fi
  205. X   if [ ":$ans" = ":N" -o ":$ans" = ":n" ]; then
  206. X      ans="no"
  207. X   fi
  208. Xdone
  209. X
  210. Xif [ ":$ans" = ":no" ]
  211. Xthen
  212. X   echo "Thanks anyway.  Enjoy the package."
  213. Xelse
  214. X   echo
  215. X   echo "Thank you.  Just a moment..."
  216. X
  217. X   if [ -r /usr/ucb/mail ]
  218. X   then
  219. X      /usr/ucb/mail -s "MetalBase 5.0 Installed" $richid << END
  220. XMetalBase Version 5.0
  221. X---------------------
  222. XPackage installed on `date 2> /dev/null`:
  223. X
  224. X   User         - $USER / $LOGNAME / `logname 2> /dev/null`
  225. X   Architecture - `arch 2> /dev/null`
  226. X   Uname/UUname - `uname -a 2> /dev/null`
  227. X
  228. XEND
  229. X   else
  230. X      opt=""
  231. X
  232. X      mail $richid << END
  233. XMetalBase Version 5.0
  234. X---------------------
  235. XPackage installed on `date 2> /dev/null`:
  236. X
  237. X   User         - $USER / $LOGNAME / `logname 2> /dev/null`
  238. X   Architecture - `arch 2> /dev/null`
  239. X   Uname/UUname - `uname -a 2> /dev/null`
  240. X
  241. XEND
  242. X   fi
  243. X
  244. X   echo
  245. X   echo "Mail sent.  Enjoy the package."
  246. Xfi
  247. X
  248. END_OF_FILE
  249.   if test 1719 -ne `wc -c <'src/mailscr'`; then
  250.     echo shar: \"'src/mailscr'\" unpacked with wrong size!
  251.   fi
  252.   chmod +x 'src/mailscr'
  253.   # end of 'src/mailscr'
  254. fi
  255. echo shar: End of archive 8 \(of 8\).
  256. cp /dev/null ark8isdone
  257. MISSING=""
  258. for I in 1 2 3 4 5 6 7 8 ; do
  259.     if test ! -f ark${I}isdone ; then
  260.     MISSING="${MISSING} ${I}"
  261.     fi
  262. done
  263. if test "${MISSING}" = "" ; then
  264.     echo You have unpacked all 8 archives.
  265.     rm -f ark[1-9]isdone
  266. else
  267.     echo You still must unpack the following archives:
  268.     echo "        " ${MISSING}
  269. fi
  270. exit 0
  271. exit 0 # Just in case...
  272.