package com.codigoparallevar.minicards;

import android.content.Context;
import android.graphics.Canvas;
import android.graphics.Color;
import android.graphics.Paint;
import android.support.annotation.NonNull;
import android.support.annotation.Nullable;
import android.util.AttributeSet;
import android.util.Log;
import android.view.MotionEvent;
import android.view.View;

import com.codigoparallevar.minicards.motion.MotionMode;
import com.codigoparallevar.minicards.parts.Part;
import com.codigoparallevar.minicards.parts.Placeholder;
import com.codigoparallevar.minicards.parts.buttons.RoundButton;
import com.codigoparallevar.minicards.parts.types.Position;

import org.json.JSONArray;
import org.json.JSONException;
import org.json.JSONObject;

import java.io.File;
import java.io.FileOutputStream;
import java.io.FileReader;
import java.io.IOException;
import java.util.ArrayList;

class PartCanvasView extends View {

    @NonNull
    ArrayList<Part> parts = new ArrayList<>();

    @Nullable
    Part selectedPart;

    @Nullable
    final Position lastTouchedPosition = new Position();

    @Nullable
    long lastTouchedTime;

    @Nullable
    private MotionMode.Type motionMode;

    @NonNull
    private String name = "default";
    private final static float touchTimeForLongTouchInMillis = 500;

    public PartCanvasView(Context context) {
        super(context);
        init();
    }

    public PartCanvasView(Context context, AttributeSet attr){
        super(context, attr);
        init();
    }

    private void init() {
        this.setBackgroundColor(Color.rgb(4, 69, 99));

        if (!loadState()){
            parts.add(new Placeholder(50, 50, 750, 500));
            parts.add(new RoundButton(500, 1200, 80, 100));
        }
    }

    private boolean loadState(){
        File filesDir = getContext().getFilesDir();
        File file = new File(filesDir + "/" + name);
        FileReader fileIn = null;
        try {
            fileIn = new FileReader(file);
            char[] data = new char[(int) file.length()];
            fileIn.read(data);
            JSONArray jsonParts = new JSONArray(new String(data ));
            for (int i = 0; i < jsonParts.length(); i++){
                deserializeObject(jsonParts.getJSONObject(i));
            }
        } catch (IOException e) {
            parts.clear();
            Log.w("PartCanvasView", e.getMessage());
            return false;
        } catch (JSONException e) {
            parts.clear();
            Log.w("PartCanvasView", e.getMessage());
            return false;
        }

        try {
            fileIn.close();
        } catch (IOException e) {
            Log.w("PartCanvasView", e.getMessage());
            return false;
        }
        return true;
    }

    private void deserializeObject(JSONObject jsonObject) throws JSONException {
        String type = jsonObject.getString("_type");
        if(type.equals(RoundButton.class.getName())) {
            parts.add(RoundButton.deserialize(jsonObject.getJSONObject("_data")));
        }
        else if (type.equals(Placeholder.class.getName())) {
            parts.add(Placeholder.deserialize(jsonObject.getJSONObject("_data")));
        }
        else {
            throw new JSONException("Expected known class, found " + type);
        }
    }

    @Override
    public void onDraw(Canvas canvas){
        final long renderStartTime = System.currentTimeMillis();
        drawBackground(canvas);

        for (Part part : parts){
            part.draw(canvas);
        }

        Log.d("Render time", System.currentTimeMillis() - renderStartTime + "ms");
    }

    private void drawBackground(Canvas canvas) {
        // Blueprint background
        final int width = getWidth() + getLeft();
        final int height = getHeight() + getTop();
        final int cellSize = 50;

        Paint blueprintLines = new Paint(Paint.ANTI_ALIAS_FLAG);
        blueprintLines.setColor(Color.argb(100, 255, 255, 255));

        // Vertical lines
        for (int x = cellSize; x < width; x += cellSize){
            canvas.drawLine(x, 0, x, height, blueprintLines);
        }

        // Horizontal lines
        for (int y = cellSize; y < height; y += cellSize){
            canvas.drawLine(0, y, width, y, blueprintLines);
        }
    }

    @Override
    public boolean onTouchEvent(MotionEvent event){
        final int x = (int) event.getX() - this.getLeft();
        final int y = (int) event.getY() - this.getTop();

        switch (event.getAction()){
            case MotionEvent.ACTION_DOWN:
            {
                selectedPart = getPartOn(x, y);
                lastTouchedPosition.to(x, y);
                lastTouchedTime = System.currentTimeMillis();
                if (selectedPart == null) {
                    Log.d("Touched part", "not found");
                    return false;
                }

                Log.d("Touched part", "Part: " + selectedPart);
            }
            break;

            case MotionEvent.ACTION_UP:
            {
                if (motionMode == null){
                    motionMode = getMotionMode(false);
                }
                if (motionMode != MotionMode.Type.LongTouch) {
                    if (selectedPart != null){
                        selectedPart.touched();
                    }
                }

                motionMode = null;
                selectedPart = null;
            }
            try {
                saveState();
            } catch (IOException e) {
                Log.w("PartCanvasView", e.getMessage());
            }
            break;

            case MotionEvent.ACTION_MOVE:
            {
                if (motionMode == null){
                    final Part nowSelectedPart = getPartOn(x, y);
                    final boolean canWait = selectedPart == nowSelectedPart;
                    motionMode = getMotionMode(canWait);
                }
                if (motionMode == MotionMode.Type.LongTouch){
                    if (selectedPart != null){
                        selectedPart.move(x, y);
                    }
                }
            }
            break;

            default:
            {
                Log.d("PartCanvasView", "Unhandled action: " + event.getAction());
            }
        }

        invalidate();
        return true;
    }

    private void saveState() throws IOException {
        File filesDir = getContext().getFilesDir();
        FileOutputStream fileOut = new FileOutputStream(filesDir + "/" + name);

        byte[] serialized = serializeState();
        fileOut.write(serialized);

        fileOut.close();
    }

    private byte[] serializeState() throws IOException {
        JSONArray partArray = new JSONArray();
        for (Part part : parts) {
            JSONObject serializedPart = new JSONObject();
            try {
                serializedPart.put("_type", part.getClass().getName());
                serializedPart.put("_data", part.serialize());
            } catch (JSONException e) {
                throw new IOException(e.getMessage(), e.getCause());
            }

            partArray.put(serializedPart);
        }

        return partArray.toString().getBytes("UTF-8");
    }

    @Nullable
    private MotionMode.Type getMotionMode(boolean canWait) {
        if (selectedPart == null){
            return MotionMode.Type.Displacement;
        }

        if ((System.currentTimeMillis() - lastTouchedTime) >= touchTimeForLongTouchInMillis){
            return MotionMode.Type.LongTouch;
        }

        if (canWait) {
            return null;
        }

        return MotionMode.Type.ShortTouch;
    }

    @Nullable
    private Part getPartOn(int x, int y) {
        // Look in the list, in reverse so top-most elements are checked before
        for (int i = parts.size() - 1; i >= 0; i--){
            final Part part = parts.get(i);
            if ((x >= part.getLeft()) && (part.getRight() >= x)
                    && (y >= part.getTop()) && (part.getBottom() >= y)){
                return part;
            }
        }
        return null;
    }
}