Magic Cube

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

// Copyright 2020 Leszek Koltunski                                                               //

//                                                                                               //

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

//                                                                                               //

// Magic Cube 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 2 of the License, or                             //

// (at your option) any later version.                                                           //

//                                                                                               //

// Magic Cube 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 Magic Cube.  If not, see <http://www.gnu.org/licenses/>.                           //

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

package org.distorted.patterns;

import org.distorted.main.RubikPreRender;

import java.util.ArrayList;

import java.util.List;

import static org.distorted.patterns.RubikPatternList.NUM_OBJECTS;

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

public class RubikPattern

{

  private static final int DURATION_MILLIS = 750;

  private int[] numCategories    = new int[NUM_OBJECTS];

  private int[] currentCategory  = new int[NUM_OBJECTS];

  private int[] currentVisiblePos= new int[NUM_OBJECTS];

  private int[] currentExpanded  = new int[NUM_OBJECTS];

  private List<List<Category>> mCategories;

  private static RubikPattern mThis;

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

  private static class Category

    {

    private String[] mLines;

    private int numPatterns;

    private ArrayList<Pattern> mPatterns;

    private boolean mInitialized;

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

    Category(String[] lines)

      {

      mLines       = lines;

      numPatterns  = lines.length-1;

      mInitialized = false;

      }

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

    void initialize()

      {

      int colon;

      String moves, name;

      Pattern pattern;

      mPatterns = new ArrayList<>();

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

        {

        colon = mLines[i+1].indexOf(":");

        if( colon!=-1 )

          {

          moves   = mLines[i+1].substring(colon+1);

          name    = mLines[i+1].substring(0,colon);

          pattern = new Pattern(name,moves);

          mPatterns.add(pattern);

          }

        else

          {

          numPatterns--;

          }

        }

      mInitialized = true;

      }

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

    int getNumPatterns()

      {

      return numPatterns;

      }

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

    String getName()

      {

      return mLines[0];

      }

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

    String getPatternName(int pattern)

      {

      if( !mInitialized ) initialize();

      if( pattern>=0 && pattern<numPatterns )

        {

        Pattern p = mPatterns.get(pattern);

        return  p!=null ? p.getName():"";

        }

      return "";

      }

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

    int getPatternCurMove(int pattern)

      {

      if( !mInitialized ) initialize();

      if( pattern>=0 && pattern<numPatterns )

        {

        Pattern p = mPatterns.get(pattern);

        return  p!=null ? p.getCurMove():-1;

        }

      return -1;

      }

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

    int getPatternNumMove(int pattern)

      {

      if( !mInitialized ) initialize();

      if( pattern>=0 && pattern<numPatterns )

        {

        Pattern p = mPatterns.get(pattern);

        return  p!=null ? p.getNumMove():-1;

        }

      return -1;

      }

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

    void makeMove(RubikPreRender pre, int pattern)

      {

      if( !mInitialized ) initialize();

      if( pattern>=0 && pattern<numPatterns )

        {

        Pattern p = mPatterns.get(pattern);

        if( p!=null ) p.makeMove(pre);

        }

      }

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

    void backMove(RubikPreRender pre, int pattern)

      {

      if( !mInitialized ) initialize();

      if( pattern>=0 && pattern<numPatterns )

        {

        Pattern p = mPatterns.get(pattern);

        if( p!=null ) p.backMove(pre);

        }

      }

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

    int[][] reInitialize(int pattern)

      {

      if( !mInitialized ) initialize();

      if( pattern>=0 && pattern<numPatterns )

        {

        Pattern p = mPatterns.get(pattern);

        if( p!=null ) return p.reInitialize();

        }

      return null;

      }

    }

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

  private static class Pattern implements RubikPreRender.ActionFinishedListener

    {

    private String nameStr, moveStr;

    private int[][] moves;

    private int curMove;

    private int numMove;

    private boolean mCanRotate;

    private boolean mInitialized;

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

    Pattern(String name, String moves)

      {

      nameStr      = name;

      moveStr      = moves;

      mCanRotate   = true;

      mInitialized = false;

      }

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

    private void initialize()

      {

      numMove = moveStr.length()/4;

      moves   = new int[numMove][3];

      curMove = numMove;

      parseMoves(moves,numMove,moveStr);

      moveStr = null;

      mInitialized = true;

      }

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

    String getName()

      {

      return nameStr;

      }

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

    int getNumMove()

      {

      if( !mInitialized ) initialize();

      return numMove;

      }

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

    int getCurMove()

      {

      if( !mInitialized ) initialize();

      return curMove;

      }

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

    void makeMove(RubikPreRender pre)

      {

      if( !mInitialized ) initialize();

      if( mCanRotate )

        {

        curMove++;

        if( curMove>numMove )

          {

          curMove= 0;

          pre.initializeObject(null);

          }

        else

          {

          int axis      = moves[curMove-1][0];

		      int rowBitmap = moves[curMove-1][1];

		      int bareAngle = moves[curMove-1][2];

		      int basicAngle= pre.getObject().getBasicAngle()[axis];

          int angle     = bareAngle*(360/basicAngle);

          int numRot    = Math.abs(bareAngle);

          if( angle!=0 )

            {

            mCanRotate = false;

            pre.addRotation(this, axis, rowBitmap, angle, numRot*DURATION_MILLIS);

            }

          else

            {

            android.util.Log.e("pattern", "error: pattern "+nameStr+" move "+(curMove-1)+" angle 0");

            }

          }

        }

      else

        {

        android.util.Log.e("pattern", "failed to make Move!");

        }

      }

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

