xref: /freebsd/lib/libc/stdio/xprintf_time.c (revision b1f9167f94059fd55c630891d359bcff987bd7eb)
1 /*-
2  * Copyright (c) 2005 Poul-Henning Kamp
3  * Copyright (c) 1990, 1993
4  *	The Regents of the University of California.  All rights reserved.
5  *
6  * This code is derived from software contributed to Berkeley by
7  * Chris Torek.
8  *
9  * Redistribution and use in source and binary forms, with or without
10  * modification, are permitted provided that the following conditions
11  * are met:
12  * 1. Redistributions of source code must retain the above copyright
13  *    notice, this list of conditions and the following disclaimer.
14  * 2. Redistributions in binary form must reproduce the above copyright
15  *    notice, this list of conditions and the following disclaimer in the
16  *    documentation and/or other materials provided with the distribution.
17  * 3. Neither the name of the University nor the names of its contributors
18  *    may be used to endorse or promote products derived from this software
19  *    without specific prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31  * SUCH DAMAGE.
32  *
33  * $FreeBSD$
34  */
35 #include <namespace.h>
36 #include <stdio.h>
37 #include <wchar.h>
38 #include <stdint.h>
39 #include <assert.h>
40 #include <sys/time.h>
41 #include "printf.h"
42 
43 int
44 __printf_arginfo_time(const struct printf_info *pi, size_t n, int *argt)
45 {
46 
47 	assert(n >= 1);
48 	argt[0] = PA_POINTER;
49 	return (1);
50 }
51 #define MINUTE 60
52 #define HOUR	(60 * MINUTE)
53 #define DAY	(24 * HOUR)
54 #define YEAR	(365 * DAY)
55 
56 int
57 __printf_render_time(struct __printf_io *io, const struct printf_info *pi, const void *const *arg)
58 {
59 	char buf[100];
60 	char *p;
61 	struct timeval *tv;
62 	struct timespec *ts;
63 	time_t *tp;
64 	intmax_t t, tx;
65 	int i, prec, nsec, ret;
66 
67 	if (pi->is_long) {
68 		tv = *((struct timeval **)arg[0]);
69 		t = tv->tv_sec;
70 		nsec = tv->tv_usec * 1000;
71 		prec = 6;
72 	} else if (pi->is_long_double) {
73 		ts = *((struct timespec **)arg[0]);
74 		t = ts->tv_sec;
75 		nsec = ts->tv_nsec;
76 		prec = 9;
77 	} else {
78 		tp = *((time_t **)arg[0]);
79 		t = *tp;
80 		nsec = 0;
81 		prec = 0;
82 	}
83 	if (pi->is_long || pi->is_long_double) {
84 		if (pi->prec >= 0)
85 			prec = pi->prec;
86 		if (prec == 0)
87 			nsec = 0;
88 	}
89 
90 	p = buf;
91 	if (pi->alt) {
92 		tx = t;
93 		if (t >= YEAR) {
94 			p += sprintf(p, "%jdy", t / YEAR);
95 			t %= YEAR;
96 		}
97 		if (tx >= DAY && (t != 0 || prec != 0)) {
98 			p += sprintf(p, "%jdd", t / DAY);
99 			t %= DAY;
100 		}
101 		if (tx >= HOUR && (t != 0 || prec != 0)) {
102 			p += sprintf(p, "%jdh", t / HOUR);
103 			t %= HOUR;
104 		}
105 		if (tx >= MINUTE && (t != 0 || prec != 0)) {
106 			p += sprintf(p, "%jdm", t / MINUTE);
107 			t %= MINUTE;
108 		}
109 		if (t != 0 || tx == 0 || prec != 0)
110 			p += sprintf(p, "%jds", t);
111 	} else  {
112 		p += sprintf(p, "%jd", (intmax_t)t);
113 	}
114 	if (prec != 0) {
115 		for (i = prec; i < 9; i++)
116 			nsec /= 10;
117 		p += sprintf(p, ".%.*d", prec, nsec);
118 	}
119 	ret = __printf_out(io, pi, buf, p - buf);
120 	__printf_flush(io);
121 	return (ret);
122 }
123