fetch: prefer suffix substitution in compact fetch.output
[git] / ident.c
1 /*
2  * ident.c
3  *
4  * create git identifier lines of the form "name <email> date"
5  *
6  * Copyright (C) 2005 Linus Torvalds
7  */
8 #include "cache.h"
9 #include "config.h"
10
11 static struct strbuf git_default_name = STRBUF_INIT;
12 static struct strbuf git_default_email = STRBUF_INIT;
13 static struct strbuf git_default_date = STRBUF_INIT;
14 static int default_email_is_bogus;
15 static int default_name_is_bogus;
16
17 static int ident_use_config_only;
18
19 #define IDENT_NAME_GIVEN 01
20 #define IDENT_MAIL_GIVEN 02
21 #define IDENT_ALL_GIVEN (IDENT_NAME_GIVEN|IDENT_MAIL_GIVEN)
22 static int committer_ident_explicitly_given;
23 static int author_ident_explicitly_given;
24 static int ident_config_given;
25
26 #ifdef NO_GECOS_IN_PWENT
27 #define get_gecos(ignored) "&"
28 #else
29 #define get_gecos(struct_passwd) ((struct_passwd)->pw_gecos)
30 #endif
31
32 static struct passwd *xgetpwuid_self(int *is_bogus)
33 {
34         struct passwd *pw;
35
36         errno = 0;
37         pw = getpwuid(getuid());
38         if (!pw) {
39                 static struct passwd fallback;
40                 fallback.pw_name = "unknown";
41 #ifndef NO_GECOS_IN_PWENT
42                 fallback.pw_gecos = "Unknown";
43 #endif
44                 pw = &fallback;
45                 if (is_bogus)
46                         *is_bogus = 1;
47         }
48         return pw;
49 }
50
51 static void copy_gecos(const struct passwd *w, struct strbuf *name)
52 {
53         char *src;
54
55         /* Traditionally GECOS field had office phone numbers etc, separated
56          * with commas.  Also & stands for capitalized form of the login name.
57          */
58
59         for (src = get_gecos(w); *src && *src != ','; src++) {
60                 int ch = *src;
61                 if (ch != '&')
62                         strbuf_addch(name, ch);
63                 else {
64                         /* Sorry, Mr. McDonald... */
65                         strbuf_addch(name, toupper(*w->pw_name));
66                         strbuf_addstr(name, w->pw_name + 1);
67                 }
68         }
69 }
70
71 static int add_mailname_host(struct strbuf *buf)
72 {
73         FILE *mailname;
74         struct strbuf mailnamebuf = STRBUF_INIT;
75
76         mailname = fopen_or_warn("/etc/mailname", "r");
77         if (!mailname)
78                 return -1;
79
80         if (strbuf_getline(&mailnamebuf, mailname) == EOF) {
81                 if (ferror(mailname))
82                         warning_errno("cannot read /etc/mailname");
83                 strbuf_release(&mailnamebuf);
84                 fclose(mailname);
85                 return -1;
86         }
87         /* success! */
88         strbuf_addbuf(buf, &mailnamebuf);
89         strbuf_release(&mailnamebuf);
90         fclose(mailname);
91         return 0;
92 }
93
94 static int canonical_name(const char *host, struct strbuf *out)
95 {
96         int status = -1;
97
98 #ifndef NO_IPV6
99         struct addrinfo hints, *ai;
100         memset (&hints, '\0', sizeof (hints));
101         hints.ai_flags = AI_CANONNAME;
102         if (!getaddrinfo(host, NULL, &hints, &ai)) {
103                 if (ai && ai->ai_canonname && strchr(ai->ai_canonname, '.')) {
104                         strbuf_addstr(out, ai->ai_canonname);
105                         status = 0;
106                 }
107                 freeaddrinfo(ai);
108         }
109 #else
110         struct hostent *he = gethostbyname(host);
111         if (he && strchr(he->h_name, '.')) {
112                 strbuf_addstr(out, he->h_name);
113                 status = 0;
114         }
115 #endif /* NO_IPV6 */
116
117         return status;
118 }
119
120 static void add_domainname(struct strbuf *out, int *is_bogus)
121 {
122         char buf[HOST_NAME_MAX + 1];
123
124         if (xgethostname(buf, sizeof(buf))) {
125                 warning_errno("cannot get host name");
126                 strbuf_addstr(out, "(none)");
127                 *is_bogus = 1;
128                 return;
129         }
130         if (strchr(buf, '.'))
131                 strbuf_addstr(out, buf);
132         else if (canonical_name(buf, out) < 0) {
133                 strbuf_addf(out, "%s.(none)", buf);
134                 *is_bogus = 1;
135         }
136 }
137
138 static void copy_email(const struct passwd *pw, struct strbuf *email,
139                        int *is_bogus)
140 {
141         /*
142          * Make up a fake email address
143          * (name + '@' + hostname [+ '.' + domainname])
144          */
145         strbuf_addstr(email, pw->pw_name);
146         strbuf_addch(email, '@');
147
148         if (!add_mailname_host(email))
149                 return; /* read from "/etc/mailname" (Debian) */
150         add_domainname(email, is_bogus);
151 }
152
153 const char *ident_default_name(void)
154 {
155         if (!(ident_config_given & IDENT_NAME_GIVEN) && !git_default_name.len) {
156                 copy_gecos(xgetpwuid_self(&default_name_is_bogus), &git_default_name);
157                 strbuf_trim(&git_default_name);
158         }
159         return git_default_name.buf;
160 }
161
162 const char *ident_default_email(void)
163 {
164         if (!(ident_config_given & IDENT_MAIL_GIVEN) && !git_default_email.len) {
165                 const char *email = getenv("EMAIL");
166
167                 if (email && email[0]) {
168                         strbuf_addstr(&git_default_email, email);
169                         committer_ident_explicitly_given |= IDENT_MAIL_GIVEN;
170                         author_ident_explicitly_given |= IDENT_MAIL_GIVEN;
171                 } else if ((email = query_user_email()) && email[0]) {
172                         strbuf_addstr(&git_default_email, email);
173                         free((char *)email);
174                 } else
175                         copy_email(xgetpwuid_self(&default_email_is_bogus),
176                                    &git_default_email, &default_email_is_bogus);
177                 strbuf_trim(&git_default_email);
178         }
179         return git_default_email.buf;
180 }
181
182 static const char *ident_default_date(void)
183 {
184         if (!git_default_date.len)
185                 datestamp(&git_default_date);
186         return git_default_date.buf;
187 }
188
189 void reset_ident_date(void)
190 {
191         strbuf_reset(&git_default_date);
192 }
193
194 static int crud(unsigned char c)
195 {
196         return  c <= 32  ||
197                 c == '.' ||
198                 c == ',' ||
199                 c == ':' ||
200                 c == ';' ||
201                 c == '<' ||
202                 c == '>' ||
203                 c == '"' ||
204                 c == '\\' ||
205                 c == '\'';
206 }
207
208 static int has_non_crud(const char *str)
209 {
210         for (; *str; str++) {
211                 if (!crud(*str))
212                         return 1;
213         }
214         return 0;
215 }
216
217 /*
218  * Copy over a string to the destination, but avoid special
219  * characters ('\n', '<' and '>') and remove crud at the end
220  */
221 static void strbuf_addstr_without_crud(struct strbuf *sb, const char *src)
222 {
223         size_t i, len;
224         unsigned char c;
225
226         /* Remove crud from the beginning.. */
227         while ((c = *src) != 0) {
228                 if (!crud(c))
229                         break;
230                 src++;
231         }
232
233         /* Remove crud from the end.. */
234         len = strlen(src);
235         while (len > 0) {
236                 c = src[len-1];
237                 if (!crud(c))
238                         break;
239                 --len;
240         }
241
242         /*
243          * Copy the rest to the buffer, but avoid the special
244          * characters '\n' '<' and '>' that act as delimiters on
245          * an identification line. We can only remove crud, never add it,
246          * so 'len' is our maximum.
247          */
248         strbuf_grow(sb, len);
249         for (i = 0; i < len; i++) {
250                 c = *src++;
251                 switch (c) {
252                 case '\n': case '<': case '>':
253                         continue;
254                 }
255                 sb->buf[sb->len++] = c;
256         }
257         sb->buf[sb->len] = '\0';
258 }
259
260 /*
261  * Reverse of fmt_ident(); given an ident line, split the fields
262  * to allow the caller to parse it.
263  * Signal a success by returning 0, but date/tz fields of the result
264  * can still be NULL if the input line only has the name/email part
265  * (e.g. reading from a reflog entry).
266  */
267 int split_ident_line(struct ident_split *split, const char *line, int len)
268 {
269         const char *cp;
270         size_t span;
271         int status = -1;
272
273         memset(split, 0, sizeof(*split));
274
275         split->name_begin = line;
276         for (cp = line; *cp && cp < line + len; cp++)
277                 if (*cp == '<') {
278                         split->mail_begin = cp + 1;
279                         break;
280                 }
281         if (!split->mail_begin)
282                 return status;
283
284         for (cp = split->mail_begin - 2; line <= cp; cp--)
285                 if (!isspace(*cp)) {
286                         split->name_end = cp + 1;
287                         break;
288                 }
289         if (!split->name_end) {
290                 /* no human readable name */
291                 split->name_end = split->name_begin;
292         }
293
294         for (cp = split->mail_begin; cp < line + len; cp++)
295                 if (*cp == '>') {
296                         split->mail_end = cp;
297                         break;
298                 }
299         if (!split->mail_end)
300                 return status;
301
302         /*
303          * Look from the end-of-line to find the trailing ">" of the mail
304          * address, even though we should already know it as split->mail_end.
305          * This can help in cases of broken idents with an extra ">" somewhere
306          * in the email address.  Note that we are assuming the timestamp will
307          * never have a ">" in it.
308          *
309          * Note that we will always find some ">" before going off the front of
310          * the string, because will always hit the split->mail_end closing
311          * bracket.
312          */
313         for (cp = line + len - 1; *cp != '>'; cp--)
314                 ;
315
316         for (cp = cp + 1; cp < line + len && isspace(*cp); cp++)
317                 ;
318         if (line + len <= cp)
319                 goto person_only;
320         split->date_begin = cp;
321         span = strspn(cp, "0123456789");
322         if (!span)
323                 goto person_only;
324         split->date_end = split->date_begin + span;
325         for (cp = split->date_end; cp < line + len && isspace(*cp); cp++)
326                 ;
327         if (line + len <= cp || (*cp != '+' && *cp != '-'))
328                 goto person_only;
329         split->tz_begin = cp;
330         span = strspn(cp + 1, "0123456789");
331         if (!span)
332                 goto person_only;
333         split->tz_end = split->tz_begin + 1 + span;
334         return 0;
335
336 person_only:
337         split->date_begin = NULL;
338         split->date_end = NULL;
339         split->tz_begin = NULL;
340         split->tz_end = NULL;
341         return 0;
342 }
343
344 static const char *env_hint =
345 N_("\n"
346    "*** Please tell me who you are.\n"
347    "\n"
348    "Run\n"
349    "\n"
350    "  git config --global user.email \"you@example.com\"\n"
351    "  git config --global user.name \"Your Name\"\n"
352    "\n"
353    "to set your account\'s default identity.\n"
354    "Omit --global to set the identity only in this repository.\n"
355    "\n");
356
357 const char *fmt_ident(const char *name, const char *email,
358                       const char *date_str, int flag)
359 {
360         static struct strbuf ident = STRBUF_INIT;
361         int strict = (flag & IDENT_STRICT);
362         int want_date = !(flag & IDENT_NO_DATE);
363         int want_name = !(flag & IDENT_NO_NAME);
364
365         if (!email) {
366                 if (strict && ident_use_config_only
367                     && !(ident_config_given & IDENT_MAIL_GIVEN)) {
368                         fputs(_(env_hint), stderr);
369                         die(_("no email was given and auto-detection is disabled"));
370                 }
371                 email = ident_default_email();
372                 if (strict && default_email_is_bogus) {
373                         fputs(_(env_hint), stderr);
374                         die(_("unable to auto-detect email address (got '%s')"), email);
375                 }
376         }
377
378         if (want_name) {
379                 int using_default = 0;
380                 if (!name) {
381                         if (strict && ident_use_config_only
382                             && !(ident_config_given & IDENT_NAME_GIVEN)) {
383                                 fputs(_(env_hint), stderr);
384                                 die(_("no name was given and auto-detection is disabled"));
385                         }
386                         name = ident_default_name();
387                         using_default = 1;
388                         if (strict && default_name_is_bogus) {
389                                 fputs(_(env_hint), stderr);
390                                 die(_("unable to auto-detect name (got '%s')"), name);
391                         }
392                 }
393                 if (!*name) {
394                         struct passwd *pw;
395                         if (strict) {
396                                 if (using_default)
397                                         fputs(_(env_hint), stderr);
398                                 die(_("empty ident name (for <%s>) not allowed"), email);
399                         }
400                         pw = xgetpwuid_self(NULL);
401                         name = pw->pw_name;
402                 }
403                 if (strict && !has_non_crud(name))
404                         die(_("name consists only of disallowed characters: %s"), name);
405         }
406
407         strbuf_reset(&ident);
408         if (want_name) {
409                 strbuf_addstr_without_crud(&ident, name);
410                 strbuf_addstr(&ident, " <");
411         }
412         strbuf_addstr_without_crud(&ident, email);
413         if (want_name)
414                         strbuf_addch(&ident, '>');
415         if (want_date) {
416                 strbuf_addch(&ident, ' ');
417                 if (date_str && date_str[0]) {
418                         if (parse_date(date_str, &ident) < 0)
419                                 die(_("invalid date format: %s"), date_str);
420                 }
421                 else
422                         strbuf_addstr(&ident, ident_default_date());
423         }
424
425         return ident.buf;
426 }
427
428 const char *fmt_name(const char *name, const char *email)
429 {
430         return fmt_ident(name, email, NULL, IDENT_STRICT | IDENT_NO_DATE);
431 }
432
433 const char *git_author_info(int flag)
434 {
435         if (getenv("GIT_AUTHOR_NAME"))
436                 author_ident_explicitly_given |= IDENT_NAME_GIVEN;
437         if (getenv("GIT_AUTHOR_EMAIL"))
438                 author_ident_explicitly_given |= IDENT_MAIL_GIVEN;
439         return fmt_ident(getenv("GIT_AUTHOR_NAME"),
440                          getenv("GIT_AUTHOR_EMAIL"),
441                          getenv("GIT_AUTHOR_DATE"),
442                          flag);
443 }
444
445 const char *git_committer_info(int flag)
446 {
447         if (getenv("GIT_COMMITTER_NAME"))
448                 committer_ident_explicitly_given |= IDENT_NAME_GIVEN;
449         if (getenv("GIT_COMMITTER_EMAIL"))
450                 committer_ident_explicitly_given |= IDENT_MAIL_GIVEN;
451         return fmt_ident(getenv("GIT_COMMITTER_NAME"),
452                          getenv("GIT_COMMITTER_EMAIL"),
453                          getenv("GIT_COMMITTER_DATE"),
454                          flag);
455 }
456
457 static int ident_is_sufficient(int user_ident_explicitly_given)
458 {
459 #ifndef WINDOWS
460         return (user_ident_explicitly_given & IDENT_MAIL_GIVEN);
461 #else
462         return (user_ident_explicitly_given == IDENT_ALL_GIVEN);
463 #endif
464 }
465
466 int committer_ident_sufficiently_given(void)
467 {
468         return ident_is_sufficient(committer_ident_explicitly_given);
469 }
470
471 int author_ident_sufficiently_given(void)
472 {
473         return ident_is_sufficient(author_ident_explicitly_given);
474 }
475
476 int git_ident_config(const char *var, const char *value, void *data)
477 {
478         if (!strcmp(var, "user.useconfigonly")) {
479                 ident_use_config_only = git_config_bool(var, value);
480                 return 0;
481         }
482
483         if (!strcmp(var, "user.name")) {
484                 if (!value)
485                         return config_error_nonbool(var);
486                 strbuf_reset(&git_default_name);
487                 strbuf_addstr(&git_default_name, value);
488                 committer_ident_explicitly_given |= IDENT_NAME_GIVEN;
489                 author_ident_explicitly_given |= IDENT_NAME_GIVEN;
490                 ident_config_given |= IDENT_NAME_GIVEN;
491                 return 0;
492         }
493
494         if (!strcmp(var, "user.email")) {
495                 if (!value)
496                         return config_error_nonbool(var);
497                 strbuf_reset(&git_default_email);
498                 strbuf_addstr(&git_default_email, value);
499                 committer_ident_explicitly_given |= IDENT_MAIL_GIVEN;
500                 author_ident_explicitly_given |= IDENT_MAIL_GIVEN;
501                 ident_config_given |= IDENT_MAIL_GIVEN;
502                 return 0;
503         }
504
505         return 0;
506 }
507
508 static int buf_cmp(const char *a_begin, const char *a_end,
509                    const char *b_begin, const char *b_end)
510 {
511         int a_len = a_end - a_begin;
512         int b_len = b_end - b_begin;
513         int min = a_len < b_len ? a_len : b_len;
514         int cmp;
515
516         cmp = memcmp(a_begin, b_begin, min);
517         if (cmp)
518                 return cmp;
519
520         return a_len - b_len;
521 }
522
523 int ident_cmp(const struct ident_split *a,
524               const struct ident_split *b)
525 {
526         int cmp;
527
528         cmp = buf_cmp(a->mail_begin, a->mail_end,
529                       b->mail_begin, b->mail_end);
530         if (cmp)
531                 return cmp;
532
533         return buf_cmp(a->name_begin, a->name_end,
534                        b->name_begin, b->name_end);
535 }