/*
 * Copyright (C) 2016 huanghaibin_dev <huanghaibin_dev@163.com>
 * WebSite https://github.com/MiracleTimes-Dev
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 *         http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 */
package com.haibin.oldcalendarview;

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


import java.util.ArrayList;
import java.util.Date;
import java.util.List;

/**
 * 第二版本，废弃RecyclerView
 * Created by huanghaibin on 2017/6/8.
 */
@SuppressWarnings("unused")
public class CalendarCardView extends View implements View.OnClickListener {

    private static final int HIGHLIGHT_MODE_MONTH = 0;
    private static final int HIGHLIGHT_MODE_WEEK = 1;
    static int ITEM_HEIGHT = 46;

    static final int STYLE_FILL = 1;
    static final int STYLE_STROKE = 2;

    protected Paint mCurMonthTextPaint = new Paint(); //当前月份日期的笔
    protected Paint mOtherMonthTextPaint = new Paint(); //其它月份日期颜色

    protected Paint mLunarTextPaint = new Paint(); //农历文本颜色
    protected Paint mSchemePaint = new Paint(); // 标记的日期背景颜色

    protected Paint mSchemeTextPaint = new Paint();//标记的文本颜色

    protected Paint mCurDayTextPaint = new Paint(); //当前日期背景颜色

    protected Paint mSelectedPaint = new Paint(); //被选择的日期背景色

    protected Paint mHighLightPaint = new Paint(); //自定义高亮背景色

    CalendarView.OnDateSelectedListener mDateSelectedListener;
    CalendarView.OnInnerDateSelectedListener mInnerListener;
    CalendarView.OnDateChangeListener mListener;

    Calendar mCurrent;
    private int mYear;
    private int mMonth;
    CalendarLayout mParentLayout;
    private List<Calendar> mItems;

    List<Calendar> mSchemes;
    private int mLineCount;
    @SuppressWarnings("all")
    private int mDiff;//当前月的第一天为星期几，星期天为0，实际就是当前月份的偏移量
    protected static int mItemHeight; //每一项的高度
    protected int mItemWidth;

    protected float mTextBaseLine; //Text的基线
    private float mX, mY;
    private boolean isClick = true;
    boolean isShowLunar;

    static final int TEXT_SIZE = 14;

    private int mPaddingLeft, mPaddingRight;
    int mCurrentItem = -1;
    protected int mTextSchemeColor;
    protected int mTextCurMonthColor;
    protected int mTextSelectedColor;
    protected int mSchemeColor;
    protected int mCompletedSchemeColor = Color.LTGRAY;

    protected int mLunarTextColor;
    protected static int mHighLightMode = HIGHLIGHT_MODE_MONTH;
//    protected int mHighLightMode = HIGHLIGHT_MODE_WEEK;

    public int getmViewMode() {
        return mHighLightMode;
    }

    public CalendarCardView(Context context) {
        this(context, null);
    }

    public CalendarCardView(Context context, @Nullable AttributeSet attrs) {
        super(context, attrs);

        mCurMonthTextPaint.setAntiAlias(true);
        mCurMonthTextPaint.setTextAlign(Paint.Align.CENTER);
        mCurMonthTextPaint.setColor(0xFF111111);
        mCurMonthTextPaint.setFakeBoldText(true);
        mCurMonthTextPaint.setTextSize(Util.dipToPx(context, TEXT_SIZE));

        mOtherMonthTextPaint.setAntiAlias(true);
        mOtherMonthTextPaint.setTextAlign(Paint.Align.CENTER);
        mOtherMonthTextPaint.setColor(0xFFe1e1e1);
        mOtherMonthTextPaint.setFakeBoldText(true);
        mOtherMonthTextPaint.setTextSize(Util.dipToPx(context, TEXT_SIZE));

        mLunarTextPaint.setAntiAlias(true);
        mLunarTextPaint.setTextAlign(Paint.Align.CENTER);

        mSchemeTextPaint.setAntiAlias(true);
        mSchemeTextPaint.setStyle(Paint.Style.FILL);
        mSchemeTextPaint.setTextAlign(Paint.Align.CENTER);
        mSchemeTextPaint.setColor(0xffed5353);
        mSchemeTextPaint.setFakeBoldText(true);
        mSchemeTextPaint.setTextSize(Util.dipToPx(context, TEXT_SIZE));

        mSchemePaint.setAntiAlias(true);
        mSchemePaint.setStyle(Paint.Style.STROKE);
        mSchemePaint.setStrokeWidth(2);
        mSchemePaint.setColor(0xffefefef);

        mCurDayTextPaint.setAntiAlias(true);
        mCurDayTextPaint.setTextAlign(Paint.Align.CENTER);
        mCurDayTextPaint.setColor(Color.RED);
        mCurDayTextPaint.setFakeBoldText(true);
        mCurDayTextPaint.setTextSize(Util.dipToPx(context, TEXT_SIZE));

        mSelectedPaint.setAntiAlias(true);
        mSelectedPaint.setStyle(Paint.Style.FILL);
        mSelectedPaint.setStrokeWidth(2);

        mHighLightPaint.setAntiAlias(true);
        mHighLightPaint.setStyle(Paint.Style.FILL);
        mHighLightPaint.setColor(0xFFD5F2FF);

        mPaddingLeft = Util.dipToPx(context, 8);
        mPaddingRight = Util.dipToPx(context, 8);

        mItemHeight = Util.dipToPx(context, CalendarCardView.ITEM_HEIGHT);

        Paint.FontMetrics metrics = mCurMonthTextPaint.getFontMetrics();
        mTextBaseLine = mItemHeight / 2 - metrics.descent + (metrics.bottom - metrics.top) / 2;
        setOnClickListener(this);
    }

