// ライセンス: GPL2

//#define _DEBUG
#include "jddebug.h"

#include "cache.h"

#include "skeleton/msgdiag.h"
#include "skeleton/filediag.h"

#include "config/globalconf.h"

#include "jdlib/miscutil.h"
#include "jdlib/miscmsg.h"

#include "dbtree/interface.h"

#include <gtkmm.h>

#include <fstream>

#include <sys/types.h>
#include <sys/stat.h>
#include <unistd.h>
#include <dirent.h>

#include <fcntl.h>
#include <cstring>

enum
{
    MAX_SAFE_PATH = 1024
};

std::string root_path;


// 設定ファイル
std::string CACHE::path_conf()
{
    return CACHE::path_root() + "jd.conf";
}

std::string CACHE::path_conf_bkup()
{
    return CACHE::path_conf() + ".bkup";
}


// 旧設定ファイル
std::string CACHE::path_conf_old()
{
    std::string home = MISC::getenv_limited( ENV_HOME, MAX_SAFE_PATH );

    return home + "/.jdrc";
}


// セッション情報ファイル
std::string CACHE::path_session()
{
    return CACHE::path_root() + "session.info";
}


// ロックファイル
std::string CACHE::path_lock()
{
    const std::string jd_lock = MISC::getenv_limited( "JD_LOCK", MAX_SAFE_PATH );
    if( ! jd_lock.empty() ) return jd_lock;

    return CACHE::path_root() + "JDLOCK";
}


// パスワード設定ファイル
std::string CACHE::path_passwd( const std::string& basename )
{
    return CACHE::path_root() + basename + ".conf";
}


// キャッシュルートの絶対パス
std::string CACHE::path_root()
{
    if( root_path.empty() ){

        const std::string jd_cache = MISC::getenv_limited( "JD_CACHE", MAX_SAFE_PATH );
        root_path = jd_cache.empty() ? "~/.jd/" : jd_cache;

        if( root_path[ root_path.length() -1 ] != '/' ) root_path = root_path + "/";

        if( root_path[ 0 ] == '~' ){
            std::string home = MISC::getenv_limited( ENV_HOME , MAX_SAFE_PATH );
            root_path.replace( 0, 1, home );
        }
    }

    return root_path;
}


// 板リスト
std::string CACHE::path_xml_listmain()
{
    return CACHE::path_root() +  "boards.xml";
}

std::string CACHE::path_xml_listmain_bkup()
{
    return CACHE::path_xml_listmain() + ".bkup";
}
// 1.9.5-beta070611以前
std::string CACHE::path_xml_listmain_old()
{
    return CACHE::path_root() +  "list_main.xml";
}


// お気に入り
std::string CACHE::path_xml_favorite()
{
    return CACHE::path_root() +  "bookmark.xml";
}

std::string CACHE::path_xml_favorite_bkup()
{
    return CACHE::path_xml_favorite() + ".bkup";
}
// 1.9.5-beta070611以前
std::string CACHE::path_xml_favorite_old()
{
    return CACHE::path_root() +  "favorite.xml";
}


// 外部板設定ファイル( navi2ch 互換 )
std::string CACHE::path_etcboard()
{
    return CACHE::path_root() +  "etc.txt";
}


// ユーザーコマンド設定ファイル
std::string CACHE::path_usrcmd()
{
    return CACHE::path_root() +  "usrcmd.xml";
}

std::string CACHE::path_usrcmd_old()
{
    return CACHE::path_root() +  "usrcmd.txt";
}


// リンクフィルタ設定ファイル
std::string CACHE::path_linkfilter()
{
    return CACHE::path_root() +  "linkfilter.xml";
}


// 履歴
std::string CACHE::path_xml_history()
{
    return CACHE::path_root() +  "hist.xml";
}
// 1.9.5-beta070611以前
std::string CACHE::path_xml_history_old()
{
    return CACHE::path_root() +  "history.xml";
}


// 板履歴
std::string CACHE::path_xml_history_board()
{
    return CACHE::path_root() +  "hist_board.xml";
}
// 1.9.5-beta070611以前
std::string CACHE::path_xml_history_board_old()
{
    return CACHE::path_root() +  "history_board.xml";
}


