/*
 * 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.tool;

import android.content.Context;
import android.database.Cursor;
import android.os.Environment;
import android.text.TextUtils;
import android.text.format.DateFormat;
import android.util.Log;

import net.micode.notes.R;
import net.micode.notes.data.Notes;
import net.micode.notes.data.Notes.DataColumns;
import net.micode.notes.data.Notes.DataConstants;
import net.micode.notes.data.Notes.NoteColumns;

import java.io.File;
import java.io.FileNotFoundException;
import java.io.FileOutputStream;
import java.io.IOException;
import java.io.PrintStream;

/**
 * 笔记数据备份工具类
 * 功能：将应用内的笔记数据导出为文本文件，支持文件夹和笔记内容的结构化导出
 * 设计模式：单例模式，确保全局唯一实例
 */
public class BackupUtils {
    private static final String TAG = "BackupUtils";
    // 单例实例引用
    private static BackupUtils sInstance;

    /**
     * 获取单例实例
     * 
     * @param context 应用上下文，用于初始化内部组件
     * @return BackupUtils实例
     */
    public static synchronized BackupUtils getInstance(Context context) {
        if (sInstance == null) {
            sInstance = new BackupUtils(context);
        }
        return sInstance;
    }

    /**
     * 备份/恢复操作的状态码定义
     * 用于标识操作过程中的不同状态或错误类型
     */
    // SD卡未挂载
    public static final int STATE_SD_CARD_UNMOUONTED = 0;
    // 备份文件不存在
    public static final int STATE_BACKUP_FILE_NOT_EXIST = 1;
    // 数据格式损坏（可能被其他程序修改）
    public static final int STATE_DATA_DESTROIED = 2;
    // 系统运行时异常
    public static final int STATE_SYSTEM_ERROR = 3;
    // 操作成功
    public static final int STATE_SUCCESS = 4;

    // 文本导出组件引用
    private TextExport mTextExport;

    /**
     * 私有构造函数，确保单例模式
     * 
     * @param context 应用上下文
     */
    private BackupUtils(Context context) {
        mTextExport = new TextExport(context);
    }

    /**
     * 检查外部存储（SD卡）是否可用
     * 
     * @return true-已挂载且可读写，false-不可用
     */
    private static boolean externalStorageAvailable() {
        return Environment.MEDIA_MOUNTED.equals(Environment.getExternalStorageState());
    }

    /**
     * 执行笔记数据导出为文本文件
     * 
     * @return 操作状态码（参考STATE_*常量）
     */
    public int exportToText() {
        return mTextExport.exportToText();
    }

    /**
     * 获取导出的文本文件名
     * 
     * @return 文件名（含扩展名）
     */
    public String getExportedTextFileName() {
        return mTextExport.mFileName;
    }

    /**
     * 获取导出文件的存储目录
     * 
     * @return 目录路径字符串
     */
    public String getExportedTextFileDir() {
        return mTextExport.mFileDirectory;
    }

    /**
     * 文本导出内部类
     * 负责具体的笔记数据导出逻辑，包括数据库查询和文件写入
     */
    private static class TextExport {
        // 笔记查询的列投影（指定查询哪些字段）
        private static final String[] NOTE_PROJECTION = {
                NoteColumns.ID, // 笔记ID
                NoteColumns.MODIFIED_DATE, // 最后修改时间
                NoteColumns.SNIPPET, // 笔记摘要（文件夹名称）
                NoteColumns.TYPE // 笔记类型（普通笔记/文件夹）
        };

        // 笔记查询结果集中各列的索引
        private static final int NOTE_COLUMN_ID = 0;
        private static final int NOTE_COLUMN_MODIFIED_DATE = 1;
        private static final int NOTE_COLUMN_SNIPPET = 2;

        // 笔记数据（内容）查询的列投影
        private static final String[] DATA_PROJECTION = {
                DataColumns.CONTENT, // 内容主体
                DataColumns.MIME_TYPE, // 内容类型（文本/通话记录等）
                DataColumns.DATA1, // 扩展数据1（通话时间）
                DataColumns.DATA2, // 扩展数据2
                DataColumns.DATA3, // 扩展数据3
                DataColumns.DATA4, // 扩展数据4（电话号码）
        };

        // 数据查询结果集中各列的索引
        private static final int DATA_COLUMN_CONTENT = 0;
        private static final int DATA_COLUMN_MIME_TYPE = 1;
        private static final int DATA_COLUMN_CALL_DATE = 2;
        private static final int DATA_COLUMN_PHONE_NUMBER = 4;

        // 导出文本的格式模板（从资源文件获取）
        private final String[] TEXT_FORMAT;
        // 格式模板索引定义
        private static final int FORMAT_FOLDER_NAME = 0; // 文件夹名称格式
        private static final int FORMAT_NOTE_DATE = 1; // 笔记日期格式
        private static final int FORMAT_NOTE_CONTENT = 2; // 笔记内容格式

