1da2e3ebdSchin /***********************************************************************
2da2e3ebdSchin * *
3da2e3ebdSchin * This software is part of the ast package *
4*3e14f97fSRoger A. Faulkner * Copyright (c) 1985-2010 AT&T Intellectual Property *
5da2e3ebdSchin * and is licensed under the *
6da2e3ebdSchin * Common Public License, Version 1.0 *
77c2fbfb3SApril Chin * by AT&T Intellectual Property *
8da2e3ebdSchin * *
9da2e3ebdSchin * A copy of the License is available at *
10da2e3ebdSchin * http://www.opensource.org/licenses/cpl1.0.txt *
11da2e3ebdSchin * (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9) *
12da2e3ebdSchin * *
13da2e3ebdSchin * Information and Software Systems Research *
14da2e3ebdSchin * AT&T Research *
15da2e3ebdSchin * Florham Park NJ *
16da2e3ebdSchin * *
17da2e3ebdSchin * Glenn Fowler <gsf@research.att.com> *
18da2e3ebdSchin * David Korn <dgk@research.att.com> *
19da2e3ebdSchin * Phong Vo <kpv@research.att.com> *
20da2e3ebdSchin * *
21da2e3ebdSchin ***********************************************************************/
22da2e3ebdSchin #pragma prototyped
23da2e3ebdSchin /*
24da2e3ebdSchin * return pointer to formatted elapsed time for u 1/n secs
25da2e3ebdSchin * compatible with strelapsed()
26da2e3ebdSchin * return value length is at most 7
27da2e3ebdSchin */
28da2e3ebdSchin
29da2e3ebdSchin #include <ast.h>
30da2e3ebdSchin
31da2e3ebdSchin char*
fmtelapsed(register unsigned long u,register int n)32da2e3ebdSchin fmtelapsed(register unsigned long u, register int n)
33da2e3ebdSchin {
34da2e3ebdSchin register unsigned long t;
35da2e3ebdSchin char* buf;
36da2e3ebdSchin int z;
37da2e3ebdSchin
38da2e3ebdSchin if (u == 0L)
39da2e3ebdSchin return "0";
40da2e3ebdSchin if (u == ~0L)
41da2e3ebdSchin return "%";
42da2e3ebdSchin buf = fmtbuf(z = 8);
43da2e3ebdSchin t = u / n;
44da2e3ebdSchin if (t < 60)
45da2e3ebdSchin sfsprintf(buf, z, "%lu.%02lus", t, (u * 100 / n) % 100);
46da2e3ebdSchin else if (t < 60*60)
47da2e3ebdSchin sfsprintf(buf, z, "%lum%02lus", t / 60, t - (t / 60) * 60);
48da2e3ebdSchin else if (t < 24*60*60)
49da2e3ebdSchin sfsprintf(buf, z, "%luh%02lum", t / (60*60), (t - (t / (60*60)) * (60*60)) / 60);
50da2e3ebdSchin else if (t < 7*24*60*60)
51da2e3ebdSchin sfsprintf(buf, z, "%lud%02luh", t / (24*60*60), (t - (t / (24*60*60)) * (24*60*60)) / (60*60));
52da2e3ebdSchin else if (t < 31*24*60*60)
53da2e3ebdSchin sfsprintf(buf, z, "%luw%02lud", t / (7*24*60*60), (t - (t / (7*24*60*60)) * (7*24*60*60)) / (24*60*60));
54da2e3ebdSchin else if (t < 365*24*60*60)
55da2e3ebdSchin sfsprintf(buf, z, "%luM%02lud", (t * 12) / (365*24*60*60), ((t * 12) - ((t * 12) / (365*24*60*60)) * (365*24*60*60)) / (12*24*60*60));
56da2e3ebdSchin else if (t < (365UL*4UL+1UL)*24UL*60UL*60UL)
57da2e3ebdSchin sfsprintf(buf, z, "%luY%02luM", t / (365*24*60*60), ((t - (t / (365*24*60*60)) * (365*24*60*60)) * 5) / (152 * 24 * 60 * 60));
58da2e3ebdSchin else
59da2e3ebdSchin sfsprintf(buf, z, "%luY%02luM", (t * 4) / ((365UL*4UL+1UL)*24UL*60UL*60UL), (((t * 4) - ((t * 4) / ((365UL*4UL+1UL)*24UL*60UL*60UL)) * ((365UL*4UL+1UL)*24UL*60UL*60UL)) * 5) / ((4 * 152 + 1) * 24 * 60 * 60));
60da2e3ebdSchin return buf;
61da2e3ebdSchin }
62