xref: /freebsd/lib/libc/stdio/xprintf_time.c (revision 1669d8afc64812c8d2d1d147ae1fd42ff441e1b1)
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 	prec = 0;
68 	if (pi->is_long) {
69 		tv = *((struct timeval **)arg[0]);
70 		t = tv->tv_sec;
71 		nsec = tv->tv_usec * 1000;
72 		prec = 6;
73 	} else if (pi->is_long_double) {
74 		ts = *((struct timespec **)arg[0]);
75 		t = ts->tv_sec;
76 		nsec = ts->tv_nsec;
77 		prec = 9;
78 	} else {
79 		tp = *((time_t **)arg[0]);
80 		t = *tp;
81 	}
82 
83 	p = buf;
84 	if (pi->alt) {
85 		tx = t;
86 		if (t >= YEAR) {
87 			p += sprintf(p, "%jdy", t / YEAR);
88 			t %= YEAR;
89 		}
90 		if (t >= DAY && t != 0) {
91 			p += sprintf(p, "%jdd", t / DAY);
92 			t %= DAY;
93 		}
94 		if (t >= HOUR && t != 0) {
95 			p += sprintf(p, "%jdh", t / HOUR);
96 			t %= HOUR;
97 		}
98 		if (t >= MINUTE && t != 0) {
99 			p += sprintf(p, "%jdm", t / MINUTE);
100 			t %= MINUTE;
101 		}
102 		if (t != 0 || tx == 0)
103 			p += sprintf(p, "%jds", t);
104 	} else  {
105 		p += sprintf(p, "%jd", (intmax_t)t);
106 	}
107 	if (pi->is_long || pi->is_long_double) {
108 		if (pi->prec >= 0)
109 			prec = pi->prec;
110 		for (i = prec; i < 9; i++)
111 			nsec /= 10;
112 		p += sprintf(p, ".%.*d", prec, nsec);
113 	}
114 	return(__printf_out(io, pi, buf, p - buf));
115 }
116