package fakescript;

import java.io.BufferedReader;

import java.io.File;

import java.io.FileInputStream;

import java.io.InputStreamReader;

import java.io.Reader;

import java.util.ArrayList;

import java.util.Arrays;

import java.util.HashMap;

class parser

{

private fake m_f;

private int m_parse_dep = 0;

private ArrayList<String> m_parsing_file_list = new ArrayList<String>();

// const永久存在映射

private HashMap<String, variant> m_constv_map = new HashMap<String, variant>();

private HashMap<String, Integer> m_constline_map = new HashMap<String, Integer>();

public parser(fake f)

{

m_f = f;

}

public void clear()

{

m_parse_dep = 0;

m_parsing_file_list.clear();

}

public void reg_const_define(String constname, variant v, int lineno)

{

m_constv_map.put(constname, v);

m_constline_map.put(constname, lineno);

}

public variant get_const_define(String constname)

{

return m_constv_map.get(constname);

}

public int get_const_define_lineno(String constname)

{

return m_constline_map.get(constname);

}

public boolean parsestr(String str)

{

// 解析语法

java.io.Reader reader = new java.io.StringReader(str);

cup yyp = new cup();

jflex f = new jflex(reader);

f.set_fake(m_f);

yyp.setScanner(f);

mycup mcp = new mycup(m_f, f);

mcp.set_filename("");

yyp.set_mycup(mcp);

try

{

yyp.parse();

}

catch (Exception e)

{

types.seterror(m_f, "", fk.getcurline(m_f), fk.getcurfunc(m_f),

"parse " + "" + " fail " + types.show_exception(e));

return false;

}

// 编译

try

{

compiler mc = new compiler(m_f, mcp);

if (!mc.compile())

{

return false;

}

}

catch (Exception e)

{

types.seterror(m_f, "", fk.getcurline(m_f), fk.getcurfunc(m_f),

"compiler " + "" + " fail " + types.show_exception(e));

return false;

}

types.log(m_f, "parse str OK");

return true;

}

public boolean parse(String filename)

{

m_parse_dep++;

// 检查深度

if (m_parse_dep >= m_f.cfg.include_deps)

{

types.seterror(m_f, filename, 0, "", "parse " + filename + " file too deep " + m_parse_dep);

return false;

}

// 检查当前文件是否在解析中

if (is_parsing(filename))

{

types.seterror(m_f, filename, 0, "",

"already parsing " + filename + " file...include list \n" + get_parsing_file_list());

return false;

}

// 加入

m_parsing_file_list.add(filename);

// 输入源文件

String content = read_file(filename);

if (content.isEmpty())

{

return false;

}

// 解析语法

java.io.Reader reader = new java.io.StringReader(content);

cup yyp = new cup();

jflex f = new jflex(reader);

f.set_fake(m_f);

yyp.setScanner(f);

mycup mcp = new mycup(m_f, f);

mcp.set_filename(filename);

yyp.set_mycup(mcp);

try

{

yyp.parse();

}

catch (Exception e)

{

types.seterror(m_f, filename, f.get_line() + 1, fk.getcurfunc(m_f),

"parse " + filename + " fail " + types.show_exception(e));

return false;

}

// 编译

try

{

compiler mc = new compiler(m_f, mcp);

if (!mc.compile())

{

return false;

}

}

catch (Exception e)

{

types.seterror(m_f, filename, fk.getcurline(m_f), fk.getcurfunc(m_f),

"compiler " + filename + " fail " + types.show_exception(e));

return false;

}

// 弹出

m_parsing_file_list.remove(m_parsing_file_list.size() - 1);

types.log(m_f, "parse " + filename + " OK");

return true;

}

private String read_file(String filename)

{

File file = new File(filename);

if (!file.isFile() || !file.exists())

{

types.seterror(m_f, filename, 0, "", "open " + filename + " fail");

return "";

}

try

{

String ret = "";

String encoding = "utf-8";

Reader reader = new InputStreamReader(new FileInputStream(file), encoding);

BufferedReader bufferedReader = new BufferedReader(reader);

char[] readbuff = new char[10];

while (bufferedReader.read(readbuff) != -1)

{

ret += String.valueOf(readbuff);

Arrays.fill(readbuff, '\0');

}

reader.close();

types.log(m_f, ret);

return ret;

}

catch (Exception e)

{

types.seterror(m_f, filename, 0, "", "read " + filename + " fail " + types.show_exception(e));

return "";

}

}

private boolean is_parsing(String filename)

{

boolean ret = false;

for (int i = 0; i < (int) m_parsing_file_list.size(); i++)

{

if (m_parsing_file_list.get(i) == filename)

{

return true;

}

}

return ret;

}

private String get_parsing_file_list()

{

String ret = "";

for (int i = 0; i < (int) m_parsing_file_list.size(); i++)

{

ret += m_parsing_file_list.get(i);

ret += "\n";

}

return ret;

}

}