function! Genki_yaml_load_with_cache(filename)
  let l:cachedir = expand('~/.vim/cache/yaml')
  if !isdirectory(l:cachedir) | call mkdir(l:cachedir, 'p') | endif
  let l:cachefile = l:cachedir . '/' . substitute(expand(a:filename), '/', '+', 'g') . '.vim'
  if filereadable(l:cachefile) && getftime(a:filename) <= getftime(l:cachefile)
    return eval(join(readfile(l:cachefile), "\n"))
  endif

  ruby << EOF
  require 'yaml'
  obj = YAML.load_file(File.expand_path(VIM::evaluate('a:filename')))
  obj_hash = obj.inspect.gsub('=>', ':').gsub('nil', '{}')
  VIM::command("let l:ret = #{obj_hash}")
EOF

  call writefile([string(l:ret)], l:cachefile)
  return l:ret
endfunction

function! Genki_yaml_write(filename, obj)
  ruby << EOF
  require 'yaml'
  obj =  VIM::evaluate('a:obj')
  fname = File.expand_path(VIM::evaluate('a:filename'))
  File.write(File.expand_path(VIM::evaluate('a:filename')), obj.to_yaml)
EOF
endfunction

" Make it possible to issue AlterCommand before vim-altercmd is sourced
function! Genki_altercmd(args)
  execute 'autocmd User sourced_vim-altercmd AlterCommand' a:args
endfunction

" Set tabstop, softtabstop and shiftwidth to the same value
function! Genki_set_taboptions()
  let l:tabstop = 1 * input('set tabstop = softtabstop = shiftwidth = ')
  if l:tabstop > 0
    let &l:sts = l:tabstop
    let &l:ts = l:tabstop
    let &l:sw = l:tabstop
    " do we want expandtab as well?
    let &l:expandtab = confirm('set expandtab?', "&No\n&Yes") - 1
  endif
  call Genki_summarize_tabs()
endfunction

function! Genki_summarize_tabs()
  try
    echohl ModeMsg
    echon 'tabstop='.&l:ts
    echon ' shiftwidth='.&l:sw
    echon ' softtabstop='.&l:sts
    if &l:et
      echon ' expandtab'
    else
      echon ' noexpandtab'
    endif
  finally
    echohl None
  endtry
endfunction

" Quick access to Google
function! Genki_google(query)
  NeoBundleSource open-browser.vim
  let l:query = a:query
  " if in vim-ref (type query again? No thanks.)
  if exists("b:ref_history")
    let l:query = b:ref_history[b:ref_history_pos][1] . " " . l:query
  endif
  call openbrowser#search(l:query)
endfunction

function! Genki_char2tmux(char)
  let keymap = {
        \ 13 : "Enter",
        \ 32 : "Space",
        \ 27 : "Escape",
        \ }
  return get(keymap, a:char, nr2char(a:char))
endfunction

function! Vypass__create_buffer()
  tabnew

  setlocal buftype=nofile
  setlocal noswapfile
  setlocal noreadonly
  setlocal nowrap
  setlocal nospell
  setlocal bufhidden=hide
  setlocal nolist
  setlocal foldcolumn=0
  setlocal nofoldenable
  setlocal nowrap

  nnoremap <buffer> <silent> <CR> :SlimeSend<CR>
  vnoremap <buffer> <silent> <CR> :SlimeSend<CR>
  inoremap <buffer> <silent> <CR> <Esc>:SlimeSend<CR>o
  nnoremap <buffer> <silent> <nowait> <Leader> :<C-u>call VimuxSendKeys(Genki_char2tmux(getchar()))<CR>
  inoremap <buffer> <silent> <expr> <nowait> <Leader> getline('.')=='' ? '<ESC>:call VimuxSendKeysWithGetcharWithCallback("startinsert")<CR>' : ','

  " Save
  let save_dir = expand('~/.vimtunnel')
  if !isdirectory(save_dir)
    call mkdir(save_dir)
  endif
  let b:save_file = save_dir . '/' . strftime('%Y-%m-%d') . '.' . getpid()
  autocmd QuitPre <buffer> execute 'write' b:save_file
endfunction

function! Vypass__configure_tmux(command)
  call VimuxRunCommand(a:command)

  let b:slime_config = {}
  let b:slime_config['socket_name'] = 'default'
  if g:VimuxRunnerIndex =~# '\d\.\d'
    let b:slime_config['target_pane'] = ':' . g:VimuxRunnerIndex
  else
    let b:slime_config['target_pane'] = ':.' . g:VimuxRunnerIndex
  endif
endfunction

function! Vypass__check_dependencies()
  if !exists('*VimuxRunCommand') || !exists(':SlimeConfig')
    return 0
  endif
  return 1
endfunction

function! Vypass__start(command)
  NeoBundleSource vimux
  NeoBundleSource vim-slime

  if !Vypass__check_dependencies()
    echoerr 'Please install benmills/vimux and jpalardy/vim-slime'
    return 0
  endif

  call Vypass__create_buffer()
  call Vypass__configure_tmux(a:command)
  startinsert
endfunction

function! Genki_dump_variable(var_name)
  NeoBundleSource vim-prettyprint
  redir => var_content
  execute "PrettyPrint" a:var_name
  redir END
  " use split to eliminate null characters (^@) in var_content:
  " http://stackoverflow.com/questions/2573021/how-to-redirect-ex-command-output-into-current-buffer-or-file
  call append('.', split(var_content, "\n"))
endfunction

function! Genki_follow_symlink(...)
  let fname = fnameescape(a:0 ? a:1 : expand('%'))
  if getftype(fname) == 'link'
    bwipeout #
    exec 'silent! edit ' . fnameescape(fnamemodify(resolve(fname), ':p'))
  endif
endfunction

function! Genki_chmod(mode, file)
  execute "silent !chmod" a:mode a:file
endfunction

function! Genki_timeat(time)
  if !exists("*strftime")
    return ""
  endif
  let ts = str2nr(strpart(a:time, 0, 10))
  return strftime("%Y-%m-%d %T", ts)
endfunction