Magic Cube

///////////////////////////////////////////////////////////////////////////////////////////////////

// Copyright 2021 Leszek Koltunski                                                               //

//                                                                                               //

// This file is part of Magic Cube.                                                              //

//                                                                                               //

// Magic Cube is proprietary software licensed under an EULA which you should have received      //

// along with the code. If not, check https://distorted.org/magic/License-Magic-Cube.html        //

///////////////////////////////////////////////////////////////////////////////////////////////////

package org.distorted.objects;

import java.util.ArrayList;

import java.util.Locale;

import android.content.Context;

import android.content.SharedPreferences;

import org.distorted.external.RubikFiles;

import org.distorted.external.RubikScores;

import org.distorted.main.RubikActivity;

import org.distorted.objectlib.main.ObjectSignatures;

import org.distorted.objectlib.main.ObjectType;

import static org.distorted.objectlib.main.TwistyObject.MESH_NICE;

import static org.distorted.objectlib.main.ObjectType.NUM_OBJECTS;

import static org.distorted.main.RubikActivity.SHOW_DOWNLOADED_DEBUG;

import static org.distorted.main.RubikActivity.SHOW_SOLVED_DEBUG;

import static org.distorted.screens.RubikScreenPlay.LEVELS_SHOWN;

///////////////////////////////////////////////////////////////////////////////////////////////////

public class RubikObjectList

{

  public static final int DEF_OBJECT= ObjectSignatures.CUBE_3;

  private static RubikObjectList mThis;

  private static int mNumObjects;

  private static int mNumExtras;

  private static ArrayList<RubikObject> mObjects;

  private static int mObject = DEF_OBJECT;

  public static class DownloadedObject

    {

    String shortName;

    boolean icon,object,extras,free;

    int numScrambles, objectMinor, extrasMinor;

    DownloadedObject(String sName, int scrambles, boolean isFree, int oMinor, int eMinor, boolean i, boolean o, boolean e)

      {

      shortName = sName;

      numScrambles= scrambles;

      free        = isFree;

      objectMinor = oMinor;

      extrasMinor = eMinor;

      icon   = i;

      object = o;

      extras = e;

      }

    }

  private static ArrayList<DownloadedObject> mDownloadedObjects;

  private static String mFreeSolvedObjects;

  private static String mFreeBoughtObjects;

  private static int mNumFreeSolved;

///////////////////////////////////////////////////////////////////////////////////////////////////

  private RubikObjectList()

