time-t-casting-fixes-20060404
[openafs.git] / src / afsmonitor / afsmon-output.c
1 /*
2  * Copyright 2000, International Business Machines Corporation and others.
3  * All Rights Reserved.
4  * 
5  * This software has been released under the terms of the IBM Public
6  * License.  For details, see the LICENSE file in the top-level source
7  * directory or online at http://www.openafs.org/dl/license10.html
8  */
9
10 /*
11  * Module:      afsmon-output.c
12  *              Outputs the xstat probe results to a file
13  *              Most of this code is taken from xstat_fs_test.c and
14  *              xstat_cm_test.c
15  *
16  *-------------------------------------------------------------------------*/
17
18 #include <stdio.h>
19 #include <time.h>
20 #include <afsconfig.h>
21 #include <afs/param.h>
22
23 #ifdef HAVE_STRING_H
24 #include <string.h>
25 #else
26 #ifdef HAVE_STRINGS_H
27 #include <strings.h>
28 #endif
29 #endif
30
31 RCSID
32     ("$Header$");
33
34 #include <afs/xstat_fs.h>
35 #include <afs/xstat_cm.h>
36
37
38
39 /* Extern Variables */
40 extern int afsmon_debug;        /* debugging on ? */
41 extern FILE *debugFD;           /* debug file FD */
42 extern char errMsg[256];        /* error message buffer */
43
44 extern int afsmon_Exit();       /* exit routine */
45
46 static FILE *fs_outFD;          /* fs output file descriptor */
47 static FILE *cm_outFD;          /* cm output file descriptor */
48
49 /* structures used by FS & CM stats print routines */
50
51 static char *fsOpNames[] = {
52     "FetchData",
53     "FetchACL",
54     "FetchStatus",
55     "StoreData",
56     "StoreACL",
57     "StoreStatus",
58     "RemoveFile",
59     "CreateFile",
60     "Rename",
61     "Symlink",
62     "Link",
63     "MakeDir",
64     "RemoveDir",
65     "SetLock",
66     "ExtendLock",
67     "ReleaseLock",
68     "GetStatistics",
69     "GiveUpCallbacks",
70     "GetVolumeInfo",
71     "GetVolumeStatus",
72     "SetVolumeStatus",
73     "GetRootVolume",
74     "CheckToken",
75     "GetTime",
76     "NGetVolumeInfo",
77     "BulkStatus",
78     "XStatsVersion",
79     "GetXStats"
80 };
81
82 static char *cmOpNames[] = {
83     "CallBack",
84     "InitCallBackState",
85     "Probe",
86     "GetLock",
87     "GetCE",
88     "XStatsVersion",
89     "GetXStats"
90 };
91
92 static char *xferOpNames[] = {
93     "FetchData",
94     "StoreData"
95 };
96
97 /*________________________________________________________________________
98                                 FS STATS ROUTINES 
99  *_______________________________________________________________________*/
100
101 /*------------------------------------------------------------------------
102  * Print_fs_OverallPerfInfo
103  *
104  * Description:
105  *      Print out overall performance numbers.
106  *
107  * Arguments:
108  *      a_ovP : Ptr to the overall performance numbers.
109  *
110  * Returns:
111  *      Nothing.
112  *
113  * Environment:
114  *      Nothing interesting.
115  *
116  * Side Effects:
117  *      As advertised.
118  *------------------------------------------------------------------------*/
119
120 void
121 Print_fs_OverallPerfInfo(a_ovP)
122      struct afs_PerfStats *a_ovP;
123
124 {                               /*Print_fs_OverallPerfInfo */
125
126     fprintf(fs_outFD, "\t%10d numPerfCalls\n\n", a_ovP->numPerfCalls);
127
128
129     /*
130      * Vnode cache section.
131      */
132     fprintf(fs_outFD, "\t%10d vcache_L_Entries\n", a_ovP->vcache_L_Entries);
133     fprintf(fs_outFD, "\t%10d vcache_L_Allocs\n", a_ovP->vcache_L_Allocs);
134     fprintf(fs_outFD, "\t%10d vcache_L_Gets\n", a_ovP->vcache_L_Gets);
135     fprintf(fs_outFD, "\t%10d vcache_L_Reads\n", a_ovP->vcache_L_Reads);
136     fprintf(fs_outFD, "\t%10d vcache_L_Writes\n\n", a_ovP->vcache_L_Writes);
137
138     fprintf(fs_outFD, "\t%10d vcache_S_Entries\n", a_ovP->vcache_S_Entries);
139     fprintf(fs_outFD, "\t%10d vcache_S_Allocs\n", a_ovP->vcache_S_Allocs);
140     fprintf(fs_outFD, "\t%10d vcache_S_Gets\n", a_ovP->vcache_S_Gets);
141     fprintf(fs_outFD, "\t%10d vcache_S_Reads\n", a_ovP->vcache_S_Reads);
142     fprintf(fs_outFD, "\t%10d vcache_S_Writes\n\n", a_ovP->vcache_S_Writes);
143
144     fprintf(fs_outFD, "\t%10d vcache_H_Entries\n", a_ovP->vcache_H_Entries);
145     fprintf(fs_outFD, "\t%10d vcache_H_Gets\n", a_ovP->vcache_H_Gets);
146     fprintf(fs_outFD, "\t%10d vcache_H_Replacements\n\n",
147             a_ovP->vcache_H_Replacements);
148
149     /*
150      * Directory package section.
151      */
152     fprintf(fs_outFD, "\t%10d dir_Buffers\n", a_ovP->dir_Buffers);
153     fprintf(fs_outFD, "\t%10d dir_Calls\n", a_ovP->dir_Calls);
154     fprintf(fs_outFD, "\t%10d dir_IOs\n\n", a_ovP->dir_IOs);
155
156     /*
157      * Rx section.
158      */
159     fprintf(fs_outFD, "\t%10d rx_packetRequests\n", a_ovP->rx_packetRequests);
160     fprintf(fs_outFD, "\t%10d rx_noPackets_RcvClass\n",
161             a_ovP->rx_noPackets_RcvClass);
162     fprintf(fs_outFD, "\t%10d rx_noPackets_SendClass\n",
163             a_ovP->rx_noPackets_SendClass);
164     fprintf(fs_outFD, "\t%10d rx_noPackets_SpecialClass\n",
165             a_ovP->rx_noPackets_SpecialClass);
166     fprintf(fs_outFD, "\t%10d rx_socketGreedy\n", a_ovP->rx_socketGreedy);
167     fprintf(fs_outFD, "\t%10d rx_bogusPacketOnRead\n",
168             a_ovP->rx_bogusPacketOnRead);
169     fprintf(fs_outFD, "\t%10d rx_bogusHost\n", a_ovP->rx_bogusHost);
170     fprintf(fs_outFD, "\t%10d rx_noPacketOnRead\n", a_ovP->rx_noPacketOnRead);
171     fprintf(fs_outFD, "\t%10d rx_noPacketBuffersOnRead\n",
172             a_ovP->rx_noPacketBuffersOnRead);
173     fprintf(fs_outFD, "\t%10d rx_selects\n", a_ovP->rx_selects);
174     fprintf(fs_outFD, "\t%10d rx_sendSelects\n", a_ovP->rx_sendSelects);
175     fprintf(fs_outFD, "\t%10d rx_packetsRead_RcvClass\n",
176             a_ovP->rx_packetsRead_RcvClass);
177     fprintf(fs_outFD, "\t%10d rx_packetsRead_SendClass\n",
178             a_ovP->rx_packetsRead_SendClass);
179     fprintf(fs_outFD, "\t%10d rx_packetsRead_SpecialClass\n",
180             a_ovP->rx_packetsRead_SpecialClass);
181     fprintf(fs_outFD, "\t%10d rx_dataPacketsRead\n",
182             a_ovP->rx_dataPacketsRead);
183     fprintf(fs_outFD, "\t%10d rx_ackPacketsRead\n", a_ovP->rx_ackPacketsRead);
184     fprintf(fs_outFD, "\t%10d rx_dupPacketsRead\n", a_ovP->rx_dupPacketsRead);
185     fprintf(fs_outFD, "\t%10d rx_spuriousPacketsRead\n",
186             a_ovP->rx_spuriousPacketsRead);
187     fprintf(fs_outFD, "\t%10d rx_packetsSent_RcvClass\n",
188             a_ovP->rx_packetsSent_RcvClass);
189     fprintf(fs_outFD, "\t%10d rx_packetsSent_SendClass\n",
190             a_ovP->rx_packetsSent_SendClass);
191     fprintf(fs_outFD, "\t%10d rx_packetsSent_SpecialClass\n",
192             a_ovP->rx_packetsSent_SpecialClass);
193     fprintf(fs_outFD, "\t%10d rx_ackPacketsSent\n", a_ovP->rx_ackPacketsSent);
194     fprintf(fs_outFD, "\t%10d rx_pingPacketsSent\n",
195             a_ovP->rx_pingPacketsSent);
196     fprintf(fs_outFD, "\t%10d rx_abortPacketsSent\n",
197             a_ovP->rx_abortPacketsSent);
198     fprintf(fs_outFD, "\t%10d rx_busyPacketsSent\n",
199             a_ovP->rx_busyPacketsSent);
200     fprintf(fs_outFD, "\t%10d rx_dataPacketsSent\n",
201             a_ovP->rx_dataPacketsSent);
202     fprintf(fs_outFD, "\t%10d rx_dataPacketsReSent\n",
203             a_ovP->rx_dataPacketsReSent);
204     fprintf(fs_outFD, "\t%10d rx_dataPacketsPushed\n",
205             a_ovP->rx_dataPacketsPushed);
206     fprintf(fs_outFD, "\t%10d rx_ignoreAckedPacket\n",
207             a_ovP->rx_ignoreAckedPacket);
208     fprintf(fs_outFD, "\t%10d rx_totalRtt_Sec\n", a_ovP->rx_totalRtt_Sec);
209     fprintf(fs_outFD, "\t%10d rx_totalRtt_Usec\n", a_ovP->rx_totalRtt_Usec);
210     fprintf(fs_outFD, "\t%10d rx_minRtt_Sec\n", a_ovP->rx_minRtt_Sec);
211     fprintf(fs_outFD, "\t%10d rx_minRtt_Usec\n", a_ovP->rx_minRtt_Usec);
212     fprintf(fs_outFD, "\t%10d rx_maxRtt_Sec\n", a_ovP->rx_maxRtt_Sec);
213     fprintf(fs_outFD, "\t%10d rx_maxRtt_Usec\n", a_ovP->rx_maxRtt_Usec);
214     fprintf(fs_outFD, "\t%10d rx_nRttSamples\n", a_ovP->rx_nRttSamples);
215     fprintf(fs_outFD, "\t%10d rx_nServerConns\n", a_ovP->rx_nServerConns);
216     fprintf(fs_outFD, "\t%10d rx_nClientConns\n", a_ovP->rx_nClientConns);
217     fprintf(fs_outFD, "\t%10d rx_nPeerStructs\n", a_ovP->rx_nPeerStructs);
218     fprintf(fs_outFD, "\t%10d rx_nCallStructs\n", a_ovP->rx_nCallStructs);
219     fprintf(fs_outFD, "\t%10d rx_nFreeCallStructs\n\n",
220             a_ovP->rx_nFreeCallStructs);
221
222     /*
223      * Host module fields.
224      */
225     fprintf(fs_outFD, "\t%10d host_NumHostEntries\n",
226             a_ovP->host_NumHostEntries);
227     fprintf(fs_outFD, "\t%10d host_HostBlocks\n", a_ovP->host_HostBlocks);
228     fprintf(fs_outFD, "\t%10d host_NonDeletedHosts\n",
229             a_ovP->host_NonDeletedHosts);
230     fprintf(fs_outFD, "\t%10d host_HostsInSameNetOrSubnet\n",
231             a_ovP->host_HostsInSameNetOrSubnet);
232     fprintf(fs_outFD, "\t%10d host_HostsInDiffSubnet\n",
233             a_ovP->host_HostsInDiffSubnet);
234     fprintf(fs_outFD, "\t%10d host_HostsInDiffNetwork\n",
235             a_ovP->host_HostsInDiffNetwork);
236     fprintf(fs_outFD, "\t%10d host_NumClients\n", a_ovP->host_NumClients);
237     fprintf(fs_outFD, "\t%10d host_ClientBlocks\n\n",
238             a_ovP->host_ClientBlocks);
239
240 }                               /*Print_fs_OverallPerfInfo */
241
242
243 /*------------------------------------------------------------------------
244  * Print_fs_OpTiming
245  *
246  * Description:
247  *      Print out the contents of an RPC op timing structure.
248  *
249  * Arguments:
250  *      a_opIdx   : Index of the AFS operation we're printing number on.
251  *      a_opTimeP : Ptr to the op timing structure to print.
252  *
253  * Returns:
254  *      Nothing.
255  *
256  * Environment:
257  *      Nothing interesting.
258  *
259  * Side Effects:
260  *      As advertised.
261  *------------------------------------------------------------------------*/
262
263 void
264 Print_fs_OpTiming(a_opIdx, a_opTimeP)
265      int a_opIdx;
266      struct fs_stats_opTimingData *a_opTimeP;
267
268 {                               /*Print_fs_OpTiming */
269
270     fprintf(fs_outFD,
271             "%15s: %d ops (%d OK); sum=%d.%06d, min=%d.%06d, max=%d.%06d\n",
272             fsOpNames[a_opIdx], a_opTimeP->numOps, a_opTimeP->numSuccesses,
273             a_opTimeP->sumTime.tv_sec, a_opTimeP->sumTime.tv_usec,
274             a_opTimeP->minTime.tv_sec, a_opTimeP->minTime.tv_usec,
275             a_opTimeP->maxTime.tv_sec, a_opTimeP->maxTime.tv_usec);
276
277 }                               /*Print_fs_OpTiming */
278
279
280 /*------------------------------------------------------------------------
281  * Print_fs_XferTiming
282  *
283  * Description:
284  *      Print out the contents of a data transfer structure.
285  *
286  * Arguments:
287  *      a_opIdx : Index of the AFS operation we're printing number on.
288  *      a_xferP : Ptr to the data transfer structure to print.
289  *
290  * Returns:
291  *      Nothing.
292  *
293  * Environment:
294  *      Nothing interesting.
295  *
296  * Side Effects:
297  *      As advertised.
298  *------------------------------------------------------------------------*/
299
300 void
301 Print_fs_XferTiming(a_opIdx, a_xferP)
302      int a_opIdx;
303      struct fs_stats_xferData *a_xferP;
304
305 {                               /*Print_fs_XferTiming */
306
307     fprintf(fs_outFD,
308             "%s: %d xfers (%d OK), time sum=%d.%06d, min=%d.%06d, max=%d.%06d\n",
309             xferOpNames[a_opIdx], a_xferP->numXfers, a_xferP->numSuccesses,
310             a_xferP->sumTime.tv_sec, a_xferP->sumTime.tv_usec,
311             a_xferP->minTime.tv_sec, a_xferP->minTime.tv_usec,
312             a_xferP->maxTime.tv_sec, a_xferP->maxTime.tv_usec);
313     fprintf(fs_outFD, "\t[bytes: sum=%d, min=%d, max=%d]\n",
314             a_xferP->sumBytes, a_xferP->minBytes, a_xferP->maxBytes);
315     fprintf(fs_outFD,
316             "\t[buckets: 0: %d, 1: %d, 2: %d, 3: %d, 4: %d, 5: %d 6: %d, 7: %d, 8: %d]\n",
317             a_xferP->count[0], a_xferP->count[1], a_xferP->count[2],
318             a_xferP->count[3], a_xferP->count[4], a_xferP->count[5],
319             a_xferP->count[6], a_xferP->count[7], a_xferP->count[8]);
320
321 }                               /*Print_fs_XferTiming */
322
323
324 /*------------------------------------------------------------------------
325  * Print_fs_DetailedPerfInfo
326  *
327  * Description:
328  *      Print out a set of detailed performance numbers.
329  *
330  * Arguments:
331  *      a_detP : Ptr to detailed perf numbers to print.
332  *
333  * Returns:
334  *      Nothing.
335  *
336  * Environment:
337  *      Nothing interesting.
338  *
339  * Side Effects:
340  *      As advertised.
341  *------------------------------------------------------------------------*/
342
343 void
344 Print_fs_DetailedPerfInfo(a_detP)
345      struct fs_stats_DetailedStats *a_detP;
346
347 {                               /*Print_fs_DetailedPerfInfo */
348
349     int currIdx;                /*Loop variable */
350
351     fprintf(fs_outFD, "\t%10d epoch\n", a_detP->epoch);
352
353     for (currIdx = 0; currIdx < FS_STATS_NUM_RPC_OPS; currIdx++)
354         Print_fs_OpTiming(currIdx, &(a_detP->rpcOpTimes[currIdx]));
355
356     for (currIdx = 0; currIdx < FS_STATS_NUM_XFER_OPS; currIdx++)
357         Print_fs_XferTiming(currIdx, &(a_detP->xferOpTimes[currIdx]));
358
359 }                               /*Print_fs_DetailedPerfInfo */
360
361
362 /*------------------------------------------------------------------------
363  * Print_fs_FullPerfInfo
364  *
365  * Description:
366  *      Print out the AFS_XSTATSCOLL_FULL_PERF_INFO collection we just
367  *      received.
368  *
369  * Arguments:
370  *      None.
371  *
372  * Returns:
373  *      Nothing.
374  *
375  * Environment:
376  *      All the info we need is nestled into xstat_fs_Results.
377  *
378  * Side Effects:
379  *      As advertised.
380  *------------------------------------------------------------------------*/
381
382 void
383 Print_fs_FullPerfInfo(a_fs_Results)
384      struct xstat_fs_ProbeResults *a_fs_Results;        /* ptr to fs results */
385 {                               /*Print_fs_FullPerfInfo */
386
387     static char rn[] = "Print_fs_FullPerfInfo"; /*Routine name */
388     static afs_int32 fullPerfLongs = (sizeof(struct fs_stats_FullPerfStats) >> 2);      /*Correct # longs to rcv */
389     afs_int32 numLongs;         /*# longwords received */
390     struct fs_stats_FullPerfStats *fullPerfP;   /*Ptr to full perf stats */
391     char *printableTime;        /*Ptr to printable time string */
392     time_t probeTime;
393
394     numLongs = a_fs_Results->data.AFS_CollData_len;
395     if (numLongs != fullPerfLongs) {
396         fprintf(fs_outFD,
397                 " ** Data size mismatch in full performance collection!\n");
398         fprintf(fs_outFD, " ** Expecting %d, got %d\n", fullPerfLongs,
399                 numLongs);
400         return;
401     }
402
403     probeTime = a_fs_Results->probeTime;
404     printableTime = ctime(&probeTime);
405     printableTime[strlen(printableTime) - 1] = '\0';
406     fullPerfP = (struct fs_stats_FullPerfStats *)
407         (a_fs_Results->data.AFS_CollData_val);
408
409     fprintf(fs_outFD,
410             "AFS_XSTATSCOLL_FULL_PERF_INFO (coll %d) for FS %s\n[Probe %d, %s]\n\n",
411             a_fs_Results->collectionNumber, a_fs_Results->connP->hostName,
412             a_fs_Results->probeNum, printableTime);
413
414     Print_fs_OverallPerfInfo(&(fullPerfP->overall));
415     Print_fs_DetailedPerfInfo(&(fullPerfP->det));
416
417 }                               /*Print_fs_FullPerfInfo */
418
419
420 /*------------------------------------------------------------------------
421  * afsmon_fsOutput()
422  *
423  * Description:
424  *      Prints the contents of xstat_fs_Results to an output file. The 
425  *      output is either in a compact (longs only) format or a detailed
426  *      format giving the names of each of the datums. Output is appended.
427  *
428  * Arguments:
429  *      Name of output file.
430  *      Flag to indicate if detailed output is required.
431  *
432  * Returns:
433  *      Nothing.
434  *
435  * Environment:
436  *      All the info we need is nestled into xstat_fs_Results.
437  *
438  * Side Effects:
439  *      As advertised.
440  *------------------------------------------------------------------------*/
441 int
442 afsmon_fsOutput(a_outfile, a_detOutput)
443      char *a_outfile;           /* ptr to output file name */
444      int a_detOutput;           /* detailed output ? */
445 {
446
447     static char rn[] = "afsmon_fsOutput";       /* routine name */
448     char *printTime;            /* ptr to time string */
449     char *hostname;             /* fileserner name */
450     afs_int32 numLongs;         /* longwords in result */
451     afs_int32 *currLong;        /* ptr to longwords in result */
452     int i;
453     time_t probeTime;
454
455     if (afsmon_debug) {
456         fprintf(debugFD, "[ %s ] Called, a_outfile= %s, a_detOutput= %d\n",
457                 rn, a_outfile, a_detOutput);
458         fflush(debugFD);
459     }
460
461     fs_outFD = fopen(a_outfile, "a");
462     if (fs_outFD == (FILE *) 0) {
463         sprintf(errMsg, "[ %s ] failed to open output file %s", rn,
464                 a_outfile);
465         afsmon_Exit(1);
466     }
467
468     /* get the probe time and strip the \n at the end */
469     probeTime = xstat_fs_Results.probeTime;
470     printTime = ctime(&probeTime);
471     printTime[strlen(printTime) - 1] = '\0';
472     hostname = xstat_fs_Results.connP->hostName;
473
474     /* print "time hostname FS" */
475     fprintf(fs_outFD, "\n%s %s FS ", printTime, hostname);
476
477     /* if probe failed print -1 and return */
478     if (xstat_fs_Results.probeOK) {
479         fprintf(fs_outFD, "-1\n");
480         fclose(fs_outFD);
481         return (0);
482     }
483
484     /* print out the probe information as  long words */
485     numLongs = xstat_fs_Results.data.AFS_CollData_len;
486     currLong = (afs_int32 *) (xstat_fs_Results.data.AFS_CollData_val);
487
488     for (i = 0; i < numLongs; i++) {
489         fprintf(fs_outFD, "%d ", *currLong++);
490     }
491     fprintf(fs_outFD, "\n\n");
492
493     /* print detailed information */
494     if (a_detOutput) {
495         Print_fs_FullPerfInfo(&xstat_fs_Results);
496         fflush(fs_outFD);
497     }
498
499     if (fclose(fs_outFD))
500         if (afsmon_debug) {
501             fprintf(debugFD, "[ %s ] failed to close %s\n", rn, a_outfile);
502             fflush(debugFD);
503         }
504
505     return (0);
506 }
507
508 /*___________________________________________________________________________
509                         CM STATS
510  *__________________________________________________________________________*/
511
512
513
514 /*------------------------------------------------------------------------
515  * Print_cm_UpDownStats
516  *
517  * Description:
518  *      Print the up/downtime stats for the given class of server records
519  *      provided.
520  *
521  * Arguments:
522  *      a_upDownP : Ptr to the server up/down info.
523  *
524  * Returns:
525  *      Nothing.
526  *
527  * Environment:
528  *      Nothing interesting.
529  *
530  * Side Effects:
531  *      As advertised.
532  *------------------------------------------------------------------------*/
533
534 void
535 Print_cm_UpDownStats(a_upDownP)
536      struct afs_stats_SrvUpDownInfo *a_upDownP; /*Ptr to server up/down info */
537
538 {                               /*Print_cm_UpDownStats */
539
540     /*
541      * First, print the simple values.
542      */
543     fprintf(cm_outFD, "\t\t%10d numTtlRecords\n", a_upDownP->numTtlRecords);
544     fprintf(cm_outFD, "\t\t%10d numUpRecords\n", a_upDownP->numUpRecords);
545     fprintf(cm_outFD, "\t\t%10d numDownRecords\n", a_upDownP->numDownRecords);
546     fprintf(cm_outFD, "\t\t%10d sumOfRecordAges\n",
547             a_upDownP->sumOfRecordAges);
548     fprintf(cm_outFD, "\t\t%10d ageOfYoungestRecord\n",
549             a_upDownP->ageOfYoungestRecord);
550     fprintf(cm_outFD, "\t\t%10d ageOfOldestRecord\n",
551             a_upDownP->ageOfOldestRecord);
552     fprintf(cm_outFD, "\t\t%10d numDowntimeIncidents\n",
553             a_upDownP->numDowntimeIncidents);
554     fprintf(cm_outFD, "\t\t%10d numRecordsNeverDown\n",
555             a_upDownP->numRecordsNeverDown);
556     fprintf(cm_outFD, "\t\t%10d maxDowntimesInARecord\n",
557             a_upDownP->maxDowntimesInARecord);
558     fprintf(cm_outFD, "\t\t%10d sumOfDowntimes\n", a_upDownP->sumOfDowntimes);
559     fprintf(cm_outFD, "\t\t%10d shortestDowntime\n",
560             a_upDownP->shortestDowntime);
561     fprintf(cm_outFD, "\t\t%10d longestDowntime\n",
562             a_upDownP->longestDowntime);
563
564     /*
565      * Now, print the array values.
566      */
567     fprintf(cm_outFD, "\t\tDowntime duration distribution:\n");
568     fprintf(cm_outFD, "\t\t\t%8d: 0 min .. 10 min\n",
569             a_upDownP->downDurations[0]);
570     fprintf(cm_outFD, "\t\t\t%8d: 10 min .. 30 min\n",
571             a_upDownP->downDurations[1]);
572     fprintf(cm_outFD, "\t\t\t%8d: 30 min .. 1 hr\n",
573             a_upDownP->downDurations[2]);
574     fprintf(cm_outFD, "\t\t\t%8d: 1 hr .. 2 hr\n",
575             a_upDownP->downDurations[3]);
576     fprintf(cm_outFD, "\t\t\t%8d: 2 hr .. 4 hr\n",
577             a_upDownP->downDurations[4]);
578     fprintf(cm_outFD, "\t\t\t%8d: 4 hr .. 8 hr\n",
579             a_upDownP->downDurations[5]);
580     fprintf(cm_outFD, "\t\t\t%8d: > 8 hr\n", a_upDownP->downDurations[6]);
581
582     fprintf(cm_outFD, "\t\tDowntime incident distribution:\n");
583     fprintf(cm_outFD, "\t\t\t%8d: 0 times\n", a_upDownP->downIncidents[0]);
584     fprintf(cm_outFD, "\t\t\t%8d: 1 time\n", a_upDownP->downIncidents[1]);
585     fprintf(cm_outFD, "\t\t\t%8d: 2 .. 5 times\n",
586             a_upDownP->downIncidents[2]);
587     fprintf(cm_outFD, "\t\t\t%8d: 6 .. 10 times\n",
588             a_upDownP->downIncidents[3]);
589     fprintf(cm_outFD, "\t\t\t%8d: 10 .. 50 times\n",
590             a_upDownP->downIncidents[4]);
591     fprintf(cm_outFD, "\t\t\t%8d: > 50 times\n", a_upDownP->downIncidents[5]);
592
593 }                               /*Print_cm_UpDownStats */
594
595
596 /*------------------------------------------------------------------------
597  * Print_cm_OverallPerfInfo
598  *
599  * Description:
600  *      Print out overall performance numbers.
601  *
602  * Arguments:
603  *      a_ovP : Ptr to the overall performance numbers.
604  *
605  * Returns:
606  *      Nothing.
607  *
608  * Environment:
609  *      All the info we need is nestled into xstat_cm_Results.
610  *
611  * Side Effects:
612  *      As advertised.
613  *------------------------------------------------------------------------*/
614
615 void
616 Print_cm_OverallPerfInfo(a_ovP)
617      struct afs_stats_CMPerf *a_ovP;
618
619 {                               /*Print_cm_OverallPerfInfo */
620
621     fprintf(cm_outFD, "\t%10d numPerfCalls\n", a_ovP->numPerfCalls);
622
623     fprintf(cm_outFD, "\t%10d epoch\n", a_ovP->epoch);
624     fprintf(cm_outFD, "\t%10d numCellsVisible\n", a_ovP->numCellsVisible);
625     fprintf(cm_outFD, "\t%10d numCellsContacted\n", a_ovP->numCellsContacted);
626     fprintf(cm_outFD, "\t%10d dlocalAccesses\n", a_ovP->dlocalAccesses);
627     fprintf(cm_outFD, "\t%10d vlocalAccesses\n", a_ovP->vlocalAccesses);
628     fprintf(cm_outFD, "\t%10d dremoteAccesses\n", a_ovP->dremoteAccesses);
629     fprintf(cm_outFD, "\t%10d vremoteAccesses\n", a_ovP->vremoteAccesses);
630     fprintf(cm_outFD, "\t%10d cacheNumEntries\n", a_ovP->cacheNumEntries);
631     fprintf(cm_outFD, "\t%10d cacheBlocksTotal\n", a_ovP->cacheBlocksTotal);
632     fprintf(cm_outFD, "\t%10d cacheBlocksInUse\n", a_ovP->cacheBlocksInUse);
633     fprintf(cm_outFD, "\t%10d cacheBlocksOrig\n", a_ovP->cacheBlocksOrig);
634     fprintf(cm_outFD, "\t%10d cacheMaxDirtyChunks\n",
635             a_ovP->cacheMaxDirtyChunks);
636     fprintf(cm_outFD, "\t%10d cacheCurrDirtyChunks\n",
637             a_ovP->cacheCurrDirtyChunks);
638     fprintf(cm_outFD, "\t%10d dcacheHits\n", a_ovP->dcacheHits);
639     fprintf(cm_outFD, "\t%10d vcacheHits\n", a_ovP->vcacheHits);
640     fprintf(cm_outFD, "\t%10d dcacheMisses\n", a_ovP->dcacheMisses);
641     fprintf(cm_outFD, "\t%10d vcacheMisses\n", a_ovP->vcacheMisses);
642     fprintf(cm_outFD, "\t%10d cacheFilesReused\n", a_ovP->cacheFilesReused);
643     fprintf(cm_outFD, "\t%10d vcacheXAllocs\n", a_ovP->vcacheXAllocs);
644
645     fprintf(cm_outFD, "\t%10d bufAlloced\n", a_ovP->bufAlloced);
646     fprintf(cm_outFD, "\t%10d bufHits\n", a_ovP->bufHits);
647     fprintf(cm_outFD, "\t%10d bufMisses\n", a_ovP->bufMisses);
648     fprintf(cm_outFD, "\t%10d bufFlushDirty\n", a_ovP->bufFlushDirty);
649
650     fprintf(cm_outFD, "\t%10d LargeBlocksActive\n", a_ovP->LargeBlocksActive);
651     fprintf(cm_outFD, "\t%10d LargeBlocksAlloced\n",
652             a_ovP->LargeBlocksAlloced);
653     fprintf(cm_outFD, "\t%10d SmallBlocksActive\n", a_ovP->SmallBlocksActive);
654     fprintf(cm_outFD, "\t%10d SmallBlocksAlloced\n",
655             a_ovP->SmallBlocksAlloced);
656     fprintf(cm_outFD, "\t%10d OutStandingMemUsage\n",
657             a_ovP->OutStandingMemUsage);
658     fprintf(cm_outFD, "\t%10d OutStandingAllocs\n", a_ovP->OutStandingAllocs);
659     fprintf(cm_outFD, "\t%10d CallBackAlloced\n", a_ovP->CallBackAlloced);
660     fprintf(cm_outFD, "\t%10d CallBackFlushes\n", a_ovP->CallBackFlushes);
661
662     fprintf(cm_outFD, "\t%10d srvRecords\n", a_ovP->srvRecords);
663     fprintf(cm_outFD, "\t%10d srvNumBuckets\n", a_ovP->srvNumBuckets);
664     fprintf(cm_outFD, "\t%10d srvMaxChainLength\n", a_ovP->srvMaxChainLength);
665     fprintf(cm_outFD, "\t%10d srvMaxChainLengthHWM\n",
666             a_ovP->srvMaxChainLengthHWM);
667     fprintf(cm_outFD, "\t%10d srvRecordsHWM\n", a_ovP->srvRecordsHWM);
668
669     fprintf(cm_outFD, "\t%10d sysName_ID\n", a_ovP->sysName_ID);
670
671     fprintf(cm_outFD, "\tFile Server up/downtimes, same cell:\n");
672     Print_cm_UpDownStats(&(a_ovP->fs_UpDown[0]));
673
674     fprintf(cm_outFD, "\tFile Server up/downtimes, diff cell:\n");
675     Print_cm_UpDownStats(&(a_ovP->fs_UpDown[1]));
676
677     fprintf(cm_outFD, "\tVL Server up/downtimes, same cell:\n");
678     Print_cm_UpDownStats(&(a_ovP->vl_UpDown[0]));
679
680     fprintf(cm_outFD, "\tVL Server up/downtimes, diff cell:\n");
681     Print_cm_UpDownStats(&(a_ovP->vl_UpDown[1]));
682
683 }                               /*Print_cm_OverallPerfInfo */
684
685
686 /*------------------------------------------------------------------------
687  * Print_cm_PerfInfo
688  *
689  * Description:
690  *      Print out the AFSCB_XSTATSCOLL_PERF_INFO collection we just
691  *      received.
692  *
693  * Arguments:
694  *      None.
695  *
696  * Returns:
697  *      Nothing.
698  *
699  * Environment:
700  *      All the info we need is nestled into xstat_cm_Results.
701  *
702  * Side Effects:
703  *      As advertised.
704  *------------------------------------------------------------------------*/
705
706 void
707 Print_cm_PerfInfo()
708 {                               /*Print_cm_PerfInfo */
709
710     static char rn[] = "Print_cm_PerfInfo";     /*Routine name */
711     static afs_int32 perfLongs = (sizeof(struct afs_stats_CMPerf) >> 2);        /*Correct # longs to rcv */
712     afs_int32 numLongs;         /*# longwords received */
713     struct afs_stats_CMPerf *perfP;     /*Ptr to performance stats */
714     char *printableTime;        /*Ptr to printable time string */
715     time_t probeTime;
716
717     numLongs = xstat_cm_Results.data.AFSCB_CollData_len;
718     if (numLongs != perfLongs) {
719         fprintf(cm_outFD,
720                 " ** Data size mismatch in performance collection!\n");
721         fprintf(cm_outFD, "** Expecting %d, got %d\n", perfLongs, numLongs);
722         return;
723     }
724
725     probeTime = xstat_cm_Results.probeTime;
726     printableTime = ctime(&probeTime);
727     printableTime[strlen(printableTime) - 1] = '\0';
728     perfP = (struct afs_stats_CMPerf *)
729         (xstat_cm_Results.data.AFSCB_CollData_val);
730
731     fprintf(cm_outFD,
732             "AFSCB_XSTATSCOLL_PERF_INFO (coll %d) for CM %s\n[Probe %d, %s]\n\n",
733             xstat_cm_Results.collectionNumber,
734             xstat_cm_Results.connP->hostName, xstat_cm_Results.probeNum,
735             printableTime);
736
737     Print_cm_OverallPerfInfo(perfP);
738
739 }                               /*Print_cm_PerfInfo */
740
741
742 /*------------------------------------------------------------------------
743  * Print_cm_OpTiming
744  *
745  * Description:
746  *      Print out the contents of an FS RPC op timing structure.
747  *
748  * Arguments:
749  *      a_opIdx   : Index of the AFS operation we're printing number on.
750  *      a_opNames : Ptr to table of operaton names.
751  *      a_opTimeP : Ptr to the op timing structure to print.
752  *
753  * Returns:
754  *      Nothing.
755  *
756  * Environment:
757  *      Nothing interesting.
758  *
759  * Side Effects:
760  *      As advertised.
761  *------------------------------------------------------------------------*/
762
763 void
764 Print_cm_OpTiming(a_opIdx, a_opNames, a_opTimeP)
765      int a_opIdx;
766      char *a_opNames[];
767      struct afs_stats_opTimingData *a_opTimeP;
768
769 {                               /*Print_cm_OpTiming */
770
771     fprintf(cm_outFD,
772             "%15s: %d ops (%d OK); sum=%d.%06d, min=%d.%06d, max=%d.%06d\n",
773             a_opNames[a_opIdx], a_opTimeP->numOps, a_opTimeP->numSuccesses,
774             a_opTimeP->sumTime.tv_sec, a_opTimeP->sumTime.tv_usec,
775             a_opTimeP->minTime.tv_sec, a_opTimeP->minTime.tv_usec,
776             a_opTimeP->maxTime.tv_sec, a_opTimeP->maxTime.tv_usec);
777
778 }                               /*Print_cm_OpTiming */
779
780
781 /*------------------------------------------------------------------------
782  * Print_cm_XferTiming
783  *
784  * Description:
785  *      Print out the contents of a data transfer structure.
786  *
787  * Arguments:
788  *      a_opIdx : Index of the AFS operation we're printing number on.
789  *      a_xferP : Ptr to the data transfer structure to print.
790  *
791  * Returns:
792  *      Nothing.
793  *
794  * Environment:
795  *      Nothing interesting.
796  *
797  * Side Effects:
798  *      As advertised.
799  *------------------------------------------------------------------------*/
800
801 void
802 Print_cm_XferTiming(a_opIdx, a_opNames, a_xferP)
803      int a_opIdx;
804      char *a_opNames[];
805      struct afs_stats_xferData *a_xferP;
806
807 {                               /*Print_cm_XferTiming */
808
809     fprintf(cm_outFD,
810             "%s: %d xfers (%d OK), time sum=%d.%06d, min=%d.%06d, max=%d.%06d\n",
811             a_opNames[a_opIdx], a_xferP->numXfers, a_xferP->numSuccesses,
812             a_xferP->sumTime.tv_sec, a_xferP->sumTime.tv_usec,
813             a_xferP->minTime.tv_sec, a_xferP->minTime.tv_usec,
814             a_xferP->maxTime.tv_sec, a_xferP->maxTime.tv_usec);
815     fprintf(cm_outFD, "\t[bytes: sum=%d, min=%d, max=%d]\n",
816             a_xferP->sumBytes, a_xferP->minBytes, a_xferP->maxBytes);
817     fprintf(cm_outFD,
818             "\t[buckets: 0: %d, 1: %d, 2: %d, 3: %d, 4: %d, 5: %d 6: %d, 7: %d, 8: %d]\n",
819             a_xferP->count[0], a_xferP->count[1], a_xferP->count[2],
820             a_xferP->count[3], a_xferP->count[4], a_xferP->count[5],
821             a_xferP->count[6], a_xferP->count[7], a_xferP->count[8]);
822
823 }                               /*Print_cm_XferTiming */
824
825
826 /*------------------------------------------------------------------------
827  * Print_cm_ErrInfo
828  *
829  * Description:
830  *      Print out the contents of an FS RPC error info structure.
831  *
832  * Arguments:
833  *      a_opIdx   : Index of the AFS operation we're printing.
834  *      a_opNames : Ptr to table of operation names.
835  *      a_opErrP  : Ptr to the op timing structure to print.
836  *
837  * Returns:
838  *      Nothing.
839  *
840  * Environment:
841  *      Nothing interesting.
842  *
843  * Side Effects:
844  *      As advertised.
845  *------------------------------------------------------------------------*/
846
847 void
848 Print_cm_ErrInfo(a_opIdx, a_opNames, a_opErrP)
849      int a_opIdx;
850      char *a_opNames[];
851      struct afs_stats_RPCErrors *a_opErrP;
852
853 {                               /*Print_cm_ErrInfo */
854
855     fprintf(cm_outFD,
856             "%15s: %d server, %d network, %d prot, %d vol, %d busies, %d other\n",
857             a_opNames[a_opIdx], a_opErrP->err_Server, a_opErrP->err_Network,
858             a_opErrP->err_Protection, a_opErrP->err_Volume,
859             a_opErrP->err_VolumeBusies, a_opErrP->err_Other);
860
861 }                               /*Print_cm_ErrInfo */
862
863
864 /*------------------------------------------------------------------------
865  * Print_cm_RPCPerfInfo
866  *
867  * Description:
868  *      Print out a set of RPC performance numbers.
869  *
870  * Arguments:
871  *      a_rpcP : Ptr to RPC perf numbers to print.
872  *
873  * Returns:
874  *      Nothing.
875  *
876  * Environment:
877  *      Nothing interesting.
878  *
879  * Side Effects:
880  *      As advertised.
881  *------------------------------------------------------------------------*/
882
883 void
884 Print_cm_RPCPerfInfo(a_rpcP)
885      struct afs_stats_RPCOpInfo *a_rpcP;
886
887 {                               /*Print_cm_RPCPerfInfo */
888
889     int currIdx;                /*Loop variable */
890
891     /*
892      * Print the contents of each of the opcode-related arrays.
893      */
894     fprintf(cm_outFD, "FS Operation Timings:\n---------------------\n");
895     for (currIdx = 0; currIdx < AFS_STATS_NUM_FS_RPC_OPS; currIdx++)
896         Print_cm_OpTiming(currIdx, fsOpNames, &(a_rpcP->fsRPCTimes[currIdx]));
897
898     fprintf(cm_outFD, "\nError Info:\n-----------\n");
899     for (currIdx = 0; currIdx < AFS_STATS_NUM_FS_RPC_OPS; currIdx++)
900         Print_cm_ErrInfo(currIdx, fsOpNames, &(a_rpcP->fsRPCErrors[currIdx]));
901
902     fprintf(cm_outFD, "\nTransfer timings:\n-----------------\n");
903     for (currIdx = 0; currIdx < AFS_STATS_NUM_FS_XFER_OPS; currIdx++)
904         Print_cm_XferTiming(currIdx, xferOpNames,
905                             &(a_rpcP->fsXferTimes[currIdx]));
906
907     fprintf(cm_outFD, "\nCM Operation Timings:\n---------------------\n");
908     for (currIdx = 0; currIdx < AFS_STATS_NUM_CM_RPC_OPS; currIdx++)
909         Print_cm_OpTiming(currIdx, cmOpNames, &(a_rpcP->cmRPCTimes[currIdx]));
910
911 }                               /*Print_cm_RPCPerfInfo */
912
913
914 /*------------------------------------------------------------------------
915  * Print_cm_FullPerfInfo
916  *
917  * Description:
918  *      Print out a set of full performance numbers.
919  *
920  * Arguments:
921  *      None.
922  *
923  * Returns:
924  *      Nothing.
925  *
926  * Environment:
927  *      Nothing interesting.
928  *
929  * Side Effects:
930  *      As advertised.
931  *------------------------------------------------------------------------*/
932
933 void
934 Print_cm_FullPerfInfo()
935 {                               /*Print_cm_FullPerfInfo */
936
937     static char rn[] = "Print_cm_FullPerfInfo"; /* routine name */
938     struct afs_stats_AuthentInfo *authentP;     /*Ptr to authentication stats */
939     struct afs_stats_AccessInfo *accessinfP;    /*Ptr to access stats */
940     static afs_int32 fullPerfLongs = (sizeof(struct afs_stats_CMFullPerf) >> 2);        /*Correct #longs */
941     afs_int32 numLongs;         /*# longs actually received */
942     struct afs_stats_CMFullPerf *fullP; /*Ptr to full perf info */
943     time_t probeTime;
944     char *printableTime;        /*Ptr to printable time string */
945
946     numLongs = xstat_cm_Results.data.AFSCB_CollData_len;
947     if (numLongs != fullPerfLongs) {
948         fprintf(cm_outFD,
949                 " ** Data size mismatch in performance collection!\n");
950         fprintf(cm_outFD, " ** Expecting %d, got %d\n", fullPerfLongs,
951                 numLongs);
952         return;
953     }
954
955     probeTime = xstat_cm_Results.probeTime;
956     printableTime = ctime(&probeTime);
957     printableTime[strlen(printableTime) - 1] = '\0';
958     fullP = (struct afs_stats_CMFullPerf *)
959         (xstat_cm_Results.data.AFSCB_CollData_val);
960
961     fprintf(cm_outFD,
962             "AFSCB_XSTATSCOLL_FULL_PERF_INFO (coll %d) for CM %s\n[Probe %d, %s]\n\n",
963             xstat_cm_Results.collectionNumber,
964             xstat_cm_Results.connP->hostName, xstat_cm_Results.probeNum,
965             printableTime);
966
967     /*
968      * Print the overall numbers first, followed by all of the RPC numbers,
969      * then each of the other groupings.
970      */
971     fprintf(cm_outFD,
972             "Overall Performance Info:\n-------------------------\n");
973     Print_cm_OverallPerfInfo(&(fullP->perf));
974     fprintf(cm_outFD, "\n");
975     Print_cm_RPCPerfInfo(&(fullP->rpc));
976
977     authentP = &(fullP->authent);
978     fprintf(cm_outFD, "\nAuthentication info:\n--------------------\n");
979     fprintf(cm_outFD,
980             "\t%d PAGS, %d records (%d auth, %d unauth), %d max in PAG, chain max: %d\n",
981             authentP->curr_PAGs, authentP->curr_Records,
982             authentP->curr_AuthRecords, authentP->curr_UnauthRecords,
983             authentP->curr_MaxRecordsInPAG, authentP->curr_LongestChain);
984     fprintf(cm_outFD, "\t%d PAG creations, %d tkt updates\n",
985             authentP->PAGCreations, authentP->TicketUpdates);
986     fprintf(cm_outFD,
987             "\t[HWMs: %d PAGS, %d records, %d max in PAG, chain max: %d]\n",
988             authentP->HWM_PAGs, authentP->HWM_Records,
989             authentP->HWM_MaxRecordsInPAG, authentP->HWM_LongestChain);
990
991     accessinfP = &(fullP->accessinf);
992     fprintf(cm_outFD,
993             "\n[Un]replicated accesses:\n------------------------\n");
994     fprintf(cm_outFD,
995             "\t%d unrep, %d rep, %d reps accessed, %d max reps/ref, %d first OK\n\n",
996             accessinfP->unreplicatedRefs, accessinfP->replicatedRefs,
997             accessinfP->numReplicasAccessed, accessinfP->maxReplicasPerRef,
998             accessinfP->refFirstReplicaOK);
999
1000     /* There really isn't any authorship info
1001      * authorP = &(fullP->author); */
1002
1003 }                               /*Print_cm_FullPerfInfo */
1004
1005 /*------------------------------------------------------------------------
1006  * afsmon_cmOutput()
1007  *
1008  * Description:
1009  *      Prints the contents of xstat_cm_Results to an output file. The 
1010  *      output is either in a compact (longs only) format or a detailed
1011  *      format giving the names of each of the datums. Output is appended.
1012  *
1013  * Arguments:
1014  *      Name of output file.
1015  *      Flag to indicate if detailed output is required.
1016  *
1017  * Returns:
1018  *      Nothing.
1019  *
1020  * Environment:
1021  *      All the info we need is nestled into xstat_cm_Results.
1022  *
1023  * Side Effects:
1024  *      As advertised.
1025  *------------------------------------------------------------------------*/
1026 int
1027 afsmon_cmOutput(a_outfile, a_detOutput)
1028      char *a_outfile;           /* ptr to output file name */
1029      int a_detOutput;           /* detailed output ? */
1030 {
1031
1032     static char rn[] = "afsmon_cmOutput";       /* routine name */
1033     char *printTime;            /* ptr to time string */
1034     char *hostname;             /* fileserner name */
1035     afs_int32 numLongs;         /* longwords in result */
1036     afs_int32 *currLong;        /* ptr to longwords in result */
1037     int i;
1038     time_t probeTime;
1039
1040     if (afsmon_debug) {
1041         fprintf(debugFD, "[ %s ] Called, a_outfile= %s, a_detOutput= %d\n",
1042                 rn, a_outfile, a_detOutput);
1043         fflush(debugFD);
1044     }
1045
1046     /* need to lock this file before writing */
1047     cm_outFD = fopen(a_outfile, "a");
1048     if (cm_outFD == (FILE *) 0) {
1049         sprintf(errMsg, "[ %s ] failed to open output file %s", rn,
1050                 a_outfile);
1051         afsmon_Exit(1);
1052     }
1053
1054     /* get the probe time and strip the \n at the end */
1055     probeTime = xstat_cm_Results.probeTime;
1056     printTime = ctime(&probeTime);
1057     printTime[strlen(printTime) - 1] = '\0';
1058     hostname = xstat_cm_Results.connP->hostName;
1059
1060     /* print "time hostname CM" prefix  */
1061     fprintf(cm_outFD, "\n%s %s CM ", printTime, hostname);
1062
1063     /* if probe failed print -1 and vanish */
1064     if (xstat_cm_Results.probeOK) {
1065         fprintf(cm_outFD, "-1\n");
1066         fclose(cm_outFD);
1067         return (0);
1068     }
1069
1070     /* print out the probe information as  long words */
1071     numLongs = xstat_cm_Results.data.AFSCB_CollData_len;
1072     currLong = (afs_int32 *) (xstat_cm_Results.data.AFSCB_CollData_val);
1073
1074     for (i = 0; i < numLongs; i++) {
1075         fprintf(cm_outFD, "%d ", *currLong++);
1076     }
1077     fprintf(cm_outFD, "\n\n");
1078
1079     /* print out detailed statistics */
1080     if (a_detOutput) {
1081         Print_cm_FullPerfInfo();
1082         fflush(cm_outFD);
1083     }
1084
1085     if (fclose(cm_outFD))
1086         if (afsmon_debug) {
1087             fprintf(debugFD, "[ %s ] failed to close %s\n", rn, a_outfile);
1088             fflush(debugFD);
1089         }
1090
1091     return (0);
1092 }