"=============================================================================
" foldsearch.vim --- Fold search support in SpaceVim
" Copyright (c) 2016-2023 Wang Shidong & Contributors
" Author: Wang Shidong < wsdjeg@outlook.com >
" URL: https://spacevim.org
" License: GPLv3
"=============================================================================


""
" @section foldsearch, layers-foldsearch
" @parentsection layers
" `foldsearch` layer provides key bindings to searching text and fold
" searching results. This layer is not enabled by default, to enable this
" layer, add following code to your configuration file:
" >
"   [[layers]]
"     name = 'foldsearch'
" <
" @subsection Key bindings
"
" The following key bindings will be definded when the `foldsearch` layer is
" loaded.
" >
"   Key Binding   Description
"   SPC F w       searching with input word
"   SPC F W       searching with cursor word
"   SPC F p       searching with regexp
"   SPC F e       end foldsearch
" <

if exists('s:filename')
  " because this script will be loaded twice. This is the feature of vim,
  " when call an autoload func, vim will try to load the script again
  finish
endif

function! SpaceVim#layers#foldsearch#health() abort
  call SpaceVim#layers#foldsearch#config()
  return 1
endfunction

function! SpaceVim#layers#foldsearch#plugins() abort

  return []

endfunction

function! SpaceVim#layers#foldsearch#set_variable(var) abort

  

endfunction

function! SpaceVim#layers#foldsearch#get_options() abort

  return []

endfunction

function! SpaceVim#layers#foldsearch#loadable() abort

  return 1

endfunction

let s:filename = expand('<sfile>:~')
let s:lnum = expand('<slnum>') + 2
function! SpaceVim#layers#foldsearch#config()

  let g:_spacevim_mappings_space.F = {'name' : '+Foldsearch'}
  let lnum = expand('<slnum>') + s:lnum - 1
  call SpaceVim#mapping#space#def('nnoremap', ['F', 'w'], 'call call('
        \ . string(s:_function('s:foldsearch_word')) . ', [])',
        \ ['foldsearch-word',
        \ [
        \ 'SPC F w is to foldsearch input word',
        \ '',
        \ 'Definition: ' . s:filename . ':' . lnum,
        \ ]
        \ ],
        \ 1)
  let lnum = expand('<slnum>') + s:lnum - 1
  call SpaceVim#mapping#space#def('nnoremap', ['F', 'W'], 'call call('
        \ . string(s:_function('s:foldsearch_cursor')) . ', [])',
        \ ['foldsearch-cword',
        \ [
        \ 'SPC F W is to foldsearch cursor word',
        \ '',
        \ 'Definition: ' . s:filename . ':' . lnum,
        \ ]
        \ ],
        \ 1)
  let lnum = expand('<slnum>') + s:lnum - 1
  call SpaceVim#mapping#space#def('nnoremap', ['F', 'p'], 'call call('
        \ . string(s:_function('s:foldsearch_expr')) . ', [])',
        \ ['foldsearch-regexp',
        \ [
        \ 'SPC F p is to foldsearch regexp',
        \ '',
        \ 'Definition: ' . s:filename . ':' . lnum,
        \ ]
        \ ],
        \ 1)
  let lnum = expand('<slnum>') + s:lnum - 1
  call SpaceVim#mapping#space#def('nnoremap', ['F', 'e'],
        \ 'call SpaceVim#plugins#foldsearch#end()',
        \ ['end foldsearch',
        \ [
        \ 'SPC F e is to end foldsearch',
        \ '',
        \ 'Definition: ' . s:filename . ':' . lnum,
        \ ]
        \ ],
        \ 1)
endfunction

function! s:foldsearch_word() abort
  let word = input('foldsearch word >')
  if !empty(word)
    call SpaceVim#plugins#foldsearch#word(word)
  endif
endfunction

function! s:foldsearch_cursor() abort
  let word = expand('<cword>')
  if !empty(word)
    call SpaceVim#plugins#foldsearch#word(word)
  endif
endfunction

function! s:foldsearch_expr() abort
  let word = input('foldsearch expr >')
  if !empty(word)
    call SpaceVim#plugins#foldsearch#expr(word)
  endif
endfunction

" function() wrapper
if v:version > 703 || v:version == 703 && has('patch1170')
  function! s:_function(fstr) abort
    return function(a:fstr)
  endfunction
else
  function! s:_SID() abort
    return matchstr(expand('<sfile>'), '<SNR>\zs\d\+\ze__SID$')
  endfunction
  let s:_s = '<SNR>' . s:_SID() . '_'
  function! s:_function(fstr) abort
    return function(substitute(a:fstr, 's:', s:_s, 'g'))
  endfunction
endif
" vim:set et sw=2 cc=80: