/******************************************************************************************************************\
 * Uma empresa pretende implementar um repositório de informação sobre artigos científicos. Para tal, desenvolveu  *
 * um processo automático que permite receber das editoras, a informação em ficheiros de texto cujas linhas têm a  *
 * seguinte estrutura em formato EBNF (em que os campos opcionais são apresentados entre [] e os que se repetem    *
 * 0 ou mais vezes entre { }):                                                                                     *
 * <título> [<ISBN>] <ano_publicação> [<género>] <autor>{,<autor>} {<quantidade>}                                  *
\*******************************************************************************************************************/

grammar Lprog;

// Monoline comment about a parser rule
inicio : input ;

/*
 A multi-line Java-like comment
 */
input: b NEWLINE
    | input b NEWLINE
    ;

b: titulo isbn ano_pub gen autor autores qtds
   ;

titulo: STRING ' '
   ;

isbn:
    | ISBN ' '
    ;

ano_pub: BTWIN_1800_2018 ' '
       ;

gen:
    | GENERO ' '
    ;


autores:
        |',' autores autor
        ;

autor: STRING ' '
    ;

qtds:
    | qtd qtds

    ;

qtd: INT
   ;

// some lexer rules

STRING :'"'([a-zA-Z]|' '|[0-9])+'"'; // String de caracteres alfanuméricos limitada por aspas + espaços
ISBN :([0-9]'-'[0-9][0-9][0-9][0-9]'-'[0-9][0-9][0-9][0-9]'-'([0-9]|'X')|[0-9][0-9][0-9]'-'[0-9]'-'[0-9][0-9][0-9][0-9]'-'[0-9][0-9][0-9][0-9]'-'([0-9]|'X')) ; // N-NNNN-NNNN-R ou NNN-N-NNNN-NNNN-R em que N representa um algarismo e, R um algarismo ou a letra X;
BTWIN_1800_2018 :'1'[8-9][0-9][0-9]|'200'[0-9]|'201'[0-8]; // todos os inteiros em [1800,2018]
GENERO :'SURVEY'|'ENSAIO'|'INOVAÇÃO';
INT :[0-9]+;
NEWLINE :'\r'? '\n' ; // ret