<@2> <@> <@> adiary形式 <@> <$logs = argv#0> <$option = argv#1> <@ifexec(! logs, begin)> adiary形式 標準形式です。唯一、すべての情報をバックアップできます。
key記法(+記事番号)による日記帳内リンクを時刻指定に書き換え(リンク先保持)
id記法を通常リンクに書き換え(ログ移転時のリンク先保持)
書き込み者情報を出力しない(ID, 名前, IP/USER_AGENT等)
<@ifexec(0 <= index(System_coding, 'EUC'), begin)> EUC-JPで出力する(非推奨)
<$end> <$break()> <$end> <@>----------------------------------------------------------------------------- <@> adiary形式 exporter <@>----------------------------------------------------------------------------- <$exporter = loadpm('Diary::Export_adiary')> <$ifbreak(error_flag)> <$ifset(option.adiary_eucjp, code, System_coding, 'UTF-8')> <$ifexec(Debug_mode, begin)><$print("Content-Type: text/plain; charset=<@code>;\n\n")><$end> <$print("Content-Disposition: attachment; filename=<@v.diary_id><@option.year>_export_adiary.xml\n")> <$print("Content-Type: text/xml; charset=<@code>;\n\n")> <$print("\"?>\n")> <$print("\n")> <$ifset(! option.adiary_no_writeinfo, writer, 1)> <$exporter.export( begin.day, logs, option )><$t=tmp> <$tag_escape_for_xml(t.title, t.category, t.name, t.host, t.agent, t.files, t.link_key, t.upnode, t._text)> <@t._text> <@> <@> コメントの生成 <@> <@ifexec(! option.no_comment, begin.comment )> <@forexec(t2, v.load_comments(t), begin)> <$tag_escape_for_xml(t2.name, t2.url, t2.text)> <@t2.enable> <@t2.hidden> <@t2.id> <@t2.name> <@t2.tm> <@t2.email> <@t2.url> <@ifexec(writer, begin)> <@t2.ip> <@t2.host> <@t2.agent> <$end> <@t2.text> <$end> <$end.comment> <@> <@> トラックバックの生成 <@> <@ifexec(! option.no_tb, begin.trackback )> <@forexec(t2, v.load_trackbacks(t), begin)> <$tag_escape_for_xml(t2.title, t2.excerpt, t2.blog_name, t2.author)> <@t2.enable> <@t2.internal> <@t2.tm> <@t2.title> <@t2.excerpt> <@t2.url> <@t2.blog_name> <@t2.author> <@ifexec(writer, begin)> <@t2.ip> <@t2.host> <@t2.agent> <$end> <$end> <$end.trackback> <$end.day> <@> <@> フッタ <@> <$print( "\n" )> <$exit(0)>