// 最近閉じたスレの履歴
std::string CACHE::path_xml_history_close()
{
    return CACHE::path_root() +  "hist_close.xml";
}
// 1.9.5-beta070611以前
std::string CACHE::path_xml_history_close_old()
{
    return CACHE::path_root() +  "history_close.xml";
}


// View履歴
std::string CACHE::path_xml_history_view()
{
    return CACHE::path_root() +  "hist_view.xml";
}


// 板移転情報
std::string CACHE::path_movetable()
{
    return CACHE::path_root() + "move.info";
}


// キーボード設定
std::string CACHE::path_keyconf()
{
    return CACHE::path_root() + "key.conf";
}


// マウスジェスチャ設定
std::string CACHE::path_mouseconf()
{
    return CACHE::path_root() + "mouse.conf";
}


// マウスボタン設定
std::string CACHE::path_buttonconf()
{
    return CACHE::path_root() + "button.conf";
}


// 板のルートパス
std::string CACHE::path_board_root( const std::string& url )
{
    std::string boardbase = DBTREE::url_boardbase( url );
    return path_board_root_fast( boardbase );
}


//
// 板のルートパス(高速版)
//
// DBTREE::url_boardbase( url ) を使わないであらかじめ boardbase を与える
//
std::string CACHE::path_board_root_fast( const std::string& boardbase )
{
    // http:// を取り除く
    size_t i = boardbase.find( "://" );
    if( i == std::string::npos ) return std::string();

    return CACHE::path_root() + boardbase.substr( i + 3 );
}


std::string CACHE::path_article_summary( const std::string& url )
{
    return CACHE::path_board_root( url ) + "article-summary";
}

// board情報( navi2ch互換用 )
std::string CACHE::path_board_info( const std::string& url )
{
    return CACHE::path_board_root( url ) + "board.info";
}


// board情報( jd 用 )
std::string CACHE::path_jdboard_info( const std::string& url )
{
    return CACHE::path_board_root( url ) + "jdboard.info";
}


std::string CACHE::path_article_info_root( const std::string& url )
{
    return CACHE::path_board_root( url ) + "info/";
}


// スレの情報ファイル( navi2ch互換、実際には使用しない )
std::string CACHE::path_article_info( const std::string& url, const std::string& id )
{
    std::string id_str = id;

    // idに拡張子が付いてたら取る
    size_t i = id.find( "." );
    if( i != std::string::npos ) id_str = id.substr( 0, i );

    return CACHE::path_article_info_root( url ) + id_str;
}


// スレの拡張情報ファイル
std::string CACHE::path_article_ext_info( const std::string& url, const std::string& id )
{
    return CACHE::path_article_info( url, id ) + ".info";
}


std::string CACHE::path_dat( const std::string& url )
{
    // file:// の場合
    if( url.c_str()[ 0 ] == 'f' && url.c_str()[ 1 ] == 'i' ) return url.substr( strlen( "file://" ) );

    return CACHE::path_board_root( url ) + DBTREE::article_id( url );
}



//
// 画像キャッシュのルートパス
//
std::string CACHE::path_img_root()
{
    return CACHE::path_root() + "image/";
}


//
// 画像キャッシュのinfoファイルのルートパス
//
std::string CACHE::path_img_info_root()
{
    return path_img_root() + "info/";
}


//
// 保護画像キャッシュのルートパス
//
std::string CACHE::path_img_protect_root()
{
    return CACHE::path_root() + "image_protect/";
}


//
// 保護画像キャッシュのinfoファイルのルートパス
//
std::string CACHE::path_img_protect_info_root()
{
    return path_img_protect_root() + "info/";
}


//
// 画像あぼーんinfoファイルのルートパス
//
std::string CACHE::path_img_abone_root()
{
    return path_root() + "image_abone/";
}


//
// ログのルートパス
//
std::string CACHE::path_logroot()
{
    return CACHE::path_root() + "log/";
}


//
// 書き込みログ
//
std::string CACHE::path_postlog()
{
    return path_logroot() + "postlog";
}


//
// メッセージログ（-lオプション）
//
std::string CACHE::path_msglog()
{
    return path_logroot() + "msglog";
}


