~drizzle-trunk/drizzle/development

« back to all changes in this revision

Viewing changes to mysys/my_init.c

  • Committer: brian
  • Date: 2008-06-25 05:29:13 UTC
  • Revision ID: brian@localhost.localdomain-20080625052913-6upwo0jsrl4lnapl
clean slate

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
/* Copyright (C) 2000-2003 MySQL AB
 
2
 
 
3
   This program is free software; you can redistribute it and/or modify
 
4
   it under the terms of the GNU General Public License as published by
 
5
   the Free Software Foundation; version 2 of the License.
 
6
 
 
7
   This program is distributed in the hope that it will be useful,
 
8
   but WITHOUT ANY WARRANTY; without even the implied warranty of
 
9
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 
10
   GNU General Public License for more details.
 
11
 
 
12
   You should have received a copy of the GNU General Public License
 
13
   along with this program; if not, write to the Free Software
 
14
   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
 
15
 
 
16
#include "mysys_priv.h"
 
17
#include "my_static.h"
 
18
#include "mysys_err.h"
 
19
#include <m_string.h>
 
20
#include <m_ctype.h>
 
21
#include <signal.h>
 
22
 
 
23
my_bool my_init_done= 0;
 
24
uint    mysys_usage_id= 0;              /* Incremented for each my_init() */
 
25
ulong   my_thread_stack_size= 65536;
 
26
 
 
27
static ulong atoi_octal(const char *str)
 
28
{
 
29
  long int tmp;
 
30
  while (*str && my_isspace(&my_charset_latin1, *str))
 
31
    str++;
 
32
  str2int(str,
 
33
          (*str == '0' ? 8 : 10),       /* Octalt or decimalt */
 
34
          0, INT_MAX, &tmp);
 
35
  return (ulong) tmp;
 
36
}
 
37
 
 
38
 
 
39
/*
 
40
  Init my_sys functions and my_sys variabels
 
41
 
 
42
  SYNOPSIS
 
43
    my_init()
 
44
 
 
45
  RETURN
 
46
    0  ok
 
47
    1  Couldn't initialize environment
 
48
*/
 
49
 
 
50
my_bool my_init(void)
 
51
{
 
52
  char * str;
 
53
  if (my_init_done)
 
54
    return 0;
 
55
  my_init_done=1;
 
56
  mysys_usage_id++;
 
57
  my_umask= 0660;                       /* Default umask for new files */
 
58
  my_umask_dir= 0700;                   /* Default umask for new directories */
 
59
  init_glob_errs();
 
60
#if defined(THREAD) && defined(SAFE_MUTEX)
 
61
  safe_mutex_global_init();             /* Must be called early */
 
62
#endif
 
63
#if defined(THREAD) && defined(MY_PTHREAD_FASTMUTEX) && !defined(SAFE_MUTEX)
 
64
  fastmutex_global_init();              /* Must be called early */
 
65
#endif
 
66
#ifdef THREAD
 
67
#if defined(HAVE_PTHREAD_INIT)
 
68
  pthread_init();                       /* Must be called before DBUG_ENTER */
 
69
#endif
 
70
  if (my_thread_global_init())
 
71
    return 1;
 
72
  sigfillset(&my_signals);              /* signals blocked by mf_brkhant */
 
73
#endif /* THREAD */
 
74
  {
 
75
    DBUG_ENTER("my_init");
 
76
    DBUG_PROCESS((char*) (my_progname ? my_progname : "unknown"));
 
77
    if (!home_dir)
 
78
    {                                   /* Don't initialize twice */
 
79
      if ((home_dir=getenv("HOME")) != 0)
 
80
        home_dir=intern_filename(home_dir_buff,home_dir);
 
81
      /* Default creation of new files */
 
82
      if ((str=getenv("UMASK")) != 0)
 
83
        my_umask=(int) (atoi_octal(str) | 0600);
 
84
        /* Default creation of new dir's */
 
85
      if ((str=getenv("UMASK_DIR")) != 0)
 
86
        my_umask_dir=(int) (atoi_octal(str) | 0700);
 
87
      DBUG_PRINT("exit",("home: '%s'",home_dir));
 
88
    }
 
89
    DBUG_RETURN(0);
 
90
  }
 
91
} /* my_init */
 
92
 
 
93
 
 
94
        /* End my_sys */
 
