package java.game.parts.rgearpart.reciprocatingrgearpart;

import java.render.osd.*;
import java.io.*;
import java.util.*;
import java.util.resource.*;
import java.game.cars.*;
import java.game.*;
import java.game.parts.*;
import java.game.parts.bodypart.*;
import java.game.parts.enginepart.*;
import java.game.parts.rgearpart.*;

public class Tyre extends ReciprocatingRGearPart
{
    final static int    tcSTREET = 0;
    final static int    tcSPORT = 1;
    final static int    tcSUPERSPORT = 2;
    final static int    tcDRAGRADIAL = 3;

    float   friction = 1.0; //static friction coeff.
    float   sliction = 1.0; //ratio of dynamic/static
    float   frictn_x = 1.0; //factor (unused now)
    float   radius   = 0.01;
    float   stiffness = 10.0;
    float   rollres  = 0.01;    //rolling resistance
    float   loadcap  = 5000.0;  //load capacity
    float   loadsmooth = 0.5;
    float   CPatchMaximumAngle = 0.300;

    // Sala: the following variables are used for scripted calculations //

    float   insider_friction = 1.0;
    float   wheel_radius;
    float   profile_ratio;
    float   tyre_width;
    float   profile_height;
    float   min_radius;
    float   max_radius;
    float   slide_interval;

    float   min_rollres;
    float   optimal_inflation;
    float   inflation;
    float   par_8;

    int maxRimWidth_i;
    int minRimWidth_i;
    float   maxRimWidth;
    float   minRimWidth;

    float   default_fric=1.0;
    float   fric_mul=1.30;
    float   load_mul2=10.500;
    float   CPatchMaxA=16.000;
    float   CPatchMinA= 4.000;
    float   roll_res_mul = 0.725;
    float   slic_mul=1.100;
    float   rubber_rigidity=1.000;
//  float   load_progress = 0.000;

    float   load_mul=1.000;

    // debug vars, remove them after use //
    float   slide_cm;

    int[]   render_types = new int[22];
    String  tyre_size_label;

    public Tyre()
    {
        repair_max_wear = 0.0;
        prestige_calc_weight = 15.0;

        catalog_view_ypr = new Ypr( 1.571, -0.7, 0.0 );
    }

    public void SetInflation( float I )
    {
        SetInflation( I, 0 );
    }

