1

/*

     2

 *  matiec - a compiler for the programming languages defined in IEC 61131-3

     3

 *

     4

 *  Copyright (C) 2009-2011  Mario de Sousa (msousa@fe.up.pt)

     5

 *  Copyright (C) 2007-2011  Laurent Bessard and Edouard Tisserant

     6

 *

     7

 *  This program is free software: you can redistribute it and/or modify

     8

 *  it under the terms of the GNU General Public License as published by

     9

 *  the Free Software Foundation, either version 3 of the License, or

    10

 *  (at your option) any later version.

    11

 *

    12

 *  This program is distributed in the hope that it will be useful,

    13

 *  but WITHOUT ANY WARRANTY; without even the implied warranty of

    14

 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

    15

 *  GNU General Public License for more details.

    16

 *

    17

 *  You should have received a copy of the GNU General Public License

    18

 *  along with this program.  If not, see <http://www.gnu.org/licenses/>.

    19

 *

    20

 *

    21

 * This code is made available on the understanding that it will not be

    22

 * used in safety-critical situations without a full and competent review.

    23

 */

    24

    25

/*

    26

 * An IEC 61131-3 compiler.

    27

 *

    28

 * Based on the

    29

 * FINAL DRAFT - IEC 61131-3, 2nd Ed. (2001-12-10)

    30

 *

    31

 */

    32

    33

    34

/*

    35

 * Iterate through all declared functions and Function Blocks, 

    36

 * and, for each function/FB, add a declaration of the EN and ENO 

    37

 * parameters, if they have not already been explicitly declared.

    38

 *

    39

 * EN and ENO parameters declared explicitly (by the user in the source code)

    40

 * and implicitly (by the comnpiler, i.e. by this visitor class) may be

    41

 * distinguished later on by the 'method' flag in the en_param_declaration_c

    42

 * and eno_param_declaration_c objects.

    43

 */

    44

    45

#include "../absyntax/visitor.hh"

    46

    47

    48

class add_en_eno_param_decl_c : public null_visitor_c {

    49

  public:

    50

    static symbol_c *add_to(symbol_c *tree_root);

    51

    ~add_en_eno_param_decl_c(void);

    52

    53

  private:

    54

    /* this class is a singleton. So we need a pointer to the single instance... */

    55

    static add_en_eno_param_decl_c *singleton;

    56

    57

    /* flags to remember whether the EN and/or ENO parameters have already

    58

     * been explicitly declared by the user in the IEC 61131-3 source code we are parsing...

    59

     */

    60

    bool en_declared;

    61

    bool eno_declared;

    62

    63

  private:

    64

    void* iterate_list(list_c *list);

    65

    input_declarations_c  *build_en_param (void);

    66

    output_declarations_c *build_eno_param(void);

    67

    68

  private:

    69

    /***************************/

    70

    /* B 0 - Programming Model */

    71

    /***************************/

    72

    void *visit(library_c *symbol);

    73

    74

    /***********************/

    75

    /* B 1.5.1 - Functions */

    76

    /***********************/

    77

    void *visit(function_declaration_c *symbol);

    78

    /* intermediate helper symbol for function_declaration */

    79

    void *visit(var_declarations_list_c *symbol);

    80

    81

    /******************************************/

    82

    /* B 1.4.3 - Declaration & Initialisation */

    83

    /******************************************/

    84

    void *visit(input_declarations_c *symbol);

    85

    void *visit(input_declaration_list_c *symbol);

    86

    void *visit(en_param_declaration_c *symbol);

    87

    void *visit(eno_param_declaration_c *symbol);

    88

    void *visit(output_declarations_c *symbol);

    89

    void *visit(var_init_decl_list_c *symbol);

    90

    91

    /*****************************/

    92

    /* B 1.5.2 - Function Blocks */

    93

    /*****************************/

    94

    /*  FUNCTION_BLOCK derived_function_block_name io_OR_other_var_declarations function_block_body END_FUNCTION_BLOCK */

    95

    void *visit(function_block_declaration_c *symbol);

    96

    97

}; // function_param_iterator_c

    98

    99

   100

   101

   102

   103

   104