95
 
 
96
void my_end(int infoflag)
 
97
{
 
98
  /*
 
99
    this code is suboptimal to workaround a bug in
 
100
    Sun CC: Sun C++ 5.6 2004/06/02 for x86, and should not be
 
101
    optimized until this compiler is not in use anymore
 
102
  */
 
103
  FILE *info_file= DBUG_FILE;
 
104
  my_bool print_info= (info_file != stderr);
 
105
  /*
 
106
    We do not use DBUG_ENTER here, as after cleanup DBUG is no longer
 
107
    operational, so we cannot use DBUG_RETURN.
 
108
  */
 
109
  DBUG_PRINT("info",("Shutting down: infoflag: %d  print_info: %d",
 
110
                     infoflag, print_info));
 
111
  if (!info_file)
 
112
  {
 
113
    info_file= stderr;
 
114
    print_info= 0;
 
115
  }
 
116
 
 
117
  if ((infoflag & MY_CHECK_ERROR) || print_info)
 
118
 
 
119
  {                                     /* Test if some file is left open */
 
120
    if (my_file_opened | my_stream_opened)
 
121
    {
 
122
      sprintf(errbuff[0],EE(EE_OPEN_WARNING),my_file_opened,my_stream_opened);
 
123
      (void) my_message_no_curses(EE_OPEN_WARNING,errbuff[0],ME_BELL);
 
124
      DBUG_PRINT("error",("%s",errbuff[0]));
 
125
      my_print_open_files();
 
126
    }
 
127
  }
 
128
  free_charsets();
 
129
  my_error_unregister_all();
 
130
  my_once_free();
 
131
 
 
132
  if ((infoflag & MY_GIVE_INFO) || print_info)
 
133
  {
 
134
#ifdef HAVE_GETRUSAGE
 
135
    struct rusage rus;
 
136
#ifdef HAVE_purify
 
137
    /* Purify assumes that rus is uninitialized after getrusage call */
 
138
    bzero((char*) &rus, sizeof(rus));
 
139
#endif
 
140
    if (!getrusage(RUSAGE_SELF, &rus))
 
141
      fprintf(info_file,"\n\
 
142
User time %.2f, System time %.2f\n\
 
143
Maximum resident set size %ld, Integral resident set size %ld\n\
 
144
Non-physical pagefaults %ld, Physical pagefaults %ld, Swaps %ld\n\
 
145
Blocks in %ld out %ld, Messages in %ld out %ld, Signals %ld\n\
 
146
Voluntary context switches %ld, Involuntary context switches %ld\n",
 
147
              (rus.ru_utime.tv_sec * SCALE_SEC +
 
148
               rus.ru_utime.tv_usec / SCALE_USEC) / 100.0,
 
149
              (rus.ru_stime.tv_sec * SCALE_SEC +
 
150
               rus.ru_stime.tv_usec / SCALE_USEC) / 100.0,
 
151
              rus.ru_maxrss, rus.ru_idrss,
 
152
              rus.ru_minflt, rus.ru_majflt,
 
153
              rus.ru_nswap, rus.ru_inblock, rus.ru_oublock,
 
154
              rus.ru_msgsnd, rus.ru_msgrcv, rus.ru_nsignals,
 
155
              rus.ru_nvcsw, rus.ru_nivcsw);
 
156
#endif
 
157
  }
 
158
  else if (infoflag & MY_CHECK_ERROR)
 
159
  {
 
160
    TERMINATE(stderr, 0);               /* Print memory leaks on screen */
 
161
  }
 
162
 
 
163
  if (!(infoflag & MY_DONT_FREE_DBUG))
 
164
  {
 
165
    DBUG_END();                /* Must be done before my_thread_end */
 
166
  }
 
167
#ifdef THREAD
 
168
  my_thread_end();
 
169
  my_thread_global_end();
 
170
#if defined(SAFE_MUTEX)
 
171
  /*
 
172
    Check on destroying of mutexes. A few may be left that will get cleaned
 
173
    up by C++ destructors
 
174
  */
 
175
  safe_mutex_end((infoflag & (MY_GIVE_INFO | MY_CHECK_ERROR)) ? stderr :
 
176
                 (FILE *) 0);
 
177
#endif /* defined(SAFE_MUTEX) */
 
178
#endif /* THREAD */
 
179
 
 
180
  my_init_done=0;
 
181
} /* my_end */