//
// 検索や名前などの補完情報
//
std::string CACHE::path_completion( int mode )
{
    return CACHE::path_root() +  "comp" + MISC::itostr( mode ) + ".info";
}


//
// サウンドファイルのルートパス
//
std::string CACHE::path_sound_root()
{
    return CACHE::path_root() + "sound/";
}


//
// 画像キャッシュファイルの名前
//
std::string CACHE::filename_img( const std::string& url )
{
    std::string file = MISC::tolower_str( url );
    file = MISC::replace_str( file, "http://", "" );
    file = MISC::replace_str( file, "/", "-" );
    file = MISC::url_encode( file.c_str(), file.length() );
    file = MISC::replace_str( file, "%", "" );
    
    return file;
}


//
// 画像キャッシュ情報ファイルの名前
//
std::string CACHE::filename_img_info( const std::string& url )
{
    return filename_img( url ) + ".info";
}


//
// 画像キャッシュファイルのパス
//
std::string CACHE::path_img( const std::string& url )
{
    return CACHE::path_img_root() + filename_img( url );
}


//
// 画像infoファイルのパス
//
std::string CACHE::path_img_info( const std::string& url )
{
    return CACHE::path_img_info_root() + filename_img_info( url );
}


//
// 保護画像キャッシュファイルのパス
//
std::string CACHE::path_img_protect( const std::string& url )
{
    return CACHE::path_img_protect_root() + filename_img( url );
}


//
// 保護画像infoファイルのパス
//
std::string CACHE::path_img_protect_info( const std::string& url )
{
    return CACHE::path_img_protect_info_root() + filename_img_info( url );
}


//
// 画像あぼーんinfoファイルのパス
//
std::string CACHE::path_img_abone( const std::string& url )
{
    return CACHE::path_img_abone_root() + filename_img_info( url );
}


//
// アスキーアートファイル
//
std::string CACHE::path_aalist()
{
    return CACHE::path_root() +  "aalist.txt";
}


//
// アスキーアートファイル格納用ディレクトリ .jd/aa/
//
std::string CACHE::path_aadir()
{
    return CACHE::path_root() +  "aa/";
}


//
// AAの使用履歴ファイル
//
std::string CACHE::path_aahistory()
{
    return CACHE::path_root() +  "hist_aa.xml";
}


//
// css
//
std::string CACHE::path_css()
{
    return CACHE::path_root() +  "jd.css";
}


//
// res.html
//
std::string CACHE::path_reshtml()
{
    return CACHE::path_root() +  "Res.html";
}


//
// キャッシュのルートディレクトリをmkdir
//
// 例えば  "/home/hoge/.jd/"　を作成
//
bool CACHE::mkdir_root()
{
    std::string path_root = CACHE::path_root();
    if( ! CACHE::jdmkdir( path_root ) ){
        MISC::ERRMSG( "can't create " + path_root );
        return false;
    }
    
    return true;
}



//
// 画像キャッシュのルートディレクトリをmkdir
//
// 例えば  "/home/hoge/.jd/image/" と "/home/hoge/.jd/image/info/" などを作成
//
bool CACHE::mkdir_imgroot()
{
    // root
    std::string path_img_root = CACHE::path_img_root();
    if( ! CACHE::jdmkdir( path_img_root ) ){
        MISC::ERRMSG( "can't create " + path_img_root );
        return false;
    }

    // info ディレクトリ
    std::string path_info_root = CACHE::path_img_info_root();
    if( ! CACHE::jdmkdir( path_info_root ) ){
        MISC::ERRMSG( "can't create " + path_info_root );
        return false;
    }
    
    // abone ディレクトリ
    std::string path_abone_root = CACHE::path_img_abone_root();
    if( ! CACHE::jdmkdir( path_abone_root ) ){
        MISC::ERRMSG( "can't create " + path_abone_root );
        return false;
    }

    return true;
}


