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 // FIXME: Detect overflow?
121 u64 num = xt_size_units[unit_idx].num;
122 if((parsed && UINT64_MAX / parsed < num) ||
123 (num && UINT64_MAX / num < parsed)) {
124 return mp_printf(pool, "Size too large: '%s'.", str);
127 *(u64*) dest = parsed * xt_size_units[unit_idx].num;
131 TABLE_COL_BODY(size, u64)
133 const struct xtype xt_size = {
136 .parse = xt_size_parse,
137 .format = xt_size_format,
138 .parse_fmt = xt_size_fmt_parse
143 #define FORMAT_TIME_SIZE 20 // Minimum buffer size
145 static const char *xt_timestamp_format(void *src, u32 fmt, struct mempool *pool)
147 char formatted_time_buf[FORMAT_TIME_SIZE] = { 0 };
149 u64 tmp_time_u64 = *(u64*)src;
150 time_t tmp_time = (time_t) tmp_time_u64;
151 struct tm t = *gmtime(&tmp_time);
153 case XTYPE_FMT_DEFAULT:
155 sprintf(formatted_time_buf, "%"PRIu64, tmp_time_u64);
157 case XTYPE_FMT_PRETTY:
158 strftime(formatted_time_buf, FORMAT_TIME_SIZE, "%F %T", &t);
165 return mp_strdup(pool, formatted_time_buf);
168 static const char *xt_timestamp_fmt_parse(const char *opt_str, u32 *dest, struct mempool *pool)
170 if(strcasecmp(opt_str, "timestamp") == 0 || strcasecmp(opt_str, "epoch") == 0) {
171 *dest = XT_TIMESTAMP_FMT_EPOCH;
173 } else if(strcasecmp(opt_str, "datetime") == 0) {
174 *dest = XT_TIMESTAMP_FMT_DATETIME;
178 return mp_printf(pool, "Invalid column format option: '%s'.", opt_str);
181 static const char *xt_timestamp_parse(const char *str, void *dest, struct mempool *pool)
184 const char *parse_end = NULL;
186 const char *err = str_to_u64(&parsed, str, &parse_end, 10 | STN_FLAGS);
187 if(str == parse_end) {
188 return mp_printf(pool, "Invalid value of timestamp: '%s'; number parser error: %s.", str, err);
191 if(*parse_end == 0) {
192 *(u64*) dest = (u64) parsed;
196 struct tm parsed_time;
197 parse_end = strptime(str, "%F %T", &parsed_time);
198 if(parse_end == NULL) {
199 return mp_printf(pool, "Invalid value of timestamp: '%s'.", str);
201 if(*parse_end != 0) {
202 return mp_printf(pool, "Invalid value of timestamp: '%s'.", str);
205 time_t tmp_time = mktime(&parsed_time);
206 *(u64*)dest = (u64) tmp_time;
211 TABLE_COL_BODY(timestamp, u64)
213 const struct xtype xt_timestamp = {
216 .parse = xt_timestamp_parse,
217 .format = xt_timestamp_format,
218 .parse_fmt = xt_timestamp_fmt_parse