摺疊::Vim進階索引[2]

3 expr規則

expr要比前面的幾種方式複雜點所以我們在這裡單獨討論。使用expr時，我們需要對一設定項進行設定——`foldexpr‘。它是用來儲存我們設定的表示式，也就是我們指定的計算摺疊層級的公式。我們將設定項設為特定的表示式 -> 然後Vim透過`foldexpr‘這個項得到我們所指定的表示式 -> Vim逐行處理，並對每一行使用這個表示式計算出一個數值。這個數值就是該行的摺疊層級 -> 根據層級進行摺疊。舉個例子：假設我們在Vim中使用瞭如下命令：

:set foldmethod=expr
:set foldexpr=1

所有的行都會被摺疊（如果沒有的話再輸入指令`zM‘）。Vim在每一行用foldexpr指定的表示式計算結果。這個例子中我們的表示式是1，所以每行得到的摺疊層級都是1，於是所有行摺疊成一行。同理如果你將它賦於2的話則所有行的摺疊層級為2，所有行被摺疊成一行。當我們的表示式最後返回一個數值時這個數值就是摺疊層級。為了讓這表示式更靈活，更能滿足我們的需要我們需要補足一些Vim指令碼知識³，這裡是三個在摺疊的表示式比較常用幾點：

`v:lnum‘

內建變數，表示是“當前行的行號”。:help v:var檢視更多內建變數。

`getline()‘

函式用以返回指定行的內容。

`?:‘

三元條件語句。見:help expr1

另外如果需要構造複雜的表示式，我們可以在自定義的函式中定義。但這又是另一篇教程了。
看一下現在我們能構造出怎麼樣的表示式：

:set foldexpr=v:lnum

指定每行的行號為摺疊層級，這樣所有行會摺疊成一行。試試看用指令`zo‘逐層開啟摺疊，開啟20層之後就沒有摺疊了——而不是我們想的“巢狀數＝行數”。這是因為Vim對摺疊的巢狀數是有限制的，預設最深可以20層。但我們可以用foldnestmax這個項來進行自定義設定，如`set foldnestmax=10‘。
注意：Vim最多支援20層的巢狀，所以設定超過20的值會被當成20。

將第8至第20行摺疊。也就是讓expr在第8至20行時返回數值1（也可以是2、3、4……），其他時候為0。我們知道Vim是逐行處理的，所以如果我們知道Vim正在處理的行的行號我們就可以進行比較了。當然你已經知道了，我們需要的就是`v:lnum‘：

v:lnum>=8&&v:lnum<=20?1:0
v:lnum>=8 && v:lnum<=20 ? 1:0

下面是用expr規則模擬indent規則的例子。基本上沒有任何實用價值，但至少能讓我們又expr的強大有個認識：

" source this.vim
set foldmethod=expr
set foldexpr=Myindent(v:lnum)
" 用expr模擬indent規則
func! Myindent(lnum)
" 用indent()函式得到當前縮排
let s:idt=indent(a:lnum)
" 用&運算子得到一個設定項shiftwidth的值
let s:sw=&shiftwidth
" 如果有縮排寬度超過閾值(shiftwidth)
if s:idt>=s:sw
   " 則計算摺疊層級
   return (s:idt-s:idt%s:sw)/s:sw
else
   return 0
endf

除了可以向foldexpr返回數值外還可以返回一些特殊的值，分別是=, a, s, （詳細說明見`:help fold-expr‘，這裡不現重複）。Vim的文件不推薦使用=, a, s。
這裡再給兩個簡單的例子：

" 如果一行以@samp{#}開始，摺疊。
:set foldexpr=getline(v:lnum)=~/^#/?1:0

" 以每5行為一組摺疊
set v:lnum%5-1?1:'>1'

《感遇其一》
作者：張九齡
蘭葉春葳蕤，桂華秋皎潔。
欣欣此生意，自爾為佳節。
誰知林棲者，聞風坐相悅。
草木有本心，何求美人折？
	
《感遇其二》
作者：張九齡
江南有丹桔，經冬猶綠林。
豈伊地氣暖，自有歲寒心。
可以薦佳客，奈何阻重深。
運命唯所遇，迴圈不可尋。
徒言樹桃李，此木豈無陰。
	
《下終南山過斛斯山人宿置酒》
作者：李白
暮從碧山下，山月隨人歸。
卻顧所來徑，蒼蒼橫翠微。
相攜及田家，童稚開荊扉。
綠竹入幽徑，青蘿拂行衣。
歡言得所憩，美酒聊共揮。
長歌吟松風，曲盡河星稀。
我醉君復樂，陶然共忘機。

" 用getline(v:lnum)得到當前行
" 用正規表示式@samp{.}判斷當前行是否含有文字。
set foldexpr=getline(v:lnum)=~'.'?1:0

" 想顯示詩人？
set foldtext=foldtext().v:folddashes.getline(v:foldstart+1)

vim: ro: fdm=expr: fde=getline(v:lnum)=~'.'?1:0: foldtext=foldtext().v:folddashes.getline(v:foldstart+1): foldcolumn=2

:folddoclosed .w! >>筆記.txt

Received: from sino.cmm (unknown [202.108.xx.230])
Received: (qmail 25748 invoked by uid 99); 30 Dec 2004 04:42:47 -0000
Message-ID: <200412300xxx47.25xxx.qmail@sino.cmm>
From: chxxxx 
To: hqxxe@123.cmm
Subject: RE: XX報告
MIME-Version: 1.0
Date: Thu, 30 Dec 2004 12:42:47 +0800
X-Priority: 3
	
hqxxe：
	
    你的報告已經收到,謝謝!
	
                                      陳
	
----- Original Message -----
> ………………
> blah blah
>> blah blah
>> blah blah

" 根據郵件的字尾名進行相關的設定。如果開啟的檔案字尾名是'.eml'，則當成郵件處理。
autocmd! BufReadPre *.eml se fdm=expr fde=v:lnum==1?1:getline(v:lnum)=~'^$'?0:'=' fdt=Mailfdt(v:foldstart,v:foldend) ft=mail | syn on
	
" 定義函式，用來返回摺疊的標題。
" 以摺疊的第一和最後一行的行號為引數
func! Mailfdt(fst,fen)
 let fst=a:fst
 " 儲存郵件的標題和發信人
 let hfrom=''
 let hsub=''
 let tline=''
 while a:fen!=fst
    let tline=getline(fst)
    " 判斷當前行是否是我們感興趣的行
    " 如果是則儲存
    if tline=~'^From: '
       let hfrom=tline
    elseif tline=~'^Subject: '
       let hsub=tline
    endif
    let fst=fst+1
 endwhile
" 返回相關資訊
if strlen(hfrom) || strlen(hsub)
    return hsub . "ttt" . hfrom
else
    return getline(a:fst)
endif
endfunc