summaryrefslogtreecommitdiff
path: root/TAO/tao/Marshal.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'TAO/tao/Marshal.cpp')
-rw-r--r--TAO/tao/Marshal.cpp262
1 files changed, 0 insertions, 262 deletions
diff --git a/TAO/tao/Marshal.cpp b/TAO/tao/Marshal.cpp
deleted file mode 100644
index b63181880a5..00000000000
--- a/TAO/tao/Marshal.cpp
+++ /dev/null
@@ -1,262 +0,0 @@
-// $Id$
-
-// ============================================================================
-//
-// = LIBRARY
-// TAO
-//
-// = FILENAME
-// marshal.cpp
-//
-// = DESCRIPTION
-// Implements the Marshal_Object class and the factory
-//
-// The original encoder and decoder code now appears in files encode.cpp and
-// decode.cpp
-//
-// = AUTHOR
-// Copyright 1994-1995 by Sun Microsystems Inc.
-// and
-// Aniruddha Gokhale
-//
-// ============================================================================
-
-#include "tao/Marshal.h"
-#include "tao/TypeCode.h"
-
-#if !defined (__ACE_INLINE__)
-# include "tao/Marshal.i"
-#endif /* ! __ACE_INLINE__ */
-
-ACE_RCSID (tao,
- Marshal,
- "$Id$")
-
-TAO_Marshal_Object::~TAO_Marshal_Object (void)
-{
-}
-
-TAO::traverse_status
-TAO_Marshal_Object::perform_skip (CORBA::TypeCode_ptr tc,
- TAO_InputCDR *stream
- ACE_ENV_ARG_DECL)
-{
- CORBA::ULong kind = tc->kind (ACE_ENV_SINGLE_ARG_PARAMETER);
- ACE_CHECK_RETURN (TAO::TRAVERSE_STOP);
-
- switch (kind)
- {
- default:
- case CORBA::tk_fixed:
- case CORBA::tk_value_box:
- case CORBA::tk_native:
- case CORBA::tk_abstract_interface:
- case CORBA::tk_component:
- case CORBA::tk_home:
- // @@ We don't know how to handle any of them yet.
- return TAO::TRAVERSE_STOP;
-
- case CORBA::tk_null:
- case CORBA::tk_void:
- case CORBA::tk_short:
- case CORBA::tk_long:
- case CORBA::tk_ushort:
- case CORBA::tk_ulong:
- case CORBA::tk_float:
- case CORBA::tk_double:
- case CORBA::tk_boolean:
- case CORBA::tk_char:
- case CORBA::tk_octet:
- case CORBA::tk_longlong:
- case CORBA::tk_ulonglong:
- case CORBA::tk_longdouble:
- case CORBA::tk_wchar:
- case CORBA::tk_enum:
- {
- TAO_Marshal_Primitive marshal;
- return marshal.skip (tc, stream ACE_ENV_ARG_PARAMETER);
- }
-
- case CORBA::tk_any:
- {
- TAO_Marshal_Any marshal;
- return marshal.skip (tc, stream ACE_ENV_ARG_PARAMETER);
- }
- case CORBA::tk_TypeCode:
- {
- TAO_Marshal_TypeCode marshal;
- return marshal.skip (tc, stream ACE_ENV_ARG_PARAMETER);
- }
- case CORBA::tk_Principal:
- {
- TAO_Marshal_Principal marshal;
- return marshal.skip (tc, stream ACE_ENV_ARG_PARAMETER);
- }
- case CORBA::tk_objref:
- {
- TAO_Marshal_ObjRef marshal;
- return marshal.skip (tc, stream ACE_ENV_ARG_PARAMETER);
- }
- case CORBA::tk_struct:
- {
- TAO_Marshal_Struct marshal;
- return marshal.skip (tc, stream ACE_ENV_ARG_PARAMETER);
- }
- case CORBA::tk_union:
- {
- TAO_Marshal_Union marshal;
- return marshal.skip (tc, stream ACE_ENV_ARG_PARAMETER);
- }
- case CORBA::tk_string:
- {
- TAO_Marshal_String marshal;
- return marshal.skip (tc, stream ACE_ENV_ARG_PARAMETER);
- }
- case CORBA::tk_sequence:
- {
- TAO_Marshal_Sequence marshal;
- return marshal.skip (tc, stream ACE_ENV_ARG_PARAMETER);
- }
- case CORBA::tk_array:
- {
- TAO_Marshal_Array marshal;
- return marshal.skip (tc, stream ACE_ENV_ARG_PARAMETER);
- }
- case CORBA::tk_alias:
- {
- TAO_Marshal_Alias marshal;
- return marshal.skip (tc, stream ACE_ENV_ARG_PARAMETER);
- }
- case CORBA::tk_except:
- {
- TAO_Marshal_Except marshal;
- return marshal.skip (tc, stream ACE_ENV_ARG_PARAMETER);
- }
- case CORBA::tk_wstring:
- {
- TAO_Marshal_WString marshal;
- return marshal.skip (tc, stream ACE_ENV_ARG_PARAMETER);
- }
- case CORBA::tk_value:
- {
- TAO_Marshal_Value marshal;
- return marshal.skip (tc, stream ACE_ENV_ARG_PARAMETER);
- }
- }
-}
-
-TAO::traverse_status
-TAO_Marshal_Object::perform_append (CORBA::TypeCode_ptr tc,
- TAO_InputCDR *src,
- TAO_OutputCDR *dest
- ACE_ENV_ARG_DECL)
-{
- CORBA::ULong kind = tc->kind (ACE_ENV_SINGLE_ARG_PARAMETER);
- ACE_CHECK_RETURN (TAO::TRAVERSE_STOP);
-
- switch (kind)
- {
- default:
- case CORBA::tk_fixed:
- case CORBA::tk_value_box:
- case CORBA::tk_native:
- case CORBA::tk_abstract_interface:
- case CORBA::tk_component:
- case CORBA::tk_home:
- // @@ We don't know how to handle any of them yet.
- return TAO::TRAVERSE_STOP;
-
- case CORBA::tk_null:
- case CORBA::tk_void:
- case CORBA::tk_short:
- case CORBA::tk_long:
- case CORBA::tk_ushort:
- case CORBA::tk_ulong:
- case CORBA::tk_float:
- case CORBA::tk_double:
- case CORBA::tk_boolean:
- case CORBA::tk_char:
- case CORBA::tk_octet:
- case CORBA::tk_longlong:
- case CORBA::tk_ulonglong:
- case CORBA::tk_longdouble:
- case CORBA::tk_wchar:
- case CORBA::tk_enum:
- {
- TAO_Marshal_Primitive marshal;
- return marshal.append (tc, src, dest ACE_ENV_ARG_PARAMETER);
- }
-
- case CORBA::tk_any:
- {
- TAO_Marshal_Any marshal;
- return marshal.append (tc, src, dest ACE_ENV_ARG_PARAMETER);
- }
- case CORBA::tk_TypeCode:
- {
- TAO_Marshal_TypeCode marshal;
- return marshal.append (tc, src, dest ACE_ENV_ARG_PARAMETER);
- }
- case CORBA::tk_Principal:
- {
- TAO_Marshal_Principal marshal;
- return marshal.append (tc, src, dest ACE_ENV_ARG_PARAMETER);
- }
- case CORBA::tk_objref:
- {
- TAO_Marshal_ObjRef marshal;
- return marshal.append (tc, src, dest ACE_ENV_ARG_PARAMETER);
- }
- case CORBA::tk_struct:
- {
- TAO_Marshal_Struct marshal;
- return marshal.append (tc, src, dest ACE_ENV_ARG_PARAMETER);
- }
- case CORBA::tk_union:
- {
- TAO_Marshal_Union marshal;
- return marshal.append (tc, src, dest ACE_ENV_ARG_PARAMETER);
- }
- case CORBA::tk_string:
- {
- TAO_Marshal_String marshal;
- return marshal.append (tc, src, dest ACE_ENV_ARG_PARAMETER);
- }
- case CORBA::tk_sequence:
- {
- TAO_Marshal_Sequence marshal;
- return marshal.append (tc, src, dest ACE_ENV_ARG_PARAMETER);
- }
- case CORBA::tk_array:
- {
- TAO_Marshal_Array marshal;
- return marshal.append (tc, src, dest ACE_ENV_ARG_PARAMETER);
- }
- case CORBA::tk_alias:
- {
- TAO_Marshal_Alias marshal;
- return marshal.append (tc, src, dest ACE_ENV_ARG_PARAMETER);
- }
- case CORBA::tk_except:
- {
- TAO_Marshal_Except marshal;
- return marshal.append (tc, src, dest ACE_ENV_ARG_PARAMETER);
- }
- case CORBA::tk_wstring:
- {
- TAO_Marshal_WString marshal;
- return marshal.append (tc, src, dest ACE_ENV_ARG_PARAMETER);
- }
- case CORBA::tk_value:
- {
- TAO_Marshal_Value marshal;
- return marshal.append (tc, src, dest ACE_ENV_ARG_PARAMETER);
- }
- }
-}
-
-#if defined (ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION)
-
-#elif defined (ACE_HAS_TEMPLATE_INSTANTIATION_PRAGMA)
-
-#endif /* ACE_HAS_EXPLICIT_TEMPLATE_INSTANTIATION */