hotspot/src/share/vm/utilities/xmlstream.hpp
changeset 1 489c9b5090e2
child 5547 f4b087cbb361
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/hotspot/src/share/vm/utilities/xmlstream.hpp	Sat Dec 01 00:00:00 2007 +0000
@@ -0,0 +1,177 @@
+/*
+ * Copyright 2002-2005 Sun Microsystems, Inc.  All Rights Reserved.
+ * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+ *
+ * This code is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License version 2 only, as
+ * published by the Free Software Foundation.
+ *
+ * This code is distributed in the hope that it will be useful, but WITHOUT
+ * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
+ * version 2 for more details (a copy is included in the LICENSE file that
+ * accompanied this code).
+ *
+ * You should have received a copy of the GNU General Public License version
+ * 2 along with this work; if not, write to the Free Software Foundation,
+ * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
+ *
+ * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
+ * CA 95054 USA or visit www.sun.com if you need additional information or
+ * have any questions.
+ *
+ */
+
+class xmlStream;
+class defaultStream;
+
+// Sub-stream for writing quoted text, as opposed to markup.
+// Characters written to this stream are subject to quoting,
+// as '<' => "&lt;", etc.
+class xmlTextStream : public outputStream {
+  friend class xmlStream;
+  friend class defaultStream; // tty
+ private:
+
+  xmlStream* _outer_xmlStream;
+
+  xmlTextStream() { _outer_xmlStream = NULL; }
+
+ public:
+   virtual void flush(); // _outer.flush();
+   virtual void write(const char* str, size_t len); // _outer->write_text()
+};
+
+
+// Output stream for writing XML-structured logs.
+// To write markup, use special calls elem, head/tail, etc.
+// Use the xmlStream::text() stream to write unmarked text.
+// Text written that way will be quoted as necessary using '&lt;', etc.
+// Characters written directly to an xmlStream via print_cr, etc.,
+// are directly written to the encapsulated stream, xmlStream::out().
+// This can be used to produce markup directly, character by character.
+// (Such writes are not checked for markup syntax errors.)
+
+class xmlStream : public outputStream {
+  friend class defaultStream; // tty
+ public:
+  enum MarkupState { BODY,       // after end_head() call, in text
+                     HEAD,       // after begin_head() call, in attrs
+                     ELEM };     // after begin_elem() call, in attrs
+
+ protected:
+  outputStream* _out;            // file stream by which it goes
+  julong        _last_flush;     // last position of flush
+  MarkupState   _markup_state;   // where in the elem/head/tail dance
+  outputStream* _text;           // text stream
+  xmlTextStream _text_init;
+
+  // for subclasses
+  xmlStream() {}
+  void initialize(outputStream* out);
+
+  // protect this from public use:
+  outputStream* out()                            { return _out; }
+
+  // helpers for writing XML elements
+  void          va_tag(bool push, const char* format, va_list ap);
+  virtual void see_tag(const char* tag, bool push) NOT_DEBUG({});
+  virtual void pop_tag(const char* tag) NOT_DEBUG({});
+
+#ifdef ASSERT
+  // in debug mode, we verify matching of opening and closing tags
+  int   _element_depth;              // number of unfinished elements
+  char* _element_close_stack_high;   // upper limit of down-growing stack
+  char* _element_close_stack_low;    // upper limit of down-growing stack
+  char* _element_close_stack_ptr;    // pointer of down-growing stack
+#endif
+
+ public:
+  // creation
+  xmlStream(outputStream* out) { initialize(out); }
+  DEBUG_ONLY(virtual ~xmlStream();)
+
+  bool is_open() { return _out != NULL; }
+
+  // text output
+  bool inside_attrs() { return _markup_state != BODY; }
+
+  // flushing
+  virtual void flush();  // flushes out, sets _last_flush = count()
+  virtual void write(const char* s, size_t len);
+  void    write_text(const char* s, size_t len);  // used by xmlTextStream
+  int unflushed_count() { return (int)(out()->count() - _last_flush); }
+
+  // writing complete XML elements
+  void          elem(const char* format, ...);
+  void    begin_elem(const char* format, ...);
+  void      end_elem(const char* format, ...);
+  void      end_elem();
+  void          head(const char* format, ...);
+  void    begin_head(const char* format, ...);
+  void      end_head(const char* format, ...);
+  void      end_head();
+  void          done(const char* format, ...);  // xxx_done event, plus tail
+  void          done_raw(const char * kind);
+  void          tail(const char* kind);
+
+  // va_list versions
+  void       va_elem(const char* format, va_list ap);
+  void va_begin_elem(const char* format, va_list ap);
+  void       va_head(const char* format, va_list ap);
+  void va_begin_head(const char* format, va_list ap);
+  void       va_done(const char* format, va_list ap);
+
+  // write text (with quoting of special XML characters <>&'" etc.)
+  outputStream* text() { return _text; }
+  void          text(const char* format, ...);
+  void       va_text(const char* format, va_list ap) {
+    text()->vprint(format, ap);
+  }
+
+  // commonly used XML attributes
+  void          stamp();                 // stamp='1.234'
+  void          method(methodHandle m);  // method='k n s' ...
+  void          klass(KlassHandle k);    // klass='name'
+  void          name(symbolHandle s);    // name='name'
+  void          object(const char* attr, Handle val);
+
+  // print the text alone (sans ''):
+  void          method_text(methodHandle m);
+  void          klass_text(KlassHandle k);    // klass='name'
+  void          name_text(symbolHandle s);    // name='name'
+  void          object_text(Handle x);
+
+  /*  Example uses:
+
+      // Empty element, simple case.
+      elem("X Y='Z'");          <X Y='Z'/> \n
+
+      // Empty element, general case.
+      begin_elem("X Y='Z'");    <X Y='Z'
+      ...attrs...               ...attrs...
+      end_elem();               />
+
+      // Compound element, simple case.
+      head("X Y='Z'");          <X Y='Z'> \n
+      ...body...                ...body...
+      tail("X");                </X> \n
+
+      // Compound element, general case.
+      begin_head("X Y='Z'");    <X Y='Z'
+      ...attrs...               ...attrs...
+      end_head();               > \n
+      ...body...                ...body...
+      tail("X");                </X> \n
+
+      // Printf-style formatting:
+      elem("X Y='%s'", "Z");    <X Y='Z'/> \n
+
+   */
+
+};
+
+// Standard log file, null if no logging is happening.
+extern xmlStream* xtty;
+
+// Note:  If ::xtty != NULL, ::tty == ::xtty->text().