Blame | Last modification | View Log | Download | RSS feed
%{
/*
* $Id: pads_yacc.y,v 1.1.1.1 2003/11/04 23:34:58 mjames Exp $
*
* $Log: pads_yacc.y,v $
* Revision 1.1.1.1 2003/11/04 23:34:58 mjames
* Imported into local repositrory
*
* Revision 1.6 2002/10/02 19:37:27 MJAMES
* Moved dummy functions to a separate support file.
*
* Used correct number of arguments to define_pin
*
* Revision 1.5 2002/09/09 10:16:42 mjames
* Modified expression parser to match CC as previous one was
* broken
*
* Revision 1.4 2001/10/31 22:20:11 mjames
* Tidying up problematical comments caused by CVS
* 'intelligent' comment guessing
*
* Revision 1.3 2001/10/02 20:53:27 mjames
* Moved documentation about code to main program module.
*
* Revision 1.2 2001/09/16 19:56:43 mjames
* tidying
*
* Revision 1.1 2001/07/05 13:10:51 MJAMES
* Created padsread for PADS-PCB netlists
*
* Revision 1.3 2001/06/06 12:10:20 mjames
* Move from HPUX
*
* Revision 1.2 2000/12/04 13:14:03 mjames
* Imported all of the PCB syntax readers.
*
* Converted "a/b" to mean "a" divided by "b" insted of a single string
* "a/b" in Verilog
*
* Revision 1.1.1.1 2000/10/19 21:58:38 mjames
* Mike put it here
*
*
* Revision 1.27 2000/10/04 10:37:07 10:37:07 mjames (Mike James)
* Modified for Vertical2 : support COMPONENTS and SIGNALS
*
* Revision 1.24 2000/09/27 10:58:04 10:58:04 mjames (Mike James)
* Using correct return code from yyparse()
*
* Revision 1.13 2000/03/08 16:19:19 16:19:19 mjames (Mike James)
* New version including PC
*
* Revision 1.10 2000/01/20 15:58:46 15:58:46 mjames (Mike James)
* Part of Release R22
*
* Revision 1.9 99/12/22 11:15:27 11:15:27 mjames (Mike James)
* Part of Release Dec_22_1999
*
* Revision 1.8 99/06/25 14:35:45 14:35:45 mjames (Mike James)
* Added in reference to expression.h, but no changes made
* to the function of acfread yet.
*
* Revision 1.7 99/05/04 09:52:32 09:52:32 mjames (Mike James)
* General checkin
*
* Revision 1.5 98/07/14 13:24:51 13:24:51 mjames (Mike James)
* Altered calling of some database functions
*
* Revision 1.4 98/02/11 11:26:46 11:26:46 mjames (Mike James)
* Checked in for version 6.2a
*
* Revision 1.3 97/04/23 08:45:10 08:45:10 mjames (Mike James)
* CHecked in for release rel23041997
*
* Revision 1.2 96/12/23 15:16:50 15:16:50 mjames (Mike James)
* Altered because find_socket takes a reference
* to the head-of-list-pointer noth the pointer itself.
*
* Revision 1.1 96/12/13 08:43:46 08:43:46 mjames (Mike James)
* Initial revision
*
*
* */
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "expression.h"
#include "generic.h"
#include "database.h"
#ident "@(#)$Header: C:/cvsroot/Vert03/pads_src/pads_yacc.y,v 1.1.1.1 2003/11/04 23:34:58 mjames Exp $"
static char text_buff[1024];
static socket_t * current_chip;
static char curr_net_nam[MAXIDLEN];
int inside_block;
%}
%union { char * string; }
%token PADSPCB PART NET SIGNAL END NL
%token <string> ASTRING
%%
padsfile : PADSPCB gap PART NL part_section NET NL net_section END gap;
part_section : part_section part_item
| part_item
| /* nothing */
;
part_item : NL
| ASTRING { text_buff[0] = '\0'; } several_words NL
{ current_chip = find_socket(Ident,$1,Create,&socket_head);
set_socket(current_chip,Type,text_buff) ;
};
/* pattern for picking up several space delimited words */
several_words : word several_words
| word
;
/* add a space if this is not the first string */
word : ASTRING { if(text_buff[0]) strcat(text_buff," "); strcat(text_buff,$1); };
net_section : net_section net_item
| net_item
| /* nothing */
;
net_item : SIGNAL net_name pins;
pins : pins pin
| pin
;
net_name : ASTRING { strcpy(curr_net_nam,$1); };
pin : NL
| ASTRING '.' ASTRING { define_pin(&routed_list,
find_socket(Ident,$1,Create,&socket_head),
curr_net_nam,BIDIR,0,$3,
default_vhdl_datatype,NULL); };
gap : NL gap
| NL
|
;
%%
/* defining lineno here */
int lineno;
extern char * yytext;
int yyerror(char * x)
{
int token;
printf("-- Error --> %s near string (%s) at line %d\n",x,yytext,lineno);
/* for(token = yylex();token >= 0 && token!=NL;token = yylex()); */
return 1;
}
int yywrap(void)
{
return 1;
}