//
// 保護画像キャッシュのルートディレクトリをmkdir
//
bool CACHE::mkdir_imgroot_favorite()
{
    // root
    std::string path_img_root = CACHE::path_img_protect_root();
    if( ! CACHE::jdmkdir( path_img_root ) ){
        MISC::ERRMSG( "can't create " + path_img_root );
        return false;
    }

    // info ディレクトリ
    std::string path_info_root = CACHE::path_img_protect_info_root();
    if( ! CACHE::jdmkdir( path_info_root ) ){
        MISC::ERRMSG( "can't create " + path_info_root );
        return false;
    }
    
    return true;
}


//
// キャッシュのひとつ上のディレクトリをmkdir
//
// 例えばキャッシュのルートディレクトリが "/home/hoge/.jd/hoge.2ch.net/hogeboard/" だったら
// "/home/hoge/.jd/hoge.2ch.net/" を作成する
//
bool CACHE::mkdir_parent_of_board( const std::string& url )
{
    std::string path_tmp = CACHE::path_board_root( url );

    size_t i = path_tmp.rfind( "/", path_tmp.length() -2 );
    if( i == std::string::npos ) return false;        
        
    std::string path_parent = path_tmp.substr( 0, i );

    if( ! CACHE::jdmkdir( path_parent ) ){
        MISC::ERRMSG( "can't create " + path_parent );
        return false;
    }
    
    return true;
}


//
// ある板のキャッシュのルートディレクトリをmkdir
//
// 例えば "/home/hoge/.jd/hoge.2ch.net/hogeboard/" と "/home/hoge/.jd/hoge.2ch.net/hogeboard/info/" を作成
//
bool CACHE::mkdir_boardroot( const std::string& url )
{
    // root
    std::string path_board_root = CACHE::path_board_root( url );
    if( ! CACHE::jdmkdir( path_board_root ) ){
        MISC::ERRMSG( "can't create " + path_board_root );
        return false;
    }

    // info ディレクトリ
    std::string path_info_root = CACHE::path_article_info_root( url );
    if( ! CACHE::jdmkdir( path_info_root ) ){
        MISC::ERRMSG( "can't create " + path_info_root );
        return false;
    }
    
    return true;
}


//
// ログのルートディレクトリをmkdir
//
bool CACHE::mkdir_logroot()
{
    // root
    std::string path_logroot = CACHE::path_logroot();
    if( ! CACHE::jdmkdir( path_logroot ) ){
        MISC::ERRMSG( "can't create " + path_logroot );
        return false;
    }

    return true;
}


size_t CACHE::load_rawdata( const std::string& path, std::string& str )
{
    str.clear();
    std::ifstream fin;

    fin.open( to_locale_cstr( path ) );
    if( !fin.is_open() ) return 0;
    getline( fin, str, '\0' );
    fin.close();

    return str.length();
}


size_t CACHE::load_rawdata( const std::string& path, char* data, const size_t n )
{
    size_t count = 0;
    std::ifstream fin;

    fin.open( to_locale_cstr( path ), std::ios::binary );
    if( !fin.is_open() ) return 0;
    fin.read( data, n );
    count = fin.gcount();
    fin.close();

    return count;
}


size_t CACHE::save_rawdata( const std::string& path, const std::string& str, const bool append )
{
    return save_rawdata( path, str.c_str(), str.length(), append );
}


size_t CACHE::save_rawdata( const std::string& path, const char* data, size_t n, const bool append )
{
    size_t count = 0;
    size_t byte = 0;
    std::ofstream fout;
    std::ofstream::openmode fmode;
    
    if( append ) fmode = std::ios::app | std::ios::ate | std::ios::binary;
    else fmode = std::ios::binary;
    
    fout.open( to_locale_cstr( path ), fmode );
    if( !fout.is_open() ){
        MISC::ERRMSG( "can't open " + path );
        return 0;
    }

    if( append ) count = fout.tellp();

#ifdef _DEBUG
    std::cout << "CACHE::save_rawdata current = " << count << std::endl;
#endif

    fout.write( data, n );
    byte = fout.tellp();
    byte -= count;
    fout.close();

#ifdef _DEBUG
    std::cout << "n = " << n << " byte = " << byte << std::endl;
#endif

    if( n != byte ){
        MISC::ERRMSG( "failed to save " + path );
        return 0;
    }

    return byte;
}