    public void SetInflation( float I, int forced )
    {
        if (inflation != I || forced)
        {
            inflation = I;

            if (inflation < 0.5)
                inflation = 0.5;
            if (inflation > optimal_inflation)
                inflation = optimal_inflation;

            float misinflation;

            if (inflation < optimal_inflation)
                misinflation = inflation / optimal_inflation;
            else
                misinflation = optimal_inflation / inflation;

            misinflation = misinflation*misinflation*misinflation*0.6+0.4;

//          System.log("misinflation = "+misinflation);

            insider_friction = friction * (0.5+0.5*(tyre_width/275.0)) * fric_mul;

            float t = profile_ratio*optimal_inflation/inflation;

            loadcap = 4000.0+(0.75+profile_ratio/0.4*0.25)*(0.9+0.1*t)*(tyre_width-165.0)*9.81*load_mul*1.350/friction/fric_mul; // tyre: max load capacity (Ns = kgs*gravity)
            loadcap /= rubber_rigidity;
            CPatchMaximumAngle = 3.1415926535897932384626433832795/180.0 * (CPatchMinA+(0.6+(405.0-tyre_width)/405.0*0.4) /* *misinflation */ *profile_ratio*(CPatchMaxA-CPatchMinA));
//          System.log(name+"->CPatchMaximumAngle = "+CPatchMaximumAngle);
            stiffness = -18.0+(1.0-slide_interval)*(1.0-profile_ratio)*(0.5+0.5*misinflation)*80.0;
            stiffness = clampTo(stiffness,8.0,40.0);
            radius = max_radius; // min_radius+(max_radius-min_radius)/misinflation;
            rollres = misinflation*min_rollres;//*(1.0-(tyre_width-215.0)/1000.0);      // tyre: rolling resistance - hungarian note: az inflation fuggvenye

            setMaxWear((0.15+(rubber_rigidity*rubber_rigidity*rubber_rigidity*rubber_rigidity)*0.85)*50000000000.0*misinflation);

            par_8 = 1.055+(insider_friction-default_fric)*0.045;
        }

        WheelRef w = getWheel();

        if (w)
        {
            w.setPacejka(  0, 1.5 );//b0 //1.5
            w.setPacejka(  1, 0.0 );//b1
            w.setPacejka(  2, 1100.0 );//b2 //1100
            w.setPacejka(  3, 0.0 );//b3 //0.013 );
            w.setPacejka(  4, 300.0 );//300
            w.setPacejka(  5, 0.0 );
            w.setPacejka(  6, 0.0 );
            w.setPacejka(  7, 0.0 );
            w.setPacejka(  8, -2.0 );//par_8 );
            w.setPacejka(  9, 0.0 );
            w.setPacejka( 10, 0.0 );
            w.setPacejka( 11, 0.0 );
            w.setPacejka( 12, 0.0 );//0.2 );
            w.setPacejka( 13, 0.0 );
            w.setPacejka( 14, 1.4 );//a0
            w.setPacejka( 15, 0.0 );//a1
            w.setPacejka( 16, 1100.0 );//a2
            w.setPacejka( 17, 1100.0 );//a3
            w.setPacejka( 18, 0.0 );//a4
            w.setPacejka( 19, 0.0 );//a5
            w.setPacejka( 20, 0.0 );//a6
            w.setPacejka( 21, -2.0 );//a7
            w.setPacejka( 22, 0.0 );//a8
            w.setPacejka( 23, 0.0 );//a9
            w.setPacejka( 24, 0.0 );
            w.setPacejka( 25, 0.0 );
            w.setPacejka( 26, 0.0 );
            w.setPacejka( 27, 0.0 );
            w.setPacejka( 28, 0.0 );
            w.setPacejka( 29, 0.0 );
            w.setPacejka( 30, 0.0 );
//          w.setPacejka( 15, load_progress ); // nevleges load a 'stiffness'-hez
//          w.setPacejka( 16, load_progress ); // +load ; 15+16 -nal lesz fel 'stiffness' ertek

            w.setFrictn_x( 1.0 );
            w.setLoadSmooth( 0.4 );

            w.setMaxLoad( loadcap );
            w.setStiffness( stiffness );
            w.setFriction( insider_friction );
            w.setSliction( sliction );
            w.setRadius( radius );
            w.setWidth( tyre_width/1000.0 );
            w.setRollRes( 0.0 );
            w.setBearing( 20.0 );
            w.setCPatch(tyre_width/2,CPatchMaximumAngle, 0.0);//contact patch

            /*
            System.log("Pacejka vars for tyre #"+getWheelID()+" ("+name+")");
            System.log("  Sliction: "+sliction);
            System.log("  #1: "+0.0);
            System.log("  Friction: "+friction);
            System.log("  #3: "+0.000 );//0.013 );
            System.log("  Stiffness: "+stiffness);
            System.log("  #5: "+0.0);
            System.log("  #6: "+0.0);
            System.log("  #7: "+0.0);
            System.log("  #8: "+(-1.00000) );//par_8 );
            System.log("  #9: "+0.0);
            System.log("  #10: "+0.0);
            System.log("  Load capacity: "+loadcap);
            System.log("  #12: "+1.0 );//0.2 );
            System.log("  Friction-x: "+1.0);
            System.log("  LoadSmooth: "+0.4);
            */

            int whlID = getWheelID();

            if ((whlID>=0) && ((whlID % 2)==1))
                setSlotPos(1, new Vector3(0.0,0.0,0.0), new Ypr(0.0,0.0,0.0) );
            else
                setSlotPos(1, new Vector3(0.0,0.0,0.0), new Ypr(3.1415926535897932384626433832795,0.0,0.0) );
        }
    }

