/* 
 *  Copyright (C) 2000 - 2010 TagServlet Ltd
 *
 *  This file is part of Open BlueDragon (OpenBD) CFML Server Engine.
 *  
 *  OpenBD is free software: you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  Free Software Foundation,version 3.
 *  
 *  OpenBD is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *  
 *  You should have received a copy of the GNU General Public License
 *  along with OpenBD.  If not, see http://www.gnu.org/licenses/
 *  
 *  Additional permission under GNU GPL version 3 section 7
 *  
 *  If you modify this Program, or any covered work, by linking or combining 
 *  it with any of the JARS listed in the README.txt (or a modified version of 
 *  (that library), containing parts covered by the terms of that JAR, the 
 *  licensors of this Program grant you additional permission to convey the 
 *  resulting work. 
 *  README.txt @ http://www.openbluedragon.org/license/README.txt
 *  
 *  http://www.openbluedragon.org/
 */

package com.naryx.tagfusion.cfm.parser.script;

import java.util.HashMap;
import java.util.Iterator;
import java.util.List;
import java.util.Map;

import org.antlr.runtime.Token;

import com.naryx.tagfusion.cfm.parser.CFContext;
import com.naryx.tagfusion.cfm.parser.CFExpression;
import com.naryx.tagfusion.cfm.parser.CFLiteral;
import com.naryx.tagfusion.cfm.parser.ParseException;
import com.naryx.tagfusion.cfm.tag.cfTag;

public class CFFuncDeclStatement extends CFParsedStatement implements java.io.Serializable {

	private static final long serialVersionUID = 1L;

	private String name;

	private List<CFFunctionParameter> formals; // Vector of String's

	private Map<String, String> attributes;

	private CFScriptStatement body;

	private byte access;

	private String returnType;

	// TODO: prevent function declared inside function. May want to do this elsewhere
	public CFFuncDeclStatement(Token _t, Token _name, String _access, String _returnType, List<CFFunctionParameter> _formals, Map<String, CFExpression> _attr, CFScriptStatement _body) {
		super(_t);
		name = _name.getText();
		formals = _formals;
		body = _body;
		returnType = _returnType;

		access = userDefinedFunction.ACCESS_PUBLIC;
		if (_access != null) {
			String accessStr = _access.toUpperCase();
			if (accessStr.equals("PUBLIC")) {
				access = userDefinedFunction.ACCESS_PUBLIC;
			} else if (accessStr.equals("PRIVATE")) {
				access = userDefinedFunction.ACCESS_PRIVATE;
			} else if (accessStr.equals("REMOTE")) {
				access = userDefinedFunction.ACCESS_REMOTE;
			} else if (accessStr.equals("PACKAGE")) {
				access = userDefinedFunction.ACCESS_PACKAGE;
			} else {
				throw new ParseException(_name, "Invalid access type name \"" + _access + "\" is not supported.");
			}
		}

		if (com.naryx.tagfusion.expression.compile.expressionEngine.isFunction(name))
			throw new ParseException(_name, "Invalid function name. The name \"" + name + "\" is the name of a predefined function.");

		// handle the function attributes
		attributes = new HashMap<String, String>();
		Iterator<String> keys = _attr.keySet().iterator();
		while (keys.hasNext()) {
			String nextKey = keys.next();
			CFExpression nextExpr = _attr.get(nextKey);
			if (!(nextExpr instanceof CFLiteral)) {
				throw new ParseException(_name, "The attribute " + nextKey.toUpperCase() + " must have a constant value");
			}

			attributes.put(nextKey, ((CFLiteral) nextExpr).getStringImage());
		}

	}

	public void setHostTag(cfTag _parentTag) {
		super.setHostTag(_parentTag);
		body.setHostTag(_parentTag);
	}

	public CFScriptStatement getBody() {
		return body;
	}

	public void checkIndirectAssignments(String[] scriptSource) {
		body.checkIndirectAssignments(scriptSource);
	}

	public userDefinedFunction getUDF() {
		return new userDefinedFunction(name, access, returnType, formals, attributes, body);
	}

	public CFStatementResult Exec(CFContext context) {
		return null;
	}

	public String Decompile(int indent) {
		StringBuilder sb = new StringBuilder();
		sb.append(Indent(indent));
		switch (access) {
			case userDefinedFunction.ACCESS_PUBLIC:
				sb.append("public");
				break;
			case userDefinedFunction.ACCESS_PRIVATE:
				sb.append("private");
				break;
			case userDefinedFunction.ACCESS_REMOTE:
				sb.append("remote");
				break;
			case userDefinedFunction.ACCESS_PACKAGE:
				sb.append("package");
				break;
		}

		if (returnType != null) {
			sb.append(" ");
			sb.append(returnType);
		}

		sb.append(" function ");

		sb.append(name);
		sb.append("(");
		for (int i = 0; i < formals.size(); i++) {
			sb.append(formals.get(i));
			if (i != formals.size() - 1) {
				sb.append(", ");
			}
		}
		sb.append(") {\n");
		sb.append(body.Decompile(indent + 2));
		sb.append("\n");
		sb.append(Indent(indent));
		sb.append("}");

		return sb.toString();
	}
}