home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1992 March / Source_Code_CD-ROM_Walnut_Creek_March_1992.iso / usenet / altsrcs / 4 / 4023 < prev    next >
Internet Message Format  |  1991-09-10  |  44KB
  1. Path: wupost!zaphod.mps.ohio-state.edu!rpi!crdgw1!barnett
  2. From: barnett@grymoire.crd.ge.com (Bruce Barnett)
  3. Newsgroups: alt.sources
  4. Subject: Official Ease 3.3 patch 3
  5. Message-ID: <BARNETT.91Sep9131214@grymoire.crd.ge.com>
  6. Date: 9 Sep 91 17:12:14 GMT
  7. Sender: news@crdgw1.crd.ge.com
  8. Reply-To: barnett@crdgw1.ge.com
  9. Distribution: alt
  10. Organization: GE Corp. R & D, Schenectady, NY
  11. Lines: 1515
  12.  
  13. History:
  14.     Ease is a high level language for sendmail .cf files
  15.     You can ftp ease from gatekeeper.dec.com
  16.  
  17.     This is the official Patch 3 for Ease.
  18.     It converts Ease 3.2 into Ease 3.3
  19.     Apply with
  20.  
  21.     patch -p <Patch3
  22.  
  23. Fixes:
  24.     bug with systems compiled without DATA_RW (systems that cannot
  25.     write into data segments).
  26.  
  27.     Better cf->ease->cf conversion with $? $| $. constructs,
  28.     especially Ying-Da Lee's sample sendmail.cf file
  29.     
  30.  
  31.  
  32.  
  33.  
  34. diff -r -c ./CONVERTING ../3.2/CONVERTING
  35. *** ./CONVERTING    Mon Sep  9 12:19:42 1991
  36. --- ../3.2/CONVERTING    Thu May 16 12:38:45 1991
  37. ***************
  38. *** 40,49 ****
  39.       CGI IRIS
  40.           => cfc -i -C FKSVN  
  41.   
  42. -     smail
  43. - 
  44. -         => cfc -C DUET
  45. - 
  46.   Step 2.  Convert the ease file to cf: 
  47.   
  48.       % et <sendmail.ease >sendmail.cf
  49. --- 40,45 ----
  50. diff -r -c ./Makefile ../3.2/Makefile
  51. *** ./Makefile    Mon Sep  9 12:43:20 1991
  52. --- ../3.2/Makefile    Thu May 16 12:43:04 1991
  53. ***************
  54. *** 1,9 ****
  55. ! #    $Header: /tmp_mnt/home/kreskin/u0/barnett/Src/Ease/ease/RCS/Makefile,v 3.3 1991/09/09 16:41:11 barnett Exp $
  56.   #
  57.   #    $Log: Makefile,v $
  58. - # Revision 3.3  1991/09/09  16:41:11  barnett
  59. - # added '-' to /bin/rm in "make all"
  60. - #
  61.   # Revision 3.2  1991/05/16  10:51:13  barnett
  62.   # Fixed a few typos and added the MAKE variable
  63.   #
  64. --- 1,6 ----
  65. ! #    $Header: /home/kreskin/u0/barnett/Src/ease/RCS/Makefile,v 3.2 1991/05/16 10:51:13 barnett Exp $
  66.   #
  67.   #    $Log: Makefile,v $
  68.   # Revision 3.2  1991/05/16  10:51:13  barnett
  69.   # Fixed a few typos and added the MAKE variable
  70.   #
  71. ***************
  72. *** 64,70 ****
  73.       cd src; ${MAKE} ${MFLAGS} $@
  74.       cd cfc; ${MAKE} ${MFLAGS} $@
  75.       cd utils; ${MAKE} ${MFLAGS} $@
  76. !     -/bin/rm all
  77.   
  78.   
  79.   debug:    all sendmail.ease
  80. --- 61,67 ----
  81.       cd src; ${MAKE} ${MFLAGS} $@
  82.       cd cfc; ${MAKE} ${MFLAGS} $@
  83.       cd utils; ${MAKE} ${MFLAGS} $@
  84. !     /bin/rm all
  85.   
  86.   
  87.   debug:    all sendmail.ease
  88. Only in .: Patch3
  89. diff -r -c ./README ../3.2/README
  90. *** ./README    Mon Sep  9 12:51:43 1991
  91. --- ../3.2/README    Thu May 16 12:38:20 1991
  92. ***************
  93. *** 1,5 ****
  94. ! This is release 3.3 of the CFC and Ease programs.
  95.   
  96.   Ease is a compiler for sendmail configuration files.  It reads a high-level
  97.   mail configuration language and produces a sendmail.cf file.  If you've ever
  98.   stared at a sendmail.cf, you know why this is valuable.
  99. --- 1,7 ----
  100. ! README - Tue May  1 14:46:33 PDT 1990
  101.   
  102. + This is release 3.2 of the CFC and Ease programs.
  103. + 
  104.   Ease is a compiler for sendmail configuration files.  It reads a high-level
  105.   mail configuration language and produces a sendmail.cf file.  If you've ever
  106.   stared at a sendmail.cf, you know why this is valuable.
  107. ***************
  108. *** 31,38 ****
  109.       Matt Heffron <heffron@falstaff.css.beckman.com>
  110.       William Roberts <liam@cs.qmw.ac.uk>
  111.       rainer@flyer.uni-duisburg.de (Rainer Bieniek)
  112. -     agq@dstos3.dsto.oz.au (Ashleigh Quick)
  113. - 
  114.   Cfc was written by Arnold D. Robbins, and has been enhanced by Bruce Barnett
  115.   (see below).
  116.   
  117. --- 33,38 ----
  118. ***************
  119. *** 42,58 ****
  120.   
  121.       -----------------------------------------------------------
  122.   
  123. !             Ease 3.3 Release Notes:
  124. !         Bruce Barnett <barnett@crdgw1.ge.com>
  125. !             July 1991
  126.   
  127. ! I sent some patches to the authors of Ease several years ago, but they never 
  128. ! released them. I now have their permission to be the current maintainer of 
  129. ! Ease and cfc.  Most of the changes to Ease since 2.0 have been mine, with some generous patches sent in from the people described above.
  130.   
  131. ! The main enhancement I added to Ease 3.0:
  132.   
  133.   
  134.       I subjected the Cfc/Ease programs to a test suite
  135.       that converted *.cf files to ease files, and back again.
  136.       I compared the input of cfc  (The original .cf file)
  137. --- 42,64 ----
  138.   
  139.       -----------------------------------------------------------
  140.   
  141. !         Ease 3.2 and cfc Release Notes:
  142. !         Bruce Barnett barnett@crdgw1.ge.com
  143. !         May 1991
  144.   
  145. ! This document describes Ease 3.2. This version was originally a
  146. ! modified version of the last official release of ease 2.1. I called it
  147. ! 2.1 Beta and sent it to several dozen people. I sent the patches to the authors
  148. ! of ease and cfc, but an updated version was never posted to the net.
  149. ! The authors have decided to let me post the changes, so I guess I have
  150. ! the baton now.
  151.   
  152. ! Since this is a major release, I decided to call it Ease 3.0
  153. ! Two updates have been release since then.
  154.   
  155. + The main feature of Ease/Cfc 3.2:
  156.   
  157. + 
  158.       I subjected the Cfc/Ease programs to a test suite
  159.       that converted *.cf files to ease files, and back again.
  160.       I compared the input of cfc  (The original .cf file)
  161. ***************
  162. *** 71,77 ****
  163.   langauge and feel confident that you won't break anything.
  164.       
  165.   
  166. ! Current status of Ease 3.3
  167.       It will handle 100% of the standard Ultrix, SunOS, HP, and Berkeley
  168.       versions of sendmail (I hope). It handles 99.5% of the IDA
  169.       enhancement package. It compiles of dozens of different machines.
  170. --- 77,83 ----
  171.   langauge and feel confident that you won't break anything.
  172.       
  173.   
  174. ! Current status of Ease 3.2
  175.       It will handle 100% of the standard Ultrix, SunOS, HP, and Berkeley
  176.       versions of sendmail (I hope). It handles 99.5% of the IDA
  177.       enhancement package. It compiles of dozens of different machines.
  178. ***************
  179. *** 205,219 ****
  180.   
  181.   Release Notes:
  182.   
  183. -     3.3:
  184. -         Support for $? $| $. on LHS
  185. -             added warning if $. is missing
  186. -         Support for $? after $#
  187. -         Fix DATA_RW compile option
  188. -         Eliminate warnings about "LOCAL" and "ERROR" 
  189. -             mailers being undefined. Case doesn't matter.
  190. -             but I don't want to convert to lower because the cfdiff
  191. -             might complain
  192.       3.2:
  193.       Added better support for IDA sendmail
  194.       Added better support for unusual values in mailer flags, and options
  195. --- 211,216 ----
  196. ***************
  197. *** 231,249 ****
  198.   Release 3.0:
  199.       First release of Bruce's changes to the net in alt.sources
  200.   
  201. - 
  202. - 
  203. - NOTE:
  204. - 
  205. - on some systems, you will get the warning:
  206. -     make: Warning: Infinite loop: Target `lexdefs.h' depends on itself
  207. - This is okay. If the line was removed, Make wouldn't work on other machines.
  208. - 
  209.   ============================================================================
  210.   
  211.   If you find these programs useful, or if you have suggestions or changes,
  212.   please drop me a line. I would really appreciate any patches to this
  213. ! package. I will merge any patches and release new versions, as they
  214.   are sent to me. 
  215.   
  216.       Bruce Barnett
  217. --- 228,239 ----
  218.   Release 3.0:
  219.       First release of Bruce's changes to the net in alt.sources
  220.   
  221.   ============================================================================
  222.   
  223.   If you find these programs useful, or if you have suggestions or changes,
  224.   please drop me a line. I would really appreciate any patches to this
  225. ! package, as I don't plan any major upgrade to support all of the IDA
  226. ! extensions. I will merge any patches and release new versions, as they
  227.   are sent to me. 
  228.   
  229.       Bruce Barnett
  230. diff -r -c ./TODO ../3.2/TODO
  231. *** ./TODO    Fri Sep  6 15:02:32 1991
  232. --- ../3.2/TODO    Thu May 16 12:38:28 1991
  233. ***************
  234. *** 3,51 ****
  235.   
  236.   Keyed databases definitions (OKP/usr/lib/aliases) should not need an asm()
  237.   
  238. ! Fix the following constructs so that cfc/et handles the conversion properly:
  239.   
  240.   HReceived: from $?s$s$|localhost$. by $w$?r with $r$.
  241.       id $i; $b; sendmail $v/$V
  242.       (from $f for $u)
  243.   
  244. ! DMroot
  245. ! T$M
  246.   
  247. - Eliminate the concat() construct, if possible.
  248. - 
  249.   check for if (exactly_one) next($2); type error.
  250.   check for matching < and > in rulesets
  251.   Check for mailers "local" and "prog" 
  252. - 
  253. - Add the new IDA/sendmail macro $m
  254. - 
  255. -     A new macro, $m, has been defined.  For single recipients in
  256. -     a local mail delivery, it's value is the original address before
  257. -     aliasing.  If all recipients for the current transaction derive
  258. -     from a single original recipient, use that for $m.  Else make
  259. -     $m undefined (to preserve Bcc: privacy).
  260. - 
  261. -     The Received header now has 'for $m' in place of 'for $u'.  The
  262. -     new code release supports $m as the recipient prior to aliasing.
  263. -     This will not cause any problems with earlier code releases, except
  264. -     that the 'for user' will no appear on the header unless you change
  265. -     this back to $u.
  266. - 
  267. - 
  268. - Add the IDA Os option:
  269. - 
  270. -     If Os (SuperSafe) is set in the sendmail.cf file, files in the spool
  271. -     area will either be open()ed with O_SYNC set or fsync()ed prior
  272. -     to close.
  273. - 
  274. - IDA:
  275. -     Simon J Gerraty (sjg@melb.bull.oz.au) contributed patch for SUN's
  276. -     $%x and $!x features ($!x added as $^x).
  277. - 
  278. -     * delayed macro evaluation using $&x syntax
  279. -     * RFC822 quoted macro expansion using $!x syntax
  280. - 
  281.   
  282.   CFC improvements
  283.       Make it a real two-pass parser. This way, it can
  284. --- 3,22 ----
  285.   
  286.   Keyed databases definitions (OKP/usr/lib/aliases) should not need an asm()
  287.   
  288. ! Ignore case when checking for mailer names existance
  289. !         (local vs. LOCAL)
  290.   
  291. + Fix the following construct so that cfc/et handles the conversion properly:
  292. + 
  293.   HReceived: from $?s$s$|localhost$. by $w$?r with $r$.
  294.       id $i; $b; sendmail $v/$V
  295.       (from $f for $u)
  296.   
  297. ! Eliminate the concat() construct.
  298.   
  299.   check for if (exactly_one) next($2); type error.
  300.   check for matching < and > in rulesets
  301.   Check for mailers "local" and "prog" 
  302.   
  303.   CFC improvements
  304.       Make it a real two-pass parser. This way, it can
  305. Common subdirectories: ./cfc and ../3.2/cfc
  306. Common subdirectories: ./debug and ../3.2/debug
  307. Common subdirectories: ./doc and ../3.2/doc
  308. Common subdirectories: ./src and ../3.2/src
  309. Common subdirectories: ./test and ../3.2/test
  310. Common subdirectories: ./utils and ../3.2/utils
  311. diff -r -c ./cfc/cfc.c ../3.2/cfc/cfc.c
  312. *** ./cfc/cfc.c    Mon Sep  9 12:44:10 1991
  313. --- ../3.2/cfc/cfc.c    Thu May 16 12:43:01 1991
  314. ***************
  315. *** 1,12 ****
  316.   #ifndef lint
  317. ! static char RCSid[] = "$Header: /tmp_mnt/home/kreskin/u0/barnett/Src/Ease/ease/cfc/RCS/cfc.c,v 3.3 1991/09/09 16:34:44 barnett Exp $";
  318.   #endif
  319.   
  320.   /*
  321.    * $Log: cfc.c,v $
  322. -  * Revision 3.3  1991/09/09  16:34:44  barnett
  323. -  * Bug fixes. Better handling of those $? conditionals.
  324. -  *
  325.    * Revision 3.2  1991/05/16  10:49:33  barnett
  326.    * Support for IDA databases
  327.    * More tolerant handling of unusual conditions
  328. --- 1,9 ----
  329.   #ifndef lint
  330. ! static char RCSid[] = "$Header: /home/kreskin/u0/barnett/Src/ease/cfc/RCS/cfc.c,v 3.2 1991/05/16 10:49:33 barnett Exp $";
  331.   #endif
  332.   
  333.   /*
  334.    * $Log: cfc.c,v $
  335.    * Revision 3.2  1991/05/16  10:49:33  barnett
  336.    * Support for IDA databases
  337.    * More tolerant handling of unusual conditions
  338. ***************
  339. *** 141,147 ****
  340.               "warning: ignoring non-flag command line arguments\n");
  341.   
  342.       printf ("/***********************************************************/\n");
  343. !     printf ("/* This ease file generated by cfc version $Revision: 3.3 $*/\n");
  344.       printf ("/* automatically from a sendmail.cf file                   */\n");
  345.       printf ("/* It may need to be edited before feeding to ease.        */\n");
  346.       printf ("/***********************************************************/\n");
  347. --- 138,144 ----
  348.               "warning: ignoring non-flag command line arguments\n");
  349.   
  350.       printf ("/***********************************************************/\n");
  351. !     printf ("/* This ease file generated by cfc version $Revision: 3.2 $*/\n");
  352.       printf ("/* automatically from a sendmail.cf file                   */\n");
  353.       printf ("/* It may need to be edited before feeding to ease.        */\n");
  354.       printf ("/***********************************************************/\n");
  355. ***************
  356. *** 429,444 ****
  357.                   conditional++;ifset++;
  358.                   break;
  359.               case '|':
  360. !                 if ( ! conditional) complain("in left hand side of rule, found a '$|' without a previous '$?'");
  361.                   if ( ifset) {
  362. !                     /* I don't think I have to output a ", " */
  363. !                     /* but let's test */
  364. !                     if ( quoting ) 
  365. !                       printf("\", \""); 
  366. !                     else
  367. !                       printf(", ");
  368.                   } else {
  369. !                     complain("in left hand side of rule, found a '$|' without a previous '$?'");
  370.                       putchar (',');
  371.                   }
  372.                   break;
  373. --- 426,436 ----
  374.                   conditional++;ifset++;
  375.                   break;
  376.               case '|':
  377. !                 if ( ! conditional) die("lhs - $| without $?");
  378.                   if ( ifset) {
  379. !                     printf("\", \"");
  380.                   } else {
  381. !                     fprintf(stderr,"Got $| when not in ifset\n");
  382.                       putchar (',');
  383.                   }
  384.                   break;
  385. ***************
  386. *** 508,519 ****
  387.           putchar ('"');
  388.       while (open--)
  389.           putchar (')');
  390. !     if (conditional) { 
  391. !         /* the lhs was missing a $. - let's add one automatically */
  392. !         complain ("Expected '$.' on left hand side of rule - adding one anyway");
  393. !         putchar (')');
  394. !         conditional--;ifset--;
  395. !     }
  396.       printf (")");
  397.   }
  398.   
  399. --- 500,507 ----
  400.           putchar ('"');
  401.       while (open--)
  402.           putchar (')');
  403. !     if (conditional)
  404. !         die ("lhs");
  405.       printf (")");
  406.   }
  407.   
  408. ***************
  409. *** 610,620 ****
  410.                 quoting++;
  411.                 break;
  412.               case '|':
  413. !               if ( ! conditional) complain("right side of rule - found '$|' without '$?'");
  414.                 if ( ifset) {
  415.                 printf("\", \"");
  416.                 } else {
  417. !               complain("right side of rule - found '$|' without '$?'");
  418.                 putchar (',');
  419.                 }
  420.                 break;
  421. --- 598,608 ----
  422.                 quoting++;
  423.                 break;
  424.               case '|':
  425. !               if ( ! conditional) die("rhs - $| without $?");
  426.                 if ( ifset) {
  427.                 printf("\", \"");
  428.                 } else {
  429. !               fprintf(stderr,"Got $| when not in ifset\n");
  430.                 putchar (',');
  431.                 }
  432.                 break;
  433. ***************
  434. *** 622,628 ****
  435.                 if (ifset && quoting ) {
  436.                 putchar('"'); quoting--;
  437.                 }
  438. !               if (! ifset ) complain("right side of rule - found '$.' without '$?'");
  439.                 putchar (')');
  440.                 if (open) {
  441.                 putchar(')');
  442. --- 610,616 ----
  443.                 if (ifset && quoting ) {
  444.                 putchar('"'); quoting--;
  445.                 }
  446. !               if (! ifset ) fprintf(stderr,"Got $. while not in ifset\n");
  447.                 putchar (')');
  448.                 if (open) {
  449.                 putchar(')');
  450. ***************
  451. *** 704,710 ****
  452.                   printf ("${%s}", macro (*cp));
  453.                 else
  454.                   printf ("$%s", macro (*cp));
  455. !               } else { /* not in ifset() */
  456.                 if (quoting)
  457.                   printf ("${%s}", macro (*cp));
  458.                 else 
  459. --- 692,698 ----
  460.                   printf ("${%s}", macro (*cp));
  461.                 else
  462.                   printf ("$%s", macro (*cp));
  463. !               } else { /* not not in ifset() */
  464.                 if (quoting)
  465.                   printf ("${%s}", macro (*cp));
  466.                 else 
  467. ***************
  468. *** 760,770 ****
  469.   {
  470.       int quoting = 0;
  471.       int open = 0;
  472. -     int ifset = 0;
  473.       char *addrops;
  474.       addrops = ".:;%@!=/[]?#^,<>$"; /* should be defined from input file */
  475.       printf ("resolve (mailer (");
  476. !     /* this is a simple (idiotic) parser (hack) that scans the right
  477.          hand side of a $# rule
  478.          The format is usually
  479.          "$# mailer $@ host $: user" or
  480. --- 748,764 ----
  481.   {
  482.       int quoting = 0;
  483.       int open = 0;
  484.       char *addrops;
  485.       addrops = ".:;%@!=/[]?#^,<>$"; /* should be defined from input file */
  486.       printf ("resolve (mailer (");
  487. ! /*  if (strncmp (cp+1, "local", 5) == 0
  488. !     || strncmp (cp+1, "error", 5) == 0
  489. !     || strncmp (cp+1, "LOCAL", 5) == 0
  490. !     || strncmp (cp+1, "ERROR", 5) == 0)
  491. !     goto skiphost;
  492. ! loop1:
  493. ! */
  494. !     /* this is a simple parser that scans the right
  495.          hand side of a $# rule
  496.          The format is usually
  497.          "$# mailer $@ host $: user" or
  498. ***************
  499. *** 783,789 ****
  500.          */
  501.       /* pointing to '#' */
  502.       cp++;
  503. -     while( *cp == ' ') cp++; /* skip blanks */
  504.       /* output any character not a '$' */
  505.       while (cp && *cp && *cp != '$' ) {
  506.       /* skip spaces in the mailer field */
  507. --- 777,782 ----
  508. ***************
  509. *** 790,797 ****
  510.       if ( *cp != ' ' ) putchar(*cp); 
  511.       cp++;
  512.       }
  513. -   parsehost:
  514. -     while (cp && *cp && *cp == ' ') cp++;    /* advance to non-blank */
  515.       if (!cp || !*cp ) goto out;
  516.       /* currently pointing to a "$" */
  517.       /* we may now be pointing to:
  518. --- 783,788 ----
  519. ***************
  520. *** 800,832 ****
  521.          or a macro
  522.          or nothing?! (*cp == 0);
  523.          /* don't look at the '$' */
  524. !     if (*cp == '$') {
  525. !     cp++;    /* skip past $, expect a '@' */
  526. !     } else {
  527. !       fprintf(stderr,
  528. !           "Error: found %c when expecting a '$' on line %d\n",
  529. !           *cp,line);
  530. !     }
  531.       if (!cp || !*cp ) goto out;
  532.       if (*cp  == ':') goto parseuser;
  533. -     if (*cp == '?' ) {    /* handle $#$?G$@....$:...$|$@...$:...$. */
  534. -     cp++;
  535. -     printf ("),  ifset (%s,\n\t\t\t\t(", macro (*cp++));
  536. -     ifset++;
  537. -     while (cp && *cp && *cp == ' ') cp++;    /* advance to non-blank */
  538. -     if ( *cp == '$') {
  539. -         cp++;
  540. -     } else {
  541. -       fprintf(stderr,
  542. -           "Error: found %c when expecting a '$' on line %d\n",
  543. -           *cp,line);
  544. -     }
  545. -     }
  546.       if (*cp != '@' ) {
  547.       /* must be a macro name */
  548.       printf ("$%s",macro(*cp++));
  549.       /* now skip to the $@ */
  550. ! /*    if (!cp || !*cp ) goto out; */
  551.       while (cp && *cp && *cp == ' ') cp++;
  552.       if (!cp || !*cp ) goto out;
  553.       if (*cp == '$') cp++; 
  554. --- 791,804 ----
  555.          or a macro
  556.          or nothing?! (*cp == 0);
  557.          /* don't look at the '$' */
  558. !     cp++;
  559.       if (!cp || !*cp ) goto out;
  560.       if (*cp  == ':') goto parseuser;
  561.       if (*cp != '@' ) {
  562.       /* must be a macro name */
  563.       printf ("$%s",macro(*cp++));
  564.       /* now skip to the $@ */
  565. !     if (!cp || !*cp ) goto out;
  566.       while (cp && *cp && *cp == ' ') cp++;
  567.       if (!cp || !*cp ) goto out;
  568.       if (*cp == '$') cp++; 
  569. ***************
  570. *** 845,854 ****
  571.       cp++;
  572.       }
  573.       /* print host name ($@host ) */
  574. !     if (ifset)
  575. !       printf (" host (");
  576. !     else
  577. !       printf ("),\n\t\t\t\thost (");
  578.       for (;cp && *cp;cp++) {
  579.       if (*cp != '$') { 
  580.           putchar (*cp);
  581. --- 817,823 ----
  582.       cp++;
  583.       }
  584.       /* print host name ($@host ) */
  585. !     printf ("),\n\t\t\t\thost (");
  586.       for (;cp && *cp;cp++) {
  587.       if (*cp != '$') { 
  588.           putchar (*cp);
  589. ***************
  590. *** 905,911 ****
  591.       } else {    /* not quoting */
  592.           if ( *cp == '$' ) {
  593.           cp++;
  594. -         /* Could be $|, or $>, or $macro */
  595.           if (*cp == '>' ) { /* IDA sendmail */
  596.               cp++;
  597.               printf("retry (RULESET_");
  598. --- 874,879 ----
  599. ***************
  600. *** 912,941 ****
  601.               while (cp && *cp && *cp >= '0' && *cp <= '9') putchar(*cp++);
  602.               printf("("); open++;
  603.               open++;
  604. -         } else if ( *cp == '|') {
  605. -             /* This is the middle of an ifset */
  606. -             if ( ! ifset ) {
  607. -             fprintf(stderr,
  608. -                 "Found a '$|' in the user address without a '$?' on line %d\n",
  609. -                 *cp,line);
  610. -             cp++; /* ignore */
  611. -             } else { /* I expected this */
  612. -             printf(")),\n\t\t\t\t(");
  613. -             cp++;
  614. -             goto parsehost;
  615. -             }
  616. -         } else if ( *cp == '.') {
  617. -             /* This is the END of an ifset */
  618. -             if ( ! ifset ) {
  619. -             fprintf(stderr,
  620. -                 "Found a '$.' in the user address without a '$?' on line %d\n",
  621. -                 *cp,line);
  622. -             cp++; /* ignore */
  623. -             } else { /* I expected this */
  624. -             /* cp++; */ /* Don't do this, the for loop increments cp */
  625. -             printf("))");
  626. -             ifset = 0;
  627. -             }
  628.           } else {
  629.               putchar ('$'); /* print $ */
  630.               printf("%s",macro(*cp)); /* and macro */
  631. --- 880,885 ----
  632. ***************
  633. *** 952,963 ****
  634.       }
  635.       if (quoting) printf("\"");
  636.     out:
  637. -     if (ifset) {
  638. -     fprintf(stderr,
  639. -         "EOL while expecting '$.' on line  %d\n",
  640. -                 line);
  641. -     ifset = 0;
  642. -     }
  643.       while (open--) printf(")");
  644.       printf ("))");
  645.   } /* end parseresolve () */
  646. --- 896,901 ----
  647. ***************
  648. *** 1037,1043 ****
  649.                   if ( ifset) {
  650.                       printf("\", \"");
  651.                   } else {
  652. !                     complain("Got $| when not in ifset\n");
  653.                       putchar (',');
  654.                   }
  655.                   break;
  656. --- 975,981 ----
  657.                   if ( ifset) {
  658.                       printf("\", \"");
  659.                   } else {
  660. !                     fprintf(stderr,"Got $| when not in ifset\n");
  661.                       putchar (',');
  662.                   }
  663.                   break;
  664. ***************
  665. *** 1313,1323 ****
  666.       register char *cp = buffer + 1;
  667.       register int flags = 0;
  668.       register int conditional = 0;
  669. !     register int concat = 0;    /* true if in a concat( */
  670. !     register int needcomma = 0;    /* true if a concat is needed */
  671.       register int quote = 0;
  672. !     register int ifset = 0;        /* true if in a ifset 
  673. !                        (may be inside a concat) */
  674.   
  675.       printf ("header\n\t");
  676.       if (*cp == '?')        /* header for mailers  with these flags */
  677. --- 1251,1259 ----
  678.       register char *cp = buffer + 1;
  679.       register int flags = 0;
  680.       register int conditional = 0;
  681. !     register int concat = 0;
  682.       register int quote = 0;
  683. !     register int ifset = 0;
  684.   
  685.       printf ("header\n\t");
  686.       if (*cp == '?')        /* header for mailers  with these flags */
  687. ***************
  688. *** 1345,1354 ****
  689.       else if (cp && ! *cp ) printf("\", \"\"");
  690.       else if (!cp) {
  691.           printf("\"");
  692. !         complain("I didn't expect this!\n");
  693.       }
  694.   
  695. !     quote = concat = conditional = ifset = needcomma = 0;
  696.   body:
  697.       while (cp && *cp)
  698.       {
  699. --- 1281,1290 ----
  700.       else if (cp && ! *cp ) printf("\", \"\"");
  701.       else if (!cp) {
  702.           printf("\"");
  703. !         fprintf(stderr,"I didn't expect this!\n");
  704.       }
  705.   
  706. !     quote = concat = conditional = ifset = 0;
  707.   body:
  708.       while (cp && *cp)
  709.       {
  710. ***************
  711. *** 1356,1425 ****
  712.           case '$':
  713.               switch (*++cp) {
  714.               case '?':
  715. -                 /* if we are in the middle of a quote, end it */
  716. -                 if (quote) {
  717. -                 printf("\"");quote--;needcomma=1;
  718. -                 }
  719.                   /* if we are not in a concat, then start one */
  720.                   if ( ! concat ) {
  721. -                 if (needcomma) printf(", ");
  722.                   printf("concat (");
  723. !                 concat++;needcomma=0;
  724. !                 }  else { /* we are in a concat  */
  725. !                 if ( ifset ) { /* if in ifset(..) terminate */
  726. !                     printf("), concat ("); 
  727. !                     ifset--;needcomma=0;
  728. !                 } else {
  729. !                     /* otherwise - don't terminate the concat */
  730. !                     /* but add a comma to seperate the fields */
  731. !                     /* what do do if concat(X, */
  732. !                     /* if so, then don't put the comma */
  733. !                     /* instead - check needcomma */
  734. ! /*                    printf(", "); */
  735.                   }
  736.                   }
  737. !                 if ( ifset ) {
  738. !                 complain("found '$?' before terminating previous '$?' with a '$.'");
  739.                   }
  740. -                 if (needcomma) {
  741. -                 printf(", ");
  742. -                 needcomma=0;
  743. -                 }
  744.                   printf ("ifset (%s, \"", macro (*++cp));
  745.                   conditional++; quote++;ifset++;
  746.                   break;
  747.               case '|':
  748. !                 if (quote) {
  749. !                 putchar('"');quote--;
  750. !                 }
  751. !                 if ( ! conditional) complain("header - $| without $?");
  752. !                 if ( ifset) {
  753. !                 printf(", "); needcomma=0;
  754. !                 } else {
  755. !                 complain("Got '$|' without matching '$?'");
  756. !                 putchar (','); needcomma=0;
  757. !                 }
  758.                   break;
  759.               case '.':
  760.                   if (quote) {
  761.                   putchar('"');quote--;
  762.                   }
  763. -                 if (!ifset ) {
  764. -                 complain("found '$.' without matching '$?'");
  765. -                 }
  766.                   putchar (')');
  767.                   conditional--;ifset--;
  768.                   if (concat) {
  769.                   /* this is messy - There may be more than one $? on a line */
  770. -                 /* and the line may continue on to the next line. */
  771.   
  772. !                 if (*(cp+1)) { /* if there is more on the line */
  773. !                     putchar(')');concat--;
  774. !                     printf(", ");needcomma=0;
  775. !                 } else { 
  776. !                     /* may need to print a comma - delay decision */
  777. !                     /* see continuation line handler */
  778. !                     putchar(')');concat--;needcomma=1;
  779.                   }
  780.                   }
  781.                   break;
  782. --- 1292,1333 ----
  783.           case '$':
  784.               switch (*++cp) {
  785.               case '?':
  786.                   /* if we are not in a concat, then start one */
  787.                   if ( ! concat ) {
  788.                   printf("concat (");
  789. !                 concat++;
  790. !                 }  else { /* we are in one */
  791. !                 if (quote) {
  792. !                     printf("\"");quote--;
  793.                   }
  794. +                 printf("), concat (");
  795.                   }
  796. !                 if (quote) {
  797. !                 printf("\",");quote--;
  798.                   }
  799.                   printf ("ifset (%s, \"", macro (*++cp));
  800.                   conditional++; quote++;ifset++;
  801.                   break;
  802.               case '|':
  803. !                 if ( ! conditional) die("header - $| without $?");
  804. !                 if ( ifset) {
  805. !                     printf("\", \"");
  806. !                 } else {
  807. !                     fprintf(stderr,"Got $| when not in ifset\n");
  808. !                     putchar (',');
  809. !                 }
  810.                   break;
  811.               case '.':
  812.                   if (quote) {
  813.                   putchar('"');quote--;
  814.                   }
  815.                   putchar (')');
  816.                   conditional--;ifset--;
  817.                   if (concat) {
  818.                   /* this is messy - There may be more than one $? on a line */
  819.   
  820. !                 if (cp+1) { /* if there is more on the line */
  821. !                     printf(", ");
  822.                   }
  823.                   }
  824.                   break;
  825. ***************
  826. *** 1428,1439 ****
  827.                   if (!concat && (strlen(cp)>2) 
  828.                   && (*(cp+1) == '$')
  829.                   && (*(cp+2) == '?')) {
  830. -                 if ( quote) {
  831. -                     printf("\", ");
  832. -                     quote--;needcomma=0;
  833. -                 }
  834.                   printf ("concat (\"${%s}\", ", macro (*cp));
  835. !                 /* I'm in a concat */
  836.                   concat++;
  837.                   } else {
  838.                   if (!quote) {
  839. --- 1336,1343 ----
  840.                   if (!concat && (strlen(cp)>2) 
  841.                   && (*(cp+1) == '$')
  842.                   && (*(cp+2) == '?')) {
  843.                   printf ("concat (\"${%s}\", ", macro (*cp));
  844. !                 /* I'm gonna need a concat */
  845.                   concat++;
  846.                   } else {
  847.                   if (!quote) {
  848. ***************
  849. *** 1466,1479 ****
  850.           line++;
  851.           if (buffer[0] == '\t')
  852.           {
  853. -             if ( concat ) {
  854. -                 printf("), ");needcomma=0;
  855. -                 concat--;
  856. -             }
  857. -             if (needcomma) {
  858. -                 printf(", ");
  859. -                 needcomma=0;
  860. -             }
  861.               if ( ! quote ) {
  862.                   putchar('"');
  863.                   quote++;
  864. --- 1370,1375 ----
  865. ***************
  866. *** 1584,1597 ****
  867.               routine, line);
  868.       exit (1);
  869.   }
  870. - complain (problem)
  871. - char *problem;
  872. - {
  873. -     fprintf (stderr, "Warning: malformed input line %d: %s\n",
  874. -             line, problem);
  875. -     fflush(stderr);
  876. -     fflush(stdout);
  877. -     }
  878.   
  879.   /* macro --- return name for sendmail predefined macro */
  880.   
  881. --- 1480,1485 ----
  882. ***************
  883. *** 1684,1697 ****
  884.       case 'z':    /* The home directory of the recipient */
  885.           return ("m_rhdir");
  886.   
  887. !         case '"':    /* you can get a quote character in some macro definitions */
  888.           return ("\\\"");
  889.       default:
  890. -         if (!(isalpha(c) || isdigit(c))) /* if not a digit or letter */
  891. -           fprintf (stderr,
  892. -                "warning: expected letter as macro definition, found '%c' on line %d\n",
  893. -                c, line);
  894. - 
  895.           buf[0] = c;
  896.           return (buf);
  897.       }
  898. --- 1572,1580 ----
  899.       case 'z':    /* The home directory of the recipient */
  900.           return ("m_rhdir");
  901.   
  902. !         case '"':    /* you can get a quote charater in some macro definitions */
  903.           return ("\\\"");
  904.       default:
  905.           buf[0] = c;
  906.           return (buf);
  907.       }
  908. diff -r -c ./doc/Makefile ../3.2/doc/Makefile
  909. *** ./doc/Makefile    Thu Jun 27 10:48:17 1991
  910. --- ../3.2/doc/Makefile    Thu May 16 12:38:22 1991
  911. ***************
  912. *** 45,51 ****
  913.   install:
  914.       install -c ease.man $(MANDEST)/ease.${EXT}
  915.       install -c et.man $(MANDEST)/et.${EXT}
  916. !     install -c cfc.man $(MANDEST)/cfc.${EXT}
  917.   
  918.   printman: ease.man et.man cfc.man
  919.       ${ROFF} -man ease.man
  920. --- 45,51 ----
  921.   install:
  922.       install -c ease.man $(MANDEST)/ease.${EXT}
  923.       install -c et.man $(MANDEST)/et.${EXT}
  924. !     install -c cfc.man $(MANDEST)/cdc.${EXT}
  925.   
  926.   printman: ease.man et.man cfc.man
  927.       ${ROFF} -man ease.man
  928. diff -r -c ./doc/ap2 ../3.2/doc/ap2
  929. *** ./doc/ap2    Mon Sep  9 12:44:53 1991
  930. --- ../3.2/doc/ap2    Thu May 16 12:38:24 1991
  931. ***************
  932. *** 1,10 ****
  933.   ...
  934. ! ... $Header: /tmp_mnt/home/kreskin/u0/barnett/Src/Ease/ease/doc/RCS/ap2,v 3.3 1991/09/09 16:36:05 barnett Exp $
  935.   ... 
  936.   ... $Log: ap2,v $
  937. - ... Revision 3.3  1991/09/09  16:36:05  barnett
  938. - ... minor bug fixes
  939. - ...
  940.   ... Revision 2.1  1990/01/30  12:57:42  jeff
  941.   ... Made changes corresponding to Ease release 2.1Alpha.
  942.   ... se.
  943. --- 1,7 ----
  944.   ...
  945. ! ... $Header: /home/kreskin/u0/barnett/Src/ease/doc/RCS/ap2,v 2.1 1990/01/30 12:57:42 jeff Exp barnett $
  946.   ... 
  947.   ... $Log: ap2,v $
  948.   ... Revision 2.1  1990/01/30  12:57:42  jeff
  949.   ... Made changes corresponding to Ease release 2.1Alpha.
  950.   ... se.
  951. diff -r -c ./doc/cfc.man ../3.2/doc/cfc.man
  952. *** ./doc/cfc.man    Mon Sep  9 12:44:51 1991
  953. --- ../3.2/doc/cfc.man    Thu May 16 12:38:23 1991
  954. ***************
  955. *** 1,10 ****
  956.   ...
  957. ! ... $Header: /tmp_mnt/home/kreskin/u0/barnett/Src/Ease/ease/doc/RCS/cfc.man,v 3.3 1991/09/09 16:36:05 barnett Exp $
  958.   ... 
  959.   ... $Log: cfc.man,v $
  960. - ... Revision 3.3  1991/09/09  16:36:05  barnett
  961. - ... minor bug fixes
  962. - ...
  963.   ... Revision 1.2  1990/04/04  15:42:51  jeff
  964.   ... Reformatted somewhat for readability.  Added some bugs
  965.   ... described by Bruce Barnett.
  966. --- 1,7 ----
  967.   ...
  968. ! ... $Header: /home/kreskin/u0/barnett/Src/Ease/ease/doc/RCS/cfc.man,v 1.2 1990/04/04 15:42:51 jeff Exp barnett $
  969.   ... 
  970.   ... $Log: cfc.man,v $
  971.   ... Revision 1.2  1990/04/04  15:42:51  jeff
  972.   ... Reformatted somewhat for readability.  Added some bugs
  973.   ... described by Bruce Barnett.
  974. diff -r -c ./doc/cover ../3.2/doc/cover
  975. *** ./doc/cover    Mon Sep  9 12:44:51 1991
  976. --- ../3.2/doc/cover    Thu May 16 12:38:25 1991
  977. ***************
  978. *** 1,10 ****
  979.   ...
  980. ! ... $Header: /tmp_mnt/home/kreskin/u0/barnett/Src/Ease/ease/doc/RCS/cover,v 3.3 1991/09/09 16:36:05 barnett Exp $
  981.   ...
  982.   ... $Log: cover,v $
  983. - ... Revision 3.3  1991/09/09  16:36:05  barnett
  984. - ... minor bug fixes
  985. - ...
  986.   ... Revision 2.0  1990/01/30  12:50:41  jeff
  987.   ... Baseline version, corresponding to netwide release 2.0.
  988.   ...
  989. --- 1,7 ----
  990.   ...
  991. ! ... $Header: /home/kreskin/u0/barnett/Src/Ease/ease/doc/RCS/cover,v 2.0 1990/01/30 12:50:41 jeff Exp barnett $
  992.   ...
  993.   ... $Log: cover,v $
  994.   ... Revision 2.0  1990/01/30  12:50:41  jeff
  995.   ... Baseline version, corresponding to netwide release 2.0.
  996.   ...
  997. diff -r -c ./doc/ease.paper ../3.2/doc/ease.paper
  998. *** ./doc/ease.paper    Mon Sep  9 12:44:52 1991
  999. --- ../3.2/doc/ease.paper    Thu May 16 12:38:27 1991
  1000. ***************
  1001. *** 1,10 ****
  1002.   ...
  1003. ! ... $Header: /tmp_mnt/home/kreskin/u0/barnett/Src/Ease/ease/doc/RCS/ease.paper,v 3.3 1991/09/09 16:36:05 barnett Exp $
  1004.   ... 
  1005.   ... $Log: ease.paper,v $
  1006. - ... Revision 3.3  1991/09/09  16:36:05  barnett
  1007. - ... minor bug fixes
  1008. - ...
  1009.   ... Revision 2.0  1990/01/30  12:50:44  jeff
  1010.   ... Baseline version, corresponding to netwide release 2.0.
  1011.   ...
  1012. --- 1,7 ----
  1013.   ...
  1014. ! ... $Header: /home/kreskin/u0/barnett/Src/Ease/ease/doc/RCS/ease.paper,v 2.0 1990/01/30 12:50:44 jeff Exp barnett $
  1015.   ... 
  1016.   ... $Log: ease.paper,v $
  1017.   ... Revision 2.0  1990/01/30  12:50:44  jeff
  1018.   ... Baseline version, corresponding to netwide release 2.0.
  1019.   ...
  1020. diff -r -c ./src/Makefile ../3.2/src/Makefile
  1021. *** ./src/Makefile    Mon Sep  9 12:44:34 1991
  1022. --- ../3.2/src/Makefile    Thu May 16 12:43:14 1991
  1023. ***************
  1024. *** 1,11 ****
  1025.   # Makefile for Ease Translator (et).
  1026.   #
  1027. ! #    $Header: /tmp_mnt/home/kreskin/u0/barnett/Src/Ease/ease/src/RCS/Makefile,v 3.3 1991/09/09 16:33:23 barnett Exp $
  1028.   #
  1029.   #    $Log: Makefile,v $
  1030. - # Revision 3.3  1991/09/09  16:33:23  barnett
  1031. - # Minor bug fix release
  1032. - #
  1033.   # Revision 3.2  1991/05/16  10:45:25  barnett
  1034.   # Better support for System V machines
  1035.   # Support for machines with read only text segments
  1036. --- 1,8 ----
  1037.   # Makefile for Ease Translator (et).
  1038.   #
  1039. ! #    $Header: /home/kreskin/u0/barnett/Src/ease/src/RCS/Makefile,v 3.2 1991/05/16 10:45:25 barnett Exp $
  1040.   #
  1041.   #    $Log: Makefile,v $
  1042.   # Revision 3.2  1991/05/16  10:45:25  barnett
  1043.   # Better support for System V machines
  1044.   # Support for machines with read only text segments
  1045. ***************
  1046. *** 43,49 ****
  1047.   #             - A sun 3/60 using gcc
  1048.   #         - A esix SysV PC  with gcc
  1049.   #                - A HP9000/845 with cc
  1050. - #         - Apollo/Domain with BSD4.3 environment
  1051.   #           The default is to define it, because this is what earlier versions 
  1052.   #           of Ease did.
  1053.   #
  1054. --- 40,45 ----
  1055. ***************
  1056. *** 56,62 ****
  1057.    
  1058.   DEFS = ${OFLAGS}
  1059.   LIBS = -ll
  1060. - # some people must remove the -O
  1061.   CFLAGS = -O ${DEFS} ${INCLUDE}
  1062.   CC = cc
  1063.   #CC = gcc
  1064. --- 52,57 ----
  1065. ***************
  1066. *** 74,83 ****
  1067.   # Special Debug flags
  1068.   # select this one to debug the grammar
  1069.   #DEFS =-DYYDEBUG
  1070. ! # The following two lines are used with the SunOS malloc() debug package.
  1071.   #DEFS = -DMALLOC_DEBUG    #  Part of the SunOS malloc package
  1072.   #LIBS = /usr/lib/debug/malloc.o -ll
  1073. ! CFLAGS = -g  ${DEFS} ${INCLUDE}
  1074.   
  1075.   
  1076.   HDR = symtab.h
  1077. --- 69,78 ----
  1078.   # Special Debug flags
  1079.   # select this one to debug the grammar
  1080.   #DEFS =-DYYDEBUG
  1081. ! # The following are used with the SunOS malloc() debug package.
  1082.   #DEFS = -DMALLOC_DEBUG    #  Part of the SunOS malloc package
  1083.   #LIBS = /usr/lib/debug/malloc.o -ll
  1084. ! #CFLAGS = -g  ${DEFS} ${INCLUDE}
  1085.   
  1086.   
  1087.   HDR = symtab.h
  1088. diff -r -c ./src/errors.c ../3.2/src/errors.c
  1089. *** ./src/errors.c    Mon Sep  9 12:44:35 1991
  1090. --- ../3.2/src/errors.c    Thu May 16 12:43:16 1991
  1091. ***************
  1092. *** 1,6 ****
  1093.   #ifdef FLUKE
  1094.   # ifndef LINT
  1095. !     static char RCSid[] = "@(#)FLUKE  $Header: /tmp_mnt/home/kreskin/u0/barnett/Src/Ease/ease/src/RCS/errors.c,v 2.3 1991/09/09 16:33:23 barnett Exp $";
  1096.   # endif LINT
  1097.   #endif FLUKE
  1098.   
  1099. --- 1,6 ----
  1100.   #ifdef FLUKE
  1101.   # ifndef LINT
  1102. !     static char RCSid[] = "@(#)FLUKE  $Header: /home/kreskin/u0/barnett/Src/ease/src/RCS/errors.c,v 2.2 1991/05/16 10:45:25 barnett Exp $";
  1103.   # endif LINT
  1104.   #endif FLUKE
  1105.   
  1106. ***************
  1107. *** 17,25 ****
  1108.    *    All rights reserved.
  1109.    *
  1110.    * $Log: errors.c,v $
  1111. -  * Revision 2.3  1991/09/09  16:33:23  barnett
  1112. -  * Minor bug fix release
  1113. -  *
  1114.    * Revision 2.2  1991/05/16  10:45:25  barnett
  1115.    * Better support for System V machines
  1116.    * Support for machines with read only text segments
  1117. --- 17,22 ----
  1118. ***************
  1119. *** 91,98 ****
  1120.       if (colon)
  1121.         fputs(": ",DIAGf);
  1122.       fflush(DIAGf);
  1123. -     fflush(stdout);
  1124. -     fflush(stderr); /* just to make sure */
  1125.   }
  1126.   
  1127.   
  1128. --- 88,93 ----
  1129. diff -r -c ./src/idman.c ../3.2/src/idman.c
  1130. *** ./src/idman.c    Fri Sep  6 14:20:15 1991
  1131. --- ../3.2/src/idman.c    Thu May 16 12:38:31 1991
  1132. ***************
  1133. *** 1,6 ****
  1134.   #ifdef FLUKE
  1135.   # ifndef LINT
  1136. !     static char RCSid[] = "@(#)FLUKE  $Header: /home/kreskin/u0/barnett/Src/Ease/ease/src/RCS/idman.c,v 3.1 1991/02/25 22:09:52 barnett Exp barnett $";
  1137.   # endif LINT
  1138.   #endif FLUKE
  1139.   
  1140. --- 1,6 ----
  1141.   #ifdef FLUKE
  1142.   # ifndef LINT
  1143. !     static char RCSid[] = "@(#)FLUKE  $Header: /home/kreskin/u0/barnett/Src/Ease/ease/src/RCS/idman.c,v 3.1 1991/02/25 22:09:52 barnett Exp $";
  1144.   # endif LINT
  1145.   #endif FLUKE
  1146.   
  1147. diff -r -c ./src/parser.y ../3.2/src/parser.y
  1148. *** ./src/parser.y    Mon Sep  9 12:44:40 1991
  1149. --- ../3.2/src/parser.y    Thu May 16 12:43:15 1991
  1150. ***************
  1151. *** 1,7 ****
  1152.   %{
  1153.   #ifdef FLUKE
  1154.   # ifndef LINT
  1155. !     static char RCSid[] = "@(#)FLUKE  $Header: /tmp_mnt/home/kreskin/u0/barnett/Src/Ease/ease/src/RCS/parser.y,v 3.3 1991/09/09 16:33:23 barnett Exp $";
  1156.   # endif LINT
  1157.   #endif FLUKE
  1158.   
  1159. --- 1,7 ----
  1160.   %{
  1161.   #ifdef FLUKE
  1162.   # ifndef LINT
  1163. !     static char RCSid[] = "@(#)FLUKE  $Header: /home/kreskin/u0/barnett/Src/ease/src/RCS/parser.y,v 3.2 1991/05/16 10:45:25 barnett Exp $";
  1164.   # endif LINT
  1165.   #endif FLUKE
  1166.   
  1167. ***************
  1168. *** 22,30 ****
  1169.    *    All rights reserved.
  1170.    *
  1171.    * $Log: parser.y,v $
  1172. -  * Revision 3.3  1991/09/09  16:33:23  barnett
  1173. -  * Minor bug fix release
  1174. -  *
  1175.    * Revision 3.2  1991/05/16  10:45:25  barnett
  1176.    * Better support for System V machines
  1177.    * Support for machines with read only text segments
  1178. --- 22,27 ----
  1179. ***************
  1180. *** 72,77 ****
  1181. --- 69,75 ----
  1182.   extern void       FatalError ();
  1183.   extern short RMatch;        /* ruleset match flag               */
  1184.   
  1185. + extern char *strdup(); 
  1186.   #ifdef DATA_RW
  1187.   char *Cbuf = " ";        /* character buffer                 */
  1188.   char *Mbuf = "$ ";        /* macro buffer                        */
  1189. ***************
  1190. *** 78,84 ****
  1191.   #else
  1192.   char *Cbuf = NULL;
  1193.   char *Mbuf = NULL;
  1194. - extern char *Strdup(); 
  1195.   #endif
  1196.   char *Tsb;            /* pointer to temporary string buffer */
  1197.   char *Tsb1;            /* pointer to another temporary string buffer */
  1198. --- 76,81 ----
  1199. ***************
  1200. *** 91,97 ****
  1201.   #ifndef    DATA_RW
  1202.   void InitParser()
  1203.   {
  1204. !     if(!(Cbuf = Strdup(" ")) || !(Mbuf = Strdup("$ ")))
  1205.           FatalError("Out of memory in InitParser()", (char *)NULL);
  1206.   }
  1207.   #endif
  1208. --- 88,94 ----
  1209.   #ifndef    DATA_RW
  1210.   void InitParser()
  1211.   {
  1212. !     if(!(Cbuf = strdup(" ")) || !(Mbuf = strdup("$ ")))
  1213.           FatalError("Out of memory in InitParser()", (char *)NULL);
  1214.   }
  1215.   #endif
  1216. ***************
  1217. *** 107,113 ****
  1218.             fprintf(stderr,"Free() returned an error\n");
  1219.         }
  1220.         }
  1221. -       fflush(stderr);
  1222.     };
  1223.   static char *
  1224.   yydisplay(ch)
  1225. --- 104,109 ----
  1226. ***************
  1227. *** 162,168 ****
  1228.       if (yydebug)
  1229.           printf("[yydebug] reading %s\n",
  1230.               yydisplay(yychar));
  1231. -         fflush(stdout);
  1232.   #endif
  1233.           return yychar;
  1234.       }
  1235. --- 158,163 ----
  1236. ***************
  1237. *** 218,227 ****
  1238.   %type    <optval>    optid
  1239.   %type    <flgval>    flagid
  1240.   %type    <mpval>        mvar
  1241. - %type    <psb>        ifresmatch elseresmatch ifresroute elseresroute 
  1242. - /* needed special class with no comma's allowed */
  1243. - %type    <ival>        anycharbutcomma
  1244. - %type    <psb>        matchaddrnocomma matchtoknocomma
  1245.   
  1246.   %left COMMA
  1247.   %left LPAREN RPAREN
  1248. --- 213,218 ----
  1249. ***************
  1250. *** 849,867 ****
  1251.               }
  1252.           ;
  1253.   
  1254. - /* just like matchaddr - but comma's aren't allowed */
  1255. - matchaddrnocomma    :    /* empty */ {
  1256. -                 $$ = NULL;
  1257. -             }
  1258. -         |    matchaddrnocomma matchtoknocomma {
  1259. -                 $$ = ListAppend ($1, $2, (char *) NULL);
  1260. -                 Free ($1); /* NULL */
  1261. -             }
  1262. -         |    error {
  1263. -                 $$ = NULL;
  1264. -             }
  1265. -         ;
  1266. - 
  1267.   matchtok    :    IDENT {
  1268.                   $$ = GetField ($1);
  1269.               }
  1270. --- 840,845 ----
  1271. ***************
  1272. *** 886,945 ****
  1273.                   |       RESOLVED LPAREN matchtok RPAREN {
  1274.                    $$ = ListAppend("$#",$3,(char *) NULL);
  1275.           }
  1276. -         |    IFSET LPAREN IDENT COMMA ifresmatch RPAREN {
  1277. -                 $$ = MakeCond ($3, MacScan($5));
  1278. -             }
  1279.       ;
  1280.   
  1281. - /* the next one is just like matchtok - but you can't have a comma in it */
  1282. - matchtoknocomma    :    IDENT {
  1283. -                 $$ = GetField ($1);
  1284. -             }
  1285. -         |    anycharbutcomma {
  1286. -                 *Cbuf = $1;
  1287. -                 $$ = ListAppend (Cbuf, (char *) NULL, (char *) NULL);
  1288. -             }
  1289. -         |    mval {
  1290. -                 $$ = MacScan ($1);
  1291. -             }
  1292. -         |    DOLLAR IDENT {
  1293. -                 Mbuf[1] = MakeMac ($2, ID_MACRO);
  1294. -                 $$ = ListAppend (Mbuf, (char *) NULL, (char *) NULL);
  1295. -             }
  1296. -                 |       YPALIAS LPAREN matchtok RPAREN {
  1297. -                  $$ = ListAppend("${",$3,(char *) NULL);
  1298. - /*             Free ($3); */
  1299. -         }
  1300. -                 |       YPPASSWD LPAREN matchtok RPAREN {
  1301. -                  $$ = ListAppend("$\"",$3,(char *) NULL);
  1302. -         }
  1303. -                 |       RESOLVED LPAREN matchtok RPAREN {
  1304. -                  $$ = ListAppend("$#",$3,(char *) NULL);
  1305. -         }
  1306. -         |    IFSET LPAREN IDENT COMMA ifresmatch RPAREN {
  1307. -                 $$ = MakeCond ($3, MacScan($5));
  1308. -             }
  1309. -     ;
  1310. - 
  1311. - ifresmatch    :    matchaddrnocomma elseresmatch {
  1312. -                 if ($2 != NULL) {
  1313. -                     $$ = ListAppend ($1, $2, "$|");
  1314. -                     Free ($1);
  1315. -                     Free ($2);
  1316. -                 } else
  1317. -                     $$ = $1;
  1318. -             }
  1319. -         |    error {
  1320. -                 $$ = NULL;
  1321. -             }
  1322. -         ;
  1323. - 
  1324. - elseresmatch    :
  1325. -             COMMA matchaddrnocomma {
  1326. -                 $$ = $2;
  1327. -             }
  1328. -         ;
  1329. - 
  1330.   actionstmt    :    action LPAREN rwaddr RPAREN SEMI {
  1331.                   $$ = ListAppend ($1, $3, (char *) NULL);
  1332.                   Free ($3);
  1333. --- 864,871 ----
  1334. ***************
  1335. *** 1160,1180 ****
  1336.               }
  1337.           ;
  1338.   
  1339. ! 
  1340. ! /* because of ifset, we have to treat comma's special
  1341. !  otherwise ifset(a,b,c) might be ambiguous if
  1342. !  c is an address with a comma in it.
  1343. ! */
  1344. ! anychar        :    anycharbutcomma {
  1345. !                   $$ = $1;
  1346. !         }
  1347. !           |    COMMA {
  1348. !                 $$ = ',';
  1349. !             }
  1350. ! 
  1351. !         ;
  1352. ! 
  1353. ! anycharbutcomma        :    SEPCHAR {
  1354.                   $$ = $1;
  1355.               }
  1356.           |    COLON {
  1357. --- 1086,1092 ----
  1358.               }
  1359.           ;
  1360.   
  1361. ! anychar        :    SEPCHAR {
  1362.                   $$ = $1;
  1363.               }
  1364.           |    COLON {
  1365. ***************
  1366. *** 1192,1197 ****
  1367. --- 1104,1112 ----
  1368.           |    RBRACE {
  1369.                   $$ = '}';
  1370.               }
  1371. +         |    COMMA {
  1372. +                 $$ = ',';
  1373. +             }
  1374.           |    SLASH {
  1375.                   $$ = '/';
  1376.               }
  1377. ***************
  1378. *** 1228,1255 ****
  1379.               }
  1380.           |    userspec {
  1381.                   $$ = $1;
  1382. -             }
  1383. -         |    IFSET LPAREN IDENT COMMA ifresroute RPAREN {
  1384. -                 $$ = MakeCond ($3, MacScan($5));
  1385. -             }
  1386. -         ;
  1387. - 
  1388. - ifresroute        :    LPAREN route RPAREN  elseresroute {
  1389. -                 if ($4 != NULL) {
  1390. -                     $$ = ListAppend ($2, $4, "$|");
  1391. -                     Free ($2);
  1392. -                     Free ($4);
  1393. -                 } else
  1394. -                     $$ = $2;
  1395. -             }
  1396. -         |    error {
  1397. -                 $$ = NULL;
  1398. -             }
  1399. -         ;
  1400. - 
  1401. - elseresroute    :
  1402. -             COMMA LPAREN route RPAREN {
  1403. -                 $$ = $3;
  1404.               }
  1405.           ;
  1406.   
  1407. --- 1143,1148 ----
  1408. diff -r -c ./src/strops.c ../3.2/src/strops.c
  1409. *** ./src/strops.c    Mon Sep  9 12:44:40 1991
  1410. --- ../3.2/src/strops.c    Thu May 16 12:43:21 1991
  1411. ***************
  1412. *** 1,6 ****
  1413.   #ifdef FLUKE
  1414.   # ifndef LINT
  1415. !     static char RCSid[] = "@(#)FLUKE  $Header: /tmp_mnt/home/kreskin/u0/barnett/Src/Ease/ease/src/RCS/strops.c,v 3.3 1991/09/09 16:33:23 barnett Exp $";
  1416.   # endif LINT
  1417.   #endif FLUKE
  1418.   
  1419. --- 1,6 ----
  1420.   #ifdef FLUKE
  1421.   # ifndef LINT
  1422. !     static char RCSid[] = "@(#)FLUKE  $Header: /home/kreskin/u0/barnett/Src/ease/src/RCS/strops.c,v 3.2 1991/05/16 10:45:25 barnett Exp $";
  1423.   # endif LINT
  1424.   #endif FLUKE
  1425.   
  1426. ***************
  1427. *** 18,26 ****
  1428.    *    All rights reserved.
  1429.    *
  1430.    * $Log: strops.c,v $
  1431. -  * Revision 3.3  1991/09/09  16:33:23  barnett
  1432. -  * Minor bug fix release
  1433. -  *
  1434.    * Revision 3.2  1991/05/16  10:45:25  barnett
  1435.    * Better support for System V machines
  1436.    * Support for machines with read only text segments
  1437. --- 18,23 ----
  1438. ***************
  1439. *** 93,99 ****
  1440.   char    *string;
  1441.   {
  1442.       char *s;
  1443. !     s=malloc(strlen(string));
  1444.       if (!s) return (nil);
  1445.       (void) sprintf(s,"%s",string);
  1446.       return (s);
  1447. --- 90,96 ----
  1448.   char    *string;
  1449.   {
  1450.       char *s;
  1451. !     s=malloc(length(string));
  1452.       if (!s) return (nil);
  1453.       (void) sprintf(s,"%s",string);
  1454.       return (s);
  1455. diff -r -c ./src/symtab.c ../3.2/src/symtab.c
  1456. *** ./src/symtab.c    Mon Sep  9 12:44:41 1991
  1457. --- ../3.2/src/symtab.c    Thu May 16 12:38:33 1991
  1458. ***************
  1459. *** 1,6 ****
  1460.   #ifdef FLUKE
  1461.   # ifndef LINT
  1462. !     static char RCSid[] = "@(#)FLUKE  $Header: /tmp_mnt/home/kreskin/u0/barnett/Src/Ease/ease/src/RCS/symtab.c,v 3.1 1991/09/09 16:33:23 barnett Exp $";
  1463.   # endif LINT
  1464.   #endif FLUKE
  1465.   
  1466. --- 1,6 ----
  1467.   #ifdef FLUKE
  1468.   # ifndef LINT
  1469. !     static char RCSid[] = "@(#)FLUKE  $Header: /tmp_mnt/home/kreskin/u0/barnett/Src/Ease/ease/src/RCS/symtab.c,v 3.0 1991/02/22 18:50:27 barnett Exp $";
  1470.   # endif LINT
  1471.   #endif FLUKE
  1472.   
  1473. ***************
  1474. *** 17,25 ****
  1475.    *    All rights reserved.
  1476.    *
  1477.    * $Log: symtab.c,v $
  1478. -  * Revision 3.1  1991/09/09  16:33:23  barnett
  1479. -  * Minor bug fix release
  1480. -  *
  1481.    * Revision 3.0  1991/02/22  18:50:27  barnett
  1482.    * Added support for HP/UX and IDA sendmail.
  1483.    *
  1484. --- 17,22 ----
  1485. ***************
  1486. *** 36,42 ****
  1487.   #include "symtab.h"
  1488.   
  1489.   #define ERRORMAILER "error"        /* predefined error mailer name */
  1490. - #define ERRORMAILERUC "ERROR"        /* predefined ERROR mailer name */
  1491.   
  1492.   extern void FatalError (),
  1493.           PrintWarning ();
  1494. --- 33,38 ----
  1495. ***************
  1496. *** 117,123 ****
  1497.                       !ISCLASS(hcsearch->idd))
  1498.   #endif
  1499.                       PrintWarning ("Class not defined: %s\n", hcsearch->psb);
  1500. !                 if (ISMAILER(hcsearch->idtype) && !ISMAILER(hcsearch->idd) && (strcmp(hcsearch->psb,"LOCAL")))
  1501.                       PrintWarning ("Mailer not defined: %s\n", hcsearch->psb);
  1502.                   if (ISRULESET(hcsearch->idtype) && !ISRULESET(hcsearch->idd))
  1503.                       PrintWarning ("Ruleset not defined: %s\n", hcsearch->psb);
  1504. --- 113,119 ----
  1505.                       !ISCLASS(hcsearch->idd))
  1506.   #endif
  1507.                       PrintWarning ("Class not defined: %s\n", hcsearch->psb);
  1508. !                 if (ISMAILER(hcsearch->idtype) && !ISMAILER(hcsearch->idd))
  1509.                       PrintWarning ("Mailer not defined: %s\n", hcsearch->psb);
  1510.                   if (ISRULESET(hcsearch->idtype) && !ISRULESET(hcsearch->idd))
  1511.                       PrintWarning ("Ruleset not defined: %s\n", hcsearch->psb);
  1512. ***************
  1513. *** 168,178 ****
  1514.   
  1515.       /* preload error mailer declaration */
  1516.       symptr = LookupSymbol (ERRORMAILER);
  1517. -     symptr->idtype |= ID_MAILER;
  1518. -     symptr->idd |= ID_MAILER;
  1519. - 
  1520. -     /* preload ERROR mailer declaration */
  1521. -     symptr = LookupSymbol (ERRORMAILERUC);
  1522.       symptr->idtype |= ID_MAILER;
  1523.       symptr->idd |= ID_MAILER;
  1524.   }
  1525. --- 164,169 ----
  1526. --
  1527. Bruce G. Barnett    barnett@crdgw1.ge.com    uunet!crdgw1!barnett
  1528.