    @Override
    public void onClick(View v) {
        if (isClick) {
            Calendar calendar = getIndex();
            if (calendar != null) {
                if (mInnerListener != null) {
                    mInnerListener.onDateSelected(calendar);
                }
                if (!calendar.isCurrentMonth() && mParentLayout != null) {
                    int cur = mParentLayout.mViewPager.getCurrentItem();
                    int position = mCurrentItem < 7 ? cur - 1 : cur + 1;
                    mParentLayout.mViewPager.setCurrentItem(position);
                }

                if (mParentLayout != null && calendar.isCurrentMonth())
                    mParentLayout.setSelectPosition(mItems.indexOf(calendar));
                if (mDateSelectedListener != null) {
                    mDateSelectedListener.onDateSelected(calendar);
                }
                if (mListener != null) {
                    mListener.onDateChange(calendar);
                }
                invalidate();
            }
        }
    }

    @SuppressLint("ClickableViewAccessibility")
    @Override
    public boolean onTouchEvent(MotionEvent event) {
        if (event.getPointerCount() > 1)
            return false;
        switch (event.getAction()) {
            case MotionEvent.ACTION_DOWN:
                mX = event.getX();
                mY = event.getY();
                isClick = true;
                break;
            case MotionEvent.ACTION_MOVE:
                float mDX;
                float mDY;
                if (isClick) {
                    mDY = event.getY() - mY;
                    isClick = Math.abs(mDY) <= 50;

                }
                break;
            case MotionEvent.ACTION_UP:
                mX = event.getX();
                mY = event.getY();
                break;
        }
        return super.onTouchEvent(event);
    }

    int getSelectedIndex(Calendar calendar) {
        return mItems.indexOf(calendar);
    }

    private Calendar getIndex() {
        int width = (getWidth() - mPaddingLeft - mPaddingRight) / 7;
        int indexX = (int) mX / width;
        if (indexX >= 7) {
            indexX = 6;
        }
        int indexY = (int) mY / mItemHeight;
        mCurrentItem = indexY * 7 + indexX;// 选择项
        if (mCurrentItem >= 0 && mCurrentItem < mItems.size())
            return mItems.get(mCurrentItem);
        return null;
    }