    {

    mNumObjects    = 0;

    mNumExtras     = 0;

    mNumFreeSolved = 0;

    mObjects           = new ArrayList<>();

    mDownloadedObjects = new ArrayList<>();

    createBuiltinObjects();

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  private void createBuiltinObjects()

    {

    for(int i=0; i<NUM_OBJECTS; i++)

      {

      ObjectType type = ObjectType.getObject(i);

      RubikObject obj = new RubikObject(type);

      mObjects.add(obj);

      mNumObjects++;

      if( SHOW_DOWNLOADED_DEBUG ) android.util.Log.e("D", "creating local object "+type.name() );

      if( obj.hasExtras() )

        {

        if( SHOW_DOWNLOADED_DEBUG ) android.util.Log.e("D", "has extras "+mNumExtras );

        obj.setExtrasOrdinal(mNumExtras);

        mNumExtras++;

        }

      else

        {

        if( SHOW_DOWNLOADED_DEBUG ) android.util.Log.e("D", "no extras");

        }

      }

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  private static boolean internalAddDownloadedObject(DownloadedObject object)

    {

    String name = object.shortName;

    for(RubikObject ro : mObjects )

      if( ro.getLowerName().equals(name) )

        {

        return ro.updateObject(object);

        }

    RubikObject obj = new RubikObject(object);

    mObjects.add(obj);

    mNumObjects++;

    int numUnclaimed = getNumUnclaimedSolves();

    if( numUnclaimed>0 && !obj.isFree() )

      {

      String objname = obj.getUpperName();

      if( SHOW_SOLVED_DEBUG ) android.util.Log.e("D", "downloadedObject: "+objname+" making it solved. Unclaimed: "+numUnclaimed);

      solveObject(obj,objname);

      }

    if( SHOW_DOWNLOADED_DEBUG ) android.util.Log.e("D", "creating downloaded object "+obj.getUpperName() );

    if( obj.hasExtras() )

      {

      if( SHOW_DOWNLOADED_DEBUG ) android.util.Log.e("D", "has extras "+mNumExtras );

      obj.setExtrasOrdinal(mNumExtras);

      mNumExtras++;

      }

    else

      {

      if( SHOW_DOWNLOADED_DEBUG ) android.util.Log.e("D", "no extras");

      }

    return true;

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static int computeNumStars(int level)

    {

    return level>=LEVELS_SHOWN ? 50 : level;

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  private static void restoreFreedObjects(SharedPreferences preferences)

    {

    mFreeSolvedObjects = preferences.getString("rol_freeSolved", "");

    mFreeBoughtObjects = preferences.getString("rol_freeBought", "");

    if( SHOW_SOLVED_DEBUG )

      {

      android.util.Log.e("D", "freeSolved: "+mFreeSolvedObjects);

      android.util.Log.e("D", "freeBought: "+mFreeBoughtObjects);

      }

    if( mFreeBoughtObjects.length()>0 )

      {

      if( mFreeBoughtObjects.charAt(0)=='*' )

        {

        for(int i=0; i<mNumObjects; i++)

          {

          RubikObject o = mObjects.get(i);

          o.markFree();

          }

        }

      else

        {

        String[] objs = mFreeBoughtObjects.split(",");

        for( String obj : objs )

          {

          RubikObject o = getObject(obj);

          if( o!=null ) o.markFree();

          }

        }

      }

    if( mFreeSolvedObjects.length()>0 )

      {

      String[] objs = mFreeSolvedObjects.split(",");

      mNumFreeSolved = objs.length;

      for( String obj : objs )

        {

        RubikObject o = getObject(obj);

        if( o!=null ) o.markFree();

        }

      }

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  private static int getNumUnclaimedSolves()

    {

    RubikScores scores = RubikScores.getInstance();

    int numMAXes = scores.numberOfSolvedMAXes();

    return numMAXes-mNumFreeSolved;

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  private static int markAllSolvedAsFree()

    {

    RubikScores scores = RubikScores.getInstance();

    int numObjects = RubikObjectList.getNumObjects();

    int level = LEVELS_SHOWN;

    int ret = 0;

    for(int obj=0; obj<numObjects; obj++)

      {

      RubikObject object = getObject(obj);

      if( object!=null && !object.isFree() && scores.isSolved(obj,level) )

        {

        solveObject(object.getUpperName());

        ret++;

        }

      }

    return ret;

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  private static void markAsFree(int numToBeMarked)

    {

    int numObjects = RubikObjectList.getNumObjects();

    for(int obj=0; obj<numObjects && numToBeMarked>0; obj++)

      {

      RubikObject object = getObject(obj);

      if( object!=null && !object.isFree() )

        {

        solveObject(object.getUpperName());

        numToBeMarked--;

        }

      }

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static boolean solveObject(RubikObject object, String shortName)

    {

    if( object!=null && !object.isFree() )

      {

      if( SHOW_SOLVED_DEBUG ) android.util.Log.e("D", "object "+shortName+" marked as solved");

      object.markFree();

      String add = mFreeSolvedObjects.length()==0 ? shortName : (","+shortName);

      mFreeSolvedObjects += add;

      mNumFreeSolved++;

      return true;

      }

    return false;

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

// PUBLIC API

  public static boolean addDownloadedObject(Context context, String shortName, int numScrambles, boolean isFree, int objectMinor,

                                         int extrasMinor, boolean icon, boolean object, boolean extras)

    {

    if( SHOW_DOWNLOADED_DEBUG ) android.util.Log.e("D", "New downloaded object "+shortName+" icon="+icon+" object="+object+" extras="+extras);

    for( DownloadedObject obj : mDownloadedObjects )

      {

      if( obj.shortName.equals(shortName) )

        {

        obj.icon  |= icon;

        obj.object|= object;

        obj.extras|= extras;

        if( !obj.object ) objectMinor=-1;

        if( !obj.extras ) extrasMinor=-1;

        obj.objectMinor = objectMinor;

        obj.extrasMinor = extrasMinor;

        if( SHOW_DOWNLOADED_DEBUG ) android.util.Log.e("D", "Updating downloaded object "+shortName+" icon="+obj.icon+" object="+obj.object+" extras="+obj.extras);

        try

          {

          RubikActivity ract = (RubikActivity)context;

          ract.reloadObject(shortName);

          }

        catch(Exception ex)

          {

          android.util.Log.e("D", "exception trying to reload object: "+ex.getMessage() );

          }

        return false;

        }

      }

    if( !object ) objectMinor=-1;

    if( !extras ) extrasMinor=-1;

    DownloadedObject obj = new DownloadedObject(shortName,numScrambles,isFree,objectMinor,extrasMinor,icon,object,extras);

    if ( internalAddDownloadedObject(obj) )

      {

      if( SHOW_DOWNLOADED_DEBUG ) android.util.Log.e("D", "Adding new downloaded object "+shortName+" icon="+obj.icon+" object="+obj.object+" extras="+obj.extras);

      mDownloadedObjects.add(obj);

      return true;

      }

    else

      {

      if( SHOW_DOWNLOADED_DEBUG ) android.util.Log.e("D", "New downloaded object "+shortName+" is already built-in, deleting");

      RubikFiles files = RubikFiles.getInstance();

      files.deleteIcon(context,shortName);

      files.deleteJsonObject(context,shortName);

      files.deleteJsonExtras(context,shortName);

      return false;

      }

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static void setMeshState(int ordinal, int state)

    {

    if( ordinal>=0 && ordinal<mNumObjects ) mObjects.get(ordinal).setMeshState(state);

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static int getMeshState(int ordinal)

    {

    return (ordinal>=0 && ordinal<mNumObjects) ? mObjects.get(ordinal).getMeshState() : MESH_NICE;

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static void saveMeshState(SharedPreferences.Editor editor)

    {

    for(int i=0; i<mNumObjects; i++)

      {

      RubikObject obj = getObject(i);

      if( obj!=null )

        {

        String name = obj.getUpperName();

        editor.putInt("rol_"+name, obj.getMeshState() );

        }

      }

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static boolean allAlreadyBought()

    {

    return mFreeBoughtObjects.equals("*");

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static boolean thereAreLockedObjects()

    {

    for(int i=0; i<mNumObjects; i++)

      {

      RubikObject o = mObjects.get(i);

      if( !o.isFree() ) return true;

      }

    return false;

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static boolean objectAlreadyBought(String shortName)

    {

    RubikObject o = getObject(shortName);

    return ( o!=null && o.isFree() );

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static void buyAll()

    {

    mFreeBoughtObjects = "*";

    if( SHOW_SOLVED_DEBUG ) android.util.Log.e("D", "all objects marked as bought");

    for(int i=0; i<mNumObjects; i++)

      {

      RubikObject o = mObjects.get(i);

      o.markFree();

      }

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static boolean buyObject(String shortName)

    {

    RubikObject o = getObject(shortName);

    if( o!=null && !o.isFree() )

      {

      if( SHOW_SOLVED_DEBUG ) android.util.Log.e("D", "object "+shortName+" marked as bought");

      o.markFree();

      String add = mFreeBoughtObjects.length()==0 ? shortName : (","+shortName);

      mFreeBoughtObjects += add;

      return true;

      }

    return false;

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static boolean solveObject(String shortName)

    {

    RubikObject object = getObject(shortName);

    return solveObject(object,shortName);

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static void savePreferences(SharedPreferences.Editor editor)

    {

    RubikObject obj = getObject(mObject);

    if( obj!=null ) editor.putString("rol_objName", obj.getUpperName() );

    int numDownloaded = mDownloadedObjects.size();

    if( numDownloaded>0 )

      {

      StringBuilder downloadedObjects = new StringBuilder();

      for(int i=0; i<numDownloaded; i++)

        {

        if( i>0 ) downloadedObjects.append(',');

        DownloadedObject object = mDownloadedObjects.get(i);

        downloadedObjects.append(object.shortName);

        downloadedObjects.append(' ');

        downloadedObjects.append(object.numScrambles);

        downloadedObjects.append(' ');

        downloadedObjects.append(object.objectMinor);

        downloadedObjects.append(' ');

        downloadedObjects.append(object.extrasMinor);

        downloadedObjects.append(' ');

        downloadedObjects.append(object.icon   ? "1":"0");

        downloadedObjects.append(' ');

        downloadedObjects.append(object.object ? "1":"0");

        downloadedObjects.append(' ');

        downloadedObjects.append(object.extras ? "1":"0");

        downloadedObjects.append(' ');

        downloadedObjects.append(object.free ? "true":"false");

        }

      String objects = downloadedObjects.toString();

      if( SHOW_DOWNLOADED_DEBUG ) android.util.Log.e("D", "saving: "+objects);

      editor.putString("rol_downloaded", objects );

      }

    else

      {

      editor.putString("rol_downloaded", "" );

      }

    editor.putString("rol_freeSolved", mFreeSolvedObjects);

    editor.putString("rol_freeBought", mFreeBoughtObjects);

    if( SHOW_SOLVED_DEBUG )

      {

      android.util.Log.e("D", "saving solved objects: "+mFreeSolvedObjects);

      android.util.Log.e("D", "saving bought objects: "+mFreeBoughtObjects);

      }

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static void restorePreferences(Context context, SharedPreferences preferences, boolean justStarted)

    {

    if( mThis==null ) mThis = new RubikObjectList();

    String downloaded = preferences.getString("rol_downloaded","");

    if( SHOW_DOWNLOADED_DEBUG ) android.util.Log.e("D", downloaded);

    if( !downloaded.equals(""))

      {

      String[] dObjects = downloaded.split(",");

      for(String dObj : dObjects)

        {

        String[] parts = dObj.split(" ");

        int length = parts.length;

        if( length==7 || length==8 )

          {

          String name = parts[0];

          String scra = parts[1];

          String objM = parts[2];

          String extM = parts[3];

          String icon = parts[4];

          String obje = parts[5];

          String extr = parts[6];

          boolean isFree = (length==7 || Boolean.parseBoolean(parts[7]));

          int scrambles = Integer.parseInt(scra);

          int oMinor    = Integer.parseInt(objM);

          int eMinor    = Integer.parseInt(extM);

          boolean bIcon = icon.equals("1");

          boolean bObje = obje.equals("1");

          boolean bExtr = extr.equals("1");

          addDownloadedObject(context,name,scrambles,isFree,oMinor,eMinor,bIcon,bObje,bExtr);

          }

        }

      }

    RubikObject object = getObject(DEF_OBJECT);

    String defName = object==null ? "CUBE_3" : object.getUpperName();

    String objName= preferences.getString("rol_objName",defName);

    mObject = getOrdinal(objName);

    if( mObject<0 || mObject>=mNumObjects ) mObject = DEF_OBJECT;

    if( justStarted) restoreFreedObjects(preferences);

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static void restoreMeshState(SharedPreferences preferences)

    {

    for(int i=0; i<mNumObjects; i++)

      {

      RubikObject obj = getObject(i);

      if( obj!=null )

        {

        String name  = obj.getUpperName();

        int meshState= preferences.getInt("rol_"+name,MESH_NICE);

        obj.setMeshState(meshState);

        }

      }

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static void setObjectFreeState()

    {

    int numUnclaimed = getNumUnclaimedSolves();

    if( numUnclaimed>0 )

      {

      int marked = markAllSolvedAsFree();

      int stillUnclaimed = numUnclaimed-marked;

      if( stillUnclaimed>0) markAsFree(stillUnclaimed);

      }

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static boolean setCurrObject(int ordinal)

    {

    if( mObject!=ordinal )

      {

      mObject = ordinal;

      return true;

      }

    return false;

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static int getCurrObject()

    {

    return mObject;

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static String getCurrentName()

    {

    RubikObject object = mObjects.get(mObject);

    return object==null ? "" : object.getUpperName();

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static RubikObject getObject(int ordinal)

    {

    if( mThis==null ) mThis = new RubikObjectList();

    return ordinal>=0 && ordinal<mNumObjects ? mObjects.get(ordinal) : null;

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static RubikObject getObject(String shortUpperName)

    {

    if( mThis==null ) mThis = new RubikObjectList();

    for(int i=0; i<mNumObjects; i++)

      {

      RubikObject object = mObjects.get(i);

      if( object.getUpperName().equals(shortUpperName) )

        {

        return object;

        }

      }

    return null;

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static int getNumObjects()

    {

    if( mThis==null ) mThis = new RubikObjectList();

    return mNumObjects;

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static int getOrdinal(String name)

    {

    if( mThis==null ) mThis = new RubikObjectList();

    String lowerName = name.toLowerCase(Locale.ENGLISH);

    for(int i=0; i<mNumObjects; i++)

      {

      RubikObject obj = mObjects.get(i);

      if( obj.getLowerName().equals(lowerName) ) return i;

      }

    return -1;

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static int getNumExtrasObjects()

    {

    return mNumExtras;

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static int getNumTutorialObjects()

    {

    return mNumExtras;

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static int getObjectOrdinal(int extrasOrdinal)

    {

    for(int i=extrasOrdinal; i<mNumObjects; i++)

      {

      RubikObject object = getObject(i);

      int extOrd = object!=null ? object.getExtrasOrdinal() : -1;

      if( extOrd==extrasOrdinal ) return i;

      }

    return -1;

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static int getExtrasOrdinal(int objectOrdinal)

    {

    RubikObject object = getObject(objectOrdinal);

    return object!=null ? object.getExtrasOrdinal() : -1;

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static int getTutorialOrdinal(int objectOrdinal)

    {

    RubikObject object = getObject(objectOrdinal);

    return object!=null ? object.getExtrasOrdinal() : -1;

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static int getLocalObjectMinor(int objectOrdinal)

    {

    RubikObject object = getObject(objectOrdinal);

    return object!=null ? object.getObjectMinor() : -1;

    }

///////////////////////////////////////////////////////////////////////////////////////////////////

  public static int getLocalExtrasMinor(int objectOrdinal)

    {

    RubikObject object = getObject(objectOrdinal);

    return object!=null ? object.getExtrasMinor() : -1;

    }

}