snipt

Ctrl+h for KB shortcuts
#5653

VimL

findmate plugin for vim

"Name: findMate
"Author: Manuel  Aguilar y Victor Guardiola
"Version: 0.1
"Description: Este plugin es buscador de archivos en todo un arbol de
"dirctorios
"

function! FindMate(name)
 let l:_name = substitute(a:name, "\\s", "*", "g")
 let l:list=system("find . -iname '*".l:_name."*' -not -name \"*.class\" -and -not -name \"*.swp\" -and -not -name \".*\" | perl -ne 'print \"$.\\t$_\"'")
 let l:num=strlen(substitute(l:list, "[^\n]", "", "g"))
if l:num < 1
 echo "'".a:name."' not found"
 return
 endif

if l:num != 1
    echo l:list
    let l:input=input("Which ? (<enter>=nothing)\n")

    if strlen(l:input)==0
    return
    endif
    
    let items = split(l:input, ' ', 1)
    for item in items
       if strlen(substitute(l:item, "[0-9]", "", "g"))>0
       echo "Not a number"
       return
       endif
    
       if l:item<1 || l:item>l:num
       echo "Out of range"
       return
       endif
    
       let l:line=matchstr("\n".l:list, "\n".l:item."\t[^\n]*")
       let l:line=substitute(l:line, "^[^\t]*\t./", "", "")
    
       execute ":sp ".l:line
    endfor
else
    let l:line=substitute(l:list, "^[^\t]*\t./", "", "")
    execute ":sp ".l:line
