Return to rcskeys.c CVS log

Up to [CSRG BSD Unix] / 43BSDTahoe / new / rcs / src

Annotation of 43BSDTahoe/new/rcs/src/rcskeys.c, revision 1.1.1.1

1.1       root        1: /*
                      2:  *                     RCS keyword table and match operation
                      3:  */
                      4: #ifndef lint
                      5: static char rcsid[]= "$Id: rcskeys.c,v 4.2 87/10/18 10:36:33 narten Exp $ Purdue CS";
                      6: #endif
                      7: /**********************************************************************************
                      8:  **********************************************************************************
                      9:  *
                     10:  * Copyright (C) 1982 by Walter F. Tichy
                     11:  *                       Purdue University
                     12:  *                       Computer Science Department
                     13:  *                       West Lafayette, IN 47907
                     14:  *
                     15:  * All rights reserved. No part of this software may be sold or distributed
                     16:  * in any form or by any means without the prior written permission of the
                     17:  * author.
                     18:  * Report problems and direct all inquiries to Tichy@purdue (ARPA net).
                     19:  */
                     20: 
                     21: 
                     22: /* $Log:       rcskeys.c,v $
                     23:  * Revision 4.2  87/10/18  10:36:33  narten
                     24:  * Updating version numbers. Changes relative to 1.1 actuallyt
                     25:  * relative to 4.1
                     26:  * 
                     27:  * Revision 1.2  87/09/24  14:00:10  narten
                     28:  * Sources now pass through lint (if you ignore printf/sprintf/fprintf 
                     29:  * warnings)
                     30:  * 
                     31:  * Revision 1.1  84/01/23  14:50:32  kcs
                     32:  * Initial revision
                     33:  * 
                     34:  * Revision 4.1  83/05/04  10:06:53  wft
                     35:  * Initial revision.
                     36:  * 
                     37:  */
                     38: 
                     39: 
                     40: #include "rcsbase.h"
                     41: 
                     42: 
                     43: 
                     44: struct { char * keyword; enum markers marker;} markertable[] =
                     45:         {{AUTHOR,   Author  },
                     46:          {DATE,     Date    },
                     47:          {HEADER,   Header  },
                     48:          {IDH,      Id      },
                     49:          {LOCKER,   Locker  },
                     50:          {LOG,      Log     },
                     51:          {RCSFILE,  RCSfile },
                     52:          {REVISION, Revision},
                     53:          {SOURCE,   Source  },
                     54:          {STATE,    State   },
                     55:          {nil,      Nomatch }};
                     56: 
                     57: 
                     58: 
                     59: enum markers trymatch(string,onlyvdelim)
                     60: char * string;
                     61: /* function: Checks whether string starts with a keyword followed
                     62:  * by a KDELIM or a VDELIM. If onlyvdelim==true, only a VDELIM
                     63:  * may follow the keyword.
                     64:  * If successful, returns the appropriate marker, otherwise Nomatch.
                     65:  */
                     66: {
                     67:         register int j;
                     68:        register char * p, * s;
                     69:         for (j=0; markertable[j].keyword!=nil; j++ ) {
                     70:                /* try next keyword */
                     71:                p = markertable[j].keyword; s = string;
                     72:                while (*p!='\0' && *s!='\0' && *p == *s) {
                     73:                        p++; s++;
                     74:                }
                     75:                if (*p != '\0') continue; /* no match */
                     76:                if ((*s == VDELIM) || (!onlyvdelim && (*s == KDELIM)))
                     77:                        return(markertable[j].marker);
                     78:         }
                     79:         return(Nomatch);
                     80: }
                     81: 

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.