// This Source Code is in the Public Domain per: http://litesoft.org/License.txt
package org.litesoft.core.util;

import java.sql.*;
import java.util.Date;

import org.litesoft.commonfoundation.typeutils.*;
import org.litesoft.core.simpletypes.*;
import org.litesoft.core.simpletypes.currency.Currency;
import org.litesoft.core.simpletypes.currency.*;
import org.litesoft.core.simpletypes.temporal.*;
import org.litesoft.core.simpletypes.temporal.nonpublic.*;

public class TypeConverter
{
    public static String to_String( Object pObject )
    {
        return (pObject == null) ? null : pObject.toString();
    }

    public static Boolean to_Boolean( Object pObject )
    {
        if ( null == pObject )
        {
            return null;
        }
        if ( pObject instanceof Boolean )
        {
            return (Boolean) pObject;
        }
        Boolean rv = Booleans.fromString( pObject.toString() );
        if ( rv != null )
        {
            return rv;
        }
        throw noConversion( Boolean.class, pObject, null );
    }

    public static boolean to_boolean( Object pObject )
    {
        Boolean b = to_Boolean( pObject );
        return (b != null) && b;
    }

    public static Long to_Long( Object pObject )
    {
        Number zNumber = toNumber( pObject );
        return (null == zNumber) ? null : zNumber.longValue();
    }

    public static long to_long( Object pObject )
    {
        Number zNumber = toNumber( pObject );
        return (null == zNumber) ? 0 : zNumber.longValue();
    }

    public static Integer to_Integer( Object pObject )
    {
        Number zNumber = toNumber( pObject );
        return (null == zNumber) ? null : zNumber.intValue();
    }

    public static int to_int( Object pObject )
    {
        Number zNumber = toNumber( pObject );
        return (null == zNumber) ? 0 : zNumber.intValue();
    }

    public static Short to_Short( Object pObject )
    {
        Number zNumber = toNumber( pObject );
        return (null == zNumber) ? null : zNumber.shortValue();
    }

    public static short to_short( Object pObject )
    {
        Number zNumber = toNumber( pObject );
        return (null == zNumber) ? 0 : zNumber.shortValue();
    }

    public static Double to_Double( Object pObject )
    {
        Number zNumber = toNumber( pObject );
        return (null == zNumber) ? null : zNumber.doubleValue();
    }

    public static double to_double( Object pObject )
    {
        Number zNumber = toNumber( pObject );
        return (null == zNumber) ? 0 : zNumber.doubleValue();
    }

    public static Float to_Float( Object pObject )
    {
        Number zNumber = toNumber( pObject );
        return (null == zNumber) ? null : zNumber.floatValue();
    }

    public static float to_float( Object pObject )
    {
        Number zNumber = toNumber( pObject );
        return (null == zNumber) ? 0 : zNumber.floatValue();
    }

    public static TextLines to_TextLines( Object pObject )
    {
        if ( null == pObject )
        {
            return null;
        }
        if ( pObject instanceof TextLines )
        {
            return (TextLines) pObject;
        }
        if ( pObject instanceof TextLine )
        {
            return new TextLines( (TextLine) pObject );
        }
        if ( pObject instanceof String[] )
        {
            return new TextLines( (String[]) pObject );
        }
        if ( pObject instanceof TextLine[] )
        {
            return new TextLines( (TextLine[]) pObject );
        }
        if ( pObject instanceof Object[] )
        {
            return new TextLines( Strings.toArray( (Object[]) pObject ) );
        }
        if ( pObject instanceof java.util.Collection )
        {
            return new TextLines( Strings.toArray( (java.util.Collection) pObject ) );
        }
        return new TextLines( Strings.splitLines( pObject.toString() ) );
    }

    public static byte[] to_bytes( Object pObject )
    {
        if ( null == pObject )
        {
            return null;
        }
        if ( pObject instanceof byte[] )
        {
            return (byte[]) pObject;
        }
        throw noConversion( "byte[]", pObject, null );
    }

    private static Number toNumber( Object pObject )
    {
        if ( (pObject == null) || (pObject instanceof Number) )
        {
            return (Number) pObject;
        }
        String s = pObject.toString().trim();
        if ( s.length() == 0 )
        {
            return null;
        }
        try
        {
            return Long.parseLong( s );
        }
        catch ( NumberFormatException e )
        {
            // Ignore
        }
        return Double.parseDouble( s ); // Will blow up...
    }

