/*
 * Copyright (c) 2010-2011, The MiCode Open Source Community (www.micode.net)
 *
 * 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 net.micode.notes.ui;

import android.content.Context;
import android.graphics.Rect;
import android.text.Layout;
import android.text.Selection;
import android.text.SpannableStringBuilder;
import android.text.Spanned;
import android.text.TextUtils;
import android.text.style.StrikethroughSpan;
import android.text.style.StyleSpan;
import android.text.style.URLSpan;
import android.text.style.UnderlineSpan;
import android.util.AttributeSet;
import android.util.Log;
import android.view.ContextMenu;
import android.view.KeyEvent;
import android.view.MenuItem;
import android.view.MenuItem.OnMenuItemClickListener;
import android.view.MotionEvent;
import androidx.appcompat.widget.AppCompatEditText;

import net.micode.notes.R;

import java.util.HashMap;
import java.util.Map;

public class NoteEditText extends AppCompatEditText {
    private static final String TAG = "NoteEditText";
    private int mIndex;
    private int mSelectionStartBeforeDelete;

    private static final String SCHEME_TEL = "tel:" ;
    private static final String SCHEME_HTTP = "http:" ;
    private static final String SCHEME_EMAIL = "mailto:" ;

    private static final Map<String, Integer> sSchemaActionResMap = new HashMap<String, Integer>();
    static {
        sSchemaActionResMap.put(SCHEME_TEL, R.string.note_link_tel);
        sSchemaActionResMap.put(SCHEME_HTTP, R.string.note_link_web);
        sSchemaActionResMap.put(SCHEME_EMAIL, R.string.note_link_email);
    }

    /**
     * Call by the {@link NoteEditActivity} to delete or add edit text
     */
    public interface OnTextViewChangeListener {
        /**
         * Delete current edit text when {@link KeyEvent#KEYCODE_DEL} happens
         * and the text is null
         */
        void onEditTextDelete(int index, String text);

        /**
         * Add edit text after current edit text when {@link KeyEvent#KEYCODE_ENTER}
         * happen
         */
        void onEditTextEnter(int index, String text);

        /**
         * Hide or show item option when text change
         */
        void onTextChange(int index, boolean hasText);
    }

    private OnTextViewChangeListener mOnTextViewChangeListener;

    public NoteEditText(Context context) {
        super(context, null);
        mIndex = 0;
    }

    public void setIndex(int index) {
        mIndex = index;
    }

    public void setOnTextViewChangeListener(OnTextViewChangeListener listener) {
        mOnTextViewChangeListener = listener;
    }

    public NoteEditText(Context context, AttributeSet attrs) {
        super(context, attrs, android.R.attr.editTextStyle);
    }

    public NoteEditText(Context context, AttributeSet attrs, int defStyle) {
        super(context, attrs, defStyle);
        // TODO Auto-generated constructor stub
    }

    @Override
    public boolean onTouchEvent(MotionEvent event) {
        switch (event.getAction()) {
            case MotionEvent.ACTION_DOWN:

                int x = (int) event.getX();
                int y = (int) event.getY();
                x -= getTotalPaddingLeft();
                y -= getTotalPaddingTop();
                x += getScrollX();
                y += getScrollY();

                Layout layout = getLayout();
                int line = layout.getLineForVertical(y);
                int off = layout.getOffsetForHorizontal(line, x);
                Selection.setSelection(getText(), off);
                break;
        }

        return super.onTouchEvent(event);
    }

    @Override
    public boolean onKeyDown(int keyCode, KeyEvent event) {
        switch (keyCode) {
            case KeyEvent.KEYCODE_ENTER:
                if (mOnTextViewChangeListener != null) {
                    return false;
                }
                break;
            case KeyEvent.KEYCODE_DEL:
                mSelectionStartBeforeDelete = getSelectionStart();
                break;
            default:
                break;
        }
        return super.onKeyDown(keyCode, event);
    }

    @Override
    public boolean onKeyUp(int keyCode, KeyEvent event) {
        switch(keyCode) {
            case KeyEvent.KEYCODE_DEL:
                if (mOnTextViewChangeListener != null) {
                    if (0 == mSelectionStartBeforeDelete && mIndex != 0) {
                        mOnTextViewChangeListener.onEditTextDelete(mIndex, getText().toString());
                        return true;
                    }
                } else {
                    Log.d(TAG, "OnTextViewChangeListener was not seted");
                }
                break;
            case KeyEvent.KEYCODE_ENTER:
                if (mOnTextViewChangeListener != null) {
                    int selectionStart = getSelectionStart();
                    String text = getText().subSequence(selectionStart, length()).toString();
                    setText(getText().subSequence(0, selectionStart));
                    mOnTextViewChangeListener.onEditTextEnter(mIndex + 1, text);
                } else {
                    Log.d(TAG, "OnTextViewChangeListener was not seted");
                }
                break;
            default:
                break;
        }
        return super.onKeyUp(keyCode, event);
    }

    @Override
    protected void onFocusChanged(boolean focused, int direction, Rect previouslyFocusedRect) {
        if (mOnTextViewChangeListener != null) {
            if (!focused && TextUtils.isEmpty(getText())) {
                mOnTextViewChangeListener.onTextChange(mIndex, false);
            } else {
                mOnTextViewChangeListener.onTextChange(mIndex, true);
            }
        }
        super.onFocusChanged(focused, direction, previouslyFocusedRect);
    }

    @Override
    protected void onCreateContextMenu(ContextMenu menu) {
        if (getText() instanceof Spanned) {
            int selStart = getSelectionStart();
            int selEnd = getSelectionEnd();

            int min = Math.min(selStart, selEnd);
            int max = Math.max(selStart, selEnd);

            final URLSpan[] urls = ((Spanned) getText()).getSpans(min, max, URLSpan.class);
            if (urls.length == 1) {
                int defaultResId = 0;
                for(String schema: sSchemaActionResMap.keySet()) {
                    if(urls[0].getURL().indexOf(schema) >= 0) {
                        defaultResId = sSchemaActionResMap.get(schema);
                        break;
                    }
                }

                if (defaultResId == 0) {
                    defaultResId = R.string.note_link_other;
                }

                menu.add(0, 0, 0, defaultResId).setOnMenuItemClickListener(
                        new OnMenuItemClickListener() {
                            public boolean onMenuItemClick(MenuItem item) {
                                // goto a new intent
                                urls[0].onClick(NoteEditText.this);
                                return true;
                            }
                        });
            }
        }
        super.onCreateContextMenu(menu);
    }
    
    /**
     * 检查选中文本是否具有特定样式
     */
    public boolean hasStyle(int style) {
        if (!(getText() instanceof Spanned)) {
            return false;
        }
        
        int selStart = getSelectionStart();
        int selEnd = getSelectionEnd();
        if (selStart >= selEnd) {
            return false;
        }
        
        Spanned spanned = (Spanned) getText();
        StyleSpan[] spans = spanned.getSpans(selStart, selEnd, StyleSpan.class);
        
        for (StyleSpan span : spans) {
            if (span.getStyle() == style) {
                return true;
            }
        }
        return false;
    }
    
    /**
     * 检查选中文本是否具有下划线样式
     */
    public boolean hasUnderline() {
        if (!(getText() instanceof Spanned)) {
            return false;
        }
        
        int selStart = getSelectionStart();
        int selEnd = getSelectionEnd();
        if (selStart >= selEnd) {
            return false;
        }
        
        Spanned spanned = (Spanned) getText();
        UnderlineSpan[] spans = spanned.getSpans(selStart, selEnd, UnderlineSpan.class);
        return spans.length > 0;
    }
    
    /**
     * 检查选中文本是否具有删除线样式
     */
    public boolean hasStrikethrough() {
        if (!(getText() instanceof Spanned)) {
            return false;
        }
        
        int selStart = getSelectionStart();
        int selEnd = getSelectionEnd();
        if (selStart >= selEnd) {
            return false;
        }
        
        Spanned spanned = (Spanned) getText();
        StrikethroughSpan[] spans = spanned.getSpans(selStart, selEnd, StrikethroughSpan.class);
        return spans.length > 0;
    }
    
    /**
     * 应用样式到选中文本
     */
    public void applyStyle(int style) {
        if (!(getText() instanceof Spanned)) {
            return;
        }
        
        int selStart = getSelectionStart();
        int selEnd = getSelectionEnd();
        if (selStart >= selEnd) {
            return;
        }
        
        Spanned spanned = (Spanned) getText();
        StyleSpan[] spans = spanned.getSpans(selStart, selEnd, StyleSpan.class);
        
        boolean hasStyle = false;
        for (StyleSpan span : spans) {
            if (span.getStyle() == style) {
                hasStyle = true;
                break;
            }
        }
        
        if (!hasStyle) {
            SpannableStringBuilder builder = new SpannableStringBuilder(spanned);
            builder.setSpan(new StyleSpan(style), selStart, selEnd, Spanned.SPAN_EXCLUSIVE_EXCLUSIVE);
            setText(builder);
            setSelection(selStart, selEnd);
        }
    }
    
    /**
     * 移除选中文本的样式
     */
    public void removeStyle(int style) {
        if (!(getText() instanceof Spanned)) {
            return;
        }
        
        int selStart = getSelectionStart();
        int selEnd = getSelectionEnd();
        if (selStart >= selEnd) {
            return;
        }
        
        Spanned spanned = (Spanned) getText();
        StyleSpan[] spans = spanned.getSpans(selStart, selEnd, StyleSpan.class);
        
        SpannableStringBuilder builder = new SpannableStringBuilder(spanned);
        for (StyleSpan span : spans) {
            if (span.getStyle() == style) {
                builder.removeSpan(span);
            }
        }
        
        setText(builder);
        setSelection(selStart, selEnd);
    }
    
    /**
     * 应用或移除下划线样式
     */
    public void toggleUnderline() {
        if (!(getText() instanceof Spanned)) {
            return;
        }
        
        int selStart = getSelectionStart();
        int selEnd = getSelectionEnd();
        if (selStart >= selEnd) {
            return;
        }
        
        Spanned spanned = (Spanned) getText();
        UnderlineSpan[] spans = spanned.getSpans(selStart, selEnd, UnderlineSpan.class);
        
        SpannableStringBuilder builder = new SpannableStringBuilder(spanned);
        
        if (spans.length > 0) {
            // 移除下划线
            for (UnderlineSpan span : spans) {
                builder.removeSpan(span);
            }
        } else {
            // 添加下划线
            builder.setSpan(new UnderlineSpan(), selStart, selEnd, Spanned.SPAN_EXCLUSIVE_EXCLUSIVE);
        }
        
        setText(builder);
        setSelection(selStart, selEnd);
    }
    
    /**
     * 应用或移除删除线样式
     */
    public void toggleStrikethrough() {
        if (!(getText() instanceof Spanned)) {
            return;
        }
        
        int selStart = getSelectionStart();
        int selEnd = getSelectionEnd();
        if (selStart >= selEnd) {
            return;
        }
        
        Spanned spanned = (Spanned) getText();
        StrikethroughSpan[] spans = spanned.getSpans(selStart, selEnd, StrikethroughSpan.class);
        
        SpannableStringBuilder builder = new SpannableStringBuilder(spanned);
        
        if (spans.length > 0) {
            // 移除删除线
            for (StrikethroughSpan span : spans) {
                builder.removeSpan(span);
            }
        } else {
            // 添加删除线
            builder.setSpan(new StrikethroughSpan(), selStart, selEnd, Spanned.SPAN_EXCLUSIVE_EXCLUSIVE);
        }
        
        setText(builder);
        setSelection(selStart, selEnd);
    }
}