Home | History | Annotate | Line # | Download | only in compiler
prparser.l revision 1.1.1.2.2.4
      1          1.1  christos %{
      2          1.1  christos /******************************************************************************
      3          1.1  christos  *
      4          1.1  christos  * Module Name: prparser.l - Flex input file for preprocessor lexer
      5          1.1  christos  *
      6          1.1  christos  *****************************************************************************/
      7          1.1  christos 
      8          1.1  christos /*
      9  1.1.1.2.2.4     skrll  * Copyright (C) 2000 - 2017, Intel Corp.
     10          1.1  christos  * All rights reserved.
     11          1.1  christos  *
     12          1.1  christos  * Redistribution and use in source and binary forms, with or without
     13          1.1  christos  * modification, are permitted provided that the following conditions
     14          1.1  christos  * are met:
     15          1.1  christos  * 1. Redistributions of source code must retain the above copyright
     16          1.1  christos  *    notice, this list of conditions, and the following disclaimer,
     17          1.1  christos  *    without modification.
     18          1.1  christos  * 2. Redistributions in binary form must reproduce at minimum a disclaimer
     19          1.1  christos  *    substantially similar to the "NO WARRANTY" disclaimer below
     20          1.1  christos  *    ("Disclaimer") and any redistribution must be conditioned upon
     21          1.1  christos  *    including a substantially similar Disclaimer requirement for further
     22          1.1  christos  *    binary redistribution.
     23          1.1  christos  * 3. Neither the names of the above-listed copyright holders nor the names
     24          1.1  christos  *    of any contributors may be used to endorse or promote products derived
     25          1.1  christos  *    from this software without specific prior written permission.
     26          1.1  christos  *
     27          1.1  christos  * Alternatively, this software may be distributed under the terms of the
     28          1.1  christos  * GNU General Public License ("GPL") version 2 as published by the Free
     29          1.1  christos  * Software Foundation.
     30          1.1  christos  *
     31          1.1  christos  * NO WARRANTY
     32          1.1  christos  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
     33          1.1  christos  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
     34          1.1  christos  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR
     35          1.1  christos  * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
     36          1.1  christos  * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     37          1.1  christos  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     38          1.1  christos  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     39          1.1  christos  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
     40          1.1  christos  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
     41          1.1  christos  * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     42          1.1  christos  * POSSIBILITY OF SUCH DAMAGES.
     43          1.1  christos  */
     44          1.1  christos 
     45          1.1  christos #include "aslcompiler.h"
     46          1.1  christos #include "prparser.y.h"
     47          1.1  christos 
     48          1.1  christos /* Buffer to pass strings to the parser */
     49          1.1  christos 
     50          1.1  christos #define STRING_SETUP    strcpy (StringBuffer, PrParsertext);\
     51          1.1  christos     PrParserlval.str = StringBuffer
     52          1.1  christos 
     53          1.1  christos #define _COMPONENT          ACPI_COMPILER
     54          1.1  christos         ACPI_MODULE_NAME    ("prscanner")
     55  1.1.1.2.2.2     skrll 
     56  1.1.1.2.2.2     skrll 
     57  1.1.1.2.2.2     skrll /* Local prototypes */
     58  1.1.1.2.2.2     skrll 
     59  1.1.1.2.2.2     skrll static char
     60  1.1.1.2.2.2     skrll PrDoCommentType1 (
     61  1.1.1.2.2.2     skrll     void);
     62  1.1.1.2.2.2     skrll 
     63  1.1.1.2.2.2     skrll static char
     64  1.1.1.2.2.2     skrll PrDoCommentType2 (
     65  1.1.1.2.2.2     skrll     void);
     66          1.1  christos %}
     67          1.1  christos 
     68          1.1  christos %option noyywrap
     69          1.1  christos 
     70          1.1  christos Number          [0-9a-fA-F]+
     71          1.1  christos HexNumber       0[xX][0-9a-fA-F]+
     72          1.1  christos WhiteSpace      [ \t\v\r]+
     73          1.1  christos NewLine         [\n]
     74          1.1  christos Identifier      [a-zA-Z][0-9a-zA-Z]*
     75          1.1  christos 
     76          1.1  christos %%
     77  1.1.1.2.2.2     skrll "/*"            { if (!PrDoCommentType1 ()) {yyterminate ();} }
     78  1.1.1.2.2.2     skrll "//"            { if (!PrDoCommentType2 ()) {yyterminate ();} }
     79          1.1  christos 
     80          1.1  christos \(              return (EXPOP_PAREN_OPEN);
     81          1.1  christos \)              return (EXPOP_PAREN_CLOSE);
     82          1.1  christos \~              return (EXPOP_ONES_COMPLIMENT);
     83          1.1  christos \!              return (EXPOP_LOGICAL_NOT);
     84          1.1  christos \*              return (EXPOP_MULTIPLY);
     85          1.1  christos \/              return (EXPOP_DIVIDE);
     86          1.1  christos \%              return (EXPOP_MODULO);
     87          1.1  christos \+              return (EXPOP_ADD);
     88          1.1  christos \-              return (EXPOP_SUBTRACT);
     89          1.1  christos ">>"            return (EXPOP_SHIFT_RIGHT);
     90          1.1  christos "<<"            return (EXPOP_SHIFT_LEFT);
     91          1.1  christos \<              return (EXPOP_LESS);
     92          1.1  christos \>              return (EXPOP_GREATER);
     93          1.1  christos "<="            return (EXPOP_LESS_EQUAL);
     94          1.1  christos ">="            return (EXPOP_GREATER_EQUAL);
     95          1.1  christos "=="            return (EXPOP_EQUAL);
     96          1.1  christos "!="            return (EXPOP_NOT_EQUAL);
     97          1.1  christos \&              return (EXPOP_AND);
     98          1.1  christos \^              return (EXPOP_XOR);
     99          1.1  christos \|              return (EXPOP_OR);
    100          1.1  christos "&&"            return (EXPOP_LOGICAL_AND);
    101          1.1  christos "||"            return (EXPOP_LOGICAL_OR);
    102          1.1  christos 
    103          1.1  christos "defined"       return (EXPOP_DEFINE);
    104          1.1  christos {Identifier}    {STRING_SETUP; return (EXPOP_IDENTIFIER);}
    105          1.1  christos 
    106          1.1  christos <<EOF>>         return (EXPOP_EOF); /* null end-of-string */
    107          1.1  christos 
    108          1.1  christos {Number}        return (EXPOP_NUMBER);
    109          1.1  christos {HexNumber}     return (EXPOP_HEX_NUMBER);
    110          1.1  christos {NewLine}       return (EXPOP_NEW_LINE);
    111          1.1  christos {WhiteSpace}    /* Ignore */
    112          1.1  christos 
    113          1.1  christos .               return (EXPOP_EOF);
    114          1.1  christos %%
    115          1.1  christos 
    116          1.1  christos /*
    117          1.1  christos  * Local support functions
    118          1.1  christos  */
    119          1.1  christos YY_BUFFER_STATE         LexBuffer;
    120          1.1  christos 
    121          1.1  christos 
    122          1.1  christos /******************************************************************************
    123          1.1  christos  *
    124          1.1  christos  * FUNCTION:    PrInitLexer
    125          1.1  christos  *
    126          1.1  christos  * PARAMETERS:  String              - Input string to be parsed
    127          1.1  christos  *
    128          1.1  christos  * RETURN:      TRUE if parser returns NULL. FALSE otherwise.
    129          1.1  christos  *
    130          1.1  christos  * DESCRIPTION: Initialization routine for lexer. The lexer needs
    131          1.1  christos  *              a buffer to handle strings instead of a file.
    132          1.1  christos  *
    133          1.1  christos  *****************************************************************************/
    134          1.1  christos 
    135          1.1  christos int
    136          1.1  christos PrInitLexer (
    137          1.1  christos     char                    *String)
    138          1.1  christos {
    139          1.1  christos 
    140          1.1  christos     LexBuffer = yy_scan_string (String);
    141          1.1  christos     return (LexBuffer == NULL);
    142          1.1  christos }
    143          1.1  christos 
    144          1.1  christos 
    145          1.1  christos /******************************************************************************
    146          1.1  christos  *
    147          1.1  christos  * FUNCTION:    PrTerminateLexer
    148          1.1  christos  *
    149          1.1  christos  * PARAMETERS:  None
    150          1.1  christos  *
    151          1.1  christos  * RETURN:      None
    152          1.1  christos  *
    153          1.1  christos  * DESCRIPTION: Termination routine for thelexer.
    154          1.1  christos  *
    155          1.1  christos  *****************************************************************************/
    156          1.1  christos 
    157          1.1  christos void
    158          1.1  christos PrTerminateLexer (
    159          1.1  christos     void)
    160          1.1  christos {
    161          1.1  christos 
    162          1.1  christos     yy_delete_buffer (LexBuffer);
    163          1.1  christos }
    164  1.1.1.2.2.2     skrll 
    165  1.1.1.2.2.2     skrll 
    166  1.1.1.2.2.2     skrll /********************************************************************************
    167  1.1.1.2.2.2     skrll  *
    168  1.1.1.2.2.2     skrll  * FUNCTION:    PrDoCommentType1
    169  1.1.1.2.2.2     skrll  *
    170  1.1.1.2.2.2     skrll  * PARAMETERS:  none
    171  1.1.1.2.2.2     skrll  *
    172  1.1.1.2.2.2     skrll  * RETURN:      none
    173  1.1.1.2.2.2     skrll  *
    174  1.1.1.2.2.2     skrll  * DESCRIPTION: Process a new legacy comment. Just toss it.
    175  1.1.1.2.2.2     skrll  *
    176  1.1.1.2.2.2     skrll  ******************************************************************************/
    177  1.1.1.2.2.2     skrll 
    178  1.1.1.2.2.2     skrll static char
    179  1.1.1.2.2.2     skrll PrDoCommentType1 (
    180  1.1.1.2.2.2     skrll     void)
    181  1.1.1.2.2.2     skrll {
    182  1.1.1.2.2.2     skrll     int                 c;
    183  1.1.1.2.2.2     skrll 
    184  1.1.1.2.2.2     skrll 
    185  1.1.1.2.2.2     skrll Loop:
    186  1.1.1.2.2.2     skrll     while (((c = input ()) != '*') && (c != EOF))
    187  1.1.1.2.2.2     skrll     {
    188  1.1.1.2.2.2     skrll     }
    189  1.1.1.2.2.2     skrll     if (c == EOF)
    190  1.1.1.2.2.2     skrll     {
    191  1.1.1.2.2.2     skrll         return (FALSE);
    192  1.1.1.2.2.2     skrll     }
    193  1.1.1.2.2.2     skrll 
    194  1.1.1.2.2.2     skrll     if (((c = input ()) != '/') && (c != EOF))
    195  1.1.1.2.2.2     skrll     {
    196  1.1.1.2.2.2     skrll         unput (c);
    197  1.1.1.2.2.2     skrll         goto Loop;
    198  1.1.1.2.2.2     skrll     }
    199  1.1.1.2.2.2     skrll     if (c == EOF)
    200  1.1.1.2.2.2     skrll     {
    201  1.1.1.2.2.2     skrll         return (FALSE);
    202  1.1.1.2.2.2     skrll     }
    203  1.1.1.2.2.2     skrll 
    204  1.1.1.2.2.2     skrll     return (TRUE);
    205  1.1.1.2.2.2     skrll }
    206  1.1.1.2.2.2     skrll 
    207  1.1.1.2.2.2     skrll 
    208  1.1.1.2.2.2     skrll /********************************************************************************
    209  1.1.1.2.2.2     skrll  *
    210  1.1.1.2.2.2     skrll  * FUNCTION:    PrDoCommentType2
    211  1.1.1.2.2.2     skrll  *
    212  1.1.1.2.2.2     skrll  * PARAMETERS:  none
    213  1.1.1.2.2.2     skrll  *
    214  1.1.1.2.2.2     skrll  * RETURN:      none
    215  1.1.1.2.2.2     skrll  *
    216  1.1.1.2.2.2     skrll  * DESCRIPTION: Process a new "//" comment. Just toss it.
    217  1.1.1.2.2.2     skrll  *
    218  1.1.1.2.2.2     skrll  ******************************************************************************/
    219  1.1.1.2.2.2     skrll 
    220  1.1.1.2.2.2     skrll static char
    221  1.1.1.2.2.2     skrll PrDoCommentType2 (
    222  1.1.1.2.2.2     skrll     void)
    223  1.1.1.2.2.2     skrll {
    224  1.1.1.2.2.2     skrll     int                 c;
    225  1.1.1.2.2.2     skrll 
    226  1.1.1.2.2.2     skrll 
    227  1.1.1.2.2.2     skrll     while (((c = input ()) != '\n') && (c != EOF))
    228  1.1.1.2.2.2     skrll     {
    229  1.1.1.2.2.2     skrll     }
    230  1.1.1.2.2.2     skrll     if (c == EOF)
    231  1.1.1.2.2.2     skrll     {
    232  1.1.1.2.2.2     skrll         return (FALSE);
    233  1.1.1.2.2.2     skrll     }
    234  1.1.1.2.2.2     skrll 
    235  1.1.1.2.2.2     skrll     return (TRUE);
    236  1.1.1.2.2.2     skrll }
    237