src/share/vm/utilities/ostream.cpp

Thu, 02 Aug 2018 03:54:51 -0700

author
kevinw
date
Thu, 02 Aug 2018 03:54:51 -0700
changeset 9478
f3108e56b502
parent 9327
f96fcd9e1e1b
child 9572
624a0741915c
child 9904
4698900b8221
permissions
-rw-r--r--

8196882: VS2017 Hotspot Defined vsnprintf Function Causes C2084 Already Defined Compilation Error
Summary: Add os::vsnprintf and os::snprintf.
Reviewed-by: kbarrett, lfoltan, stuefe, mlarsson

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

mercurial