        // 上下文、文件名、文件目录引用
        private Context mContext;
        private String mFileName;
        private String mFileDirectory;

        /**
         * 构造函数
         * 
         * @param context 应用上下文
         */
        public TextExport(Context context) {
            // 从资源文件获取导出格式模板
            TEXT_FORMAT = context.getResources().getStringArray(R.array.format_for_exported_note);
            mContext = context;
        }

        /**
         * 获取指定索引的格式模板
         * 
         * @param id 格式模板索引（参考FORMAT_*常量）
         * @return 格式字符串
         */
        private String getFormat(int id) {
            return TEXT_FORMAT[id];
        }

        /**
         * 将指定文件夹及其包含的笔记导出到文本流
         * 
         * @param folderId 文件夹ID
         * @param ps       打印流（用于写入文件）
         */
        private void exportFolderToText(String folderId, PrintStream ps) {
            // 查询属于该文件夹的所有笔记
            Cursor notesCursor = mContext.getContentResolver().query(Notes.CONTENT_NOTE_URI,
                    NOTE_PROJECTION, NoteColumns.PARENT_ID + "=?", new String[] { folderId }, null);

            if (notesCursor != null) {
                if (notesCursor.moveToFirst()) {
                    do {
                        // 打印笔记最后修改日期（使用指定格式）
                        ps.println(String.format(getFormat(FORMAT_NOTE_DATE), DateFormat.format(
                                mContext.getString(R.string.format_datetime_mdhm),
                                notesCursor.getLong(NOTE_COLUMN_MODIFIED_DATE))));
                        // 获取当前笔记ID并导出其内容
                        String noteId = notesCursor.getString(NOTE_COLUMN_ID);
                        exportNoteToText(noteId, ps);
                    } while (notesCursor.moveToNext());
                }
                notesCursor.close();
            }
        }

        /**
         * 将指定笔记的内容导出到文本流
         * 
         * @param noteId 笔记ID
         * @param ps     打印流（用于写入文件）
         */
        private void exportNoteToText(String noteId, PrintStream ps) {
            // 查询该笔记的具体内容数据
            Cursor dataCursor = mContext.getContentResolver().query(Notes.CONTENT_DATA_URI,
                    DATA_PROJECTION, DataColumns.NOTE_ID + "=?", new String[] { noteId }, null);

            if (dataCursor != null) {
                if (dataCursor.moveToFirst()) {
                    do {
                        String mimeType = dataCursor.getString(DATA_COLUMN_MIME_TYPE);
                        if (DataConstants.CALL_NOTE.equals(mimeType)) {
                            // 处理通话记录类型的笔记
                            String phoneNumber = dataCursor.getString(DATA_COLUMN_PHONE_NUMBER);
                            long callDate = dataCursor.getLong(DATA_COLUMN_CALL_DATE);
                            String location = dataCursor.getString(DATA_COLUMN_CONTENT);

                            // 打印电话号码
                            if (!TextUtils.isEmpty(phoneNumber)) {
                                ps.println(String.format(getFormat(FORMAT_NOTE_CONTENT), phoneNumber));
                            }
                            // 打印通话时间
                            ps.println(String.format(getFormat(FORMAT_NOTE_CONTENT), DateFormat
                                    .format(mContext.getString(R.string.format_datetime_mdhm), callDate)));
                            // 打印通话相关位置信息
                            if (!TextUtils.isEmpty(location)) {
                                ps.println(String.format(getFormat(FORMAT_NOTE_CONTENT), location));
                            }
                        } else if (DataConstants.NOTE.equals(mimeType)) {
                            // 处理普通文本笔记
                            String content = dataCursor.getString(DATA_COLUMN_CONTENT);
                            if (!TextUtils.isEmpty(content)) {
                                ps.println(String.format(getFormat(FORMAT_NOTE_CONTENT), content));
                            }
                        }
                    } while (dataCursor.moveToNext());
                }
                dataCursor.close();
            }
            // 在笔记之间添加分隔符
            try {
                ps.write(new byte[] { Character.LINE_SEPARATOR, Character.LETTER_NUMBER });
            } catch (IOException e) {
                Log.e(TAG, e.toString());
            }
        }

