restore trunk
[supertux.git] / src / lisp / parser.hpp
1 //  $Id$
2 //
3 //  SuperTux
4 //  Copyright (C) 2006 Matthias Braun <matze@braunis.de>
5 //
6 //  This program is free software; you can redistribute it and/or
7 //  modify it under the terms of the GNU General Public License
8 //  as published by the Free Software Foundation; either version 2
9 //  of the License, or (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, write to the Free Software
18 //  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
19
20 #ifndef __LISPPARSER_H__
21 #define __LISPPARSER_H__
22
23 #include <string>
24 #include "lexer.hpp"
25 #include "obstack/obstack.h"
26
27 namespace TinyGetText {
28 class Dictionary;
29 class DictionaryManager;
30 }
31
32 namespace lisp
33 {
34
35 class Lisp;
36 class LispFile;
37
38 class Parser
39 {
40 public:
41   Parser(bool translate = true);
42   ~Parser();
43
44   /**
45    * Parses a lispfile and returns the s-expression structure.
46    * Note that all memory is held by the parser so don't destroy the parser
47    * before you are finished with the lisp tree
48    */
49   const Lisp* parse(const std::string& filename);
50   /**
51    * Same as parse but reads from a generic std::istream. The sourcename is
52    * used for errormessages to indicate the source of the data.
53    */
54   const Lisp* parse(std::istream& stream, const std::string& sourcename);
55
56 private:
57   void parse_error(const char* msg) const;
58   const Lisp* read();
59
60   Lexer* lexer;
61   std::string filename;
62   TinyGetText::DictionaryManager* dictionary_manager;
63   TinyGetText::Dictionary* dictionary;
64   Lexer::TokenType token;
65
66   struct obstack obst;
67 };
68
69 } // end of namespace lisp
70
71 #endif