Martin Langhoff has a new e-mail address
[git/kirr.git] / userdiff.c
blobf9e05b548c2fdbc349a1d47d81619e266ec9fb83
1 #include "cache.h"
2 #include "userdiff.h"
3 #include "cache.h"
4 #include "attr.h"
6 static struct userdiff_driver *drivers;
7 static int ndrivers;
8 static int drivers_alloc;
10 #define PATTERNS(name, pattern, word_regex) \
11 { name, NULL, -1, { pattern, REG_EXTENDED }, word_regex }
12 #define IPATTERN(name, pattern, word_regex) \
13 { name, NULL, -1, { pattern, REG_EXTENDED | REG_ICASE }, word_regex }
14 static struct userdiff_driver builtin_drivers[] = {
15 IPATTERN("fortran",
16 "!^([C*]|[ \t]*!)\n"
17 "!^[ \t]*MODULE[ \t]+PROCEDURE[ \t]\n"
18 "^[ \t]*((END[ \t]+)?(PROGRAM|MODULE|BLOCK[ \t]+DATA"
19 "|([^'\" \t]+[ \t]+)*(SUBROUTINE|FUNCTION))[ \t]+[A-Z].*)$",
20 /* -- */
21 "[a-zA-Z][a-zA-Z0-9_]*"
22 "|\\.([Ee][Qq]|[Nn][Ee]|[Gg][TtEe]|[Ll][TtEe]|[Tt][Rr][Uu][Ee]|[Ff][Aa][Ll][Ss][Ee]|[Aa][Nn][Dd]|[Oo][Rr]|[Nn]?[Ee][Qq][Vv]|[Nn][Oo][Tt])\\."
23 /* numbers and format statements like 2E14.4, or ES12.6, 9X.
24 * Don't worry about format statements without leading digits since
25 * they would have been matched above as a variable anyway. */
26 "|[-+]?[0-9.]+([AaIiDdEeFfLlTtXx][Ss]?[-+]?[0-9.]*)?(_[a-zA-Z0-9][a-zA-Z0-9_]*)?"
27 "|//|\\*\\*|::|[/<>=]="
28 "|[^[:space:]]|[\x80-\xff]+"),
29 PATTERNS("html", "^[ \t]*(<[Hh][1-6][ \t].*>.*)$",
30 "[^<>= \t]+|[^[:space:]]|[\x80-\xff]+"),
31 PATTERNS("java",
32 "!^[ \t]*(catch|do|for|if|instanceof|new|return|switch|throw|while)\n"
33 "^[ \t]*(([A-Za-z_][A-Za-z_0-9]*[ \t]+)+[A-Za-z_][A-Za-z_0-9]*[ \t]*\\([^;]*)$",
34 /* -- */
35 "[a-zA-Z_][a-zA-Z0-9_]*"
36 "|[-+0-9.e]+[fFlL]?|0[xXbB]?[0-9a-fA-F]+[lL]?"
37 "|[-+*/<>%&^|=!]="
38 "|--|\\+\\+|<<=?|>>>?=?|&&|\\|\\|"
39 "|[^[:space:]]|[\x80-\xff]+"),
40 PATTERNS("objc",
41 /* Negate C statements that can look like functions */
42 "!^[ \t]*(do|for|if|else|return|switch|while)\n"
43 /* Objective-C methods */
44 "^[ \t]*([-+][ \t]*\\([ \t]*[A-Za-z_][A-Za-z_0-9* \t]*\\)[ \t]*[A-Za-z_].*)$\n"
45 /* C functions */
46 "^[ \t]*(([A-Za-z_][A-Za-z_0-9]*[ \t]+)+[A-Za-z_][A-Za-z_0-9]*[ \t]*\\([^;]*)$\n"
47 /* Objective-C class/protocol definitions */
48 "^(@(implementation|interface|protocol)[ \t].*)$",
49 /* -- */
50 "[a-zA-Z_][a-zA-Z0-9_]*"
51 "|[-+0-9.e]+[fFlL]?|0[xXbB]?[0-9a-fA-F]+[lL]?"
52 "|[-+*/<>%&^|=!]=|--|\\+\\+|<<=?|>>=?|&&|\\|\\||::|->"
53 "|[^[:space:]]|[\x80-\xff]+"),
54 PATTERNS("pascal",
55 "^((procedure|function|constructor|destructor|interface|"
56 "implementation|initialization|finalization)[ \t]*.*)$"
57 "\n"
58 "^(.*=[ \t]*(class|record).*)$",
59 /* -- */
60 "[a-zA-Z_][a-zA-Z0-9_]*"
61 "|[-+0-9.e]+|0[xXbB]?[0-9a-fA-F]+"
62 "|<>|<=|>=|:=|\\.\\."
63 "|[^[:space:]]|[\x80-\xff]+"),
64 PATTERNS("php",
65 "^[\t ]*(((public|protected|private|static)[\t ]+)*function.*)$\n"
66 "^[\t ]*(class.*)$",
67 /* -- */
68 "[a-zA-Z_][a-zA-Z0-9_]*"
69 "|[-+0-9.e]+|0[xXbB]?[0-9a-fA-F]+"
70 "|[-+*/<>%&^|=!.]=|--|\\+\\+|<<=?|>>=?|===|&&|\\|\\||::|->"
71 "|[^[:space:]]|[\x80-\xff]+"),
72 PATTERNS("python", "^[ \t]*((class|def)[ \t].*)$",
73 /* -- */
74 "[a-zA-Z_][a-zA-Z0-9_]*"
75 "|[-+0-9.e]+[jJlL]?|0[xX]?[0-9a-fA-F]+[lL]?"
76 "|[-+*/<>%&^|=!]=|//=?|<<=?|>>=?|\\*\\*=?"
77 "|[^[:space:]|[\x80-\xff]+"),
78 /* -- */
79 PATTERNS("ruby", "^[ \t]*((class|module|def)[ \t].*)$",
80 /* -- */
81 "(@|@@|\\$)?[a-zA-Z_][a-zA-Z0-9_]*"
82 "|[-+0-9.e]+|0[xXbB]?[0-9a-fA-F]+|\\?(\\\\C-)?(\\\\M-)?."
83 "|//=?|[-+*/<>%&^|=!]=|<<=?|>>=?|===|\\.{1,3}|::|[!=]~"
84 "|[^[:space:]|[\x80-\xff]+"),
85 PATTERNS("bibtex", "(@[a-zA-Z]{1,}[ \t]*\\{{0,1}[ \t]*[^ \t\"@',\\#}{~%]*).*$",
86 "[={}\"]|[^={}\" \t]+"),
87 PATTERNS("tex", "^(\\\\((sub)*section|chapter|part)\\*{0,1}\\{.*)$",
88 "\\\\[a-zA-Z@]+|\\\\.|[a-zA-Z0-9\x80-\xff]+|[^[:space:]]"),
89 PATTERNS("cpp",
90 /* Jump targets or access declarations */
91 "!^[ \t]*[A-Za-z_][A-Za-z_0-9]*:.*$\n"
92 /* C/++ functions/methods at top level */
93 "^([A-Za-z_][A-Za-z_0-9]*([ \t]+[A-Za-z_][A-Za-z_0-9]*([ \t]*::[ \t]*[^[:space:]]+)?){1,}[ \t]*\\([^;]*)$\n"
94 /* compound type at top level */
95 "^((struct|class|enum)[^;]*)$",
96 /* -- */
97 "[a-zA-Z_][a-zA-Z0-9_]*"
98 "|[-+0-9.e]+[fFlL]?|0[xXbB]?[0-9a-fA-F]+[lL]?"
99 "|[-+*/<>%&^|=!]=|--|\\+\\+|<<=?|>>=?|&&|\\|\\||::|->"
100 "|[^[:space:]]|[\x80-\xff]+"),
101 PATTERNS("csharp",
102 /* Keywords */
103 "!^[ \t]*(do|while|for|if|else|instanceof|new|return|switch|case|throw|catch|using)\n"
104 /* Methods and constructors */
105 "^[ \t]*(((static|public|internal|private|protected|new|virtual|sealed|override|unsafe)[ \t]+)*[][<>@.~_[:alnum:]]+[ \t]+[<>@._[:alnum:]]+[ \t]*\\(.*\\))[ \t]*$\n"
106 /* Properties */
107 "^[ \t]*(((static|public|internal|private|protected|new|virtual|sealed|override|unsafe)[ \t]+)*[][<>@.~_[:alnum:]]+[ \t]+[@._[:alnum:]]+)[ \t]*$\n"
108 /* Type definitions */
109 "^[ \t]*(((static|public|internal|private|protected|new|unsafe|sealed|abstract|partial)[ \t]+)*(class|enum|interface|struct)[ \t]+.*)$\n"
110 /* Namespace */
111 "^[ \t]*(namespace[ \t]+.*)$",
112 /* -- */
113 "[a-zA-Z_][a-zA-Z0-9_]*"
114 "|[-+0-9.e]+[fFlL]?|0[xXbB]?[0-9a-fA-F]+[lL]?"
115 "|[-+*/<>%&^|=!]=|--|\\+\\+|<<=?|>>=?|&&|\\|\\||::|->"
116 "|[^[:space:]]|[\x80-\xff]+"),
117 { "default", NULL, -1, { NULL, 0 } },
119 #undef PATTERNS
120 #undef IPATTERN
122 static struct userdiff_driver driver_true = {
123 "diff=true",
124 NULL,
126 { NULL, 0 }
129 static struct userdiff_driver driver_false = {
130 "!diff",
131 NULL,
133 { NULL, 0 }
136 static struct userdiff_driver *userdiff_find_by_namelen(const char *k, int len)
138 int i;
139 for (i = 0; i < ndrivers; i++) {
140 struct userdiff_driver *drv = drivers + i;
141 if (!strncmp(drv->name, k, len) && !drv->name[len])
142 return drv;
144 for (i = 0; i < ARRAY_SIZE(builtin_drivers); i++) {
145 struct userdiff_driver *drv = builtin_drivers + i;
146 if (!strncmp(drv->name, k, len) && !drv->name[len])
147 return drv;
149 return NULL;
152 static struct userdiff_driver *parse_driver(const char *var,
153 const char *value, const char *type)
155 struct userdiff_driver *drv;
156 const char *dot;
157 const char *name;
158 int namelen;
160 if (prefixcmp(var, "diff."))
161 return NULL;
162 dot = strrchr(var, '.');
163 if (dot == var + 4)
164 return NULL;
165 if (strcmp(type, dot+1))
166 return NULL;
168 name = var + 5;
169 namelen = dot - name;
170 drv = userdiff_find_by_namelen(name, namelen);
171 if (!drv) {
172 ALLOC_GROW(drivers, ndrivers+1, drivers_alloc);
173 drv = &drivers[ndrivers++];
174 memset(drv, 0, sizeof(*drv));
175 drv->name = xmemdupz(name, namelen);
176 drv->binary = -1;
178 return drv;
181 static int parse_funcname(struct userdiff_funcname *f, const char *k,
182 const char *v, int cflags)
184 if (git_config_string(&f->pattern, k, v) < 0)
185 return -1;
186 f->cflags = cflags;
187 return 1;
190 static int parse_string(const char **d, const char *k, const char *v)
192 if (git_config_string(d, k, v) < 0)
193 return -1;
194 return 1;
197 static int parse_tristate(int *b, const char *k, const char *v)
199 if (v && !strcasecmp(v, "auto"))
200 *b = -1;
201 else
202 *b = git_config_bool(k, v);
203 return 1;
206 static int parse_bool(int *b, const char *k, const char *v)
208 *b = git_config_bool(k, v);
209 return 1;
212 int userdiff_config(const char *k, const char *v)
214 struct userdiff_driver *drv;
216 if ((drv = parse_driver(k, v, "funcname")))
217 return parse_funcname(&drv->funcname, k, v, 0);
218 if ((drv = parse_driver(k, v, "xfuncname")))
219 return parse_funcname(&drv->funcname, k, v, REG_EXTENDED);
220 if ((drv = parse_driver(k, v, "binary")))
221 return parse_tristate(&drv->binary, k, v);
222 if ((drv = parse_driver(k, v, "command")))
223 return parse_string(&drv->external, k, v);
224 if ((drv = parse_driver(k, v, "textconv")))
225 return parse_string(&drv->textconv, k, v);
226 if ((drv = parse_driver(k, v, "cachetextconv")))
227 return parse_bool(&drv->textconv_want_cache, k, v);
228 if ((drv = parse_driver(k, v, "wordregex")))
229 return parse_string(&drv->word_regex, k, v);
231 return 0;
234 struct userdiff_driver *userdiff_find_by_name(const char *name) {
235 int len = strlen(name);
236 return userdiff_find_by_namelen(name, len);
239 struct userdiff_driver *userdiff_find_by_path(const char *path)
241 static struct git_attr *attr;
242 struct git_attr_check check;
244 if (!attr)
245 attr = git_attr("diff");
246 check.attr = attr;
248 if (!path)
249 return NULL;
250 if (git_checkattr(path, 1, &check))
251 return NULL;
253 if (ATTR_TRUE(check.value))
254 return &driver_true;
255 if (ATTR_FALSE(check.value))
256 return &driver_false;
257 if (ATTR_UNSET(check.value))
258 return NULL;
259 return userdiff_find_by_name(check.value);