/*
    *   Magic-Project is a turn based strategy simulator
    *   Copyright (C) 2003-2007 Fabrice Daugan
    *
    *   This program is free software; you can redistribute it and/or modify it 
    * under the terms of the GNU General Public License as published by the Free 
    * Software Foundation; either version 2 of the License, or (at your option) any
    * later version.
    *
   *   This program 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 this program; if not, write to the Free Software Foundation, Inc., 
   * 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
   */
  package net.sf.magicproject.xml;
  
  import java.io.File;
  import java.io.FileOutputStream;
  import java.io.FilenameFilter;
  import java.io.IOException;
  import java.io.InputStream;
  import java.io.OutputStream;
  import java.util.ArrayList;
  import java.util.HashMap;
  import java.util.List;
  import java.util.Map;
  
  import net.sf.magicproject.annotation.XmlTestElement;
  import net.sf.magicproject.token.IdConst;
  import net.sf.magicproject.tools.MToolKit;
  import net.sf.magicproject.tools.PairStringInt;
  import net.sf.magicproject.xml.XmlParser.Node;
  
  import org.apache.commons.io.filefilter.FileFilterUtils;
  import org.apache.commons.lang.StringUtils;
  import org.apache.commons.lang.WordUtils;
  import org.xml.sax.SAXException;
  import org.xml.sax.SAXParseException;
  
  /***
   * @author <a href="mailto:fabdouglas@users.sourceforge.net">Fabrice Daugan </a>
   */
  public class XmlConfiguration {
  
  	/***
  	 * Is schema validation is activated.
  	 */
  	public static boolean validationOn = false;
  
  	/***
  	 * Constructor.
  	 * 
  	 * @param configuration
  	 *          An input stream containing a complete e.g. configuration file
  	 * @exception SAXException
  	 *              parsing error.
  	 * @exception IOException
  	 *              writing error.
  	 */
  	public XmlConfiguration(InputStream configuration) throws SAXException,
  			IOException {
  		initParser();
  		synchronized (parser) {
  			config = parser.parse(configuration);
  		}
  	}
  
  	/***
  	 * 
  	 */
  	private static synchronized void initParser() {
  		if (parser != null) {
  			return;
  		}
  		parser = new XmlParser();
  	}
  
  	/***
  	 * Create a new object and configure it. A new object is created and
  	 * configured.
  	 * 
  	 * @param xmlFile
  	 *          the xml source file.
  	 * @param workingDir
  	 *          the working dir.
  	 * @param output
  	 *          the output strem of mdb file.
  	 */
  	public void newInstance(String xmlFile, String workingDir, OutputStream output) {
  		try {
  			if (XmlTools.aliasMap == null) {
  				XmlTools.aliasMap = new HashMap<String, Integer>(newIncludeInstance());
  			}
  			String tagName = config.getTag();
  			config.addAttribute(new XmlParser.Attribute("workingDir", workingDir));
 			config.addAttribute(new XmlParser.Attribute("xmlFile", xmlFile.replace(
 					'//', '/')));
 			XmlTbs.getTbsComponent(tagName).buildMdb(config, output);
 		} catch (Exception e) {
 			e.printStackTrace();
 		}
 	}
 
 	/***
 	 * Return the method name corresponding to the specified TAG.
 	 * 
 	 * @param tagName
 	 * @return the method name corresponding to the specified TAG.
 	 */
 	static XmlToMDB getXmlClass(String tagName, Map<String, XmlToMDB> instances,
 			Class<?> nameSpaceCall) {
 		if (!nameSpaceCall.getSimpleName().startsWith("Xml"))
 			throw new InternalError("Caller should be an Xml class : "
 					+ nameSpaceCall);
 
 		XmlToMDB nodeClass = instances.get(tagName);
 		if (nodeClass != null) {
 			return nodeClass;
 		}
 
 		String simpleClassName = StringUtils
 				.capitalize(tagName.replaceAll("-", ""));
 		String packageName = nameSpaceCall.getPackage().getName();
 		String namespace = nameSpaceCall.getSimpleName().substring(3).toLowerCase();
 		String className = packageName + "." + namespace + "." + simpleClassName;
 		XmlToMDB result;
 		try {
 			result = (XmlToMDB) Class.forName(className).newInstance();
 		} catch (Throwable e) {
 			try {
 				Class<?> mdbClass = null;
 				simpleClassName = WordUtils.capitalize(tagName.replaceAll("-", " "))
 						.replaceAll(" ", "");
 				className = StringUtils.chomp(packageName, ".xml") + "." + namespace
 						+ "." + simpleClassName;
 				mdbClass = Class.forName(className);
 				result = getAnnotedBuilder(mdbClass, tagName, packageName, namespace);
 			} catch (Throwable ei2) {
 				XmlConfiguration.error++;
 				System.out.println("\t>> Unsupported " + namespace + " '" + tagName
 						+ "'");
 				result = DummyBuilder.instance();
 			}
 		}
 		instances.put(tagName, result);
 		return result;
 	}
 
 	/***
 	 * @param mdbClass
 	 * @throws IllegalAccessException
 	 * @throws InstantiationException
 	 * @throws ClassNotFoundException
 	 */
 	private static XmlToMDB getAnnotedBuilder(Class<?> mdbClass, String tagName,
 			String packageName, String namespace) throws InstantiationException,
 			IllegalAccessException, ClassNotFoundException {
 		if (!mdbClass.isAnnotationPresent(XmlTestElement.class)) {
 			XmlConfiguration.error++;
 			System.out.println("\t>> Unsupported annoted " + namespace + " '"
 					+ tagName + "'");
 			return DummyBuilder.instance();
 		}
 		XmlTestElement xmlElement = mdbClass.getAnnotation(XmlTestElement.class);
 		XmlAnnoted annotedInstance = (XmlAnnoted) Class.forName(
 				packageName + "." + namespace + ".XmlAnnoted").newInstance();
 		annotedInstance.setXmlElement(xmlElement);
 		annotedInstance.setAnnotedClass(mdbClass);
 		return annotedInstance;
 	}
 
 	/***
 	 * Create a new object and configure it. A new object is created and
 	 * configured.
 	 * 
 	 * @return The newly created configured object.
 	 */
 	private Map<String, Integer> newIncludeInstance() {
 		// init exportation lists
 		exportedProperties.clear();
 		exportedTypes.clear();
 		exportedPhases.clear();
 		propertyPictures.clear();
 
 		Node aliases = XmlTools.getExternalizableNode(config, "aliases");
 		Map<String, Integer> aliasMap = new HashMap<String, Integer>();
 		// add the nocare value
 		aliasMap.put("nocare", IdConst.NO_CARE);
 		for (Node alias : aliases.getNodes("alias")) {
 			aliasMap.put(alias.getAttribute("name"), Integer.parseInt(alias
 					.getAttribute("value")));
 			final String exportation = alias.getAttribute("export");
 			if ("properties".equals(exportation)) {
 				exportedProperties.add(new PairStringInt(alias.getAttribute("name"),
 						Integer.parseInt(alias.getAttribute("value"))));
 				// property-picture association
 				final String picture = alias.getAttribute("picture");
 				if (picture != null) {
 					propertyPictures.put(Integer.parseInt(alias.getAttribute("value")),
 							picture);
 				}
 			} else if ("damage-types".equals(exportation)) {
 				exportedDamageTypes.add(new PairStringInt(alias.getAttribute("name"),
 						Integer.parseInt(alias.getAttribute("value"))));
 			} else if ("types".equals(exportation)) {
 				exportedTypes.add(new PairStringInt(alias.getAttribute("name"), Integer
 						.parseInt(alias.getAttribute("value"))));
 			} else if ("phases".equals(exportation)) {
 				exportedPhases.add(new PairStringInt(alias.getAttribute("name"),
 						Integer.parseInt(alias.getAttribute("value"))));
 			}
 		}
 		return aliasMap;
 	}
 
 	/***
 	 * <ul>
 	 * 2 modes:
 	 * <li>Update the a MDB for specified TBS against the XML files (main file,
 	 * cards and fragments). Arguments are : TBS_NAME</li>
 	 * <li>Rebuild completely the MDB for specified TBS. Arguments are : -full
 	 * TBS_NAME</li>
 	 * </ul>
 	 * 
 	 * @param args
 	 *          main arguments.
 	 */
 	public static void main(String... args) {
 		String res = "";
 		warning = 0;
 		uncompleted = 0;
 		error = 0;
 		for (String arg : args) {
 			res += ", " + arg;
 		}
 		long start = System.currentTimeMillis();
 		XmlTools.initHashMaps();
 		try {
 			if (args.length >= 2 && args[0].startsWith("-full")) {
 				validationOn = !args[0].equalsIgnoreCase("-fullO");
 				MToolKit.tbsName = args[args.length - 1];
 				// / rebuild completely the current TBS <br>
 				noPayMana = args.length > 2 && "-nopaymana".equals(args[1]);
 				final File recycledDir = new File(IdConst.TBS_DIR + "/"
 						+ MToolKit.tbsName + "/recycled");
 				if (!recycledDir.exists() || !recycledDir.isDirectory()) {
 					recycledDir.mkdir();
 				}
 
 				String xmlFile = IdConst.TBS_DIR + "/" + MToolKit.tbsName + ".xml";
 
 				new XmlConfiguration(MToolKit.getResourceAsStream(xmlFile))
 						.newInstance(xmlFile, IdConst.TBS_DIR + "/" + MToolKit.tbsName
 								+ "/recycled", new FileOutputStream(MToolKit.getTbsFile(
 								MToolKit.tbsName + ".mdb", false)));
 			} else if (args.length == 3 && args[0].startsWith("-update")) {
 				// Check the up-to-date state of MDB
 				MToolKit.tbsName = args[1];
 				String xmlFile = IdConst.TBS_DIR + "/" + MToolKit.tbsName + ".xml";
 				long lastModifiedMdb = Long.parseLong(args[2]);
 				boolean update = false;
 				// Check the up-to-date state of MDB aginst the main XML file
 				if (new File(xmlFile).lastModified() > lastModifiedMdb) {
 					// The main XML file is newer than MDB
 					System.out.println("MDB is out of date, " + xmlFile + " is newer");
 					update = true;
 				} else {
 					final File fragmentDir = new File(IdConst.TBS_DIR + "/"
 							+ MToolKit.tbsName);
 					for (File frament : fragmentDir
 							.listFiles((FilenameFilter) FileFilterUtils.andFileFilter(
 									FileFilterUtils.suffixFileFilter("xml"), FileFilterUtils
 											.prefixFileFilter("fragment-")))) {
 						if (frament.lastModified() > lastModifiedMdb) {
 							// One card is newer than MDB
 							System.out
 									.println("MDB is out of date, at least one fragment found : "
 											+ frament.getName());
 							update = true;
 							break;
 						}
 					}
 					if (!update) {
 						// Check the up-to-date state of MDB against the cards
 						final File recycledDir = new File(IdConst.TBS_DIR + "/"
 								+ MToolKit.tbsName + "/recycled");
 						if (!recycledDir.exists() || !recycledDir.isDirectory()) {
 							recycledDir.mkdir();
 						}
 						if (recycledDir.lastModified() > lastModifiedMdb) {
 							// The recycled XML file is newer than MDB
 							System.out
 									.println("MDB is out of date, the recycled directory is new");
 							update = true;
 						} else {
 							for (File card : recycledDir
 									.listFiles((FilenameFilter) FileFilterUtils.andFileFilter(
 											FileFilterUtils.suffixFileFilter("xml"), FileFilterUtils
 													.notFileFilter(FileFilterUtils
 															.suffixFileFilter(IdConst.FILE_DATABASE_SAVED))))) {
 								if (card.lastModified() > lastModifiedMdb) {
 									// One card is newer than MDB
 									System.out
 											.println("MDB is out of date, at least one new card found : "
 													+ card);
 									update = true;
 									break;
 								}
 							}
 						}
 					}
 				}
 				if (!update) {
 					return;
 				}
 				// Need to update the whole MDB
 				new XmlConfiguration(MToolKit.getResourceAsStream(xmlFile))
 						.newInstance(xmlFile, IdConst.TBS_DIR + "/" + MToolKit.tbsName
 								+ "/recycled", new FileOutputStream(IdConst.TBS_DIR + "/"
 								+ MToolKit.tbsName + "/" + MToolKit.tbsName + ".mdb"));
 			} else {
 				// one card to update
 				for (String arg : args) {
 					new XmlConfiguration(MToolKit.getResourceAsStream(arg)).newInstance(
 							arg, MToolKit.getFile(arg).getParentFile().getCanonicalPath(),
 							new FileOutputStream(MToolKit.getFile(arg + ".mdb")));
 				}
 			}
 		} catch (SAXParseException e) {
 			// Ignore this error
 		} catch (Exception e) {
 			e.printStackTrace();
 		}
 		if (warning > 0) {
 			System.out
 					.println("\t" + warning + " warning" + (warning > 1 ? "s" : ""));
 		}
 		if (error > 0) {
 			System.out.println("\t" + error + " error" + (error > 1 ? "s" : ""));
 			System.out.println("Some cards have not been built correctly. Fix them.");
 		} else {
 			System.out.println("\tSuccessfull build");
 		}
 		System.out.println("\tTime : " + (System.currentTimeMillis() - start)
 				/ 1000 + " s");
 	}
 
 	/***
 	 * 
 	 */
 	private static XmlParser parser;
 
 	/***
 	 * 
 	 */
 	private XmlParser.Node config;
 
 	/***
 	 * Exported properties
 	 */
 	public static List<PairStringInt> exportedProperties = new ArrayList<PairStringInt>();
 
 	/***
 	 * Exported properties
 	 */
 	public static Map<Integer, String> propertyPictures = new HashMap<Integer, String>();
 
 	/***
 	 * Exported types
 	 */
 	public static List<PairStringInt> exportedTypes = new ArrayList<PairStringInt>();
 
 	/***
 	 * Exported phases
 	 */
 	public static List<PairStringInt> exportedPhases = new ArrayList<PairStringInt>();
 
 	/***
 	 * Exported damage types
 	 */
 	public static List<PairStringInt> exportedDamageTypes = new ArrayList<PairStringInt>();
 
 	/***
 	 * Indicates that the next 'paymana' actions would be played the parameter
 	 * 'colorless="0"'
 	 */
 	public static boolean noPayMana;
 
 	/***
 	 * Found errors
 	 */
 	public static int error;
 
 	/***
 	 * Found warnings
 	 */
 	public static int warning;
 
 	/***
 	 * Found uncompleted cards
 	 */
 	public static int uncompleted;
 
 	/***
 	 * Indicates the debug data are saved in the mdb.
 	 * 
 	 * @return true if the debug data are saved in the mdb.
 	 */
 	public static boolean isDebugEnable() {
 		return true; // TODO use configuration to enable/disable debug on mdb
 	}
 }