%{

#include <stdio.h>

#include <string.h>

#include "atccl_parser.tab.h"

int line_no = 1;

char line_buffer[1024];

char* installId();

%}

%option nounput

delim			[ \t]

ws			{delim}+

letter 			[A-Za-z]

digit			[0-9]

id			{letter}({letter}|{digit}|_)*

real			{digit}+\.{digit}+

%%

copx			{ return COPX; }

adep			{ return ADEP; }

ades			{ return ADES; }

rwy			{ return RWY; }

route			{ return ROUTE; }

atyp			{ return ATYP; }

equip			{ return EQUIP; }

tas			{ return TAS; }

frul			{ return FRUL; }

ftyp			{ return FTYP; }

travel_type 		{ return TRAVEL_TYPE; }

time_separation		{ return TIMESEP; }

time_sep		{ return TIMESEP; }

fl			{ return FL; }

constraint		{ return CONSTRNT; }

pattern			{ return PATTERN; }

flowpoint		{ return FLOWP; }

is			{ return IS; }

in			{ return IN; }

not			{ return NOT; }

less			{ return LESS; }

greater			{ return GREATER; }

than			{ return THAN; }

and			{ return AND; }

or			{ return OR; }

at			{ return AT; }

from			{ return FROM; }

until			{ return UNTIL; }

on			{ return ON; }

{digit}+		{ yylval.integer = atoi(yytext); return INTEGER; }

{real}			{ yylval.real = atof(yytext); return REAL; }

{id}			{ yylval.string = installId(); return STRING; }

\"			{ return QUOTE; }

#.*$			{ return COM; }

{ws}			{  }

\n.*			{ strcpy(line_buffer, yytext+1); line_no++; yyless(1); }

.			{ return yytext[0]; }

%%

char* installId()

{

	static char* no_string = "$$$NO STRING$$$";

	char* id = no_string;

	if (id_table_no < MAX_ID_TABLE_NO)

	{

		id = strdup(yytext);

		id_table[id_table_no++] = id;

	}

	else

	{

		yyerror("Maximum number of string literals used");

	}	

	return id;

}