1 /***********************************************************************
2 * *
3 * This software is part of the ast package *
4 * Copyright (c) 1985-2011 AT&T Intellectual Property *
5 * and is licensed under the *
6 * Eclipse Public License, Version 1.0 *
7 * by AT&T Intellectual Property *
8 * *
9 * A copy of the License is available at *
10 * http://www.eclipse.org/org/documents/epl-v10.html *
11 * (with md5 checksum b35adb5213ca9657e911e9befb180842) *
12 * *
13 * Information and Software Systems Research *
14 * AT&T Research *
15 * Florham Park NJ *
16 * *
17 * Glenn Fowler <gsf@research.att.com> *
18 * David Korn <dgk@research.att.com> *
19 * Phong Vo <kpv@research.att.com> *
20 * *
21 ***********************************************************************/
22 #pragma prototyped
23 /*
24 * format decimal integer
25 * David Korn
26 * AT&T Research
27 */
28
29 #include <ast.h>
30
31 static const char table[]=
32 {
33 "000001002003004005006007008009010011012013014015016017018019"
34 "020021022023024025026027028029030031032033034035036037038039"
35 "040041042043044045046047048049050051052053054055056057058059"
36 "060061062063064065066067068069070071072073074075076077078079"
37 "080081082083084085086087088089090091092093094095096097098099"
38 "100101102103104105106107108109110111112113114115116117118119"
39 "120121122123124125126127128129130131132133134135136137138139"
40 "140141142143144145146147148149150151152153154155156157158159"
41 "160161162163164165166167168169170171172173174175176177178179"
42 "180181182183184185186187188189190191192193194195196197198199"
43 "200201202203204205206207208209210211212213214215216217218219"
44 "220221222223224225226227228229230231232233234235236237238239"
45 "240241242243244245246247248249250251252253254255256257258259"
46 "260261262263264265266267268269270271272273274275276277278279"
47 "280281282283284285286287288289290291292293294295296297298299"
48 "300301302303304305306307308309310311312313314315316317318319"
49 "320321322323324325326327328329330331332333334335336337338339"
50 "340341342343344345346347348349350351352353354355356357358359"
51 "360361362363364365366367368369370371372373374375376377378379"
52 "380381382383384385386387388389390391392393394395396397398399"
53 "400401402403404405406407408409410411412413414415416417418419"
54 "420421422423424425426427428429430431432433434435436437438439"
55 "440441442443444445446447448449450451452453454455456457458459"
56 "460461462463464465466467468469470471472473474475476477478479"
57 "480481482483484485486487488489490491492493494495496497498499"
58 "500501502503504505506507508509510511512513514515516517518519"
59 "520521522523524525526527528529530531532533534535536537538539"
60 "540541542543544545546547548549550551552553554555556557558559"
61 "560561562563564565566567568569570571572573574575576577578579"
62 "580581582583584585586587588589590591592593594595596597598599"
63 "600601602603604605606607608609610611612613614615616617618619"
64 "620621622623624625626627628629630631632633634635636637638639"
65 "640641642643644645646647648649650651652653654655656657658659"
66 "660661662663664665666667668669670671672673674675676677678679"
67 "680681682683684685686687688689690691692693694695696697698699"
68 "700701702703704705706707708709710711712713714715716717718719"
69 "720721722723724725726727728729730731732733734735736737738739"
70 "740741742743744745746747748749750751752753754755756757758759"
71 "760761762763764765766767768769770771772773774775776777778779"
72 "780781782783784785786787788789790791792793794795796797798799"
73 "800801802803804805806807808809810811812813814815816817818819"
74 "820821822823824825826827828829830831832833834835836837838839"
75 "840841842843844845846847848849850851852853854855856857858859"
76 "860861862863864865866867868869870871872873874875876877878879"
77 "880881882883884885886887888889890891892893894895896897898899"
78 "900901902903904905906907908909910911912913914915916917918919"
79 "920921922923924925926927928929930931932933934935936937938939"
80 "940941942943944945946947948949950951952953954955956957958959"
81 "960961962963964965966967968969970971972973974975976977978979"
82 "980981982983984985986987988989990991992993994995996997998999"
83 };
84
85 char*
fmtint(intmax_t ll,int unsign)86 fmtint(intmax_t ll, int unsign)
87 {
88 char *buff;
89 uintmax_t n,m;
90 int j=0,k=3*sizeof(ll);
91 if(unsign || ll>=0)
92 n = ll;
93 else
94 {
95 n = -ll;
96 j = 1;
97 }
98 if(n<10)
99 {
100 buff = fmtbuf(k=3);
101 buff[--k] = 0;
102 buff[--k] = '0' + n;
103 goto skip;
104 }
105 buff = fmtbuf(k);
106 buff[--k] = 0;
107 do
108 {
109 k -= 3;
110 if((m=n) >= 1000)
111 m = n%1000;
112 memcpy(buff+k,table+3*m,3);
113 n /= 1000;
114 }
115 while(n>0);
116 while(buff[k]=='0')
117 k++;
118 skip:
119 if(j)
120 buff[--k] = '-';
121 return(&buff[k]);
122 }
123