third_party/tcmalloc/vendor/src/internal_logging.cc

   1 // Copyright (c) 2005, Google Inc.
   2 // All rights reserved.
   3 //
   4 // Redistribution and use in source and binary forms, with or without
   5 // modification, are permitted provided that the following conditions are
   6 // met:
   7 //
   8 //     * Redistributions of source code must retain the above copyright
   9 // notice, this list of conditions and the following disclaimer.
  10 //     * Redistributions in binary form must reproduce the above
  11 // copyright notice, this list of conditions and the following disclaimer
  12 // in the documentation and/or other materials provided with the
  13 // distribution.
  14 //     * Neither the name of Google Inc. nor the names of its
  15 // contributors may be used to endorse or promote products derived from
  16 // this software without specific prior written permission.
  17 //
  18 // THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  19 // "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
  20 // LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
  21 // A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
  22 // OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
  23 // SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
  24 // LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  25 // DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  26 // THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  27 // (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
  28 // OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  29
  30 // ---
  31 // Sanjay Ghemawat <opensource@google.com>
  32
  33 #include <config.h>
  34 #include "internal_logging.h"
  35 #include <stdarg.h>                     // for va_end, va_start
  36 #include <stdio.h>                      // for vsnprintf, va_list, etc
  37 #include <stdlib.h>                     // for abort
  38 #include <string.h>                     // for strlen, memcpy
  39 #ifdef HAVE_UNISTD_H
  40 #include <unistd.h>    // for write()
  41 #endif
  42
  43 #include <gperftools/malloc_extension.h>
  44 #include "base/logging.h"   // for perftools_vsnprintf
  45 #include "base/spinlock.h"              // for SpinLockHolder, SpinLock
  46
  47 static const int kLogBufSize = 800;
  48
  49 // Variables for storing crash output.  Allocated statically since we
  50 // may not be able to heap-allocate while crashing.
  51 static SpinLock crash_lock(base::LINKER_INITIALIZED);
  52 static bool crashed = false;
  53 static const int kStatsBufferSize = 16 << 10;
  54 static char stats_buffer[kStatsBufferSize] = { 0 };
  55
  56 namespace tcmalloc {
  57
  58 static void WriteMessage(const char* msg, int length) {
  59   write(STDERR_FILENO, msg, length);
  60 }
  61
  62 void (*log_message_writer)(const char* msg, int length) = WriteMessage;
  63
  64
  65 class Logger {
  66  public:
  67   bool Add(const LogItem& item);
  68   bool AddStr(const char* str, int n);
  69   bool AddNum(uint64_t num, int base);  // base must be 10 or 16.
  70
  71   static const int kBufSize = 200;
  72   char* p_;
  73   char* end_;
  74   char buf_[kBufSize];
  75 };
  76
  77 void Log(LogMode mode, const char* filename, int line,
  78          LogItem a, LogItem b, LogItem c, LogItem d) {
  79   Logger state;
  80   state.p_ = state.buf_;
  81   state.end_ = state.buf_ + sizeof(state.buf_);
  82   state.AddStr(filename, strlen(filename))
  83       && state.AddStr(":", 1)
  84       && state.AddNum(line, 10)
  85       && state.AddStr("]", 1)
  86       && state.Add(a)
  87       && state.Add(b)
  88       && state.Add(c)
  89       && state.Add(d);
  90
  91   // Teminate with newline
  92   if (state.p_ >= state.end_) {
  93     state.p_ = state.end_ - 1;
  94   }
  95   *state.p_ = '\n';
  96   state.p_++;
  97
  98   int msglen = state.p_ - state.buf_;
  99   if (mode == kLog) {
 100     (*log_message_writer)(state.buf_, msglen);
 101     return;
 102   }
 103
 104   bool first_crash = false;
 105   {
 106     SpinLockHolder l(&crash_lock);
 107     if (!crashed) {
 108       crashed = true;
 109       first_crash = true;
 110     }
 111   }
 112
 113   (*log_message_writer)(state.buf_, msglen);
 114   if (first_crash && mode == kCrashWithStats) {
 115     MallocExtension::instance()->GetStats(stats_buffer, kStatsBufferSize);
 116     (*log_message_writer)(stats_buffer, strlen(stats_buffer));
 117   }
 118
 119   abort();
 120 }
 121
 122 bool Logger::Add(const LogItem& item) {
 123   // Separate items with spaces
 124   if (p_ < end_) {
 125     *p_ = ' ';
 126     p_++;
 127   }
 128
 129   switch (item.tag_) {
 130     case LogItem::kStr:
 131       return AddStr(item.u_.str, strlen(item.u_.str));
 132     case LogItem::kUnsigned:
 133       return AddNum(item.u_.unum, 10);
 134     case LogItem::kSigned:
 135       if (item.u_.snum < 0) {
 136         // The cast to uint64_t is intentionally before the negation
 137         // so that we do not attempt to negate -2^63.
 138         return AddStr("-", 1)
 139             && AddNum(- static_cast<uint64_t>(item.u_.snum), 10);
 140       } else {
 141         return AddNum(static_cast<uint64_t>(item.u_.snum), 10);
 142       }
 143     case LogItem::kPtr:
 144       return AddStr("0x", 2)
 145           && AddNum(reinterpret_cast<uintptr_t>(item.u_.ptr), 16);
 146     default:
 147       return false;
 148   }
 149 }
 150
 151 bool Logger::AddStr(const char* str, int n) {
 152   if (end_ - p_ < n) {
 153     return false;
 154   } else {
 155     memcpy(p_, str, n);
 156     p_ += n;
 157     return true;
 158   }
 159 }
 160
 161 bool Logger::AddNum(uint64_t num, int base) {
 162   static const char kDigits[] = "0123456789abcdef";
 163   char space[22];  // more than enough for 2^64 in smallest supported base (10)
 164   char* end = space + sizeof(space);
 165   char* pos = end;
 166   do {
 167     pos--;
 168     *pos = kDigits[num % base];
 169     num /= base;
 170   } while (num > 0 && pos > space);
 171   return AddStr(pos, end - pos);
 172 }
 173
 174 }  // end tcmalloc namespace
 175
 176 void TCMalloc_Printer::printf(const char* format, ...) {
 177   if (left_ > 0) {
 178     va_list ap;
 179     va_start(ap, format);
 180     const int r = perftools_vsnprintf(buf_, left_, format, ap);
 181     va_end(ap);
 182     if (r < 0) {
 183       // Perhaps an old glibc that returns -1 on truncation?
 184       left_ = 0;
 185     } else if (r > left_) {
 186       // Truncation
 187       left_ = 0;
 188     } else {
 189       left_ -= r;
 190       buf_ += r;
 191     }
 192   }
 193 }