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.magic.RubikPostRender;

import org.distorted.object.RubikObject;

import java.util.ArrayList;

import java.util.List;

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

public class RubikPattern

{

  private static final int DURATION_MILLIS = 800;

  public static final int MIN_CUBE  = 2;

  public static final int MAX_CUBE  = 5;

  public static final int NUM_CUBES = MAX_CUBE-MIN_CUBE+1;

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

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

  private int[] currentScrollPos= new int[NUM_CUBES];

  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;

      mPatterns = new ArrayList<>();

      mInitialized = false;

      }

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

    void initialize()

      {

      int colon;

      String moves, name;

      Pattern pattern;

      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(RubikPostRender post, int pattern)

      {

      if( !mInitialized ) initialize();

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

        {

        Pattern p = mPatterns.get(pattern);

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

        }

      }

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

    void backMove(RubikPostRender post, int pattern)

      {

      if( !mInitialized ) initialize();

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

        {

        Pattern p = mPatterns.get(pattern);

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

        }

      }

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

    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 RubikPostRender.ActionFinishedListener

    {

    private String nameStr, moveStr;

    private int[][] moves;

    private int curMove;

    private int numMove;

    private boolean mCanRotate;

    private boolean mInitialized;

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

    Pattern(String n, String m)

      {

      nameStr = n;

      moveStr = m;

      mCanRotate   = true;

      mInitialized = false;

      }

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

    private void initialize()

      {

      numMove = moveStr.length()/4;

      moves   = new int[numMove][3];

      curMove = numMove;

      int digit0, digit1, digit2;

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

        {

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

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

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

        moves[i][0] = (10*digit0+digit1)/32;

        moves[i][1] = (10*digit0+digit1)%32;

        moves[i][2] = 2-digit2;

        }

      moveStr = null;

      mInitialized = true;

      }

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

    String getName()

      {

      return nameStr;

      }

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

    int getNumMove()

      {

      if( !mInitialized ) initialize();

      return numMove;

      }

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

    int getCurMove()

      {

      if( !mInitialized ) initialize();

      return curMove;

      }

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

    void makeMove(RubikPostRender post)

      {

      if( !mInitialized ) initialize();

      curMove++;

      RubikObject object = post.getObject();

      if( mCanRotate )

        {

        if( curMove>numMove )

          {

          curMove= 0;

          post.initializeObject(null);

          }

        else

          {

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

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

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

          int angle    = bareAngle*(360/object.getBasicAngle());

          int numRot   = Math.abs(bareAngle);

          if( angle!=0 )

            {

            mCanRotate = false;

            post.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!");

        curMove--;

        }

      }

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

    void backMove(RubikPostRender post)

      {

      if( !mInitialized ) initialize();

      curMove--;

      RubikObject object = post.getObject();

      if( mCanRotate )

        {

        if( curMove<0 )

          {

          curMove=numMove;

          post.initializeObject(moves);

          }

        else

          {

          int axis     =moves[curMove][0];

		      int rowBitmap=moves[curMove][1];

		      int bareAngle=moves[curMove][2];

          int angle    = bareAngle*(360/object.getBasicAngle());

          int numRot   = Math.abs(bareAngle);

          if( angle!=0 )

            {

            mCanRotate = false;

            post.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!");

        curMove++;

        }

      }

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

    int[][] reInitialize()

      {

      if( !mInitialized ) initialize();

      mCanRotate = true;

      curMove = numMove;

      return moves;

      }

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

    public void onActionFinished(final long effectID)

      {

      mCanRotate = true;

      }

    }

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

  private RubikPattern()

    {

    mCategories = new ArrayList<>();

    initializeCategories(0, RubikPatternCube2.patterns);

    initializeCategories(1, RubikPatternCube3.patterns);

    initializeCategories(2, RubikPatternCube4.patterns);

    initializeCategories(3, RubikPatternCube5.patterns);

    }

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

  private void initializeCategories(int num, String[][] pat)

    {

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

    Category cat;

    for(String[] lines: pat)

      {

      cat = new Category(lines);

      list.add(cat);

      }

    mCategories.add(num,list);

    numCategories[num]=pat.length;

    }

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

// PUBLIC API

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

  public static RubikPattern getInstance()

    {

    if( mThis==null )

      {

      mThis = new RubikPattern();

      }

    return mThis;

    }

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

  public int getNumCategories(int tab)

    {

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

    }

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

  public String getCategoryName(int tab, int cat)

    {

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

      {

      Category c = mCategories.get(tab).get(cat);

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

      }

    return null;

    }

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

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

    {

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

      {

      currentCategory[tab] = cat;

      currentScrollPos[tab]= scrollPos;

      }

    }

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

  public int recallCategory(int tab)

    {

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

    }

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

  public int recallScrollPos(int tab)

    {

    return tab>=0 && tab<NUM_CUBES ? currentScrollPos[tab] : 0;

    }

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

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

    {

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

      {

      Category c = mCategories.get(tab).get(cat);

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

      }

    return null;

    }

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

  public int getNumPatterns(int tab, int cat)

    {

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

      {

      Category c = mCategories.get(tab).get(cat);

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

      }

    return 0;

    }

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

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

    {

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

      {

      Category c = mCategories.get(tab).get(cat);

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

      }

    return 0;

    }

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

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

    {

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

      {

      Category c = mCategories.get(tab).get(cat);

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

      }

    return 0;

    }

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

  public void makeMove(RubikPostRender post, int tab, int cat, int pat)

    {

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

      {

      Category c = mCategories.get(tab).get(cat);

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

      }

    }

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

  public void backMove(RubikPostRender post, int tab, int cat, int pat)

    {

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

      {

      Category c = mCategories.get(tab).get(cat);

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

      }

    }

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

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

    {

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

      {

      Category c = mCategories.get(tab).get(cat);

      if( c!=null ) return c.reInitialize(pat);

      }

    return null;

    }

}