l2j-server-game/L2J_Server_BETA/java/com/l2jserver/tools/configurator/ConfigUserInterface.java

/*
 * 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 3 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, see <http://www.gnu.org/licenses/>.
 */
package com.l2jserver.tools.configurator;

import java.awt.GridBagConstraints;
import java.awt.GridBagLayout;
import java.awt.Insets;
import java.awt.Rectangle;
import java.awt.event.ActionEvent;
import java.awt.event.ActionListener;
import java.io.BufferedWriter;
import java.io.File;
import java.io.FileInputStream;
import java.io.FileOutputStream;
import java.io.IOException;
import java.io.InputStreamReader;
import java.io.LineNumberReader;
import java.io.OutputStreamWriter;
import java.io.Writer;
import java.net.Inet4Address;
import java.net.InetAddress;
import java.net.UnknownHostException;
import java.util.List;
import java.util.Locale;
import java.util.NoSuchElementException;
import java.util.ResourceBundle;
import java.util.regex.Matcher;
import java.util.regex.Pattern;

import javax.swing.JButton;
import javax.swing.JCheckBox;
import javax.swing.JComponent;
import javax.swing.JFrame;
import javax.swing.JLabel;
import javax.swing.JMenu;
import javax.swing.JMenuBar;
import javax.swing.JMenuItem;
import javax.swing.JOptionPane;
import javax.swing.JPanel;
import javax.swing.JScrollPane;
import javax.swing.JTabbedPane;
import javax.swing.JTextArea;
import javax.swing.JToolBar;
import javax.swing.SwingUtilities;
import javax.swing.ToolTipManager;
import javax.swing.UIManager;

import javolution.util.FastList;

import com.l2jserver.tools.configurator.ConfigUserInterface.ConfigFile.ConfigComment;
import com.l2jserver.tools.configurator.ConfigUserInterface.ConfigFile.ConfigProperty;
import com.l2jserver.tools.i18n.LanguageControl;
import com.l2jserver.tools.images.ImagesTable;

/**
 *
 * @author  KenM
 */
public class ConfigUserInterface extends JFrame implements ActionListener
{
	
	/**
	 * Comment for <code>serialVersionUID</code>
	 */
	private static final long serialVersionUID = 1L;
	
	private JTabbedPane _tabPane = new JTabbedPane();
	
	private List<ConfigFile> _configs = new FastList<ConfigFile>();
	
	private ResourceBundle _bundle;
	
	/**
	 * @param args
	 */
	public static void main(String[] args)
	{
		try
		{
			UIManager.setLookAndFeel(UIManager.getSystemLookAndFeelClassName());
		}
		catch (Exception e)
		{
			// couldn't care less
		}
		
		final ResourceBundle bundle = ResourceBundle.getBundle("configurator.Configurator", Locale.getDefault(), LanguageControl.INSTANCE);
		
		SwingUtilities.invokeLater
		(
				new Runnable()
				{
					@Override
					public void run()
					{
						ConfigUserInterface cui = new ConfigUserInterface(bundle);
						cui.setVisible(true);
					}
				}
		);
	}
	
	public ConfigUserInterface(ResourceBundle bundle)
	{
		setBundle(bundle);
		this.setTitle(bundle.getString("toolName"));
		this.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);
		this.setSize(750, 500);
		this.setLayout(new GridBagLayout());
		
		setDefaultLookAndFeelDecorated(true);
		setIconImage(ImagesTable.getImage("l2j.png").getImage());
		
		GridBagConstraints cons = new GridBagConstraints();
		cons.fill = GridBagConstraints.HORIZONTAL;
		cons.gridx = 0;
		cons.gridy = 0;
		cons.weighty = 0;
		cons.weightx = 1;
		
		JMenuBar menubar = new JMenuBar();
		
		JMenu fileMenu = new JMenu(bundle.getString("fileMenu"));
		JMenu helpMenu = new JMenu(bundle.getString("helpMenu"));
		
