xref: /freebsd/lib/libc/stdio/xprintf_time.c (revision 3157ba21)
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;
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 
84 	p = buf;
85 	if (pi->alt) {
86 		tx = t;
87 		if (t >= YEAR) {
88 			p += sprintf(p, "%jdy", t / YEAR);
89 			t %= YEAR;
90 		}
91 		if (t >= DAY && t != 0) {
92 			p += sprintf(p, "%jdd", t / DAY);
93 			t %= DAY;
94 		}
95 		if (t >= HOUR && t != 0) {
96 			p += sprintf(p, "%jdh", t / HOUR);
97 			t %= HOUR;
98 		}
99 		if (t >= MINUTE && t != 0) {
100 			p += sprintf(p, "%jdm", t / MINUTE);
101 			t %= MINUTE;
102 		}
103 		if (t != 0 || tx == 0)
104 			p += sprintf(p, "%jds", t);
105 	} else  {
106 		p += sprintf(p, "%jd", (intmax_t)t);
107 	}
108 	if (pi->is_long || pi->is_long_double) {
109 		if (pi->prec >= 0)
110 			prec = pi->prec;
111 		for (i = prec; i < 9; i++)
112 			nsec /= 10;
113 		p += sprintf(p, ".%.*d", prec, nsec);
114 	}
115 	return(__printf_out(io, pi, buf, p - buf));
116 }
117