1 files changed, 112 insertions, 0 deletions
diff --git a/autoload/l9/tempbuffer.vim b/autoload/l9/tempbuffer.vim
new file mode 100644
index 0000000..6f11a78
--- /dev/null
+++ b/autoload/l9/tempbuffer.vim
@@ -0,0 +1,112 @@
+"=============================================================================
+" Copyright (C) 2009-2010 Takeshi NISHIDA
+"
+"=============================================================================
+" LOAD GUARD {{{1
+
+if !l9#guardScriptLoading(expand('<sfile>:p'), 0, 0, [])
+  finish
+endif
+
+" }}}1
+"=============================================================================
+" TEMPORARY BUFFER {{{1
+
+" each key is a buffer name.
+let s:dataMap = {}
+
+"
+function s:onBufDelete(bufname)
+  if exists('s:dataMap[a:bufname].listener.onClose')
+    call s:dataMap[a:bufname].listener.onClose(s:dataMap[a:bufname].written)
+  endif
+  if bufnr('%') == s:dataMap[a:bufname].bufNr && winnr('#') != 0
+    " if winnr('#') returns 0, "wincmd p" causes ringing the bell.
+    wincmd p
+  endif
+endfunction
+
+"
+function s:onBufWriteCmd(bufname)
+  if !exists('s:dataMap[a:bufname].listener.onWrite') ||
+        \ s:dataMap[a:bufname].listener.onWrite(getline(1, '$'))
+    setlocal nomodified
+    let s:dataMap[a:bufname].written = 1
+    call l9#tempbuffer#close(a:bufname)
+  else
+  endif
+endfunction
+
+" a:bufname:
+" a:height: Window height. If 0, default height is used.
+"           If less than 0, the window becomes full-screen. 
+" a:listener:
+"   a:listener.onClose(written)
+function l9#tempbuffer#openScratch(bufname, filetype, lines, topleft, vertical, height, listener)
+  let openCmdPrefix = (a:topleft ? 'topleft ' : '')
+        \           . (a:vertical ? 'vertical ' : '')
+        \           . (a:height > 0 ? a:height : '')
+  if !exists('s:dataMap[a:bufname]') || !bufexists(s:dataMap[a:bufname].bufNr)
+    execute openCmdPrefix . 'new'
+  else
+    call l9#tempbuffer#close(a:bufname)
+    execute openCmdPrefix . 'split'
+    execute 'silent ' . s:dataMap[a:bufname].bufNr . 'buffer'
+  endif
+  if a:height < 0
+    only
+  endif
+  setlocal buflisted noswapfile bufhidden=delete modifiable noreadonly buftype=nofile
+  let &l:filetype = a:filetype
+  silent file `=a:bufname`
+  call setline(1, a:lines)
+  setlocal nomodified
+  augroup L9TempBuffer
+    autocmd! * <buffer>
+    execute printf('autocmd BufDelete   <buffer>        call s:onBufDelete  (%s)', string(a:bufname))
+    execute printf('autocmd BufWriteCmd <buffer> nested call s:onBufWriteCmd(%s)', string(a:bufname))
+  augroup END
+  let s:dataMap[a:bufname] = {
+        \   'bufNr': bufnr('%'),
+        \   'written': 0,
+        \   'listener': a:listener,
+        \ }
+endfunction
+
+"
+function l9#tempbuffer#openReadOnly(bufname, filetype, lines, topleft, vertical, height, listener)
+  call l9#tempbuffer#openScratch(a:bufname, a:filetype, a:lines, a:topleft, a:vertical, a:height, a:listener)
+  setlocal nomodifiable readonly
+endfunction
+
+" a:listener:
+"   a:listener.onClose(written)
+"   a:listener.onWrite(lines)
+function l9#tempbuffer#openWritable(bufname, filetype, lines, topleft, vertical, height, listener)
+  call l9#tempbuffer#openScratch(a:bufname, a:filetype, a:lines, a:topleft, a:vertical, a:height, a:listener)
+  setlocal buftype=acwrite
+endfunction
+
+" makes specified temp buffer current.
+function l9#tempbuffer#moveTo(bufname)
+  return l9#moveToBufferWindowInCurrentTabpage(s:dataMap[a:bufname].bufNr) ||
+        \ l9#moveToBufferWindowInOtherTabpage(s:dataMap[a:bufname].bufNr)
+endfunction
+
+"
+function l9#tempbuffer#close(bufname)
+  if !l9#tempbuffer#isOpen(a:bufname)
+    return
+  endif
+  execute printf('%dbdelete!', s:dataMap[a:bufname].bufNr)
+endfunction
+
+"
+function l9#tempbuffer#isOpen(bufname)
+  return exists('s:dataMap[a:bufname]') && bufloaded(s:dataMap[a:bufname].bufNr)
+endfunction
+
+" }}}1
+"=============================================================================
+" vim: set fdm=marker:
+