Changeset 7654 for lang/vim

Timestamp:

03/08/08 20:42:09 (9 months ago)

Author:

motemen

Message:

lang/vim/hatena/plugin/hatena.vim: その場編集の API に対応した関数を定義

Files:

• lang/vim/hatena/plugin/hatena.vim (modified) (1 diff)

lang/vim/hatena/plugin/hatena.vim

@@ -365 +365 @@
                     \ . ' -F image= -F title=' . a:diary['day_title']
     return system(s:curl_cmd . ' ' . a:base_url . a:user . '/edit -b "' . a:cookie_file . '"' . post_data . ' -D -')
+endfunction
+
+function! HatenaGetRKM(login_info)
+    let [base_url, user, cookie_file] = a:login_info
+    let json = system(s:curl_cmd . ' "' . base_url . user . '/?mode=json" -b "' . cookie_file . '"')
+    return matchstr(json, "'rkm':'\\zs.*\\ze'")
+endfunction
+
+" はてなダイアリー/グループに新しいエントリを投稿する
+" login_info: HatenaLogin() で得られるもの
+" rkm: HatenaGetRKM() などで得られるもの
+" entry: エントリの情報、以下のキーを持つ
+"  * title
+"  * body (body_file とどちらか一方)
+"  * body_file (body とどちらか一方)
+"  * date (optional)
+"  * timestamp (optional)
+function! HatenaPostEntry(login_info, rkm, entry)
+    let [base_url, user, cookie_file] = a:login_info
+
+    if base_url =~ 'g[.]hatena'
+        let fenc = 'utf-8'
+    else
+        let fenc = 'euc-jp'
+    endif
+
+    if has_key(a:entry, 'body_file')
+        let body_file = a:entry.body_file
+        execute 'split ' . body_file
+        let &fileencoding = fenc
+        write
+        quit
+    else
+        let body_file = tempname()
+        execute 'new ' . body_file
+        call append(0, a:entry.body)
+        let &fileencoding = fenc
+        write
+        bdelete
+    endif
+
+    let title_file = tempname()
+    execute 'new ' . title_file
+    normal! C=a:entry.title
+    let &fileencoding = fenc
+    write
+
+    let post_url = base_url . user . '/'
+    if has_key(a:entry, 'date') && has_key(a:entry, 'timestamp')
+        let post_url += a:entry.date . '/' . a:entry.timestamp . '/'
+    endif
+
+    return system(printf('%s %s -b "%s" -F "rkm=%s" -F "title=<%s" -F "body=<%s" -D -',
+                \ s:curl_cmd,
+                \ post_url,
+                \ cookie_file,
+                \ a:rkm,
+                \ title_file,
+                \ body_file
+                \ ))
 endfunction