include/isl/stream.h

   1 /*
   2  * Copyright 2008-2009 Katholieke Universiteit Leuven
   3  *
   4  * Use of this software is governed by the GNU LGPLv2.1 license
   5  *
   6  * Written by Sven Verdoolaege, K.U.Leuven, Departement
   7  * Computerwetenschappen, Celestijnenlaan 200A, B-3001 Leuven, Belgium
   8  */
   9
  10 #ifndef ISL_STREAM_H
  11 #define ISL_STREAM_H
  12
  13 #include <stdio.h>
  14 #include <isl/hash.h>
  15 #include <isl/obj.h>
  16
  17 #if defined(__cplusplus)
  18 extern "C" {
  19 #endif
  20
  21 enum isl_token_type { ISL_TOKEN_ERROR = -1,
  22                         ISL_TOKEN_UNKNOWN = 256, ISL_TOKEN_VALUE,
  23                         ISL_TOKEN_IDENT, ISL_TOKEN_GE,
  24                         ISL_TOKEN_LE, ISL_TOKEN_GT, ISL_TOKEN_LT,
  25                         ISL_TOKEN_LEX_GE, ISL_TOKEN_LEX_LE,
  26                         ISL_TOKEN_LEX_GT, ISL_TOKEN_LEX_LT,
  27                         ISL_TOKEN_TO, ISL_TOKEN_AND,
  28                         ISL_TOKEN_OR, ISL_TOKEN_EXISTS,
  29                         ISL_TOKEN_DEF, ISL_TOKEN_INFTY, ISL_TOKEN_NAN,
  30                         ISL_TOKEN_MAX,
  31                         ISL_TOKEN_STRING,
  32                         ISL_TOKEN_LAST };
  33
  34 struct isl_token {
  35         enum isl_token_type  type;
  36
  37         unsigned int on_new_line : 1;
  38         int line;
  39         int col;
  40
  41         union {
  42                 isl_int v;
  43                 char    *s;
  44         } u;
  45 };
  46
  47 void isl_token_free(struct isl_token *tok);
  48
  49 struct isl_stream {
  50         struct isl_ctx  *ctx;
  51         FILE            *file;
  52         const char      *str;
  53         int             line;
  54         int             col;
  55         int             eof;
  56
  57         char            *buffer;
  58         size_t          size;
  59         size_t          len;
  60         int             c;
  61
  62         struct isl_token        *tokens[5];
  63         int             n_token;
  64
  65         struct isl_hash_table   *keywords;
  66         enum isl_token_type      next_type;
  67 };
  68
  69 struct isl_stream* isl_stream_new_file(struct isl_ctx *ctx, FILE *file);
  70 struct isl_stream* isl_stream_new_str(struct isl_ctx *ctx, const char *str);
  71 void isl_stream_free(struct isl_stream *s);
  72
  73 void isl_stream_error(struct isl_stream *s, struct isl_token *tok, char *msg);
  74
  75 struct isl_token *isl_stream_next_token(struct isl_stream *s);
  76 struct isl_token *isl_stream_next_token_on_same_line(struct isl_stream *s);
  77 int isl_stream_next_token_is(struct isl_stream *s, int type);
  78 void isl_stream_push_token(struct isl_stream *s, struct isl_token *tok);
  79 void isl_stream_flush_tokens(struct isl_stream *s);
  80 int isl_stream_eat_if_available(struct isl_stream *s, int type);
  81 char *isl_stream_read_ident_if_available(struct isl_stream *s);
  82 int isl_stream_eat(struct isl_stream *s, int type);
  83 int isl_stream_is_empty(struct isl_stream *s);
  84 int isl_stream_skip_line(struct isl_stream *s);
  85
  86 enum isl_token_type isl_stream_register_keyword(struct isl_stream *s,
  87         const char *name);
  88
  89 struct isl_obj isl_stream_read_obj(struct isl_stream *s);
  90 __isl_give isl_map *isl_stream_read_map(struct isl_stream *s, int nparam);
  91 __isl_give isl_set *isl_stream_read_set(struct isl_stream *s, int nparam);
  92 __isl_give isl_pw_qpolynomial *isl_stream_read_pw_qpolynomial(
  93         struct isl_stream *s);
  94 __isl_give isl_union_map *isl_stream_read_union_map(struct isl_stream *s);
  95
  96 #if defined(__cplusplus)
  97 }
  98 #endif
  99
 100 #endif