    public static Money to_Money( Currency pSC, Object pObject )
    {
        Objects.assertNotNull( "Currency", pSC );
        if ( null == pObject )
        {
            return null;
        }
        if ( pObject instanceof Money )
        {
            Money zMoney = (Money) pObject;
            Currency zNewSC = zMoney.getCurrency();
            if ( zNewSC.equals( pSC ) )
            {
                return zMoney;
            }
            throw new IllegalArgumentException( "Currency convertion ('" + zNewSC + "'->'" + pSC + "') is not supported" );
        }
        return Money.fromString( pSC, pObject.toString() );
    }

    public static FixedPointLong to_FixedPointLong( int pDecimalPlaces, //
                                                    NumericFormatControl pFormatControl, Object pObject )
    {
        if ( pDecimalPlaces < 0 )
        {
            throw new IllegalArgumentException( "Decimal places not allowed to be negative" );
        }
        Objects.assertNotNull( "NumericFormatControl", pFormatControl );
        if ( null == pObject )
        {
            return null;
        }
        if ( pObject instanceof FixedPointLong )
        {
            return FixedPointLong.getInstance( pDecimalPlaces, pFormatControl, (FixedPointLong) pObject );
        }
        return FixedPointLong.fromString( pDecimalPlaces, pFormatControl, pObject.toString() );
    }

    public static FloatingPointLong to_FloatingPointLong( NumericFormatControl pFormatControl, Object pObject )
    {
        Objects.assertNotNull( "NumericFormatControl", pFormatControl );
        if ( null == pObject )
        {
            return null;
        }
        if ( pObject instanceof FloatingPointLong )
        {
            return FloatingPointLong.getInstance( pFormatControl, (FloatingPointLong) pObject );
        }
        return FloatingPointLong.fromString( pFormatControl, pObject.toString() );
    }

    // TODO: Temporal!!!

    public static java.sql.Timestamp to_Timestamp( Object pObject )
    {
        if ( null == pObject )
        {
            return null;
        }
        if ( pObject instanceof java.sql.Timestamp )
        {
            return (java.sql.Timestamp) pObject;
        }
        return new java.sql.Timestamp( to_UtilDate( pObject ).getTime() );
    }

    public static java.sql.Time to_SqlTime( Object pObject )
    {
        if ( null == pObject )
        {
            return null;
        }
        if ( pObject instanceof java.sql.Time )
        {
            return (java.sql.Time) pObject;
        }
        SimpleTime time = to_SimpleTime( TimeRes.ToSEC, pObject );
        return new java.sql.Time( time.getSqlTimeOffset() );
    }

    public static java.sql.Date to_SqlDate( Object pObject )
    {
        if ( null == pObject )
        {
            return null;
        }
        if ( pObject instanceof java.sql.Date )
        {
            return (java.sql.Date) pObject;
        }
        CalendarYMD date = to_CalendarYMD( pObject );
        return to_SqlDate( date );
    }

    public static java.sql.Date to_SqlDate( CalendarYMD pDate )
    {
        return new java.sql.Date( pDate.toUtilDate().getTime() );
    }

    public static Date to_UtilDate( Object pObject )
    {
        if ( null == pObject )
        {
            return null;
        }
        if ( pObject instanceof Date )
        {
            return (Date) pObject;
        }
        // TODO: xxx - use convertToCalendarAccessor(pObject)
        if ( pObject instanceof Number )
        {
            return new Date( ((Number) pObject).longValue() );
        }
        if ( pObject instanceof CalendarYMD )
        {
            return ((CalendarYMD) pObject).toUtilDate();
        }
        if ( pObject instanceof SimpleTimestamp )
        {
            return ((SimpleTimestamp) pObject).getDate();
        }
        if ( pObject instanceof SimpleTime )
        {
            return new Date( ((SimpleTime) pObject).getSqlTimeOffset() );
        }
        String s = pObject.toString();
        try
        {
            return new Date( Long.parseLong( s ) );
        }
        catch ( NumberFormatException e )
        {
            // Ignore
        }
        try
        {
            return UtilDateAdaptor.fromUtilDateToString( s ).getWallDate();
        }
        catch ( IllegalArgumentException e )
        {
            // Ignore
        }
        try
        {
            return new Date( java.sql.Date.valueOf( s ).getTime() );
        }
        catch ( IllegalArgumentException e )
        {
            // Ignore
        }
        try
        {
            return new Date( java.sql.Time.valueOf( s ).getTime() );
        }
        catch ( IllegalArgumentException e )
        {
            // Ignore
        }
        return SimpleTimestamp.fromString( s ).getDate();
    }

    public static SimpleTime to_SimpleTime( Object pObject )
    {
        return to_SimpleTime( TimeRes.ToMIN, pObject );
    }

