1 /*
   2  * Copyright (c) 2015, 2016, Oracle and/or its affiliates. All rights reserved.
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * This code is free software; you can redistribute it and/or modify it
   6  * under the terms of the GNU General Public License version 2 only, as
   7  * published by the Free Software Foundation.
   8  *
   9  * This code is distributed in the hope that it will be useful, but WITHOUT
  10  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  11  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  12  * version 2 for more details (a copy is included in the LICENSE file that
  13  * accompanied this code).
  14  *
  15  * You should have received a copy of the GNU General Public License version
  16  * 2 along with this work; if not, write to the Free Software Foundation,
  17  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
  18  *
  19  * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
  20  * or visit www.oracle.com if you need additional information or have any
  21  * questions.
  22  *
  23  */
  24 #include "precompiled.hpp"
  25 #include "logging/log.hpp"
  26 #include "logging/logConfiguration.hpp"
  27 #include "logging/logFileOutput.hpp"
  28 #include "memory/allocation.inline.hpp"
  29 #include "runtime/os.inline.hpp"
  30 #include "utilities/globalDefinitions.hpp"
  31 #include "utilities/defaultStream.hpp"
  32 
  33 const char* LogFileOutput::FileOpenMode = "a";
  34 const char* LogFileOutput::PidFilenamePlaceholder = "%p";
  35 const char* LogFileOutput::TimestampFilenamePlaceholder = "%t";
  36 const char* LogFileOutput::TimestampFormat = "%Y-%m-%d_%H-%M-%S";
  37 const char* LogFileOutput::FileSizeOptionKey = "filesize";
  38 const char* LogFileOutput::FileCountOptionKey = "filecount";
  39 char        LogFileOutput::_pid_str[PidBufferSize];
  40 char        LogFileOutput::_vm_start_time_str[StartTimeBufferSize];
  41 
  42 LogFileOutput::LogFileOutput(const char* name)
  43     : LogFileStreamOutput(NULL), _name(os::strdup_check_oom(name, mtLogging)),
  44       _file_name(NULL), _archive_name(NULL), _archive_name_len(0), _current_size(0),
  45       _rotate_size(0), _current_file(1), _file_count(0), _rotation_semaphore(1) {
  46   _file_name = make_file_name(name, _pid_str, _vm_start_time_str);
  47 }
  48 
  49 void LogFileOutput::set_file_name_parameters(jlong vm_start_time) {
  50   int res = jio_snprintf(_pid_str, sizeof(_pid_str), "%d", os::current_process_id());
  51   assert(res > 0, "PID buffer too small");
  52 
  53   struct tm local_time;
  54   time_t utc_time = vm_start_time / 1000;
  55   os::localtime_pd(&utc_time, &local_time);
  56   res = (int)strftime(_vm_start_time_str, sizeof(_vm_start_time_str), TimestampFormat, &local_time);
  57   assert(res > 0, "VM start time buffer too small.");
  58 }
  59 
  60 LogFileOutput::~LogFileOutput() {
  61   if (_stream != NULL) {
  62     if (_archive_name != NULL) {
  63       archive();
  64     }
  65     if (fclose(_stream) != 0) {
  66       jio_fprintf(defaultStream::error_stream(), "Could not close log file '%s' (%s).\n",
  67                   _file_name, os::strerror(errno));
  68     }
  69   }
  70   os::free(_archive_name);
  71   os::free(_file_name);
  72   os::free(const_cast<char*>(_name));
  73 }
  74 
  75 size_t LogFileOutput::parse_value(const char* value_str) {
  76   char* end;
  77   unsigned long long value = strtoull(value_str, &end, 10);
  78   if (!isdigit(*value_str) || end != value_str + strlen(value_str) || value >= SIZE_MAX) {
  79     return SIZE_MAX;
  80   }
  81   return value;
  82 }
  83 
  84 bool LogFileOutput::configure_rotation(const char* options) {
  85   if (options == NULL || strlen(options) == 0) {
  86     return true;
  87   }
  88   bool success = true;
  89   char* opts = os::strdup_check_oom(options, mtLogging);
  90 
  91   char* comma_pos;
  92   char* pos = opts;
  93   do {
  94     comma_pos = strchr(pos, ',');
  95     if (comma_pos != NULL) {
  96       *comma_pos = '\0';
  97     }
  98 
  99     char* equals_pos = strchr(pos, '=');
 100     if (equals_pos == NULL) {
 101       success = false;
 102       break;
 103     }
 104     char* key = pos;
 105     char* value_str = equals_pos + 1;
 106     *equals_pos = '\0';
 107 
 108     if (strcmp(FileCountOptionKey, key) == 0) {
 109       size_t value = parse_value(value_str);
 110       if (value == SIZE_MAX || value >= UINT_MAX) {
 111         success = false;
 112         break;
 113       }
 114       _file_count = static_cast<uint>(value);
 115       _file_count_max_digits = static_cast<uint>(log10(static_cast<double>(_file_count)) + 1);
 116       _archive_name_len = 2 + strlen(_file_name) + _file_count_max_digits;
 117       _archive_name = NEW_C_HEAP_ARRAY(char, _archive_name_len, mtLogging);
 118     } else if (strcmp(FileSizeOptionKey, key) == 0) {
 119       size_t value;
 120       if (Arguments::atomull(value_str, &value)) {
 121         if (value <= SIZE_MAX) {
 122           _rotate_size = value;
 123           success = true;
 124         } else {
 125           success = false;
 126         }
 127         break;
 128       } else {
 129         success = false;
 130         break;
 131       }
 132     } else {
 133       success = false;
 134       break;
 135     }
 136     pos = comma_pos + 1;
 137   } while (comma_pos != NULL);
 138 
 139   os::free(opts);
 140   return success;
 141 }
 142 
 143 bool LogFileOutput::initialize(const char* options) {
 144   if (!configure_rotation(options)) {
 145     return false;
 146   }
 147   _stream = fopen(_file_name, FileOpenMode);
 148   if (_stream == NULL) {
 149     log_error(logging)("Could not open log file '%s' (%s).\n", _file_name, os::strerror(errno));
 150     return false;
 151   }
 152   return true;
 153 }
 154 
 155 int LogFileOutput::write(const LogDecorations& decorations, const char* msg) {
 156   if (_stream == NULL) {
 157     // An error has occurred with this output, avoid writing to it.
 158     return 0;
 159   }
 160 
 161   _rotation_semaphore.wait();
 162   int written = LogFileStreamOutput::write(decorations, msg);
 163   _current_size += written;
 164 
 165   if (should_rotate()) {
 166     rotate();
 167   }
 168   _rotation_semaphore.signal();
 169 
 170   return written;
 171 }
 172 
 173 void LogFileOutput::archive() {
 174   assert(_archive_name != NULL && _archive_name_len > 0, "Rotation must be configured before using this function.");
 175   int ret = jio_snprintf(_archive_name, _archive_name_len, "%s.%0*u",
 176                          _file_name, _file_count_max_digits, _current_file);
 177   assert(ret >= 0, "Buffer should always be large enough");
 178 
 179   // Attempt to remove possibly existing archived log file before we rename.
 180   // Don't care if it fails, we really only care about the rename that follows.
 181   remove(_archive_name);
 182 
 183   // Rename the file from ex hotspot.log to hotspot.log.2
 184   if (rename(_file_name, _archive_name) == -1) {
 185     jio_fprintf(defaultStream::error_stream(), "Could not rename log file '%s' to '%s' (%s).\n",
 186                 _file_name, _archive_name, os::strerror(errno));
 187   }
 188 }
 189 
 190 void LogFileOutput::force_rotate() {
 191   if (_file_count == 0) {
 192     // Rotation not possible
 193     return;
 194   }
 195   _rotation_semaphore.wait();
 196   rotate();
 197   _rotation_semaphore.signal();
 198 }
 199 
 200 void LogFileOutput::rotate() {
 201 
 202   if (fclose(_stream)) {
 203     jio_fprintf(defaultStream::error_stream(), "Error closing file '%s' during log rotation (%s).\n",
 204                 _file_name, os::strerror(errno));
 205   }
 206 
 207   // Archive the current log file
 208   archive();
 209 
 210   // Open the active log file using the same stream as before
 211   _stream = fopen(_file_name, FileOpenMode);
 212   if (_stream == NULL) {
 213     jio_fprintf(defaultStream::error_stream(), "Could not reopen file '%s' during log rotation (%s).\n",
 214                 _file_name, os::strerror(errno));
 215     return;
 216   }
 217 
 218   // Reset accumulated size, increase current file counter, and check for file count wrap-around.
 219   _current_size = 0;
 220   _current_file = (_current_file >= _file_count ? 1 : _current_file + 1);
 221 }
 222 
 223 char* LogFileOutput::make_file_name(const char* file_name,
 224                                     const char* pid_string,
 225                                     const char* timestamp_string) {
 226   char* result = NULL;
 227 
 228   // Lets start finding out if we have any %d and/or %t in the name.
 229   // We will only replace the first occurrence of any placeholder
 230   const char* pid = strstr(file_name, PidFilenamePlaceholder);
 231   const char* timestamp = strstr(file_name, TimestampFilenamePlaceholder);
 232 
 233   if (pid == NULL && timestamp == NULL) {
 234     // We found no place-holders, return the simple filename
 235     return os::strdup_check_oom(file_name, mtLogging);
 236   }
 237 
 238   // At least one of the place-holders were found in the file_name
 239   const char* first = "";
 240   size_t first_pos = SIZE_MAX;
 241   size_t first_replace_len = 0;
 242 
 243   const char* second = "";
 244   size_t second_pos = SIZE_MAX;
 245   size_t second_replace_len = 0;
 246 
 247   // If we found a %p, then setup our variables accordingly
 248   if (pid != NULL) {
 249     if (timestamp == NULL || pid < timestamp) {
 250       first = pid_string;
 251       first_pos = pid - file_name;
 252       first_replace_len = strlen(PidFilenamePlaceholder);
 253     } else {
 254       second = pid_string;
 255       second_pos = pid - file_name;
 256       second_replace_len = strlen(PidFilenamePlaceholder);
 257     }
 258   }
 259 
 260   if (timestamp != NULL) {
 261     if (pid == NULL || timestamp < pid) {
 262       first = timestamp_string;
 263       first_pos = timestamp - file_name;
 264       first_replace_len = strlen(TimestampFilenamePlaceholder);
 265     } else {
 266       second = timestamp_string;
 267       second_pos = timestamp - file_name;
 268       second_replace_len = strlen(TimestampFilenamePlaceholder);
 269     }
 270   }
 271 
 272   size_t first_len = strlen(first);
 273   size_t second_len = strlen(second);
 274 
 275   // Allocate the new buffer, size it to hold all we want to put in there +1.
 276   size_t result_len =  strlen(file_name) + first_len - first_replace_len + second_len - second_replace_len;
 277   result = NEW_C_HEAP_ARRAY(char, result_len + 1, mtLogging);
 278 
 279   // Assemble the strings
 280   size_t file_name_pos = 0;
 281   size_t i = 0;
 282   while (i < result_len) {
 283     if (file_name_pos == first_pos) {
 284       // We are in the range of the first placeholder
 285       strcpy(result + i, first);
 286       // Bump output buffer position with length of replacing string
 287       i += first_len;
 288       // Bump source buffer position to skip placeholder
 289       file_name_pos += first_replace_len;
 290     } else if (file_name_pos == second_pos) {
 291       // We are in the range of the second placeholder
 292       strcpy(result + i, second);
 293       i += second_len;
 294       file_name_pos += second_replace_len;
 295     } else {
 296       // Else, copy char by char of the original file
 297       result[i] = file_name[file_name_pos++];
 298       i++;
 299     }
 300   }
 301   // Add terminating char
 302   result[result_len] = '\0';
 303   return result;
 304 }