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

import android.content.Context;

import android.content.SharedPreferences;

import android.graphics.drawable.BitmapDrawable;

import android.os.Bundle;

import android.util.TypedValue;

import android.view.Gravity;

import android.view.LayoutInflater;

import android.view.View;

import android.view.Window;

import android.widget.Button;

import android.widget.GridLayout;

import android.widget.ImageButton;

import android.widget.LinearLayout;

import android.widget.PopupWindow;

import org.distorted.dialogs.RubikDialogAbout;

import org.distorted.dialogs.RubikDialogScores;

import org.distorted.main.R;

import org.distorted.main.RubikActivity;

import org.distorted.main.RubikPreRender;

import org.distorted.objects.RubikObject;

import org.distorted.objects.RubikObjectList;

import org.distorted.scores.RubikScores;

import java.util.ArrayList;

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

public class RubikStatePlay extends RubikStateAbstract implements RubikPreRender.ActionFinishedListener

  {

  private static final int DURATION_MILLIS = 750;

  private static final int LEVELS_SHOWN = 10;

  public  static final int DEF_OBJECT= RubikObjectList.CUBE.ordinal();

  public  static final int DEF_SIZE  =  3;

  private static int[] BUTTON_LABELS = { R.string.scores, R.string.patterns, R.string.solver, R.string.about };

  private static final int NUM_BUTTONS = BUTTON_LABELS.length;

  private ImageButton mObjButton, mMenuButton, mPrevButton, mSolveButton;

  private Button mPlayButton;

  private PopupWindow mObjectPopup, mMenuPopup, mPlayPopup;

  private int mObject = DEF_OBJECT;

  private int mSize   = DEF_SIZE;

  private int mObjectSize, mMenuLayoutWidth, mMenuLayoutHeight, mPlayLayoutWidth;

  private GridLayout mObjectGrid;

  private int mLevelValue;

  private float mButtonSize, mMenuItemSize, mMenuTextSize;

  private int mColCount, mRowCount;

  private LinearLayout mPlayLayout;

  private ArrayList<Move> mMoves;

  private boolean mCanPrevMove;

  private static class Move

    {

    private int mAxis, mRow, mAngle;

    Move(int axis, int row, int angle)

      {

      mAxis = axis;

      mRow  = row;

      mAngle= angle;

      }

    }

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

  void leaveState(RubikActivity act)

    {

    }

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

  void enterState(final RubikActivity act)

    {

    float width = act.getScreenWidthInPixels();

    mMenuTextSize = width*RubikActivity.MENU_MEDIUM_TEXT_SIZE;

    mButtonSize   = width*RubikActivity.BUTTON_TEXT_SIZE;

    mMenuItemSize = width*RubikActivity.MENU_ITEM_SIZE;

    mCanPrevMove = true;

    if( mMoves==null ) mMoves = new ArrayList<>();

    else               mMoves.clear();

    mRowCount = RubikObjectList.getRowCount();

    mColCount = RubikObjectList.getColumnCount();

    // TOP ////////////////////////////

    LinearLayout layoutTop = act.findViewById(R.id.upperBar);

    layoutTop.removeAllViews();

    setupObjectWindow(act,width);

    setupObjectButton(act,width);

    layoutTop.addView(mObjButton);

    setupMenuWindow(act,width);

    setupMenuButton(act,width);

    layoutTop.addView(mMenuButton);

    setupPlayWindow(act,width);

    setupPlayButton(act,width);

    layoutTop.addView(mPlayButton);

    // BOT ////////////////////////////

    LinearLayout layoutLeft = act.findViewById(R.id.mainBarLeft);

    layoutLeft.removeAllViews();

    setupPrevButton(act,width);

    layoutLeft.addView(mPrevButton);

    setupSolveButton(act,width);

    layoutLeft.addView(mSolveButton);

    LinearLayout layoutRight = act.findViewById(R.id.mainBarRight);

    layoutRight.removeAllViews();

    }

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

  private void setupObjectButton(final RubikActivity act, final float width)

    {

    final int padding = (int)(width*RubikActivity.PADDING);

    final int margin  = (int)(width*RubikActivity.MARGIN);

    final int icon = RubikActivity.getDrawable(R.drawable.ui_small_cube_menu,R.drawable.ui_medium_cube_menu, R.drawable.ui_big_cube_menu, R.drawable.ui_huge_cube_menu);

    LinearLayout.LayoutParams params = new LinearLayout.LayoutParams(LinearLayout.LayoutParams.MATCH_PARENT,LinearLayout.LayoutParams.MATCH_PARENT, 1.2f);

    params.topMargin    = margin;

    params.bottomMargin = margin;

    params.leftMargin   = margin;

    params.rightMargin  = margin;

    mObjButton = new ImageButton(act);

    mObjButton.setLayoutParams(params);

    mObjButton.setPadding(padding,0,padding,0);

    mObjButton.setImageResource(icon);

    mObjButton.setOnClickListener( new View.OnClickListener()

      {

      @Override

      public void onClick(View view)

        {

        if( act.getPreRender().canPlay() )

          {

          mObjectPopup.setFocusable(false);

          mObjectPopup.update();

          View popupView = mObjectPopup.getContentView();

          popupView.setSystemUiVisibility(RubikActivity.FLAGS);

          mObjectPopup.showAsDropDown(view, margin, margin, Gravity.LEFT);

          mObjectPopup.update(view, mObjectSize*mColCount, mObjectSize*mRowCount);

          mObjectPopup.setFocusable(true);

          mObjectPopup.update();

          }

        }

      });

    }

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

  private void setupPlayButton(final RubikActivity act, final float width)

    {

    final int padding = (int)(width*RubikActivity.PADDING);

    final int margin  = (int)(width*RubikActivity.MARGIN);

    LinearLayout.LayoutParams params = new LinearLayout.LayoutParams(LinearLayout.LayoutParams.MATCH_PARENT,LinearLayout.LayoutParams.MATCH_PARENT, 1.2f);

    params.topMargin    = margin;

    params.bottomMargin = margin;

    params.leftMargin   = margin;

    params.rightMargin  = margin;

    mPlayButton = new Button(act);

    mPlayButton.setLayoutParams(params);

    mPlayButton.setPadding(padding,0,padding,0);

    mPlayButton.setTextSize(TypedValue.COMPLEX_UNIT_PX, mButtonSize);

    mPlayButton.setText(R.string.play);

    mPlayButton.setOnClickListener( new View.OnClickListener()

      {

      @Override

      public void onClick(View view)

        {

        mPlayPopup.setFocusable(false);

        mPlayPopup.update();

        View popupView = mPlayPopup.getContentView();

        popupView.setSystemUiVisibility(RubikActivity.FLAGS);

        mPlayPopup.showAsDropDown(view, margin, margin, Gravity.RIGHT);

        mPlayPopup.update(view, mPlayLayoutWidth, (int)(LEVELS_SHOWN*(mMenuItemSize+margin)+margin));

        mPlayPopup.setFocusable(true);

        mPlayPopup.update();

        }

      });

    }

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

  private void setupMenuButton(final RubikActivity act, final float width)

    {

    final int padding = (int)(width*RubikActivity.PADDING);

    final int margin  = (int)(width*RubikActivity.MARGIN);

    final int icon = RubikActivity.getDrawable(R.drawable.ui_small_menu,R.drawable.ui_medium_menu, R.drawable.ui_big_menu, R.drawable.ui_huge_menu);

    LinearLayout.LayoutParams params = new LinearLayout.LayoutParams(LinearLayout.LayoutParams.MATCH_PARENT, LinearLayout.LayoutParams.MATCH_PARENT, 1.2f);

    params.topMargin    = margin;

    params.bottomMargin = margin;

    params.leftMargin   = margin;

    params.rightMargin  = margin;

    mMenuButton = new ImageButton(act);

    mMenuButton.setLayoutParams(params);

    mMenuButton.setPadding(padding,0,padding,0);

    mMenuButton.setImageResource(icon);

    mMenuButton.setOnClickListener( new View.OnClickListener()

      {

      @Override

      public void onClick(View view)

        {

        if( act.getPreRender().canPlay() )

          {

          mMenuPopup.setFocusable(false);

          mMenuPopup.update();

          View popupView = mMenuPopup.getContentView();

          popupView.setSystemUiVisibility(RubikActivity.FLAGS);

          mMenuPopup.showAsDropDown(view, (int)(-width/12), margin, Gravity.CENTER);

          mMenuPopup.update(view, mMenuLayoutWidth, mMenuLayoutHeight);

          mMenuPopup.setFocusable(true);

          mMenuPopup.update();

          }

        }

      });

    }

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

  private void setupSolveButton(final RubikActivity act, final float width)

    {

    int padding  = (int)(width*RubikActivity.PADDING);

    int margin   = (int)(width*RubikActivity.MARGIN);

    int widthBut = (int)(width/6);

    int icon = RubikActivity.getDrawable(R.drawable.ui_small_cube_solve,R.drawable.ui_medium_cube_solve, R.drawable.ui_big_cube_solve, R.drawable.ui_huge_cube_solve);

    LinearLayout.LayoutParams params = new LinearLayout.LayoutParams(widthBut, LinearLayout.LayoutParams.MATCH_PARENT);

    params.topMargin    = margin;

    params.bottomMargin = margin;

    params.leftMargin   = margin;

    params.rightMargin  = margin;

    mSolveButton = new ImageButton(act);

    mSolveButton.setLayoutParams(params);

    mSolveButton.setPadding(padding,0,padding,0);

    mSolveButton.setImageResource(icon);

    mSolveButton.setOnClickListener( new View.OnClickListener()

      {

      @Override

      public void onClick(View v)

        {

        act.getPreRender().solveObject();

        mMoves.clear();

        }

      });

    }

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

  private void setupPrevButton(final RubikActivity act, final float width)

    {

    int padding  = (int)(width*RubikActivity.PADDING);

    int margin   = (int)(width*RubikActivity.MARGIN);

    int widthBut = (int)(width/6);

    int icon = RubikActivity.getDrawable(R.drawable.ui_small_cube_back,R.drawable.ui_medium_cube_back, R.drawable.ui_big_cube_back, R.drawable.ui_huge_cube_back);

    LinearLayout.LayoutParams params = new LinearLayout.LayoutParams(widthBut, LinearLayout.LayoutParams.MATCH_PARENT);

    params.topMargin    = margin;

    params.bottomMargin = margin;

    params.leftMargin   = margin;

    params.rightMargin  = margin;

    mPrevButton = new ImageButton(act);

    mPrevButton.setLayoutParams(params);

    mPrevButton.setPadding(padding,0,padding,0);

    mPrevButton.setImageResource(icon);

    mPrevButton.setOnClickListener( new View.OnClickListener()

      {

      @Override

      public void onClick(View v)

        {

        RubikPreRender pre = act.getPreRender();

        backMove(pre);

        }

      });

    }

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

  private void setupObjectWindow(final RubikActivity act, final float width)

    {

    LayoutInflater layoutInflater = (LayoutInflater)act.getSystemService(Context.LAYOUT_INFLATER_SERVICE);

    final View layout = layoutInflater.inflate(R.layout.popup_objects, null);

    mObjectGrid = layout.findViewById(R.id.objectGrid);

    int[] indices = RubikObjectList.getIndices();

    GridLayout.Spec[] rowSpecs = new GridLayout.Spec[mRowCount];

    GridLayout.Spec[] colSpecs = new GridLayout.Spec[mColCount];

    mObjectGrid.setColumnCount(mColCount);

    mObjectGrid.setRowCount(mRowCount);

    int[] nextInColumn = new int[mColCount];

    for(int row=0; row<mRowCount; row++)

      {

      rowSpecs[row] = GridLayout.spec(row);

      }

    for(int col=0; col<mColCount; col++)

      {

      colSpecs[col] = GridLayout.spec(col);

      nextInColumn[col] =0;

      }

    mObjectPopup = new PopupWindow(act);

    mObjectPopup.setContentView(layout);

    mObjectPopup.setFocusable(true);

    int icon = RubikActivity.getDrawable(R.drawable.ui_small_cube2,R.drawable.ui_medium_cube2, R.drawable.ui_big_cube2, R.drawable.ui_huge_cube2);

    BitmapDrawable bd = (BitmapDrawable) act.getResources().getDrawable(icon);

    int cubeWidth = bd.getIntrinsicWidth();

    int margin = (int)(width*RubikActivity.LARGE_MARGIN);

    mObjectSize = (int)(cubeWidth + 2*margin + 0.5f);

    for(int object=0; object<RubikObjectList.NUM_OBJECTS; object++)

      {

      final RubikObjectList list = RubikObjectList.getObject(object);

      final int[] sizes = list.getSizes();

      int[] icons = list.getIconIDs();

      int len = sizes.length;

      final int obj = object;

      int col = indices[object];

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

        {

        final int index = i;

        ImageButton button = new ImageButton(act);

        button.setBackgroundResource(icons[i]);

        button.setOnClickListener( new View.OnClickListener()

          {

          @Override

          public void onClick(View v)

            {

            if( act.getPreRender().canPlay() && RubikState.getCurrentState()==RubikState.PLAY )

              {

              mObject = obj;

              mSize   = sizes[index];

              act.changeObject(list,sizes[index], true);

              adjustLevels(act);

              mMoves.clear();

              }

            mObjectPopup.dismiss();

            }

          });

        GridLayout.LayoutParams params = new GridLayout.LayoutParams(rowSpecs[nextInColumn[col]],colSpecs[col]);

        params.bottomMargin = margin;

        params.topMargin    = margin;

        params.leftMargin   = margin;

        params.rightMargin  = margin;

        nextInColumn[col]++;

        mObjectGrid.addView(button, params);

        }

      }

    }

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

  private void setupMenuWindow(final RubikActivity act, final float width)

    {

    LayoutInflater layoutInflater = (LayoutInflater)act.getSystemService(Context.LAYOUT_INFLATER_SERVICE);

    final View layout = layoutInflater.inflate(R.layout.popup_menu, null);

    LinearLayout menuLayout = layout.findViewById(R.id.menuGrid);

    mMenuPopup = new PopupWindow(act);

    mMenuPopup.setContentView(layout);

    mMenuPopup.setFocusable(true);

    int margin  = (int)(width*RubikActivity.MARGIN);

    int padding = (int)(width*RubikActivity.PADDING);

    mMenuLayoutWidth = (int)(width/2);

    mMenuLayoutHeight= (int)(2*margin + NUM_BUTTONS*(mMenuItemSize+margin));

    LinearLayout.LayoutParams pT = new LinearLayout.LayoutParams( mMenuLayoutWidth - 2*padding, (int)mMenuItemSize);

    pT.setMargins(margin, 0, margin, margin);

    LinearLayout.LayoutParams pM = new LinearLayout.LayoutParams( mMenuLayoutWidth - 2*padding, (int)mMenuItemSize);

    pM.setMargins(margin, margin, margin, margin);

    LinearLayout.LayoutParams pB = new LinearLayout.LayoutParams( mMenuLayoutWidth - 2*padding, (int)mMenuItemSize);

    pB.setMargins(margin, margin, margin, 2*margin);

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

      {

      final int but = i;

      Button button = new Button(act);

      button.setLayoutParams(pT);//i==0 ? pT : (i==NUM_BUTTONS-1 ? pB : pM));

      button.setText(BUTTON_LABELS[i]);

      button.setTextSize(TypedValue.COMPLEX_UNIT_PX, mMenuTextSize);

      button.setOnClickListener( new View.OnClickListener()

        {

        @Override

        public void onClick(View v)

          {

          mMenuPopup.dismiss();

          MenuAction(act,but);

          }

        });

      menuLayout.addView(button);

      }

    }

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

  private void setupPlayWindow(final RubikActivity act, final float width)

    {

    LayoutInflater layoutInflater = (LayoutInflater)act.getSystemService(Context.LAYOUT_INFLATER_SERVICE);

    final View layout = layoutInflater.inflate(R.layout.popup_play, null);

    mPlayLayout = layout.findViewById(R.id.playGrid);

    mPlayLayoutWidth = (int)(width*0.4f);

    mPlayPopup = new PopupWindow(act);

    mPlayPopup.setContentView(layout);

    mPlayPopup.setFocusable(true);

    adjustLevels(act);

    }

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

  private void backMove(RubikPreRender pre)

    {

    if( mCanPrevMove )

      {

      int numMoves = mMoves.size();

      if( numMoves>0 )

        {

        Move move = mMoves.remove(numMoves-1);

        RubikObject object = pre.getObject();

        int axis  = move.mAxis;

        int row   = (1<<move.mRow);

        int angle = move.mAngle;

        int numRot= Math.abs(angle*object.getBasicAngle()/360);

        if( angle!=0 )

          {

          mCanPrevMove = false;

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

          }

        else

          {

          android.util.Log.e("solution", "error: trying to back move of angle 0");

          }

        }

      }

    }

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

  private void MenuAction(RubikActivity act, int button)

    {

    switch(button)

      {

      case 0: RubikStatePlay play = (RubikStatePlay) RubikState.PLAY.getStateClass();

              int object = play.getObject();

              int size   = play.getSize();

              int sizeIndex = RubikObjectList.getSizeIndex(object,size);

              Bundle bundle = new Bundle();

              bundle.putInt("tab", RubikObjectList.pack(object,sizeIndex) );

              bundle.putBoolean("submitting", false);

              RubikDialogScores scores = new RubikDialogScores();

              scores.setArguments(bundle);

              scores.show(act.getSupportFragmentManager(), null);

              break;

      case 1: RubikState.switchState(act,RubikState.PATT);

              break;

      case 2: RubikState.switchState(act,RubikState.SVER);

              break;

      case 3: RubikDialogAbout diag = new RubikDialogAbout();

              diag.show(act.getSupportFragmentManager(), null);

              break;

      }

    }

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

  public void savePreferences(SharedPreferences.Editor editor)

    {

    editor.putInt("statePlay_object", mObject);

    editor.putInt("statePlay_size"  , mSize);

    if( mObjectPopup!=null )

      {

      mObjectPopup.dismiss();

      mObjectPopup = null;

      }

    if( mMenuPopup!=null )

      {

      mMenuPopup.dismiss();

      mMenuPopup = null;

      }

    if( mPlayPopup!=null )

      {

      mPlayPopup.dismiss();

      mPlayPopup = null;

      }

    }

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

  public void restorePreferences(SharedPreferences preferences)

    {

    mObject     = preferences.getInt("statePlay_object", DEF_OBJECT);

    mSize       = preferences.getInt("statePlay_size"  , DEF_SIZE  );

    }

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

  public boolean setObjectAndSize(RubikActivity act, RubikObjectList obj, int size)

    {

    if( mObject!=obj.ordinal() || mSize != size )

      {

      boolean success = false;

      for( int s: obj.getSizes() )

        if( s==size )

          {

          success = true;

          break;

          }

      if( success )

        {

        mObject = obj.ordinal();

        mSize   = size;

        if( mPlayLayout!=null ) adjustLevels(act);

        }

      return success;

      }

    return true;

    }

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

  private void adjustLevels(final RubikActivity act)

    {

    int sizeIndex = RubikObjectList.getSizeIndex(mObject,mSize);

    int maxLevel = RubikObjectList.getMaxLevel(mObject, sizeIndex);

    String[] levels = new String[maxLevel];

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

      {

      levels[i] = act.getString(R.string.lv_placeholder,i+1);

      }

    if( mLevelValue>maxLevel ) mLevelValue=1;

    float width = act.getScreenWidthInPixels();

    int margin  = (int)(width*RubikActivity.MARGIN);

    int padding = (int)(width*RubikActivity.PADDING);

    LinearLayout.LayoutParams pM = new LinearLayout.LayoutParams( mPlayLayoutWidth - 2*padding, (int)mMenuItemSize);

    pM.setMargins(margin, 0, margin, margin);

    LinearLayout.LayoutParams pT = new LinearLayout.LayoutParams( mPlayLayoutWidth - 2*padding, (int)mMenuItemSize);

    pT.setMargins(margin, margin, margin, margin);

    LinearLayout.LayoutParams pB = new LinearLayout.LayoutParams( mPlayLayoutWidth - 2*padding, (int)mMenuItemSize);

    pB.setMargins(margin, margin, margin, 2*margin);

    mPlayLayout.removeAllViews();

    int realSize= RubikObjectList.getSizeIndex(mObject,mSize);

    RubikScores scores = RubikScores.getInstance();

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

      {

      final int but = i;

      Button button = new Button(act);

      button.setLayoutParams(i==0 ? pT : (i==maxLevel-1 ? pB : pM));

      button.setText(levels[i]);

      button.setTextSize(TypedValue.COMPLEX_UNIT_PX, mMenuTextSize);

      int icon = scores.isSolved(mObject, realSize, i) ? R.drawable.ui_solved : R.drawable.ui_notsolved;

      button.setCompoundDrawablesWithIntrinsicBounds(icon,0,0,0);

      button.setOnClickListener( new View.OnClickListener()

        {

        @Override

        public void onClick(View v)

          {

          mPlayPopup.dismiss();

          mLevelValue = but+1;

          act.getPreRender().scrambleObject(mLevelValue);

          }

        });

      mPlayLayout.addView(button);

      }

    }

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

  int getLevel()

    {

    return mLevelValue;

    }

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

  public void addMove(int axis, int row, int angle)

    {

    mMoves.add(new Move(axis,row,angle));

    }

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

  public int getObject()

    {

    return mObject;

    }

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

  public int getSize()

    {

    return mSize;

    }

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

  public void onActionFinished(final long effectID)

    {

    mCanPrevMove = true;

    }

  }