2 * UCW Library -- Table printer types
4 * (c) 2014 Robert Kessl <robert.kessl@economia.cz>
8 #include <ucw/table-types.h>
9 #include <ucw/fastbuf.h>
10 #include <ucw/strtonum.h>
11 #include <ucw/table.h>
17 // FIXME: I seriously doubt there is any good reason for keeping
18 // these types separated from the generic xtype machinery. There
19 // is nothing special in them, which would be tightly connected
20 // to the table printer. Especially as they are already tested
21 // by xtypes-test.c. --mj
25 static const struct unit_definition xt_size_units[] = {
26 [XT_SIZE_UNIT_BYTE] = { "", 1LLU, 1 },
27 [XT_SIZE_UNIT_KILOBYTE] = { "KB", 1024LLU, 1 },
28 [XT_SIZE_UNIT_MEGABYTE] = { "MB", 1024LLU * 1024LLU, 1 },
29 [XT_SIZE_UNIT_GIGABYTE] = { "GB", 1024LLU * 1024LLU * 1024LLU, 1 },
30 [XT_SIZE_UNIT_TERABYTE] = { "TB", 1024LLU * 1024LLU * 1024LLU * 1024LLU, 1 },
34 static enum size_units xt_size_auto_units(u64 sz)
36 if(sz >= xt_size_units[XT_SIZE_UNIT_TERABYTE].num) {
37 return XT_SIZE_UNIT_TERABYTE;
38 } else if(sz >= xt_size_units[XT_SIZE_UNIT_GIGABYTE].num) {
39 return XT_SIZE_UNIT_GIGABYTE;
40 } else if(sz >= xt_size_units[XT_SIZE_UNIT_MEGABYTE].num) {
41 return XT_SIZE_UNIT_MEGABYTE;
42 } else if(sz >= xt_size_units[XT_SIZE_UNIT_KILOBYTE].num) {
43 return XT_SIZE_UNIT_KILOBYTE;
46 return XT_SIZE_UNIT_BYTE;
49 static const char *xt_size_format(void *src, u32 fmt, struct mempool *pool)
51 u64 curr_val = *(u64*) src;
54 if(fmt & XT_SIZE_FMT_FIXED_UNIT) {
55 out_units = fmt & ~XT_SIZE_FMT_FIXED_UNIT;
59 return mp_printf(pool, "%"PRIu64, curr_val);
60 case XTYPE_FMT_PRETTY:
61 out_units = XT_SIZE_UNIT_AUTO;
63 case XTYPE_FMT_DEFAULT:
65 out_units = XT_SIZE_UNIT_BYTE;
70 if(out_units == XT_SIZE_UNIT_AUTO) {
71 out_units = xt_size_auto_units(curr_val);
73 ASSERT(out_units < ARRAY_SIZE(xt_size_units));
75 curr_val = curr_val / xt_size_units[out_units].num;
76 return mp_printf(pool, "%"PRIu64"%s", curr_val, xt_size_units[out_units].unit);
79 static const char *xt_size_fmt_parse(const char *opt_str, u32 *dest, struct mempool *pool)
81 if(strlen(opt_str) == 0 || strcmp(opt_str, "B") == 0 || strcmp(opt_str, "Bytes") == 0) {
82 *dest = XT_SIZE_FMT_UNIT(XT_SIZE_UNIT_BYTE);
86 if(strcmp(opt_str, "auto") == 0) {
87 *dest = XT_SIZE_FMT_UNIT(XT_SIZE_UNIT_AUTO);
91 int unit_idx = xtype_unit_parser(opt_str, xt_size_units);
93 return mp_printf(pool, "Unknown option '%s'", opt_str);
96 *dest = XT_SIZE_FMT_UNIT(unit_idx);
100 static const char *xt_size_parse(const char *str, void *dest, struct mempool *pool)
103 const char *units_start = NULL;
105 const char *err = str_to_u64(&parsed, str, &units_start, 10 | STN_FLAGS);
107 return mp_printf(pool, "Invalid value of size: '%s'; number parser error: %s.", str, err);
110 if(*units_start == 0) {
111 *(u64*) dest = (u64) parsed;
115 int unit_idx = xtype_unit_parser(units_start, xt_size_units);
117 return mp_printf(pool, "Invalid units: '%s'.", str);
120 // Overflow detection
121 u64 num = xt_size_units[unit_idx].num;
122 if(parsed && UINT64_MAX / parsed < num) {
123 return mp_printf(pool, "Size too large: '%s'.", str);
126 *(u64*) dest = parsed * xt_size_units[unit_idx].num;
130 TABLE_COL_BODY(size, u64)
132 const struct xtype xt_size = {
135 .parse = xt_size_parse,
136 .format = xt_size_format,
137 .parse_fmt = xt_size_fmt_parse
142 #define FORMAT_TIME_SIZE 20 // Minimum buffer size
144 static const char *xt_timestamp_format(void *src, u32 fmt, struct mempool *pool)
146 char formatted_time_buf[FORMAT_TIME_SIZE] = { 0 };
148 u64 tmp_time_u64 = *(u64*)src;
149 time_t tmp_time = (time_t) tmp_time_u64;
150 struct tm t = *gmtime(&tmp_time);
152 case XTYPE_FMT_DEFAULT:
154 sprintf(formatted_time_buf, "%"PRIu64, tmp_time_u64);
156 case XTYPE_FMT_PRETTY:
157 strftime(formatted_time_buf, FORMAT_TIME_SIZE, "%F %T", &t);
164 return mp_strdup(pool, formatted_time_buf);
167 static const char *xt_timestamp_fmt_parse(const char *opt_str, u32 *dest, struct mempool *pool)
169 if(strcasecmp(opt_str, "timestamp") == 0 || strcasecmp(opt_str, "epoch") == 0) {
170 *dest = XT_TIMESTAMP_FMT_EPOCH;
172 } else if(strcasecmp(opt_str, "datetime") == 0) {
173 *dest = XT_TIMESTAMP_FMT_DATETIME;
177 return mp_printf(pool, "Invalid column format option: '%s'.", opt_str);
180 static const char *xt_timestamp_parse(const char *str, void *dest, struct mempool *pool)
183 const char *parse_end = NULL;
185 const char *err = str_to_u64(&parsed, str, &parse_end, 10 | STN_FLAGS);
186 if(str == parse_end) {
187 return mp_printf(pool, "Invalid value of timestamp: '%s'; number parser error: %s.", str, err);
190 if(*parse_end == 0) {
191 *(u64*) dest = (u64) parsed;
195 struct tm parsed_time;
196 parse_end = strptime(str, "%F %T", &parsed_time);
197 if(parse_end == NULL) {
198 return mp_printf(pool, "Invalid value of timestamp: '%s'.", str);
200 if(*parse_end != 0) {
201 return mp_printf(pool, "Invalid value of timestamp: '%s'.", str);
204 time_t tmp_time = mktime(&parsed_time);
205 *(u64*)dest = (u64) tmp_time;
210 TABLE_COL_BODY(timestamp, u64)
212 const struct xtype xt_timestamp = {
215 .parse = xt_timestamp_parse,
216 .format = xt_timestamp_format,
217 .parse_fmt = xt_timestamp_fmt_parse