<@20> <@> <@> アンテナ情報更新ルーチン <@> RSS生成 <$set = v.daybook_setting> <$set.description_escaped = set.description> <$tag_delete( set.description_escaped )> <$tag_escape_amp( set.description_escaped )> <$rss_logs = v.load_diary_for_rss( v.diary_id )> <$rss = chain_array( call(v.rss_skelton) )> 文字コード変換 <$jcode = loadpm('Jcode')>; <$rss = jcode.from_to(rss, System_coding, 'UTF-8')> ファイルへセーブ <$tmp = new> <$tmp.dir = v.archive_dir . v.diary_id . '/'> <$mkdir( v.archive_dir )> あれば作らない <$mkdir( tmp.dir )> あれば作らない <$file = tmp.dir . v.rss_file> <$fwrite_lines( file, rss )> <$ifexec(v.use_gzip, begin, begin)> <$gzip = loadpm('Base::Gzip')> <$gzip.compress( file )> <$else> <$file_delete( file . '.gz' )> <$end> ---------------------------------------------------- 第2RSS生成 ---------------------------------------------------- <$ifexec(v.rss_file2, begin.rss2)> <$file = tmp.dir . v.rss_file2> <$ifexec(set.other_rss, begin, begin)> <$rss_logs = v.load_diary_for_rss( v.diary_id, 1.other_rss_flag )> <$blog_name_bak = set.blog_name> <$set.blog_name .= ' (抜粋)'> <$rss = chain_array( call(v.rss_skelton) )> <$set.blog_name = blog_name_bak> <$rss = jcode.from_to(rss, System_coding, 'UTF-8')> <$fwrite_lines( file, rss )> <$else> <$file_delete(file)> <$end> <$ifexec(set.other_rss && v.use_gzip, begin, begin)> <$gzip = loadpm('Base::Gzip')> <$gzip.compress( file )> <$else> <$file_delete( file . '.gz' )> <$end> <$end.rss2> ------------------------------------------------------------------------- その他、アンテナの生成 ------------------------------------------------------------------------- <$set = v.daybook_setting> <$tmp.dir = v.archive_dir . v.diary_id . '/'> <$tmp.diary_tm = v.diary_tm> RSS生成時に設定される <$tmp.update_tm = v.update_tm> RSS生成時に設定される <$tmp.url = v.server_url . v.myself2> <$tmp.blog_name = set.blog_name> <$user = Auth.get_userinfo( v.diary_id )> <$tmp.author = user.name> カンマエスケープ <$tmp.blog_name_no_comma = tmp.blog_name> <$tmp.author_no_comma = tmp.author> <$v.comma_escape(tmp.blog_name_no_comma, tmp.author_no_comma)> <#$jcode = loadpm('Jcode')> ロード済 <$call('antenna/microsummary')> <$call('antenna/lirs')> <$call('antenna/hina')>