~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:
11
11
 
12
12
   You should have received a copy of the GNU General Public License
13
13
   along with this program; if not, write to the Free Software
14
 
   Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA */
15
 
 
16
 
#include "config.h"
17
 
 
18
 
#include "drizzled/internal/my_sys.h"
 
14
   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
 
15
 
 
16
#include "mysys_priv.h"
19
17
#include "my_static.h"
20
 
#include "drizzled/error.h"
21
 
#include "drizzled/internal/m_string.h"
22
 
#include "drizzled/charset_info.h"
23
 
#include "drizzled/charset.h"
24
 
#include <cstdio>
25
 
#include <cstdlib>
26
 
 
27
 
namespace drizzled
28
 
{
29
 
namespace internal
30
 
{
31
 
 
32
 
bool my_init_done= 0;
 
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;
33
24
uint    mysys_usage_id= 0;              /* Incremented for each my_init() */
 
25
ulong   my_thread_stack_size= 65536;
34
26
 
35
 
static uint32_t atoi_octal(const char *str)
 
27
static ulong atoi_octal(const char *str)
36
28
{
37
29
  long int tmp;
38
 
  while (*str && my_isspace(&my_charset_utf8_general_ci, *str))
 
30
  while (*str && my_isspace(&my_charset_latin1, *str))
39
31
    str++;
40
 
  tmp= strtol(str, NULL, (*str == '0' ? 8 : 10));
41
 
  return (uint32_t) tmp;
 
32
  str2int(str,
 
33
          (*str == '0' ? 8 : 10),       /* Octalt or decimalt */
 
34
          0, INT_MAX, &tmp);
 
35
  return (ulong) tmp;
42
36
}
43
37
 
44
38
 
53
47
    1  Couldn't initialize environment
54
48
*/
55
49
 
56
 
bool my_init(void)
 
50
my_bool my_init(void)
57
51
{
58
52
  char * str;
59
53
  if (my_init_done)
62
56
  mysys_usage_id++;
63
57
  my_umask= 0660;                       /* Default umask for new files */
64
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
65
67
#if defined(HAVE_PTHREAD_INIT)
66
 
  pthread_init();
 
68
  pthread_init();                       /* Must be called before DBUG_ENTER */
67
69
#endif
68
70
  if (my_thread_global_init())
69
71
    return 1;
70
72
  sigfillset(&my_signals);              /* signals blocked by mf_brkhant */
 
73
#endif /* THREAD */
71
74
  {
 
75
    DBUG_ENTER("my_init");
 
76
    DBUG_PROCESS((char*) (my_progname ? my_progname : "unknown"));
72
77
    if (!home_dir)
73
78
    {                                   /* Don't initialize twice */
74
79
      if ((home_dir=getenv("HOME")) != 0)
79
84
        /* Default creation of new dir's */
80
85
      if ((str=getenv("UMASK_DIR")) != 0)
81
86
        my_umask_dir=(int) (atoi_octal(str) | 0700);
 
87
      DBUG_PRINT("exit",("home: '%s'",home_dir));
82
88
    }
83
 
    return(0);
 
89
    DBUG_RETURN(0);
84
90
  }
85
91
} /* my_init */
86
92
 
87
93
 
88
94
        /* End my_sys */
89
95
 
90
 
void my_end()
 
96
void my_end(int infoflag)
91
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
  }
92
128
  free_charsets();
93
 
 
 
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
94
168
  my_thread_end();
95
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 */
96
179
 
97
180
  my_init_done=0;
98
181
} /* my_end */
99
 
 
100
 
} /* namespace internal */
101
 
} /* namespace drizzled */