ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/Development/ray/src/common/rexpr.c
(Generate patch)

Comparing ray/src/common/rexpr.c (file contents):
Revision 1.3 by greg, Thu Sep 5 15:03:48 1991 UTC vs.
Revision 2.10 by greg, Sat Dec 28 18:05:14 2019 UTC

# Line 1 | Line 1
1 – /* Copyright (c) 1990 Regents of the University of California */
2 –
1   #ifndef lint
2 < static char SCCSid[] = "$SunId$ LBL";
2 > static const char       RCSid[] = "$Id$";
3   #endif
4 + /*
5 + * Regular expression parsing routines.
6 + *
7 + * External symbols declared in standard.h
8 + */
9  
10 < #include <stdio.h>
10 > #include "copyright.h"
11 >
12 > #include <stdlib.h>
13   #include <ctype.h>
14 +
15 + #include "rtio.h"
16 +
17   /*
18   * rexpr.c - regular expression parser (ala grep)
19   */
# Line 24 | Line 32 | static char SCCSid[] = "$SunId$ LBL";
32  
33   #define same(a,b) (a==b || (iflag && (a^b)==' ' && isalpha(a)))
34  
27 – #ifdef  BSD
28 – #define  memcpy(to,from,len)    bcopy(from,to,len)
29 – #endif
35  
36 + static int     advance(char *, char *);
37 + static int     cclass(char *, int c, int af);
38 +
39   static char    expbuf[ESIZE];
40   static int     iflag;
41   static int     circf;
# Line 39 | Line 47 | ecompile(sp, iflg, wflag)               /* compile the
47   register char  *sp;
48   int iflg, wflag;
49   {
50 <        register c;
50 >        register int c;
51          register char *ep;
52 <        char *lastep;
52 >        char *lastep = NULL;
53          int cclcnt;
54          
55          iflag = iflg;
# Line 105 | Line 113 | int iflg, wflag;
113                          if ((c = *sp++) == '\0')
114                                  return(-1);
115                          if (c == '<') {
116 <                                *ep++ = CBRC;
116 >                                if (ep == expbuf || ep[-1] != CBRC)
117 >                                        *ep++ = CBRC;
118                                  continue;
119                          }
120                          if (c == '>') {
# Line 123 | Line 132 | int iflg, wflag;
132   char *
133   expsave()                     /* save compiled string */
134   {
126 –        extern char  *malloc();
135          register char  *ep;
136  
137          if (explen == 0)
138                  return(NULL);
139 <        if ((ep = malloc(explen+3)) == NULL)
139 >        if ((ep = (char *)malloc(explen+3)) == NULL)
140                  return(NULL);
141          ep[0] = iflag;
142          ep[1] = circf;
# Line 137 | Line 145 | expsave()                    /* save compiled string */
145          return(ep);
146   }
147  
148 + void
149   expset(ep)                      /* install saved string */
150   register char  *ep;
151   {
# Line 146 | Line 155 | register char  *ep;
155   }
156  
157   char *
158 < eindex(sp)                    /* find the expression in str */
158 > eindex(sp)                    /* find the expression in string sp */
159   register char *sp;
160   {
161 <        if (circf) {
162 <                if (advance(sp, expbuf))
163 <                        return(sp);
161 >        /* check for match at beginning of line, watch CBRC */
162 >        if (advance(sp, expbuf[0]==CBRC ? expbuf+1 : expbuf))
163 >                return(sp);
164 >        if (circf)
165                  return(NULL);
156 –        }
166          /* fast check for first character */
167          if (expbuf[0]==CCHR) {
168 <                register c = expbuf[1];
169 <                do {
168 >                register int c = expbuf[1];
169 >                while (*++sp)
170                          if (same(*sp, c) && advance(sp, expbuf))
171                                  return(sp);
163 –                } while (*sp++);
172                  return(NULL);
173          }
174          /* regular algorithm */
175 <        do {
175 >        while (*++sp)
176                  if (advance(sp, expbuf))
177                          return(sp);
170 –        } while (*sp++);
178          return(NULL);
179   }
180  
# Line 245 | Line 252 | register char *ep;
252                  return(0);
253  
254          case CBRC:
248 –                if (lp == alp)
249 –                        continue;
255                  if ((isalnum(*lp) || *lp == '_') && !(isalnum(lp[-1]) || lp[-1] == '_'))
256                          continue;
257                  return (0);
# Line 264 | Line 269 | register char *ep;
269   static int
270   cclass(set, c, af)
271   register char *set;
272 < register c;
272 > register int c;
273 > int af;
274   {
275 <        register n;
275 >        register int n;
276  
277          if (c == 0)
278                  return(0);

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines