Magic Cube

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

// Copyright 2023 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.bandaged;

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

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

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

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

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

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

import org.distorted.library.main.DistortedNode;

import org.distorted.library.main.DistortedScreen;

import org.distorted.library.mesh.MeshBase;

import org.distorted.library.type.Static3D;

import org.distorted.library.type.Static4D;

import org.distorted.objectlib.helpers.FactoryBandagedCubit;

import org.distorted.objectlib.main.InitData;

import org.distorted.objectlib.main.TwistyObject;

import org.distorted.objectlib.objects.TwistyBandagedCuboid;

import org.distorted.objectlib.shape.ShapeHexahedron;

import org.distorted.objectlib.touchcontrol.TouchControlHexahedron;

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

public class BandagedObject

{

    private final DistortedScreen mScreen;

    private final float[] mPos;

    private final int[] mSize;

    private final float mDist2D;

    private BandagedCubit[] mCubits;

    private int mMax;

    private int mNumCubits;

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

   BandagedObject(DistortedScreen screen)

     {

     mScreen = screen;

     mPos = new float[3];

     mSize = new int[3];

     mDist2D = getDist2D();

     }

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

   int[] getSize()

     {

     return mSize;

     }

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

   void resetObject(float scale)

     {

     for(int c=0; c<mNumCubits; c++)

       {

       if( !mCubits[c].isAttached() )

         {

         mCubits[c].attach();

         mScreen.attach(mCubits[c].getNode());

         }

       if( mCubits[c].getPosition().length>3 )

         {

         mCubits[c].reset(scale);

         }

       mCubits[c].setUnmarked();

       }

     }

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

   private boolean isAdjacent(float[] pos1, float[] pos2)

     {

     int len1 = pos1.length/3;

     int len2 = pos2.length/3;

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

       for(int j=0; j<len2; j++)

         {

         float d0 = pos1[3*i  ] - pos2[3*j  ];

         float d1 = pos1[3*i+1] - pos2[3*j+1];

         float d2 = pos1[3*i+2] - pos2[3*j+2];

         if( d0*d0 + d1*d1 + d2*d2 == 1 ) return true;

         }

     return false;

     }

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

   private int computeNumCubits(int x, int y, int z)

     {

     return ( x<=1 || y<=1 || z<=1 ) ? x*y*z : x*y*z-(x-2)*(y-2)*(z-2);

     }

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

   float getMaxSize()

     {

     return mMax;

     }

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

   float[][] getCubitPositions()

     {

     int numAttached = 0;

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

       if( mCubits[i].isAttached() ) numAttached++;

     float[][] pos = new float[numAttached][];

     int attached=0;

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

       if( mCubits[i].isAttached() )

         {

         pos[attached++] = mCubits[i].getPosition();

         }

     return pos;

     }

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

   TwistyObject createObject(int mode, float size)

     {

     float[][] pos = getCubitPositions();

     InitData data = new InitData( mSize,pos);

     return new TwistyBandagedCuboid( TwistyObject.MESH_NICE, mode, ShapeHexahedron.DEFAULT_ROT, new Static3D(0,0,0), size, data, null );

     }

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

   void tryConnectingCubits(int index1, int index2, float scale)

     {

     if( index1!=index2 )

       {

       float[] pos1 = mCubits[index1].getPosition();

       float[] pos2 = mCubits[index2].getPosition();

       if( isAdjacent(pos1,pos2) )

         {

         mCubits[index2].join(pos1,scale);

         mCubits[index1].detach();

         mScreen.detach(mCubits[index1].getNode());

         }

       }

     }

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

   void attachCubits(float scale)

     {

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

       {

       mCubits[i].scaleMove(scale);

       DistortedNode node = mCubits[i].getNode();

       mScreen.attach(node);

       }

     }

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

   void attachAndMarkCubits(float scale, int touched)

     {

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

       {

       if( mCubits[i].isAttached() )

         {

         mCubits[i].scaleMove(scale);

         if( touched==i ) mCubits[i].setMarked();

         else             mCubits[i].setUnmarked();

         DistortedNode node = mCubits[i].getNode();

         mScreen.attach(node);

         }

       }

     }

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

   boolean tryChangeObject(int x, int y, int z)

     {

     if( mSize[0]!=x || mSize[1]!=y || mSize[2]!=z )

       {

       mSize[0] = x;

       mSize[1] = y;

       mSize[2] = z;

       mMax = x>y ? Math.max(x,z) : Math.max(y,z);

       mNumCubits = computeNumCubits(x,y,z);

       return true;

       }

     return false;

     }

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

   int computeProjectionAngle()

     {

     float quot1 = mSize[2]/ (float)mSize[0];

     float quot2 = mSize[2]/ (float)mSize[1];

     float quot3 = mSize[0]/ (float)mSize[2];

     float quot4 = mSize[0]/ (float)mSize[1];

     float quot5 = Math.max(quot1,quot2);

     float quot6 = Math.max(quot3,quot4);

     float quot7 = Math.max(quot5,quot6);

          if( quot7<=1.0f ) return 120;

     else if( quot7<=1.5f ) return 90;

     else if( quot7<=2.0f ) return 60;

     else                   return 30;

     }

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

   void scaleCubits(float scale)

     {

     for(int i=0; i<mNumCubits; i++) mCubits[i].scaleMove(scale);

     }

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

   void recreateCubits(Static4D quatT, Static4D quatA, Static3D scale)

     {

     if( mCubits==null )

        {

        createCubits(quatT,quatA,scale);

        }

      else

        {

        for(int i=0; i<mNumCubits; i++) mCubits[i].recreateBitmap();

        }

     }

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

   float[] getDist3D()

