1

/*

     2

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

     3

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

     4

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

     5

 *

     6

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

     7

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

     8

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

     9

 *  (at your option) any later version.

    10

 *

    11

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

    12

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

    13

 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

    14

 *  GNU General Public License for more details.

    15

 *

    16

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

    17

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

    18

 *

    19

 *

    20

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

    21

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

    22

 */

    23

    24

/*

    25

 * An IEC 61131-3 compiler.

    26

 *

    27

 * Based on the

    28

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

    29

 *

    30

 */

    31

    32

    33

/*

    34

 * VISITOR.HH

    35

 *

    36

 *

    37

 * The asbract syntax tree is scaned several times

    38

 * during the whole compilation process. For e.g., stage 3 verifies

    39

 * semantics, and stage 4 produces output.

    40

 *

    41

 * Since the number of functions that need to scan through

    42

 * the abtract syntax tree may increase in time, (e.g. new

    43

 * output formats, new semantic checks, etc...) while the

    44

 * abstract syntax tree class structure is pretty stable

    45

 * (i.e. the ST and IL languages will not be changing much...),

    46

 * we use the 'visitor' design patern.

    47

 *

    48

 * It is not strictly necessary to use this pattern, but it does

    49

 * have the advantage of bringing together the functions

    50

 * that implement the same algorithm, each on a different

    51

 * class of object in the abstract syntax tree.

    52

 *

    53

 *

    54

 * This file contains the interface that each visitor class

    55

 * must implement in order to be able to visit the abstract

    56

 * syntax tree (class visitor_c)

    57

 *

    58

 * Three implementations of this interface are also provided,

    59

 * that may be later extended to execute a particular algorithm.

    60

 *

    61

 * The null (class null_visitor_c) does nothing.

    62

 *

    63

 * The iterator (class iterator_visitor_c) iterates through

    64

 * every object in the syntax tree.

    65

 *

    66

 * The search class (class search_visitor_c) iterates through

    67

 * every object, until one returns a value != NULL.

    68

 */

    69

    70

    71

#ifndef _VISITOR_HH

    72

#define _VISITOR_HH

    73

    74

    75

    76

    77

#include "absyntax.hh"

    78

    79

    80

    81

#define SYM_LIST(class_name_c, ...)	\

    82

  virtual void *visit(class_name_c *symbol) = 0;

    83

    84

#define SYM_TOKEN(class_name_c, ...)	\

    85

  virtual void *visit(class_name_c *symbol) = 0;

    86

    87

#define SYM_REF0(class_name_c, ...)	\

    88

  virtual void *visit(class_name_c *symbol) = 0;

    89

    90

#define SYM_REF1(class_name_c, ref1, ...)		\

    91

  virtual void *visit(class_name_c *symbol) = 0;

    92

    93

#define SYM_REF2(class_name_c, ref1, ref2, ...)	\

    94

  virtual void *visit(class_name_c *symbol) = 0;

    95

    96

#define SYM_REF3(class_name_c, ref1, ref2, ref3, ...)	\

    97

  virtual void *visit(class_name_c *symbol) = 0;

    98

    99

#define SYM_REF4(class_name_c, ref1, ref2, ref3, ref4, ...)	\

   100

  virtual void *visit(class_name_c *symbol) = 0;

   101

   102

#define SYM_REF5(class_name_c, ref1, ref2, ref3, ref4, ref5, ...)		\

   103

  virtual void *visit(class_name_c *symbol) = 0;

   104

   105

#define SYM_REF6(class_name_c, ref1, ref2, ref3, ref4, ref5, ref6, ...)	\

   106

  virtual void *visit(class_name_c *symbol) = 0;

   107

   108

class visitor_c {

   109

  public:

   110

  #include "absyntax.def"

   111

   112

  virtual ~visitor_c(void);

   113

};

   114

   115

#undef SYM_LIST

   116

#undef SYM_TOKEN

   117

#undef SYM_REF0

   118

#undef SYM_REF1

   119

#undef SYM_REF2

   120

#undef SYM_REF3

   121

#undef SYM_REF4

   122

#undef SYM_REF5

   123

#undef SYM_REF6

   124

   125

   126

   127

   128

   129

   130

#define SYM_LIST(class_name_c, ...)	\

   131

  virtual void *visit(class_name_c *symbol);

   132

   133

#define SYM_TOKEN(class_name_c, ...)	\

   134

  virtual void *visit(class_name_c *symbol);

   135

   136

#define SYM_REF0(class_name_c, ...)	\

   137

  virtual void *visit(class_name_c *symbol);

   138

   139

#define SYM_REF1(class_name_c, ref1, ...)		\

   140

  virtual void *visit(class_name_c *symbol);

   141

   142

#define SYM_REF2(class_name_c, ref1, ref2, ...)	\

   143

  virtual void *visit(class_name_c *symbol);

   144

   145

#define SYM_REF3(class_name_c, ref1, ref2, ref3, ...)	\

   146

  virtual void *visit(class_name_c *symbol);

   147

   148

#define SYM_REF4(class_name_c, ref1, ref2, ref3, ref4, ...)	\

   149

  virtual void *visit(class_name_c *symbol);

   150

   151

#define SYM_REF5(class_name_c, ref1, ref2, ref3, ref4, ref5, ...)		\

   152

  virtual void *visit(class_name_c *symbol);

   153

   154

#define SYM_REF6(class_name_c, ref1, ref2, ref3, ref4, ref5, ref6, ...)	\

   155

  virtual void *visit(class_name_c *symbol);

   156

   157

   158

   159

   160

   161

class null_visitor_c: public visitor_c {

   162

  public:

   163

  #include "absyntax.def"

   164

   165

  virtual ~null_visitor_c(void);

   166

};

   167

   168

   169

   170

class iterator_visitor_c: public visitor_c {

   171

  protected:

   172

  void *visit_list(list_c *list);

   173

   174

  public:

   175

  #include "absyntax.def"

   176

   177

  virtual ~iterator_visitor_c(void);

   178

};

   179

   180

   181

class search_visitor_c: public visitor_c {

   182

  protected:

   183

  void *visit_list(list_c *list);

   184

   185

  public:

   186

  #include "absyntax.def"

   187

   188

  virtual ~search_visitor_c(void);

   189

};

   190

   191

   192

#undef SYM_LIST

   193

#undef SYM_TOKEN

   194

#undef SYM_REF0

   195

#undef SYM_REF1

   196

#undef SYM_REF2

   197

#undef SYM_REF3

   198

#undef SYM_REF4

   199

#undef SYM_REF5

   200

#undef SYM_REF6

   201

   202

#endif /*  _VISITOR_HH */