~drizzle-trunk/drizzle/development

« back to all changes in this revision

Viewing changes to mysys/default_modify.cc

  • Committer: Brian Aker
  • Date: 2009-07-21 00:55:33 UTC
  • mfrom: (1093.1.21 captain)
  • Revision ID: brian@gaz-20090721005533-ran2v2otw7tbmiym
Merge Jay

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
 
/* Copyright (C) 2005 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/mysys_priv.h"
17
 
#include <mystrings/m_string.h>
18
 
#include <mysys/my_dir.h>
19
 
 
20
 
#include <stdio.h>
21
 
#include <algorithm>
22
 
 
23
 
using namespace std;
24
 
 
25
 
#define BUFF_SIZE 1024
26
 
#define RESERVE 1024                   /* Extend buffer with this extent */
27
 
 
28
 
#define NEWLINE "\n"
29
 
#define NEWLINE_LEN 1
30
 
 
31
 
static char *add_option(char *dst, const char *option_value,
32
 
                        const char *option, int remove_option);
33
 
 
34
 
 
35
 
/*
36
 
  Add/remove option to the option file section.
37
 
 
38
 
  SYNOPSYS
39
 
    modify_defaults_file()
40
 
    file_location     The location of configuration file to edit
41
 
    option            The name of the option to look for (can be NULL)
42
 
    option value      The value of the option we would like to set (can be NULL)
43
 
    section_name      The name of the section (must be NOT NULL)
44
 
    remove_option     This defines what we want to remove:
45
 
                        - MY_REMOVE_NONE -- nothing to remove;
46
 
                        - MY_REMOVE_OPTION -- remove the specified option;
47
 
                        - MY_REMOVE_SECTION -- remove the specified section;
48
 
  IMPLEMENTATION
49
 
    We open the option file first, then read the file line-by-line,
50
 
    looking for the section we need. At the same time we put these lines
51
 
    into a buffer. Then we look for the option within this section and
52
 
    change/remove it. In the end we get a buffer with modified version of the
53
 
    file. Then we write it to the file, truncate it if needed and close it.
54
 
    Note that there is a small time gap, when the file is incomplete,
55
 
    and this theoretically might introduce a problem.
56
 
 
57
 
  RETURN
58
 
    0 - ok
59
 
    1 - some error has occured. Probably due to the lack of resourses
60
 
    2 - cannot open the file
61
 
*/
62
 
 
63
 
int modify_defaults_file(const char *file_location, const char *option,
64
 
                         const char *option_value,
65
 
                         const char *section_name, int remove_option)
66
 
