summaryrefslogtreecommitdiffstats
path: root/llvm/utils/Spiff/line.c
diff options
context:
space:
mode:
Diffstat (limited to 'llvm/utils/Spiff/line.c')
-rw-r--r--llvm/utils/Spiff/line.c170
1 files changed, 0 insertions, 170 deletions
diff --git a/llvm/utils/Spiff/line.c b/llvm/utils/Spiff/line.c
deleted file mode 100644
index e358a1806c6..00000000000
--- a/llvm/utils/Spiff/line.c
+++ /dev/null
@@ -1,170 +0,0 @@
-/* Copyright (c) 1988 Bellcore
-** All Rights Reserved
-** Permission is granted to copy or use this program, EXCEPT that it
-** may not be sold for profit, the copyright notice must be reproduced
-** on copies, and credit should be given to Bellcore where it is due.
-** BELLCORE MAKES NO WARRANTY AND ACCEPTS NO LIABILITY FOR THIS PROGRAM.
-*/
-
-
-#ifndef lint
-static char rcsid[]= "$Header$";
-#endif
-
-#include <stdio.h>
-#include "misc.h"
-#include "token.h"
-#include "line.h"
-
-char *_L_al[_L_MAXLINES]; /* storage for lines */
-char *_L_bl[_L_MAXLINES];
-
-int _L_ai[_L_MAXLINES]; /* index from token line number to first token */
-int _L_bi[_L_MAXLINES];
-
-int _L_ac[_L_MAXLINES]; /* count of tokens on this token line */
-int _L_bc[_L_MAXLINES];
-
-int _L_arlm; /* count of real lines in the file */
-int _L_brlm;
-
-int _L_aclm; /* count of content lines in the file */
-int _L_bclm;
-
-int _L_atlm; /* count of token lines in the file */
-int _L_btlm;
-
-int _L_aclindex[_L_MAXLINES]; /* mapping from content lines to real lines*/
-int _L_bclindex[_L_MAXLINES];
-
-int _L_atlindex[_L_MAXLINES]; /*mapping from token lines to content lines */
-int _L_btlindex[_L_MAXLINES];
-
-
-static void
-_L_setrline(file,X,str)
-int file;
-int X;
-char *str;
-{
- if (file)
- {
- S_savestr(&_L_bl[X],str);
- }
- else
- {
- S_savestr(&_L_al[X],str);
- }
- return;
-}
-/*
-** returns 1 if we reached the end of file
-** returns 0 if there is more to do
-**
-** stores data and sets maximum counts
-*/
-int
-L_init_file(fnumber,fname)
-int fnumber;
-char *fname;
-{
- extern char *fgets();
- FILE *fp;
- static char buf[Z_LINELEN+2]; /* +2 is to leave room for us to add
- a newline if we need to */
- int ret_val = 1;
- int tmplen;
-
- if ((fp = fopen(fname,"r")) == (FILE*) NULL)
- {
- (void) sprintf(Z_err_buf, "Cannot open file %s.\n",fname);
- Z_fatal(Z_err_buf);
- }
-
- /*
- ** clear the line count
- */
- _L_setrlmx(fnumber,0);
-
- /*
- ** read in the entire file
- */
- while (fgets(buf,Z_LINELEN+1,fp) != (char *) NULL)
- {
- tmplen = strlen(buf);
- if (tmplen <= 0)
- {
- (void) sprintf(Z_err_buf,
- "fatal error -- got 0 length line %d in file %s\n",
- L_getrlmax(fnumber)+1,
- fname);
- Z_fatal(Z_err_buf);
- }
- else if (tmplen > Z_LINELEN)
- {
- (void) sprintf(Z_err_buf,
- "got fatally long line %d in file %s length is %d, must be a bug\n",
- L_getrlmax(fnumber)+1,
- fname,tmplen);
- Z_fatal(Z_err_buf);
- }
- /*
- ** look for newline as last character
- */
- if ('\n' != buf[tmplen-1])
- {
- /*
- ** did we run out room in the buffer?
- */
- if (tmplen == Z_LINELEN)
- {
- (void) sprintf(Z_err_buf,
- "line %d too long in file %s, newline added after %d characters\n",
- L_getrlmax(fnumber)+1,
- fname,Z_LINELEN);
- Z_complain(Z_err_buf);
- }
- else
- {
- (void) sprintf(Z_err_buf,
- "didn't find a newline at end of line %d in file %s, added one\n",
- L_getrlmax(fnumber)+1,
- fname);
- Z_complain(Z_err_buf);
- }
-
- buf[tmplen] = '\n';
- buf[tmplen+1] = '\0';
- }
-
- _L_setrline(fnumber,L_getrlmax(fnumber),buf);
-
- if (L_getrlmax(fnumber) >= _L_MAXLINES-1)
- {
- (void) sprintf(Z_err_buf,
- "warning -- ran out of space reading %s, truncated to %d lines\n",
- fname,_L_MAXLINES);
- Z_complain(Z_err_buf);
- ret_val= 0;
- break;
- }
- else
- {
- /*
- ** increment the line count
- */
- _L_incrlmx(fnumber);
- }
-
- }
-
- (void) fclose(fp);
- /*
- ** reset line numbers
- */
- L_setclmax(fnumber,0);
- L_settlmax(fnumber,0);
-
- return(ret_val);
-}
-
OpenPOWER on IntegriCloud