const int CACHE::file_exists( const std::string& path )
{
    struct stat buf_stat;

    if( path.empty() ) return EXIST_ERROR;

    std::string path_s = path;
#ifdef _WIN32
    // on windows fail stat() directory path with ends '/'
    // "c:/" = ok, "c:" = fail
    // "c:/dir/" = fail, "c:/dir" = ok
    if( path.length() > 3 && path[ path.length() - 1 ] == '/' ){
        path_s = path.substr( 0, path.length() - 1 );
    }
#endif
    if( stat( to_locale_cstr( path_s ), &buf_stat ) != 0 ) return EXIST_ERROR;

    if( S_ISREG( buf_stat.st_mode ) ) return EXIST_FILE;
    if( S_ISDIR( buf_stat.st_mode ) ) return EXIST_DIR;
    if( S_ISFIFO( buf_stat.st_mode ) ) return EXIST_FIFO;

    return EXIST;
}


size_t CACHE::get_filesize( const std::string& path )
{
    struct stat buf_stat;

    if( stat( to_locale_cstr( path ), &buf_stat ) != 0 ) return 0;
    if( S_ISREG( buf_stat.st_mode ) ) return buf_stat.st_size;
    return 0;
}


time_t CACHE::get_filemtime( const std::string& path )
{
    struct stat buf_stat;

    if( stat( to_locale_cstr( path ), &buf_stat ) != 0 ) return 0;
    if( S_ISREG( buf_stat.st_mode ) ) return buf_stat.st_mtime;
    return 0;
}


