112 lines
4.2 KiB
VimL
112 lines
4.2 KiB
VimL
|
" Vim global plugin for automating response to swapfiles
|
||
|
|
" Maintainer: Damian Conway
|
||
|
|
" License: This file is placed in the public domain.
|
||
|
|
|
||
|
|
"#############################################################
|
||
|
|
"## ##
|
||
|
|
"## Note that this plugin only works for Vim sessions ##
|
||
|
|
"## running in Terminal on MacOS X. And only if your ##
|
||
|
|
"## Vim configuration includes: ##
|
||
|
|
"## ##
|
||
|
|
"## set title titlestring= ##
|
||
|
|
"## ##
|
||
|
|
"## See below for the two functions that would have to be ##
|
||
|
|
"## rewritten to port this plugin to other OS's. ##
|
||
|
|
"## ##
|
||
|
|
"#############################################################
|
||
|
|
|
||
|
|
|
||
|
|
" If already loaded, we're done...
|
||
|
|
if exists("loaded_autoswap_mac")
|
||
|
|
finish
|
||
|
|
endif
|
||
|
|
let loaded_autoswap_mac = 1
|
||
|
|
|
||
|
|
" Preserve external compatibility options, then enable full vim compatibility...
|
||
|
|
let s:save_cpo = &cpo
|
||
|
|
set cpo&vim
|
||
|
|
|
||
|
|
" Invoke the behaviour whenever a swapfile is detected...
|
||
|
|
"
|
||
|
|
augroup AutoSwap_Mac
|
||
|
|
autocmd!
|
||
|
|
autocmd SwapExists * call AS_M_HandleSwapfile(expand('<afile>:p'))
|
||
|
|
augroup END
|
||
|
|
|
||
|
|
|
||
|
|
" The automatic behaviour...
|
||
|
|
"
|
||
|
|
function! AS_M_HandleSwapfile (filename)
|
||
|
|
|
||
|
|
" Is file already open in another Vim session in some other Terminal window???
|
||
|
|
let active_window = AS_M_DetectActiveWindow(a:filename)
|
||
|
|
|
||
|
|
" If so, go there instead and terminate this attempt to open the file...
|
||
|
|
if (strlen(active_window) > 0)
|
||
|
|
call AS_M_DelayedMsg('Switched to existing session in another window')
|
||
|
|
call AS_M_SwitchToActiveWindow(active_window)
|
||
|
|
let v:swapchoice = 'q'
|
||
|
|
|
||
|
|
" Otherwise, if swapfile is older than file itself, just get rid of it...
|
||
|
|
elseif getftime(v:swapname) < getftime(a:filename)
|
||
|
|
call AS_M_DelayedMsg("Old swapfile detected...and deleted")
|
||
|
|
call delete(v:swapname)
|
||
|
|
let v:swapchoice = 'e'
|
||
|
|
|
||
|
|
" Otherwise, open file read-only...
|
||
|
|
else
|
||
|
|
call AS_M_DelayedMsg("Swapfile detected...opening read-only")
|
||
|
|
let v:swapchoice = 'o'
|
||
|
|
endif
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
|
||
|
|
" Print a message after the autocommand completes
|
||
|
|
" (so you can see it, but don't have to hit <ENTER> to continue)...
|
||
|
|
"
|
||
|
|
function! AS_M_DelayedMsg (msg)
|
||
|
|
" A sneaky way of injecting a message when swapping into the new buffer...
|
||
|
|
augroup AutoSwap_Mac_Msg
|
||
|
|
autocmd!
|
||
|
|
" Print the message on finally entering the buffer...
|
||
|
|
autocmd BufWinEnter * echohl WarningMsg
|
||
|
|
exec 'autocmd BufWinEnter * echon "\r'.printf("%-60s", a:msg).'"'
|
||
|
|
autocmd BufWinEnter * echohl NONE
|
||
|
|
|
||
|
|
" And then remove these autocmds, so it's a "one-shot" deal...
|
||
|
|
autocmd BufWinEnter * augroup AutoSwap_Mac_Msg
|
||
|
|
autocmd BufWinEnter * autocmd!
|
||
|
|
autocmd BufWinEnter * augroup END
|
||
|
|
augroup END
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
|
||
|
|
"#################################################################
|
||
|
|
"## ##
|
||
|
|
"## Rewrite the following two functions to port this plugin ##
|
||
|
|
"## to other operating systems. ##
|
||
|
|
"## ##
|
||
|
|
"#################################################################
|
||
|
|
|
||
|
|
" Return an identifier for a terminal window already editing the named file
|
||
|
|
" (Should either return a string identifying the active window,
|
||
|
|
" or else return an empty string to indicate "no active window")...
|
||
|
|
"
|
||
|
|
function! AS_M_DetectActiveWindow (filename)
|
||
|
|
let shortname = fnamemodify(a:filename,":t")
|
||
|
|
let active_window = system('osascript -e ''tell application "Terminal" to every window whose (name begins with "'.shortname.' " and name ends with "VIM")''')
|
||
|
|
let active_window = substitute(active_window, '^window id \d\+\zs\_.*', '', '')
|
||
|
|
return (active_window =~ 'window' ? active_window : "")
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
|
||
|
|
" Switch to terminal window specified...
|
||
|
|
"
|
||
|
|
function! AS_M_SwitchToActiveWindow (active_window)
|
||
|
|
call system('osascript -e ''tell application "VIM" to set frontmost of '.a:active_window.' to true''')
|
||
|
|
endfunction
|
||
|
|
|
||
|
|
|
||
|
|
" Restore previous external compatibility options
|
||
|
|
let &cpo = s:save_cpo
|