endif
endfunction
command! -nargs=1 FindMate :call FindMate("<args>")
map ,, :FindMate 
https://snipt.net/embed/a55062d47600d83ad1bd6d713639070f/
https://snipt.net/raw/a55062d47600d83ad1bd6d713639070f/
a55062d47600d83ad1bd6d713639070f
vim
VimL
49
2014-04-16T18:18:40
True
False
/api/public/snipt/5653/
findmate-plugin-for-vim
<table class="highlighttable"><tr><td class="linenos"><div class="linenodiv"><pre><a href="#L-1"> 1</a> <a href="#L-2"> 2</a> <a href="#L-3"> 3</a> <a href="#L-4"> 4</a> <a href="#L-5"> 5</a> <a href="#L-6"> 6</a> <a href="#L-7"> 7</a> <a href="#L-8"> 8</a> <a href="#L-9"> 9</a> <a href="#L-10">10</a> <a href="#L-11">11</a> <a href="#L-12">12</a> <a href="#L-13">13</a> <a href="#L-14">14</a> <a href="#L-15">15</a> <a href="#L-16">16</a> <a href="#L-17">17</a> <a href="#L-18">18</a> <a href="#L-19">19</a> <a href="#L-20">20</a> <a href="#L-21">21</a> <a href="#L-22">22</a> <a href="#L-23">23</a> <a href="#L-24">24</a> <a href="#L-25">25</a> <a href="#L-26">26</a> <a href="#L-27">27</a> <a href="#L-28">28</a> <a href="#L-29">29</a> <a href="#L-30">30</a> <a href="#L-31">31</a> <a href="#L-32">32</a> <a href="#L-33">33</a> <a href="#L-34">34</a> <a href="#L-35">35</a> <a href="#L-36">36</a> <a href="#L-37">37</a> <a href="#L-38">38</a> <a href="#L-39">39</a> <a href="#L-40">40</a> <a href="#L-41">41</a> <a href="#L-42">42</a> <a href="#L-43">43</a> <a href="#L-44">44</a> <a href="#L-45">45</a> <a href="#L-46">46</a> <a href="#L-47">47</a> <a href="#L-48">48</a></pre></div></td><td class="code"><div class="highlight"><pre><span id="L-1"><a name="L-1"></a><span class="c">&quot;Name: findMate</span> </span><span id="L-2"><a name="L-2"></a><span class="c">&quot;Author: Manuel Aguilar y Victor Guardiola</span> </span><span id="L-3"><a name="L-3"></a><span class="c">&quot;Version: 0.1</span> </span><span id="L-4"><a name="L-4"></a><span class="c">&quot;Description: Este plugin es buscador de archivos en todo un arbol de</span> </span><span id="L-5"><a name="L-5"></a><span class="c">&quot;dirctorios</span> </span><span id="L-6"><a name="L-6"></a><span class="c">&quot;</span> </span><span id="L-7"><a name="L-7"></a> </span><span id="L-8"><a name="L-8"></a><span class="k">function</span><span class="p">!</span> FindMate<span class="p">(</span>name<span class="p">)</span> </span><span id="L-9"><a name="L-9"></a> <span class="k">let</span> <span class="k">l</span>:_name <span class="p">=</span> substitute<span class="p">(</span><span class="k">a</span>:name<span class="p">,</span> <span class="s2">&quot;\\s&quot;</span><span class="p">,</span> <span class="s2">&quot;*&quot;</span><span class="p">,</span> <span class="s2">&quot;g&quot;</span><span class="p">)</span> </span><span id="L-10"><a name="L-10"></a> <span class="k">let</span> <span class="k">l</span>:<span class="nb">list</span><span class="p">=</span>system<span class="p">(</span><span class="s2">&quot;find . -iname &#39;*&quot;</span>.<span class="k">l</span>:_name.<span class="s2">&quot;*&#39; -not -name \&quot;*.class\&quot; -and -not -name \&quot;*.swp\&quot; -and -not -name \&quot;.*\&quot; | perl -ne &#39;print \&quot;$.\\t$_\&quot;&#39;&quot;</span><span class="p">)</span> </span><span id="L-11"><a name="L-11"></a> <span class="k">let</span> <span class="k">l</span>:<span class="k">num</span><span class="p">=</span>strlen<span class="p">(</span>substitute<span class="p">(</span><span class="k">l</span>:<span class="nb">list</span><span class="p">,</span> <span class="s2">&quot;[^\n]&quot;</span><span class="p">,</span> <span class="s2">&quot;&quot;</span><span class="p">,</span> <span class="s2">&quot;g&quot;</span><span class="p">))</span> </span><span id="L-12"><a name="L-12"></a><span class="k">if</span> <span class="k">l</span>:<span class="k">num</span> <span class="p">&lt;</span> <span class="m">1</span> </span><span id="L-13"><a name="L-13"></a> echo <span class="s2">&quot;&#39;&quot;</span>.<span class="k">a</span>:name.<span class="s2">&quot;&#39; not found&quot;</span> </span><span id="L-14"><a name="L-14"></a> <span class="k">return</span> </span><span id="L-15"><a name="L-15"></a> <span class="k">endif</span> </span><span id="L-16"><a name="L-16"></a> </span><span id="L-17"><a name="L-17"></a><span class="k">if</span> <span class="k">l</span>:<span class="k">num</span> <span class="p">!=</span> <span class="m">1</span> </span><span id="L-18"><a name="L-18"></a> echo <span class="k">l</span>:<span class="nb">list</span> </span><span id="L-19"><a name="L-19"></a> <span class="k">let</span> <span class="k">l</span>:input<span class="p">=</span>input<span class="p">(</span><span class="s2">&quot;Which ? (&lt;enter&gt;=nothing)\n&quot;</span><span class="p">)</span> </span><span id="L-20"><a name="L-20"></a> </span><span id="L-21"><a name="L-21"></a> <span class="k">if</span> strlen<span class="p">(</span><span class="k">l</span>:input<span class="p">)==</span><span class="m">0</span> </span><span id="L-22"><a name="L-22"></a> <span class="k">return</span> </span><span id="L-23"><a name="L-23"></a> <span class="k">endif</span> </span><span id="L-24"><a name="L-24"></a> </span><span id="L-25"><a name="L-25"></a> <span class="k">let</span> items <span class="p">=</span> split<span class="p">(</span><span class="k">l</span>:input<span class="p">,</span> <span class="s1">&#39; &#39;</span><span class="p">,</span> <span class="m">1</span><span class="p">)</span> </span><span id="L-26"><a name="L-26"></a> <span class="k">for</span> item <span class="k">in</span> items </span><span id="L-27"><a name="L-27"></a> <span class="k">if</span> strlen<span class="p">(</span>substitute<span class="p">(</span><span class="k">l</span>:item<span class="p">,</span> <span class="s2">&quot;[0-9]&quot;</span><span class="p">,</span> <span class="s2">&quot;&quot;</span><span class="p">,</span> <span class="s2">&quot;g&quot;</span><span class="p">))&gt;</span><span class="m">0</span> </span><span id="L-28"><a name="L-28"></a> echo <span class="s2">&quot;Not a number&quot;</span> </span><span id="L-29"><a name="L-29"></a> <span class="k">return</span> </span><span id="L-30"><a name="L-30"></a> <span class="k">endif</span> </span><span id="L-31"><a name="L-31"></a> </span><span id="L-32"><a name="L-32"></a> <span class="k">if</span> <span class="k">l</span>:item<span class="p">&lt;</span><span class="m">1</span> <span class="p">||</span> <span class="k">l</span>:item<span class="p">&gt;</span><span class="k">l</span>:<span class="k">num</span> </span><span id="L-33"><a name="L-33"></a> echo <span class="s2">&quot;Out of range&quot;</span> </span><span id="L-34"><a name="L-34"></a> <span class="k">return</span> </span><span id="L-35"><a name="L-35"></a> <span class="k">endif</span> </span><span id="L-36"><a name="L-36"></a> </span><span id="L-37"><a name="L-37"></a> <span class="k">let</span> <span class="k">l</span>:line<span class="p">=</span>matchstr<span class="p">(</span><span class="s2">&quot;\n&quot;</span>.<span class="k">l</span>:<span class="nb">list</span><span class="p">,</span> <span class="s2">&quot;\n&quot;</span>.<span class="k">l</span>:item.<span class="s2">&quot;\t[^\n]*&quot;</span><span class="p">)</span> </span><span id="L-38"><a name="L-38"></a> <span class="k">let</span> <span class="k">l</span>:line<span class="p">=</span>substitute<span class="p">(</span><span class="k">l</span>:line<span class="p">,</span> <span class="s2">&quot;^[^\t]*\t./&quot;</span><span class="p">,</span> <span class="s2">&quot;&quot;</span><span class="p">,</span> <span class="s2">&quot;&quot;</span><span class="p">)</span> </span><span id="L-39"><a name="L-39"></a> </span><span id="L-40"><a name="L-40"></a> execute <span class="s2">&quot;:sp &quot;</span>.<span class="k">l</span>:line </span><span id="L-41"><a name="L-41"></a> <span class="k">endfor</span> </span><span id="L-42"><a name="L-42"></a><span class="k">else</span> </span><span id="L-43"><a name="L-43"></a> <span class="k">let</span> <span class="k">l</span>:line<span class="p">=</span>substitute<span class="p">(</span><span class="k">l</span>:<span class="nb">list</span><span class="p">,</span> <span class="s2">&quot;^[^\t]*\t./&quot;</span><span class="p">,</span> <span class="s2">&quot;&quot;</span><span class="p">,</span> <span class="s2">&quot;&quot;</span><span class="p">)</span> </span><span id="L-44"><a name="L-44"></a> execute <span class="s2">&quot;:sp &quot;</span>.<span class="k">l</span>:line </span><span id="L-45"><a name="L-45"></a><span class="k">endif</span> </span><span id="L-46"><a name="L-46"></a><span class="k">endfunction</span> </span><span id="L-47"><a name="L-47"></a>command<span class="p">!</span> <span class="p">-</span>nargs<span class="p">=</span><span class="m">1</span> FindMate :<span class="k">call</span> FindMate<span class="p">(</span><span class="s2">&quot;&lt;args&gt;&quot;</span><span class="p">)</span> </span><span id="L-48"><a name="L-48"></a>map <span class="p">,,</span> :FindMate </span></pre></div> </td></tr></table>
gvim, plugins, vim