/******************************************************************************
 * Product: Adempiere ERP & CRM Smart Business Solution                       *
 * Copyright (C) 1999-2006 ComPiere, Inc. All Rights Reserved.                *
 * This program is free software; you can redistribute it and/or modify it    *
 * under the terms version 2 of the GNU General Public License as published   *
 * by the Free Software Foundation. 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.                     *
 * For the text or an alternative of this public license, you may reach us    *
 * ComPiere, Inc., 2620 Augustine Dr. #245, Santa Clara, CA 95054, USA        *
 * or via info@compiere.org or http://www.compiere.org/license.html           *
 *****************************************************************************/
package org.compiere.util;

import java.io.File;
import java.io.FileWriter;
import java.sql.Timestamp;
import java.util.logging.ErrorManager;
import java.util.logging.Handler;
import java.util.logging.Level;
import java.util.logging.LogRecord;


/**
 *	Handler that publish log record to server log file
 *
 *  @author Jorg Janke
 *  @version $Id: CLogFile.java,v 1.3 2006/07/30 00:54:35 jjanke Exp $
 */
public class CLogFile extends Handler
{
	/**
	 *	Constructor
	 *	@param idempiereHome idempiere home
	 *	@param createLogDir create log directory if missing
	 *	@param isClient client
	 */
	public CLogFile (String idempiereHome, boolean createLogDir, boolean isClient)
	{
		//
		if (idempiereHome != null && idempiereHome.length() > 0)
			m_idempiereHome = idempiereHome;
		else
			m_idempiereHome = Ini.findAdempiereHome();
		initialize(m_idempiereHome, createLogDir, isClient);
	}	//	CLogFile

	/**	idempiere Home			*/
	private String		m_idempiereHome = null;
	/**	Printed header			*/
    private boolean 	m_doneHeader = false;
    /**	Output file				*/
    private File		m_file = null;
    /**	File writer				*/
    private FileWriter	m_writer = null;
    /** Current File Name Date	*/
    private String		m_fileNameDate = "";
    /** Record Counter			*/
    private int			m_records = 0;
	private File m_previousFile;

	/**
	 * 	Initialize
	 * 	@param idempiereHome log file base directory name
	 * 	@param createLogDir create log directory
	 * 	@param isClient client
	 */
	private void initialize(String idempiereHome, boolean createLogDir, boolean isClient)
	{
		//	Close Old File
		if (m_writer != null)
			close();
		m_doneHeader = false;
		//	New File Name
		if (!createFile(idempiereHome, createLogDir, isClient))
			return;
		//	New Writer
		try
		{
			m_writer = new FileWriter (m_file, true);
			m_records = 0;
		}
		catch (Exception ex)
		{
			reportError ("writer", ex, ErrorManager.OPEN_FAILURE);
			m_writer = null;
		}

    	//	Formatting
		setFormatter(CLogFormatter.get());
		//	Level
		setLevel(Level.ALL);
		//	Filter
		setFilter(CLogFilter.get());
	}	//	initialize

	/**
	 * 	Create Log File
	 * 	@param baseDirName base log file directory name
	 * 	@param createLogDir create log directory
	 * 	@param isClient client
	 * 	@return true if created
	 */
	private boolean createFile(String baseDirName, boolean createLogDir, boolean isClient)
	{
		String fileName = baseDirName;
		try
		{
			//	Test idempiereHome
			if (fileName != null)
			{
				File dir = new File(fileName);
				if (!dir.exists() || !dir.isDirectory())
				{
					reportError ("Invalid base directory: " + fileName, null, ErrorManager.OPEN_FAILURE);
					fileName = null;
				}
			}
			//	Test/Create idempiereHome/log
			if (fileName != null && createLogDir)
			{
				fileName += File.separator + "log";
				File dir = new File(fileName);
				if (!dir.exists())
					dir.mkdir();
				if (!dir.exists() || !dir.isDirectory())
				{
					reportError ("Invalid log directory: " + fileName, null, ErrorManager.OPEN_FAILURE);
					fileName = null;
				}
			}
			//	Test/Create idempiereHome/log/file
			if (fileName != null)
			{
				String dateFileName = fileName + File.separator;
				if (isClient)
					dateFileName += "client.";
				else
					dateFileName += "idempiere.";
				m_fileNameDate = getFileNameDate(System.currentTimeMillis());
				dateFileName	+= m_fileNameDate + "_";
				for (int i = 0; i < 100; i++) // max 100 files with date
				{
					String finalName = dateFileName + i + ".log";
					File file = new File(finalName);
					if (!file.exists())
					{
						m_file = file;
						break;
					}
				}
			}
			if (m_file == null)	{	//	Fallback to date+time filename
				String timeFileName = fileName + File.separator;
				if (isClient)
					timeFileName += "client.";
				else
					timeFileName += "idempiere.";
				String fileNameTime = getFileNameDateTime(System.currentTimeMillis());
				String finalName = timeFileName + fileNameTime + ".log";
				File file = new File(finalName);
				if (!file.exists())
				{
					m_file = file;
				}
			}
			if (m_file == null)	{	//	Fallback create temp file
				// would be very weird to arrive here, but preserving anyways as an extra fallback measure
				m_fileNameDate = getFileNameDate(System.currentTimeMillis());
				m_file = File.createTempFile("idempiere"+m_fileNameDate + "_", ".log");
			}
		}
		catch (Exception ex)
		{
			reportError ("file", ex, ErrorManager.OPEN_FAILURE);
			m_file = null;
			return false;
		}
		return true;
	}	//	createFile

