-function! s:NM_cmd_show_mkfolds()
- let msg_start = -1
- let hdr_start = -1
- let bdy_start = -1
- let prt_start = -1
- let modetype = ''
- let modeline = -1
- let lnum = 1
- let b:nm_fold_data = {}
- while lnum <= line('$')
- let line = getline(lnum)
- if match(line, s:notmuch_show_message_begin_regexp) != -1
- let msg_start = lnum
- elseif match(line, s:notmuch_show_message_end_regexp) != -1
- exec printf('%d,%dfold', msg_start, lnum)
- exec printf('%dfoldopen', msg_start)
- let b:nm_fold_data[msg_start] = ['msg', getline(msg_start)]
-
- elseif match(line, s:notmuch_show_header_begin_regexp) != -1
- let hdr_start = lnum
- elseif match(line, s:notmuch_show_header_end_regexp) != -1
- exec printf('%d,%dfold', hdr_start, lnum)
- exec printf('%dfoldclose', hdr_start)
- let b:nm_fold_data[hdr_start] = ['hdr', '* ' . getline(hdr_start+1) . ' [ Press "h" for full header. ]']
-
- elseif match(line, s:notmuch_show_body_begin_regexp) != -1
- let bdy_start = lnum
- elseif match(line, s:notmuch_show_body_end_regexp) != -1
- exec printf('%d,%dfold', bdy_start, lnum)
- exec printf('%dfoldopen', bdy_start)
- let b:nm_fold_data[bdy_start] = ['bdy', getline(bdy_start)]
-
- elseif match(line, s:notmuch_show_part_begin_regexp) != -1
- let prt_start = lnum
- elseif match(line, s:notmuch_show_part_end_regexp) != -1
- exec printf('%d,%dfold', prt_start, lnum)
- exec printf('%dfoldopen', prt_start)
- let b:nm_fold_data[msg_start] = ['msg', getline(prt_start)]
-
- elseif modetype == ''
- if match(line, s:notmuch_show_signature_regexp) != -1
- let modetype = 'sig'
- let modeline = lnum
- elseif match(line, s:notmuch_show_citation_regexp) != -1
- let modetype = 'cit'
- let modeline = lnum
+" s:NM_cmd_show_parse returns the following dictionary:
+" 'disp': lines to display
+" 'msgs': message info dicts { start, end, id, depth, filename, descr, header }
+" 'folds': fold info arrays [ type, start, end ]
+" 'foldtext': fold text indexed by start line
+function! s:NM_cmd_show_parse(inlines)
+ let info = { 'disp': [],
+ \ 'msgs': [],
+ \ 'folds': [],
+ \ 'foldtext': {} }
+ let msg = {}
+ let hdr = {}
+
+ let in_message = 0
+ let in_header = 0
+ let in_body = 0
+ let in_part = 0
+
+ let body_start = -1
+
+ let mode_type = ''
+ let mode_start = -1
+
+ let inlnum = 0
+ for line in a:inlines
+ let inlnum = inlnum + 1
+ let foldinfo = []
+
+ if in_part
+ if match(line, s:notmuch_show_part_end_regexp) != -1
+ call add(info['disp'], '')
+ let in_part = 0
+ else
+ call add(info['disp'], line)
+ end
+
+ if in_part && mode_type == ''
+ if match(line, s:notmuch_show_signature_regexp) != -1
+ let mode_type = 'sig'
+ let mode_start = len(info['disp'])
+ "echoe 'TYPE: ' . mode_type . ' @' . mode_start
+ elseif match(line, s:notmuch_show_citation_regexp) != -1
+ let mode_type = 'cit'
+ let mode_start = len(info['disp'])
+ "echoe 'TYPE: ' . mode_type . ' @' . mode_start
+ endif
+ elseif mode_type == 'cit'
+ if !in_part || match(line, s:notmuch_show_citation_regexp) == -1
+ let outlnum = len(info['disp'])
+ let foldinfo = [ mode_type, mode_start, outlnum,
+ \ printf('[ %d-line citation. Press "c" to show. ]', outlnum - mode_start) ]
+ let mode_type = ''
+ endif
+ elseif mode_type == 'sig'
+ let outlnum = len(info['disp'])
+ if (outlnum - mode_start) > s:notmuch_show_signature_lines_max
+ let mode_type = ''
+ elseif !in_part
+ let outlnum = outlnum - 1
+ let foldinfo = [ mode_type, mode_start, outlnum,
+ \ printf('[ %d-line signature. Press "s" to show. ]', outlnum - mode_start) ]
+ let mode_type = ''
+ endif
+ endif
+
+ elseif in_body
+ if match(line, s:notmuch_show_body_end_regexp) != -1
+ let body_end = len(info['disp'])
+ let foldinfo = [ 'body', body_start, body_end,
+ \ printf('[ BODY %d - %d lines ]', len(info['msgs']), body_end - body_start) ]
+
+ let in_body = 0
+
+ elseif match(line, s:notmuch_show_part_begin_regexp) != -1
+ let in_part = 1
+ let m = matchlist(line, 'ID: \(\d\+\), Content-type: \(\S\+\)')
+ if len(m)
+ call add(info['disp'],
+ \ printf('--- part %d --- %s ---', m[1], m[2]))
+ endif
+ endif
+
+ elseif in_header
+ if in_header == 1
+ let msg['descr'] = line
+ call add(info['disp'], line)
+ let in_header = 2
+
+ else
+ if match(line, s:notmuch_show_header_end_regexp) != -1
+ let msg['header'] = hdr
+ let in_header = 0
+ let hdr = {}
+ else
+ let m = matchlist(line, '^\(\w\+\):\s*\(.*\)$')
+ if len(m)
+ let hdr[m[1]] = m[2]
+ if match(s:notmuch_show_headers, m[1]) != -1
+ call add(info['disp'], line)
+ endif
+ endif
+ endif