1 /*
2 * SysDB - src/core/time.c
3 * Copyright (C) 2012 Sebastian 'tokkee' Harl <sh@tokkee.org>
4 * All rights reserved.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 *
15 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
16 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
17 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
18 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDERS OR
19 * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
20 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
21 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
22 * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
23 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
24 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
25 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26 */
28 #if HAVE_CONFIG_H
29 # include "config.h"
30 #endif /* HAVE_CONFIG_H */
32 #include "sysdb.h"
33 #include "core/time.h"
35 #include <time.h>
37 #include <stdbool.h>
38 #include <stdio.h>
39 #include <string.h>
41 /*
42 * public API
43 */
45 /* 1 second (in nano-seconds) */
46 #define SEC 1000000000L
48 const sdb_time_t SDB_INTERVAL_YEAR = 3652425L * 24L * 60L * 60L * 100000L;
49 const sdb_time_t SDB_INTERVAL_MONTH = 30436875L * 24L * 60L * 60L * 1000L;
50 const sdb_time_t SDB_INTERVAL_DAY = 24L * 60L * 60L * SEC;
51 const sdb_time_t SDB_INTERVAL_HOUR = 60L * 60L * SEC;
52 const sdb_time_t SDB_INTERVAL_MINUTE = 60L * SEC;
53 const sdb_time_t SDB_INTERVAL_SECOND = SEC;
55 sdb_time_t
56 sdb_gettime(void)
57 {
58 struct timespec ts_now = { 0, 0 };
60 if (clock_gettime(CLOCK_REALTIME, &ts_now))
61 return 0;
62 return TIMESPEC_TO_SDB_TIME(ts_now);
63 } /* sdb_gettime */
65 int
66 sdb_sleep(sdb_time_t reg, sdb_time_t *rem)
67 {
68 struct timespec ts_reg, ts_rem = { 0, 0 };
69 int status;
71 ts_reg.tv_sec = (time_t)SDB_TIME_TO_SECS(reg);
72 ts_reg.tv_nsec = (long int)(reg % (sdb_time_t)1000000000);
74 status = nanosleep(&ts_reg, &ts_rem);
75 if (rem)
76 *rem = TIMESPEC_TO_SDB_TIME(ts_rem);
77 return status;
78 } /* sdb_sleep */
80 size_t
81 sdb_strftime(char *s, size_t len, const char *format, sdb_time_t t)
82 {
83 time_t tstamp;
84 struct tm tm;
86 memset(&tm, 0, sizeof(tm));
88 tstamp = (time_t)SDB_TIME_TO_SECS(t);
89 if (! localtime_r (&tstamp, &tm))
90 return 0;
92 return strftime(s, len, format, &tm);
93 } /* sdb_strftime */
95 size_t
96 sdb_strfinterval(char *s, size_t len, sdb_time_t interval)
97 {
98 size_t n = 0;
99 size_t i;
101 /* special case the optional fractional part for seconds */
102 bool have_seconds = 0;
104 struct {
105 sdb_time_t interval;
106 const char *suffix;
107 } specs[] = {
108 { SDB_INTERVAL_YEAR, "Y" },
109 { SDB_INTERVAL_MONTH, "M" },
110 { SDB_INTERVAL_DAY, "D" },
111 { SDB_INTERVAL_HOUR, "h" },
112 { SDB_INTERVAL_MINUTE, "m" },
113 { SDB_INTERVAL_SECOND, "" },
114 };
116 #define LEN (len > n ? len - n : 0)
117 for (i = 0; i < SDB_STATIC_ARRAY_LEN(specs); ++i) {
118 if (interval >= specs[i].interval) {
119 n += snprintf(s + n, LEN, "%"PRIsdbTIME"%s",
120 interval / specs[i].interval, specs[i].suffix);
121 interval %= specs[i].interval;
122 if (specs[i].interval == SDB_INTERVAL_SECOND)
123 have_seconds = 1;
124 }
125 }
127 if (interval) {
128 n += snprintf(s + n, LEN, ".%09"PRIsdbTIME, interval);
129 have_seconds = 1;
131 /* removing trailing zeroes */
132 if (n <= len)
133 while (s[n - 1] == '0')
134 s[n--] = '\0';
135 }
137 if (! n) {
138 n = snprintf(s, len, "0");
139 have_seconds = 1;
140 }
142 if (have_seconds)
143 n += snprintf(s + n, LEN, "s");
144 #undef LEN
146 if (len)
147 s[len - 1] = '\0';
148 return n;
149 } /* sdb_strfinterval */
151 sdb_time_t
152 sdb_strpunit(const char *s)
153 {
154 struct {
155 const char *s;
156 sdb_time_t unit;
157 } units[] = {
158 { "Y", SDB_INTERVAL_YEAR },
159 { "M", SDB_INTERVAL_MONTH },
160 { "D", SDB_INTERVAL_DAY },
161 { "h", SDB_INTERVAL_HOUR },
162 { "m", SDB_INTERVAL_MINUTE },
163 { "s", SDB_INTERVAL_SECOND },
164 { "ms", SDB_INTERVAL_SECOND / 1000L },
165 { "us", SDB_INTERVAL_SECOND / 1000000L },
166 { "ns", 1 },
167 };
169 size_t i;
171 for (i = 0; i < SDB_STATIC_ARRAY_LEN(units); ++i)
172 if (! strcmp(s, units[i].s))
173 return units[i].unit;
174 return 0;
175 } /* sdb_strpunit */
177 /* vim: set tw=78 sw=4 ts=4 noexpandtab : */