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 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.main.TwistyObject;

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

public abstract class BandagedObject

{

    private final DistortedScreen mScreen;

    private final float[][] mFaceAxis;

    private BandagedCubit[] mCubits;

    final int[] mSize;

    final float mDist2D;

    int mMax;

    int mNumCubits;

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

   BandagedObject(DistortedScreen screen)

     {

     mScreen = screen;

     mSize = new int[3];

     mDist2D = getDist2D();

     Static3D[] axis = getFaceAxis();

     int numAxis = axis.length;

     mFaceAxis = new float[numAxis][];

     for(int i=0; i<numAxis; i++) mFaceAxis[i] = new float[] { axis[i].get0(), axis[i].get1(), axis[1].get2() };

     }

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

   abstract float getDist2D();

   abstract float[] getDist3D();

   abstract int[] getColors();

   abstract Static3D[] getFaceAxis();

   abstract float[][][] getPositions();

   abstract boolean isAdjacent(float dx, float dy, float dz);

   abstract int computeProjectionAngle();

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

   abstract boolean isInsideFace(int face, float[] p);

   abstract TwistyObject createObject(int mode, float scale );

   abstract MeshBase createMesh(int variant, float[] pos, boolean round);

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

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

     {

     mCubits = new BandagedCubit[mNumCubits];

     float[][][] pos = getPositions();

     int c=0,numVariants = pos.length;

     for(int v=0; v<numVariants; v++)

       {

       int numCubits = pos[v].length;

       for(int vi=0; vi<numCubits; vi++)

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

       }

     }

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

   int computeMapsIndex(float[] faceAx)

      {

      int min=-1, numAxis = mFaceAxis.length;

      float error = Float.MAX_VALUE;

      float x = faceAx[0];

      float y = faceAx[1];

      float z = faceAx[2];

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

        {

        float[] ax = mFaceAxis[i];

        float dx = x-ax[0];

        float dy = y-ax[1];

        float dz = z-ax[2];

        float diff = dx*dx + dy*dy + dz*dz;

        if( error>diff )

          {

          error = diff;

          min = i;

          }

        }

      return min;

      }

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

   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();

       }

     }

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

   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;

     }

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

   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);

         }

       }

     }

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

   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();

        }

     }

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

  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();

    }

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

  int whichCubitTouched(float[] point3D)

    {

    float x = point3D[0]*mMax;

    float y = point3D[1]*mMax;

    float z = point3D[2]*mMax;

    int minIndex = -1;

    float minDist = Float.MAX_VALUE;

    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++)

          {

          float dx = pos[3*p  ]-x;

          float dy = pos[3*p+1]-y;

          float dz = pos[3*p+2]-z;

          float dist = dx*dx + dy*dy + dz*dz;

          if( dist<minDist )

            {

            minDist = dist;

            minIndex = c;

            }

          }

        }

    return minIndex;

    }

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

  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 dx = pos1[3*i  ] - pos2[3*j  ];

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

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

         if( isAdjacent(dx,dy,dz) ) return true;

         }

     return false;

     }

}