huwcampbell.com
Reactos
1/*
2 * TIMER.C - timer internal command.
3 *
4 * clone from 4nt timer command
5 *
6 * 20 Aug 1999
7 * started - Paolo Pantaleo <paolopan@freemail.it>
8 */
9
10#include "precomp.h"
11
12#ifdef INCLUDE_CMD_TIMER
13
14
15#define NCS_NOT_SPECIFIED -1
16#define NCS_ON 1
17#define NCS_OFF 0
18
19//print timer value
20#define PT(format) PrintElapsedTime(GetTickCount()-cT,format)
21
22
23//current timer Time (at wich started to count)
24#define cT clksT[clk_n]
25
26//current timer status
27#define cS clksS[clk_n]
28
29
30static VOID
31PrintElapsedTime (DWORD time,INT format)
32{
33 DWORD h,m,s,ms;
34
35 TRACE("PrintElapsedTime(%lu, %d)\n", time, format);
36
37 switch (format)
38 {
39 case 0:
40 ConOutResPrintf(STRING_TIMER_HELP1, time);
41 break;
42
43 case 1:
44 ms = time % 1000;
45 time /= 1000;
46 s = time % 60;
47 time /=60;
48 m = time % 60;
49 h = time / 60;
50 ConOutResPrintf(STRING_TIMER_HELP2,
51 h, cTimeSeparator,
52 m, cTimeSeparator,
53 s, cDecimalSeparator, ms/10);
54 break;
55 }
56}
57
58
59INT CommandTimer (LPTSTR param)
60{
61 // all timers are kept
62 static DWORD clksT[10];
63
64 // timers status
65 // set all the clocks off by default
66 static BOOL clksS[10]={FALSE,FALSE,FALSE,FALSE,
67 FALSE,FALSE,FALSE,FALSE,FALSE,FALSE};
68
69 // TRUE if /S in command line
70 BOOL bS = FALSE;
71
72 // avoid to set clk_n more than once
73 BOOL bCanNSet = TRUE;
74
75 INT NewClkStatus = NCS_NOT_SPECIFIED;
76
77 // the clock number specified on the command line
78 // 1 by default
79 INT clk_n=1;
80
81 // output format
82 INT iFormat=1;
83
84
85 // command line parsing variables
86 INT argc;
87 LPTSTR *p;
88
89 INT i;
90
91 if (_tcsncmp (param, _T("/?"), 2) == 0)
92 {
93 ConOutResPrintf(STRING_TIMER_HELP3, cTimeSeparator, cTimeSeparator, cDecimalSeparator);
94 return 0;
95 }
96
97 nErrorLevel = 0;
98
99 p = split (param, &argc, FALSE, FALSE);
100
101 //read options
102 for (i = 0; i < argc; i++)
103 {
104 //set timer on
105 if (!(_tcsicmp(&p[i][0],_T("on"))) && NewClkStatus == NCS_NOT_SPECIFIED)
106 {
107 NewClkStatus = NCS_ON;
108 continue;
109 }
110
111 //set timer off
112 if (!(_tcsicmp(&p[i][0],_T("off"))) && NewClkStatus == NCS_NOT_SPECIFIED)
113 {
114 NewClkStatus = NCS_OFF;
115 continue;
116 }
117
118 // other options
119 if (p[i][0] == _T('/'))
120 {
121 // set timer number
122 if (_istdigit(p[i][1]) && bCanNSet)
123 {
124 clk_n = p[i][1] - _T('0');
125 bCanNSet = FALSE;
126 continue;
127 }
128
129 // set s(plit) option
130 if (_totupper(p[i][1]) == _T('S'))
131 {
132 bS = TRUE;
133 continue;
134 }
135
136 // specify format
137 if (_totupper(p[i][1]) == _T('F'))
138 {
139 iFormat = p[i][2] - _T('0');
140 continue;
141 }
142 }
143 }
144
145 // do stuff (start/stop/read timer)
146 if (NewClkStatus == NCS_ON)
147 {
148 cT=GetTickCount();
149 cS=TRUE;
150
151 ConOutResPrintf (STRING_TIMER_TIME,clk_n,cS?_T("ON"):_T("OFF"));
152 ConOutPuts(GetTimeString());
153 freep(p);
154 return 0;
155 }
156
157 if (bS)
158 {
159 if (cS)
160 {
161 ConOutResPrintf (STRING_TIMER_TIME,clk_n,cS?_T("ON"):_T("OFF"));
162 ConOutPrintf(_T("%s\n"), GetTimeString());
163 PrintElapsedTime(GetTickCount()-cT, iFormat);
164 freep(p);
165 return 0;
166 }
167
168 cT=GetTickCount();
169 cS=TRUE;
170 ConOutResPrintf (STRING_TIMER_TIME,clk_n,cS?_T("ON"):_T("OFF"));
171 ConOutPuts(GetTimeString());
172 freep(p);
173 return 0;
174 }
175
176 if (NewClkStatus == NCS_NOT_SPECIFIED)
177 {
178 if (cS)
179 {
180 cS=FALSE;
181 ConOutResPrintf (STRING_TIMER_TIME,clk_n,cS?_T("ON"):_T("OFF"));
182 ConOutPrintf(_T("%s\n"), GetTimeString());
183 PrintElapsedTime(GetTickCount()-cT, iFormat);
184 freep(p);
185 return 0;
186 }
187
188 cT=GetTickCount();
189 cS=TRUE;
190 ConOutResPrintf (STRING_TIMER_TIME,clk_n,cS?_T("ON"):_T("OFF"));
191 ConOutPuts(GetTimeString());
192 freep(p);
193 return 0;
194 }
195
196
197 if (NewClkStatus == NCS_OFF)
198 {
199 if (cS)
200 {
201 cS=FALSE;
202 ConOutResPrintf (STRING_TIMER_TIME,clk_n,cS?_T("ON"):_T("OFF"));
203 ConOutPrintf(_T("%s\n"), GetTimeString());
204 PrintElapsedTime(GetTickCount()-cT, iFormat);
205 freep(p);
206 return 0;
207 }
208 ConOutResPrintf (STRING_TIMER_TIME,clk_n,cS?_T("ON"):_T("OFF"));
209 ConOutPuts(GetTimeString());
210 freep(p);
211 return 0;
212 }
213
214 freep(p);
215 return 0;
216}
217
218#endif /* INCLUDE_CMD_TIMER */