	/**
	 * 	Get File Name Date portion
	 * 	@param time time in ms
	 *	@return Date String
	 */
	public static String getFileNameDate (long time)
	{
		Timestamp ts = new Timestamp(time);
		String s = ts.toString();
		return s.substring(0, 10);
	}	//	getFileNameDate

	/**
	 * 	Get File Name DateTime portion
	 * 	@param time time in ms
	 *	@return DateTime String on Seconds
	 */
	public static String getFileNameDateTime (long time)
	{
		Timestamp ts = new Timestamp(time);
		String s = ts.toString();
		s = s.replaceAll("[ :]", "-");
		return s.substring(0, 19); // seconds
	}	//	getFileNameDate

	/**
	 * 	Rotate Log when day changes
	 *	@param time time
	 */
	private void rotateLog (long time)
	{
		if (m_fileNameDate == null
			|| m_fileNameDate.equals(getFileNameDate(time)))
			return;
		rotateLog();
	}	//	rotateLog

	/**
	 * 	Rotate Log
	 * 	Called after Initialization
	 */
	public void rotateLog ()
	{
		initialize(m_idempiereHome, true, Ini.isClient());
	}	//	rotateLog

	/**
	 * Re-use previous log file (if available).
	 */
	public void reopen()
	{
		if (m_previousFile != null && m_previousFile.exists() && m_file == null && m_writer == null) 
		{
			try
			{
				m_file = m_previousFile;
				m_writer = new FileWriter (m_file, true);
				m_records = 0;
			}
			catch (Exception ex)
			{
				reportError ("writer", ex, ErrorManager.OPEN_FAILURE);
				m_writer = null;
				m_file = null;
			}
		}
	}
	
	/**
	 * 	Get File Name
	 *	@return file name
	 */
	public String getFileName()
	{
		if (m_file != null)
			return m_file.getAbsolutePath();
		return "";
	}	//	getFileName

	/**
	 * 	Get Log Directory
	 *	@return log directory or null
	 */
	public File getLogDirectory()
	{
		if (m_file != null)
			return m_file.getParentFile();
		return null;
	}	//	getLogDirectory


	/**
	 * 	Set Level
	 *	@see java.util.logging.Handler#setLevel(java.util.logging.Level)
	 *	@param newLevel new Level
	 *	@throws java.lang.SecurityException
	 */
	@Override
	public synchronized void setLevel (Level newLevel)
		throws SecurityException
	{
		if (newLevel == null)
			return;
		super.setLevel (newLevel);
	}	//	setLevel

	/**
	 * 	Publish log record
	 *	@see java.util.logging.Handler#publish(java.util.logging.LogRecord)
	 *	@param record log record
	 */
	@Override
	public synchronized void publish (LogRecord record)
	{
		if (!isLoggable (record) || m_writer == null)
			return;

		rotateLog(record.getMillis());

		//	Format
		String msg = null;
		try
		{
			msg = getFormatter().format (record);
		}
		catch (Exception ex)
		{
			reportError ("formatting", ex, ErrorManager.FORMAT_FAILURE);
			return;
		}
		//	Output
		try
		{
			if (!m_doneHeader)
			{
				m_writer.write (getFormatter().getHead (this));
				m_doneHeader = true;
			}
			//
			m_writer.write (msg);
			m_records++;
			//
			if (record.getLevel() == Level.SEVERE
				|| record.getLevel() == Level.WARNING
				|| record.getLevel() == Level.OFF
				||	m_records % 10 == 0)	//	flush every 10 records
				flush();
		}
		catch (Exception ex)
		{
			reportError ("writing", ex, ErrorManager.WRITE_FAILURE);
		}
	}	//	publish

	/**
	 * 	Flush output
	 *	@see java.util.logging.Handler#flush()
	 */
	@Override
	public void flush ()
	{
		try
		{
			if (m_writer != null)
				m_writer.flush();
		}
		catch (Exception ex)
		{
			reportError ("flush", ex, ErrorManager.FLUSH_FAILURE);
		}
	}	//	flush

	/**
	 * 	Close log file
	 *	@see java.util.logging.Handler#close()
	 *	@throws java.lang.SecurityException
	 */
	@Override	
	public synchronized void close () throws SecurityException
	{
		if (m_writer == null)
			return;

		//	Write Tail
		try
		{
			if (!m_doneHeader)
				m_writer.write (getFormatter().getHead(this));
			//
			m_writer.write (getFormatter().getTail(this));
		}
		catch (Exception ex)
		{
			reportError ("tail", ex, ErrorManager.WRITE_FAILURE);
		}
		//
		flush();
		//	Close
		try
		{
			m_writer.close();
		}
		catch (Exception ex)
		{
			reportError ("close", ex, ErrorManager.CLOSE_FAILURE);
		}
		m_writer = null;
		m_previousFile = m_file;
		m_file = null;		
	}	//	close

	/**
	 * 	String Representation
	 *	@return info
	 */
	public String toString ()
	{
		StringBuilder sb = new StringBuilder ("CLogFile[");
		sb.append(getFileName()).append(",Level=").append(getLevel())
			.append ("]");
		return sb.toString ();
	}	//	toString

	/**
	 * Get or create CLogFile handler.
	 * @param create
	 * @param idempiereHome
	 * @param isClient
	 * @return CLogFile handler
	 */
	public static CLogFile get(boolean create, String idempiereHome, boolean isClient) {
		Handler[] handlers = CLogMgt.getHandlers();
		for (Handler handler : handlers)
		{
			if (handler instanceof CLogFile)
				return (CLogFile) handler;
		}
		if (create)
		{
			CLogFile handler = new CLogFile(idempiereHome, true, isClient);
			CLogMgt.addHandler(handler);
			return handler;
		}
		return null;
	}

}	//	CLogFile