1 /* Copyright (c) 2006-2010 Jonas Fonseca <fonseca@diku.dk>
3 * This program is free software; you can redistribute it and/or
4 * modify it under the terms of the GNU General Public License as
5 * published by the Free Software Foundation; either version 2 of
6 * the License, or (at your option) any later version.
8 * This program is distributed in the hope that it will be useful,
9 * but WITHOUT ANY WARRANTY; without even the implied warranty of
10 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
11 * GNU General Public License for more details.
22 #define TIG_VERSION "unknown-version"
29 /* necessary on Snow Leopard to use WINDOW struct */
33 #define NCURSES_OPAQUE 0
44 #include <sys/types.h>
47 #include <sys/select.h>
59 /* ncurses(3): Must be defined to have extended wide-character functions. */
60 #define _XOPEN_SOURCE_EXTENDED
62 #ifdef HAVE_NCURSESW_H
63 #include <ncursesw/ncurses.h>
69 #define __NORETURN __attribute__((__noreturn__))
74 #define ABS(x) ((x) >= 0 ? (x) : -(x))
75 #define MIN(x, y) ((x) < (y) ? (x) : (y))
76 #define MAX(x, y) ((x) > (y) ? (x) : (y))
78 #define ARRAY_SIZE(x) (sizeof(x) / sizeof(x[0]))
79 #define STRING_SIZE(x) (sizeof(x) - 1)
81 #define SIZEOF_STR 1024 /* Default string size. */
82 #define SIZEOF_REF 256 /* Size of symbolic or SHA1 ID. */
83 #define SIZEOF_REV 41 /* Holds a SHA-1 and an ending NUL. */
84 #define SIZEOF_ARG 32 /* Default argument array size. */
86 /* This color name can be used to refer to the default term colors. */
87 #define COLOR_DEFAULT (-1)
89 #define ENCODING_UTF8 "UTF-8"
90 #define ENCODING_SEP ": encoding: "
91 #define ENCODING_ARG "--encoding=" ENCODING_UTF8
93 #define ICONV_NONE ((iconv_t) -1)
95 #define ICONV_CONST /* nothing */
97 #define ICONV_TRANSLIT "//TRANSLIT"
99 /* The format and size of the date column in the main view. */
100 #define DATE_FORMAT "%Y-%m-%d %H:%M"
101 #define DATE_COLS STRING_SIZE("2006-04-29 14:21 ")
102 #define DATE_SHORT_COLS STRING_SIZE("2006-04-29 ")
105 #define AUTHOR_COLS 19
106 #define FILENAME_COLS 19
108 #define MIN_VIEW_HEIGHT 4
110 #define NULL_ID "0000000000000000000000000000000000000000"
112 #define S_ISGITLINK(mode) (((mode) & S_IFMT) == 0160000)
114 /* Some ASCII-shorthands fitted into the ncurses namespace. */
115 #define KEY_CTL(x) ((x) & 0x1f) /* KEY_CTL(A) == ^A == \1 */
117 #define KEY_RETURN '\r'
121 * Allocation helpers ... Entering macro hell to never be seen again.
124 #define DEFINE_ALLOCATOR(name, type, chunk_size) \
126 name(type **mem, size_t size, size_t increase) \
128 size_t num_chunks = (size + chunk_size - 1) / chunk_size; \
129 size_t num_chunks_new = (size + increase + chunk_size - 1) / chunk_size;\
132 if (mem == NULL || num_chunks != num_chunks_new) { \
133 tmp = realloc(tmp, num_chunks_new * chunk_size * sizeof(type)); \
145 #define prefixcmp(str1, str2) \
146 strncmp(str1, str2, STRING_SIZE(str2))
149 string_isnumber(const char *str
)
153 for (pos
= 0; str
[pos
]; pos
++) {
154 if (!isdigit(str
[pos
]))
166 for (pos
= 0; str
[pos
]; pos
++) {
167 if (!isxdigit(str
[pos
]))
171 return 7 <= pos
&& pos
< SIZEOF_REV
;
177 if (c
>= 'a' && c
<= 'z')
185 if (c
>= 'A' && c
<= 'Z')
191 suffixcmp(const char *str
, int slen
, const char *suffix
)
193 size_t len
= slen
>= 0 ? slen
: strlen(str
);
194 size_t suffixlen
= strlen(suffix
);
196 return suffixlen
< len
? strcmp(str
+ len
- suffixlen
, suffix
) : -1;
200 string_ncopy_do(char *dst
, size_t dstlen
, const char *src
, size_t srclen
)
202 if (srclen
> dstlen
- 1)
205 strncpy(dst
, src
, srclen
);
209 /* Shorthands for safely copying into a fixed buffer. */
211 #define FORMAT_BUFFER(buf, bufsize, fmt, retval, allow_truncate) \
214 va_start(args, fmt); \
215 retval = vsnprintf(buf, bufsize, fmt, args); \
217 if (retval >= (bufsize) && allow_truncate) { \
218 (buf)[(bufsize) - 1] = 0; \
219 (buf)[(bufsize) - 2] = '.'; \
220 (buf)[(bufsize) - 3] = '.'; \
221 (buf)[(bufsize) - 4] = '.'; \
222 retval = (bufsize) - 1; \
223 } else if (retval < 0 || retval >= (bufsize)) { \
228 #define string_copy(dst, src) \
229 string_ncopy_do(dst, sizeof(dst), src, sizeof(src))
231 #define string_ncopy(dst, src, srclen) \
232 string_ncopy_do(dst, sizeof(dst), src, srclen)
234 #define string_copy_rev(dst, src) \
235 string_ncopy_do(dst, SIZEOF_REV, src, SIZEOF_REV - 1)
237 #define string_add(dst, from, src) \
238 string_ncopy_do(dst + (from), sizeof(dst) - (from), src, sizeof(src))
241 string_expand(char *dst
, size_t dstlen
, const char *src
, int tabsize
)
245 for (size
= pos
= 0; size
< dstlen
- 1 && src
[pos
]; pos
++) {
246 if (src
[pos
] == '\t') {
247 size_t expanded
= tabsize
- (size
% tabsize
);
249 if (expanded
+ size
>= dstlen
- 1)
250 expanded
= dstlen
- size
- 1;
251 memcpy(dst
+ size
, " ", expanded
);
254 dst
[size
++] = src
[pos
];
263 chomp_string(char *name
)
267 while (isspace(*name
))
270 namelen
= strlen(name
) - 1;
271 while (namelen
> 0 && isspace(name
[namelen
]))
278 string_nformat(char *buf
, size_t bufsize
, size_t *bufpos
, const char *fmt
, ...)
280 size_t pos
= bufpos
? *bufpos
: 0;
283 FORMAT_BUFFER(buf
+ pos
, bufsize
- pos
, fmt
, retval
, FALSE
);
284 if (bufpos
&& retval
> 0)
285 *bufpos
= pos
+ retval
;
287 return pos
>= bufsize
? FALSE
: TRUE
;
290 #define string_format(buf, fmt, args...) \
291 string_nformat(buf, sizeof(buf), NULL, fmt, args)
293 #define string_format_from(buf, from, fmt, args...) \
294 string_nformat(buf, sizeof(buf), from, fmt, args)
297 strcmp_null(const char *s1
, const char *s2
)
300 return (!!s1
) - (!!s2
);
303 return strcmp(s1
, s2
);
316 #define ENUM_MAP(name, value) { name, STRING_SIZE(name), value }
318 #define ENUM_SYM_MACRO(prefix, name) prefix##_##name
319 #define ENUM_MAP_MACRO(prefix, name) ENUM_MAP(#name, ENUM_SYM_MACRO(prefix, name))
321 #define DEFINE_ENUM(name, info) \
322 enum name { info(ENUM_SYM_MACRO) }; \
323 static const struct enum_map name##_map[] = { info(ENUM_MAP_MACRO) }
326 string_enum_compare(const char *str1
, const char *str2
, int len
)
330 #define string_enum_sep(x) ((x) == '-' || (x) == '_' || (x) == '.')
332 /* Diff-Header == DIFF_HEADER */
333 for (i
= 0; i
< len
; i
++) {
334 if (ascii_toupper(str1
[i
]) == ascii_toupper(str2
[i
]))
337 if (string_enum_sep(str1
[i
]) &&
338 string_enum_sep(str2
[i
]))
341 return str1
[i
] - str2
[i
];
347 #define enum_equals(entry, str, len) \
348 ((entry).namelen == (len) && !string_enum_compare((entry).name, str, len))
351 enum_map_name(const char *name
, size_t namelen
)
353 static char buf
[SIZEOF_STR
];
356 for (bufpos
= 0; bufpos
<= namelen
; bufpos
++) {
357 buf
[bufpos
] = ascii_tolower(name
[bufpos
]);
358 if (buf
[bufpos
] == '_')
366 #define enum_name(entry) enum_map_name((entry).name, (entry).namelen)
369 map_enum_do(const struct enum_map
*map
, size_t map_size
, int *value
, const char *name
)
371 size_t namelen
= strlen(name
);
374 for (i
= 0; i
< map_size
; i
++)
375 if (enum_equals(map
[i
], name
, namelen
)) {
376 *value
= map
[i
].value
;
383 #define map_enum(attr, map, name) \
384 map_enum_do(map, ARRAY_SIZE(map), attr, name)
387 * Unicode / UTF-8 handling
389 * NOTE: Much of the following code for dealing with Unicode is derived from
390 * ELinks' UTF-8 code developed by Scrool <scroolik@gmail.com>. Origin file is
391 * src/intl/charset.c from the UTF-8 branch commit elinks-0.11.0-g31f2c28.
395 unicode_width(unsigned long c
, int tab_size
)
398 (c
<= 0x115f /* Hangul Jamo */
401 || (c
>= 0x2e80 && c
<= 0xa4cf && c
!= 0x303f)
403 || (c
>= 0xac00 && c
<= 0xd7a3) /* Hangul Syllables */
404 || (c
>= 0xf900 && c
<= 0xfaff) /* CJK Compatibility Ideographs */
405 || (c
>= 0xfe30 && c
<= 0xfe6f) /* CJK Compatibility Forms */
406 || (c
>= 0xff00 && c
<= 0xff60) /* Fullwidth Forms */
407 || (c
>= 0xffe0 && c
<= 0xffe6)
408 || (c
>= 0x20000 && c
<= 0x2fffd)
409 || (c
>= 0x30000 && c
<= 0x3fffd)))
418 /* Number of bytes used for encoding a UTF-8 character indexed by first byte.
419 * Illegal bytes are set one. */
420 static const unsigned char utf8_bytes
[256] = {
421 1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,
422 1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,
423 1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,
424 1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,
425 1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,
426 1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1, 1,1,1,1,1,1,1,1,
427 2,2,2,2,2,2,2,2, 2,2,2,2,2,2,2,2, 2,2,2,2,2,2,2,2, 2,2,2,2,2,2,2,2,
428 3,3,3,3,3,3,3,3, 3,3,3,3,3,3,3,3, 4,4,4,4,4,4,4,4, 5,5,5,5,6,6,1,1,
431 static inline unsigned char
432 utf8_char_length(const char *string
, const char *end
)
434 int c
= *(unsigned char *) string
;
436 return utf8_bytes
[c
];
439 /* Decode UTF-8 multi-byte representation into a Unicode character. */
440 static inline unsigned long
441 utf8_to_unicode(const char *string
, size_t length
)
443 unsigned long unicode
;
450 unicode
= (string
[0] & 0x1f) << 6;
451 unicode
+= (string
[1] & 0x3f);
454 unicode
= (string
[0] & 0x0f) << 12;
455 unicode
+= ((string
[1] & 0x3f) << 6);
456 unicode
+= (string
[2] & 0x3f);
459 unicode
= (string
[0] & 0x0f) << 18;
460 unicode
+= ((string
[1] & 0x3f) << 12);
461 unicode
+= ((string
[2] & 0x3f) << 6);
462 unicode
+= (string
[3] & 0x3f);
465 unicode
= (string
[0] & 0x0f) << 24;
466 unicode
+= ((string
[1] & 0x3f) << 18);
467 unicode
+= ((string
[2] & 0x3f) << 12);
468 unicode
+= ((string
[3] & 0x3f) << 6);
469 unicode
+= (string
[4] & 0x3f);
472 unicode
= (string
[0] & 0x01) << 30;
473 unicode
+= ((string
[1] & 0x3f) << 24);
474 unicode
+= ((string
[2] & 0x3f) << 18);
475 unicode
+= ((string
[3] & 0x3f) << 12);
476 unicode
+= ((string
[4] & 0x3f) << 6);
477 unicode
+= (string
[5] & 0x3f);
483 /* Invalid characters could return the special 0xfffd value but NUL
484 * should be just as good. */
485 return unicode
> 0xffff ? 0 : unicode
;
488 /* Calculates how much of string can be shown within the given maximum width
489 * and sets trimmed parameter to non-zero value if all of string could not be
490 * shown. If the reserve flag is TRUE, it will reserve at least one
491 * trailing character, which can be useful when drawing a delimiter.
493 * Returns the number of bytes to output from string to satisfy max_width. */
495 utf8_length(const char **start
, size_t skip
, int *width
, size_t max_width
, int *trimmed
, bool reserve
, int tab_size
)
497 const char *string
= *start
;
498 const char *end
= strchr(string
, '\0');
499 unsigned char last_bytes
= 0;
500 size_t last_ucwidth
= 0;
505 while (string
< end
) {
506 unsigned char bytes
= utf8_char_length(string
, end
);
508 unsigned long unicode
;
510 if (string
+ bytes
> end
)
513 /* Change representation to figure out whether
514 * it is a single- or double-width character. */
516 unicode
= utf8_to_unicode(string
, bytes
);
517 /* FIXME: Graceful handling of invalid Unicode character. */
521 ucwidth
= unicode_width(unicode
, tab_size
);
523 skip
-= ucwidth
<= skip
? ucwidth
: skip
;
527 if (*width
> max_width
) {
530 if (reserve
&& *width
== max_width
) {
531 string
-= last_bytes
;
532 *width
-= last_ucwidth
;
538 last_bytes
= ucwidth
? bytes
: 0;
539 last_ucwidth
= ucwidth
;
542 return string
- *start
;