1071d4279SBram Moolenaar" Vim indent file 2071d4279SBram Moolenaar" Language: Python 3071d4279SBram Moolenaar" Maintainer: Bram Moolenaar <[email protected]> 4071d4279SBram Moolenaar" Original Author: David Bustos <[email protected]> 5*5eb86f91SBram Moolenaar" Last Change: 2004 Jul 25 6071d4279SBram Moolenaar 7071d4279SBram Moolenaar" Only load this indent file when no other was loaded. 8071d4279SBram Moolenaarif exists("b:did_indent") 9071d4279SBram Moolenaar finish 10071d4279SBram Moolenaarendif 11071d4279SBram Moolenaarlet b:did_indent = 1 12071d4279SBram Moolenaar 13071d4279SBram Moolenaar" Some preliminary settings 14071d4279SBram Moolenaarsetlocal nolisp " Make sure lisp indenting doesn't supersede us 15071d4279SBram Moolenaarsetlocal autoindent " indentexpr isn't much help otherwise 16071d4279SBram Moolenaar 17071d4279SBram Moolenaarsetlocal indentexpr=GetPythonIndent(v:lnum) 18071d4279SBram Moolenaarsetlocal indentkeys+=<:>,=elif,=except 19071d4279SBram Moolenaar 20071d4279SBram Moolenaar" Only define the function once. 21071d4279SBram Moolenaarif exists("*GetPythonIndent") 22071d4279SBram Moolenaar finish 23071d4279SBram Moolenaarendif 24071d4279SBram Moolenaar 25071d4279SBram Moolenaarlet s:maxoff = 50 " maximum number of lines to look backwards for () 26071d4279SBram Moolenaar 27071d4279SBram Moolenaarfunction GetPythonIndent(lnum) 28071d4279SBram Moolenaar " If this line is explicitly joined: If the previous line was also joined, 29071d4279SBram Moolenaar " line it up with that one, otherwise add two 'shiftwidth' 30071d4279SBram Moolenaar if getline(a:lnum - 1) =~ '\\$' 31071d4279SBram Moolenaar if a:lnum > 1 && getline(a:lnum - 2) =~ '\\$' 32071d4279SBram Moolenaar return indent(a:lnum - 1) 33071d4279SBram Moolenaar endif 34071d4279SBram Moolenaar return indent(a:lnum - 1) + (&sw * 2) 35071d4279SBram Moolenaar endif 36071d4279SBram Moolenaar 37071d4279SBram Moolenaar " If the start of the line is in a string don't change the indent. 38071d4279SBram Moolenaar if has('syntax_items') 39ed20346fSBram Moolenaar \ && synIDattr(synID(a:lnum, 1, 1), "name") =~ "String$" 40071d4279SBram Moolenaar return -1 41071d4279SBram Moolenaar endif 42071d4279SBram Moolenaar 43071d4279SBram Moolenaar " Search backwards for the previous non-empty line. 44071d4279SBram Moolenaar let plnum = prevnonblank(v:lnum - 1) 45071d4279SBram Moolenaar 46071d4279SBram Moolenaar if plnum == 0 47071d4279SBram Moolenaar " This is the first non-empty line, use zero indent. 48071d4279SBram Moolenaar return 0 49071d4279SBram Moolenaar endif 50071d4279SBram Moolenaar 51071d4279SBram Moolenaar " If the previous line is inside parenthesis, use the indent of the starting 52071d4279SBram Moolenaar " line. 53071d4279SBram Moolenaar " Trick: use the non-existing "dummy" variable to break out of the loop when 54071d4279SBram Moolenaar " going too far back. 55071d4279SBram Moolenaar call cursor(plnum, 1) 56071d4279SBram Moolenaar let parlnum = searchpair('(', '', ')', 'nbW', 57071d4279SBram Moolenaar \ "line('.') < " . (plnum - s:maxoff) . " ? dummy :" 58071d4279SBram Moolenaar \ . " synIDattr(synID(line('.'), col('.'), 1), 'name')" 59ed20346fSBram Moolenaar \ . " =~ '\\(Comment\\|String\\)$'") 60071d4279SBram Moolenaar if parlnum > 0 61071d4279SBram Moolenaar let plindent = indent(parlnum) 62071d4279SBram Moolenaar let plnumstart = parlnum 63071d4279SBram Moolenaar else 64071d4279SBram Moolenaar let plindent = indent(plnum) 65071d4279SBram Moolenaar let plnumstart = plnum 66071d4279SBram Moolenaar endif 67071d4279SBram Moolenaar 68071d4279SBram Moolenaar 69071d4279SBram Moolenaar " When inside parenthesis: If at the first line below the parenthesis add 70071d4279SBram Moolenaar " two 'shiftwidth', otherwise same as previous line. 71071d4279SBram Moolenaar " i = (a 72071d4279SBram Moolenaar " + b 73071d4279SBram Moolenaar " + c) 74071d4279SBram Moolenaar call cursor(a:lnum, 1) 75071d4279SBram Moolenaar let p = searchpair('(', '', ')', 'bW', 76071d4279SBram Moolenaar \ "line('.') < " . (a:lnum - s:maxoff) . " ? dummy :" 77071d4279SBram Moolenaar \ . " synIDattr(synID(line('.'), col('.'), 1), 'name')" 78ed20346fSBram Moolenaar \ . " =~ '\\(Comment\\|String\\)$'") 79071d4279SBram Moolenaar if p > 0 80071d4279SBram Moolenaar if p == plnum 81071d4279SBram Moolenaar " When the start is inside parenthesis, only indent one 'shiftwidth'. 82071d4279SBram Moolenaar let pp = searchpair('(', '', ')', 'bW', 83071d4279SBram Moolenaar \ "line('.') < " . (a:lnum - s:maxoff) . " ? dummy :" 84071d4279SBram Moolenaar \ . " synIDattr(synID(line('.'), col('.'), 1), 'name')" 85ed20346fSBram Moolenaar \ . " =~ '\\(Comment\\|String\\)$'") 86071d4279SBram Moolenaar if pp > 0 87071d4279SBram Moolenaar return indent(plnum) + &sw 88071d4279SBram Moolenaar endif 89071d4279SBram Moolenaar return indent(plnum) + (&sw * 2) 90071d4279SBram Moolenaar endif 91071d4279SBram Moolenaar if plnumstart == p 92071d4279SBram Moolenaar return indent(plnum) 93071d4279SBram Moolenaar endif 94071d4279SBram Moolenaar return plindent 95071d4279SBram Moolenaar endif 96071d4279SBram Moolenaar 97071d4279SBram Moolenaar 98071d4279SBram Moolenaar " Get the line and remove a trailing comment. 99071d4279SBram Moolenaar " Use syntax highlighting attributes when possible. 100071d4279SBram Moolenaar let pline = getline(plnum) 101071d4279SBram Moolenaar let pline_len = strlen(pline) 102*5eb86f91SBram Moolenaar if has('syntax_items') 103*5eb86f91SBram Moolenaar " If the last character in the line is a comment, do a binary search for 104*5eb86f91SBram Moolenaar " the start of the comment. synID() is slow, a linear search would take 105*5eb86f91SBram Moolenaar " too long on a long line. 106*5eb86f91SBram Moolenaar if synIDattr(synID(plnum, pline_len, 1), "name") =~ "Comment$" 107*5eb86f91SBram Moolenaar let min = 1 108*5eb86f91SBram Moolenaar let max = pline_len 109*5eb86f91SBram Moolenaar while min < max 110*5eb86f91SBram Moolenaar let col = (min + max) / 2 111*5eb86f91SBram Moolenaar if synIDattr(synID(plnum, col, 1), "name") =~ "Comment$" 112*5eb86f91SBram Moolenaar let max = col 113*5eb86f91SBram Moolenaar else 114*5eb86f91SBram Moolenaar let min = col + 1 115*5eb86f91SBram Moolenaar endif 116*5eb86f91SBram Moolenaar endwhile 117*5eb86f91SBram Moolenaar echomsg min 118*5eb86f91SBram Moolenaar let pline = strpart(pline, 0, min - 1) 119*5eb86f91SBram Moolenaar echomsg pline 120*5eb86f91SBram Moolenaar sleep 1 121*5eb86f91SBram Moolenaar endif 122*5eb86f91SBram Moolenaar else 123071d4279SBram Moolenaar let col = 0 124071d4279SBram Moolenaar while col < pline_len 125*5eb86f91SBram Moolenaar if pline[col] == '#' 126071d4279SBram Moolenaar let pline = strpart(pline, 0, col) 127071d4279SBram Moolenaar break 128071d4279SBram Moolenaar endif 129071d4279SBram Moolenaar let col = col + 1 130071d4279SBram Moolenaar endwhile 131*5eb86f91SBram Moolenaar endif 132071d4279SBram Moolenaar 133071d4279SBram Moolenaar " If the previous line ended with a colon, indent this line 134071d4279SBram Moolenaar if pline =~ ':\s*$' 135071d4279SBram Moolenaar return plindent + &sw 136071d4279SBram Moolenaar endif 137071d4279SBram Moolenaar 138071d4279SBram Moolenaar " If the previous line was a stop-execution statement... 139071d4279SBram Moolenaar if getline(plnum) =~ '^\s*\(break\|continue\|raise\|return\)\>' 140071d4279SBram Moolenaar " See if the user has already dedented 141071d4279SBram Moolenaar if indent(a:lnum) > indent(plnum) - &sw 142071d4279SBram Moolenaar " If not, recommend one dedent 143071d4279SBram Moolenaar return indent(plnum) - &sw 144071d4279SBram Moolenaar endif 145071d4279SBram Moolenaar " Otherwise, trust the user 146071d4279SBram Moolenaar return -1 147071d4279SBram Moolenaar endif 148071d4279SBram Moolenaar 149071d4279SBram Moolenaar " If the current line begins with a keyword that lines up with "try" 150071d4279SBram Moolenaar if getline(a:lnum) =~ '^\s*\(except\|finally\)\>' 151071d4279SBram Moolenaar let lnum = a:lnum - 1 152071d4279SBram Moolenaar while lnum >= 1 153071d4279SBram Moolenaar echomsg 'got here' 154071d4279SBram Moolenaar if getline(lnum) =~ '^\s*\(try\|except\)\>' 155071d4279SBram Moolenaar let ind = indent(lnum) 156071d4279SBram Moolenaar echomsg 'got here, indent is ' . ind 157071d4279SBram Moolenaar if ind >= indent(a:lnum) 158071d4279SBram Moolenaar return -1 " indent is already less than this 159071d4279SBram Moolenaar endif 160071d4279SBram Moolenaar return ind " line up with previous try or except 161071d4279SBram Moolenaar endif 162071d4279SBram Moolenaar let lnum = lnum - 1 163071d4279SBram Moolenaar endwhile 164071d4279SBram Moolenaar echomsg 'got to the end' 165071d4279SBram Moolenaar return -1 " no matching "try"! 166071d4279SBram Moolenaar endif 167071d4279SBram Moolenaar 168071d4279SBram Moolenaar " If the current line begins with a header keyword, dedent 169071d4279SBram Moolenaar if getline(a:lnum) =~ '^\s*\(elif\|else\)\>' 170071d4279SBram Moolenaar 171071d4279SBram Moolenaar " Unless the previous line was a one-liner 172071d4279SBram Moolenaar if getline(plnumstart) =~ '^\s*\(for\|if\|try\)\>' 173071d4279SBram Moolenaar return plindent 174071d4279SBram Moolenaar endif 175071d4279SBram Moolenaar 176071d4279SBram Moolenaar " Or the user has already dedented 177071d4279SBram Moolenaar if indent(a:lnum) <= plindent - &sw 178071d4279SBram Moolenaar return -1 179071d4279SBram Moolenaar endif 180071d4279SBram Moolenaar 181071d4279SBram Moolenaar return plindent - &sw 182071d4279SBram Moolenaar endif 183071d4279SBram Moolenaar 184071d4279SBram Moolenaar " When after a () construct we probably want to go back to the start line. 185071d4279SBram Moolenaar " a = (b 186071d4279SBram Moolenaar " + c) 187071d4279SBram Moolenaar " here 188071d4279SBram Moolenaar if parlnum > 0 189071d4279SBram Moolenaar return plindent 190071d4279SBram Moolenaar endif 191071d4279SBram Moolenaar 192071d4279SBram Moolenaar return -1 193071d4279SBram Moolenaar 194071d4279SBram Moolenaarendfunction 195071d4279SBram Moolenaar 196071d4279SBram Moolenaar" vim:sw=2 197