     {

     float max = getMaxSize();

     float x = 0.5f*(mSize[0]/max);

     float y = 0.5f*(mSize[1]/max);

     float z = 0.5f*(mSize[2]/max);

     return new float[] {x,x,y,y,z,z};

     }

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

   float getDist2D()

     {

     return 0.5f;

     }

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

// (x,y,z) ==

//

// ( 1,0,0) --> 0

// (-1,0,0) --> 1

// (0, 1,0) --> 2

// (0,-1,0) --> 3

// (0,0, 1) --> 4

// (0,0,-1) --> 5

   int computeMapsIndex(float[] faceAxis)

      {

      float x = faceAxis[0];

      float y = faceAxis[1];

      float z = faceAxis[2];

      int ix = x>0 ? (int)(x+0.5f) : (int)(x-0.5f);

      int iy = y>0 ? (int)(y+0.5f) : (int)(y-0.5f);

      int iz = z>0 ? (int)(z+0.5f) : (int)(z-0.5f);

      if( ix== 1 ) return 0;

      if( ix==-1 ) return 1;

      if( iy== 1 ) return 2;

      if( iy==-1 ) return 3;

      if( iz== 1 ) return 4;

      if( iz==-1 ) return 5;

      return 0;

      }

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

   MeshBase createMesh(float[] pos, boolean round)

      {

      FactoryBandagedCubit factory = FactoryBandagedCubit.getInstance();

      int[] size = getSize();

      return factory.createMesh(pos,size[0],size[1],size[2],false,round);

      }

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

   int[] getColors()

     {

     return new int[]

         {

           COLOR_YELLOW, COLOR_WHITE,

           COLOR_BLUE  , COLOR_GREEN,

           COLOR_RED   , COLOR_ORANGE

         };

     }

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

   void createCubits(Static4D quatT, Static4D quatA, Static3D scale)

     {

     mCubits = new BandagedCubit[mNumCubits];

     int c=0;

     int sx = mSize[0];

     int sy = mSize[1];

     int sz = mSize[2];

     float begX = 0.5f*(1-sx);

     float begY = 0.5f*(1-sy);

     float begZ = 0.5f*(1-sz);

     for(int x=0; x<sx; x++)

       for(int y=0; y<sy; y++)

          for(int z=0; z<sz; z++)

            if( x==0 || x==sx-1 || y==0 || y==sy-1 || z==0 || z==sz-1 )

              {

              float[] pos = new float[] { begX+x,begY+y,begZ+z };

              mCubits[c] = new BandagedCubit(this,pos,quatT,quatA,scale,false);

              c++;

              }

    }

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

  Static3D[] getFaceAxis()

    {

    return TouchControlHexahedron.FACE_AXIS;

    }

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

  void touchCubit(int index)

    {

    if( index>=0 && index<mNumCubits && mCubits[index]!=null ) mCubits[index].setMarked();

    }

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

  void untouchCubit(int index)

    {

    if( index>=0 && index<mNumCubits && mCubits[index]!=null ) mCubits[index].setUnmarked();

    }

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

  void stretchPoint(int face, float[] output)

    {

    float max = getMaxSize();

    switch(face/2)

      {

      case 0: output[0] *= (max/mSize[2]); output[1] *= (max/mSize[1]); break;

      case 1: output[0] *= (max/mSize[0]); output[1] *= (max/mSize[2]); break;

      case 2: output[0] *= (max/mSize[0]); output[1] *= (max/mSize[1]); break;

      }

    }

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

  int whichCubitTouched(int face, float pointX, float pointY)

    {

    float x = mSize[0];

    float y = mSize[1];

    float z = mSize[2];

    switch(face)

      {

      case 0: mPos[0] = (x-1)/2;

              mPos[1] = (int)( y*pointY+y/2)-(y-1)/2;

              mPos[2] = (int)(-z*pointX-z/2)+(z-1)/2;

              break;

      case 1: mPos[0] =-(x-1)/2;

              mPos[1] = (int)( y*pointY+y/2)-(y-1)/2;

              mPos[2] = (int)( z*pointX+z/2)-(z-1)/2;

              break;

      case 2: mPos[0] = (int)( x*pointX+x/2)-(x-1)/2;

              mPos[1] = (y-1)/2;

              mPos[2] = (int)(-z*pointY-z/2)+(z-1)/2;

              break;

      case 3: mPos[0] = (int)( x*pointX+x/2)-(x-1)/2;

              mPos[1] =-(y-1)/2;

              mPos[2] = (int)( z*pointY+z/2)-(z-1)/2;

              break;

      case 4: mPos[0] = (int)( x*pointX+x/2)-(x-1)/2;

              mPos[1] = (int)( y*pointY+y/2)-(y-1)/2;

              mPos[2] = (z-1)/2;

              break;

      case 5: mPos[0] = (int)(-x*pointX-x/2)+(x-1)/2;

              mPos[1] = (int)( y*pointY+y/2)-(y-1)/2;

              mPos[2] =-(z-1)/2;

              break;

      }

    for(int c=0; c<mNumCubits; c++)

      if( mCubits[c].isAttached() )

        {

        float[] pos = mCubits[c].getPosition();

        int len = pos.length/3;

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

          if( pos[3*p]==mPos[0] && pos[3*p+1]==mPos[1] && pos[3*p+2]==mPos[2] ) return c;

        }

    android.util.Log.e("D", "whichCubitTouched: IMPOSSIBLE!!");

    return -1;

    }

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

  boolean isInsideFace(int face, float[] p)

    {

    return ( p[0]<=mDist2D && p[0]>=-mDist2D && p[1]<=mDist2D && p[1]>=-mDist2D );

    }

}