home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / misc / volume18 / parseargs / patch04d < prev    next >
Internet Message Format  |  1991-04-25  |  12KB
  1. From: brad@hcx1.ssd.csd.harris.com (Brad Appleton)
  2. Newsgroups: comp.sources.misc
  3. Subject: v18i104:  parseargs - functions to parse command line arguments, Patch04d/4
  4. Message-ID: <1991Apr26.040454.18895@sparky.IMD.Sterling.COM>
  5. Date: 26 Apr 91 04:04:54 GMT
  6. Approved: kent@sparky.imd.sterling.com
  7. X-Checksum-Snefru: b8a5edf7 e56c9272 ef1d84a2 28c57b7c
  8.  
  9. Submitted-by: Brad Appleton <brad@hcx1.ssd.csd.harris.com>
  10. Posting-number: Volume 18, Issue 104
  11. Archive-name: parseargs/patch04d
  12. Patch-To: parseargs: Volume 17, Issue 45-57
  13.  
  14. #!/bin/sh
  15. # This is part 4 of a multipart archive
  16. # do not concatenate these parts, unpack them in order with /bin/sh
  17. # file PATCH continued
  18. #
  19. if test ! -r _shar_seq_.tmp; then
  20.     echo 'Please unpack part 1 first!'
  21.     exit 1
  22. fi
  23. (read Scheck
  24.  if test "$Scheck" != 4; then
  25.     echo Please unpack part "$Scheck" next!
  26.     exit 1
  27.  else
  28.     exit 0
  29.  fi
  30. ) < _shar_seq_.tmp || exit 1
  31. echo 'x - continuing file PATCH'
  32. sed 's/^X//' << 'SHAR_EOF' >> 'PATCH' &&
  33. X  
  34. X        /* scan for missing required args */
  35. X     if ( SYNTAX_ERROR(rc, argd) ) {
  36. ***************
  37. *** 1971,1976 ****
  38. --- 2003,2011 ----
  39. X        exit( 2 );
  40. X     }
  41. X  
  42. +       /* reset previous parse flags */
  43. +    cmd_flags(argd)  =  saveflags;
  44. + 
  45. X     return  rc;
  46. X  }
  47. X  
  48. ***************
  49. *** 1997,2003 ****
  50. X    
  51. X  /* ^DESCRIPTION:
  52. X  **    Given an ArgList and an argdesc array, lparseargs will parse arguments
  53. ! **    in an ArgList in much the same manner as parseargs.
  54. X  **
  55. X  ** ^REQUIREMENTS:
  56. X  **    <argls> should be an ArgList of strings
  57. --- 2032,2038 ----
  58. X    
  59. X  /* ^DESCRIPTION:
  60. X  **    Given an ArgList and an argdesc array, lparseargs will parse arguments
  61. ! **    in an ArgList in the same manner as parseargs.
  62. X  **
  63. X  ** ^REQUIREMENTS:
  64. X  **    <argls> should be an ArgList of strings
  65. ***************
  66. *** 2055,2063 ****
  67. X     BSET(cmd_flags(argd), pa_ARGV0);
  68. X     rc = parse_argv_style( argv, parse_init( &argd ) );
  69. X  
  70. -       /* reset previous parse-flags */
  71. -    cmd_flags(argd) = saveflags;
  72. - 
  73. X        /* scan for missing required arguments */
  74. X     if ( SYNTAX_ERROR(rc, argd) ) {
  75. X        fputc( '\n', stderr );
  76. --- 2090,2095 ----
  77. ***************
  78. *** 2065,2070 ****
  79. --- 2097,2105 ----
  80. X        exit( 2 );
  81. X     }
  82. X  
  83. +       /* reset previous parse-flags */
  84. +    cmd_flags(argd) = saveflags;
  85. + 
  86. X     return   rc;
  87. X  }
  88. X  
  89. ***************
  90. *** 2093,2099 ****
  91. X  /* ^DESCRIPTION:
  92. X  **    Vparseargs takes an argdesc array, the number of arguments to parse,
  93. X  **    and a (possibly NULL terminated) list of argument-strings and parses
  94. ! **    them in much the same manner as parseargs.  Unlike sparseargs,
  95. X  **    vparseargs assumes that all parameters are already split up into
  96. X  **    tokens, hence any whitespace characters contained in any of the
  97. X  **    string-parameters are used as is (and will be considered a part of
  98. --- 2128,2134 ----
  99. X  /* ^DESCRIPTION:
  100. X  **    Vparseargs takes an argdesc array, the number of arguments to parse,
  101. X  **    and a (possibly NULL terminated) list of argument-strings and parses
  102. ! **    them in the same manner as parseargs.  Unlike sparseargs,
  103. X  **    vparseargs assumes that all parameters are already split up into
  104. X  **    tokens, hence any whitespace characters contained in any of the
  105. X  **    string-parameters are used as is (and will be considered a part of
  106. ***************
  107. *** 2158,2166 ****
  108. X  
  109. X     rc = parse_argv_style( argv, parse_init( &argd ) );
  110. X  
  111. -       /* reset previous parse-flags */
  112. -    cmd_flags(argd) = saveflags;
  113. - 
  114. X        /* scan for missing required arguments */
  115. X     if ( SYNTAX_ERROR(rc, argd) ) {
  116. X        fputc( '\n', stderr );
  117. --- 2193,2198 ----
  118. ***************
  119. *** 2168,2173 ****
  120. --- 2200,2208 ----
  121. X        exit( 2 );
  122. X     }
  123. X  
  124. +       /* reset previous parse-flags */
  125. +    cmd_flags(argd) = saveflags;
  126. + 
  127. X     return   rc;
  128. X  }
  129. X  
  130. ***************
  131. *** 2241,2249 ****
  132. X  
  133. X     rc = parse_argv_style( av, parse_init( &argd ) );
  134. X  
  135. -       /* reset previous parse-flags */
  136. -    cmd_flags(cmd) = saveflags;
  137. - 
  138. X        /* scan for missing required arguments */
  139. X     if ( SYNTAX_ERROR(rc, argd) ) {
  140. X        fputc( '\n', stderr );
  141. --- 2276,2281 ----
  142. ***************
  143. *** 2250,2255 ****
  144. --- 2282,2290 ----
  145. X        usage( argd );
  146. X        exit( 2 );
  147. X     }
  148. + 
  149. +       /* reset previous parse-flags */
  150. +    cmd_flags(cmd) = saveflags;
  151. X  
  152. X     return  rc;
  153. X  }
  154. SHAR_EOF
  155. echo 'File PATCH is complete' &&
  156. chmod 0664 PATCH ||
  157. echo 'restore of PATCH failed'
  158. Wc_c="`wc -c < 'PATCH'`"
  159. test 79034 -eq "$Wc_c" ||
  160.     echo 'PATCH: original size 79034, current size' "$Wc_c"
  161. # ============= doc/Makefile ==============
  162. if test ! -d 'doc'; then
  163.     echo 'x - creating directory doc'
  164.     mkdir 'doc'
  165. fi
  166. echo 'x - extracting doc/Makefile (Text)'
  167. sed 's/^X//' << 'SHAR_EOF' > 'doc/Makefile' &&
  168. # $Header: Man.mk,v 1.0 90/03/05 09:21:28 brad Exp $
  169. X
  170. ###
  171. # target directories
  172. ###
  173. MAN1=    man1
  174. MAN3=    man3
  175. LOCALMAN=    local_man
  176. MANDIR=    /usr/man/${LOCALMAN}
  177. CATMANDIR=    /usr/catman/${LOCALMAN}
  178. X
  179. ###
  180. # commands
  181. ###
  182. COL=    col
  183. COLFLAGS=    -b
  184. SOELIM=    /usr/ucb/soelim
  185. MANTOCATMAN=    /usr/ucb/mantocatman
  186. TROFF=    roff
  187. TRFLAGS=    -man -dimagen1
  188. NROFF=    nroff
  189. NRFLAGS=    -man
  190. SPELL=    spell
  191. COPY=    /bin/cp
  192. DEL=    /bin/rm -f
  193. X
  194. ###
  195. # files used
  196. ###
  197. INCS=    *.inc
  198. SRCS=    argtype.man3  parseargs.man1  parseargs.man3  parsecntl.man3
  199. MANIFEST=    Manifest
  200. MAN3FILES=    argtype.3  parseargs.3  parsecntl.3
  201. MAN1FILES=    parseargs.1
  202. CATMAN3FILES=    argtype.3.z  parseargs.3.z  parsecntl.3.z
  203. CATMAN1FILES=    parseargs.1.z
  204. X
  205. ###
  206. # target dependencies
  207. ###
  208. .SUFFIXES: .man1 .man3 .1 .3
  209. X
  210. .man1.1:
  211. X    ${SOELIM} $< >$*.1
  212. X    ${MANTOCATMAN} $*.1
  213. X
  214. .man3.3:
  215. X    ${SOELIM} $< >$*.3
  216. X    ${MANTOCATMAN} $*.3
  217. X
  218. ###
  219. # give a usage message if no target is given
  220. ###
  221. usage:
  222. X    @echo "Usage: make <target>"
  223. X    @echo " "
  224. X    @echo "where <target> is one of the following: "
  225. X    @echo " "
  226. X    @echo "   install  -- to install the documentation"
  227. X    @echo "   installman  -- to install the unpacked documentation"
  228. X    @echo "   installcatman  -- to install the packed documentation"
  229. X    @echo "   print  -- to print the documentation"
  230. X    @echo "   view   -- to view the documentation"
  231. X    @echo "   text   -- to build text copies of the documentation"
  232. X    @echo "   spell  -- to spell check the documentation"
  233. X    @echo "   clean  -- to remove all intermediate files"
  234. X    @echo "   clobber  -- to remove all created files"
  235. X
  236. ###
  237. # installation dependencies
  238. ###
  239. install: installman installcatman
  240. X
  241. installman: installman1 installman3
  242. X
  243. installcatman: installcatman1 installcatman3
  244. X
  245. installman1: ${MAN1FILES}
  246. X    ${COPY} ${MAN1FILES} ${MANDIR}/${MAN1}
  247. X
  248. installcatman1: ${CATMAN1FILES}
  249. X    ${COPY} ${CATMAN1FILES} ${CATMANDIR}/${MAN1}
  250. X
  251. installman3: ${MAN3FILES}
  252. X    ${COPY} ${MAN3FILES} ${MANDIR}/${MAN3}
  253. X
  254. installcatman3: ${CATMAN3FILES}
  255. X    ${COPY} ${CATMAN3FILES} ${CATMANDIR}/${MAN3}
  256. X
  257. ###
  258. # include dependencies
  259. ###
  260. argtype.3:
  261. parseargs.1:
  262. parseargs.3:
  263. parsecntl.3:
  264. X
  265. X
  266. ###
  267. # maintenance dependencies
  268. ###
  269. clean:
  270. X    ${DEL} ${MAN1FILES} ${MAN3FILES} ${CATMAN1FILES} ${CATMAN3FILES}
  271. X
  272. clobber: clean
  273. X    ${DEL} *.txt
  274. X
  275. spell: ${INCS} ${SRCS}}
  276. X    ${SPELL} ${SPELLFLAGS} ${INCS} ${SRCS}
  277. X
  278. print: ${MANFILES} ${INCS}
  279. X    ${TROFF} ${TRFLAGS} ${SRCS}
  280. X
  281. text: ascii
  282. txt: ascii
  283. ascii:
  284. X    ${NROFF} ${NRFLAGS} argtype.man3 | ${COL} ${COLFLAGS} >argtype3.txt
  285. X    ${NROFF} ${NRFLAGS} parseargs.man1 | ${COL} ${COLFLAGS} >parseargs1.txt
  286. X    ${NROFF} ${NRFLAGS} parseargs.man3 | ${COL} ${COLFLAGS} >parseargs3.txt
  287. X    ${NROFF} ${NRFLAGS} parsecntl.man3 | ${COL} ${COLFLAGS} >parsecntl3.txt
  288. X
  289. view: ${MANFILES} ${INCS}
  290. X    ${NROFF} ${NRFLAGS} ${SRCS}
  291. X
  292. SHAR_EOF
  293. chmod 0664 doc/Makefile ||
  294. echo 'restore of doc/Makefile failed'
  295. Wc_c="`wc -c < 'doc/Makefile'`"
  296. test 2667 -eq "$Wc_c" ||
  297.     echo 'doc/Makefile: original size 2667, current size' "$Wc_c"
  298. # ============= doc/effects.inc ==============
  299. echo 'x - extracting doc/effects.inc (Text)'
  300. sed 's/^X//' << 'SHAR_EOF' > 'doc/effects.inc' &&
  301. .\"----------------------------------------------------------------------------
  302. .\"-- This text was extracted using the following command:
  303. .\"--   xdoc -man -n -p '[ \t]*' -I SIDE-EFFECTS  ../xparse.c
  304. .\"----------------------------------------------------------------------------
  305. .SH "SIDE EFFECTS"
  306. .PP
  307. Each of the functions in the \fIparseargs\fP library will set the external
  308. character string \fIProgName\fP to be the name of the last command that
  309. was operated upon by any of the library routines.
  310. .PP
  311. When an argument-descriptor array is first encountered by any of the
  312. parseargs library routines, it is initially compiled into an intermediate
  313. form that is more convenient to manipulate. As a direct result, it is not
  314. advisable to attempt to index directly into the array to manipulate one
  315. of the argument descriptors (because the argdesc that you thought was there
  316. may actually be somewhere else). After the array has been given its initial
  317. value(s), only \fIparsecntl\fP(3) should be used to manipulate or query the
  318. attributes of an argument descriptor.
  319. SHAR_EOF
  320. chmod 0664 doc/effects.inc ||
  321. echo 'restore of doc/effects.inc failed'
  322. Wc_c="`wc -c < 'doc/effects.inc'`"
  323. test 1060 -eq "$Wc_c" ||
  324.     echo 'doc/effects.inc: original size 1060, current size' "$Wc_c"
  325. # ============= patchlevel.h ==============
  326. echo 'x - extracting patchlevel.h (Text)'
  327. sed 's/^X//' << 'SHAR_EOF' > 'patchlevel.h' &&
  328. /*************************************************************************
  329. ** ^FILE: patchlevel.h - current patchlevel for parseargs
  330. **
  331. ** ^HISTORY:
  332. **    04/10/91    Brad Appleton    <brad@ssd.csd.harris.com>
  333. **    Patch04
  334. **    - fixed problem with prompting in xparse.c:prompt_user()
  335. **    - under vms, getenv was defined to be 'getsymbol', it should be
  336. **      'get_symbol' (note the underscore).
  337. **    - now uses <errno.h>
  338. **    - parseargs no longer included <fcntl.h>
  339. **    - fix bug in vms_args.c printing '[]' for required args and vis-a-vis
  340. **    - fixed bug in argInput and argOutput in argtype.c
  341. **    - fixed bug in <os>_args.c where ARGVALGIVEN was improperly being
  342. **      cleared if the argument was a list or a vector. This was causing
  343. **      parseargs(1) to screw up on optional lists.
  344. **    - fixed bug in strfuncs.c:strnicmp()
  345. **    - changed strfuncs.[ch] so that my version of strdup is always used
  346. **      (my version dies if malloc failed, others return NULL).
  347. **    - Added some changes for SUN and VAX
  348. **    - Added -1 option to parseargs(1)
  349. **    - Unhid the -# option to parseargs(1)
  350. **    - More documentation fixes
  351. **
  352. **    04/04/91    Brad Appleton    <brad@ssd.csd.harris.com>
  353. **    Patch04 (continued)
  354. **    - fixed bug in xparse.c with PARSECNTL='Prompt' being ignored.
  355. **    - added test.pl to test.all and added options to test.all
  356. **    - fixed newline printing error in perl-scripts for parseargs(1)
  357. **    - added -C option to parseargs(1) and to the docs
  358. **    - added "patchlevel.h" to distribution
  359. **    - added "what" string with version and patch level for parseargs(1)
  360. **    - added hidden -# option to parseargs(1)
  361. **    - add "doc/effects.inc" to distribution
  362. **    - fix docs
  363. **    - fix test.rc for Plan 9 shell
  364. **    - fix parseargs(1) quoting for perl
  365. **
  366. **    03/22/91    Brad Appleton    <brad@ssd.csd.harris.com>
  367. **    Patch03
  368. **    - ascii docs fix
  369. **
  370. **    03/21/91    Brad Appleton    <brad@ssd.csd.harris.com>
  371. **    Patch02
  372. **    - documentation fix
  373. **
  374. **    03/12/91    Brad Appleton    <brad@ssd.csd.harris.com>
  375. **    Patch01
  376. **    - documentation fix
  377. **
  378. **    03/02/91    Brad Appleton    <brad@ssd.csd.harris.com>    Created
  379. ***^^********************************************************************/
  380. X
  381. #define  VERSION     2
  382. #define  REVISION    0
  383. #define  PATCHLEVEL  4
  384. X
  385. #ifdef __STDC__
  386. X   static const char
  387. #else
  388. X   static char
  389. #endif
  390. X   _Ident[] = "@(#)parseargs  2.0  patchlevel 4";
  391. SHAR_EOF
  392. chmod 0664 patchlevel.h ||
  393. echo 'restore of patchlevel.h failed'
  394. Wc_c="`wc -c < 'patchlevel.h'`"
  395. test 2409 -eq "$Wc_c" ||
  396.     echo 'patchlevel.h: original size 2409, current size' "$Wc_c"
  397. rm -f _shar_seq_.tmp
  398. echo You have unpacked the last part
  399. exit 0
  400. exit 0 # Just in case...
  401. -- 
  402. Kent Landfield                   INTERNET: kent@sparky.IMD.Sterling.COM
  403. Sterling Software, IMD           UUCP:     uunet!sparky!kent
  404. Phone:    (402) 291-8300         FAX:      (402) 291-4362
  405. Please send comp.sources.misc-related mail to kent@uunet.uu.net.
  406.