1 /*
   2  * Copyright (c) 2015, 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/logDecorations.hpp"
  26 #include "logging/logLevel.hpp"
  27 #include "logging/logOutput.hpp"
  28 #include "logging/logTag.hpp"
  29 #include "logging/logTagSet.hpp"
  30 #include "memory/allocation.inline.hpp"
  31 
  32 LogTagSet*  LogTagSet::_list      = NULL;
  33 size_t      LogTagSet::_ntagsets  = 0;
  34 
  35 // This constructor is called only during static initialization.
  36 // See the declaration in logTagSet.hpp for more information.
  37 LogTagSet::LogTagSet(PrefixWriter prefix_writer, LogTagType t0, LogTagType t1, LogTagType t2, LogTagType t3, LogTagType t4)
  38     : _next(_list), _write_prefix(prefix_writer) {
  39   _tag[0] = t0;
  40   _tag[1] = t1;
  41   _tag[2] = t2;
  42   _tag[3] = t3;
  43   _tag[4] = t4;
  44   for (_ntags = 0; _ntags < LogTag::MaxTags && _tag[_ntags] != LogTag::__NO_TAG; _ntags++) {
  45   }
  46   _list = this;
  47   _ntagsets++;
  48 
  49   // Set the default output to warning and error level for all new tagsets.
  50   _output_list.set_output_level(LogOutput::Stderr, LogLevel::Default);
  51 }
  52 
  53 void LogTagSet::update_decorators(const LogDecorators& decorator) {
  54   LogDecorators new_decorators = decorator;
  55   for (LogOutputList::Iterator it = _output_list.iterator(); it != _output_list.end(); it++) {
  56     new_decorators.combine_with((*it)->decorators());
  57   }
  58   _decorators = new_decorators;
  59 }
  60 
  61 bool LogTagSet::has_output(const LogOutput* output) {
  62   for (LogOutputList::Iterator it = _output_list.iterator(); it != _output_list.end(); it++) {
  63     if (*it == output) {
  64       return true;
  65     }
  66   }
  67   return false;
  68 }
  69 
  70 void LogTagSet::log(LogLevelType level, const char* msg) {
  71   LogDecorations decorations(level, *this, _decorators);
  72   for (LogOutputList::Iterator it = _output_list.iterator(level); it != _output_list.end(); it++) {
  73     (*it)->write(decorations, msg);
  74   }
  75 }
  76 
  77 int LogTagSet::label(char* buf, size_t len, const char* separator) const {
  78   int tot_written = 0;
  79   for (size_t i = 0; i < _ntags; i++) {
  80     int written = jio_snprintf(buf + tot_written, len - tot_written, "%s%s",
  81                                (i == 0 ? "" : separator),
  82                                LogTag::name(_tag[i]));
  83     if (written < 0) {
  84       return -1;
  85     }
  86     tot_written += written;
  87   }
  88   return tot_written;
  89 }
  90 
  91 void LogTagSet::write(LogLevelType level, const char* fmt, ...) {
  92   va_list args;
  93   va_start(args, fmt);
  94   vwrite(level, fmt, args);
  95   va_end(args);
  96 }
  97 
  98 const size_t vwrite_buffer_size = 512;
  99 
 100 void LogTagSet::vwrite(LogLevelType level, const char* fmt, va_list args) {
 101   assert(level >= LogLevel::First && level <= LogLevel::Last, "Log level:%d is incorrect", level);
 102   char buf[vwrite_buffer_size];
 103   va_list saved_args;           // For re-format on buf overflow.
 104   va_copy(saved_args, args);
 105   size_t prefix_len = _write_prefix(buf, sizeof(buf));
 106   // Check that string fits in buffer; resize buffer if necessary
 107   int ret = os::log_vsnprintf(buf + prefix_len, sizeof(buf) - prefix_len, fmt, args);
 108   assert(ret >= 0, "Log message buffer issue");
 109   if ((size_t)ret >= sizeof(buf)) {
 110     size_t newbuf_len = prefix_len + ret + 1;
 111     char* newbuf = NEW_C_HEAP_ARRAY(char, newbuf_len, mtLogging);
 112     memcpy(newbuf, buf, prefix_len);
 113     ret = os::log_vsnprintf(newbuf + prefix_len, newbuf_len - prefix_len, fmt, saved_args);
 114     assert(ret >= 0, "Log message buffer issue");
 115     log(level, newbuf);
 116     FREE_C_HEAP_ARRAY(char, newbuf);
 117   } else {
 118     log(level, buf);
 119   }
 120   va_end(saved_args);
 121 }