%union {
int i;
char *s;
-}
+}
%token COND
%token REPEAT
%token '(' ')'
%token <s> TYPE
%token <s> NAME
%token <i> NUMBER UNIT
-%type <i> attr_size
+%type <i> attr_size
%type <s> attr_desc attr_id attr_type
%%
{
case 'i':
printf("#ifdef SYSROFF_SWAP_IN\n");
- break;
+ break;
case 'p':
printf("#ifdef SYSROFF_p\n");
- break;
+ break;
case 'd':
break;
case 'g':
printf("#include <ansidecl.h>\n");
break;
}
- }
+ }
it_list {
switch (writecode) {
case 'i':
case 'g':
case 'c':
printf("#endif\n");
- break;
+ break;
case 'd':
break;
}
;
it:
- '(' NAME NUMBER
+ '(' NAME NUMBER
{
it = $2; code = $3;
- switch (writecode)
+ switch (writecode)
{
case 'd':
printf("\n\n\n#define IT_%s_CODE 0x%x\n", it,code);
printf("\tunsigned char raw[255];\n");
printf("\tint idx = 0;\n");
printf("\tint size;\n");
- printf("\tmemset(raw,0,255);\n");
+ printf("\tmemset(raw,0,255);\n");
printf("\tmemset(ptr,0,sizeof(*ptr));\n");
printf("\tsize = fillup(raw);\n");
break;
break;
}
- }
- it_field_list
+ }
+ it_field_list
')'
{
switch (writecode) {
- case 'd':
+ case 'd':
printf("};\n");
break;
case 'g':
printf("\tchecksum(ffile,raw, idx, IT_%s_CODE);\n", it);
-
+
case 'i':
case 'o':
it_field_list:
it_field it_field_list
- | cond_it_field it_field_list
+ | cond_it_field it_field_list
| repeat_it_field it_field_list
|
;
repeat_it_field: '(' REPEAT NAME
{
rdepth++;
- switch (writecode)
+ switch (writecode)
{
case 'c':
if (rdepth==1)
case 'g':
case 'o':
- if (rdepth==1)
+ if (rdepth==1)
{
printf("\t{ int n; for (n = 0; n < %s; n++) {\n", $3);
}
if (rdepth == 2) {
printf("\t{ int m; for (m = 0; m < %s[n]; m++) {\n", $3);
- }
+ }
break;
}
repeat = $3;
}
- it_field_list ')'
+ it_field_list ')'
{
repeat = oldrepeat;
cond_it_field: '(' COND NAME
{
- switch (writecode)
+ switch (writecode)
{
case 'i':
case 'g':
}
}
- it_field_list ')'
+ it_field_list ')'
{
switch (writecode)
{
;
it_field:
- '(' attr_desc '(' attr_type attr_size ')' attr_id
- {name = $7; }
+ '(' attr_desc '(' attr_type attr_size ')' attr_id
+ {name = $7; }
enums ')'
{
char *desc = $2;
char *id = $7;
char *p = names[rdepth];
char *ptr = pnames[rdepth];
- switch (writecode)
+ switch (writecode)
{
case 'g':
- if (size % 8)
+ if (size % 8)
{
-
+
printf("\twriteBITS(ptr->%s%s,raw,&idx,%d);\n",
id,
names[rdepth], size);
id,
names[rdepth],size/8);
}
- break;
+ break;
case 'i':
{
if (rdepth >= 1)
{
- printf("if (!ptr->%s) ptr->%s = (%s*)xcalloc(%s, sizeof(ptr->%s[0]));\n",
- id,
+ printf("if (!ptr->%s) ptr->%s = (%s*)xcalloc(%s, sizeof(ptr->%s[0]));\n",
+ id,
id,
type,
repeat,
if (rdepth == 2)
{
- printf("if (!ptr->%s[n]) ptr->%s[n] = (%s**)xcalloc(%s[n], sizeof(ptr->%s[n][0]));\n",
- id,
+ printf("if (!ptr->%s[n]) ptr->%s[n] = (%s**)xcalloc(%s[n], sizeof(ptr->%s[n][0]));\n",
+ id,
id,
type,
repeat,
}
- if (size % 8)
+ if (size % 8)
{
printf("\tptr->%s%s = getBITS(raw,&idx, %d,size);\n",
id,
- names[rdepth],
+ names[rdepth],
size);
}
else {
printf("\tput%s(raw,%d,%d,&idx,ptr->%s%s);\n", type,size/8,size%8,id,names[rdepth]);
break;
case 'd':
- if (repeat)
+ if (repeat)
printf("\t/* repeat %s */\n", repeat);
if (type[0] == 'I') {
else if (type[0] == 'C')
printf("\tprintf(\"%%s\\n\",ptr->%s%s);\n", id,p);
- else if (type[0] == 'B')
+ else if (type[0] == 'B')
{
printf("\tpbarray(&ptr->%s%s);\n", id,p);
}
;
-attr_type:
+attr_type:
TYPE { $$ = $1; }
| { $$ = "INT";}
;
-attr_desc:
- '(' NAME ')'
+attr_desc:
+ '(' NAME ')'
{ $$ = $2; }
;
attr_size:
- NUMBER UNIT
+ NUMBER UNIT
{ $$ = $1 * $2; }
;
attr_id:
'(' NAME ')' { $$ = $2; }
| { $$ = "dummy";}
- ;
-
-enums:
+ ;
+
+enums:
| '(' enum_list ')' ;
enum_list:
|
- enum_list '(' NAME NAME ')' {
- switch (writecode)
+ enum_list '(' NAME NAME ')' {
+ switch (writecode)
{
case 'd':
printf("#define %s %s\n", $3,$4);
int yydebug;
-int
+int
main (int ac, char **av)
{
yydebug=0;