Lismoのアドレス帳をVCFに変換する

require 'rubygems'
require 'kconv'
require 'csv'
require 'vpim'
$KCODE='u'
#Authors::   takuya_1st
#Copyright:: @takuya_1st
#License::   GPL
class CSV 
    ## CSVファイルを読み込んで一行目を見出し行として、全部をハッシュに読み込む
    def CSV.csv_to_hash(filename)
        #一行目がヘッダのCSVファイル
        f = CSV.open(filename, "r") 
        header = f.shift
        f.map{|e| 
            Hash[*header.zip(e).flatten]
        }
    end

end


class LismoAddressBook


    def csv_to_vcf_array(filename)
        info_list = csv_to_info(filename)
        vcf_list = info_list.map{|info,k|
            info_to_vcf(info)
        }
    end

    def csv_into_vcf_files(filename)
        list = csv_to_info(filename)
        list.each{|info| 
            save_vcf(info)
        }
    end


    def csv_to_info(csv_file)
        hash_list = CSV.csv_to_hash(csv_file)
        hash_list.map{|e| 
            hash_to_info(e)
        }
    end
    def hash_to_info(hash)
        info ={};

        info['f_name'   ] =  hash["名前"]
        info['l_name'   ] =  "" if false
        info['kana'     ] =  hash["よみ"]
        info['email'    ] =  [hash["Ｅメール１"], hash["Ｅメール２"],hash["Ｅメール３"],hash["Ｅメール４"],hash["Ｅメール５"],].select{|e| e}
        info['tel'      ] =  [hash["電話番号１"],hash["電話番号２"], hash["電話番号３"],hash["電話番号４"],hash["電話番号５"], ].select{|e| e}
        info['home_addr'] =  "#{hash["郵便番号"]}  #{hash["住所"]}" if hash["住所"]
        info['birthday' ] =  hash["誕生日"]   if hash["誕生日"]
        info['memo'     ] = "#{hash["メモ"]}" if hash["メモ"] 

        info.delete("tel") if info["tel"].size < 1
        info.delete("email") if info["email"].size < 1
        return info
    end
    def info_to_vcf(info)

        vcard = Vpim::Vcard.create
        vcard << Vpim::DirectoryInfo::Field.create('N;CHARSET=utf-8'        , "#{info['f_name']};#{info['l_name']};;;"  )
        vcard << Vpim::DirectoryInfo::Field.create('FN;CHARSET=utf-8'       , "#{info['l_name']}#{info['l_name']}"      )
        vcard << Vpim::DirectoryInfo::Field.create('X-PHONETIC-FIRST-NAME'  , "#{info['kana']}"      )
        info["email"].each{|mail|
            vcard << Vpim::DirectoryInfo::Field.create('EMAIL;INTERNET'     , "#{mail}" )
        } if info["email"]
        info["tel"].each{|num|
            vcard << Vpim::DirectoryInfo::Field.create('TEL;CELL;VOICE'     , "#{num}" )
        } if info["tel"]
        vcard << Vpim::DirectoryInfo::Field.create('ADR;HOME;CHARSET=utf-8' , "#{info['home_addr']}" )
        vcard << Vpim::DirectoryInfo::Field.create('BDAY;value=date'        , "#{info['birthday']}" )
        vcard << Vpim::DirectoryInfo::Field.create('NOTE;CHARSET=utf-8'     , "#{info['memo']}" )
        vcard.to_s.gsub( /¥r?¥n/, "")
    end

    def save_vcf(info)
        require 'digest/sha1'
        vcf_string = info_to_vcf(info)
        file_name = "#{info["f_name"]}#{info["l_name"]}.vcf"
        file_name = "#{Digest::SHA1.hexdigest(vcf_string)}.vcf" if file_name.strip == ".vcf"
        open("#{info["f_name"]}#{info["l_name"]}.vcf", "w" ){|f|
            f.write vcf_string
        }
        puts "#{file_name} saved."
    end





end



converter = LismoAddressBook.new 
converter.csv_into_vcf_files("./address.csv")