    public static SimpleTime to_SimpleTime( TimeRes pTimeRes, Object pObject )
    {
        Objects.assertNotNull( "TimeRes", pTimeRes );
        if ( null == pObject )
        {
            return null;
        }
        SimpleTime temporal = (pObject instanceof SimpleTime) ? //
                              (SimpleTime) pObject : //
                              SimpleTime.fromString( pObject.toString() );
        if ( pTimeRes.getIndex() == temporal.getResolutionIndex() )
        {
            return temporal;
        }
        return temporal.copyWithUpdatedResolution( pTimeRes );
    }

    public static SimpleTimestamp to_SimpleTimestamp( Object pObject )
    {
        return to_SimpleTimestamp( TimeRes.ToMSEC, pObject );
    }

    public static SimpleTimestamp to_SimpleTimestamp( TimeRes pTimeRes, Object pObject )
    {
        Objects.assertNotNull( "TimeRes", pTimeRes );
        if ( null == pObject )
        {
            return null;
        }
        if ( !(pObject instanceof SimpleTimestamp) )
        {
            Date date = to_UtilDate( pObject );
            return new SimpleTimestamp( pTimeRes, date );
        }
        SimpleTimestamp temporal = (SimpleTimestamp) pObject;
        if ( pTimeRes.getIndex() == temporal.getResolutionIndex() )
        {
            return temporal;
        }
        return temporal.copyWithUpdatedResolution( pTimeRes );
    }

    public static CalendarY to_CalendarY( Object pObject )
    {
        if ( null == pObject )
        {
            return null;
        }
        if ( pObject instanceof CalendarY )
        {
            return (CalendarY) pObject;
        }
        RuntimeException zProblem = null;
        try
        {
            Object zCalendarAccessor = convertToCalendarAccessor( pObject );
            if ( zCalendarAccessor instanceof CalendarAccessorY )
            {
                return new CalendarY( (CalendarAccessorY) pObject );
            }
        }
        catch ( RuntimeException e )
        {
            zProblem = e;
        }
        throw noConversion( CalendarY.class, pObject, zProblem );
    }

    public static CalendarYM to_CalendarYM( Object pObject )
    {
        if ( null == pObject )
        {
            return null;
        }
        if ( pObject instanceof CalendarYM )
        {
            return (CalendarYM) pObject;
        }
        RuntimeException zProblem = null;
        try
        {
            Object zCalendarAccessor = convertToCalendarAccessor( pObject );
            if ( zCalendarAccessor instanceof CalendarAccessorYM )
            {
                return new CalendarYM( (CalendarAccessorYM) pObject );
            }
        }
        catch ( RuntimeException e )
        {
            zProblem = e;
        }
        throw noConversion( CalendarYM.class, pObject, zProblem );
    }

    public static CalendarYMD to_CalendarYMD( Object pObject )
    {
        if ( null == pObject )
        {
            return null;
        }
        if ( pObject instanceof CalendarYMD )
        {
            return (CalendarYMD) pObject;
        }
        RuntimeException zProblem = null;
        try
        {
            Object zCalendarAccessor = convertToCalendarAccessor( pObject );
            if ( zCalendarAccessor instanceof CalendarAccessorYMD )
            {
                return new CalendarYMD( (CalendarAccessorYMD) zCalendarAccessor );
            }
        }
        catch ( RuntimeException e )
        {
            zProblem = e;
        }
        throw noConversion( CalendarYMD.class, pObject, zProblem );
    }

    private static IllegalArgumentException noConversion( Class pTarget, Object pObject, RuntimeException pProblem )
    {
        return noConversion( Objects.justClassName( pTarget ), pObject, pProblem );
    }

    private static IllegalArgumentException noConversion( String pTarget, Object pObject, RuntimeException pProblem )
    {
        return new IllegalArgumentException(
                "No conversion supported to '" + pTarget + "' from '" + Objects.justClassNameOf( pObject ) + "': " + pObject, pProblem );
    }

    private static Object convertToCalendarAccessor( Object pObject )
    {
        if ( pObject instanceof Time )
        {
            return null;
        }
        if ( pObject instanceof CalendarAccessorY )
        {
            return pObject;
        }
        if ( pObject instanceof Date )
        {
            return new UtilDateAdaptor( (Date) pObject );
        }
        String s = Strings.noEmpty( pObject.toString() );
        if ( s == null )
        {
            return null;
        }
        try
        {
            return UtilDateAdaptor.fromUtilDateToString( s );
        }
        catch ( IllegalArgumentException e )
        {
            // Ignore
        }
        return TemporalParser.YMD.parse( s );
    }
}