Browse Source
Keeps track of open files in a stack, and assigns a filenum to source positions for each lexical token. Modified error reporting to show source file as well. No policy on file directory basis has been decided. Still handles stdin. Tested on all arch/powerpc/boot/dts DTS files Signed-off-by: Jon Loeliger <jdl@freescale.com>main
Jon Loeliger
18 years ago
9 changed files with 369 additions and 23 deletions
@ -0,0 +1,105 @@
@@ -0,0 +1,105 @@
|
||||
/* |
||||
* Copyright 2007 Jon Loeliger, Freescale Semiconductor, Inc. |
||||
* |
||||
* This program is free software; you can redistribute it and/or |
||||
* modify it under the terms of the GNU General Public License as |
||||
* published by the Free Software Foundation; either version 2 of the |
||||
* License, or (at your option) any later version. |
||||
* |
||||
* This program is distributed in the hope that it will be useful, |
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
||||
* General Public License for more details. |
||||
* |
||||
* You should have received a copy of the GNU General Public License |
||||
* along with this program; if not, write to the Free Software |
||||
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 |
||||
* USA |
||||
*/ |
||||
|
||||
#include "dtc.h" |
||||
#include "srcpos.h" |
||||
|
||||
|
||||
/* |
||||
* Record the complete unique set of opened file names. |
||||
* Primarily used to cache source position file names. |
||||
*/ |
||||
#define MAX_N_FILE_NAMES (100) |
||||
|
||||
const char *file_names[MAX_N_FILE_NAMES]; |
||||
static int n_file_names = 0; |
||||
|
||||
/* |
||||
* Like yylineno, this is the current open file pos. |
||||
*/ |
||||
|
||||
int srcpos_filenum = -1; |
||||
|
||||
|
||||
|
||||
FILE *dtc_open_file(const char *fname) |
||||
{ |
||||
FILE *f; |
||||
|
||||
if (lookup_file_name(fname, 1) < 0) |
||||
die("Too many files opened\n"); |
||||
|
||||
if (streq(fname, "-")) |
||||
f = stdin; |
||||
else |
||||
f = fopen(fname, "r"); |
||||
|
||||
if (! f) |
||||
die("Couldn't open \"%s\": %s\n", fname, strerror(errno)); |
||||
|
||||
return f; |
||||
} |
||||
|
||||
|
||||
|
||||
/* |
||||
* Locate and optionally add filename fname in the file_names[] array. |
||||
* |
||||
* If the filename is currently not in the array and the boolean |
||||
* add_it is non-zero, an attempt to add the filename will be made. |
||||
* |
||||
* Returns; |
||||
* Index [0..MAX_N_FILE_NAMES) where the filename is kept |
||||
* -1 if the name can not be recorded |
||||
*/ |
||||
|
||||
int lookup_file_name(const char *fname, int add_it) |
||||
{ |
||||
int i; |
||||
|
||||
for (i = 0; i < n_file_names; i++) { |
||||
if (strcmp(file_names[i], fname) == 0) |
||||
return i; |
||||
} |
||||
|
||||
if (add_it) { |
||||
if (n_file_names < MAX_N_FILE_NAMES) { |
||||
file_names[n_file_names] = strdup(fname); |
||||
return n_file_names++; |
||||
} |
||||
} |
||||
|
||||
return -1; |
||||
} |
||||
|
||||
|
||||
const char *srcpos_filename_for_num(int filenum) |
||||
{ |
||||
if (0 <= filenum && filenum < n_file_names) { |
||||
return file_names[filenum]; |
||||
} |
||||
|
||||
return 0; |
||||
} |
||||
|
||||
|
||||
const char *srcpos_get_filename(void) |
||||
{ |
||||
return srcpos_filename_for_num(srcpos_filenum); |
||||
} |
||||
@ -0,0 +1,71 @@
@@ -0,0 +1,71 @@
|
||||
/* |
||||
* Copyright 2007 Jon Loeliger, Freescale Semiconductor, Inc. |
||||
* |
||||
* This program is free software; you can redistribute it and/or |
||||
* modify it under the terms of the GNU General Public License as |
||||
* published by the Free Software Foundation; either version 2 of the |
||||
* License, or (at your option) any later version. |
||||
* |
||||
* This program is distributed in the hope that it will be useful, |
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
||||
* General Public License for more details. |
||||
* |
||||
* You should have received a copy of the GNU General Public License |
||||
* along with this program; if not, write to the Free Software |
||||
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 |
||||
* USA |
||||
*/ |
||||
|
||||
/* |
||||
* Augment the standard YYLTYPE with a filenum index into an |
||||
* array of all opened filenames. |
||||
*/ |
||||
|
||||
#if ! defined YYLTYPE && ! defined YYLTYPE_IS_DECLARED |
||||
typedef struct YYLTYPE { |
||||
int first_line; |
||||
int first_column; |
||||
int last_line; |
||||
int last_column; |
||||
int filenum; |
||||
} YYLTYPE; |
||||
|
||||
#define YYLTYPE_IS_DECLARED 1 |
||||
#define YYLTYPE_IS_TRIVIAL 1 |
||||
#endif |
||||
|
||||
|
||||
#define YYLLOC_DEFAULT(Current, Rhs, N) \ |
||||
do \ |
||||
if (YYID (N)) \ |
||||
{ \ |
||||
(Current).first_line = YYRHSLOC (Rhs, 1).first_line; \ |
||||
(Current).first_column = YYRHSLOC (Rhs, 1).first_column; \ |
||||
(Current).last_line = YYRHSLOC (Rhs, N).last_line; \ |
||||
(Current).last_column = YYRHSLOC (Rhs, N).last_column; \ |
||||
(Current).filenum = YYRHSLOC (Rhs, N).filenum; \ |
||||
} \ |
||||
else \ |
||||
{ \ |
||||
(Current).first_line = (Current).last_line = \ |
||||
YYRHSLOC (Rhs, 0).last_line; \ |
||||
(Current).first_column = (Current).last_column = \ |
||||
YYRHSLOC (Rhs, 0).last_column; \ |
||||
(Current).filenum = YYRHSLOC (Rhs, 0).filenum; \ |
||||
} \ |
||||
while (YYID (0)) |
||||
|
||||
|
||||
|
||||
|
||||
extern int srcpos_filenum; |
||||
|
||||
extern int push_input_file(const char *filename); |
||||
extern int pop_input_file(void); |
||||
|
||||
extern FILE *dtc_open_file(const char *fname); |
||||
extern int lookup_file_name(const char *fname, int add_it); |
||||
extern const char *srcpos_filename_for_num(int filenum); |
||||
const char *srcpos_get_filename(void); |
||||
|
||||
@ -0,0 +1,138 @@
@@ -0,0 +1,138 @@
|
||||
/* |
||||
* Copyright 2007 Jon Loeliger, Freescale Semiconductor, Inc. |
||||
* |
||||
* This program is free software; you can redistribute it and/or |
||||
* modify it under the terms of the GNU General Public License as |
||||
* published by the Free Software Foundation; either version 2 of the |
||||
* License, or (at your option) any later version. |
||||
* |
||||
* This program is distributed in the hope that it will be useful, |
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
||||
* General Public License for more details. |
||||
* |
||||
* You should have received a copy of the GNU General Public License |
||||
* along with this program; if not, write to the Free Software |
||||
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 |
||||
* USA |
||||
*/ |
||||
|
||||
#include "srcpos.h" |
||||
|
||||
|
||||
/* |
||||
* This code should only be included into the lexical analysis. |
||||
* It references global context symbols that are only present |
||||
* in the generated lex.yy,c file. |
||||
*/ |
||||
|
||||
#ifdef FLEX_SCANNER |
||||
|
||||
|
||||
/* |
||||
* Stack of nested include file contexts. |
||||
*/ |
||||
|
||||
struct incl_file { |
||||
int filenum; |
||||
FILE *file; |
||||
YY_BUFFER_STATE yy_prev_buf; |
||||
int yy_prev_lineno; |
||||
struct incl_file *prev; |
||||
}; |
||||
|
||||
struct incl_file *incl_file_stack; |
||||
|
||||
|
||||
/* |
||||
* Detect infinite include recursion. |
||||
*/ |
||||
#define MAX_INCLUDE_DEPTH (100) |
||||
|
||||
static int incl_depth = 0; |
||||
|
||||
|
||||
|
||||
int push_input_file(const char *filename) |
||||
{ |
||||
FILE *f; |
||||
struct incl_file *incl_file; |
||||
|
||||
if (!filename) { |
||||
yyerror("No include file name given."); |
||||
return 0; |
||||
} |
||||
|
||||
if (incl_depth++ >= MAX_INCLUDE_DEPTH) { |
||||
yyerror("Includes nested too deeply"); |
||||
return 0; |
||||
} |
||||
|
||||
f = dtc_open_file(filename); |
||||
|
||||
incl_file = malloc(sizeof(struct incl_file)); |
||||
if (!incl_file) { |
||||
yyerror("Can not allocate include file space."); |
||||
return 0; |
||||
} |
||||
|
||||
/* |
||||
* Save current context. |
||||
*/ |
||||
incl_file->yy_prev_buf = YY_CURRENT_BUFFER; |
||||
incl_file->yy_prev_lineno = yylineno; |
||||
incl_file->filenum = srcpos_filenum; |
||||
incl_file->file = yyin; |
||||
incl_file->prev = incl_file_stack; |
||||
|
||||
incl_file_stack = incl_file; |
||||
|
||||
/* |
||||
* Establish new context. |
||||
*/ |
||||
srcpos_filenum = lookup_file_name(filename, 0); |
||||
yylineno = 1; |
||||
yyin = f; |
||||
yy_switch_to_buffer(yy_create_buffer(yyin, YY_BUF_SIZE)); |
||||
|
||||
return 1; |
||||
} |
||||
|
||||
|
||||
int pop_input_file(void) |
||||
{ |
||||
struct incl_file *incl_file; |
||||
|
||||
if (incl_file_stack == 0) |
||||
return 0; |
||||
|
||||
fclose(yyin); |
||||
|
||||
/* |
||||
* Pop. |
||||
*/ |
||||
--incl_depth; |
||||
incl_file = incl_file_stack; |
||||
incl_file_stack = incl_file->prev; |
||||
|
||||
/* |
||||
* Recover old context. |
||||
*/ |
||||
yy_delete_buffer(YY_CURRENT_BUFFER); |
||||
yy_switch_to_buffer(incl_file->yy_prev_buf); |
||||
yylineno = incl_file->yy_prev_lineno; |
||||
srcpos_filenum = incl_file->filenum; |
||||
yyin = incl_file->file; |
||||
|
||||
/* |
||||
* Free old state. |
||||
*/ |
||||
free(incl_file); |
||||
|
||||
if (YY_CURRENT_BUFFER == 0) |
||||
return 0; |
||||
|
||||
return 1; |
||||
} |
||||
|
||||
#endif /* FLEX_SCANNER */ |
||||
Loading…
Reference in new issue