File: simplelog.c

package info (click to toggle)
gridengine 6.2u5-7.1
  • links: PTS, VCS
  • area: main
  • in suites: wheezy
  • size: 57,216 kB
  • sloc: ansic: 438,030; java: 66,252; sh: 36,399; jsp: 7,757; xml: 5,850; makefile: 5,520; csh: 4,571; cpp: 2,848; perl: 2,401; tcl: 692; lisp: 669; yacc: 668; ruby: 642; lex: 344
file content (113 lines) | stat: -rw-r--r-- 2,740 bytes parent folder | download | duplicates (3)
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
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
/*___INFO__MARK_BEGIN__*/
/*************************************************************************
 *
 *  The Contents of this file are made available subject to the terms of
 *  the Sun Industry Standards Source License Version 1.2
 *
 *  Sun Microsystems Inc., March, 2001
 *
 *
 *  Sun Industry Standards Source License Version 1.2
 *  =================================================
 *  The contents of this file are subject to the Sun Industry Standards
 *  Source License Version 1.2 (the "License"); You may not use this file
 *  except in compliance with the License. You may obtain a copy of the
 *  License at http://gridengine.sunsource.net/Gridengine_SISSL_license.html
 *
 *  Software provided under this License is provided on an "AS IS" basis,
 *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
 *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
 *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
 *  See the License for the specific provisions governing your rights and
 *  obligations concerning the Software.
 *
 *   The Initial Developer of the Original Code is: Sun Microsystems, Inc.
 *
 *   Copyright: 2001 by Sun Microsystems, Inc.
 *
 *   All Rights Reserved.
 *
 ************************************************************************/
/*___INFO__MARK_END__*/

#include <windows.h>
#include <stdio.h>

#include "win32_type.h"
#include "simplelog.h"

DWORD error_id = 0;
TXCHAR error_message = "";
FILE *error_filestream = NULL;
BOOL error_traingenabled = FALSE;

void
error_set(DWORD id, LPSTR message) 
{
   error_id = id;
   strcpy(error_message, message);
   DPRINTF(("id=%d message=\"%s\"\n", id, message));
}

void
error_print(void)
{    
   FILE *out = stdout;

   if (error_id != 0) {
      fprintf(out, "_sge_pseudo_host:error(%d):%s\n", error_id, error_message);
      fflush(out);
   }
   error_id = 0; 
}

int 
error_printf(const char *fmt, ...)
{
   int ret;

   if (error_traingenabled) {
      FILE *out = error_filestream ? error_filestream : stderr;
      va_list args;

      va_start(args, fmt);
      ret = vfprintf(out, fmt, args);
      fflush(out);
      va_end(args);
   }
   return ret;
} 

void
error_set_tracingenabled(BOOL new_state)
{
   error_traingenabled = new_state;
}

int
error_open_tracefile(TXCHAR tracefile) 
{
   int ret = 0;

   error_filestream = fopen(tracefile, "a+");
   if (error_filestream == NULL) {
      fprintf(stderr, "unable to open file \"%s\"\n", tracefile);
      fflush(stderr);
      ret = 1;
   }
   return ret;
}

int 
error_close_tracefile(void)
{
   int ret = 0;
   int local_ret;
   
   local_ret = fclose(error_filestream);
   if (local_ret != 0) {
      ret = 1;
   }
   return ret;
}