1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
|
/*****************************************************************************
* Johns Hopkins University
* Center For Astrophysical Sciences
* FUSE
*****************************************************************************
*
* Synopsis: cf_timestamp(const char *prgmid, const char *vernum, char *msg)
*
* Description: Writes a timestamp and the calling program name to stdout.
*
* Arguments: char *prgmid Name of the calling program
* char *msg Optional additional message string
*
* Returns: none
*
* History: 01/04/91 mlr Original "warn_str.c" for libhut
* 03/03/98 gak Adapted for placing timestamps in
* FUSE pipeline programs.
* 06/07/99 peb Added reporting of version number.
* 10/27/99 emm Added fflush(stdout)
* 04/23/01 wvd Change declaration of tim from
* long to time_t
* 03/19/03 peb Made this function a wrapper for
* cf_verbose.
* 03/25/03 peb Changed output to print time, program,
* version number and to use verbose_level
* when printing output
* level>=1 prints "Finished processing"
* level>=2 prints "Begin processing"
* 09/15/03 v1.5 wvd To reduce size of the trailer file,
* if verbose level = 1, print "Finished"
* only for top-level routines.
* 10/17/03 v1.6 wvd Use strcmp, rather than strncmp, to
* set this_is_a_top_level_routine.
* 10/30/03 1.7 peb Replaced cftime function with strftime
* for UNIX compatibility.
*
****************************************************************************/
#include <string.h>
#include <time.h>
#include "calfuse.h"
#define N_STYM 80
void cf_timestamp(const char *prgmid, const char *vernum, char *msg)
{
char stym[N_STYM]={'\0'};
char *top_level_routines[]=TOP_LEVEL_ROUTINES;
int i, this_is_a_top_level_routine = FALSE;
time_t tym;
time(&tym);
strftime(stym, N_STYM, "%Y %b %e %T", localtime(&tym));
/* Compare program ID with list of top-level routines. */
for (i = 0; i < NTOP_LEVEL_ROUTINES; i++) {
if (!strcmp(prgmid, top_level_routines[i])) {
this_is_a_top_level_routine = TRUE;
break;
}
}
/*
* The following test should get most "Finished" or "Done" type of
* timestamps. For those not caught if might be best to change them to
* one of these two.
*/
if (((verbose_level == 1 && this_is_a_top_level_routine) ||
(verbose_level > 1)) &&
(strncmp(msg, "Finish", 6) == 0 || strncmp(msg, "Done", 4) == 0))
printf("%s %s-%s: %s\n", stym, prgmid, vernum, "Finished processing");
else if (verbose_level >= 2 &&
(strncmp(msg, "Start", 5) == 0 || strncmp(msg, "Begin", 5) == 0))
printf("%s %s-%s: %s\n", stym, prgmid, vernum, "Begin processing");
fflush(stdout);
}
|
