annotate src/po/check.vim @ 2217:120502692d82 vim73

Improve the MS-Windows installer.
author Bram Moolenaar <bram@vim.org>
date Mon, 24 May 2010 21:34:22 +0200
parents 6ddd55ac6ce5
children e037ee8698b3
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
461
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
1 " Vim script for checking .po files.
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
2 "
1599
2f016b638c0c updated for version 7.1-312
vimboss
parents: 557
diff changeset
3 " Go through the file and verify that:
2f016b638c0c updated for version 7.1-312
vimboss
parents: 557
diff changeset
4 " - All %...s items in "msgid" are identical to the ones in "msgstr".
2f016b638c0c updated for version 7.1-312
vimboss
parents: 557
diff changeset
5 " - An error or warning code in "msgid" matches the one in "msgstr".
461
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
6
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
7 if 1 " Only execute this if the eval feature is available.
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
8
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
9 " Function to get a split line at the cursor.
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
10 " Used for both msgid and msgstr lines.
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
11 " Removes all text except % items and returns the result.
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
12 func! GetMline()
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
13 let idline = substitute(getline('.'), '"\(.*\)"$', '\1', '')
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
14 while line('.') < line('$')
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
15 +
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
16 let line = getline('.')
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
17 if line[0] != '"'
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
18 break
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
19 endif
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
20 let idline .= substitute(line, '"\(.*\)"$', '\1', '')
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
21 endwhile
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
22
557
862863033fdd updated for version 7.0158
vimboss
parents: 461
diff changeset
23 " remove '%', not used for formatting.
862863033fdd updated for version 7.0158
vimboss
parents: 461
diff changeset
24 let idline = substitute(idline, "'%'", '', 'g')
862863033fdd updated for version 7.0158
vimboss
parents: 461
diff changeset
25
1952
6ddd55ac6ce5 updated for version 7.2-249
vimboss
parents: 1599
diff changeset
26 " remove '%' used for plural forms.
6ddd55ac6ce5 updated for version 7.2-249
vimboss
parents: 1599
diff changeset
27 let idline = substitute(idline, '\\nPlural-Forms: .\+;\\n', '', '')
6ddd55ac6ce5 updated for version 7.2-249
vimboss
parents: 1599
diff changeset
28
461
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
29 " remove everything but % items.
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
30 return substitute(idline, '[^%]*\(%[-+ #''.0-9*]*l\=[dsuxXpoc%]\)\=', '\1', 'g')
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
31 endfunc
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
32
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
33 " Start at the first "msgid" line.
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
34 1
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
35 /^msgid
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
36 let startline = line('.')
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
37 let error = 0
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
38
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
39 while 1
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
40 if getline(line('.') - 1) !~ "no-c-format"
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
41 let fromline = GetMline()
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
42 if getline('.') !~ '^msgstr'
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
43 echo 'Missing "msgstr" in line ' . line('.')
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
44 let error = 1
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
45 endif
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
46 let toline = GetMline()
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
47 if fromline != toline
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
48 echo 'Mismatching % in line ' . (line('.') - 1)
557
862863033fdd updated for version 7.0158
vimboss
parents: 461
diff changeset
49 echo 'msgid: ' . fromline
862863033fdd updated for version 7.0158
vimboss
parents: 461
diff changeset
50 echo 'msgstr: ' . toline
461
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
51 let error = 1
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
52 endif
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
53 endif
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
54
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
55 " Find next msgid.
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
56 " Wrap around at the end of the file, quit when back at the first one.
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
57 /^msgid
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
58 if line('.') == startline
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
59 break
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
60 endif
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
61 endwhile
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
62
1599
2f016b638c0c updated for version 7.1-312
vimboss
parents: 557
diff changeset
63 " Check that error code in msgid matches the one in msgstr.
2f016b638c0c updated for version 7.1-312
vimboss
parents: 557
diff changeset
64 "
2f016b638c0c updated for version 7.1-312
vimboss
parents: 557
diff changeset
65 " Examples of mismatches found with msgid "E123: ..."
2f016b638c0c updated for version 7.1-312
vimboss
parents: 557
diff changeset
66 " - msgstr "E321: ..." error code mismatch
2f016b638c0c updated for version 7.1-312
vimboss
parents: 557
diff changeset
67 " - msgstr "W123: ..." warning instead of error
2f016b638c0c updated for version 7.1-312
vimboss
parents: 557
diff changeset
68 " - msgstr "E123 ..." missing colon
2f016b638c0c updated for version 7.1-312
vimboss
parents: 557
diff changeset
69 " - msgstr "..." missing error code
2f016b638c0c updated for version 7.1-312
vimboss
parents: 557
diff changeset
70 "
2f016b638c0c updated for version 7.1-312
vimboss
parents: 557
diff changeset
71 1
2f016b638c0c updated for version 7.1-312
vimboss
parents: 557
diff changeset
72 if search('msgid "\("\n"\)\?\([EW][0-9]\+:\).*\nmsgstr "\("\n"\)\?[^"]\@=\2\@!') > 0
2f016b638c0c updated for version 7.1-312
vimboss
parents: 557
diff changeset
73 echo 'Mismatching error/warning code in line ' . line('.')
2f016b638c0c updated for version 7.1-312
vimboss
parents: 557
diff changeset
74 let error = 1
2f016b638c0c updated for version 7.1-312
vimboss
parents: 557
diff changeset
75 endif
2f016b638c0c updated for version 7.1-312
vimboss
parents: 557
diff changeset
76
461
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
77 if error == 0
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
78 echo "OK"
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
79 endif
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
80
f98374445f66 updated for version 7.0123
vimboss
parents:
diff changeset
81 endif