    public void SetupRubber( int RT )
    {
        String compound_label;

        if (RT == tcSPORT) // sport tyre //
        {
            rubber_rigidity =    0.900;
            load_mul    =    0.800*load_mul2;
            min_rollres =    0.005*roll_res_mul;        // tyre: depends on contact patch
            friction    =    default_fric/rubber_rigidity;  // tyre: static friction (compound efficiency)
            sliction    =    0.740*slic_mul;        // tyre: slip ratio (sliction*friction = slipfriction)
            frictn_x    =    1.000;         // tyre: longitudinal friction and sliction * ratio = horizontal friction and sliction
            loadsmooth  =    0.300;
            compound_label  = " medium compound sport tyre";
            police_check_fine_value = 0.0;
        } else
        if (RT == tcSUPERSPORT) // supersport tyre //
        {
            rubber_rigidity =    0.750;
            load_mul    =    0.800*load_mul2;
            min_rollres =    0.004*roll_res_mul;        // tyre: depends on contact patch
            friction    =    default_fric/rubber_rigidity;  // tyre: static friction (compound efficiency)
            sliction    =    0.760*slic_mul;        // tyre: slip ratio (sliction*friction = slipfriction)
            frictn_x    =    1.000;         // tyre: longitudinal friction and sliction * ratio = horizontal friction and sliction
            loadsmooth  =    0.250;
            compound_label  = " soft compound racing tyre";
            police_check_fine_value = 50.0;
        } else
        if (RT == tcDRAGRADIAL) // drag-radial //
        {
            rubber_rigidity =    0.550;
            load_mul    =    1.800*load_mul2;
            min_rollres =    0.002*roll_res_mul;        // tyre: depends on contact patch
            friction    =    default_fric/rubber_rigidity;  // tyre: static friction (compound efficiency)
            sliction    =    0.720*slic_mul;        // tyre: slip ratio (sliction*friction = slipfriction)
            frictn_x    =    1.000;         // tyre: longitudinal friction and sliction * ratio = horizontal friction and sliction
            loadsmooth  =    0.750;
            compound_label  = " drag radial";
            police_check_fine_value = 50.0;
        }
        else
        if (RT == tcSTREET) // street tyre //
        {
            rubber_rigidity =    1.000;
            load_mul    =    0.750*load_mul2;
            min_rollres =    0.0055*roll_res_mul;       // tyre: depends on contact patch
            friction    =    default_fric/rubber_rigidity;  // tyre: static friction (compound efficiency)
            sliction    =    0.695*slic_mul;        // tyre: slip ratio (sliction*friction = slipfriction)
            frictn_x    =    1.000;         // tyre: longitudinal friction and sliction * ratio = horizontal friction and sliction
            loadsmooth  =    0.500;
            compound_label  = " hard compound street tyre";
            police_check_fine_value = 0.0;
        }
        else
        {
            rubber_rigidity =    1.000;
            load_mul    =    0.750*load_mul2;
            min_rollres =    0.0055*roll_res_mul;       // tyre: depends on contact patch
            friction    =    default_fric/rubber_rigidity;  // tyre: static friction (compound efficiency)
            sliction    =    0.695*slic_mul;        // tyre: slip ratio (sliction*friction = slipfriction)
            frictn_x    =    1.000;         // tyre: longitudinal friction and sliction * ratio = horizontal friction and sliction
            loadsmooth  =    0.500;
            compound_label  = " tyre";
            police_check_fine_value = 0.0;
        }
        friction = (1.3+(friction-1.0)/0.8*0.4)*1.15;
        value /= rubber_rigidity;
        brand_new_prestige_value = 25.0/rubber_rigidity + tyre_width/10.0-20.0;
        name = name_prefix + " " + tyre_size_label+compound_label;
    }

    public void calcStuffs()
    {
        for (minRimWidth_i=0; minRimWidth_i<21; minRimWidth_i++)
            if (render_types[minRimWidth_i])
            {
                minRimWidth = minRimWidth_i*0.5+5.0;
                break;
            }

        for (maxRimWidth_i=20; maxRimWidth_i>=0; maxRimWidth_i--)
            if (render_types[maxRimWidth_i])
            {
                maxRimWidth = maxRimWidth_i*0.5+5.0;
                break;
            }

        float R = wheel_radius*2.0/25.4;
        description = "This "+name+" is a "+Float.toString(tyre_width, "%1.0f mm wide ")+" tyre, that's diameter is "+Float.toString(R, "%1.0f inch at the rims and the height of its sidewalls is ")+Float.toString(profile_height, "%1.0f mm. ")+Float.toString(R, "It is compatible with all %1.0f inch rims ")+Float.toString(minRimWidth, "that are between %1.1f and ")+Float.toString(maxRimWidth, "%1.1f inch in width.");

        if (police_check_fine_value > 0.0)
            description = description + Float.toString(police_check_fine_value, " This tyre is not street legal! Police may fine you up to $%1.0f!");
    }