        /**
         * 执行完整的笔记数据导出流程
         * 
         * @return 导出操作状态码（参考STATE_*常量）
         */
        public int exportToText() {
            // 检查SD卡是否可用
            if (!externalStorageAvailable()) {
                Log.d(TAG, "Media was not mounted");
                return STATE_SD_CARD_UNMOUONTED;
            }

            // 获取文件打印流
            PrintStream ps = getExportToTextPrintStream();
            if (ps == null) {
                Log.e(TAG, "get print stream error");
                return STATE_SYSTEM_ERROR;
            }

            // 第一步：导出所有文件夹及其笔记
            Cursor folderCursor = mContext.getContentResolver().query(
                    Notes.CONTENT_NOTE_URI,
                    NOTE_PROJECTION,
                    "(" + NoteColumns.TYPE + "=" + Notes.TYPE_FOLDER + " AND "
                            + NoteColumns.PARENT_ID + "<>" + Notes.ID_TRASH_FOLER + ") OR "
                            + NoteColumns.ID + "=" + Notes.ID_CALL_RECORD_FOLDER,
                    null, null);

            if (folderCursor != null) {
                if (folderCursor.moveToFirst()) {
                    do {
                        // 打印文件夹名称（通话记录文件夹使用固定名称）
                        String folderName = "";
                        if (folderCursor.getLong(NOTE_COLUMN_ID) == Notes.ID_CALL_RECORD_FOLDER) {
                            folderName = mContext.getString(R.string.call_record_folder_name);
                        } else {
                            folderName = folderCursor.getString(NOTE_COLUMN_SNIPPET);
                        }
                        if (!TextUtils.isEmpty(folderName)) {
                            ps.println(String.format(getFormat(FORMAT_FOLDER_NAME), folderName));
                        }
                        // 导出该文件夹下的所有笔记
                        String folderId = folderCursor.getString(NOTE_COLUMN_ID);
                        exportFolderToText(folderId, ps);
                    } while (folderCursor.moveToNext());
                }
                folderCursor.close();
            }

            // 第二步：导出根目录下的普通笔记
            Cursor noteCursor = mContext.getContentResolver().query(
                    Notes.CONTENT_NOTE_URI,
                    NOTE_PROJECTION,
                    NoteColumns.TYPE + "=" + Notes.TYPE_NOTE + " AND " + NoteColumns.PARENT_ID + "=0",
                    null, null);

            if (noteCursor != null) {
                if (noteCursor.moveToFirst()) {
                    do {
                        // 打印笔记修改日期
                        ps.println(String.format(getFormat(FORMAT_NOTE_DATE), DateFormat.format(
                                mContext.getString(R.string.format_datetime_mdhm),
                                noteCursor.getLong(NOTE_COLUMN_MODIFIED_DATE))));
                        // 导出该笔记的内容
                        String noteId = noteCursor.getString(NOTE_COLUMN_ID);
                        exportNoteToText(noteId, ps);
                    } while (noteCursor.moveToNext());
                }
                noteCursor.close();
            }
            // 关闭打印流
            ps.close();

            return STATE_SUCCESS;
        }

        /**
         * 获取用于导出文本的打印流
         * 
         * @return 打印流对象，失败时返回null
         */
        private PrintStream getExportToTextPrintStream() {
            // 生成SD卡上的目标文件
            File file = generateFileMountedOnSDcard(mContext, R.string.file_path,
                    R.string.file_name_txt_format);
            if (file == null) {
                Log.e(TAG, "create file to exported failed");
                return null;
            }
            // 记录文件名和目录
            mFileName = file.getName();
            mFileDirectory = mContext.getString(R.string.file_path);

            // 创建打印流
            PrintStream ps = null;
            try {
                FileOutputStream fos = new FileOutputStream(file);
                ps = new PrintStream(fos);
            } catch (FileNotFoundException e) {
                e.printStackTrace();
                return null;
            } catch (NullPointerException e) {
                e.printStackTrace();
                return null;
            }
            return ps;
        }
    }

    /**
     * 在SD卡上生成用于存储导出数据的文件
     * 
     * @param context             应用上下文
     * @param filePathResId       目录路径资源ID
     * @param fileNameFormatResId 文件名格式资源ID
     * @return 生成的文件对象，失败时返回null
     */
    private static File generateFileMountedOnSDcard(Context context, int filePathResId, int fileNameFormatResId) {
        // 构建文件路径（SD卡根目录+应用自定义路径）
        StringBuilder sb = new StringBuilder();
        sb.append(Environment.getExternalStorageDirectory());
        sb.append(context.getString(filePathResId));
        File filedir = new File(sb.toString());

        // 构建文件名（含日期后缀）
        sb.append(context.getString(
                fileNameFormatResId,
                DateFormat.format(context.getString(R.string.format_date_ymd),
                        System.currentTimeMillis())));
        File file = new File(sb.toString());

        // 创建目录和文件（如果不存在）
        try {
            if (!filedir.exists()) {
                filedir.mkdir();
            }
            if (!file.exists()) {
                file.createNewFile();
            }
            return file;
        } catch (SecurityException e) {
            e.printStackTrace();
        } catch (IOException e) {
            e.printStackTrace();
        }

        return null;
    }
}