summaryrefslogtreecommitdiff
path: root/ACE/TAO/TAO_IDL/util/utl_strlist.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'ACE/TAO/TAO_IDL/util/utl_strlist.cpp')
-rw-r--r--ACE/TAO/TAO_IDL/util/utl_strlist.cpp236
1 files changed, 236 insertions, 0 deletions
diff --git a/ACE/TAO/TAO_IDL/util/utl_strlist.cpp b/ACE/TAO/TAO_IDL/util/utl_strlist.cpp
new file mode 100644
index 00000000000..004c415fd5f
--- /dev/null
+++ b/ACE/TAO/TAO_IDL/util/utl_strlist.cpp
@@ -0,0 +1,236 @@
+// $Id$
+
+/*
+
+COPYRIGHT
+
+Copyright 1992, 1993, 1994 Sun Microsystems, Inc. Printed in the United
+States of America. All Rights Reserved.
+
+This product is protected by copyright and distributed under the following
+license restricting its use.
+
+The Interface Definition Language Compiler Front End (CFE) is made
+available for your use provided that you include this license and copyright
+notice on all media and documentation and the software program in which
+this product is incorporated in whole or part. You may copy and extend
+functionality (but may not remove functionality) of the Interface
+Definition Language CFE without charge, but you are not authorized to
+license or distribute it to anyone else except as part of a product or
+program developed by you or with the express written consent of Sun
+Microsystems, Inc. ("Sun").
+
+The names of Sun Microsystems, Inc. and any of its subsidiaries or
+affiliates may not be used in advertising or publicity pertaining to
+distribution of Interface Definition Language CFE as permitted herein.
+
+This license is effective until terminated by Sun for failure to comply
+with this license. Upon termination, you shall destroy or return all code
+and documentation for the Interface Definition Language CFE.
+
+INTERFACE DEFINITION LANGUAGE CFE IS PROVIDED AS IS WITH NO WARRANTIES OF
+ANY KIND INCLUDING THE WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS
+FOR A PARTICULAR PURPOSE, NONINFRINGEMENT, OR ARISING FROM A COURSE OF
+DEALING, USAGE OR TRADE PRACTICE.
+
+INTERFACE DEFINITION LANGUAGE CFE IS PROVIDED WITH NO SUPPORT AND WITHOUT
+ANY OBLIGATION ON THE PART OF Sun OR ANY OF ITS SUBSIDIARIES OR AFFILIATES
+TO ASSIST IN ITS USE, CORRECTION, MODIFICATION OR ENHANCEMENT.
+
+SUN OR ANY OF ITS SUBSIDIARIES OR AFFILIATES SHALL HAVE NO LIABILITY WITH
+RESPECT TO THE INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY
+INTERFACE DEFINITION LANGUAGE CFE OR ANY PART THEREOF.
+
+IN NO EVENT WILL SUN OR ANY OF ITS SUBSIDIARIES OR AFFILIATES BE LIABLE FOR
+ANY LOST REVENUE OR PROFITS OR OTHER SPECIAL, INDIRECT AND CONSEQUENTIAL
+DAMAGES, EVEN IF SUN HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES.
+
+Use, duplication, or disclosure by the government is subject to
+restrictions as set forth in subparagraph (c)(1)(ii) of the Rights in
+Technical Data and Computer Software clause at DFARS 252.227-7013 and FAR
+52.227-19.
+
+Sun, Sun Microsystems and the Sun logo are trademarks or registered
+trademarks of Sun Microsystems, Inc.
+
+SunSoft, Inc.
+2550 Garcia Avenue
+Mountain View, California 94043
+
+NOTE:
+
+SunOS, SunSoft, Sun, Solaris, Sun Microsystems or the Sun logo are
+trademarks or registered trademarks of Sun Microsystems, Inc.
+
+*/
+
+// Implementation of a list of utl_string nodes.
+
+// NOTE: This list class only works correctly because we use single public
+// inheritance, as opposed to multiple inheritance or public virtual.
+// It relies on a type-unsafe cast from UTL_List to subclasses, which
+// will cease to operate correctly if you use either multiple or
+// public virtual inheritance.
+
+#include "utl_strlist.h"
+#include "utl_string.h"
+
+// FUZZ: disable check_for_streams_include
+#include "ace/streams.h"
+
+#include "ace/OS_Memory.h"
+#include "ace/OS_NS_string.h"
+
+ACE_RCSID (util,
+ utl_strlist,
+ "$Id$")
+
+UTL_StrList::UTL_StrList (UTL_String *s,
+ UTL_StrList *cdr)
+ : UTL_List(cdr),
+ pd_car_data(s)
+{
+}
+
+UTL_StrList::~UTL_StrList (void)
+{
+}
+
+// Get list item.
+UTL_String *
+UTL_StrList::head (void)
+{
+ return this->pd_car_data;
+}
+
+// Set list item.
+void
+UTL_StrList::set_head (UTL_String *s)
+{
+ this->pd_car_data = s;
+}
+
+// Get last item of this list
+UTL_String *
+UTL_StrList::last_component (void)
+{
+ if (this->tail () == 0)
+ {
+ return pd_car_data;
+ }
+
+ return ((UTL_StrList *) this->tail ())->last_component();
+}
+
+// Copy a list.
+UTL_List *
+UTL_StrList::copy (void)
+{
+ UTL_List *retval = 0;
+
+ if (this->tail () == 0)
+ {
+ ACE_NEW_RETURN (retval,
+ UTL_StrList (head (),
+ 0),
+ 0);
+ }
+ else
+ {
+ ACE_NEW_RETURN (retval,
+ UTL_StrList (head (),
+ (UTL_StrList *) this->tail ()->copy ()),
+ 0);
+ }
+
+ return retval;
+}
+
+void
+UTL_StrList::destroy (void)
+{
+ UTL_String *str = 0;
+
+ for (UTL_StrlistActiveIterator i (this); !i.is_done (); i.next ())
+ {
+ str = i.item ();
+ str->destroy ();
+ delete str;
+ str = 0;
+ }
+}
+
+// AST Dumping
+void
+UTL_StrList::dump (ACE_OSTREAM_TYPE &o)
+{
+ char *s = 0;
+ bool first = true;
+ bool second = false;
+
+ for (UTL_StrlistActiveIterator i (this); !i.is_done(); i.next ())
+ {
+ if (!first)
+ {
+ o << "::";
+ }
+ else if (second)
+ {
+ first = second = false;
+ }
+
+ s = i.item ()->get_string ();
+ o << s;
+
+ if (first)
+ {
+ if (ACE_OS::strcmp (s, "::") != 0)
+ {
+ first = false;
+ }
+ else
+ {
+ second = true;
+ }
+ }
+ }
+}
+
+/*
+ * Redefinition of inherited virtual operations
+ */
+
+// UTL_StrList active iterator
+
+/*
+ * Constructor
+ */
+
+UTL_StrlistActiveIterator::UTL_StrlistActiveIterator (UTL_StrList *s)
+ : UTL_ListActiveIterator (s)
+{
+}
+
+/*
+ * Private operations
+ */
+
+/*
+ * Public operations
+ */
+
+// Get current item
+UTL_String *
+UTL_StrlistActiveIterator::item (void)
+{
+ if (source == 0)
+ {
+ return 0;
+ }
+
+ return ((UTL_StrList *) source)->head ();
+}
+
+/*
+ * Redefinition of inherited virtual operations
+ */