    void backMove(RubikPreRender pre)

      {

      if( !mInitialized ) initialize();

      if( mCanRotate )

        {

        curMove--;

        if( curMove<0 )

          {

          curMove=numMove;

          pre.initializeObject(moves);

          }

        else

          {

          int axis      = moves[curMove][0];

		      int rowBitmap = moves[curMove][1];

		      int bareAngle = moves[curMove][2];

		      int basicAngle= pre.getObject().getBasicAngle()[axis];

          int angle     = bareAngle*(360/basicAngle);

          int numRot    = Math.abs(bareAngle);

          if( angle!=0 )

            {

            mCanRotate = false;

            pre.addRotation(this, axis, rowBitmap, -angle, numRot*DURATION_MILLIS);

            }

          else

            {

            android.util.Log.e("pattern", "error: pattern "+nameStr+" move "+curMove+" angle 0");

            }

          }

        }

      else

        {

        android.util.Log.e("pattern", "failed to back Move!");

        }

      }

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

    int[][] reInitialize()

      {

      if( !mInitialized ) initialize();

      mCanRotate = true;

      curMove = numMove;

      return moves;

      }

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

    public void onActionFinished(final long effectID)

      {

      mCanRotate = true;

      }

    }

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

  private RubikPattern()

    {

    mCategories = new ArrayList<>();

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

      {

      List<Category> list = new ArrayList<>();

      String[][] patStrings = RubikPatternList.getPatterns(i);

      for(String[] lines: patStrings) list.add(new Category(lines));

      mCategories.add(list);

      numCategories[i]=patStrings.length;

      currentExpanded[i] = -1;

      }

    }

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

  private Category getCategory(int tab, int cat)

    {

    if( tab>=0 && tab<NUM_OBJECTS && cat>=0 && cat<numCategories[tab] )

      {

      return mCategories.get(tab).get(cat);

      }

    return null;

    }

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

// PUBLIC API

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

  public static RubikPattern getInstance()

    {

    if( mThis==null )

      {

      mThis = new RubikPattern();

      }

    return mThis;

    }

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

  public static void parseMoves(int[][] result, int numMoves, String moves)

    {

    int digit0, digit1, digit2, number;

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

      {

      digit0 = moves.charAt(4*i+1)-'0';

      digit1 = moves.charAt(4*i+2)-'0';

      digit2 = moves.charAt(4*i+3)-'0';

      number = 100*digit0+10*digit1+digit2;

      result[i][0] =  (number/32)%4;   // axis

      result[i][1] =  (number%32)  ;   // bitmap

      result[i][2] =2-(number/32)/4;   // angle

      }

    }

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

  public int getNumCategories(int tab)

    {

    return tab>=0 && tab<NUM_OBJECTS ? numCategories[tab] : 0;

    }

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

  public void rememberState(int tab, int cat, int scrollPos, int expanded)

    {

    if( tab>=0 && tab<NUM_OBJECTS )

      {

      currentCategory[tab]  = cat;

      currentVisiblePos[tab]= scrollPos;

      currentExpanded[tab]  = expanded;

      }

    }

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

  public int recallCategory(int tab)

    {

    return tab>=0 && tab<NUM_OBJECTS ? currentCategory[tab] : 0;

    }

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

  public int recallVisiblePos(int tab)

    {

    return tab>=0 && tab<NUM_OBJECTS ? currentVisiblePos[tab] : 0;

    }

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

  public int recallExpanded(int tab)

    {

    return tab>=0 && tab<NUM_OBJECTS ? currentExpanded[tab] : -1;

    }

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

  public String getCategoryName(int tab, int cat)

    {

    Category c = getCategory(tab,cat);

    return c!=null ? c.getName() : null;

    }

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

  public String getPatternName(int tab, int cat, int pat)

    {

    Category c = getCategory(tab,cat);

    return c!=null ? c.getPatternName(pat) : null;

    }

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

  public int getNumPatterns(int tab, int cat)

    {

    Category c = getCategory(tab,cat);

    return c!=null ? c.getNumPatterns() : 0;

    }

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

  public int getCurMove(int tab, int cat, int pat)

    {

    Category c = getCategory(tab,cat);

    return c!=null ? c.getPatternCurMove(pat) : 0;

    }

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

  public int getNumMoves(int tab, int cat, int pat)

    {

    Category c = getCategory(tab,cat);

    return c!=null ? c.getPatternNumMove(pat) : 0;

    }

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

  public void makeMove(RubikPreRender pre, int tab, int cat, int pat)

    {

    Category c = getCategory(tab,cat);

    if( c!=null ) c.makeMove(pre,pat);

    }

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

  public void backMove(RubikPreRender pre, int tab, int cat, int pat)

    {

    Category c = getCategory(tab,cat);

    if( c!=null ) c.backMove(pre,pat);

    }

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

  public int[][] reInitialize(int tab, int cat, int pat)

    {

    Category c = getCategory(tab,cat);

    return c!=null ? c.reInitialize(pat) : null;

    }

}