From 3950ffe2a485479f6561c27364d3d7df5a21d124 Mon Sep 17 00:00:00 2001 From: Igor Pashev Date: Sun, 24 Jun 2012 22:28:35 +0000 Subject: Imported Upstream version 93u+ --- src/lib/libast/string/fmtclock.c | 63 ++++++++++++++++++++++++++++++++++++++++ 1 file changed, 63 insertions(+) create mode 100644 src/lib/libast/string/fmtclock.c (limited to 'src/lib/libast/string/fmtclock.c') diff --git a/src/lib/libast/string/fmtclock.c b/src/lib/libast/string/fmtclock.c new file mode 100644 index 0000000..6e54cfa --- /dev/null +++ b/src/lib/libast/string/fmtclock.c @@ -0,0 +1,63 @@ +/*********************************************************************** +* * +* This software is part of the ast package * +* Copyright (c) 1985-2011 AT&T Intellectual Property * +* and is licensed under the * +* Eclipse Public License, Version 1.0 * +* by AT&T Intellectual Property * +* * +* A copy of the License is available at * +* http://www.eclipse.org/org/documents/epl-v10.html * +* (with md5 checksum b35adb5213ca9657e911e9befb180842) * +* * +* Information and Software Systems Research * +* AT&T Research * +* Florham Park NJ * +* * +* Glenn Fowler * +* David Korn * +* Phong Vo * +* * +***********************************************************************/ +#pragma prototyped +/* + * return pointer to formatted clock() tics t + * return value length is at most 6 + */ + +#include +#include + +char* +fmtclock(register Sfulong_t t) +{ + register int u; + char* buf; + int z; + + static unsigned int clk_tck; + + if (!clk_tck) + { +#ifdef CLOCKS_PER_SEC + clk_tck = CLOCKS_PER_SEC; +#else + if (!(clk_tck = (unsigned int)strtoul(astconf("CLK_TCK", NiL, NiL), NiL, 10))) + clk_tck = 60; +#endif + } + if (t == 0) + return "0"; + if (t == ((Sfulong_t)~0)) + return "%"; + t = (t * 1000000) / clk_tck; + if (t < 1000) + u = 'u'; + else if ((t /= 1000) < 1000) + u = 'm'; + else + return fmtelapsed(t / 10, 100); + buf = fmtbuf(z = 7); + sfsprintf(buf, z, "%I*u%cs", sizeof(t), t, u); + return buf; +} -- cgit v1.2.3