    public String installCheck( Part p, int[] slotId )
    {
        if (p)
        {
            if (p instanceof Wheel)
            {
                Wheel wheel = p;
                int wr1=wheel.wheel_radius*1000.0;
                int wr2=wheel_radius;
                if (wr1 != wr2)
                    return "The tyre inner radius does not match the rim!";
                else
                if (wheel.rim_width > maxRimWidth)
                    return "This tyre is too narrow for this rim!";
                else
                if (wheel.rim_width < minRimWidth)
                    return "This tyre is too wide for this rim!";

                return null;
            }
            else
                return "Tyres can only be installed on rims!";
        }
        //else
        return "There's nothing to install this part to!";
    }

    public void SetupTyre( float W, float r, float R, float rW, int compound_type )
    {
        SetupTyre( W, r, R, rW, compound_type, -1.0 );
    }

    public void SetupTyre( float W, float r, float R, float rW, int compound_type, float optI )
    {
        value = HUF2USD(W*80+2500*(R-13.0));

        wheel_radius    = R*25.4/2.0;
        tyre_width  = W;
        profile_ratio   = r/100.0;
        if (optI > 0.0)
            optimal_inflation = optI;
        slide_cm    = (tyre_width-rW*25.4)/10.0;
        slide_interval  = (tyre_width-rW*25.4)/tyre_width; // Sala: percentage to the tyre width //
        if (slide_interval < 0.0)
            slide_interval = 0.0;
        if (slide_interval > 1.0)
            slide_interval = 1.0;

        profile_height  = tyre_width*profile_ratio;
        max_radius      = (wheel_radius+profile_height)/1000.0; // Sala: mm -> m //
        min_radius      = wheel_radius/1000.0; // Sala: 1.5cm more than rim diameter, mm -> m //
        if (max_radius < min_radius)
            min_radius = max_radius-0.01;

        SetupRubber(compound_type);
        if (optI > 0.0)
            SetInflation(optimal_inflation);
    }

    public void updatevariables()
    {
        SetInflation(inflation,1);
    }

    public void load( File saveGame )
    {
        super.load( saveGame );

        int save_ver = saveGame.readInt();

        if (save_ver >= 1)
        {
            inflation = saveGame.readFloat();
        }
    }

    public void save( File saveGame )
    {
        super.save( saveGame );

        int save_ver = 1;

        saveGame.write( save_ver );
        if (save_ver >= 1)
        {
            saveGame.write( inflation );
        }
    }

    //---------tuning
    public int isTuneable()
    {
        return 1;
    }

    // backup values //
    float   old_inflation;
    float   new_inflation;

    public void buildTuningMenu( Menu m )
    {
        old_inflation = inflation;
        new_inflation = inflation;
        m.addItem( "Inflation",     1, inflation, 0.5, optimal_inflation, (optimal_inflation-0.5)/0.1+1, null ).changeVLabelText( Float.toString(new_inflation, "%1.2f bar")+Float.toString(new_inflation*14.7, " (%1.2f psi)"));
    }

    public void endTuningSession( int cancelled )
    {
        if( cancelled )
        {
            SetInflation(old_inflation,1);
        }
        else
        {
            SetInflation(new_inflation,1);
            GameLogic.spendTime(1*60);
        }

        getCar_LocalVersion();
        if (the_car)
            the_car.forceUpdate();
    }

    public void handleMessage( Event m )
    {
        if( m.cmd == 1 )
        {
            new_inflation = ((Slider)m.gadget).value;
            ((Slider)m.gadget).changeVLabelText( Float.toString(new_inflation, "%1.2f bar")+Float.toString(new_inflation*14.7, " (%1.2f psi)"));
        }
    }
    //---------tuning
}