src/share/vm/utilities/ostream.cpp

Fri, 03 Apr 2020 14:14:26 +0100

author
aph
date
Fri, 03 Apr 2020 14:14:26 +0100
changeset 9920
3a3803a0c789
parent 9906
0df63a32f7bb
child 9931
fd44df5e3bc3
permissions
-rw-r--r--

8076475: Misuses of strncpy/strncat
Summary: Various small fixes around strncpy and strncat
Reviewed-by: andrew

duke@435 1 /*
kevinw@9478 2 * Copyright (c) 1997, 2018, Oracle and/or its affiliates. All rights reserved.
duke@435 3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
duke@435 4 *
duke@435 5 * This code is free software; you can redistribute it and/or modify it
duke@435 6 * under the terms of the GNU General Public License version 2 only, as
duke@435 7 * published by the Free Software Foundation.
duke@435 8 *
duke@435 9 * This code is distributed in the hope that it will be useful, but WITHOUT
duke@435 10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
duke@435 11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
duke@435 12 * version 2 for more details (a copy is included in the LICENSE file that
duke@435 13 * accompanied this code).
duke@435 14 *
duke@435 15 * You should have received a copy of the GNU General Public License version
duke@435 16 * 2 along with this work; if not, write to the Free Software Foundation,
duke@435 17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
duke@435 18 *
trims@1907 19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
trims@1907 20 * or visit www.oracle.com if you need additional information or have any
trims@1907 21 * questions.
duke@435 22 *
duke@435 23 */
duke@435 24
stefank@2314 25 #include "precompiled.hpp"
stefank@2314 26 #include "compiler/compileLog.hpp"
brutisso@6904 27 #include "gc_implementation/shared/gcId.hpp"
stefank@2314 28 #include "oops/oop.inline.hpp"
stefank@2314 29 #include "runtime/arguments.hpp"
phh@9904 30 #include "runtime/mutexLocker.hpp"
kevinw@9478 31 #include "runtime/os.hpp"
shade@9906 32 #include "runtime/vmThread.hpp"
stefank@2314 33 #include "utilities/defaultStream.hpp"
stefank@2314 34 #include "utilities/ostream.hpp"
stefank@2314 35 #include "utilities/top.hpp"
stefank@2314 36 #include "utilities/xmlstream.hpp"
stefank@2314 37 #ifdef TARGET_OS_FAMILY_linux
stefank@2314 38 # include "os_linux.inline.hpp"
stefank@2314 39 #endif
stefank@2314 40 #ifdef TARGET_OS_FAMILY_solaris
stefank@2314 41 # include "os_solaris.inline.hpp"
stefank@2314 42 #endif
stefank@2314 43 #ifdef TARGET_OS_FAMILY_windows
stefank@2314 44 # include "os_windows.inline.hpp"
stefank@2314 45 #endif
goetz@6461 46 #ifdef TARGET_OS_FAMILY_aix
goetz@6461 47 # include "os_aix.inline.hpp"
goetz@6461 48 #endif
never@3156 49 #ifdef TARGET_OS_FAMILY_bsd
never@3156 50 # include "os_bsd.inline.hpp"
never@3156 51 #endif
duke@435 52
duke@435 53 extern "C" void jio_print(const char* s); // Declarationtion of jvm method
duke@435 54
duke@435 55 outputStream::outputStream(int width) {
duke@435 56 _width = width;
duke@435 57 _position = 0;
duke@435 58 _newlines = 0;
duke@435 59 _precount = 0;
duke@435 60 _indentation = 0;
duke@435 61 }
duke@435 62
duke@435 63 outputStream::outputStream(int width, bool has_time_stamps) {
duke@435 64 _width = width;
duke@435 65 _position = 0;
duke@435 66 _newlines = 0;
duke@435 67 _precount = 0;
duke@435 68 _indentation = 0;
duke@435 69 if (has_time_stamps) _stamp.update();
duke@435 70 }
duke@435 71
duke@435 72 void outputStream::update_position(const char* s, size_t len) {
duke@435 73 for (size_t i = 0; i < len; i++) {
duke@435 74 char ch = s[i];
duke@435 75 if (ch == '\n') {
duke@435 76 _newlines += 1;
duke@435 77 _precount += _position + 1;
duke@435 78 _position = 0;
duke@435 79 } else if (ch == '\t') {
jrose@535 80 int tw = 8 - (_position & 7);
jrose@535 81 _position += tw;
jrose@535 82 _precount -= tw-1; // invariant: _precount + _position == total count
duke@435 83 } else {
duke@435 84 _position += 1;
duke@435 85 }
duke@435 86 }
duke@435 87 }
duke@435 88
duke@435 89 // Execute a vsprintf, using the given buffer if necessary.
duke@435 90 // Return a pointer to the formatted string.
duke@435 91 const char* outputStream::do_vsnprintf(char* buffer, size_t buflen,
duke@435 92 const char* format, va_list ap,
duke@435 93 bool add_cr,
duke@435 94 size_t& result_len) {
kevinw@9478 95 assert(buflen >= 2, "buffer too small");
kevinw@9478 96
duke@435 97 const char* result;
duke@435 98 if (add_cr) buflen--;
duke@435 99 if (!strchr(format, '%')) {
duke@435 100 // constant format string
duke@435 101 result = format;
duke@435 102 result_len = strlen(result);
duke@435 103 if (add_cr && result_len >= buflen) result_len = buflen-1; // truncate
duke@435 104 } else if (format[0] == '%' && format[1] == 's' && format[2] == '\0') {
duke@435 105 // trivial copy-through format string
duke@435 106 result = va_arg(ap, const char*);
duke@435 107 result_len = strlen(result);
duke@435 108 if (add_cr && result_len >= buflen) result_len = buflen-1; // truncate
kevinw@9478 109 } else {
kevinw@9478 110 int written = os::vsnprintf(buffer, buflen, format, ap);
kevinw@9478 111 assert(written >= 0, "vsnprintf encoding error");
duke@435 112 result = buffer;
kevinw@9478 113 if ((size_t)written < buflen) {
kevinw@9478 114 result_len = written;
kevinw@9478 115 } else {
kevinw@9478 116 DEBUG_ONLY(warning("increase O_BUFLEN in ostream.hpp -- output truncated");)
kevinw@9478 117 result_len = buflen - 1;
kevinw@9478 118 }
duke@435 119 }
duke@435 120 if (add_cr) {
duke@435 121 if (result != buffer) {
kevinw@9478 122 memcpy(buffer, result, result_len);
duke@435 123 result = buffer;
duke@435 124 }
duke@435 125 buffer[result_len++] = '\n';
duke@435 126 buffer[result_len] = 0;
duke@435 127 }
duke@435 128 return result;
duke@435 129 }
duke@435 130
duke@435 131 void outputStream::print(const char* format, ...) {
duke@435 132 char buffer[O_BUFLEN];
duke@435 133 va_list ap;
duke@435 134 va_start(ap, format);
duke@435 135 size_t len;
duke@435 136 const char* str = do_vsnprintf(buffer, O_BUFLEN, format, ap, false, len);
duke@435 137 write(str, len);
duke@435 138 va_end(ap);
duke@435 139 }
duke@435 140
duke@435 141 void outputStream::print_cr(const char* format, ...) {
duke@435 142 char buffer[O_BUFLEN];
duke@435 143 va_list ap;
duke@435 144 va_start(ap, format);
duke@435 145 size_t len;
duke@435 146 const char* str = do_vsnprintf(buffer, O_BUFLEN, format, ap, true, len);
duke@435 147 write(str, len);
duke@435 148 va_end(ap);
duke@435 149 }
duke@435 150
duke@435 151 void outputStream::vprint(const char *format, va_list argptr) {
duke@435 152 char buffer[O_BUFLEN];
duke@435 153 size_t len;
duke@435 154 const char* str = do_vsnprintf(buffer, O_BUFLEN, format, argptr, false, len);
duke@435 155 write(str, len);
duke@435 156 }
duke@435 157
duke@435 158 void outputStream::vprint_cr(const char* format, va_list argptr) {
duke@435 159 char buffer[O_BUFLEN];
duke@435 160 size_t len;
duke@435 161 const char* str = do_vsnprintf(buffer, O_BUFLEN, format, argptr, true, len);
duke@435 162 write(str, len);
duke@435 163 }
duke@435 164
duke@435 165 void outputStream::fill_to(int col) {
jrose@535 166 int need_fill = col - position();
jrose@535 167 sp(need_fill);
jrose@535 168 }
jrose@535 169
jrose@535 170 void outputStream::move_to(int col, int slop, int min_space) {
jrose@535 171 if (position() >= col + slop)
jrose@535 172 cr();
jrose@535 173 int need_fill = col - position();
jrose@535 174 if (need_fill < min_space)
jrose@535 175 need_fill = min_space;
jrose@535 176 sp(need_fill);
duke@435 177 }
duke@435 178
duke@435 179 void outputStream::put(char ch) {
duke@435 180 assert(ch != 0, "please fix call site");
duke@435 181 char buf[] = { ch, '\0' };
duke@435 182 write(buf, 1);
duke@435 183 }
duke@435 184
jrose@535 185 #define SP_USE_TABS false
jrose@535 186
jrose@535 187 void outputStream::sp(int count) {
jrose@535 188 if (count < 0) return;
jrose@535 189 if (SP_USE_TABS && count >= 8) {
jrose@535 190 int target = position() + count;
jrose@535 191 while (count >= 8) {
jrose@535 192 this->write("\t", 1);
jrose@535 193 count -= 8;
jrose@535 194 }
jrose@535 195 count = target - position();
jrose@535 196 }
jrose@535 197 while (count > 0) {
jrose@535 198 int nw = (count > 8) ? 8 : count;
jrose@535 199 this->write(" ", nw);
jrose@535 200 count -= nw;
jrose@535 201 }
duke@435 202 }
duke@435 203
duke@435 204 void outputStream::cr() {
duke@435 205 this->write("\n", 1);
duke@435 206 }
duke@435 207
duke@435 208 void outputStream::stamp() {
duke@435 209 if (! _stamp.is_updated()) {
duke@435 210 _stamp.update(); // start at 0 on first call to stamp()
duke@435 211 }
duke@435 212
duke@435 213 // outputStream::stamp() may get called by ostream_abort(), use snprintf
duke@435 214 // to avoid allocating large stack buffer in print().
duke@435 215 char buf[40];
duke@435 216 jio_snprintf(buf, sizeof(buf), "%.3f", _stamp.seconds());
duke@435 217 print_raw(buf);
duke@435 218 }
duke@435 219
ysr@777 220 void outputStream::stamp(bool guard,
ysr@777 221 const char* prefix,
ysr@777 222 const char* suffix) {
ysr@777 223 if (!guard) {
ysr@777 224 return;
ysr@777 225 }
ysr@777 226 print_raw(prefix);
ysr@777 227 stamp();
ysr@777 228 print_raw(suffix);
ysr@777 229 }
ysr@777 230
duke@435 231 void outputStream::date_stamp(bool guard,
duke@435 232 const char* prefix,
duke@435 233 const char* suffix) {
duke@435 234 if (!guard) {
duke@435 235 return;
duke@435 236 }
duke@435 237 print_raw(prefix);
duke@435 238 static const char error_time[] = "yyyy-mm-ddThh:mm:ss.mmm+zzzz";
duke@435 239 static const int buffer_length = 32;
duke@435 240 char buffer[buffer_length];
duke@435 241 const char* iso8601_result = os::iso8601_time(buffer, buffer_length);
duke@435 242 if (iso8601_result != NULL) {
duke@435 243 print_raw(buffer);
duke@435 244 } else {
duke@435 245 print_raw(error_time);
duke@435 246 }
duke@435 247 print_raw(suffix);
duke@435 248 return;
duke@435 249 }
duke@435 250
brutisso@6904 251 void outputStream::gclog_stamp(const GCId& gc_id) {
brutisso@6904 252 date_stamp(PrintGCDateStamps);
brutisso@6904 253 stamp(PrintGCTimeStamps);
brutisso@6904 254 if (PrintGCID) {
brutisso@6904 255 print("#%u: ", gc_id.id());
brutisso@6904 256 }
brutisso@6904 257 }
brutisso@6904 258
kamg@3992 259 outputStream& outputStream::indent() {
duke@435 260 while (_position < _indentation) sp();
kamg@3992 261 return *this;
duke@435 262 }
duke@435 263
duke@435 264 void outputStream::print_jlong(jlong value) {
hseigel@4465 265 print(JLONG_FORMAT, value);
duke@435 266 }
duke@435 267
duke@435 268 void outputStream::print_julong(julong value) {
hseigel@4465 269 print(JULONG_FORMAT, value);
duke@435 270 }
duke@435 271
kamg@3992 272 /**
kamg@3992 273 * This prints out hex data in a 'windbg' or 'xxd' form, where each line is:
kamg@3992 274 * <hex-address>: 8 * <hex-halfword> <ascii translation (optional)>
kamg@3992 275 * example:
kamg@3992 276 * 0000000: 7f44 4f46 0102 0102 0000 0000 0000 0000 .DOF............
kamg@3992 277 * 0000010: 0000 0000 0000 0040 0000 0020 0000 0005 .......@... ....
kamg@3992 278 * 0000020: 0000 0000 0000 0040 0000 0000 0000 015d .......@.......]
kamg@3992 279 * ...
kamg@3992 280 *
kamg@3992 281 * indent is applied to each line. Ends with a CR.
kamg@3992 282 */
kamg@3992 283 void outputStream::print_data(void* data, size_t len, bool with_ascii) {
kamg@3992 284 size_t limit = (len + 16) / 16 * 16;
kamg@3992 285 for (size_t i = 0; i < limit; ++i) {
kamg@3992 286 if (i % 16 == 0) {
kevinw@9327 287 indent().print(SIZE_FORMAT_HEX_W(07) ":", i);
kamg@3992 288 }
kamg@3992 289 if (i % 2 == 0) {
kamg@3992 290 print(" ");
kamg@3992 291 }
kamg@3992 292 if (i < len) {
kamg@3992 293 print("%02x", ((unsigned char*)data)[i]);
kamg@3992 294 } else {
kamg@3992 295 print(" ");
kamg@3992 296 }
kamg@3992 297 if ((i + 1) % 16 == 0) {
kamg@3992 298 if (with_ascii) {
kamg@3992 299 print(" ");
kamg@3992 300 for (size_t j = 0; j < 16; ++j) {
kamg@3992 301 size_t idx = i + j - 15;
kamg@3992 302 if (idx < len) {
kamg@3992 303 char c = ((char*)data)[idx];
kamg@3992 304 print("%c", c >= 32 && c <= 126 ? c : '.');
kamg@3992 305 }
kamg@3992 306 }
kamg@3992 307 }
drchase@6680 308 cr();
kamg@3992 309 }
kamg@3992 310 }
kamg@3992 311 }
kamg@3992 312
duke@435 313 stringStream::stringStream(size_t initial_size) : outputStream() {
duke@435 314 buffer_length = initial_size;
duke@435 315 buffer = NEW_RESOURCE_ARRAY(char, buffer_length);
duke@435 316 buffer_pos = 0;
duke@435 317 buffer_fixed = false;
fparain@5409 318 DEBUG_ONLY(rm = Thread::current()->current_resource_mark();)
duke@435 319 }
duke@435 320
duke@435 321 // useful for output to fixed chunks of memory, such as performance counters
duke@435 322 stringStream::stringStream(char* fixed_buffer, size_t fixed_buffer_size) : outputStream() {
duke@435 323 buffer_length = fixed_buffer_size;
duke@435 324 buffer = fixed_buffer;
duke@435 325 buffer_pos = 0;
duke@435 326 buffer_fixed = true;
duke@435 327 }
duke@435 328
duke@435 329 void stringStream::write(const char* s, size_t len) {
duke@435 330 size_t write_len = len; // number of non-null bytes to write
duke@435 331 size_t end = buffer_pos + len + 1; // position after write and final '\0'
duke@435 332 if (end > buffer_length) {
duke@435 333 if (buffer_fixed) {
duke@435 334 // if buffer cannot resize, silently truncate
duke@435 335 end = buffer_length;
duke@435 336 write_len = end - buffer_pos - 1; // leave room for the final '\0'
duke@435 337 } else {
duke@435 338 // For small overruns, double the buffer. For larger ones,
duke@435 339 // increase to the requested size.
duke@435 340 if (end < buffer_length * 2) {
duke@435 341 end = buffer_length * 2;
duke@435 342 }
duke@435 343 char* oldbuf = buffer;
fparain@5409 344 assert(rm == NULL || Thread::current()->current_resource_mark() == rm,
fparain@5409 345 "stringStream is re-allocated with a different ResourceMark");
duke@435 346 buffer = NEW_RESOURCE_ARRAY(char, end);
aph@9920 347 if (buffer_pos > 0) {
aph@9920 348 memcpy(buffer, oldbuf, buffer_pos);
aph@9920 349 }
duke@435 350 buffer_length = end;
duke@435 351 }
duke@435 352 }
duke@435 353 // invariant: buffer is always null-terminated
duke@435 354 guarantee(buffer_pos + write_len + 1 <= buffer_length, "stringStream oob");
aph@9920 355 if (write_len > 0) {
aph@9920 356 buffer[buffer_pos + write_len] = 0;
aph@9920 357 memcpy(buffer + buffer_pos, s, write_len);
aph@9920 358 buffer_pos += write_len;
aph@9920 359 }
duke@435 360
duke@435 361 // Note that the following does not depend on write_len.
duke@435 362 // This means that position and count get updated
duke@435 363 // even when overflow occurs.
duke@435 364 update_position(s, len);
duke@435 365 }
duke@435 366
duke@435 367 char* stringStream::as_string() {
minqi@5683 368 char* copy = NEW_RESOURCE_ARRAY(char, buffer_pos + 1);
duke@435 369 strncpy(copy, buffer, buffer_pos);
duke@435 370 copy[buffer_pos] = 0; // terminating null
duke@435 371 return copy;
duke@435 372 }
duke@435 373
duke@435 374 stringStream::~stringStream() {}
duke@435 375
duke@435 376 xmlStream* xtty;
duke@435 377 outputStream* tty;
duke@435 378 outputStream* gclog_or_tty;
iklam@7089 379 CDS_ONLY(fileStream* classlist_file;) // Only dump the classes that can be stored into the CDS archive
duke@435 380 extern Mutex* tty_lock;
duke@435 381
minqi@5683 382 #define EXTRACHARLEN 32
minqi@5683 383 #define CURRENTAPPX ".current"
minqi@5683 384 // convert YYYY-MM-DD HH:MM:SS to YYYY-MM-DD_HH-MM-SS
minqi@5683 385 char* get_datetime_string(char *buf, size_t len) {
minqi@5683 386 os::local_time_string(buf, len);
minqi@5683 387 int i = (int)strlen(buf);
minqi@5683 388 while (i-- >= 0) {
minqi@5683 389 if (buf[i] == ' ') buf[i] = '_';
minqi@5683 390 else if (buf[i] == ':') buf[i] = '-';
minqi@5683 391 }
minqi@5683 392 return buf;
minqi@5683 393 }
minqi@5683 394
minqi@5683 395 static const char* make_log_name_internal(const char* log_name, const char* force_directory,
minqi@5683 396 int pid, const char* tms) {
minqi@5683 397 const char* basename = log_name;
minqi@5683 398 char file_sep = os::file_separator()[0];
minqi@5683 399 const char* cp;
minqi@5683 400 char pid_text[32];
minqi@5683 401
minqi@5683 402 for (cp = log_name; *cp != '\0'; cp++) {
minqi@5683 403 if (*cp == '/' || *cp == file_sep) {
minqi@5683 404 basename = cp + 1;
minqi@5683 405 }
minqi@5683 406 }
minqi@5683 407 const char* nametail = log_name;
minqi@5683 408 // Compute buffer length
minqi@5683 409 size_t buffer_length;
minqi@5683 410 if (force_directory != NULL) {
minqi@5683 411 buffer_length = strlen(force_directory) + strlen(os::file_separator()) +
minqi@5683 412 strlen(basename) + 1;
minqi@5683 413 } else {
minqi@5683 414 buffer_length = strlen(log_name) + 1;
minqi@5683 415 }
minqi@5683 416
minqi@5683 417 const char* pts = strstr(basename, "%p");
minqi@5683 418 int pid_pos = (pts == NULL) ? -1 : (pts - nametail);
minqi@5683 419
minqi@5683 420 if (pid_pos >= 0) {
minqi@5683 421 jio_snprintf(pid_text, sizeof(pid_text), "pid%u", pid);
minqi@5683 422 buffer_length += strlen(pid_text);
minqi@5683 423 }
minqi@5683 424
minqi@5683 425 pts = strstr(basename, "%t");
minqi@5683 426 int tms_pos = (pts == NULL) ? -1 : (pts - nametail);
minqi@5683 427 if (tms_pos >= 0) {
minqi@5683 428 buffer_length += strlen(tms);
minqi@5683 429 }
minqi@5683 430
brutisso@7448 431 // File name is too long.
brutisso@7448 432 if (buffer_length > JVM_MAXPATHLEN) {
brutisso@7448 433 return NULL;
brutisso@7448 434 }
brutisso@7448 435
minqi@5683 436 // Create big enough buffer.
minqi@5683 437 char *buf = NEW_C_HEAP_ARRAY(char, buffer_length, mtInternal);
minqi@5683 438
minqi@5683 439 strcpy(buf, "");
minqi@5683 440 if (force_directory != NULL) {
minqi@5683 441 strcat(buf, force_directory);
minqi@5683 442 strcat(buf, os::file_separator());
minqi@5683 443 nametail = basename; // completely skip directory prefix
minqi@5683 444 }
minqi@5683 445
minqi@5683 446 // who is first, %p or %t?
minqi@5683 447 int first = -1, second = -1;
minqi@5683 448 const char *p1st = NULL;
minqi@5683 449 const char *p2nd = NULL;
minqi@5683 450
minqi@5683 451 if (pid_pos >= 0 && tms_pos >= 0) {
minqi@5683 452 // contains both %p and %t
minqi@5683 453 if (pid_pos < tms_pos) {
minqi@5683 454 // case foo%pbar%tmonkey.log
minqi@5683 455 first = pid_pos;
minqi@5683 456 p1st = pid_text;
minqi@5683 457 second = tms_pos;
minqi@5683 458 p2nd = tms;
minqi@5683 459 } else {
minqi@5683 460 // case foo%tbar%pmonkey.log
minqi@5683 461 first = tms_pos;
minqi@5683 462 p1st = tms;
minqi@5683 463 second = pid_pos;
minqi@5683 464 p2nd = pid_text;
minqi@5683 465 }
minqi@5683 466 } else if (pid_pos >= 0) {
minqi@5683 467 // contains %p only
minqi@5683 468 first = pid_pos;
minqi@5683 469 p1st = pid_text;
minqi@5683 470 } else if (tms_pos >= 0) {
minqi@5683 471 // contains %t only
minqi@5683 472 first = tms_pos;
minqi@5683 473 p1st = tms;
minqi@5683 474 }
minqi@5683 475
minqi@5683 476 int buf_pos = (int)strlen(buf);
minqi@5683 477 const char* tail = nametail;
minqi@5683 478
minqi@5683 479 if (first >= 0) {
minqi@5683 480 tail = nametail + first + 2;
minqi@5683 481 strncpy(&buf[buf_pos], nametail, first);
minqi@5683 482 strcpy(&buf[buf_pos + first], p1st);
minqi@5683 483 buf_pos = (int)strlen(buf);
minqi@5683 484 if (second >= 0) {
minqi@5683 485 strncpy(&buf[buf_pos], tail, second - first - 2);
minqi@5683 486 strcpy(&buf[buf_pos + second - first - 2], p2nd);
minqi@5683 487 tail = nametail + second + 2;
minqi@5683 488 }
minqi@5683 489 }
minqi@5683 490 strcat(buf, tail); // append rest of name, or all of name
minqi@5683 491 return buf;
minqi@5683 492 }
minqi@5683 493
iklam@7089 494 // log_name comes from -XX:LogFile=log_name, -Xloggc:log_name or
iklam@7089 495 // -XX:DumpLoadedClassList=<file_name>
vlivanov@5903 496 // in log_name, %p => pid1234 and
minqi@5683 497 // %t => YYYY-MM-DD_HH-MM-SS
minqi@5683 498 static const char* make_log_name(const char* log_name, const char* force_directory) {
minqi@5683 499 char timestr[32];
minqi@5683 500 get_datetime_string(timestr, sizeof(timestr));
minqi@5683 501 return make_log_name_internal(log_name, force_directory, os::current_process_id(),
minqi@5683 502 timestr);
minqi@5683 503 }
minqi@5683 504
minqi@5683 505 #ifndef PRODUCT
minqi@5683 506 void test_loggc_filename() {
minqi@5683 507 int pid;
minqi@5683 508 char tms[32];
brutisso@7448 509 char i_result[JVM_MAXPATHLEN];
minqi@5683 510 const char* o_result;
minqi@5683 511 get_datetime_string(tms, sizeof(tms));
minqi@5683 512 pid = os::current_process_id();
minqi@5683 513
minqi@5683 514 // test.log
brutisso@7448 515 jio_snprintf(i_result, JVM_MAXPATHLEN, "test.log", tms);
minqi@5683 516 o_result = make_log_name_internal("test.log", NULL, pid, tms);
minqi@5683 517 assert(strcmp(i_result, o_result) == 0, "failed on testing make_log_name(\"test.log\", NULL)");
minqi@5683 518 FREE_C_HEAP_ARRAY(char, o_result, mtInternal);
minqi@5683 519
minqi@5683 520 // test-%t-%p.log
brutisso@7448 521 jio_snprintf(i_result, JVM_MAXPATHLEN, "test-%s-pid%u.log", tms, pid);
minqi@5683 522 o_result = make_log_name_internal("test-%t-%p.log", NULL, pid, tms);
minqi@5683 523 assert(strcmp(i_result, o_result) == 0, "failed on testing make_log_name(\"test-%%t-%%p.log\", NULL)");
minqi@5683 524 FREE_C_HEAP_ARRAY(char, o_result, mtInternal);
minqi@5683 525
minqi@5683 526 // test-%t%p.log
brutisso@7448 527 jio_snprintf(i_result, JVM_MAXPATHLEN, "test-%spid%u.log", tms, pid);
minqi@5683 528 o_result = make_log_name_internal("test-%t%p.log", NULL, pid, tms);
minqi@5683 529 assert(strcmp(i_result, o_result) == 0, "failed on testing make_log_name(\"test-%%t%%p.log\", NULL)");
minqi@5683 530 FREE_C_HEAP_ARRAY(char, o_result, mtInternal);
minqi@5683 531
minqi@5683 532 // %p%t.log
brutisso@7448 533 jio_snprintf(i_result, JVM_MAXPATHLEN, "pid%u%s.log", pid, tms);
minqi@5683 534 o_result = make_log_name_internal("%p%t.log", NULL, pid, tms);
minqi@5683 535 assert(strcmp(i_result, o_result) == 0, "failed on testing make_log_name(\"%%p%%t.log\", NULL)");
minqi@5683 536 FREE_C_HEAP_ARRAY(char, o_result, mtInternal);
minqi@5683 537
minqi@5683 538 // %p-test.log
brutisso@7448 539 jio_snprintf(i_result, JVM_MAXPATHLEN, "pid%u-test.log", pid);
minqi@5683 540 o_result = make_log_name_internal("%p-test.log", NULL, pid, tms);
minqi@5683 541 assert(strcmp(i_result, o_result) == 0, "failed on testing make_log_name(\"%%p-test.log\", NULL)");
minqi@5683 542 FREE_C_HEAP_ARRAY(char, o_result, mtInternal);
minqi@5683 543
minqi@5683 544 // %t.log
brutisso@7448 545 jio_snprintf(i_result, JVM_MAXPATHLEN, "%s.log", tms);
minqi@5683 546 o_result = make_log_name_internal("%t.log", NULL, pid, tms);
minqi@5683 547 assert(strcmp(i_result, o_result) == 0, "failed on testing make_log_name(\"%%t.log\", NULL)");
minqi@5683 548 FREE_C_HEAP_ARRAY(char, o_result, mtInternal);
brutisso@7448 549
brutisso@7448 550 {
brutisso@7448 551 // longest filename
brutisso@7448 552 char longest_name[JVM_MAXPATHLEN];
brutisso@7448 553 memset(longest_name, 'a', sizeof(longest_name));
brutisso@7448 554 longest_name[JVM_MAXPATHLEN - 1] = '\0';
brutisso@7448 555 o_result = make_log_name_internal((const char*)&longest_name, NULL, pid, tms);
brutisso@7448 556 assert(strcmp(longest_name, o_result) == 0, err_msg("longest name does not match. expected '%s' but got '%s'", longest_name, o_result));
brutisso@7448 557 FREE_C_HEAP_ARRAY(char, o_result, mtInternal);
brutisso@7448 558 }
brutisso@7448 559
brutisso@7448 560 {
brutisso@7448 561 // too long file name
brutisso@7448 562 char too_long_name[JVM_MAXPATHLEN + 100];
brutisso@7448 563 int too_long_length = sizeof(too_long_name);
brutisso@7448 564 memset(too_long_name, 'a', too_long_length);
brutisso@7448 565 too_long_name[too_long_length - 1] = '\0';
brutisso@7448 566 o_result = make_log_name_internal((const char*)&too_long_name, NULL, pid, tms);
brutisso@7448 567 assert(o_result == NULL, err_msg("Too long file name should return NULL, but got '%s'", o_result));
brutisso@7448 568 }
brutisso@7448 569
brutisso@7448 570 {
brutisso@7448 571 // too long with timestamp
brutisso@7448 572 char longest_name[JVM_MAXPATHLEN];
brutisso@7448 573 memset(longest_name, 'a', JVM_MAXPATHLEN);
brutisso@7448 574 longest_name[JVM_MAXPATHLEN - 3] = '%';
brutisso@7448 575 longest_name[JVM_MAXPATHLEN - 2] = 't';
brutisso@7448 576 longest_name[JVM_MAXPATHLEN - 1] = '\0';
brutisso@7448 577 o_result = make_log_name_internal((const char*)&longest_name, NULL, pid, tms);
brutisso@7448 578 assert(o_result == NULL, err_msg("Too long file name after timestamp expansion should return NULL, but got '%s'", o_result));
brutisso@7448 579 }
brutisso@7448 580
brutisso@7448 581 {
brutisso@7448 582 // too long with pid
brutisso@7448 583 char longest_name[JVM_MAXPATHLEN];
brutisso@7448 584 memset(longest_name, 'a', JVM_MAXPATHLEN);
brutisso@7448 585 longest_name[JVM_MAXPATHLEN - 3] = '%';
brutisso@7448 586 longest_name[JVM_MAXPATHLEN - 2] = 'p';
brutisso@7448 587 longest_name[JVM_MAXPATHLEN - 1] = '\0';
brutisso@7448 588 o_result = make_log_name_internal((const char*)&longest_name, NULL, pid, tms);
brutisso@7448 589 assert(o_result == NULL, err_msg("Too long file name after pid expansion should return NULL, but got '%s'", o_result));
brutisso@7448 590 }
minqi@5683 591 }
kevinw@9478 592
kevinw@9478 593 //////////////////////////////////////////////////////////////////////////////
kevinw@9478 594 // Test os::vsnprintf and friends.
kevinw@9478 595
kevinw@9478 596 void check_snprintf_result(int expected, size_t limit, int actual, bool expect_count) {
kevinw@9478 597 if (expect_count || ((size_t)expected < limit)) {
kevinw@9478 598 assert(expected == actual, "snprintf result not expected value");
kevinw@9478 599 } else {
kevinw@9478 600 // Make this check more permissive for jdk8u, don't assert that actual == 0.
kevinw@9478 601 // e.g. jio_vsnprintf_wrapper and jio_snprintf return -1 when expected >= limit
kevinw@9478 602 if (expected >= (int) limit) {
kevinw@9478 603 assert(actual == -1, "snprintf result should be -1 for expected >= limit");
kevinw@9478 604 } else {
kevinw@9478 605 assert(actual > 0, "snprintf result should be >0 for expected < limit");
kevinw@9478 606 }
kevinw@9478 607 }
kevinw@9478 608 }
kevinw@9478 609
kevinw@9478 610 // PrintFn is expected to be int (*)(char*, size_t, const char*, ...).
kevinw@9478 611 // But jio_snprintf is a C-linkage function with that signature, which
kevinw@9478 612 // has a different type on some platforms (like Solaris).
kevinw@9478 613 template<typename PrintFn>
kevinw@9478 614 void test_snprintf(PrintFn pf, bool expect_count) {
kevinw@9478 615 const char expected[] = "abcdefghijklmnopqrstuvwxyz";
kevinw@9478 616 const int expected_len = sizeof(expected) - 1;
kevinw@9478 617 const size_t padding_size = 10;
kevinw@9478 618 char buffer[2 * (sizeof(expected) + padding_size)];
kevinw@9478 619 char check_buffer[sizeof(buffer)];
kevinw@9478 620 const char check_char = '1'; // Something not in expected.
kevinw@9478 621 memset(check_buffer, check_char, sizeof(check_buffer));
kevinw@9478 622 const size_t sizes_to_test[] = {
kevinw@9478 623 sizeof(buffer) - padding_size, // Fits, with plenty of space to spare.
kevinw@9478 624 sizeof(buffer)/2, // Fits, with space to spare.
kevinw@9478 625 sizeof(buffer)/4, // Doesn't fit.
kevinw@9478 626 sizeof(expected) + padding_size + 1, // Fits, with a little room to spare
kevinw@9478 627 sizeof(expected) + padding_size, // Fits exactly.
kevinw@9478 628 sizeof(expected) + padding_size - 1, // Doesn't quite fit.
kevinw@9478 629 2, // One char + terminating NUL.
kevinw@9478 630 1, // Only space for terminating NUL.
kevinw@9478 631 0 }; // No space at all.
kevinw@9478 632 for (unsigned i = 0; i < ARRAY_SIZE(sizes_to_test); ++i) {
kevinw@9478 633 memset(buffer, check_char, sizeof(buffer)); // To catch stray writes.
kevinw@9478 634 size_t test_size = sizes_to_test[i];
kevinw@9478 635 ResourceMark rm;
kevinw@9478 636 stringStream s;
kevinw@9478 637 s.print("test_size: " SIZE_FORMAT, test_size);
kevinw@9478 638 size_t prefix_size = padding_size;
kevinw@9478 639 guarantee(test_size <= (sizeof(buffer) - prefix_size), "invariant");
kevinw@9478 640 size_t write_size = MIN2(sizeof(expected), test_size);
kevinw@9478 641 size_t suffix_size = sizeof(buffer) - prefix_size - write_size;
kevinw@9478 642 char* write_start = buffer + prefix_size;
kevinw@9478 643 char* write_end = write_start + write_size;
kevinw@9478 644
kevinw@9478 645 int result = pf(write_start, test_size, "%s", expected);
kevinw@9478 646
kevinw@9478 647 check_snprintf_result(expected_len, test_size, result, expect_count);
kevinw@9478 648
kevinw@9478 649 // Verify expected output.
kevinw@9478 650 if (test_size > 0) {
kevinw@9478 651 assert(0 == strncmp(write_start, expected, write_size - 1), "strncmp failure");
kevinw@9478 652 // Verify terminating NUL of output.
kevinw@9478 653 assert('\0' == write_start[write_size - 1], "null terminator failure");
kevinw@9478 654 } else {
kevinw@9478 655 guarantee(test_size == 0, "invariant");
kevinw@9478 656 guarantee(write_size == 0, "invariant");
kevinw@9478 657 guarantee(prefix_size + suffix_size == sizeof(buffer), "invariant");
kevinw@9478 658 guarantee(write_start == write_end, "invariant");
kevinw@9478 659 }
kevinw@9478 660
kevinw@9478 661 // Verify no scribbling on prefix or suffix.
kevinw@9478 662 assert(0 == strncmp(buffer, check_buffer, prefix_size), "prefix scribble");
kevinw@9478 663 assert(0 == strncmp(write_end, check_buffer, suffix_size), "suffix scribble");
kevinw@9478 664 }
kevinw@9478 665
kevinw@9478 666 // Special case of 0-length buffer with empty (except for terminator) output.
kevinw@9478 667 check_snprintf_result(0, 0, pf(NULL, 0, "%s", ""), expect_count);
kevinw@9478 668 check_snprintf_result(0, 0, pf(NULL, 0, ""), expect_count);
kevinw@9478 669 }
kevinw@9478 670
kevinw@9478 671 // This is probably equivalent to os::snprintf, but we're being
kevinw@9478 672 // explicit about what we're testing here.
kevinw@9478 673 static int vsnprintf_wrapper(char* buf, size_t len, const char* fmt, ...) {
kevinw@9478 674 va_list args;
kevinw@9478 675 va_start(args, fmt);
kevinw@9478 676 int result = os::vsnprintf(buf, len, fmt, args);
kevinw@9478 677 va_end(args);
kevinw@9478 678 return result;
kevinw@9478 679 }
kevinw@9478 680
kevinw@9478 681 // These are declared in jvm.h; test here, with related functions.
kevinw@9478 682 extern "C" {
kevinw@9478 683 int jio_vsnprintf(char*, size_t, const char*, va_list);
kevinw@9478 684 int jio_snprintf(char*, size_t, const char*, ...);
kevinw@9478 685 }
kevinw@9478 686
kevinw@9478 687 // This is probably equivalent to jio_snprintf, but we're being
kevinw@9478 688 // explicit about what we're testing here.
kevinw@9478 689 static int jio_vsnprintf_wrapper(char* buf, size_t len, const char* fmt, ...) {
kevinw@9478 690 va_list args;
kevinw@9478 691 va_start(args, fmt);
kevinw@9478 692 int result = jio_vsnprintf(buf, len, fmt, args);
kevinw@9478 693 va_end(args);
kevinw@9478 694 return result;
kevinw@9478 695 }
kevinw@9478 696
kevinw@9478 697 void test_snprintf() {
kevinw@9478 698 test_snprintf(vsnprintf_wrapper, true);
kevinw@9478 699 test_snprintf(os::snprintf, true);
kevinw@9478 700 test_snprintf(jio_vsnprintf_wrapper, false); // jio_vsnprintf returns -1 on error including exceeding buffer size
kevinw@9478 701 test_snprintf(jio_snprintf, false); // jio_snprintf calls jio_vsnprintf
kevinw@9478 702 }
minqi@5683 703 #endif // PRODUCT
minqi@5683 704
duke@435 705 fileStream::fileStream(const char* file_name) {
duke@435 706 _file = fopen(file_name, "w");
minqi@5683 707 if (_file != NULL) {
minqi@5683 708 _need_close = true;
minqi@5683 709 } else {
minqi@5683 710 warning("Cannot open file %s due to %s\n", file_name, strerror(errno));
minqi@5683 711 _need_close = false;
minqi@5683 712 }
duke@435 713 }
duke@435 714
kamg@2515 715 fileStream::fileStream(const char* file_name, const char* opentype) {
kamg@2515 716 _file = fopen(file_name, opentype);
minqi@5683 717 if (_file != NULL) {
minqi@5683 718 _need_close = true;
minqi@5683 719 } else {
minqi@5683 720 warning("Cannot open file %s due to %s\n", file_name, strerror(errno));
minqi@5683 721 _need_close = false;
minqi@5683 722 }
kamg@2515 723 }
kamg@2515 724
duke@435 725 void fileStream::write(const char* s, size_t len) {
xlu@948 726 if (_file != NULL) {
xlu@948 727 // Make an unused local variable to avoid warning from gcc 4.x compiler.
xlu@948 728 size_t count = fwrite(s, 1, len, _file);
xlu@948 729 }
duke@435 730 update_position(s, len);
duke@435 731 }
duke@435 732
kamg@2515 733 long fileStream::fileSize() {
kamg@2515 734 long size = -1;
kamg@2515 735 if (_file != NULL) {
kamg@2515 736 long pos = ::ftell(_file);
kamg@2515 737 if (::fseek(_file, 0, SEEK_END) == 0) {
kamg@2515 738 size = ::ftell(_file);
kamg@2515 739 }
kamg@2515 740 ::fseek(_file, pos, SEEK_SET);
kamg@2515 741 }
kamg@2515 742 return size;
kamg@2515 743 }
kamg@2515 744
kamg@2515 745 char* fileStream::readln(char *data, int count ) {
kamg@2515 746 char * ret = ::fgets(data, count, _file);
kamg@2515 747 //Get rid of annoying \n char
kamg@2515 748 data[::strlen(data)-1] = '\0';
kamg@2515 749 return ret;
kamg@2515 750 }
kamg@2515 751
duke@435 752 fileStream::~fileStream() {
duke@435 753 if (_file != NULL) {
duke@435 754 if (_need_close) fclose(_file);
minqi@2964 755 _file = NULL;
duke@435 756 }
duke@435 757 }
duke@435 758
duke@435 759 void fileStream::flush() {
duke@435 760 fflush(_file);
duke@435 761 }
duke@435 762
duke@435 763 fdStream::fdStream(const char* file_name) {
duke@435 764 _fd = open(file_name, O_WRONLY | O_CREAT | O_TRUNC, 0666);
duke@435 765 _need_close = true;
duke@435 766 }
duke@435 767
duke@435 768 fdStream::~fdStream() {
duke@435 769 if (_fd != -1) {
duke@435 770 if (_need_close) close(_fd);
duke@435 771 _fd = -1;
duke@435 772 }
duke@435 773 }
duke@435 774
duke@435 775 void fdStream::write(const char* s, size_t len) {
xlu@948 776 if (_fd != -1) {
xlu@948 777 // Make an unused local variable to avoid warning from gcc 4.x compiler.
xlu@948 778 size_t count = ::write(_fd, s, (int)len);
xlu@948 779 }
duke@435 780 update_position(s, len);
duke@435 781 }
duke@435 782
minqi@5683 783 // dump vm version, os version, platform info, build id,
minqi@5683 784 // memory usage and command line flags into header
minqi@5683 785 void gcLogFileStream::dump_loggc_header() {
minqi@5683 786 if (is_open()) {
drchase@6680 787 print_cr("%s", Abstract_VM_Version::internal_vm_info_string());
minqi@5683 788 os::print_memory_info(this);
minqi@5683 789 print("CommandLine flags: ");
minqi@5683 790 CommandLineFlags::printSetFlags(this);
minqi@5683 791 }
minqi@5683 792 }
minqi@5683 793
minqi@5683 794 gcLogFileStream::~gcLogFileStream() {
minqi@2964 795 if (_file != NULL) {
minqi@2964 796 if (_need_close) fclose(_file);
minqi@5683 797 _file = NULL;
minqi@5683 798 }
minqi@5683 799 if (_file_name != NULL) {
zgu@3900 800 FREE_C_HEAP_ARRAY(char, _file_name, mtInternal);
minqi@2964 801 _file_name = NULL;
minqi@2964 802 }
phh@9904 803
phh@9904 804 delete _file_lock;
minqi@2964 805 }
minqi@2964 806
phh@9904 807 gcLogFileStream::gcLogFileStream(const char* file_name) : _file_lock(NULL) {
minqi@2964 808 _cur_file_num = 0;
jwilhelm@4647 809 _bytes_written = 0L;
minqi@5683 810 _file_name = make_log_name(file_name, NULL);
minqi@5683 811
brutisso@7448 812 if (_file_name == NULL) {
brutisso@7448 813 warning("Cannot open file %s: file name is too long.\n", file_name);
brutisso@7448 814 _need_close = false;
brutisso@7448 815 UseGCLogFileRotation = false;
brutisso@7448 816 return;
brutisso@7448 817 }
brutisso@7448 818
minqi@5683 819 // gc log file rotation
minqi@5683 820 if (UseGCLogFileRotation && NumberOfGCLogFiles > 1) {
brutisso@7448 821 char tempbuf[JVM_MAXPATHLEN];
minqi@5683 822 jio_snprintf(tempbuf, sizeof(tempbuf), "%s.%d" CURRENTAPPX, _file_name, _cur_file_num);
minqi@5683 823 _file = fopen(tempbuf, "w");
minqi@5683 824 } else {
minqi@5683 825 _file = fopen(_file_name, "w");
minqi@5683 826 }
minqi@5683 827 if (_file != NULL) {
minqi@5683 828 _need_close = true;
minqi@5683 829 dump_loggc_header();
phh@9904 830
phh@9904 831 if (UseGCLogFileRotation) {
phh@9904 832 _file_lock = new Mutex(Mutex::leaf, "GCLogFile");
phh@9904 833 }
minqi@5683 834 } else {
minqi@5683 835 warning("Cannot open file %s due to %s\n", _file_name, strerror(errno));
minqi@5683 836 _need_close = false;
minqi@5683 837 }
minqi@2964 838 }
minqi@2964 839
minqi@5683 840 void gcLogFileStream::write(const char* s, size_t len) {
jwilhelm@4647 841 if (_file != NULL) {
phh@9904 842 // we can't use Thread::current() here because thread may be NULL
phh@9904 843 // in early stage(ostream_init_log)
phh@9904 844 Thread* thread = ThreadLocalStorage::thread();
phh@9904 845
phh@9904 846 // avoid the mutex in the following cases
phh@9904 847 // 1) ThreadLocalStorage::thread() hasn't been initialized
phh@9904 848 // 2) _file_lock is not in use.
phh@9904 849 // 3) current() is VMThread and its reentry flag is set
phh@9904 850 if (!thread || !_file_lock || (thread->is_VM_thread()
phh@9904 851 && ((VMThread* )thread)->is_gclog_reentry())) {
phh@9904 852 size_t count = fwrite(s, 1, len, _file);
phh@9904 853 _bytes_written += count;
phh@9904 854 }
phh@9904 855 else {
phh@9904 856 MutexLockerEx ml(_file_lock, Mutex::_no_safepoint_check_flag);
phh@9904 857 size_t count = fwrite(s, 1, len, _file);
phh@9904 858 _bytes_written += count;
phh@9904 859 }
minqi@2964 860 }
minqi@2964 861 update_position(s, len);
minqi@2964 862 }
minqi@2964 863
phh@9904 864 // rotate_log must be called from VMThread at a safepoint. In case need change parameters
minqi@2964 865 // for gc log rotation from thread other than VMThread, a sub type of VM_Operation
minqi@2964 866 // should be created and be submitted to VMThread's operation queue. DO NOT call this
phh@9904 867 // function directly. It is safe to rotate log through VMThread because
phh@9904 868 // no mutator threads run concurrently with the VMThread, and GC threads that run
phh@9904 869 // concurrently with the VMThread are synchronized in write and rotate_log via _file_lock.
phh@9904 870 // rotate_log can write log entries, so write supports reentry for it.
minqi@6535 871 void gcLogFileStream::rotate_log(bool force, outputStream* out) {
phh@9904 872 #ifdef ASSERT
phh@9904 873 Thread *thread = Thread::current();
phh@9904 874 assert(thread == NULL ||
phh@9904 875 (thread->is_VM_thread() && SafepointSynchronize::is_at_safepoint()),
phh@9904 876 "Must be VMThread at safepoint");
phh@9904 877 #endif
phh@9904 878
phh@9904 879 VMThread* vmthread = VMThread::vm_thread();
phh@9904 880 {
phh@9904 881 // nop if _file_lock is NULL.
phh@9904 882 MutexLockerEx ml(_file_lock, Mutex::_no_safepoint_check_flag);
phh@9904 883 vmthread->set_gclog_reentry(true);
phh@9904 884 rotate_log_impl(force, out);
phh@9904 885 vmthread->set_gclog_reentry(false);
phh@9904 886 }
phh@9904 887 }
phh@9904 888
phh@9904 889 void gcLogFileStream::rotate_log_impl(bool force, outputStream* out) {
brutisso@7448 890 char time_msg[O_BUFLEN];
minqi@5683 891 char time_str[EXTRACHARLEN];
brutisso@7448 892 char current_file_name[JVM_MAXPATHLEN];
brutisso@7448 893 char renamed_file_name[JVM_MAXPATHLEN];
minqi@5683 894
minqi@6535 895 if (!should_rotate(force)) {
jwilhelm@4647 896 return;
jwilhelm@4647 897 }
jwilhelm@4647 898
minqi@2964 899 if (NumberOfGCLogFiles == 1) {
minqi@2964 900 // rotate in same file
minqi@2964 901 rewind();
jwilhelm@4647 902 _bytes_written = 0L;
minqi@5683 903 jio_snprintf(time_msg, sizeof(time_msg), "File %s rotated at %s\n",
minqi@5683 904 _file_name, os::local_time_string((char *)time_str, sizeof(time_str)));
minqi@5683 905 write(time_msg, strlen(time_msg));
minqi@6535 906
minqi@6535 907 if (out != NULL) {
drchase@6680 908 out->print("%s", time_msg);
minqi@6535 909 }
minqi@6535 910
minqi@5683 911 dump_loggc_header();
minqi@2964 912 return;
minqi@2964 913 }
minqi@2964 914
minqi@5683 915 #if defined(_WINDOWS)
minqi@5683 916 #ifndef F_OK
minqi@5683 917 #define F_OK 0
minqi@5683 918 #endif
minqi@5683 919 #endif // _WINDOWS
minqi@5683 920
minqi@5683 921 // rotate file in names extended_filename.0, extended_filename.1, ...,
minqi@5683 922 // extended_filename.<NumberOfGCLogFiles - 1>. Current rotation file name will
minqi@5683 923 // have a form of extended_filename.<i>.current where i is the current rotation
minqi@5683 924 // file number. After it reaches max file size, the file will be saved and renamed
minqi@5683 925 // with .current removed from its tail.
minqi@2964 926 if (_file != NULL) {
brutisso@7448 927 jio_snprintf(renamed_file_name, JVM_MAXPATHLEN, "%s.%d",
minqi@5683 928 _file_name, _cur_file_num);
brutisso@7448 929 int result = jio_snprintf(current_file_name, JVM_MAXPATHLEN,
brutisso@7448 930 "%s.%d" CURRENTAPPX, _file_name, _cur_file_num);
brutisso@7448 931 if (result >= JVM_MAXPATHLEN) {
brutisso@7448 932 warning("Cannot create new log file name: %s: file name is too long.\n", current_file_name);
brutisso@7448 933 return;
brutisso@7448 934 }
minqi@6535 935
minqi@6535 936 const char* msg = force ? "GC log rotation request has been received."
minqi@6535 937 : "GC log file has reached the maximum size.";
minqi@6535 938 jio_snprintf(time_msg, sizeof(time_msg), "%s %s Saved as %s\n",
minqi@6535 939 os::local_time_string((char *)time_str, sizeof(time_str)),
minqi@6535 940 msg, renamed_file_name);
minqi@5683 941 write(time_msg, strlen(time_msg));
minqi@5683 942
minqi@6535 943 if (out != NULL) {
drchase@6680 944 out->print("%s", time_msg);
minqi@6535 945 }
minqi@6535 946
minqi@2964 947 fclose(_file);
minqi@2964 948 _file = NULL;
minqi@5683 949
minqi@5683 950 bool can_rename = true;
minqi@5683 951 if (access(current_file_name, F_OK) != 0) {
minqi@5683 952 // current file does not exist?
minqi@5683 953 warning("No source file exists, cannot rename\n");
minqi@5683 954 can_rename = false;
minqi@5683 955 }
minqi@5683 956 if (can_rename) {
minqi@5683 957 if (access(renamed_file_name, F_OK) == 0) {
minqi@5683 958 if (remove(renamed_file_name) != 0) {
minqi@5683 959 warning("Could not delete existing file %s\n", renamed_file_name);
minqi@5683 960 can_rename = false;
minqi@5683 961 }
minqi@5683 962 } else {
minqi@5683 963 // file does not exist, ok to rename
minqi@5683 964 }
minqi@5683 965 }
minqi@5683 966 if (can_rename && rename(current_file_name, renamed_file_name) != 0) {
minqi@5683 967 warning("Could not rename %s to %s\n", _file_name, renamed_file_name);
minqi@5683 968 }
minqi@2964 969 }
minqi@5683 970
minqi@5683 971 _cur_file_num++;
minqi@5683 972 if (_cur_file_num > NumberOfGCLogFiles - 1) _cur_file_num = 0;
brutisso@7448 973 int result = jio_snprintf(current_file_name, JVM_MAXPATHLEN, "%s.%d" CURRENTAPPX,
minqi@5683 974 _file_name, _cur_file_num);
brutisso@7448 975 if (result >= JVM_MAXPATHLEN) {
brutisso@7448 976 warning("Cannot create new log file name: %s: file name is too long.\n", current_file_name);
brutisso@7448 977 return;
brutisso@7448 978 }
brutisso@7448 979
minqi@5683 980 _file = fopen(current_file_name, "w");
minqi@5683 981
minqi@2964 982 if (_file != NULL) {
jwilhelm@4647 983 _bytes_written = 0L;
minqi@2964 984 _need_close = true;
minqi@5683 985 // reuse current_file_name for time_msg
brutisso@7448 986 jio_snprintf(current_file_name, JVM_MAXPATHLEN,
minqi@5683 987 "%s.%d", _file_name, _cur_file_num);
minqi@5683 988 jio_snprintf(time_msg, sizeof(time_msg), "%s GC log file created %s\n",
brutisso@7448 989 os::local_time_string((char *)time_str, sizeof(time_str)), current_file_name);
minqi@5683 990 write(time_msg, strlen(time_msg));
minqi@6535 991
minqi@6535 992 if (out != NULL) {
drchase@6680 993 out->print("%s", time_msg);
minqi@6535 994 }
minqi@6535 995
minqi@5683 996 dump_loggc_header();
minqi@5683 997 // remove the existing file
minqi@5683 998 if (access(current_file_name, F_OK) == 0) {
minqi@5683 999 if (remove(current_file_name) != 0) {
minqi@5683 1000 warning("Could not delete existing file %s\n", current_file_name);
minqi@5683 1001 }
minqi@5683 1002 }
minqi@2964 1003 } else {
minqi@5683 1004 warning("failed to open rotation log file %s due to %s\n"
minqi@5683 1005 "Turned off GC log file rotation\n",
minqi@2964 1006 _file_name, strerror(errno));
minqi@2964 1007 _need_close = false;
minqi@5683 1008 FLAG_SET_DEFAULT(UseGCLogFileRotation, false);
minqi@2964 1009 }
minqi@2964 1010 }
minqi@2964 1011
duke@435 1012 defaultStream* defaultStream::instance = NULL;
duke@435 1013 int defaultStream::_output_fd = 1;
duke@435 1014 int defaultStream::_error_fd = 2;
duke@435 1015 FILE* defaultStream::_output_stream = stdout;
duke@435 1016 FILE* defaultStream::_error_stream = stderr;
duke@435 1017
duke@435 1018 #define LOG_MAJOR_VERSION 160
duke@435 1019 #define LOG_MINOR_VERSION 1
duke@435 1020
duke@435 1021 void defaultStream::init() {
duke@435 1022 _inited = true;
duke@435 1023 if (LogVMOutput || LogCompilation) {
duke@435 1024 init_log();
duke@435 1025 }
duke@435 1026 }
duke@435 1027
duke@435 1028 bool defaultStream::has_log_file() {
duke@435 1029 // lazily create log file (at startup, LogVMOutput is false even
duke@435 1030 // if +LogVMOutput is used, because the flags haven't been parsed yet)
duke@435 1031 // For safer printing during fatal error handling, do not init logfile
duke@435 1032 // if a VM error has been reported.
duke@435 1033 if (!_inited && !is_error_reported()) init();
duke@435 1034 return _log_file != NULL;
duke@435 1035 }
duke@435 1036
brutisso@7448 1037 fileStream* defaultStream::open_file(const char* log_name) {
brutisso@7448 1038 const char* try_name = make_log_name(log_name, NULL);
brutisso@7448 1039 if (try_name == NULL) {
brutisso@7448 1040 warning("Cannot open file %s: file name is too long.\n", log_name);
brutisso@7448 1041 return NULL;
brutisso@7448 1042 }
brutisso@7448 1043
brutisso@7448 1044 fileStream* file = new(ResourceObj::C_HEAP, mtInternal) fileStream(try_name);
brutisso@7448 1045 FREE_C_HEAP_ARRAY(char, try_name, mtInternal);
brutisso@7448 1046 if (file->is_open()) {
brutisso@7448 1047 return file;
brutisso@7448 1048 }
brutisso@7448 1049
brutisso@7448 1050 // Try again to open the file in the temp directory.
brutisso@7448 1051 delete file;
brutisso@7448 1052 char warnbuf[O_BUFLEN*2];
brutisso@7448 1053 jio_snprintf(warnbuf, sizeof(warnbuf), "Warning: Cannot open log file: %s\n", log_name);
brutisso@7448 1054 // Note: This feature is for maintainer use only. No need for L10N.
brutisso@7448 1055 jio_print(warnbuf);
brutisso@7448 1056 try_name = make_log_name(log_name, os::get_temp_directory());
brutisso@7448 1057 if (try_name == NULL) {
brutisso@7448 1058 warning("Cannot open file %s: file name is too long for directory %s.\n", log_name, os::get_temp_directory());
brutisso@7448 1059 return NULL;
brutisso@7448 1060 }
brutisso@7448 1061
brutisso@7448 1062 jio_snprintf(warnbuf, sizeof(warnbuf),
brutisso@7448 1063 "Warning: Forcing option -XX:LogFile=%s\n", try_name);
brutisso@7448 1064 jio_print(warnbuf);
brutisso@7448 1065
brutisso@7448 1066 file = new(ResourceObj::C_HEAP, mtInternal) fileStream(try_name);
brutisso@7448 1067 FREE_C_HEAP_ARRAY(char, try_name, mtInternal);
brutisso@7448 1068 if (file->is_open()) {
brutisso@7448 1069 return file;
brutisso@7448 1070 }
brutisso@7448 1071
brutisso@7448 1072 delete file;
brutisso@7448 1073 return NULL;
brutisso@7448 1074 }
brutisso@7448 1075
duke@435 1076 void defaultStream::init_log() {
duke@435 1077 // %%% Need a MutexLocker?
vlivanov@5903 1078 const char* log_name = LogFile != NULL ? LogFile : "hotspot_%p.log";
brutisso@7448 1079 fileStream* file = open_file(log_name);
brutisso@7448 1080
brutisso@7448 1081 if (file != NULL) {
brutisso@7448 1082 _log_file = file;
brutisso@7448 1083 _outer_xmlStream = new(ResourceObj::C_HEAP, mtInternal) xmlStream(file);
brutisso@7448 1084 start_log();
brutisso@7448 1085 } else {
brutisso@7448 1086 // and leave xtty as NULL
brutisso@7448 1087 LogVMOutput = false;
brutisso@7448 1088 DisplayVMOutput = true;
brutisso@7448 1089 LogCompilation = false;
duke@435 1090 }
brutisso@7448 1091 }
vlivanov@5725 1092
brutisso@7448 1093 void defaultStream::start_log() {
brutisso@7448 1094 xmlStream*xs = _outer_xmlStream;
duke@435 1095 if (this == tty) xtty = xs;
duke@435 1096 // Write XML header.
duke@435 1097 xs->print_cr("<?xml version='1.0' encoding='UTF-8'?>");
duke@435 1098 // (For now, don't bother to issue a DTD for this private format.)
duke@435 1099 jlong time_ms = os::javaTimeMillis() - tty->time_stamp().milliseconds();
duke@435 1100 // %%% Should be: jlong time_ms = os::start_time_milliseconds(), if
duke@435 1101 // we ever get round to introduce that method on the os class
duke@435 1102 xs->head("hotspot_log version='%d %d'"
kevinw@9327 1103 " process='%d' time_ms='" INT64_FORMAT "'",
duke@435 1104 LOG_MAJOR_VERSION, LOG_MINOR_VERSION,
drchase@6680 1105 os::current_process_id(), (int64_t)time_ms);
duke@435 1106 // Write VM version header immediately.
duke@435 1107 xs->head("vm_version");
duke@435 1108 xs->head("name"); xs->text("%s", VM_Version::vm_name()); xs->cr();
duke@435 1109 xs->tail("name");
duke@435 1110 xs->head("release"); xs->text("%s", VM_Version::vm_release()); xs->cr();
duke@435 1111 xs->tail("release");
duke@435 1112 xs->head("info"); xs->text("%s", VM_Version::internal_vm_info_string()); xs->cr();
duke@435 1113 xs->tail("info");
duke@435 1114 xs->tail("vm_version");
duke@435 1115 // Record information about the command-line invocation.
duke@435 1116 xs->head("vm_arguments"); // Cf. Arguments::print_on()
duke@435 1117 if (Arguments::num_jvm_flags() > 0) {
duke@435 1118 xs->head("flags");
duke@435 1119 Arguments::print_jvm_flags_on(xs->text());
duke@435 1120 xs->tail("flags");
duke@435 1121 }
duke@435 1122 if (Arguments::num_jvm_args() > 0) {
duke@435 1123 xs->head("args");
duke@435 1124 Arguments::print_jvm_args_on(xs->text());
duke@435 1125 xs->tail("args");
duke@435 1126 }
duke@435 1127 if (Arguments::java_command() != NULL) {
duke@435 1128 xs->head("command"); xs->text()->print_cr("%s", Arguments::java_command());
duke@435 1129 xs->tail("command");
duke@435 1130 }
duke@435 1131 if (Arguments::sun_java_launcher() != NULL) {
duke@435 1132 xs->head("launcher"); xs->text()->print_cr("%s", Arguments::sun_java_launcher());
duke@435 1133 xs->tail("launcher");
duke@435 1134 }
duke@435 1135 if (Arguments::system_properties() != NULL) {
duke@435 1136 xs->head("properties");
duke@435 1137 // Print it as a java-style property list.
duke@435 1138 // System properties don't generally contain newlines, so don't bother with unparsing.
duke@435 1139 for (SystemProperty* p = Arguments::system_properties(); p != NULL; p = p->next()) {
duke@435 1140 xs->text()->print_cr("%s=%s", p->key(), p->value());
duke@435 1141 }
duke@435 1142 xs->tail("properties");
duke@435 1143 }
duke@435 1144 xs->tail("vm_arguments");
duke@435 1145 // tty output per se is grouped under the <tty>...</tty> element.
duke@435 1146 xs->head("tty");
duke@435 1147 // All further non-markup text gets copied to the tty:
duke@435 1148 xs->_text = this; // requires friend declaration!
duke@435 1149 }
duke@435 1150
duke@435 1151 // finish_log() is called during normal VM shutdown. finish_log_on_error() is
duke@435 1152 // called by ostream_abort() after a fatal error.
duke@435 1153 //
duke@435 1154 void defaultStream::finish_log() {
duke@435 1155 xmlStream* xs = _outer_xmlStream;
duke@435 1156 xs->done("tty");
duke@435 1157
duke@435 1158 // Other log forks are appended here, at the End of Time:
duke@435 1159 CompileLog::finish_log(xs->out()); // write compile logging, if any, now
duke@435 1160
duke@435 1161 xs->done("hotspot_log");
duke@435 1162 xs->flush();
duke@435 1163
duke@435 1164 fileStream* file = _log_file;
duke@435 1165 _log_file = NULL;
duke@435 1166
duke@435 1167 delete _outer_xmlStream;
duke@435 1168 _outer_xmlStream = NULL;
duke@435 1169
duke@435 1170 file->flush();
duke@435 1171 delete file;
duke@435 1172 }
duke@435 1173
duke@435 1174 void defaultStream::finish_log_on_error(char *buf, int buflen) {
duke@435 1175 xmlStream* xs = _outer_xmlStream;
duke@435 1176
duke@435 1177 if (xs && xs->out()) {
duke@435 1178
duke@435 1179 xs->done_raw("tty");
duke@435 1180
duke@435 1181 // Other log forks are appended here, at the End of Time:
duke@435 1182 CompileLog::finish_log_on_error(xs->out(), buf, buflen); // write compile logging, if any, now
duke@435 1183
duke@435 1184 xs->done_raw("hotspot_log");
duke@435 1185 xs->flush();
duke@435 1186
duke@435 1187 fileStream* file = _log_file;
duke@435 1188 _log_file = NULL;
duke@435 1189 _outer_xmlStream = NULL;
duke@435 1190
duke@435 1191 if (file) {
duke@435 1192 file->flush();
duke@435 1193
duke@435 1194 // Can't delete or close the file because delete and fclose aren't
duke@435 1195 // async-safe. We are about to die, so leave it to the kernel.
duke@435 1196 // delete file;
duke@435 1197 }
duke@435 1198 }
duke@435 1199 }
duke@435 1200
duke@435 1201 intx defaultStream::hold(intx writer_id) {
duke@435 1202 bool has_log = has_log_file(); // check before locking
duke@435 1203 if (// impossible, but who knows?
duke@435 1204 writer_id == NO_WRITER ||
duke@435 1205
duke@435 1206 // bootstrap problem
duke@435 1207 tty_lock == NULL ||
duke@435 1208
duke@435 1209 // can't grab a lock or call Thread::current() if TLS isn't initialized
duke@435 1210 ThreadLocalStorage::thread() == NULL ||
duke@435 1211
duke@435 1212 // developer hook
duke@435 1213 !SerializeVMOutput ||
duke@435 1214
duke@435 1215 // VM already unhealthy
duke@435 1216 is_error_reported() ||
duke@435 1217
duke@435 1218 // safepoint == global lock (for VM only)
duke@435 1219 (SafepointSynchronize::is_synchronizing() &&
duke@435 1220 Thread::current()->is_VM_thread())
duke@435 1221 ) {
duke@435 1222 // do not attempt to lock unless we know the thread and the VM is healthy
duke@435 1223 return NO_WRITER;
duke@435 1224 }
duke@435 1225 if (_writer == writer_id) {
duke@435 1226 // already held, no need to re-grab the lock
duke@435 1227 return NO_WRITER;
duke@435 1228 }
duke@435 1229 tty_lock->lock_without_safepoint_check();
duke@435 1230 // got the lock
duke@435 1231 if (writer_id != _last_writer) {
duke@435 1232 if (has_log) {
duke@435 1233 _log_file->bol();
duke@435 1234 // output a hint where this output is coming from:
vlivanov@4154 1235 _log_file->print_cr("<writer thread='" UINTX_FORMAT "'/>", writer_id);
duke@435 1236 }
duke@435 1237 _last_writer = writer_id;
duke@435 1238 }
duke@435 1239 _writer = writer_id;
duke@435 1240 return writer_id;
duke@435 1241 }
duke@435 1242
duke@435 1243 void defaultStream::release(intx holder) {
duke@435 1244 if (holder == NO_WRITER) {
duke@435 1245 // nothing to release: either a recursive lock, or we scribbled (too bad)
duke@435 1246 return;
duke@435 1247 }
duke@435 1248 if (_writer != holder) {
duke@435 1249 return; // already unlocked, perhaps via break_tty_lock_for_safepoint
duke@435 1250 }
duke@435 1251 _writer = NO_WRITER;
duke@435 1252 tty_lock->unlock();
duke@435 1253 }
duke@435 1254
duke@435 1255
duke@435 1256 // Yuck: jio_print does not accept char*/len.
duke@435 1257 static void call_jio_print(const char* s, size_t len) {
duke@435 1258 char buffer[O_BUFLEN+100];
duke@435 1259 if (len > sizeof(buffer)-1) {
duke@435 1260 warning("increase O_BUFLEN in ostream.cpp -- output truncated");
duke@435 1261 len = sizeof(buffer)-1;
duke@435 1262 }
duke@435 1263 strncpy(buffer, s, len);
duke@435 1264 buffer[len] = '\0';
duke@435 1265 jio_print(buffer);
duke@435 1266 }
duke@435 1267
duke@435 1268
duke@435 1269 void defaultStream::write(const char* s, size_t len) {
duke@435 1270 intx thread_id = os::current_thread_id();
duke@435 1271 intx holder = hold(thread_id);
duke@435 1272
duke@435 1273 if (DisplayVMOutput &&
duke@435 1274 (_outer_xmlStream == NULL || !_outer_xmlStream->inside_attrs())) {
duke@435 1275 // print to output stream. It can be redirected by a vfprintf hook
duke@435 1276 if (s[len] == '\0') {
duke@435 1277 jio_print(s);
duke@435 1278 } else {
duke@435 1279 call_jio_print(s, len);
duke@435 1280 }
duke@435 1281 }
duke@435 1282
duke@435 1283 // print to log file
duke@435 1284 if (has_log_file()) {
duke@435 1285 int nl0 = _newlines;
duke@435 1286 xmlTextStream::write(s, len);
duke@435 1287 // flush the log file too, if there were any newlines
duke@435 1288 if (nl0 != _newlines){
duke@435 1289 flush();
duke@435 1290 }
duke@435 1291 } else {
duke@435 1292 update_position(s, len);
duke@435 1293 }
duke@435 1294
duke@435 1295 release(holder);
duke@435 1296 }
duke@435 1297
duke@435 1298 intx ttyLocker::hold_tty() {
duke@435 1299 if (defaultStream::instance == NULL) return defaultStream::NO_WRITER;
duke@435 1300 intx thread_id = os::current_thread_id();
duke@435 1301 return defaultStream::instance->hold(thread_id);
duke@435 1302 }
duke@435 1303
duke@435 1304 void ttyLocker::release_tty(intx holder) {
duke@435 1305 if (holder == defaultStream::NO_WRITER) return;
duke@435 1306 defaultStream::instance->release(holder);
duke@435 1307 }
duke@435 1308
never@2570 1309 bool ttyLocker::release_tty_if_locked() {
never@2570 1310 intx thread_id = os::current_thread_id();
never@2570 1311 if (defaultStream::instance->writer() == thread_id) {
never@2570 1312 // release the lock and return true so callers know if was
never@2570 1313 // previously held.
never@2570 1314 release_tty(thread_id);
never@2570 1315 return true;
never@2570 1316 }
never@2570 1317 return false;
never@2570 1318 }
never@2570 1319
duke@435 1320 void ttyLocker::break_tty_lock_for_safepoint(intx holder) {
duke@435 1321 if (defaultStream::instance != NULL &&
duke@435 1322 defaultStream::instance->writer() == holder) {
duke@435 1323 if (xtty != NULL) {
duke@435 1324 xtty->print_cr("<!-- safepoint while printing -->");
duke@435 1325 }
duke@435 1326 defaultStream::instance->release(holder);
duke@435 1327 }
duke@435 1328 // (else there was no lock to break)
duke@435 1329 }
duke@435 1330
duke@435 1331 void ostream_init() {
duke@435 1332 if (defaultStream::instance == NULL) {
zgu@3900 1333 defaultStream::instance = new(ResourceObj::C_HEAP, mtInternal) defaultStream();
duke@435 1334 tty = defaultStream::instance;
duke@435 1335
duke@435 1336 // We want to ensure that time stamps in GC logs consider time 0
duke@435 1337 // the time when the JVM is initialized, not the first time we ask
duke@435 1338 // for a time stamp. So, here, we explicitly update the time stamp
duke@435 1339 // of tty.
duke@435 1340 tty->time_stamp().update_to(1);
duke@435 1341 }
duke@435 1342 }
duke@435 1343
duke@435 1344 void ostream_init_log() {
duke@435 1345 // For -Xloggc:<file> option - called in runtime/thread.cpp
duke@435 1346 // Note : this must be called AFTER ostream_init()
duke@435 1347
duke@435 1348 gclog_or_tty = tty; // default to tty
duke@435 1349 if (Arguments::gc_log_filename() != NULL) {
minqi@5683 1350 fileStream * gclog = new(ResourceObj::C_HEAP, mtInternal)
minqi@5683 1351 gcLogFileStream(Arguments::gc_log_filename());
duke@435 1352 if (gclog->is_open()) {
duke@435 1353 // now we update the time stamp of the GC log to be synced up
duke@435 1354 // with tty.
duke@435 1355 gclog->time_stamp().update_to(tty->time_stamp().ticks());
duke@435 1356 }
minqi@2964 1357 gclog_or_tty = gclog;
duke@435 1358 }
duke@435 1359
iklam@7089 1360 #if INCLUDE_CDS
iklam@7089 1361 // For -XX:DumpLoadedClassList=<file> option
iklam@7089 1362 if (DumpLoadedClassList != NULL) {
iklam@7089 1363 const char* list_name = make_log_name(DumpLoadedClassList, NULL);
iklam@7089 1364 classlist_file = new(ResourceObj::C_HEAP, mtInternal)
iklam@7089 1365 fileStream(list_name);
iklam@7089 1366 FREE_C_HEAP_ARRAY(char, list_name, mtInternal);
iklam@7089 1367 }
iklam@7089 1368 #endif
iklam@7089 1369
duke@435 1370 // If we haven't lazily initialized the logfile yet, do it now,
duke@435 1371 // to avoid the possibility of lazy initialization during a VM
duke@435 1372 // crash, which can affect the stability of the fatal error handler.
duke@435 1373 defaultStream::instance->has_log_file();
duke@435 1374 }
duke@435 1375
duke@435 1376 // ostream_exit() is called during normal VM exit to finish log files, flush
duke@435 1377 // output and free resource.
duke@435 1378 void ostream_exit() {
duke@435 1379 static bool ostream_exit_called = false;
duke@435 1380 if (ostream_exit_called) return;
duke@435 1381 ostream_exit_called = true;
iklam@7089 1382 #if INCLUDE_CDS
iklam@7089 1383 if (classlist_file != NULL) {
iklam@7089 1384 delete classlist_file;
iklam@7089 1385 }
iklam@7089 1386 #endif
duke@435 1387 if (gclog_or_tty != tty) {
duke@435 1388 delete gclog_or_tty;
duke@435 1389 }
duke@435 1390 {
duke@435 1391 // we temporaly disable PrintMallocFree here
duke@435 1392 // as otherwise it'll lead to using of almost deleted
duke@435 1393 // tty or defaultStream::instance in logging facility
duke@435 1394 // of HeapFree(), see 6391258
duke@435 1395 DEBUG_ONLY(FlagSetting fs(PrintMallocFree, false);)
duke@435 1396 if (tty != defaultStream::instance) {
duke@435 1397 delete tty;
duke@435 1398 }
duke@435 1399 if (defaultStream::instance != NULL) {
duke@435 1400 delete defaultStream::instance;
duke@435 1401 }
duke@435 1402 }
duke@435 1403 tty = NULL;
duke@435 1404 xtty = NULL;
duke@435 1405 gclog_or_tty = NULL;
duke@435 1406 defaultStream::instance = NULL;
duke@435 1407 }
duke@435 1408
duke@435 1409 // ostream_abort() is called by os::abort() when VM is about to die.
duke@435 1410 void ostream_abort() {
duke@435 1411 // Here we can't delete gclog_or_tty and tty, just flush their output
duke@435 1412 if (gclog_or_tty) gclog_or_tty->flush();
duke@435 1413 if (tty) tty->flush();
duke@435 1414
duke@435 1415 if (defaultStream::instance != NULL) {
duke@435 1416 static char buf[4096];
duke@435 1417 defaultStream::instance->finish_log_on_error(buf, sizeof(buf));
duke@435 1418 }
duke@435 1419 }
duke@435 1420
duke@435 1421 staticBufferStream::staticBufferStream(char* buffer, size_t buflen,
duke@435 1422 outputStream *outer_stream) {
duke@435 1423 _buffer = buffer;
duke@435 1424 _buflen = buflen;
duke@435 1425 _outer_stream = outer_stream;
kvn@2702 1426 // compile task prints time stamp relative to VM start
kvn@2702 1427 _stamp.update_to(1);
duke@435 1428 }
duke@435 1429
duke@435 1430 void staticBufferStream::write(const char* c, size_t len) {
duke@435 1431 _outer_stream->print_raw(c, (int)len);
duke@435 1432 }
duke@435 1433
duke@435 1434 void staticBufferStream::flush() {
duke@435 1435 _outer_stream->flush();
duke@435 1436 }
duke@435 1437
duke@435 1438 void staticBufferStream::print(const char* format, ...) {
duke@435 1439 va_list ap;
duke@435 1440 va_start(ap, format);
duke@435 1441 size_t len;
duke@435 1442 const char* str = do_vsnprintf(_buffer, _buflen, format, ap, false, len);
duke@435 1443 write(str, len);
duke@435 1444 va_end(ap);
duke@435 1445 }
duke@435 1446
duke@435 1447 void staticBufferStream::print_cr(const char* format, ...) {
duke@435 1448 va_list ap;
duke@435 1449 va_start(ap, format);
duke@435 1450 size_t len;
duke@435 1451 const char* str = do_vsnprintf(_buffer, _buflen, format, ap, true, len);
duke@435 1452 write(str, len);
duke@435 1453 va_end(ap);
duke@435 1454 }
duke@435 1455
duke@435 1456 void staticBufferStream::vprint(const char *format, va_list argptr) {
duke@435 1457 size_t len;
duke@435 1458 const char* str = do_vsnprintf(_buffer, _buflen, format, argptr, false, len);
duke@435 1459 write(str, len);
duke@435 1460 }
duke@435 1461
duke@435 1462 void staticBufferStream::vprint_cr(const char* format, va_list argptr) {
duke@435 1463 size_t len;
duke@435 1464 const char* str = do_vsnprintf(_buffer, _buflen, format, argptr, true, len);
duke@435 1465 write(str, len);
duke@435 1466 }
duke@435 1467
never@657 1468 bufferedStream::bufferedStream(size_t initial_size, size_t bufmax) : outputStream() {
duke@435 1469 buffer_length = initial_size;
zgu@3900 1470 buffer = NEW_C_HEAP_ARRAY(char, buffer_length, mtInternal);
duke@435 1471 buffer_pos = 0;
duke@435 1472 buffer_fixed = false;
never@657 1473 buffer_max = bufmax;
duke@435 1474 }
duke@435 1475
never@657 1476 bufferedStream::bufferedStream(char* fixed_buffer, size_t fixed_buffer_size, size_t bufmax) : outputStream() {
duke@435 1477 buffer_length = fixed_buffer_size;
duke@435 1478 buffer = fixed_buffer;
duke@435 1479 buffer_pos = 0;
duke@435 1480 buffer_fixed = true;
never@657 1481 buffer_max = bufmax;
duke@435 1482 }
duke@435 1483
duke@435 1484 void bufferedStream::write(const char* s, size_t len) {
never@657 1485
never@657 1486 if(buffer_pos + len > buffer_max) {
never@657 1487 flush();
never@657 1488 }
never@657 1489
duke@435 1490 size_t end = buffer_pos + len;
duke@435 1491 if (end >= buffer_length) {
duke@435 1492 if (buffer_fixed) {
duke@435 1493 // if buffer cannot resize, silently truncate
duke@435 1494 len = buffer_length - buffer_pos - 1;
duke@435 1495 } else {
duke@435 1496 // For small overruns, double the buffer. For larger ones,
duke@435 1497 // increase to the requested size.
duke@435 1498 if (end < buffer_length * 2) {
duke@435 1499 end = buffer_length * 2;
duke@435 1500 }
zgu@3900 1501 buffer = REALLOC_C_HEAP_ARRAY(char, buffer, end, mtInternal);
duke@435 1502 buffer_length = end;
duke@435 1503 }
duke@435 1504 }
duke@435 1505 memcpy(buffer + buffer_pos, s, len);
duke@435 1506 buffer_pos += len;
duke@435 1507 update_position(s, len);
duke@435 1508 }
duke@435 1509
duke@435 1510 char* bufferedStream::as_string() {
duke@435 1511 char* copy = NEW_RESOURCE_ARRAY(char, buffer_pos+1);
duke@435 1512 strncpy(copy, buffer, buffer_pos);
duke@435 1513 copy[buffer_pos] = 0; // terminating null
duke@435 1514 return copy;
duke@435 1515 }
duke@435 1516
duke@435 1517 bufferedStream::~bufferedStream() {
duke@435 1518 if (!buffer_fixed) {
zgu@3900 1519 FREE_C_HEAP_ARRAY(char, buffer, mtInternal);
duke@435 1520 }
duke@435 1521 }
duke@435 1522
duke@435 1523 #ifndef PRODUCT
duke@435 1524
goetz@6461 1525 #if defined(SOLARIS) || defined(LINUX) || defined(AIX) || defined(_ALLBSD_SOURCE)
duke@435 1526 #include <sys/types.h>
duke@435 1527 #include <sys/socket.h>
duke@435 1528 #include <netinet/in.h>
duke@435 1529 #include <arpa/inet.h>
duke@435 1530 #endif
duke@435 1531
duke@435 1532 // Network access
never@657 1533 networkStream::networkStream() : bufferedStream(1024*10, 1024*10) {
duke@435 1534
duke@435 1535 _socket = -1;
duke@435 1536
ikrylov@2322 1537 int result = os::socket(AF_INET, SOCK_STREAM, 0);
duke@435 1538 if (result <= 0) {
duke@435 1539 assert(false, "Socket could not be created!");
duke@435 1540 } else {
duke@435 1541 _socket = result;
duke@435 1542 }
duke@435 1543 }
duke@435 1544
duke@435 1545 int networkStream::read(char *buf, size_t len) {
ikrylov@2322 1546 return os::recv(_socket, buf, (int)len, 0);
duke@435 1547 }
duke@435 1548
duke@435 1549 void networkStream::flush() {
duke@435 1550 if (size() != 0) {
phh@3344 1551 int result = os::raw_send(_socket, (char *)base(), size(), 0);
never@657 1552 assert(result != -1, "connection error");
never@657 1553 assert(result == (int)size(), "didn't send enough data");
duke@435 1554 }
duke@435 1555 reset();
duke@435 1556 }
duke@435 1557
duke@435 1558 networkStream::~networkStream() {
duke@435 1559 close();
duke@435 1560 }
duke@435 1561
duke@435 1562 void networkStream::close() {
duke@435 1563 if (_socket != -1) {
duke@435 1564 flush();
ikrylov@2322 1565 os::socket_close(_socket);
duke@435 1566 _socket = -1;
duke@435 1567 }
duke@435 1568 }
duke@435 1569
duke@435 1570 bool networkStream::connect(const char *ip, short port) {
duke@435 1571
duke@435 1572 struct sockaddr_in server;
duke@435 1573 server.sin_family = AF_INET;
duke@435 1574 server.sin_port = htons(port);
duke@435 1575
duke@435 1576 server.sin_addr.s_addr = inet_addr(ip);
jcoomes@515 1577 if (server.sin_addr.s_addr == (uint32_t)-1) {
ikrylov@2322 1578 struct hostent* host = os::get_host_by_name((char*)ip);
duke@435 1579 if (host != NULL) {
duke@435 1580 memcpy(&server.sin_addr, host->h_addr_list[0], host->h_length);
duke@435 1581 } else {
duke@435 1582 return false;
duke@435 1583 }
duke@435 1584 }
duke@435 1585
duke@435 1586
ikrylov@2322 1587 int result = os::connect(_socket, (struct sockaddr*)&server, sizeof(struct sockaddr_in));
duke@435 1588 return (result >= 0);
duke@435 1589 }
duke@435 1590
duke@435 1591 #endif

mercurial