1 //
2 // ipv2.cc
3 //
4 // Copyright (C) 1996 Limit Point Systems, Inc.
5 //
6 // Author: Curtis Janssen <cljanss@limitpt.com>
7 // Maintainer: LPS
8 //
9 // This file is part of the SC Toolkit.
10 //
11 // The SC Toolkit is free software; you can redistribute it and/or modify
12 // it under the terms of the GNU Library General Public License as published by
13 // the Free Software Foundation; either version 2, or (at your option)
14 // any later version.
15 //
16 // The SC Toolkit is distributed in the hope that it will be useful,
17 // but WITHOUT ANY WARRANTY; without even the implied warranty of
18 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19 // GNU Library General Public License for more details.
20 //
21 // You should have received a copy of the GNU Library General Public License
22 // along with the SC Toolkit; see the file COPYING.LIB. If not, write to
23 // the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
24 //
25 // The U.S. Government is granted a limited license as per AL 91-7.
26 //
27
28 #ifdef __GNUG__
29 #pragma implementation
30 #endif
31
32 #include <stdlib.h>
33 #include <string.h>
34
35 #include <util/keyval/ipv2.h>
36 #include <util/keyval/ipv2_parse.h>
37
38 using namespace std;
39 using namespace sc;
40
IPV2()41 IPV2::IPV2():
42 filename_(0),
43 table_keywords(0),
44 current_table_keyword(0),
45 table_sub_tree(0),
46 table_array_depth(0),
47 karray_indices(0),
48 sub_tree(0),
49 cwkstack(0),
50 ip_initialized(0),
51 ip_in(0),
52 ip_out(0),
53 ip_tree(0),
54 ip_cwk(0),
55 ip_keyword(0)
56 {
57 lastkeyword[0] = '\0';
58 lexer = new IPV2FlexLexer;
59 }
60
~IPV2()61 IPV2::~IPV2()
62 {
63 if (ip_tree) ip_free_keyword_tree(ip_tree);
64 ip_tree = 0;
65 delete lexer;
66 delete[] filename_;
67 free_keyword_tree_list(ip_cwk);
68 }
69
read(istream & in,ostream & out,const char * filename)70 void IPV2::read(istream&in,ostream&out,const char *filename)
71 {
72 delete[] filename_;
73 if (filename) {
74 filename_ = strcpy(new char[strlen(filename)+1], filename);
75 }
76 else filename_ = 0;
77 if (ip_initialized) {
78 ip_append(in,out);
79 }
80 else {
81 ip_initialize(in,out);
82 cwk_root();
83 }
84 }
85
yerror(const char * s)86 void IPV2::yerror(const char* s)
87 {
88 error(s);
89 }
90
91 /* Show position. */
92 void
showpos()93 IPV2::showpos()
94 {
95 ExEnv::errn() << "error occurred at line number "
96 << lexer->lineno() << " (roughly)" << endl;
97 if (filename_) {
98 ExEnv::errn() << "in file \"" << filename_ << "\"";
99 }
100 ExEnv::errn() << endl;
101 }
102
103 /////////////////////////////////////////////////////////////////////////////
104
105 // Local Variables:
106 // mode: c++
107 // c-file-style: "CLJ"
108 // End:
109