1
0
mirror of git://projects.qi-hardware.com/fped.git synced 2024-07-01 11:14:31 +03:00
fped/fpd.l
werner 5d7ab083a3 - README: described use of semicolons
- README: added that loops can also execute zero times
- accept labels only at the beginning of a line
- rectangles and lines no longer use the bounding box for drawing (caused
  offset problems since we now correct for the line width)
- dist_rect and inside_rect no longer require their input pre-sorted
- pad instances now have their own structure and no longer abuse the bounding
  box to know the pad coordinates
- Makefile: use $(GEN) for fig2dev, to reduce chattiness
- when dragging a point, the symbol is now adjusted accordingly
- added moving of rects, pads, circles, and arcs
- added creation of pads 
- moved rotate_r from gui_inst.c to coord.c
- new function "theta" that combines most of the angle calculations
- save_pix_buf: y < 0 clipping changed width, not height



git-svn-id: http://svn.openmoko.org/trunk/eda/fped@5386 99fdad57-331a-0410-800a-d7fa5415bdb3
2009-08-04 21:45:33 +00:00

138 lines
2.8 KiB
Plaintext

%{
/*
* fpd.l - FootPrint Definition language
*
* Written 2009 by Werner Almesberger
* Copyright 2009 by Werner Almesberger
*
* 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.
*/
#include <stdlib.h>
#include "util.h"
#include "coord.h"
#include "expr.h"
#include "error.h"
#include "y.tab.h"
int start_token = START_FPD;
static int disable_keywords = 0;
static int is_table = 0;
void scan_empty(void)
{
yy_scan_string("");
}
void scan_expr(const char *s)
{
start_token = START_EXPR;
yy_scan_string(s);
}
%}
/* keywords are only accepted at the beginning of a line */
%s NOKEYWORD
NUM [0-9]+\.?[0-9]*
SP [\t ]*
%%
%{
/*
* Nice hack:
*
* http://www.gnu.org/software/bison/manual/bison.html#
* Multiple-start_002dsymbols
*/
if (start_token) {
int tmp = start_token;
start_token = 0;
return tmp;
}
%}
<INITIAL>"set" { BEGIN(NOKEYWORD);
return TOK_SET; }
<INITIAL>"loop" { BEGIN(NOKEYWORD);
return TOK_LOOP; }
<INITIAL>"frame" { BEGIN(NOKEYWORD);
is_table = 0;
return TOK_FRAME; }
<INITIAL>"table" { BEGIN(NOKEYWORD);
is_table = 1;
return TOK_TABLE; }
<INITIAL>"vec" { BEGIN(NOKEYWORD);
return TOK_VEC; }
<INITIAL>"pad" { BEGIN(NOKEYWORD);
return TOK_PAD; }
<INITIAL>"rect" { BEGIN(NOKEYWORD);
return TOK_RECT; }
<INITIAL>"line" { BEGIN(NOKEYWORD);
return TOK_LINE; }
<INITIAL>"circ" { BEGIN(NOKEYWORD);
return TOK_CIRC; }
<INITIAL>"arc" { BEGIN(NOKEYWORD);
return TOK_ARC; }
<INITIAL>"meas" { BEGIN(NOKEYWORD);
return TOK_MEAS; }
<INITIAL>[a-zA-Z_][a-zA-Z_0-9]*: { *strchr(yytext, ':') = 0;
yylval.id = unique(yytext);
return LABEL; }
[a-zA-Z_][a-zA-Z_0-9]* { yylval.id = unique(yytext);
return ID; }
{NUM}{SP}mm { yylval.num.type = nt_mm;
yylval.num.exponent = 1;
sscanf(yytext, "%lf", &yylval.num.n);
return NUMBER; }
{NUM}{SP}mil { yylval.num.type = nt_mil;
yylval.num.exponent = 1;
sscanf(yytext, "%lf", &yylval.num.n);
return NUMBER; }
{NUM} { yylval.num.type = nt_mm; /* mm or mil */
yylval.num.exponent = 0;
sscanf(yytext, "%lf", &yylval.num.n);
return NUMBER; }
\"(\\[^\n\t]|[^\\"\n\t])*\" { *strrchr(yytext, '"') = 0;
yylval.str = stralloc(yytext+1);
return STRING; }
{SP} ;
\n { if (!disable_keywords)
BEGIN(INITIAL);
lineno++; }
; BEGIN(INITIAL);
"{" { BEGIN(NOKEYWORD);
disable_keywords = is_table;
return '{'; }
"}" { disable_keywords = 0;
return '}'; }
^#\ [0-9]+\ \"[^"]*\"(\ [0-9]+)*\n {
if (!disable_keywords)
BEGIN(INITIAL);
lineno = strtol(yytext+2, NULL, 0); }
. return *yytext;