    @Override
    protected void onDraw(Canvas canvas) {
        super.onDraw(canvas);
        if (mLineCount == 0)
            return;
        mItemWidth = (getWidth() - mPaddingLeft - mPaddingRight) / 7;
        int height = mItemHeight * mLineCount;
        int d = 0;
        int radius = isShowLunar ? Math.min(mItemWidth, mItemHeight) / 7 * 3 :
                Math.min(mItemWidth, mItemHeight) / 5 * 2;
        int pointRadius = 5;
        for (int i = 0; i < mLineCount; i++) {
            for (int j = 0; j < 7; j++) {

                int cx = j * mItemWidth + mItemWidth / 2 + mPaddingLeft;
                int cy = i * mItemHeight + mItemHeight / 2;

                int x = j * mItemWidth + mPaddingLeft;
                int y = i * mItemHeight;

                int px = j * mItemWidth + mItemWidth / 2 + mPaddingLeft;
                int py = (int) mTextBaseLine + i * mItemHeight + 10;

                int left = j * mItemWidth;
                int top = i * mItemHeight;

                Calendar calendar = mItems.get(d);
                if (mHighLightMode == HIGHLIGHT_MODE_MONTH && calendar.getMonth() == mMonth) {
                    canvas.drawRect(left + mPaddingLeft, top, left + mItemWidth + mPaddingLeft, top + mItemHeight, mHighLightPaint);
                } else if (mHighLightMode == HIGHLIGHT_MODE_WEEK && mCurrentItem / 7 == i) {
                    canvas.drawRect(left + mPaddingLeft, top, left + mItemWidth + mPaddingLeft, top + mItemHeight, mHighLightPaint);
                }
                if (mSchemes != null && mSchemes.contains(calendar)) {
                    //标记的日子
                    Calendar scheme = mSchemes.get(mSchemes.indexOf(calendar));
                    mSchemePaint.setColor(calendar.getSchemeColor() != 0 ? calendar.getSchemeColor() : mSchemeColor);
//                        mSchemeTextPaint.setColor(mTextSchemeColor);
                    mLunarTextPaint.setColor(calendar.isCurrentMonth() ? mLunarTextColor : mOtherMonthTextPaint.getColor());
                    mLunarTextPaint.setColor(mTextSchemeColor);
                    onDrawScheme(canvas, scheme, mItemWidth, x, y, px, py, pointRadius);
                    if (d == mCurrentItem) {//绘制选择效果
                        mLunarTextPaint.setColor(mTextSelectedColor);
                        onDrawSelected(canvas, mItemWidth, x, y, cx, cy, radius, true);
                        mSchemeTextPaint.setColor(mTextSelectedColor);
                    }

                    onDrawText(canvas, calendar,
                            x, y,
                            j * mItemWidth + mItemWidth / 2 + mPaddingLeft,
                            mTextBaseLine + i * mItemHeight, true);
                } else {
                    if (d == mCurrentItem) {//绘制选择效果
                        mLunarTextPaint.setColor(mTextSelectedColor);
                        onDrawSelected(canvas, mItemWidth, x, y, cx, cy, radius, false);
                        mSchemeTextPaint.setColor(mTextSelectedColor);
                    } else {
                        mLunarTextPaint.setColor(mLunarTextColor);
                        mCurMonthTextPaint.setColor(mTextCurMonthColor);
                        mLunarTextPaint.setColor(calendar.isCurrentMonth() ? mLunarTextColor : mOtherMonthTextPaint.getColor());
                    }
                    onDrawText(canvas, calendar,
                            x, y,
                            j * mItemWidth + mItemWidth / 2 + mPaddingLeft,
                            mTextBaseLine + i * mItemHeight, false);
                }
                ++d;
            }
        }
    }

    /**
     * 绘制选中的日期
     *
     * @param canvas    canvas
     * @param x         日历Card x起点坐标
     * @param y         日历Card y起点坐标
     * @param width     日历Card width
     * @param cx        cx x圆心
     * @param cy        cy y圆心
     * @param radius    radius 半径
     * @param hasScheme hasScheme 非标记的日期
     */
    protected void onDrawSelected(Canvas canvas, int width, int x, int y, int cx, int cy, int radius, boolean hasScheme) {
        canvas.drawCircle(cx, cy, radius, mSelectedPaint);
        if (hasScheme) {
            mSchemeTextPaint.setColor(mTextSelectedColor);
        } else {
            mCurMonthTextPaint.setColor(mTextSelectedColor);
        }
    }

    /**
     * 绘制标记的日期
     *
     * @param canvas   canvas
     * @param calendar calendar
     * @param width    日历Card width
     * @param x        日历Card x起点坐标
     * @param y        日历Card y起点坐标
     * @param cx       cx
     * @param cy       cy
     * @param radius   radius
     */
    protected void onDrawScheme(Canvas canvas, Calendar calendar,
                                int width, int x, int y,
                                int cx, int cy, int radius) {
        if (calendar.isSchemeCompleted()) {
            mSchemePaint.setColor(mCompletedSchemeColor);
        } else {
            mSchemePaint.setColor(mSchemeColor);
        }
        canvas.drawCircle(cx, cy, radius, mSchemePaint);
    }

    /**
     * 绘制文本
     *
     * @param canvas    canvas
     * @param calendar  calendar
     * @param x         日历Card x起点坐标
     * @param y         日历Card y起点坐标
     * @param cx        x中间坐标
     * @param baselineY baselineY坐标 文本baseline
     * @param hasScheme 是否是标记的日期
     */
    protected void onDrawText(Canvas canvas, Calendar calendar,
                              int x, int y,
                              float cx, float baselineY, boolean hasScheme) {
        if (hasScheme) {
            canvas.drawText(String.valueOf(calendar.getDay()),
                    cx,
                    baselineY,
                    calendar.isCurrentDay() ? mCurDayTextPaint :
                            calendar.isCurrentMonth() ? mCurMonthTextPaint : mOtherMonthTextPaint);

        } else {
            canvas.drawText(String.valueOf(calendar.getDay()), cx, baselineY,
                    calendar.isCurrentDay() ? mCurDayTextPaint :
                            calendar.isCurrentMonth() ? mCurMonthTextPaint : mOtherMonthTextPaint);
        }
    }