//
// mkdir
//
bool CACHE::jdmkdir( const std::string& path )
{
#ifdef _DEBUG
    std::cout << "CACHE::jdmkdir : path = " + path << std::endl;
#endif    

    if( CACHE::file_exists( path ) == EXIST_DIR ) return true;

    std::string target = path;
    
    if( path.find( "~/" ) == 0 ){

        std::string homedir = MISC::getenv_limited( ENV_HOME, MAX_SAFE_PATH );
        if( homedir.empty() ) return false;

        target = homedir + path.substr( 2 );
    }

#ifdef _WIN32
    // on windows has case of start drive letter "c:/...", or UNC "//pcname/..."
    if( target[ 0 ] != '/' && target[ 1 ] != ':' ) return false;
#else
    if( target[ 0 ] != '/' ) return false;
#endif
    if( target[ target.length() -1 ] != '/' ) target += "/";

#ifdef _DEBUG
    std::cout << "target = " << target << std::endl;
#endif
    
    // ルートからディレクトリがあるかチェックしていく。無ければ作る
    size_t i = 0;

    while( ( i = target.find( "/", i ) ) != std::string::npos ){

        ++i;
        std::string currentdir = target.substr( 0, i );

#ifdef _DEBUG
        std::cout << "mkdir " << currentdir << std::endl;
#endif
        
        if( CACHE::file_exists( currentdir ) == EXIST_DIR ) continue;

#ifdef _WIN32
        if( mkdir( to_locale_cstr( currentdir ) ) != 0 ){
#else
        if( mkdir( to_locale_cstr( currentdir ), 0755 ) != 0 ){
#endif
            MISC::ERRMSG( "mkdir failed " + currentdir );
            return false;
        }
    }

    return true;
}



//
// file copy
//
bool CACHE::jdcopy( const std::string& file_from, const std::string& file_to )
{
    struct stat buf_stat;
    if( stat( to_locale_cstr( file_from ), &buf_stat ) != 0 ) return false;

#ifdef _DEBUG
    std::cout << "CACHE::jdcopy : from = " << file_from << std::endl;
    std::cout << "to = " << file_to << std::endl;
    std::cout << "read size = " << buf_stat.st_size << std::endl;
#endif    

    // 32Mより大きい画像はエラー出す
    if( buf_stat.st_size > 32 * 1024 * 1024 ){
            MISC::ERRMSG( "CACHE::jdcopy: size is too big : " + file_from );
            return false;
    }

    bool ret = false;
    char* data = (char*)malloc( sizeof( char ) *  buf_stat.st_size );

    size_t readsize = load_rawdata( file_from, data, buf_stat.st_size );
    if( readsize ){
        size_t savesize = save_rawdata( file_to, data, buf_stat.st_size );
        if( readsize == savesize ) ret = true;

#ifdef _DEBUG
    std::cout << "save size = " << savesize << std::endl;
#endif
    }
    
    free( data );

    return ret;
}

//
// mv
//
bool CACHE::jdmv( const std::string& file_from, const std::string& file_to )
{
    if( CACHE::jdcopy( file_from, file_to ) ){
        unlink( to_locale_cstr( file_from ) );
        return true;
    }

    return false;
}


//
// 保存ダイアログを表示して file_from を file_to に保存する
//
// parent == NULL の時はメインウィンドウをparentにする
// file_toはデフォルトの保存先
// 戻り値は保存先(保存に失敗したらempty())
//
std::string CACHE::copy_file( Gtk::Window* parent, const std::string& file_from, const std::string& file_to, const int type )
{
    if( file_from.empty() ) return std::string();
    if( file_to.empty() ) return std::string();

    std::string name = MISC::get_filename( file_to );
    std::string dir = MISC::get_dir( file_to );
    if( dir.empty() ) dir = MISC::get_dir( file_from );

#ifdef _DEBUG
    std::cout << "CACHE::open_copy_diag\n";
    std::cout << "from = " << file_from  << std::endl;
    std::cout << "dir = " << dir << std::endl;
    std::cout << "name = " << name << std::endl;
#endif

    std::string path_to = CACHE::open_save_diag( parent, dir, name, type );
    if( path_to.empty() ) return std::string();

    if( CACHE::jdcopy( file_from, path_to ) ) return path_to;
    else{
        SKELETON::MsgDiag mdiag( parent, path_to + "\n\nの保存に失敗しました。\nハードディスクの容量やパーミッションなどを確認してください。" );
        mdiag.run();
    }

    return std::string();
}


// ファイル選択ダイアログにフィルタ追加
void CACHE::add_filter_to_diag( Gtk::FileChooserDialog& diag, const int type )
{
    if( type == FILE_TYPE_ALL ) return;

    Gtk::FileFilter filter;
    switch( type ) 
    {
        case FILE_TYPE_TEXT:
            filter.set_name( "全てのテキストファイル" );
            filter.add_mime_type( "text/plain" );
            diag.add_filter( filter );
            break;

        case FILE_TYPE_DAT:
            filter.set_name( "全てのDATファイル" );
            filter.add_pattern( "*.dat" );
            diag.add_filter( filter );
            break;
    }

    Gtk::FileFilter all;
    all.set_name( "全てのファイル" );
    all.add_pattern( "*" );
    diag.add_filter( all );
}


//
// ファイル選択ダイアログを表示する
//
// parent == NULL の時はメインウィンドウをparentにする
// open_path はデフォルトの参照先
// multi == true なら複数選択可能
// 戻り値は選択されたファイルのpathのリスト
//
const std::list< std::string > CACHE::open_load_diag( Gtk::Window* parent, const std::string& open_path, const int type, const bool multi )
{
    std::string dir = MISC::get_dir( open_path );
    if( dir.empty() ) dir = MISC::getenv_limited( ENV_HOME, MAX_SAFE_PATH );

    SKELETON::FileDiag diag( parent, "ファイルを開く", Gtk::FILE_CHOOSER_ACTION_OPEN );

    diag.set_select_multiple( multi );
    diag.set_current_folder( dir );
    add_filter_to_diag( diag, type );

    if( diag.run() == Gtk::RESPONSE_ACCEPT )
    {
        diag.hide();

        return MISC::recover_path( diag.get_filenames() );
    }

    return std::list< std::string >();
}


//
// 保存ファイル選択ダイアログを表示する
//
// parent == NULL の時はメインウィンドウをparentにする
// dirとnameはデフォルトの参照先
// 戻り値は選択されたファイルのpath
//
std::string CACHE::open_save_diag( Gtk::Window* parent, const std::string& dir, const std::string& name, const int type )
{
#ifdef _DEBUG
    std::cout << "CACHE::open_save_diag\n";
    std::cout << "dir = " << dir << std::endl;
    std::cout << "name = " << name << std::endl;
#endif

    SKELETON::FileDiag diag( parent, "保存先選択", Gtk::FILE_CHOOSER_ACTION_SAVE );
    if( dir.empty() )
    {
        const std::string home = MISC::getenv_limited( ENV_HOME, MAX_SAFE_PATH );
        if( ! home.empty() ) diag.set_current_folder( home );
    }
    else
    {
        diag.set_current_folder( dir );
    }
    diag.set_current_name( name );
    add_filter_to_diag( diag, type );

    if( diag.run() != Gtk::RESPONSE_ACCEPT ) return std::string();
    diag.hide();

    std::string path_to = MISC::recover_path( diag.get_filename() );

#ifdef _DEBUG
    std::cout << "to   = " << path_to  << std::endl;
#endif

    // 既にファイルがある場合は問い合わせる
    if( CACHE::file_exists( path_to ) == CACHE::EXIST_FILE ){

        SKELETON::MsgDiag mdiag( parent, "ファイルが存在します。ファイル名を変更して保存しますか？", 
                                 false, Gtk::MESSAGE_QUESTION, Gtk::BUTTONS_NONE );
        mdiag.add_button( Gtk::Stock::NO, Gtk::RESPONSE_NO );
        mdiag.add_button( Gtk::Stock::YES, Gtk::RESPONSE_YES );
        mdiag.add_button( "上書き", Gtk::RESPONSE_YES + 100 );

        int ret = mdiag.run();
        mdiag.hide();

        if( ret ==  Gtk::RESPONSE_YES ){
            return CACHE::open_save_diag( parent, MISC::get_dir( path_to ), MISC::get_filename( path_to ), type );
        }
        else if( ret == Gtk::RESPONSE_NO ) return std::string();
    }

    return path_to;
}



//
// dir ディレクトリ内のレギュラーファイルのリストを取得
//
std::list< std::string > CACHE::get_filelist( const std::string& dir )
{
    std::list< std::string > list_files;
#ifdef _DEBUG
    std::cout << "CACHE::get_filelist " << dir << std::endl;
#endif

    DIR *dirp = opendir( to_locale_cstr( dir ) );
    if( !dirp ) return list_files;

    struct dirent *direntry;
    while( ( direntry = readdir( dirp ) ) ){

        std::string filename = dir + direntry->d_name;

        if( file_exists( filename ) == EXIST_FILE ){

#ifdef _DEBUG
            std::cout << filename << std::endl;
#endif
            list_files.push_back( direntry->d_name );
        }
    }

    closedir( dirp );

    return list_files;
}


//
// dir ディレクトリ内のレギュラーファイルの合計サイズを取得
//
guint64 CACHE::get_dirsize( const std::string& dir )
{
    guint64 total_size = 0;

#ifdef _DEBUG
    std::cout << "CACHE::get_dirsize " << dir << std::endl;
#endif

    DIR *dirp = opendir( to_locale_cstr( dir ) );
    if( !dirp ) return 0;

    struct dirent *direntry;
    while( ( direntry = readdir( dirp ) ) ){
        std::string filename = dir + direntry->d_name;
        total_size += CACHE::get_filesize( filename );
    }

    closedir( dirp );

#ifdef _DEBUG
    std::cout << "size = " << total_size << std::endl;
#endif

    return total_size;
}


// 相対パスから絶対パスを取得してファイルが存在すれば絶対パスを返す
// ファイルが存在しない場合は std::string() を返す
const std::string CACHE::get_realpath( const std::string& path )
{
    std::string path_real;

    char resolved_path[ PATH_MAX + 1 ];
#ifdef _WIN32
    // _fullpath() are not checked　the path is completely available
    char* ret = _fullpath( resolved_path, to_locale_cstr( path ), PATH_MAX );
#else
    char* ret = realpath( to_locale_cstr( path ), resolved_path );
#endif
    if( ret ){
        path_real = ret;
    }
    else return std::string();

    if( CACHE::file_exists( path_real ) == EXIST_ERROR ){
        return std::string();
    }

#ifdef _DEBUG
    std::cout << "CACHE::get_realpath path = " << path
              << " real = " << path_real << std::endl;
#endif

    return path_real;
}
