+/* Copyright 2001, 2003, 2005, 2007, 2009 Free Software Foundation, Inc.
+
+ This file is part of GNU binutils.
+
+ 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 3 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., 51 Franklin Street - Fifth Floor, Boston,
+ MA 02110-1301, USA. */
+
%{
-extern char *word;
-extern char writecode;
-extern int number;
-extern int unit;
-char nice_name[1000];
-char *it;
-int sofar;
-int width;
-int code;
-char * repeat;
-char *oldrepeat;
-char *name;
-int rdepth;
-char *loop [] = {"","n","m","/*BAD*/"};
-char *names[] = {" ","[n]","[n][m]"};
-char *pnames[]= {"","*","**"};
+#include <stdio.h>
+#include <stdlib.h>
+
+static char writecode;
+static char *it;
+static int code;
+static char * repeat;
+static char *oldrepeat;
+static char *name;
+static int rdepth;
+static char *names[] = {" ","[n]","[n][m]"};
+static char *pnames[]= {"","*","**"};
+
+static int yyerror (char *s);
+extern int yylex (void);
%}
}
%token COND
%token REPEAT
-%token '(' ')' '[' ']'
+%token '(' ')'
%token <s> TYPE
%token <s> NAME
%token <i> NUMBER UNIT
printf("#ifdef SYSROFF_PRINT\n");
printf("#include <stdio.h>\n");
printf("#include <stdlib.h>\n");
+ printf("#include <ansidecl.h>\n");
break;
}
}
{
case 'd':
printf("\n\n\n#define IT_%s_CODE 0x%x\n", it,code);
+ printf("struct IT_%s;\n", it);
+ printf("extern void sysroff_swap_%s_in (struct IT_%s *);\n",
+ $2, it);
+ printf("extern void sysroff_swap_%s_out (FILE *, struct IT_%s *);\n",
+ $2, it);
+ printf("extern void sysroff_print_%s_out (struct IT_%s *);\n",
+ $2, it);
printf("struct IT_%s { \n", it);
break;
case 'i':
- printf("void sysroff_swap_%s_in(ptr)\n",$2);
- printf("struct IT_%s *ptr;\n", it);
+ printf("void sysroff_swap_%s_in (struct IT_%s * ptr)\n",$2,it);
printf("{\n");
- printf("char raw[255];\n");
- printf("\tint idx = 0 ;\n");
+ printf("\tunsigned char raw[255];\n");
+ printf("\tint idx = 0;\n");
printf("\tint size;\n");
- printf("memset(raw,0,255);\n");
- printf("memset(ptr,0,sizeof(*ptr));\n");
- printf("size = fillup(raw);\n");
+ printf("\tmemset(raw,0,255);\n");
+ printf("\tmemset(ptr,0,sizeof(*ptr));\n");
+ printf("\tsize = fillup(raw);\n");
break;
case 'g':
- printf("void sysroff_swap_%s_out(file,ptr,last)\n",$2);
- printf("FILE * file;\n");
- printf("struct IT_%s *ptr;\n", it);
- printf("int last;\n");
+ printf("void sysroff_swap_%s_out (FILE * ffile, struct IT_%s * ptr)\n",$2,it);
printf("{\n");
- printf("\tchar raw[255];\n");
- printf("\tint idx = 16 ;\n");
+ printf("\tunsigned char raw[255];\n");
+ printf("\tint idx = 16;\n");
printf("\tmemset (raw, 0, 255);\n");
printf("\tcode = IT_%s_CODE;\n", it);
break;
case 'o':
- printf("void sysroff_swap_%s_out(abfd,ptr)\n",$2);
- printf("bfd * abfd;\n");
- printf("struct IT_%s *ptr;\n",it);
+ printf("void sysroff_swap_%s_out (bfd * abfd, struct IT_%s * ptr)\n",$2, it);
printf("{\n");
- printf("int idx = 0 ;\n");
+ printf("\tint idx = 0;\n");
break;
case 'c':
- printf("void sysroff_print_%s_out(ptr)\n",$2);
- printf("struct IT_%s *ptr;\n", it);
+ printf("void sysroff_print_%s_out (struct IT_%s *ptr)\n",$2,it);
printf("{\n");
printf("itheader(\"%s\", IT_%s_CODE);\n",$2,$2);
break;
printf("};\n");
break;
case 'g':
- printf("\tchecksum(file,raw, idx, IT_%s_CODE, last);\n", it);
+ printf("\tchecksum(ffile,raw, idx, IT_%s_CODE);\n", it);
case 'i':
}
else {
- printf("\twrite%s(ptr->%s%s,raw,&idx,%d,file);\n",
+ printf("\twrite%s(ptr->%s%s,raw,&idx,%d,ffile);\n",
type,
id,
names[rdepth],size/8);
if (rdepth == 2)
{
- printf("if (!ptr->%s[n]) ptr->%s[n] = (%s**)calloc(%s[n], sizeof(ptr->%s[n][0]));\n",
+ printf("if (!ptr->%s[n]) ptr->%s[n] = (%s**)xcalloc(%s[n], sizeof(ptr->%s[n][0]));\n",
id,
id,
type,
-
-name:
- NAME
- {
- printf("Got %s\n", word);
- }
- ;
-
-
-
-
-
-
-
%%
/* four modes
- -d write structure defintions for sysroff in host format
+ -d write structure definitions for sysroff in host format
-i write functions to swap into sysroff format in
-o write functions to swap into sysroff format out
-c write code to print info in human form */
-#include <stdio.h>
-#include <stdlib.h>
int yydebug;
-char writecode;
int
-main(ac,av)
-int ac;
-char **av;
+main (int ac, char **av)
{
yydebug=0;
if (ac > 1)
return 0;
}
-int yyerror()
+static int
+yyerror (char *s)
{
- printf("Error twathead\n");
+ fprintf(stderr, "%s\n" , s);
+ return 0;
}
projects / binutils.git / blobdiff