    /**
     * 记录已经选择的日期
     *
     * @param calendar calendar
     */
    void setSelectedCalendar(Calendar calendar) {
        mCurrentItem = mItems.indexOf(calendar);
    }

//    /**
//     * 记录已经选择周的任意日期
//     *
//     * @param calendar calendar
//     */
//    void setSelectedWeekCalendar(Calendar calendar) {
//        mCurrentWeekItem = mItems.indexOf(calendar);
//    }

    /**
     * 初始化日期
     *
     * @param year  year
     * @param month month
     */
    void setCurrentDate(int year, int month) {
        mYear = year;
        mMonth = month;
        mCurrent = new Calendar();
        java.util.Calendar calendar = java.util.Calendar.getInstance();
        Date d = calendar.getTime();
        mCurrent.setYear(Util.getDate("yyyy", d));
        mCurrent.setMonth(Util.getDate("MM", d));
        mCurrent.setDay(Util.getDate("dd", d));
        calendar.set(java.util.Calendar.DAY_OF_WEEK, java.util.Calendar.SUNDAY);
//        firstDayOfSelectedWeek = new Calendar();
//        firstDayOfSelectedWeek.setYear(calendar.get(java.util.Calendar.YEAR));
//        firstDayOfSelectedWeek.setMonth(calendar.get(java.util.Calendar.MONTH));
//        firstDayOfSelectedWeek.setDay(calendar.get(java.util.Calendar.DAY_OF_MONTH));
//        if (firstDayOfSelectedWeek > 23)
        initCalendar();
    }

    /**
     * 初始化日历
     */
    @SuppressLint("WrongConstant")
    private void initCalendar() {
        java.util.Calendar date = java.util.Calendar.getInstance();

        date.set(mYear, mMonth - 1, 1);
        int firstDayOfWeek = date.get(java.util.Calendar.DAY_OF_WEEK) - 1;//月第一天为星期几,星期天 == 0
        mDiff = firstDayOfWeek;
        //mCurrentItem = mDiff;
        int mDaysCount = Util.getMonthDaysCount(mYear, mMonth);
        date.set(mYear, mMonth - 1, mDaysCount);
        int mLastCount = date.get(java.util.Calendar.DAY_OF_WEEK) - 1;

        int nextMonthDaysOffset = 6 - mLastCount;//下个月的日偏移天数

        int preYear, preMonth;
        int nextYear, nextMonth;

        int size = 42;

        int preMonthDaysCount;
        if (mMonth == 1) {//如果是1月
            preYear = mYear - 1;
            preMonth = 12;
            nextYear = mYear;
            nextMonth = mMonth + 1;
            preMonthDaysCount = firstDayOfWeek == 0 ? 0 : Util.getMonthDaysCount(preYear, preMonth);
        } else if (mMonth == 12) {//如果是12月
            preYear = mYear;
            preMonth = mMonth - 1;
            nextYear = mYear + 1;
            nextMonth = 1;
            preMonthDaysCount = firstDayOfWeek == 0 ? 0 : Util.getMonthDaysCount(preYear, preMonth);
        } else {//平常
            preYear = mYear;
            preMonth = mMonth - 1;
            nextYear = mYear;
            nextMonth = mMonth + 1;
            preMonthDaysCount = firstDayOfWeek == 0 ? 0 : Util.getMonthDaysCount(preYear, preMonth);
        }
        int nextDay = 1;
        if (mItems == null)
            mItems = new ArrayList<>();
        mItems.clear();
        for (int i = 0; i < size; i++) {
            Calendar calendarDate = new Calendar();
            if (i < firstDayOfWeek) {
                calendarDate.setYear(preYear);
                calendarDate.setMonth(preMonth);
                calendarDate.setDay(preMonthDaysCount - firstDayOfWeek + i + 1);
            } else if (i >= mDaysCount + firstDayOfWeek) {
                calendarDate.setYear(nextYear);
                calendarDate.setMonth(nextMonth);
                calendarDate.setDay(nextDay);
                ++nextDay;
            } else {
                calendarDate.setYear(mYear);
                calendarDate.setMonth(mMonth);
                calendarDate.setCurrentMonth(true);
                calendarDate.setDay(i - firstDayOfWeek + 1);
            }
            if (calendarDate.equals(mCurrent)) {
                calendarDate.setCurrentDay(true);
                mCurrentItem = i;
//                mCurrentWeekItem = mCurrentItem;
            }
            calendarDate.setLunar(LunarCalendar.getLunarText(calendarDate.getYear(), calendarDate.getMonth(), calendarDate.getDay()));
            mItems.add(calendarDate);
        }
        mLineCount = mItems.size() / 7;
        if (mSchemes != null) {
            for (Calendar a : mItems) {
                for (Calendar d : mSchemes) {
                    if (d.equals(a)) {
                        a.setScheme(d.getScheme());
                    }
                }
            }
        }
        invalidate();
    }

