import android.animation.ValueAnimator
import android.content.Context
import android.graphics.*
import android.util.AttributeSet
import android.view.MotionEvent
import android.view.View
import androidx.core.animation.addListener
import kotlin.math.asin
import kotlin.math.atan2
import kotlin.math.cos
import kotlin.math.sin
/**
 * 拖拽消失的小紅點(diǎn)
 *
 * @author silence
 * @date 2022-11-07
 *
 */
class RedDomView @JvmOverloads constructor(
    context: Context,
    attributeSet: AttributeSet? = null,
    defStyleAttr: Int = 0
): View(context, attributeSet, defStyleAttr) {
    companion object{
        const val STATE_NORMAL = 0
        const val STATE_DRAGGING = 1
        const val STATE_SETTING = 2
        const val STATE_FINISHED = 3
    }
    // 狀態(tài)
    private var mState = STATE_NORMAL
    /**
     * 紅點(diǎn)半徑占控件寬高的比例
      */
    var domPercent = 0.25f
    /**
     * 紅點(diǎn)消失的長(zhǎng)度占最短寬高的比例
     */
    var disappearPercent = 0.25f
    /**
     * 消失回調(diào)
     */
    var listener: OnDisappearListener? = null
    // 半徑
    private var mDomRadius: Float = 0f
    // 消失長(zhǎng)度
    private var mDisappearLength = 0f
    // 滑動(dòng)距離和移動(dòng)距離的縮放比例
    private val mDraggingScale = 0.5f
    // 圓心所在位置
    private var mRadiusX = 0f
    private var mRadiusY = 0f
    // 上一次touch的點(diǎn)
    private var mLastX = 0f
    private var mLastY = 0f
    // 繪制拖拽時(shí)的路徑
    private val path = Path()
    // 恢復(fù)的屬性動(dòng)畫(huà)
    private val animator = ValueAnimator.ofFloat(0f, 1f)
    // 畫(huà)筆
    private val mPaint = Paint().apply {
        strokeWidth = 5f
        color = Color.RED
        style = Paint.Style.FILL
        flags = Paint.ANTI_ALIAS_FLAG
    }
    /**
     * 重置
     */
    fun reset() {
        mState = STATE_NORMAL
        mRadiusX = width / 2f
        mRadiusY = height / 2f
        invalidate()
    }
    override fun onMeasure(widthMeasureSpec: Int, heightMeasureSpec: Int) {
        super.onMeasure(widthMeasureSpec, heightMeasureSpec)
        val width = getDefaultSize(100, widthMeasureSpec)
        val height = getDefaultSize(100, heightMeasureSpec)
        // 計(jì)算得到半徑
        mDomRadius = (if (width < height) width else height) * domPercent
        mRadiusX = width / 2f
        mRadiusY = height / 2f
        // 消失長(zhǎng)度
        mDisappearLength = (if (width < height) width else height) * disappearPercent
        setMeasuredDimension(width, height)
    }
    override fun onTouchEvent(event: MotionEvent): Boolean {
        // 結(jié)束了不應(yīng)該接受事件，通過(guò)設(shè)置OnClickListener使用reset去重置
        if (mState == STATE_FINISHED) {
            if (event.action == MotionEvent.ACTION_DOWN) performClick()
            else return true
        }
        when(event.action) {
            MotionEvent.ACTION_DOWN -> {
                mLastX = event.x
                mLastY = event.y
                // 設(shè)置中或者拖拽時(shí)，快速重新按下，應(yīng)該再次接手動(dòng)畫(huà)
                if(mState != STATE_NORMAL) {
                    animator.removeAllListeners()
                    animator.cancel()
                }
                mState = STATE_DRAGGING
            }
            MotionEvent.ACTION_MOVE -> {
                // 注意canvas移動(dòng)和手指移動(dòng)是一致的，view的scroll移動(dòng)的是窗口
                val dx = event.x - mLastX
                val dy = event.y - mLastY
                        // 移動(dòng)圓心
                mRadiusX += dx * mDraggingScale
                mRadiusY += dy * mDraggingScale
                mLastX = event.x
                mLastY = event.y
                // 請(qǐng)求重繪
                invalidate()
            }
            MotionEvent.ACTION_UP -> {
                mState = STATE_SETTING
                // 這里用屬性動(dòng)畫(huà)模擬拖拽，回到初始圓心
                val upRadiusX = mRadiusX
                val upRadiusY = mRadiusY
                animator.addUpdateListener {
                    // 根據(jù)比例，按直線移動(dòng)圓心到中點(diǎn)
                    val progress = it.animatedValue as Float
                    mRadiusX = upRadiusX + (width / 2f - upRadiusX) * progress
                    mRadiusY = upRadiusY + (height / 2f - upRadiusY) * progress
                    invalidate()
                }
                animator.addListener(onEnd = {
                    mState = STATE_NORMAL
                })
                animator.duration = 100
                animator.start()
            }
        }
        return true
    }
    @Suppress("RedundantOverride")
    override fun performClick(): Boolean {
        return super.performClick()
    }
    override fun onDraw(canvas: Canvas) {
        super.onDraw(canvas)
        when(mState) {
            STATE_NORMAL -> {
                // 正常狀態(tài)是一個(gè)圓
                canvas.drawCircle(width / 2f, height / 2f, mDomRadius, mPaint)
            }
            STATE_DRAGGING, STATE_SETTING -> {
                // 圓心和中點(diǎn)連線相對(duì)于X軸的夾角，注意atan2是四象限敏感[-PI, PI]，atan范圍為[-PI/2, PI/2]
                val radiansLine = atan2((mRadiusY - height / 2f).toDouble(),
                    (mRadiusX - width /2f).toDouble()).toFloat()
                // 圓心和中點(diǎn)連線的長(zhǎng)度，通過(guò)角度算，分母為零為什么沒(méi)問(wèn)題？
                val lineLength = (mRadiusX - width /2f) / cos(radiansLine)
                // 判斷是否達(dá)到消失要求，如果消失不應(yīng)該再繪制
                if (lineLength > mDisappearLength) {
                    mState = STATE_FINISHED
                    listener?.onDisappear()
                    return
                }
                // 以圓心為頂點(diǎn)，切點(diǎn)、圓心、中心的夾角值，是一個(gè)正值
                val radiansCenter = asin(mDomRadius / lineLength)
                // 切點(diǎn)和中心連線長(zhǎng)度
                val length = lineLength * cos(radiansCenter)
                // 由角度獲取兩個(gè)切點(diǎn)的坐標(biāo)值
                val x1 = width /2f + length * cos(radiansLine + radiansCenter)
                val y1 = height / 2f + length * sin(radiansLine + radiansCenter)
                val x2 = width /2f + length * cos(radiansLine - radiansCenter)
                val y2 = height / 2f + length * sin(radiansLine - radiansCenter)
                // 繪制
                // 普通代碼，一個(gè)圓加三角形
//                canvas.drawCircle(mRadiusX, mRadiusY, mDomRadius, mPaint)
//                path.reset()
//                path.moveTo(x1, y1)
//                path.lineTo(width / 2f, height / 2f)
//                path.lineTo(x2, y2)
//                path.close()
                // 強(qiáng)行貝塞爾曲線
                // 先用完整的圓覆蓋lineLength < 2 * mDomRadius的情況，大于時(shí)圓會(huì)被覆蓋
                canvas.drawCircle(mRadiusX, mRadiusY, mDomRadius, mPaint)
                path.reset()
                path.moveTo(x1, y1)
                // 擬合圓弧，三階貝塞爾曲線，控制點(diǎn)在圓心和中點(diǎn)連線的圓外
                var tempX1 = x1 + (length * cos(radiansLine + radiansCenter))
                var tempY1 = y1 + ( length * sin(radiansLine + radiansCenter))
                var tempX2 = x2 + (length * cos(radiansLine - radiansCenter))
                var tempY2 = y2 + ( length * sin(radiansLine - radiansCenter))
                // 接近圓不是圓
                path.cubicTo(tempX1, tempY1, tempX2, tempY2, x2, y2)
                // 尾焰，第一個(gè)控制點(diǎn)在切線延長(zhǎng)線上，第二個(gè)控制點(diǎn)在圓心連線上(越短尾越尖)
                tempX1 = x2 - length * cos(radiansLine - radiansCenter)
                tempY1 = y2 - length * sin(radiansLine - radiansCenter)
                tempX2 = width / 2f + (lineLength * 0.25f * cos(radiansLine))
                tempY2 = height / 2f + (lineLength * 0.25f * sin(radiansLine))
                // 第一條
                path.cubicTo(tempX1, tempY1, tempX2, tempY2, width / 2f, height / 2f)
                // 另一段
                tempX1 = tempX2
                tempY1 = tempY2
                tempX2 = x1 - (length * cos(radiansLine + radiansCenter))
                tempY2 = y1 - ( length * sin(radiansLine + radiansCenter))
                path.cubicTo(tempX1, tempY1, tempX2, tempY2, x1, y1)
                path.close()
                canvas.drawPath(path, mPaint)
            }
            STATE_FINISHED -> {}
        }
        // 這里便于調(diào)試，把消失范圍畫(huà)一下，多加一只畫(huà)筆，省的麻煩
        canvas.drawCircle(width / 2f, height / 2f, mDisappearLength, tempPaint)
    }
    private val tempPaint = Paint().apply {
        strokeWidth = 3f
        style = Paint.Style.STROKE
        color = Color.LTGRAY
        pathEffect = DashPathEffect(floatArrayOf(10f, 10f), 0f)
        flags = Paint.ANTI_ALIAS_FLAG
    }
    interface OnDisappearListener{
        fun onDisappear()
    }
}