{
67
 
  FILE *cnf_file;
68
 
  struct stat file_stat;
69
 
  char linebuff[BUFF_SIZE], *src_ptr, *dst_ptr, *file_buffer;
70
 
  size_t opt_len= 0, optval_len= 0, sect_len;
71
 
  uint32_t nr_newlines= 0;
72
 
  size_t buffer_size;
73
 
  bool in_section= false, opt_applied= 0;
74
 
  size_t reserve_extended;
75
 
  uint32_t new_opt_len;
76
 
  int reserve_occupied= 0;
77
 
 
78
 
  if (!(cnf_file= fopen(file_location, "r+")))
79
 
    return(2);
80
 
 
81
 
  if (fstat(fileno(cnf_file), &file_stat))
82
 
    goto malloc_err;
83
 
 
84
 
  if (option && option_value)
85
 
  {
86
 
    opt_len= strlen(option);
87
 
    optval_len= strlen(option_value);
88
 
  }
89
 
 
90
 
  new_opt_len= opt_len + 1 + optval_len + NEWLINE_LEN;
91
 
 
92
 
  /* calculate the size of the buffer we need */
93
 
  reserve_extended= (opt_len +
94
 
                     1 +                        /* For '=' char */
95
 
                     optval_len +               /* Option value len */
96
 
                     NEWLINE_LEN +              /* Space for newline */
97
 
                     RESERVE);                  /* Some additional space */
98
 
 
99
 
  buffer_size= (size_t)max((uint64_t)file_stat.st_size + 1, (uint64_t)SIZE_MAX);
100
 
 
101
 
  /*
102
 
    Reserve space to read the contents of the file and some more
103
 
    for the option we want to add.
104
 
  */
105
 
  if (!(file_buffer= (char*) malloc(max(buffer_size + reserve_extended,
106
 
                                        (size_t)SIZE_MAX))))
107
 
    goto malloc_err;
108
 
 
109
 
  sect_len= strlen(section_name);
110
 
 
111
 
  for (dst_ptr= file_buffer; fgets(linebuff, BUFF_SIZE, cnf_file); )
112
 
  {
113
 
    /* Skip over whitespaces */
114
 
    for (src_ptr= linebuff; my_isspace(&my_charset_utf8_general_ci, *src_ptr);
115
 
         src_ptr++)
116
 
    {}
117
 
 
118
 
    if (!*src_ptr) /* Empty line */
119
 
    {
120
 
      nr_newlines++;
121
 
      continue;
122
 
    }
123
 
 
124
 
    /* correct the option (if requested) */
125
 
    if (option && in_section && !strncmp(src_ptr, option, opt_len) &&
126
 
        (*(src_ptr + opt_len) == '=' ||
127
 
         my_isspace(&my_charset_utf8_general_ci, *(src_ptr + opt_len)) ||
128
 
         *(src_ptr + opt_len) == '\0'))
129
 
    {
130
 
      char *old_src_ptr= src_ptr;
131
 
      src_ptr= strchr(src_ptr+ opt_len, '\0');        /* Find the end of the line */
132
 
 
133
 
      /* could be negative */
134
 
      reserve_occupied+= (int) new_opt_len - (int) (src_ptr - old_src_ptr);
135
 
      if (reserve_occupied >= (int) reserve_extended)
136
 
      {
137
 
        reserve_extended= (uint32_t) reserve_occupied + RESERVE;
138
 
        if (!(file_buffer= (char*) realloc(file_buffer, buffer_size +
139
 
                                           reserve_extended)))
140
 
          goto malloc_err;
141
 
      }
142
 
      opt_applied= 1;
143
 
      dst_ptr= add_option(dst_ptr, option_value, option, remove_option);
144
 
    }
145
 
    else
146
 
    {
147
 
      /*
148
 
        If we are going to the new group and have an option to apply, do
149
 
        it now. If we are removing a single option or the whole section
150
 
        this will only trigger opt_applied flag.
151
 
      */
152
 
 
153
 
      if (in_section && !opt_applied && *src_ptr == '[')
154
 
      {
155
 
        dst_ptr= add_option(dst_ptr, option_value, option, remove_option);
156
 
        opt_applied= 1;           /* set the flag to do write() later */
157
 
        reserve_occupied= new_opt_len+ opt_len + 1 + NEWLINE_LEN;
158
 
      }
159
 
 
160
 
      for (; nr_newlines; nr_newlines--)
161
 
        dst_ptr= strcpy(dst_ptr, NEWLINE)+NEWLINE_LEN;
162
 
 
163
 
      /* Skip the section if MY_REMOVE_SECTION was given */
164
 
      if (!in_section || remove_option != MY_REMOVE_SECTION)
165
 
        dst_ptr= strcpy(dst_ptr, linebuff);
166
 
        dst_ptr+= strlen(linebuff);
167
 
    }
168
 
    /* Look for a section */
169
 
    if (*src_ptr == '[')
170
 
    {
171
 
      /* Copy the line to the buffer */
172
 
      if (!strncmp(++src_ptr, section_name, sect_len))
173
 
      {
174
 
        src_ptr+= sect_len;
175
 
        /* Skip over whitespaces. They are allowed after section name */
176
 
        for (; my_isspace(&my_charset_utf8_general_ci, *src_ptr); src_ptr++)
177
 
        {}
178
 
 
179
 
        if (*src_ptr != ']')
180
 
        {
181
 
          in_section= false;
182
 
          continue; /* Missing closing parenthesis. Assume this was no group */
183
 
        }
184
 
 
185
 
        if (remove_option == MY_REMOVE_SECTION)
186
 
          dst_ptr= dst_ptr - strlen(linebuff);
187
 
 
188
 
        in_section= true;
189
 
      }
190
 
      else
191
 
        in_section= false; /* mark that this section is of no interest to us */
192
 
    }
193
 
  }
194
 
 
195
 
  /*
196
 
    File ended. Apply an option or set opt_applied flag (in case of
197
 
    MY_REMOVE_SECTION) so that the changes are saved. Do not do anything
198
 
    if we are removing non-existent option.
199
 
  */
200
 
 
201
 
  if (!opt_applied && in_section && (remove_option != MY_REMOVE_OPTION))
202
 
  {
203
 
    /* New option still remains to apply at the end */
204
 
    if (!remove_option && *(dst_ptr - 1) != '\n')
205
 
      dst_ptr= strcpy(dst_ptr, NEWLINE)+NEWLINE_LEN;
206
 
    dst_ptr= add_option(dst_ptr, option_value, option, remove_option);
207
 
    opt_applied= 1;
208
 
  }
209
 
  for (; nr_newlines; nr_newlines--)
210
 
    dst_ptr= strcpy(dst_ptr, NEWLINE)+NEWLINE_LEN;
211
 
 
212
 
  if (opt_applied)
213
 
  {
214
 
    /* Don't write the file if there are no changes to be made */
215
 
    if (ftruncate(fileno(cnf_file), (size_t) (dst_ptr - file_buffer)) ||
216
 
        fseeko(cnf_file, 0, SEEK_SET) ||
217
 
        fwrite(file_buffer, 1, (size_t) (dst_ptr - file_buffer), cnf_file))
218
 
      goto err;
219
 
  }
220
 
  if (fclose(cnf_file))
221
 
    return(1);
222
 
 
223
 
  free(file_buffer);
224
 
  return(0);
225
 
 
226
 
err:
227
 
  free(file_buffer);
228
 
malloc_err:
229
 
  fclose(cnf_file);
230
 
 
231
 
  return 1; /* out of resources */
232
 
}
233
 
 
234
 
 
235
 
static char *add_option(char *dst, const char *option_value,
236
 
                        const char *option, int remove_option)
237
 
{
238
 
  if (!remove_option)
239
 
  {
240
 
    dst= strcpy(dst, option);
241
 
    dst+= strlen(option);
242
 
    if (*option_value)
243
 
    {
244
 
      *dst++= '=';
245
 
      dst= strcpy(dst, option_value);
246
 
      dst+= strlen(option_value);
247
 
    }
248
 
    /* add a newline */
249
 
    dst= strcpy(dst, NEWLINE)+NEWLINE_LEN;
250
 
  }
251
 
  return dst;
252
 
}