home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 October / usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso / misc / volume43 / c2man-2.0 / patch29 < prev    next >
Encoding:
Internet Message Format  |  1994-06-10  |  45.6 KB
  1. From: greyham@research.canon.oz.au (Graham Stoney)
  2. Newsgroups: comp.sources.misc
  3. Subject: v43i022:  c2man-2.0 - automatic C documentation generator, Patch29
  4. Date: 9 Jun 1994 11:50:04 -0500
  5. Organization: Canon Information Systems Research Australia
  6. Sender: kent@sparky.sterling.com
  7. Approved: kent@sparky.sterling.com
  8. Message-ID: <2t7h7s$38m@sparky.sterling.com>
  9. Summary: This is an official patch for c2man 2.0.  Please apply it.
  10. X-Md4-Signature: dcb23b4cd6e914c07ce6d15275dcb370
  11.  
  12. Submitted-by: greyham@research.canon.oz.au (Graham Stoney)
  13. Posting-number: Volume 43, Issue 22
  14. Archive-name: c2man-2.0/patch29
  15. Environment: UNIX, DOS, OS/2, lex, yacc
  16. Patch-To: c2man-2.0: Volume 42, Issue 55-63
  17.  
  18. System: c2man version 2.0
  19. Patch #: 29
  20. Priority: LOW
  21. Subject: patch #28, continued
  22. Date: Fri May 20 11:37:32 EST 1994
  23. From: Graham Stoney <greyham@research.canon.oz.au>
  24.  
  25. Description:
  26.     See patch #28.
  27.  
  28.  
  29. Fix:    From rn, say "| patch -p -N -d DIR", where DIR is your c2man source
  30.     directory.  Outside of rn, say "cd DIR; patch -p -N <thisarticle".
  31.     If you don't have the patch program, apply the following by hand,
  32.     or get patch (version 2.0, latest patchlevel).
  33.  
  34.     After patching:
  35.         *** DO NOTHING--INSTALL ALL PATCHES UP THROUGH #30 FIRST ***
  36.                 *** NOTE: YOU MUST RUN Configure AFTER APPLYING PATCH 30 ***
  37.  
  38.     If patch indicates that patchlevel is the wrong version, you may need
  39.     to apply one or more previous patches, or the patch may already
  40.     have been applied.  See the patchlevel.h file to find out what has or
  41.     has not been applied.  In any event, don't continue with the patch.
  42.  
  43.     If you are missing previous patches they can be obtained from me:
  44.  
  45.         Graham Stoney <greyham@research.canon.oz.au>
  46.  
  47.     If you send a mail message of the following form it will greatly speed
  48.     processing:
  49.  
  50.         Subject: Command
  51.         @SH mailpatch PATH c2man 2.0 LIST
  52.                ^ note the c
  53.  
  54.     where PATH is a return path FROM ME TO YOU either in Internet notation,
  55.     or in bang notation from some well-known host, and LIST is the number
  56.     of one or more patches you need, separated by spaces, commas, and/or
  57.     hyphens.  Saying 35- says everything from 35 to the end.
  58.  
  59.     To get some more detailed instructions, send me the following mail:
  60.  
  61.         Subject: Command
  62.         @SH mailhelp PATH
  63.  
  64.  
  65. Index: patchlevel.h
  66. Prereq: 28
  67. 2c2
  68. < #define PATCHLEVEL 28
  69. ---
  70. > #define PATCHLEVEL 29
  71.  
  72. Index: vms/config.h
  73. *** vms/config.h.old    1994/05/19 01:10:43
  74. --- vms/config.h    1994/05/19 01:10:45
  75. ***************
  76. *** 0 ****
  77. --- 1,331 ----
  78. + /*
  79. +  * This file was produced by running the config_h.SH script, which
  80. +  * gets its values from config.sh, which is generally produced by
  81. +  * running Configure.
  82. +  *
  83. +  * Feel free to modify any of this as the need arises.  Note, however,
  84. +  * that running config.h.SH again will wipe out any changes you've made.
  85. +  * For a more permanent change edit config.sh and rerun config.h.SH.
  86. +  *
  87. +  * $Id: config.h,v 2.0.1.1 1994/05/19 01:10:45 greyham Exp $
  88. +  */
  89. + 
  90. + /* Configuration time: Tue Apr 26 09:56:37 PDT 1994
  91. +  * Configured by: flower
  92. +  * Target system: sunos flower 4.1.3 3 sun4 
  93. +  */
  94. + 
  95. + #ifndef _config_h_
  96. + #define _config_h_
  97. + 
  98. + #ifdef VMS
  99. + /*
  100. +  * Access call.  Also maintained in unistd.h
  101. +  */
  102. + #define F_OK            0       /* does file exist */
  103. + #define X_OK            1       /* is it executable by caller */
  104. + #define W_OK            2       /* writable by caller */
  105. + #define R_OK            4       /* readable by caller */
  106. + 
  107. + /* VMS does not have unlink() */
  108. + #define unlink(s)    delete(s)
  109. + #endif
  110. + 
  111. + /* BSD:
  112. +  *    This symbol, if defined, indicates that the program is running under
  113. +  *    a BSD system.
  114. +  */
  115. + /*#define BSD        */
  116. + 
  117. + /* CPP_FILE_COM:
  118. +  *    This symbol contains the first part of the string which will invoke
  119. +  *    the C preprocessor a file and produce to standard output, preserving
  120. +  *    comments. Typical value of "cc -E -C" or "/lib/cpp -C".
  121. +  */
  122. + /* CPP_STDIN_FLAGS:
  123. +  *    This variable contains any flags necessary to get CPP_FILE_COM to
  124. +  *    read from the standard input.
  125. +  */
  126. + /* CPP_IGN_HDRS:
  127. +  *    This symbol is defined if CPP_FILE_COM ignores *.h files.
  128. +  */
  129. + /* CPP_CAN_STDIN:
  130. +  *    This symbol is defined if CPP_FILE_COM can read standard input
  131. +  *    directly.
  132. +  */
  133. + #define CPP_FILE_COM "cpp -\"C\""
  134. + #define CPP_STDIN_FLAGS "\"-\""
  135. + /*#define CPP_IGN_HDRS    */    /* does CPP ignore .h files? */
  136. + #define CPP_CAN_STDIN             /* can CPP read stdin directly? */
  137. + 
  138. + /* HAS_ACCESS:
  139. +  *    This manifest constant lets the C program know that the access()
  140. +  *    system call is available to check for accessibility using real UID/GID.
  141. +  *    (always present on UNIX.)
  142. +  */
  143. + #define HAS_ACCESS        /**/
  144. + 
  145. + /* HASCONST:
  146. +  *    This symbol, if defined, indicates that this C compiler knows about
  147. +  *    the const type. There is no need to actually test for that symbol
  148. +  *    within your programs. The mere use of the "const" keyword will
  149. +  *    trigger the necessary tests.
  150. +  */
  151. + #define HASCONST    /**/
  152. + #ifndef HASCONST
  153. + #define const
  154. + #endif
  155. + 
  156. + /* FLEXFILENAMES:
  157. +  *    This symbol, if defined, indicates that the system supports filenames
  158. +  *    longer than 14 characters.
  159. +  */
  160. + #define    FLEXFILENAMES        /**/
  161. + 
  162. + /* HAS_LINK:
  163. +  *    This symbol, if defined, indicates that the link routine is
  164. +  *    available to create hard links.
  165. +  */
  166. + /*#define HAS_LINK    */
  167. + 
  168. + /* HAS_OPEN3:
  169. +  *    This manifest constant lets the C program know that the three
  170. +  *    argument form of open(2) is available.
  171. +  */
  172. + #define HAS_OPEN3        /**/
  173. + 
  174. + /* HAS_STRCHR:
  175. +  *    This symbol is defined to indicate that the strchr()/strrchr()
  176. +  *    functions are available for string searching. If not, try the
  177. +  *    index()/rindex() pair.
  178. +  */
  179. + /* HAS_INDEX:
  180. +  *    This symbol is defined to indicate that the index()/rindex()
  181. +  *    functions are available for string searching.
  182. +  */
  183. + #define HAS_STRCHR    /**/
  184. + /*#define HAS_INDEX    /**/
  185. + 
  186. + /* HAS_STRFTIME:
  187. +  *    This symbol, if defined, indicates that the strftime routine is
  188. +  *    available to format locale-specific times.
  189. +  */
  190. + /*#define HAS_STRFTIME    */
  191. + 
  192. + /* HAS_STRSTR:
  193. +  *    This symbol, if defined, indicates that the strstr routine is
  194. +  *    available to find substrings.
  195. +  */
  196. + #define HAS_STRSTR    /**/
  197. + 
  198. + /* HAS_SYMLINK:
  199. +  *    This symbol, if defined, indicates that the symlink routine is available
  200. +  *    to create symbolic links.
  201. +  */
  202. + /*#define HAS_SYMLINK    */
  203. + 
  204. + /* Time_t:
  205. +  *    This symbol holds the type returned by time(). It can be long,
  206. +  *    or time_t on BSD sites (in which case <sys/types.h> should be
  207. +  *    included).
  208. +  */
  209. + #define Time_t long        /* Time type */
  210. + 
  211. + /* Signal_t:
  212. +  *    This symbol's value is either "void" or "int", corresponding to the
  213. +  *    appropriate return type of a signal handler.  Thus, you can declare
  214. +  *    a signal handler using "Signal_t (*handler)()", and define the
  215. +  *    handler using "Signal_t handler(sig)".
  216. +  */
  217. + #define Signal_t void    /* Signal handler's return type */
  218. + 
  219. + /* HASVOLATILE:
  220. +  *    This symbol, if defined, indicates that this C compiler knows about
  221. +  *    the volatile declaration.
  222. +  */
  223. + /*#define    HASVOLATILE    */
  224. + #ifndef HASVOLATILE
  225. + #define volatile
  226. + #endif
  227. + 
  228. + /* I_FCNTL:
  229. +  *    This manifest constant tells the C program to include <fcntl.h>.
  230. +  */
  231. + /*#define I_FCNTL    /**/
  232. + 
  233. + /* I_STDARG:
  234. +  *    This symbol, if defined, indicates that <stdarg.h> exists and should
  235. +  *    be included.
  236. +  */
  237. + #define I_STDARG        /**/
  238. + 
  239. + /* I_STDDEF:
  240. +  *    This symbol, if defined, indicates that <stddef.h> exists and should
  241. +  *    be included.
  242. +  */
  243. + #define I_STDDEF    /**/
  244. + 
  245. + /* I_STDLIB:
  246. +  *    This symbol, if defined, indicates that <stdlib.h> exists and should
  247. +  *    be included.
  248. +  */
  249. + #define I_STDLIB        /**/
  250. + 
  251. + /* I_STRING:
  252. +  *    This symbol, if defined, indicates to the C program that it should
  253. +  *    include <string.h> (USG systems) instead of <strings.h> (BSD systems).
  254. +  */
  255. + #define I_STRING        /**/
  256. + 
  257. + /* I_SYS_FILE:
  258. +  *    This symbol, if defined, indicates to the C program that it should
  259. +  *    include <sys/file.h> to get definition of R_OK and friends.
  260. +  */
  261. + #define I_SYS_FILE        /**/
  262. + 
  263. + /* I_SYS_TYPES:
  264. +  *    This symbol, if defined, indicates to the C program that it should
  265. +  *    include <sys/types.h>.
  266. +  */
  267. + /*#define    I_SYS_TYPES        */
  268. + 
  269. + /* I_TIME:
  270. +  *    This symbol, if defined, indicates to the C program that it should
  271. +  *    include <time.h>.
  272. +  */
  273. + /* I_SYS_TIME:
  274. +  *    This symbol, if defined, indicates to the C program that it should
  275. +  *    include <sys/time.h>.
  276. +  */
  277. + #define I_TIME        /**/
  278. + /*#define I_SYS_TIME        */
  279. + 
  280. + /* I_UNISTD:
  281. +  *    This symbol, if defined, indicates to the C program that it should
  282. +  *    include <unistd.h>.
  283. +  */
  284. + /*#define I_UNISTD        */
  285. + 
  286. + /* I_VARARGS:
  287. +  *    This symbol, if defined, indicates to the C program that it should
  288. +  *    include <varargs.h>.
  289. +  */
  290. + /*#define I_VARARGS        */
  291. + 
  292. + /* CAN_PROTOTYPE:
  293. +  *    If defined, this macro indicates that the C compiler can handle
  294. +  *    function prototypes.
  295. +  */
  296. + /* DOTS:
  297. +  *    This macro is used to specify the ... in function prototypes which
  298. +  *    have arbitrary additional arguments.
  299. +  */
  300. + /* NXT_ARG:
  301. +  *    This macro is used to separate arguments in the declared argument list.
  302. +  */
  303. + /* P_FUNC:
  304. +  *    This macro is used to declare "private" (static) functions.
  305. +  *    It takes three arguments: the function type and name, a parenthesized
  306. +  *    traditional (comma separated) argument list, and the declared argument
  307. +  *    list (in which arguments are separated with NXT_ARG, and additional
  308. +  *    arbitrary arguments are specified with DOTS).  For example:
  309. +  *
  310. +  *        P_FUNC(int foo, (bar, baz), int bar NXT_ARG char *baz[])
  311. +  */
  312. + /* P_FUNC_VOID:
  313. +  *    This macro is used to declare "private" (static) functions that have
  314. +  *    no arguments.  The macro takes one argument: the function type and name.
  315. +  *    For example:
  316. +  *
  317. +  *        P_FUNC_VOID(int subr)
  318. +  */
  319. + /* V_FUNC:
  320. +  *    This macro is used to declare "public" (non-static) functions.
  321. +  *    It takes three arguments: the function type and name, a parenthesized
  322. +  *    traditional (comma separated) argument list, and the declared argument
  323. +  *    list (in which arguments are separated with NXT_ARG, and additional
  324. +  *    arbitrary arguments are specified with DOTS).  For example:
  325. +  *
  326. +  *        V_FUNC(int main, (argc, argv), int argc NXT_ARG char *argv[])
  327. +  */
  328. + /* V_FUNC_VOID:
  329. +  *    This macro is used to declare "public" (non-static) functions that have
  330. +  *    no arguments.  The macro takes one argument: the function type and name.
  331. +  *    For example:
  332. +  *
  333. +  *        V_FUNC_VOID(int fork)
  334. +  */
  335. + /* _:
  336. +  *    This macro is used to declare function parameters for folks who want
  337. +  *    to make declarations with prototypes using a different style than
  338. +  *    the above macros.  Use double parentheses.  For example:
  339. +  *
  340. +  *        int main _((int argc, char *argv[]));
  341. +  */
  342. + #define    CAN_PROTOTYPE    /**/
  343. + #ifdef CAN_PROTOTYPE
  344. + #define    NXT_ARG ,
  345. + #define    DOTS , ...
  346. + #define    V_FUNC(name, arglist, args)name(args)
  347. + #define    P_FUNC(name, arglist, args)static name(args)
  348. + #define    V_FUNC_VOID(name)name(void)
  349. + #define    P_FUNC_VOID(name)static name(void)
  350. + #define    _(args) args
  351. + #else
  352. + #define    NXT_ARG ;
  353. + #define    DOTS
  354. + #define    V_FUNC(name, arglist, args)name arglist args;
  355. + #define    P_FUNC(name, arglist, args)static name arglist args;
  356. + #define    V_FUNC_VOID(name)name()
  357. + #define    P_FUNC_VOID(name)static name()
  358. + #define    _(args) ()
  359. + #endif
  360. + 
  361. + /* CAN_VAPROTO:
  362. +  *    This variable is defined on systems supporting prototype declaration
  363. +  *    of functions with a variable number of arguments.
  364. +  */
  365. + /* _V:
  366. +  *    This macro is used to declare function parameters in prototypes for
  367. +  *    functions with a variable number of parameters. Use double parentheses.
  368. +  *    For example:
  369. +  *
  370. +  *        int printf _V((char *fmt, ...));
  371. +  *
  372. +  *    Remember to use the plain simple _() macro when declaring a function
  373. +  *    with no variable number of arguments, since it might be possible to
  374. +  *    have a non-effect _V() macro and still get prototypes via _().
  375. +  */
  376. + #define CAN_VAPROTO    /**/
  377. + #ifdef CAN_VAPROTO
  378. + #define    _V(args) args
  379. + #else
  380. + #define    _V(args) ()
  381. + #endif
  382. + 
  383. + /* VOIDFLAGS:
  384. +  *    This symbol indicates how much support of the void type is given by this
  385. +  *    compiler.  What various bits mean:
  386. +  *
  387. +  *        1 = supports declaration of void
  388. +  *        2 = supports arrays of pointers to functions returning void
  389. +  *        4 = supports comparisons between pointers to void functions and
  390. +  *            addresses of void functions
  391. +  *        8 = suports declaration of generic void pointers
  392. +  *
  393. +  *    The package designer should define VOIDUSED to indicate the requirements
  394. +  *    of the package.  This can be done either by #defining VOIDUSED before
  395. +  *    including config.h, or by defining defvoidused in Myinit.U.  If the
  396. +  *    latter approach is taken, only those flags will be tested.  If the
  397. +  *    level of void support necessary is not present, defines void to int.
  398. +  */
  399. + #ifndef VOIDUSED
  400. + #define VOIDUSED 9
  401. + #endif
  402. + #define VOIDFLAGS 9
  403. + #if (VOIDFLAGS & VOIDUSED) != VOIDUSED
  404. + #define void int        /* is void to be avoided? */
  405. + #define M_VOID            /* Xenix strikes again */
  406. + #endif
  407. + 
  408. + #endif
  409.  
  410. Index: pc/Makefile.pc
  411. *** pc/Makefile.pc.old    1993/12/07 04:46:03
  412. --- pc/Makefile.pc    1994/05/16 01:59:43
  413. ***************
  414. *** 1,5 ****
  415. ! # NOTE: This file is generated automatically by processing the Makefile in the
  416. ! # main directory with a perl script.
  417.   # Makefile for c2man                                           23 Aug 1993
  418.   #
  419.   # - for GNU gcc (emx 0.8g kit) under OS/2 2.x or DOS (32-bit)
  420. --- 1,7 ----
  421. ! # NOTE: This file is generated automatically by the `updmake' perl script,
  422. ! # which processes the Makefile in the main directory and re-pastes this header
  423. ! # on the top.
  424. ! #
  425.   # Makefile for c2man                                           23 Aug 1993
  426.   #
  427.   # - for GNU gcc (emx 0.8g kit) under OS/2 2.x or DOS (32-bit)
  428. ***************
  429. *** 50,74 ****
  430.   # As Larry said, "Grrrr"
  431.   SHELL=/bin/sh
  432.   
  433.   OSOURCES =    config.h c2man.h semantic.h symbol.h strconcat.h \
  434.           strappend.h manpage.h enum.h output.h lex.l grammar.y
  435.   DCSOURCES =    c2man.c semantic.c string.c symbol.c strconcat.c \
  436. !         strappend.c manpage.c enum.c nroff.c texinfo.c
  437.   SOURCES =    $(OSOURCES) $(DCSOURCES)
  438.   CSOURCES =    $(DCSOURCES) y.tab.c
  439.   OBJECTS =    c2man$O semantic$O string$O symbol$O y.tab$O strconcat$O \
  440. !         strappend$O manpage$O enum$O nroff$O texinfo$O
  441.   GENERATED =    c2man example.inc ctype_ex.inc y.tab.c lex.yy.c y.output \
  442. !         fixexample.sed flatten.sed
  443.   
  444.   all: c2man.exe example.inc ctype_ex.inc flatten.sed
  445.   
  446.   install:
  447. !     cp c2man.exe $(bin)
  448.       $(SED) -f flatten.sed < c2man.1 > $(mansrc)/c2man.$(manext)
  449.       -mkdir $(privlib)
  450.       -mkdir $(privlib)/eg
  451. !     cp eg/*.[chly] $(privlib)/eg
  452.   
  453.   uninstall:
  454.       $(RM) -f $(bin)/c2man $(mansrc)/c2man.$(manext)
  455. --- 52,80 ----
  456.   # As Larry said, "Grrrr"
  457.   SHELL=/bin/sh
  458.   
  459. + # To change anything below here, you should really fix updmake to do it.
  460. + # DO NOT EDIT ANYTHING BELOW HERE, OR IT WILL BE LOST NEXT TIME updmake IS RUN.
  461. + 
  462.   OSOURCES =    config.h c2man.h semantic.h symbol.h strconcat.h \
  463.           strappend.h manpage.h enum.h output.h lex.l grammar.y
  464.   DCSOURCES =    c2man.c semantic.c string.c symbol.c strconcat.c \
  465. !         strappend.c manpage.c enum.c nroff.c texinfo.c latex.c
  466.   SOURCES =    $(OSOURCES) $(DCSOURCES)
  467.   CSOURCES =    $(DCSOURCES) y.tab.c
  468.   OBJECTS =    c2man$O semantic$O string$O symbol$O y.tab$O strconcat$O \
  469. !         strappend$O manpage$O enum$O nroff$O texinfo$O latex$O
  470.   GENERATED =    c2man example.inc ctype_ex.inc y.tab.c lex.yy.c y.output \
  471. !         fixexamp.sed flatten.sed
  472. ! 
  473.   
  474.   all: c2man.exe example.inc ctype_ex.inc flatten.sed
  475.   
  476.   install:
  477. !     $(CP) c2man $(bin)
  478.       $(SED) -f flatten.sed < c2man.1 > $(mansrc)/c2man.$(manext)
  479.       -mkdir $(privlib)
  480.       -mkdir $(privlib)/eg
  481. !     $(CP) eg/*.[chly] $(privlib)/eg
  482.   
  483.   uninstall:
  484.       $(RM) -f $(bin)/c2man $(mansrc)/c2man.$(manext)
  485. ***************
  486. *** 84,90 ****
  487.       $(CC) $(CFLAGS) $(WARNFLAGS) -c $<
  488.   
  489.   y.tab.c: grammar.y
  490. !     @$(ECHO) Expect 48 shift/reduce conflicts.
  491.       $(YACC) grammar.y
  492.   
  493.   # don't compile y.tab.c with all warnings; yacc/bison are not up to it.
  494. --- 90,96 ----
  495.       $(CC) $(CFLAGS) $(WARNFLAGS) -c $<
  496.   
  497.   y.tab.c: grammar.y
  498. !     @$(ECHO) Expect 54 shift/reduce conflicts.
  499.       $(YACC) grammar.y
  500.   
  501.   # don't compile y.tab.c with all warnings; yacc/bison are not up to it.
  502. ***************
  503. *** 95,116 ****
  504.       $(LEX) -t -n lex.l > $@
  505.       cp $@ lex_yy.c
  506.   
  507. ! example.inc: c2man.exe example.h fixexample.sed
  508. !     ./c2man -o- example.h | $(SED) -f fixexample.sed >example.inc
  509.   
  510. ! ctype_ex.inc: c2man.exe ctype_ex.h fixexample.sed
  511. !     ./c2man -o- -g ctype_ex.h | $(SED) -f fixexample.sed >ctype_ex.inc
  512.   
  513. ! fixexample.sed: fixexample.in
  514. !     $(SED) -e '/^#/d' fixexample.in > fixexample.sed
  515.   
  516. ! flatten.sed: flatten_sed.SH
  517. !     sh flatten_sed.SH
  518.   
  519. ! Makefile: Makefile.SH
  520.       sh Makefile.SH
  521.   
  522. ! config.h: config_h.SH
  523.       sh config_h.SH
  524.   
  525.   TAGS: $(SOURCES)
  526. --- 101,122 ----
  527.       $(LEX) -t -n lex.l > $@
  528.       cp $@ lex_yy.c
  529.   
  530. ! example.inc: c2man.exe example.h fixexamp.sed
  531. !     ./c2man -o- example.h | $(SED) -f fixexamp.sed >example.inc
  532.   
  533. ! ctype_ex.inc: c2man.exe ctype_ex.h fixexamp.sed
  534. !     ./c2man -o- -g ctype_ex.h | $(SED) -f fixexamp.sed >ctype_ex.inc
  535.   
  536. ! fixexamp.sed: fixexamp.in
  537. !     $(SED) -e '/^#/d' fixexamp.in > fixexamp.sed
  538.   
  539. ! flatten.sed: flatten.SH config.sh
  540. !     sh flatten.SH
  541.   
  542. ! Makefile: Makefile.SH config.sh
  543.       sh Makefile.SH
  544.   
  545. ! config.h: config_h.SH config.sh
  546.       sh config_h.SH
  547.   
  548.   TAGS: $(SOURCES)
  549. ***************
  550. *** 151,157 ****
  551.   c2man$O: c2man.c c2man.h config.h confmagic.h enum.h manpage.h output.h\
  552.       patchlevel.h strappend.h strconcat.h symbol.h
  553.   
  554. ! semantic$O: c2man.h config.h confmagic.h enum.h manpage.h semantic.c\
  555.       semantic.h strconcat.h symbol.h
  556.   
  557.   string$O: c2man.h config.h confmagic.h string.c symbol.h
  558. --- 157,163 ----
  559.   c2man$O: c2man.c c2man.h config.h confmagic.h enum.h manpage.h output.h\
  560.       patchlevel.h strappend.h strconcat.h symbol.h
  561.   
  562. ! semantic$O: c2man.h config.h confmagic.h enum.h manpage.h output.h semantic.c\
  563.       semantic.h strconcat.h symbol.h
  564.   
  565.   string$O: c2man.h config.h confmagic.h string.c symbol.h
  566. ***************
  567. *** 163,172 ****
  568.   strappend$O: c2man.h config.h confmagic.h strappend.c strappend.h symbol.h
  569.   
  570.   manpage$O: c2man.h config.h confmagic.h manpage.c manpage.h output.h\
  571. !     semantic.h strconcat.h symbol.h
  572.   
  573.   enum$O: c2man.h config.h confmagic.h enum.c enum.h manpage.h strconcat.h\
  574.       symbol.h
  575.   
  576.   nroff$O: c2man.h config.h confmagic.h manpage.h nroff.c output.h symbol.h
  577.   
  578. --- 169,182 ----
  579.   strappend$O: c2man.h config.h confmagic.h strappend.c strappend.h symbol.h
  580.   
  581.   manpage$O: c2man.h config.h confmagic.h manpage.c manpage.h output.h\
  582. !     semantic.h strappend.h strconcat.h symbol.h
  583.   
  584.   enum$O: c2man.h config.h confmagic.h enum.c enum.h manpage.h strconcat.h\
  585.       symbol.h
  586.   
  587.   nroff$O: c2man.h config.h confmagic.h manpage.h nroff.c output.h symbol.h
  588. + 
  589. + texinfo$O: c2man.h config.h confmagic.h manpage.h output.h symbol.h texinfo.c
  590. + 
  591. + latex$O: c2man.h config.h confmagic.h latex.c manpage.h output.h symbol.h
  592.   
  593.  
  594. Index: libc/alloca.c
  595. *** libc/alloca.c.old    1994/05/19 01:06:38
  596. --- libc/alloca.c    1994/05/19 01:06:54
  597. ***************
  598. *** 0 ****
  599. --- 1,186 ----
  600. + /*
  601. +     alloca -- (mostly) portable public-domain implementation -- D A Gwyn
  602. + 
  603. +     This implementation of the PWB library alloca() function,
  604. +     which is used to allocate space off the run-time stack so
  605. +     that it is automatically reclaimed upon procedure exit, 
  606. +     was inspired by discussions with J. Q. Johnson of Cornell.
  607. + 
  608. +     It should work under any C implementation that uses an
  609. +     actual procedure stack (as opposed to a linked list of
  610. +     frames).  There are some preprocessor constants that can
  611. +     be defined when compiling for your specific system, for
  612. +     improved efficiency; however, the defaults should be okay.
  613. + 
  614. +     The general concept of this implementation is to keep
  615. +     track of all alloca()-allocated blocks, and reclaim any
  616. +     that are found to be deeper in the stack than the current
  617. +     invocation.  This heuristic does not reclaim storage as
  618. +     soon as it becomes invalid, but it will do so eventually.
  619. + 
  620. +     As a special case, alloca(0) reclaims storage without
  621. +     allocating any.  It is a good idea to use alloca(0) in
  622. +     your main control loop, etc. to force garbage collection.
  623. + */
  624. + #ifndef lint
  625. + static char    SCCSid[] = "@(#)alloca.c    1.1";    /* for the "what" utility */
  626. + #endif
  627. + 
  628. + #ifdef emacs
  629. + #include "config.h"
  630. + #ifdef static
  631. + /* actually, only want this if static is defined as ""
  632. +    -- this is for usg, in which emacs must undefine static
  633. +    in order to make unexec workable
  634. +    */
  635. + #ifndef STACK_DIRECTION
  636. + you
  637. + lose
  638. + -- must know STACK_DIRECTION at compile-time
  639. + #endif /* STACK_DIRECTION undefined */
  640. + #endif static
  641. + #endif emacs
  642. + 
  643. + #ifdef X3J11
  644. + typedef void    *pointer;        /* generic pointer type */
  645. + #else
  646. + typedef char    *pointer;        /* generic pointer type */
  647. + #endif
  648. + 
  649. + #define    NULL    0            /* null pointer constant */
  650. + 
  651. + extern void    free();
  652. + extern pointer    malloc();
  653. + 
  654. + /*
  655. +     Define STACK_DIRECTION if you know the direction of stack
  656. +     growth for your system; otherwise it will be automatically
  657. +     deduced at run-time.
  658. + 
  659. +     STACK_DIRECTION > 0 => grows toward higher addresses
  660. +     STACK_DIRECTION < 0 => grows toward lower addresses
  661. +     STACK_DIRECTION = 0 => direction of growth unknown
  662. + */
  663. + 
  664. + #ifndef STACK_DIRECTION
  665. + #define    STACK_DIRECTION    0        /* direction unknown */
  666. + #endif
  667. + 
  668. + #if STACK_DIRECTION != 0
  669. + 
  670. + #define    STACK_DIR    STACK_DIRECTION    /* known at compile-time */
  671. + 
  672. + #else    /* STACK_DIRECTION == 0; need run-time code */
  673. + 
  674. + static int    stack_dir;        /* 1 or -1 once known */
  675. + #define    STACK_DIR    stack_dir
  676. + 
  677. + static void
  678. + find_stack_direction (/* void */)
  679. + {
  680. +   static char    *addr = NULL;    /* address of first
  681. +                    `dummy', once known */
  682. +   auto char    dummy;        /* to get stack address */
  683. + 
  684. +   if (addr == NULL)
  685. +     {                /* initial entry */
  686. +       addr = &dummy;
  687. + 
  688. +       find_stack_direction ();    /* recurse once */
  689. +     }
  690. +   else                /* second entry */
  691. +     if (&dummy > addr)
  692. +       stack_dir = 1;        /* stack grew upward */
  693. +     else
  694. +       stack_dir = -1;        /* stack grew downward */
  695. + }
  696. + 
  697. + #endif    /* STACK_DIRECTION == 0 */
  698. + 
  699. + /*
  700. +     An "alloca header" is used to:
  701. +     (a) chain together all alloca()ed blocks;
  702. +     (b) keep track of stack depth.
  703. + 
  704. +     It is very important that sizeof(header) agree with malloc()
  705. +     alignment chunk size.  The following default should work okay.
  706. + */
  707. + 
  708. + #ifndef    ALIGN_SIZE
  709. + #define    ALIGN_SIZE    sizeof(double)
  710. + #endif
  711. + 
  712. + typedef union hdr
  713. + {
  714. +   char    align[ALIGN_SIZE];    /* to force sizeof(header) */
  715. +   struct
  716. +     {
  717. +       union hdr *next;        /* for chaining headers */
  718. +       char *deep;        /* for stack depth measure */
  719. +     } h;
  720. + } header;
  721. + 
  722. + /*
  723. +     alloca( size ) returns a pointer to at least `size' bytes of
  724. +     storage which will be automatically reclaimed upon exit from
  725. +     the procedure that called alloca().  Originally, this space
  726. +     was supposed to be taken from the current stack frame of the
  727. +     caller, but that method cannot be made to work for some
  728. +     implementations of C, for example under Gould's UTX/32.
  729. + */
  730. + 
  731. + static header *last_alloca_header = NULL; /* -> last alloca header */
  732. + 
  733. + pointer
  734. + alloca (size)            /* returns pointer to storage */
  735. +      unsigned    size;        /* # bytes to allocate */
  736. + {
  737. +   auto char    probe;        /* probes stack depth: */
  738. +   register char    *depth = &probe;
  739. + 
  740. + #if STACK_DIRECTION == 0
  741. +   if (STACK_DIR == 0)        /* unknown growth direction */
  742. +     find_stack_direction ();
  743. + #endif
  744. + 
  745. +                 /* Reclaim garbage, defined as all alloca()ed storage that
  746. +                    was allocated from deeper in the stack than currently. */
  747. + 
  748. +   {
  749. +     register header    *hp;    /* traverses linked list */
  750. + 
  751. +     for (hp = last_alloca_header; hp != NULL;)
  752. +       if (STACK_DIR > 0 && hp->h.deep > depth
  753. +       || STACK_DIR < 0 && hp->h.deep < depth)
  754. +     {
  755. +       register header    *np = hp->h.next;
  756. + 
  757. +       free ((pointer) hp);    /* collect garbage */
  758. + 
  759. +       hp = np;        /* -> next header */
  760. +     }
  761. +       else
  762. +     break;            /* rest are not deeper */
  763. + 
  764. +     last_alloca_header = hp;    /* -> last valid storage */
  765. +   }
  766. + 
  767. +   if (size == 0)
  768. +     return NULL;        /* no allocation required */
  769. + 
  770. +   /* Allocate combined header + user data storage. */
  771. + 
  772. +   {
  773. +     register pointer    new = malloc (sizeof (header) + size);
  774. +     /* address of header */
  775. + 
  776. +     ((header *)new)->h.next = last_alloca_header;
  777. +     ((header *)new)->h.deep = depth;
  778. + 
  779. +     last_alloca_header = (header *)new;
  780. + 
  781. +     /* User storage begins just after header. */
  782. + 
  783. +     return (pointer)((char *)new + sizeof(header));
  784. +   }
  785. + }
  786.  
  787. Index: texinfo.c
  788. Prereq: 2.0.1.6
  789. *** texinfo.c.old    1994/01/07 07:05:58
  790. --- texinfo.c    1994/05/12 02:25:10
  791. ***************
  792. *** 1,10 ****
  793. ! /* $Id: texinfo.c,v 2.0.1.6 1994/01/07 07:05:58 greyham Exp $
  794.    * functions for texinfo style output.
  795.    */
  796.   #include "c2man.h"
  797.   #include "manpage.h"
  798.   #include "output.h"
  799.   
  800.   void texinfo_char(c)
  801.   const int c;
  802.   {
  803. --- 1,31 ----
  804. ! /* $Id: texinfo.c,v 2.0.1.7 1994/05/12 02:25:10 greyham Exp $
  805.    * functions for texinfo style output.
  806.    */
  807.   #include "c2man.h"
  808.   #include "manpage.h"
  809.   #include "output.h"
  810.   
  811. + static char *heading_not_in_contents[] =
  812. +      {"@chapheading ", "@heading ", "@subheading ", "@subsubheading "};
  813. + static char *heading_in_contents[] =
  814. +      {"@chapter ", "@section ", "@subsection ", "@subsubsection "};
  815. + 
  816. + #define n_levels  (sizeof(heading_not_in_contents) / sizeof(char *))
  817. + 
  818. + #define level(n) ((n) >= n_levels ? n_levels - 1 : (n))
  819. + 
  820. + /* section level for man page entry */
  821. + static int top_level = 1;
  822. + 
  823. + /* always output node for manpage, even if embedded */
  824. + static int embed_node_info = 0;
  825. + 
  826. + /* use title as name of section, rather than "NAME" */
  827. + static int title_name = 0;
  828. + 
  829. + /* the section title, filled in by texinfo_header */
  830. + static const char *title = "INTERNAL ERROR, BOGUS TITLE DUDE!";
  831. + 
  832.   void texinfo_char(c)
  833.   const int c;
  834.   {
  835. ***************
  836. *** 38,60 ****
  837.   const char *name;
  838.   const char *section;
  839.   {
  840. !     put_string("\\input texinfo @c -*-texinfo-*-\n");
  841. !     output_warning();
  842. !     put_string("@c %**start of header\n");
  843. !     put_string("@setfilename ");
  844. !     texinfo_text(name);
  845. !     put_string(".info\n@settitle ");
  846. !     texinfo_text(name);
  847. !     putchar('\n');
  848. !     put_string("@c %**end of header\n");
  849.   
  850. !     put_string("@node Top, ");
  851. !     texinfo_text(name);
  852. !     put_string(", (dir), (dir)\n");
  853.   
  854. !     put_string("@node ");
  855. !     texinfo_text(name);
  856. !     put_string(", (dir), Top, (dir)\n");
  857.   }
  858.   
  859.   void texinfo_dash()    { put_string("---"); }
  860. --- 59,89 ----
  861.   const char *name;
  862.   const char *section;
  863.   {
  864. !     if (! make_embeddable)
  865. !     {
  866. !     put_string("\\input texinfo @c -*-texinfo-*-\n");
  867. !     output_warning();
  868. !     put_string("@c %**start of header\n");
  869. !     put_string("@setfilename ");
  870. !     texinfo_text(name);
  871. !     put_string(".info\n@settitle ");
  872. !     texinfo_text(name);
  873. !     putchar('\n');
  874. !     put_string("@c %**end of header\n");
  875.   
  876. !     put_string("@node Top, ");
  877. !     texinfo_text(name);
  878. !     put_string(", (dir), (dir)\n");
  879. !     }
  880.   
  881. !     if (! make_embeddable || embed_node_info)
  882. !     {
  883. !       put_string("@node ");
  884. !       texinfo_text(name);
  885. !       put_string(", (dir), Top, (dir)\n");
  886. !     }
  887. ! 
  888. !     title = name;
  889.   }
  890.   
  891.   void texinfo_dash()    { put_string("---"); }
  892. ***************
  893. *** 62,68 ****
  894.   void texinfo_section(name)
  895.   const char *name;
  896.   {
  897. !     put_string("@unnumberedsec ");
  898.       texinfo_text(name);
  899.       putchar('\n');
  900.       put_string("@noindent\n");
  901. --- 91,106 ----
  902.   void texinfo_section(name)
  903.   const char *name;
  904.   {
  905. !     put_string(heading_not_in_contents[level(top_level)]);
  906. !     texinfo_text(name);
  907. !     putchar('\n');
  908. !     put_string("@noindent\n");
  909. ! }
  910. ! 
  911. ! void texinfo_section_in_contents(name)
  912. ! const char *name;
  913. ! {
  914. !     put_string(heading_in_contents[level(top_level)]);
  915.       texinfo_text(name);
  916.       putchar('\n');
  917.       put_string("@noindent\n");
  918. ***************
  919. *** 71,77 ****
  920.   void texinfo_sub_section(name)
  921.   const char *name;
  922.   {
  923. !     put_string("@unnumberedsubsec ");
  924.       texinfo_text(name);
  925.       putchar('\n');
  926.       put_string("@noindent\n");
  927. --- 109,115 ----
  928.   void texinfo_sub_section(name)
  929.   const char *name;
  930.   {
  931. !     put_string(heading_not_in_contents[level(top_level+1)]);
  932.       texinfo_text(name);
  933.       putchar('\n');
  934.       put_string("@noindent\n");
  935. ***************
  936. *** 141,146 ****
  937. --- 179,240 ----
  938.   
  939.   void texinfo_file_end() { put_string("@bye\n"); }
  940.   
  941. + static first_name = 1;
  942. + void texinfo_name(name)
  943. + char *name;
  944. + {
  945. +     if (name)
  946. +     {
  947. +     if (!first_name || !title_name || strcmp(title,name))
  948. +        texinfo_text(name);
  949. +     first_name = 0;
  950. +     }
  951. +     else
  952. +     {
  953. +     first_name = 1;
  954. +     if (title_name)
  955. +         texinfo_section_in_contents(title);
  956. +     else
  957. +         texinfo_section("NAME");
  958. +     }
  959. + }
  960. + 
  961. + void texinfo_terse_sep()
  962. + {
  963. +     if (!title_name || group_together)
  964. +     {
  965. +     texinfo_char(' ');
  966. +     texinfo_dash();
  967. +     texinfo_char(' ');
  968. +     }
  969. + }
  970. + 
  971. + 
  972. + 
  973. + int texinfo_parse_option(option)
  974. + char *option;
  975. + {
  976. +     if        (option[0] == 't')
  977. +     title_name = 1;
  978. +     else if (option[0] == 'n')
  979. +     embed_node_info = 1;
  980. +     else if (option[0] == 's')
  981. +     {
  982. +     top_level = atoi(&option[1]);
  983. +     if (top_level < 0) return 1;
  984. +     }
  985. +     else return 1;
  986. + 
  987. +     return 0;
  988. + }
  989. + 
  990. + void texinfo_print_options()
  991. + {
  992. +     fputs("\ttexinfo options:\n", stderr);
  993. +     fputs("\tt\tuse manpage title as NAME title\n", stderr);
  994. +     fputs("\tn\toutput node info if embedded output\n", stderr);
  995. +     fputs("\ts<n>\tset top heading level to <n>\n", stderr);
  996. + }
  997.   
  998.   struct Output texinfo_output =
  999.   {
  1000. ***************
  1001. *** 171,175 ****
  1002.       texinfo_include,
  1003.       texinfo_file_end,
  1004.       texinfo_text,
  1005. !     texinfo_char
  1006.   };
  1007. --- 265,273 ----
  1008.       texinfo_include,
  1009.       texinfo_file_end,
  1010.       texinfo_text,
  1011. !     texinfo_char,
  1012. !     texinfo_parse_option,
  1013. !     texinfo_print_options,
  1014. !     texinfo_name,
  1015. !     texinfo_terse_sep
  1016.   };
  1017.  
  1018. Index: vms/popen.c
  1019. *** vms/popen.c.old    1994/05/19 01:11:19
  1020. --- vms/popen.c    1994/05/19 01:11:22
  1021. ***************
  1022. *** 0 ****
  1023. --- 1,188 ----
  1024. + /* Implement unix popen and pclose in vms by using mailboxes
  1025. +    and lib$spawn.
  1026. +    17-APR-91 -GJC@MITECH.COM version 1.0
  1027. + */
  1028. + 
  1029. + #include <stdio.h>
  1030. + #include <descrip.h>
  1031. + #include <ssdef.h>
  1032. + #include <string.h>
  1033. + 
  1034. + FILE *popen();
  1035. + int pclose();
  1036. + 
  1037. + globalvalue CLI$M_NOWAIT;
  1038. + 
  1039. + void p_describe(); /* a non-unix function */
  1040. + 
  1041. + static struct dsc$descriptor *set_dsc_cst();
  1042. + static int create_mbx();
  1043. + 
  1044. + #define mailbox_size (512)
  1045. + #define mailbox_byte_quota (3*mailbox_size)
  1046. + #define mailbox_protection_mask (0x0000F000)
  1047. + 
  1048. + struct popen_cell
  1049. + {FILE *fp;
  1050. +  char *mbx_name;
  1051. +  short mbx_chan;
  1052. +  long pid;
  1053. +  long completed;
  1054. +  long comp_status;
  1055. +  struct popen_cell *next;
  1056. +  struct popen_cell *prev;};
  1057. + 
  1058. + static struct popen_cell *popen_list = NULL;
  1059. + 
  1060. + static struct popen_cell *find_popen_cell(fp)
  1061. +      FILE *fp;
  1062. + {struct popen_cell *l;
  1063. +  for(l=popen_list;l != NULL; l = l->next)
  1064. +    if (l->fp == fp) return(l);
  1065. +  return(NULL);}
  1066. + 
  1067. + void p_describe(fp)
  1068. +      FILE *fp;
  1069. + {struct popen_cell *cell;
  1070. +  if (!(cell = find_popen_cell(fp)))
  1071. +    {printf("File pointer is not from popen, or it has been closed\n");
  1072. +     return;}
  1073. +  printf("FILE *fp                = %08X\n",cell->fp);
  1074. +  printf("char *mbx_name          = %s\n",cell->mbx_name);
  1075. +  printf("short mbx_chan          = %d\n",cell->mbx_chan);
  1076. +  printf("long pid                = %08X\n",cell->pid);
  1077. +  printf("long completed          = %d\n",cell->completed);
  1078. +  printf("long comp_status        = %d\n",cell->comp_status);
  1079. +  printf("struct popen_cell *next = %08X\n",cell->next);
  1080. +  printf("struct popen_cell *prev = %08X\n",cell->prev);}
  1081. + 
  1082. + static void proc_exit_ast(cell)
  1083. +      struct popen_cell *cell;
  1084. + {cell->completed = 1;}
  1085. + 
  1086. + static void pclose_cleanup(cell)
  1087. +      struct popen_cell *cell;
  1088. + {sys$dassgn(cell->mbx_chan);
  1089. +  free(cell->mbx_name);
  1090. +  if (!cell->completed)
  1091. +    sys$delprc(&cell->pid,0);
  1092. +  memset(cell,0,sizeof(struct popen_cell));
  1093. +  free(cell);}
  1094. + 
  1095. + static void pclose_delq(cell)
  1096. +      struct popen_cell *cell;
  1097. + {if (cell->prev)
  1098. +    {cell->prev->next = cell->next;
  1099. +     if (cell->next)
  1100. +       cell->next->prev = cell->prev;}
  1101. +  else
  1102. +    {popen_list = cell->next;
  1103. +     if (cell->next)
  1104. +       cell->next->prev = NULL;}}
  1105. + 
  1106. + static void popen_push(cell)
  1107. +      struct popen_cell *cell;
  1108. + {if (popen_list)
  1109. +    popen_list->prev = cell;
  1110. +  cell->prev = NULL;
  1111. +  cell->next = popen_list;
  1112. +  popen_list = cell;}
  1113. + 
  1114. + int pclose(fp)
  1115. +      FILE *fp;
  1116. + {int i;
  1117. +  struct popen_cell *cell;
  1118. +  i = fclose(fp);
  1119. +  if (cell = find_popen_cell(fp))
  1120. +    {pclose_delq(cell);
  1121. +     pclose_cleanup(cell);}
  1122. +  return(i);}
  1123. + 
  1124. + FILE *popen(command,mode)
  1125. +      char *command,*mode;
  1126. + {char *temp;
  1127. +  struct popen_cell *cell;
  1128. +  int readp,n,mask,ret;
  1129. +  char *name,*prompt,*in,*out;
  1130. +  struct dsc$descriptor comm_d,in_d,out_d,name_d,prompt_d;
  1131. +  
  1132. +  if (strcmp(mode,"r") == 0)
  1133. +    readp = 1;
  1134. +  else if (strcmp(mode,"w") == 0)
  1135. +    readp = 0;
  1136. +  else
  1137. +    return(NULL);
  1138. + 
  1139. +  temp = mktemp("POPEN_MB_XXXXXXXXXX");
  1140. +  n = strlen(temp);
  1141. +   cell =  (struct popen_cell *) malloc(sizeof(struct popen_cell));
  1142. +  cell->mbx_name = (char *) malloc(n+1);
  1143. +  strcpy(cell->mbx_name,temp);
  1144. +  if ((cell->mbx_chan = create_mbx(cell->mbx_name)) < 0)
  1145. +    {cell->completed = 1;
  1146. +     pclose_cleanup(cell);
  1147. +     return(NULL);}
  1148. + 
  1149. +  if (readp)
  1150. +    {in = "NL:";
  1151. +     out = cell->mbx_name;}
  1152. +  else
  1153. +    {in = cell->mbx_name;
  1154. +     out = "NL:";}
  1155. + 
  1156. +  name = 0;
  1157. +  prompt = 0;
  1158. +  mask = CLI$M_NOWAIT;
  1159. + 
  1160. +  cell->completed = 0;
  1161. + 
  1162. +  ret = lib$spawn((command) ? set_dsc_cst(&comm_d,command) : 0,
  1163. +                  (in) ? set_dsc_cst(&in_d,in) : 0,
  1164. +                  (out) ? set_dsc_cst(&out_d,out) : 0,
  1165. +                  &mask,
  1166. +                  (name)  ? set_dsc_cst(&name_d,name) : 0,
  1167. +                  &cell->pid,
  1168. +                  &cell->comp_status,
  1169. +                  0, /* event flag */
  1170. +          proc_exit_ast,
  1171. +          cell,
  1172. +                  (prompt) ? set_dsc_cst(&prompt_d,prompt) : 0,
  1173. +                  0 /* cli */
  1174. +                  );
  1175. +  
  1176. +  if (ret != SS$_NORMAL)
  1177. +    {cell->completed = 1;
  1178. +     pclose_cleanup(cell);
  1179. +     return(NULL);}
  1180. + 
  1181. +  if (!(cell->fp = fopen(cell->mbx_name,mode)))
  1182. +    {pclose_cleanup(cell);
  1183. +     return(NULL);}
  1184. + 
  1185. +  popen_push(cell);
  1186. + 
  1187. +  return(cell->fp);}
  1188. + 
  1189. + static struct dsc$descriptor *set_dsc_cst(x,buff)
  1190. +      struct dsc$descriptor *x;
  1191. +      char *buff;
  1192. + {(*x).dsc$w_length = strlen(buff);
  1193. +  (*x).dsc$a_pointer = buff;
  1194. +  (*x).dsc$b_class = DSC$K_CLASS_S;
  1195. +  (*x).dsc$b_dtype = DSC$K_DTYPE_T;
  1196. +  return(x);}
  1197. + 
  1198. + static int create_mbx(name)
  1199. +   char *name;
  1200. + {short chan;
  1201. +  int prmflg,maxmsg,bufquo,promsk,acmode,iflag,retval;
  1202. +  struct dsc$descriptor lognam;
  1203. +  prmflg = 0;
  1204. +  maxmsg = mailbox_size;
  1205. +  bufquo = mailbox_byte_quota;
  1206. +  promsk = mailbox_protection_mask;
  1207. +  acmode = 0;
  1208. +  set_dsc_cst(&lognam,name);
  1209. +  retval = sys$crembx(prmflg,&chan,maxmsg,bufquo,promsk,acmode,&lognam);
  1210. +  if (retval != SS$_NORMAL) return(-1);
  1211. +  return(chan);}
  1212.  
  1213. Index: vms/readme.1st
  1214. *** vms/readme.1st.old    1994/05/19 01:11:32
  1215. --- vms/readme.1st    1994/05/19 01:11:36
  1216. ***************
  1217. *** 0 ****
  1218. --- 1,80 ----
  1219. + 
  1220. + *******************************************************************************
  1221. + **************************  README FOR VMS SYSTEMS ****************************
  1222. + *******************************************************************************
  1223. +                                                                    May 12, 1994
  1224. +                                                                    Rick Flower 
  1225. +                                                     <flower@donald.sp.trw.com>
  1226. +                                                     <flower@sdvax2.sp.trw.com>
  1227. + 
  1228. + 
  1229. + This file documents the differences between C2MAN for Unix and C2MAN for VMS
  1230. + systems.  The are some requirements that must be met in order to run C2MAN for
  1231. + VMS that are listed below.  You **CAN** (or should be able to) run C2MAN on
  1232. + VAX/AXP systems if you just install the GNU-CPP (see #1 below) since the
  1233. + there is no GNU-CC that supports the AXP architecture yet.
  1234. + 
  1235. +     1) You must either install a full GCC distribution OR install just the
  1236. +        CPP that is part of the standard CPP program!  If you are unable to
  1237. +            install the entire GCC system, the CPP program can be compiled and
  1238. +            built very easily directly from the main GCC distribution on any
  1239. +        GNU Anonymous FTP site (such as prep.ai.mit.edu in /pub/gnu or
  1240. +        on gatekeeper.dec.com in /pub/GNU).  There is a command file that
  1241. +            is part of the distribution that will make CPP.EXE using the 
  1242. +            standard CC (Vax-C or DEC-C) that you have..
  1243. + 
  1244. +     2) You will need BISON and FLEX which are also standard GNU tools that
  1245. +            can be made to run under VMS.  If I recall correctly, FLEX will
  1246. +            once again compile right-out-of-the-box and can be retrieved from
  1247. +            any GNU site (see #1 above for examples).  BISON on the other hand
  1248. +            appears to have some problems being built as of a while back.. I 
  1249. +            highly suggest that you look on one of the VMS fileserv's or any
  1250. +            other VMS FTP site to find a copy of BISON for VMS..  The install
  1251. +            procedure that is part of the standard GNU source distribution seems
  1252. +            to be a bit broken.. I got my version of BISON from one of the 
  1253. +            prebuilt GCC distributions available from DECUS (you might try on
  1254. +            nic.switch.ch in /mirror/vms/DECUS/vms93a/gccvms if you can't find
  1255. +            it elsewhere!).
  1256. + 
  1257. +     3) Once you've got the above requirements met, go into the [.vms]
  1258. +            directory and edit the MAKE.COM and make any necessary changes to
  1259. +            the CC,CFLAGS,LFLAGS, and the OPTFILE statement to indicate whether
  1260. +            you are using GCC or plain VAX-C.. (DEC-C should work without too 
  1261. +            much work!).  Once the changes are complete, make sure that you are
  1262. +            in the [.C2MAN] directory and then invoke @[.VMS]MAKE to build it.
  1263. +            You should end up with a C2MAN.EXE after a short period of time..  
  1264. + 
  1265. +     4) Before you invoke C2MAN, MAKE ABSOLUTELY SURE THAT YOU'VE GOT A 
  1266. +            SYMBOL SETUP CALLED "CPP" THAT WILL INVOKE THE GNU-CPP PROGRAM!!! If
  1267. +            you don't have a symbol setup, C2MAN will FAIL to run!  You can set
  1268. +            a symbol for CPP using the following as an example :
  1269. + 
  1270. +         $ CPP == $GNU_CC:[000000]GCC-CPP.EXE
  1271. + 
  1272. +        Just change the drive / directory specification to point to where 
  1273. +            you've got your CPP located.  You can test whether or not CPP is
  1274. +            working by invoking CPP at the "$" and press return.. You won't see
  1275. +            anything happen until you press CTRL-Z and you get something like :
  1276. + 
  1277. +         $ CPP
  1278. +         *EXIT*   (in reverse video!)
  1279. +                 # 1 ""
  1280. +                 $
  1281. + 
  1282. +        If you don't get that then you've not defined your CPP correctly..
  1283. + 
  1284. +     5) When you go and use C2MAN options that are uppercase letters, you
  1285. +            **MUST** quote them otherwise DCL will automatically change them
  1286. +            into lowercase letters which will probably cause C2MAN to complain
  1287. +            about unrecognized options being specified on the command line!!!
  1288. +            In other words, the following two commands are *NOT* identical in
  1289. +            function :
  1290. + 
  1291. +         $ C2MAN -V
  1292. +                 c2man: reading standard input
  1293. + 
  1294. +                 and
  1295. +                 $ C2MAN -"V"
  1296. +                 c2man: Version 2, Patchlevel 27
  1297. +                 c2man: reading standard input
  1298. +                 c2man: running `cpp -"C" -"D__C2MAN__=2" "-"'
  1299.  
  1300. Index: c2man.c
  1301. Prereq: 2.0.1.29
  1302. *** c2man.c.old    1994/01/07 07:04:56
  1303. --- c2man.c    1994/05/19 01:16:02
  1304. ***************
  1305. *** 1,4 ****
  1306. ! /* $Id: c2man.c,v 2.0.1.29 1994/01/07 07:04:56 greyham Exp $
  1307.    *
  1308.    * C Manual page generator.
  1309.    * Reads C source code and outputs manual pages.
  1310. --- 1,4 ----
  1311. ! /* $Id: c2man.c,v 2.0.1.31 1994/05/19 01:16:02 greyham Exp $
  1312.    *
  1313.    * C Manual page generator.
  1314.    * Reads C source code and outputs manual pages.
  1315. ***************
  1316. *** 81,86 ****
  1317. --- 81,90 ----
  1318.   IncludeFile *first_include;
  1319.   static IncludeFile **last_next_include = &first_include;
  1320.   
  1321. + /* list of excluded sections specified by user */
  1322. + ExcludeSection *first_excluded_section;
  1323. + static ExcludeSection **last_next_excluded_section = &first_excluded_section;
  1324. + 
  1325.   /* do we group related stuff into one file? */
  1326.   boolean group_together;
  1327.   
  1328. ***************
  1329. *** 295,304 ****
  1330.       fputs(" -n\t\tName output file after input source file\n", stderr);
  1331.       fputs(" -L\t\tLazy: Be silent about undocumented parameters\n",
  1332.                                       stderr);
  1333. !     fputs(" -T n|l|t\tselect typesetting output format: nroff, LaTeX or TeXinfo\n",
  1334.                                       stderr);
  1335.       fputs(" -M name\tset name of the manual in which the page goes\n",
  1336.                                       stderr);
  1337.       fputc('\n', stderr);
  1338.       fputs(" -D name[=value]\n", stderr);
  1339.       fputs(" -U name\n", stderr);
  1340. --- 299,313 ----
  1341.       fputs(" -n\t\tName output file after input source file\n", stderr);
  1342.       fputs(" -L\t\tLazy: Be silent about undocumented parameters\n",
  1343.                                       stderr);
  1344. !     fputs(" -T n|l|t[,options]\tselect typesetting output format: nroff, LaTeX or TeXinfo\n",
  1345.                                       stderr);
  1346. +     nroff_output.print_options();
  1347. +     latex_output.print_options();
  1348. +     texinfo_output.print_options();
  1349. + 
  1350.       fputs(" -M name\tset name of the manual in which the page goes\n",
  1351.                                       stderr);
  1352. +     fputs(" -x section\texclude section from ouput\n", stderr);
  1353.       fputc('\n', stderr);
  1354.       fputs(" -D name[=value]\n", stderr);
  1355.       fputs(" -U name\n", stderr);
  1356. ***************
  1357. *** 597,602 ****
  1358. --- 606,612 ----
  1359.       char *s, cbuf[2];
  1360.       const char *base_cpp_cmd;
  1361.       IncludeFile *includefile;
  1362. +     ExcludeSection *excludesection;
  1363.       char *cpp_opts;
  1364.       const char *default_section = "3";
  1365.   #ifdef HAS_LINK
  1366. ***************
  1367. *** 612,624 ****
  1368.       /* initialise CPP options with -D__C2MAN__ */
  1369.       cbuf[0] = VERSION + '0';
  1370.       cbuf[1] = '\0';
  1371. !     cpp_opts = strconcat("-D__C2MAN__=", cbuf, NULLCP);
  1372.   #ifdef NeXT
  1373.       cpp_opts = strappend(cpp_opts, " -D_NEXT_SOURCE", NULLCP);
  1374. ! #endif
  1375.   
  1376.       /* Scan command line options. */
  1377. !     while ((c = getopt(argc, argv, "P:D:F:I:psU:Vvo:eM:H:G:gi:S:l:LT:nO:")) 
  1378.                                       != EOF)
  1379.       {
  1380.       switch (c) {
  1381. --- 622,639 ----
  1382.       /* initialise CPP options with -D__C2MAN__ */
  1383.       cbuf[0] = VERSION + '0';
  1384.       cbuf[1] = '\0';
  1385. ! #ifdef VMS
  1386. !     cpp_opts = strconcat("-\"D__C2MAN__=", cbuf, "\"",NULLCP);
  1387. ! #else
  1388.   #ifdef NeXT
  1389.       cpp_opts = strappend(cpp_opts, " -D_NEXT_SOURCE", NULLCP);
  1390. ! #else
  1391. !     cpp_opts = strconcat("-D__C2MAN__=", cbuf, NULLCP);
  1392. ! #endif /* !NeXT */
  1393. ! #endif /* !VMS  */
  1394.   
  1395.       /* Scan command line options. */
  1396. !     while ((c = getopt(argc, argv, "P:D:F:I:psU:Vvo:eM:H:G:gi:x:S:l:LT:nO:"))
  1397.                                       != EOF)
  1398.       {
  1399.       switch (c) {
  1400. ***************
  1401. *** 718,723 ****
  1402. --- 733,745 ----
  1403.           includefile->next = NULL;
  1404.           last_next_include = &includefile->next;
  1405.           break;
  1406. +     case 'x':
  1407. +         *last_next_excluded_section = excludesection =
  1408. +                 (ExcludeSection *)safe_malloc(sizeof *excludesection);
  1409. +         excludesection->name = optarg;
  1410. +         excludesection->next = NULL;
  1411. +         last_next_excluded_section = &excludesection->next;
  1412. +         break;
  1413.       case 'S':
  1414.           manual_section = optarg;
  1415.           break;
  1416. ***************
  1417. *** 755,760 ****
  1418. --- 777,789 ----
  1419.               break;
  1420.           default:    usage();
  1421.           }
  1422. +         s = strtok(&optarg[1], ",");
  1423. +         if (s && ! *output->parse_option) usage();
  1424. +         while(s)
  1425. +         {
  1426. +           if (output->parse_option(s)) usage();
  1427. +           s = strtok(NULL, ",");
  1428. +         }
  1429.           break;
  1430.       case 'O':
  1431.           for (i = 0; i < _OBJECT_NUM; i++)
  1432. ***************
  1433. *** 834,839 ****
  1434. --- 863,875 ----
  1435.       IncludeFile *next = includefile->next;
  1436.       free(includefile);
  1437.       includefile = next;
  1438. +     }
  1439. + 
  1440. +     for (excludesection = first_excluded_section; excludesection;)
  1441. +     {
  1442. +     ExcludeSection *next = excludesection->next;
  1443. +     free(excludesection);
  1444. +     excludesection = next;
  1445.       }
  1446.   
  1447.       for (i = 0; i < _OBJECT_NUM; i++)
  1448.  
  1449. Index: pc/updmake
  1450. *** pc/updmake.old    1994/05/16 01:58:19
  1451. --- pc/updmake    1994/05/16 01:58:57
  1452. ***************
  1453. *** 0 ****
  1454. --- 1,99 ----
  1455. + #!/usr/local/bin/perl -w
  1456. + # This script updates the MSDOS & OS/2 Makefile.pc automatically from the Unix
  1457. + # one to minimise the possibility of me making a mistake.
  1458. + # It's a gross hack, but it works.
  1459. + open(MAKEFILE, "../Makefile") || die;
  1460. + rename("Makefile.pc", "Makefile.old") || die;
  1461. + open(PREVIOUS, "Makefile.old") || die;
  1462. + open(OUTPUT, ">Makefile.pc") || die;
  1463. + 
  1464. + # skip the header from the Unix Makefile.
  1465. + do { $_ = <MAKEFILE>; } until m/^SHELL=/o;
  1466. + 
  1467. + # retain the previous header from the PC Makefile.
  1468. + while (<PREVIOUS>)
  1469. + {
  1470. +     print OUTPUT;
  1471. +     last if /# DO NOT EDIT/;
  1472. + }
  1473. + 
  1474. + while (<MAKEFILE>)
  1475. + {
  1476. +     if ($_ eq "MAKE=make\n")
  1477. +     {
  1478. +         while (<MAKEFILE>)
  1479. +         {
  1480. +             last unless $_ eq "\n";
  1481. +         }
  1482. +     }
  1483. + 
  1484. +     next if /chmod/o;
  1485. +     s/\.o(\W)/\$O\1/go;
  1486. +     s/\.o$/\$O/o;
  1487. +     s/c2man([^.])/c2man.exe\1/ if (/:/ || /cp /);
  1488. +     s/^(install:) all$/\1/;
  1489. +     if (/\$\(LEX\) (.*)/)
  1490. +     {
  1491. +         print OUTPUT "\t\$(LEX) -t $1 > \$@";
  1492. +         print OUTPUT "\n";
  1493. +         $_ = "\tcp \$@ lex_yy.c\n";
  1494. +     }
  1495. +     print OUTPUT;
  1496. +     print OUTPUT "\t\$(BIND)\n" if (/\$\(LDFLAGS\) /);
  1497. +     last if m/^# y.tab.c dependancies/o;
  1498. + }
  1499. + 
  1500. + # output dependancies grouped into lines.
  1501. + sub output_depend
  1502. + {
  1503. +     return if $current eq "";
  1504. + 
  1505. +     $chars = length($current) + 1;
  1506. +     $current =~ s/\.o$/\$O/o;
  1507. +     print OUTPUT $current, ":";
  1508. +     foreach $file (@depends)
  1509. +     {
  1510. +         $chars += 1 + length($file);
  1511. +         if ($chars > 77)
  1512. +         {
  1513. +             print OUTPUT "\\\n\t";
  1514. +             $chars = 8 + length($file);
  1515. +         }
  1516. +         else
  1517. +         {
  1518. +             print OUTPUT " ";
  1519. +         }
  1520. +         print OUTPUT $file;
  1521. +     }
  1522. +     print OUTPUT "\n\n";
  1523. +     $current = "";
  1524. +     undef @depends;
  1525. + }
  1526. + 
  1527. + # process the dependancies a bit.
  1528. + $current = "";
  1529. + undef @depends;
  1530. + while (<MAKEFILE>)
  1531. + {
  1532. +     if (m/^#/ || $_ eq "\n")
  1533. +     {
  1534. +         &output_depend;
  1535. +         print OUTPUT;
  1536. +         next;
  1537. +     }
  1538. + 
  1539. +     # have we found a dependancy?
  1540. +     if (($obj,$dep) = m/^(.*):\s*(.*)/)
  1541. +     {
  1542. +         next if ($dep =~ m!^/!);    # ignore /usr/include
  1543. +         if ($obj ne $current)
  1544. +         {
  1545. +             &output_depend;
  1546. +             $current = $obj;
  1547. +         }
  1548. +         $dep =~ s!^\./!!;
  1549. +         push(@depends, $dep);
  1550. +     }
  1551. + }
  1552. + 
  1553. + close OUTPUT || die;
  1554.  
  1555. *** End of Patch 29 ***
  1556. -- 
  1557. Graham Stoney, Hardware/Software Engineer
  1558. Canon Information Systems Research Australia
  1559. Ph: + 61 2 805 2909    Fax: + 61 2 805 2929
  1560.  
  1561. exit 0 # Just in case...
  1562.