    void update() {
        if (mSchemes != null) {
            for (Calendar a : mItems) {
                a.setScheme("");
                for (Calendar d : mSchemes) {
                    if (d.equals(a)) {
                        a.setScheme(d.getScheme());
                    }
                }
            }
            invalidate();
        }
    }

    /**
     * 设置文本的颜色
     *
     * @param curDayTextColor     今天的日期文本颜色
     * @param curMonthTextColor   当前月份的日期颜色
     * @param otherMonthTextColor 其它月份的日期颜色
     * @param lunarTextColor      农历字体颜色
     */
    void setTextColor(int curDayTextColor,
                      int curMonthTextColor,
                      int otherMonthTextColor,
                      int lunarTextColor) {
        mTextCurMonthColor = curMonthTextColor;
        mLunarTextColor = lunarTextColor;
        mCurDayTextPaint.setColor(curDayTextColor);
        mCurMonthTextPaint.setColor(curMonthTextColor);
        mOtherMonthTextPaint.setColor(otherMonthTextColor);
        mLunarTextPaint.setColor(lunarTextColor);
    }


    /**
     * 设置事务标记
     *
     * @param style           标记的style CalendarCardView.STYLE_FILL or CalendarCardView.STYLE_STROKE
     * @param schemeColor     标记的颜色
     * @param schemeTextColor 标记的文本颜色
     */
    void setSchemeColor(int style, int schemeColor, int schemeTextColor) {
        if (style == STYLE_STROKE) {
            mSchemePaint.setStyle(Paint.Style.STROKE);
        } else {
            mSchemePaint.setStyle(Paint.Style.FILL);
        }
        this.mSchemeColor = schemeColor;
        this.mSchemePaint.setColor(schemeColor);
        this.mTextSchemeColor = schemeTextColor;
        this.mSchemeTextPaint.setColor(schemeTextColor);
    }

    /**
     * 设置标记的style
     *
     * @param style 选中的style CalendarCardView.STYLE_FILL or CalendarCardView.STYLE_STROKE
     */
    void setSelectColor(int style, int selectedColor, int selectedTextColor) {
        if (style == STYLE_STROKE) {
            mSelectedPaint.setStyle(Paint.Style.STROKE);
        } else {
            mSelectedPaint.setStyle(Paint.Style.FILL);
        }
        this.mSelectedPaint.setColor(selectedColor);
        this.mTextSelectedColor = selectedTextColor;
        this.mTextSelectedColor = selectedTextColor;
    }

    /**
     * 设置字体大小
     *
     * @param calendarTextSize 日期大小
     * @param lunarTextSize    农历大小
     */
    @SuppressWarnings("all")
    void setDayTextSize(float calendarTextSize, float lunarTextSize) {
        mCurMonthTextPaint.setTextSize(Util.dipToPx(getContext(), calendarTextSize));
        mOtherMonthTextPaint.setTextSize(mCurMonthTextPaint.getTextSize());
        mCurDayTextPaint.setTextSize(mCurMonthTextPaint.getTextSize());
        mSchemeTextPaint.setTextSize(mCurMonthTextPaint.getTextSize());
        mLunarTextPaint.setTextSize(Util.dipToPx(getContext(), lunarTextSize));
    }

    @Override
    protected void onMeasure(int widthMeasureSpec, int heightMeasureSpec) {
        if (mLineCount != 0) {
            heightMeasureSpec = MeasureSpec.makeMeasureSpec(Util.dipToPx(getContext(), ITEM_HEIGHT * mLineCount), MeasureSpec.EXACTLY);
        }
        super.onMeasure(widthMeasureSpec, heightMeasureSpec);
    }

//    public void setFirstDayOfSelectedWeek(Calendar firstDayOfSelectedWeek) {
//        this.firstDayOfSelectedWeek = firstDayOfSelectedWeek;
//    }

}