		JMenuItem exitItem = new JMenuItem(bundle.getString("exitItem"));
		exitItem.setActionCommand("exit");
		exitItem.addActionListener(this);
		fileMenu.add(exitItem);
		
		JMenuItem aboutItem = new JMenuItem(bundle.getString("aboutItem"));
		aboutItem.setActionCommand("about");
		aboutItem.addActionListener(this);
		helpMenu.add(aboutItem);
		
		menubar.add(fileMenu);
		menubar.add(helpMenu);
		
		this.setJMenuBar(menubar);
		
		JToolBar toolBar = new JToolBar();
		toolBar.setFloatable(false);
		toolBar.setRollover(true);
		toolBar.add(this.createToolButton("disk.png", bundle.getString("save"), "save"));
		this.add(toolBar, cons);
		
		cons.gridy++;
		cons.fill = GridBagConstraints.BOTH;
		cons.weighty = 1;
		this.loadConfigs();
		this.buildInterface();
		this.add(_tabPane, cons);
	}
	
	private JButton createToolButton(String image, String text, String action)
	{
		JButton button = new JButton(text, ImagesTable.getImage(image));
		button.setActionCommand(action);
		button.addActionListener(this);
		return button;
	}
	
	/**
	 * 
	 */
	@SuppressWarnings("serial")
	private void buildInterface()
	{
		ToolTipManager.sharedInstance().setDismissDelay(Integer.MAX_VALUE);
		ToolTipManager.sharedInstance().setInitialDelay(0);
		ToolTipManager.sharedInstance().setReshowDelay(0);
		
		GridBagConstraints cons = new GridBagConstraints();
		cons.fill = GridBagConstraints.NONE;
		cons.anchor = GridBagConstraints.FIRST_LINE_START;
		cons.insets = new Insets(2, 2, 2, 2);
		for (ConfigFile cf : getConfigs())
		{
			JPanel panel = new JPanel() {
				@Override
				public void scrollRectToVisible(Rectangle r ) {}
			};
			panel.setLayout(new GridBagLayout());
			
			cons.gridy = 0;
			cons.weighty = 0;
			for (ConfigComment cc : cf.getConfigProperties())
			{
				if (!(cc instanceof ConfigProperty))
				{
					continue;
				}
				
				ConfigProperty cp = (ConfigProperty) cc;
				cons.gridx = 0;
				
				JLabel keyLabel = new JLabel(cp.getDisplayName()+':', ImagesTable.getImage("help.png"), JLabel.LEFT);
				String comments = "<b>"+cp.getName()+":</b><br>"+cp.getComments();
				comments = comments.replace("\r\n", "<br>");
				comments = "<html>"+comments+"</html>";
				keyLabel.setToolTipText(comments);
				cons.weightx = 0;
				panel.add(keyLabel, cons);
				cons.gridx++;
				
				JComponent valueComponent = cp.getValueComponent();
				valueComponent.setToolTipText(comments);
				cons.weightx = 1;
				panel.add(valueComponent, cons);
				cons.gridx++;
				cons.gridy++;
			}
			cons.gridy++;
			cons.weighty = 1;
			panel.add(new JLabel(), cons); // filler
			_tabPane.addTab(cf.getName(), new JScrollPane(panel));
		}
	}
	
	/**
	 * 
	 */
	private void loadConfigs()
	{
		File configsDir = new File("config");
		for (File file : configsDir.listFiles())
		{
			if (file.getName().endsWith(".properties") && file.isFile() && file.canWrite())
			{
				try
				{
					this.parsePropertiesFile(file);
				}
				catch (IOException e)
				{
					JOptionPane.showMessageDialog(ConfigUserInterface.this,getBundle().getString("errorReading")+file.getName(),getBundle().getString("error"),JOptionPane.ERROR_MESSAGE);
					System.exit(3);
					// e.printStackTrace();
				}
			}
		}
	}
	
	/**
	 * @param file
	 * @throws IOException
	 */
	private void parsePropertiesFile(File file) throws IOException
	{
		LineNumberReader lnr = new LineNumberReader(new InputStreamReader(new FileInputStream(file)));
		
		String line;
		StringBuilder commentBuffer = new StringBuilder();
		ConfigFile cf = new ConfigFile(file);
		while ((line = lnr.readLine()) != null)
		{
			line = line.trim();
			
			if (line.startsWith("#"))
			{
				if (commentBuffer.length() > 0)
				{
					commentBuffer.append("\r\n");
				}
				commentBuffer.append(line.substring(1));
			}
			else if (line.length() == 0)
			{
				// blank line, reset comments
				if (commentBuffer.length() > 0)
				{
					cf.addConfigComment(commentBuffer.toString());
				}
				commentBuffer.setLength(0);
			}
			else if (line.indexOf('=') >= 0)
			{
				String[] kv = line.split("=");
				String key = kv[0].trim();
				StringBuilder value = new StringBuilder();
				if (kv.length > 1)
				{
					value.append(kv[1].trim());
				}
				
				if (line.indexOf('\\') >= 0)
				{
					while ((line = lnr.readLine()) != null && line.indexOf('\\') >= 0)
					{
						value.append("\r\n"+line);
					}
					value.append("\r\n"+line);
				}
				
				String comments = commentBuffer.toString();
				commentBuffer.setLength(0); //reset
				
				cf.addConfigProperty(key, parseValue(value.toString()), comments);
			}
		}
		getConfigs().add(cf);
		lnr.close();
	}
	
	/**
	 * @param value
	 * @return 
	 */
	private Object parseValue(String value)
	{
		if (value.equalsIgnoreCase("false") || value.equalsIgnoreCase("true"))
		{
			return Boolean.parseBoolean(value);
		}
		
		/*try
	    {
	    	double parseDouble = Double.parseDouble(value);
	    	return parseDouble;
	    }
	    catch (NumberFormatException e)
	    {
	    	// not a double, ignore
	    }*/
		
		// localhost -> 127.0.0.1
		if (value.equals("localhost"))
		{
			value = "127.0.0.1";
		}
		
		String[] parts = value.split("\\.");
		if (parts.length == 4)
		{
			boolean ok = true;
			for (int i = 0; i < 4 && ok; i++)
			{
				try
				{
					int parseInt = Integer.parseInt(parts[i]);
					if (parseInt < 0 || parseInt > 255)
					{
						ok = false;
					}
				}
				catch (NumberFormatException e)
				{
					ok = false;
				}
			}
			
			if (ok)
			{
				try
				{
					InetAddress address = InetAddress.getByName(value);
					return address;
				}
				catch (UnknownHostException e)
				{
					// ignore
				}
			}
		}
		
		return value;
	}
	
	static class ConfigFile
	{
		private File _file;
		private String _name;
		private final List<ConfigComment> _configs = new FastList<ConfigComment>();
		
		
		public ConfigFile(File file)
		{
			_file = file;
			int lastIndex = file.getName().lastIndexOf('.');
			setName(file.getName().substring(0, lastIndex));
		}
		
		public void addConfigProperty(String name, Object value, ValueType type, String comments)
		{
			_configs.add(new ConfigProperty(name, value, type, comments));
		}
		
		public void addConfigComment(String comment)
		{
			_configs.add(new ConfigComment(comment));
		}
		
		public void addConfigProperty(String name, Object value, String comments)
		{
			this.addConfigProperty(name, value, ValueType.firstTypeMatch(value), comments);
		}
		
		public List<ConfigComment> getConfigProperties()
		{
			return _configs;
		}
		
		/**
		 * @param name The name to set.
		 */
		public void setName(String name)
		{
			_name = name;
		}
		
		/**
		 * @return Returns the name.
		 */
		public String getName()
		{
			return _name;
		}
		
		public void save() throws IOException
		{
			BufferedWriter bufWriter = null;
			try
			{
				bufWriter = new BufferedWriter(new OutputStreamWriter(new FileOutputStream(_file)));
				for (ConfigComment cc : _configs)
				{
					cc.save(bufWriter);
				}
			}
			finally
			{
				if (bufWriter != null)
				{
					bufWriter.close();
				}
			}
		}
		
		class ConfigComment
		{
			
			private String _comments;
			
			/**
			 * @param comments
			 */
			public ConfigComment(String comments)
			{
				_comments = comments;
			}
			
			
			/**
			 * @return Returns the comments.
			 */
			public String getComments()
			{
				return _comments;
			}
			
			/**
			 * @param comments The comments to set.
			 */
			public void setComments(String comments)
			{
				_comments = comments;
			}
			
			public void save(Writer writer) throws IOException
			{
				StringBuilder sb = new StringBuilder();
				sb.append('#');
				sb.append(this.getComments().replace("\r\n", "\r\n#"));
				sb.append("\r\n\r\n");
				writer.write(sb.toString());
			}
		}
		
		class ConfigProperty extends ConfigComment
		{
			private String _propname;
			private Object _value;
			private ValueType _type;
			private JComponent _component;
			
			/**
			 * @param name
			 * @param value
			 * @param type
			 * @param comments
			 */
			public ConfigProperty(String name, Object value, ValueType type, String comments)
			{
				super(comments);
				if (!type.getType().isAssignableFrom(value.getClass()))
				{
					throw new IllegalArgumentException("Value Instance Type doesn't match the type argument.");
				}
				_propname = name;
				_type = type;
				_value = value;
			}
			
			/**
			 * @return Returns the name.
			 */
			public String getName()
			{
				return _propname;
			}
			
			/**
			 * @return Returns the name.
			 */
			public String getDisplayName()
			{
				return unCamelize(_propname);
			}
			
			/**
			 * @param name The name to set.
			 */
			public void setName(String name)
			{
				_propname = name;
			}
			
			/**
			 * @return Returns the value.
			 */
			public Object getValue()
			{
				return _value;
			}
			
			/**
			 * @param value The value to set.
			 */
			public void setValue(String value)
			{
				_value = value;
			}
			
			/**
			 * @return Returns the type.
			 */
			public ValueType getType()
			{
				return _type;
			}
			
			/**
			 * @param type The type to set.
			 */
			public void setType(ValueType type)
			{
				_type = type;
			}
			
			public JComponent getValueComponent()
			{
				if (_component == null)
				{
					_component = createValueComponent();
				}
				return _component;
			}
			
			public JComponent createValueComponent()
			{
				switch (this.getType())
				{
					case BOOLEAN:
						boolean bool = (Boolean) this.getValue();
						JCheckBox checkBox = new JCheckBox();
						checkBox.setSelected(bool);
						return checkBox;
					case IPv4:
						return new JIPTextField((Inet4Address) this.getValue());
					case DOUBLE:
					case INTEGER:
					case STRING:
					default:
						String val = this.getValue().toString();
						JTextArea textArea = new JTextArea(val);
						textArea.setFont(UIManager.getFont("TextField.font"));
						int rows = 1;
						for (int i = 0; i < val.length(); i++)
							if (val.charAt(i) == '\\')
								rows++;
						textArea.setRows(rows);
						textArea.setColumns(Math.max(val.length() / rows, 20));
						return textArea;
				}
			}
			
			@Override
			public void save(Writer writer) throws IOException
			{
				String value;
				if (this.getValueComponent() instanceof JCheckBox)
				{
					value = Boolean.toString(((JCheckBox) this.getValueComponent()).isSelected());
					value = value.substring(0, 1).toUpperCase() + value.substring(1);
				}
				else if (this.getValueComponent() instanceof JIPTextField)
				{
					value = ((JIPTextField) this.getValueComponent()).getText();
				}
				else if (this.getValueComponent() instanceof JTextArea)
				{
					value = ((JTextArea) this.getValueComponent()).getText();
				}
				else
				{
					throw new IllegalStateException("Unhandled component value");
				}
				
				StringBuilder sb = new StringBuilder();
				sb.append('#');
				sb.append(this.getComments().replace("\r\n", "\r\n#"));
				sb.append("\r\n");
				sb.append(this.getName());
				sb.append(" = ");
				sb.append(value);
				sb.append("\r\n");
				sb.append("\r\n");
				writer.write(sb.toString());
				
			}
		}
	}
	
	
	
	public static enum ValueType
	{
		BOOLEAN (Boolean.class),
		DOUBLE (Double.class),
		INTEGER (Integer.class),
		IPv4 (Inet4Address.class),
		STRING (String.class);
		
		private final Class<?> _type;
		
		private ValueType(Class<?> type)
		{
			_type = type;
		}
		
		/**
		 * @return Returns the type.
		 */
		public Class<?> getType()
		{
			return _type;
		}
		
		public static ValueType firstTypeMatch(Object value)
		{
			for (ValueType vt : ValueType.values())
			{
				if (vt.getType() == value.getClass())
				{
					return vt;
				}
			}
			throw new NoSuchElementException("No match for: "+value.getClass().getName());
		}
	}
	
	
	
	/**
	 * @see java.awt.event.ActionListener#actionPerformed(java.awt.event.ActionEvent)
	 */
	@Override
	public void actionPerformed(ActionEvent e)
	{
		String cmd = e.getActionCommand();
		
		StringBuilder errors = new StringBuilder();
		
		if (cmd.equals("save"))
		{
			for (ConfigFile cf : ConfigUserInterface.this.getConfigs())
			{
				try
				{
					cf.save();
				}
				catch (Exception e1)
				{
					e1.printStackTrace();
					errors.append(getBundle().getString("errorSaving")+cf.getName()+".properties. "+getBundle().getString("reason")+e1.getLocalizedMessage()+"\r\n");
				}
			}
			if (errors.length() == 0)
			{
				JOptionPane.showMessageDialog(ConfigUserInterface.this, getBundle().getString("success"), "OK", JOptionPane.INFORMATION_MESSAGE);
			}
			else
			{
				JOptionPane.showMessageDialog(ConfigUserInterface.this,errors,getBundle().getString("error"),JOptionPane.ERROR_MESSAGE);
				System.exit(2);
			}
		}
		else if (cmd.equals("exit"))
		{
			System.exit(0);
		}
		else if (cmd.equals("about"))
		{
			JOptionPane.showMessageDialog(ConfigUserInterface.this, getBundle().getString("credits") + "\nhttp://www.l2jserver.com\n\n"+getBundle().getString("icons")+"\n\n"+getBundle().getString("language")+'\n'+getBundle().getString("translation"), getBundle().getString("aboutItem"), JOptionPane.INFORMATION_MESSAGE, ImagesTable.getImage("l2jserverlogo.png"));
		}
	}
	
	/**
	 * @param configs The configuration to set.
	 */
	public void setConfigs(List<ConfigFile> configs)
	{
		_configs = configs;
	}
	
	/**
	 * @return Returns the configuration.
	 */
	public List<ConfigFile> getConfigs()
	{
		return _configs;
	}
	
	/**
	 * @param keyName 
	 * @return Returns the configuration setting name in a
	 * human readable form.
	 */
	public static String unCamelize(final String keyName) {
		Pattern p = Pattern.compile("\\p{Lu}");
		Matcher m = p.matcher(keyName);
		StringBuffer sb = new StringBuffer();
		int last = 0;
		while (m.find())
		{
			if (m.start() != last + 1)
			{
				m.appendReplacement(sb," " + m.group());
			}
			last = m.start();
		}
		m.appendTail(sb);
		return sb.toString().trim();
	}
	
	/**
	 * @param bundle The bundle to set.
	 */
	public void setBundle(ResourceBundle bundle)
	{
		_bundle = bundle;
	}
	
	/**
	 * @return Returns the bundle.
	 */
	public ResourceBundle getBundle()
	{
		return _bundle;
	}
}