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

import android.graphics.Canvas;

import android.graphics.Paint;

import static org.distorted.objects.TwistyObject.TEXTURE_HEIGHT;

import static org.distorted.objects.TwistyObject.COLOR_BLACK;

import static org.distorted.objects.TwistyIvy.IVY_D;

import static org.distorted.objects.TwistyIvy.IVY_C;

import static org.distorted.objects.TwistyIvy.IVY_M;

import static org.distorted.objects.TwistyRex.REX_D;

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

public class FactorySticker

  {

  private static final float SQ2 = (float)Math.sqrt(2);

  private static final float REX_X,REX_R,REX_B,REX_A, REX_P, REX_T, REX_C, REX_S;

  private static FactorySticker mThis;

  static

    {

    float F = REX_D*SQ2;

    float G = (1-REX_D)*SQ2/2;

    REX_X = (0.5f-REX_D*REX_D)/(2*REX_D);

    REX_R = (float)Math.sqrt(2*REX_X*REX_X+0.5f);

    REX_B = (float) ((180/Math.PI)*(2*Math.asin( Math.sqrt(REX_D*REX_D-REX_D+0.5f) / (2*REX_R) )));

    REX_A = (float) ((180/Math.PI)*Math.acos(REX_X/REX_R)) - 45;

    REX_P = 45 + REX_B/2 + REX_A;

    REX_T = (float) ( Math.tan( (Math.PI/180)*(45-REX_P/2) ) );

    REX_C = (float)(REX_R/Math.cos((Math.PI/180)*REX_B/2) );

    REX_S = (float)(1/Math.sqrt(1+4*G*G/(F*F)));

    }

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

  private FactorySticker()

    {

    }

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

  public static FactorySticker getInstance()

    {

    if( mThis==null ) mThis = new FactorySticker();

    return mThis;

    }

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

  private float computeAngle(float dx, float dy)

    {

    float PI = (float)Math.PI;

    double angle = Math.atan2(dy,dx);

    float ret = (float)(3*PI/2-angle);

    if( ret>2*PI ) ret-= 2*PI;

    return ret;

    }

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

  private void drawCurrVertex(Canvas canvas, Paint paint, int left, int top, float r, float stroke, float pX, float pY, float cX, float cY, float nX, float nY)

    {

    pX = (0.5f+pX)*TEXTURE_HEIGHT;

    pY = (0.5f-pY)*TEXTURE_HEIGHT;

    cX = (0.5f+cX)*TEXTURE_HEIGHT;

    cY = (0.5f-cY)*TEXTURE_HEIGHT;

    nX = (0.5f+nX)*TEXTURE_HEIGHT;

    nY = (0.5f-nY)*TEXTURE_HEIGHT;

    canvas.drawLine(left+pX,top+pY,left+cX,top+cY,paint);

    float aX = pX-cX;

    float aY = pY-cY;

    float bX = cX-nX;

    float bY = cY-nY;

    float aLen = (float)Math.sqrt(aX*aX+aY*aY);

    float bLen = (float)Math.sqrt(bX*bX+bY*bY);

    aX /= aLen;

    aY /= aLen;

    bX /= bLen;

    bY /= bLen;

    float sX = (aX-bX)/2;

    float sY = (aY-bY)/2;

    float sLen = (float)Math.sqrt(sX*sX+sY*sY);

    sX /= sLen;

    sY /= sLen;

    float startAngle = computeAngle(bX,-bY);

    float endAngle   = computeAngle(aX,-aY);

    float sweepAngle = endAngle-startAngle;

    if( sweepAngle<0 ) sweepAngle += 2*Math.PI;

    float R = r*TEXTURE_HEIGHT+stroke/2;

    float C = (float)Math.cos(sweepAngle/2);

    float A = R/C;

    left += (cX+A*sX);

    top  += (cY+A*sY);

    if( C< (2*R-stroke)/(2*R+stroke) )

      {

      float alpha = startAngle + sweepAngle/2;

      float B  = (R-stroke/2)/C;

      float sx = (float)Math.cos(alpha);

      float sy = (float)Math.sin(alpha);

      float startX = left + R*sx;

      float startY = top  + R*sy;

      float stopX  = left + B*sx;

      float stopY  = top  + B*sy;

      canvas.drawLine(startX,startY,stopX,stopY,paint);

      }

    startAngle *= 180/(Math.PI);

    sweepAngle *= 180/(Math.PI);

    canvas.drawArc( left-R, top-R, left+R, top+R, startAngle, sweepAngle, false, paint);

    }

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

// PUBLIC

  public void drawRoundedPolygon(Canvas canvas, Paint paint, int left, int top, float[] vertices, float stroke, int color, float radius)

    {

    stroke *= TEXTURE_HEIGHT;

    paint.setAntiAlias(true);

    paint.setStrokeWidth(stroke);

    paint.setColor(color);

    paint.setStyle(Paint.Style.FILL);

    canvas.drawRect(left,top,left+TEXTURE_HEIGHT,top+TEXTURE_HEIGHT,paint);

    paint.setColor(COLOR_BLACK);

    paint.setStyle(Paint.Style.STROKE);

    int length = vertices.length;

    int numVertices = length/2;

    float prevX = vertices[length-2];

    float prevY = vertices[length-1];

    float currX = vertices[0];

    float currY = vertices[1];

    float nextX = vertices[2];

    float nextY = vertices[3];

    for(int vert=0; vert<numVertices; vert++)

      {

      drawCurrVertex(canvas, paint, left, top, radius, stroke, prevX,prevY,currX,currY,nextX,nextY);

      prevX = currX;

      prevY = currY;

      currX = nextX;

      currY = nextY;

      if( 2*(vert+2)+1 < length )

        {

        nextX = vertices[2*(vert+2)  ];

        nextY = vertices[2*(vert+2)+1];

        }

      else

        {

        nextX = vertices[0];

        nextY = vertices[1];

        }

      }

    }

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

  public void drawIvyCornerSticker(Canvas canvas, Paint paint, int left, int top, int color, float stroke, float radius)

    {

    paint.setAntiAlias(true);

    paint.setColor(color);

    paint.setStyle(Paint.Style.FILL);

    canvas.drawRect(left,top,left+TEXTURE_HEIGHT,top+TEXTURE_HEIGHT,paint);

    paint.setColor(COLOR_BLACK);

    paint.setStyle(Paint.Style.STROKE);

    paint.setStrokeWidth(IVY_C*stroke*TEXTURE_HEIGHT);

    float tmp1 = ((IVY_D-0.5f)-IVY_M)*IVY_C;

    float cx1 = TEXTURE_HEIGHT*(tmp1 + 0.5f);

    float cy1 = TEXTURE_HEIGHT*(0.5f - tmp1);

    float halfL1 = IVY_C*TEXTURE_HEIGHT*(1.0f-2*IVY_D);

    canvas.drawArc( left+cx1-halfL1, top+cy1-halfL1, left+cx1+halfL1, top+cy1+halfL1, 270, 90, false, paint);

    float tmp2 = (+0.5f-IVY_M)*IVY_C;

    float tmp3 = (-0.5f-IVY_M)*IVY_C;

    float x0 = TEXTURE_HEIGHT*(+tmp2 + 0.5f);

    float y0 = TEXTURE_HEIGHT*(-tmp3 + 0.5f);

    float x1 = TEXTURE_HEIGHT*(+tmp2 + 0.5f);

    float y1 = TEXTURE_HEIGHT*(-tmp2 + 0.5f);

    float x2 = TEXTURE_HEIGHT*(+tmp3 + 0.5f);

    float y2 = TEXTURE_HEIGHT*(-tmp2 + 0.5f);

    canvas.drawLine(left+x0,top+y0,left+x1,top+y1,paint);

    canvas.drawLine(left+x1,top+y1,left+x2,top+y2,paint);

    float tmp4 = ((0.5f-stroke/2-radius/2)-IVY_M)*IVY_C;

    float cx2 = TEXTURE_HEIGHT*(tmp4 + 0.5f);

    float cy2 = TEXTURE_HEIGHT*(0.5f - tmp4);

    float halfL2 = IVY_C*TEXTURE_HEIGHT*radius;

    paint.setStrokeWidth(IVY_C*radius*TEXTURE_HEIGHT);

    canvas.drawArc( left+cx2-halfL2, top+cy2-halfL2, left+cx2+halfL2, top+cy2+halfL2, 270, 90, false, paint);

    }

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

  public void drawIvyCenterSticker(Canvas canvas, Paint paint, int left, int top, int color, float stroke, float radius)

    {

    paint.setAntiAlias(true);

    paint.setColor(color);

    paint.setStyle(Paint.Style.FILL);

    canvas.drawRect(left,top,left+TEXTURE_HEIGHT,top+TEXTURE_HEIGHT,paint);

    paint.setColor(COLOR_BLACK);

    paint.setStyle(Paint.Style.STROKE);

    paint.setStrokeWidth(stroke*TEXTURE_HEIGHT);

    float cx1 = TEXTURE_HEIGHT*IVY_D;

    float cy1 = TEXTURE_HEIGHT*(1-IVY_D);

    float cx2 = TEXTURE_HEIGHT*(1.0f-IVY_D);

    float cy2 = TEXTURE_HEIGHT*IVY_D;

    float halfL = TEXTURE_HEIGHT*(1.0f - 2*IVY_D);

    canvas.drawArc( left+cx1-halfL, top+cy1-halfL, left+cx1+halfL, top+cy1+halfL, 270, 90, false, paint);

    canvas.drawArc( left+cx2-halfL, top+cy2-halfL, left+cx2+halfL, top+cy2+halfL,  90, 90, false, paint);

    float tmp = TEXTURE_HEIGHT*(IVY_D+stroke*0.5f+radius*0.5f);

    float cx3 = tmp;

    float cy3 = tmp;

    float cx4 = TEXTURE_HEIGHT - cx3;

    float cy4 = TEXTURE_HEIGHT - cy3;

    float halfR = TEXTURE_HEIGHT*radius;

    paint.setStrokeWidth(radius*TEXTURE_HEIGHT);

    canvas.drawArc( left+cx3-halfR, top+cy3-halfR, left+cx3+halfR, top+cy3+halfR, 180, 90, false, paint);

    canvas.drawArc( left+cx4-halfR, top+cy4-halfR, left+cx4+halfR, top+cy4+halfR,   0, 90, false, paint);

    }

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

  public void drawRexCornerSticker(Canvas canvas, Paint paint, int left, int top, int color, float stroke, float radius1, float radius2)

    {

    paint.setColor(color);

    paint.setStyle(Paint.Style.FILL);

    canvas.drawRect(left,top,left+TEXTURE_HEIGHT,top+TEXTURE_HEIGHT,paint);

    paint.setColor(COLOR_BLACK);

    paint.setStyle(Paint.Style.STROKE);

    paint.setStrokeWidth(stroke*TEXTURE_HEIGHT);

    float F = REX_D*SQ2;

    float G = (1-REX_D)*SQ2/2;

    float cx1 = left + (0.5f-F/2)*TEXTURE_HEIGHT;

    float cx2 = left + (0.5f+F/2)*TEXTURE_HEIGHT;

    float cy  = top  + (0.5f+G/3)*TEXTURE_HEIGHT;

    canvas.drawLine(cx1, cy, cx2, cy, paint);

    float X   = REX_C-F/2;

    float R1  = TEXTURE_HEIGHT*(REX_R + 0.5f*stroke);

    float cx3 = left + (0.5f-X)*TEXTURE_HEIGHT;

    float cx4 = left + (0.5f+X)*TEXTURE_HEIGHT;

    canvas.drawArc( cx3-R1, cy-R1, cx3+R1, cy+R1, 360-REX_B/2, REX_B/2, false ,paint);

    canvas.drawArc( cx4-R1, cy-R1, cx4+R1, cy+R1, 180        , REX_B/2, false ,paint);

    float cx5 = left + (0.5f+F/2-radius2)*TEXTURE_HEIGHT;

    float cx6 = left + (0.5f-F/2+radius2)*TEXTURE_HEIGHT;

    float cy1 = top  + (0.5f+G/3-radius2)*TEXTURE_HEIGHT;

    float R2  = TEXTURE_HEIGHT*radius2;

    canvas.drawArc( cx5-R2, cy1-R2, cx5+R2, cy1+R2,  0, 90, false ,paint);

    canvas.drawArc( cx6-R2, cy1-R2, cx6+R2, cy1+R2, 90, 90, false ,paint);

    float cx7 = left + 0.5f*TEXTURE_HEIGHT;

    float cy2 = top  + (0.5f-2*G/3 + radius1/REX_S)*TEXTURE_HEIGHT;

    float R3  = TEXTURE_HEIGHT*(radius1 + 0.5f*stroke);

    canvas.drawArc( cx7-R3, cy2-R3, cx7+R3, cy2+R3, 270-(90-REX_B/2), 180-REX_B, false ,paint);

    }

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

  public void drawRexEdgeSticker(Canvas canvas, Paint paint, int left, int top, int color, float stroke, float radius)

    {

    paint.setColor(color);

    paint.setStyle(Paint.Style.FILL);

    canvas.drawRect(left,top,left+TEXTURE_HEIGHT,top+TEXTURE_HEIGHT,paint);

    paint.setColor(COLOR_BLACK);

    paint.setStyle(Paint.Style.STROKE);

    paint.setStrokeWidth(stroke*TEXTURE_HEIGHT);

    final float D = ( 0.5f - (0.5f-REX_D)/3);

    float cx1 = left+ TEXTURE_HEIGHT*(0.5f-REX_X);

    float cy1 = top + TEXTURE_HEIGHT*(0.5f+REX_X+D);

    float cx2 = left+ TEXTURE_HEIGHT*(0.5f+REX_X);

    float R1  = TEXTURE_HEIGHT*REX_R;

    canvas.drawArc( cx1-R1, cy1-R1, cx1+R1, cy1+R1, 315-REX_A-REX_B, REX_B, false ,paint);

    canvas.drawArc( cx2-R1, cy1-R1, cx2+R1, cy1+R1, 225+REX_A      , REX_B, false ,paint);

    float CORR_Y = radius/12;

    float CORR_A = 10;

    float sin = (float)Math.sin(Math.PI*REX_P/180);

    float cx = left + 0.5f*TEXTURE_HEIGHT;

    float cy = top  + ( 0.5f + 2*(0.5f-REX_D)/3 -CORR_Y -radius/sin )*TEXTURE_HEIGHT;

    float R2  = TEXTURE_HEIGHT*radius;

    canvas.drawArc( cx-R2, cy-R2, cx+R2, cy+R2, 90-(REX_P-CORR_A), 2*(REX_P-CORR_A), false ,paint);

    float F = 0.1f;

    float G = 0.6f;

    float R3  = TEXTURE_HEIGHT*radius*G*0.9f;

    float X = G*radius/REX_T;

    float cx4 = left + X*TEXTURE_HEIGHT;

    float cx3 = left + (1-X)*TEXTURE_HEIGHT;

    float cy3 = top + (0.5f - (0.5f-REX_D)/3 + G*radius - F*stroke)*TEXTURE_HEIGHT;

    canvas.drawArc( cx3-R3, cy3-R3, cx3+R3, cy3+R3, 270           , 90+REX_P, false ,paint);

    canvas.drawArc( cx4-R3, cy3-R3, cx4+R3, cy3+R3, 270-(90+REX_P), 90+REX_P, false ,paint);

    float cy5 = top + D*TEXTURE_HEIGHT;

    paint.setStrokeWidth((1-2*F)*stroke*TEXTURE_HEIGHT);

    canvas.drawLine(left, cy5, left+TEXTURE_HEIGHT, cy5, paint);

    }

  }