initial import

26 files changed, 8738 insertions, 0 deletions

diff --git a/io/source/TextInputStream/TextInputStream.cxx b/io/source/TextInputStream/TextInputStream.cxx
new file mode 100644
index 000000000000..64bcf94ab15d
--- /dev/null
+++ b/io/source/TextInputStream/TextInputStream.cxx
@@ -0,0 +1,732 @@
+/*************************************************************************
+ *
+ *  $RCSfile: TextInputStream.cxx,v $
+ *
+ *  $Revision: 1.1.1.1 $
+ *
+ *  last change: $Author: hr $ $Date: 2000-09-18 17:24:17 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library 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
+ *  Lesser General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (the "License"); You may not use this file
+ *  except in compliance with the License. You may obtain a copy of the
+ *  License at http://www.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+
+
+#include <string.h>
+#include <osl/mutex.hxx>
+#include <osl/diagnose.h>
+
+#include <uno/mapping.hxx>
+
+#include <cppuhelper/factory.hxx>
+#include <cppuhelper/implbase2.hxx>
+
+#include <rtl/textenc.h>
+#include <rtl/tencinfo.h>
+
+#include <com/sun/star/io/XTextInputStream.hpp>
+#include <com/sun/star/io/XActiveDataSink.hpp>
+
+
+#define IMPLEMENTATION_NAME "com.sun.star.comp.io.TextInputStream"
+#define SERVICE_NAME "com.sun.star.io.TextInputStream"
+
+using namespace ::osl;
+using namespace ::rtl;
+using namespace ::cppu;
+using namespace ::com::sun::star::uno;
+using namespace ::com::sun::star::lang;
+using namespace ::com::sun::star::io;
+using namespace ::com::sun::star::registry;
+
+
+namespace io_TextStream
+{
+
+//===========================================================================
+// Implementation XTextInputStream
+
+typedef WeakImplHelper2< XTextInputStream, XActiveDataSink > TextInputStreamHelper;
+class OCommandEnvironment;
+
+#define INITIAL_UNICODE_BUFFER_CAPACITY     0x100
+#define READ_BYTE_COUNT                     0x100
+
+class OTextInputStream : public TextInputStreamHelper
+{
+    Reference< XInputStream > mxStream;
+
+    // Encoding
+    OUString mEncoding;
+    sal_Bool mbEncodingInitialized;
+    rtl_TextToUnicodeConverter  mConvText2Unicode;
+    rtl_TextToUnicodeContext    mContextText2Unicode;
+    Sequence<sal_Int8>          mSeqSource;
+
+    // Internal buffer for characters that are already converted successfully
+    sal_Unicode* mpBuffer;
+    sal_Int32 mnBufferSize;
+    sal_Int32 mnCharsInBuffer;
+    sal_Bool mbReachedEOF;
+
+    void implResizeBuffer( void );
+    OUString implReadString( const Sequence< sal_Unicode >& Delimiters,
+        sal_Bool bRemoveDelimiter, sal_Bool bFindLineEnd )
+            throw(IOException, RuntimeException);
+    sal_Int32 implReadNext() throw(IOException, RuntimeException);
+
+public:
+    OTextInputStream();
+    virtual ~OTextInputStream();
+
+    // Methods XTextInputStream
+    virtual OUString SAL_CALL readLine(  )
+        throw(IOException, RuntimeException);
+    virtual OUString SAL_CALL readString( const Sequence< sal_Unicode >& Delimiters, sal_Bool bRemoveDelimiter )
+        throw(IOException, RuntimeException);
+    virtual sal_Bool SAL_CALL isEOF(  )
+        throw(IOException, RuntimeException);
+    virtual void SAL_CALL setEncoding( const OUString& Encoding ) throw(RuntimeException);
+
+    // Methods XInputStream
+    virtual sal_Int32 SAL_CALL readBytes( Sequence< sal_Int8 >& aData, sal_Int32 nBytesToRead )
+        throw(NotConnectedException, BufferSizeExceededException, IOException, RuntimeException);
+    virtual sal_Int32 SAL_CALL readSomeBytes( Sequence< sal_Int8 >& aData, sal_Int32 nMaxBytesToRead )
+        throw(NotConnectedException, BufferSizeExceededException, IOException, RuntimeException);
+    virtual void SAL_CALL skipBytes( sal_Int32 nBytesToSkip )
+        throw(NotConnectedException, BufferSizeExceededException, IOException, RuntimeException);
+    virtual sal_Int32 SAL_CALL available(  )
+        throw(NotConnectedException, IOException, RuntimeException);
+    virtual void SAL_CALL closeInput(  )
+        throw(NotConnectedException, IOException, RuntimeException);
+
+    // Methods XActiveDataSink
+    virtual void SAL_CALL setInputStream( const Reference< XInputStream >& aStream )
+        throw(RuntimeException);
+    virtual Reference< XInputStream > SAL_CALL getInputStream()
+        throw(RuntimeException);
+};
+
+OTextInputStream::OTextInputStream()
+    : mpBuffer( NULL ), mnBufferSize( 0 ), mnCharsInBuffer( 0 ), mbReachedEOF( sal_False )
+{
+    mbEncodingInitialized = false;
+}
+
+OTextInputStream::~OTextInputStream()
+{
+    if( mbEncodingInitialized )
+    {
+        rtl_destroyUnicodeToTextContext( mConvText2Unicode, mContextText2Unicode );
+        rtl_destroyUnicodeToTextConverter( mConvText2Unicode );
+    }
+}
+
+void OTextInputStream::implResizeBuffer( void )
+{
+    sal_Int32 mnNewBufferSize = mnBufferSize * 2;
+    sal_Unicode* pNewBuffer = new sal_Unicode[ mnNewBufferSize ];
+    memcpy( pNewBuffer, mpBuffer, mnCharsInBuffer * sizeof( sal_Unicode ) );
+    mpBuffer = pNewBuffer;
+    mnBufferSize = mnNewBufferSize;
+}
+
+
+//===========================================================================
+// XTextInputStream
+
+OUString OTextInputStream::readLine(  )
+    throw(IOException, RuntimeException)
+{
+    static Sequence< sal_Unicode > aDummySeq;
+    return implReadString( aDummySeq, sal_True, sal_True );
+}
+
+OUString OTextInputStream::readString( const Sequence< sal_Unicode >& Delimiters, sal_Bool bRemoveDelimiter )
+        throw(IOException, RuntimeException)
+{
+    return implReadString( Delimiters, sal_True, sal_False );
+}
+
+sal_Bool OTextInputStream::isEOF()
+    throw(IOException, RuntimeException)
+{
+    sal_Bool bRet = sal_False;
+    if( mnCharsInBuffer == 0 && mbReachedEOF )
+        bRet = sal_True;
+    return bRet;
+}
+
+
+OUString OTextInputStream::implReadString( const Sequence< sal_Unicode >& Delimiters,
+                                           sal_Bool bRemoveDelimiter, sal_Bool bFindLineEnd )
+        throw(IOException, RuntimeException)
+{
+    OUString aRetStr;
+    if( !mbEncodingInitialized )
+    {
+        OUString aUtf8Str( RTL_CONSTASCII_USTRINGPARAM("utf8") );
+        setEncoding( aUtf8Str );
+    }
+    if( !mbEncodingInitialized )
+        return aRetStr;
+
+    if( !mpBuffer )
+    {
+        mnBufferSize = INITIAL_UNICODE_BUFFER_CAPACITY;
+        mpBuffer = new sal_Unicode[ mnBufferSize ];
+    }
+
+    // Only for bFindLineEnd
+    sal_Unicode cLineEndChar1 = 0x13;
+    sal_Unicode cLineEndChar2 = 0x10;
+
+    sal_Int32 nBufferReadPos = 0;
+    sal_Int32 nCopyLen = 0;
+    sal_Bool bFound = sal_False;
+    sal_Bool bFoundFirstLineEndChar = sal_False;
+    sal_Unicode cFirstLineEndChar;
+    const sal_Unicode* pDelims = Delimiters.getConstArray();
+    const sal_Int32 nDelimCount = Delimiters.getLength();
+    while( !bFound )
+    {
+        // Still characters available?
+        if( nBufferReadPos == mnCharsInBuffer )
+        {
+            // Already reached EOF? Then we can't read any more
+            if( mbReachedEOF )
+                break;
+
+            // No, so read new characters
+            if( !implReadNext() )
+                break;
+
+            /*
+            sal_Int32 nFreeBufferSize = mnBufferSize - nBufferReadPos;
+            if( nFreeBufferSize < READ_BYTE_COUNT )
+                implResizeBuffer();
+
+            try
+            {
+                Sequence< sal_Int8 > aData;
+                sal_Int32 nBytesToRead = READ_BYTE_COUNT;
+                sal_Int32 nRead = mxStream->readSomeBytes( aData, nBytesToRead );
+                if( nRead < nBytesToRead )
+                    bEOF = sal_True;
+
+                // Try to convert
+                sal_uInt32 uiInfo;
+                sal_Size nSrcCvtBytes = 0;
+                sal_Size nTargetCount = 0;
+                sal_Size nSourceCount = 0;
+                while( sal_True )
+                {
+                    const sal_Int8 *pbSource = aData.getConstArray();
+
+                    //// the whole source size
+                    //sal_Int32 nSourceSize = seqText.getLength() + m_seqSource.getLength();
+                    //Sequence<sal_Unicode>     seqUnicode ( nSourceSize );
+//
+                    //const sal_Int8 *pbSource = seqText.getConstArray();
+                    //sal_Int8 *pbTempMem = 0;
+//
+                    //if( m_seqSource.getLength() ) {
+                        //// put old rest and new byte sequence into one array
+                        //pbTempMem = new sal_Int8[ nSourceSize ];
+                        //memcpy( pbTempMem , m_seqSource.getConstArray() , m_seqSource.getLength() );
+                        //memcpy( &(pbTempMem[ m_seqSource.getLength() ]) , seqText.getConstArray() , seqText.getLength() );
+                        //pbSource = pbTempMem;
+//
+                        //// set to zero again
+                        //m_seqSource = Sequence< sal_Int8 >();
+                    //}
+
+                    // All invalid characters are transformed to the unicode undefined char
+                    nTargetCount += rtl_convertTextToUnicode(
+                                        mConvText2Unicode,
+                                        mContextText2Unicode,
+                                        (const sal_Char*) &( pbSource[nSourceCount] ),
+                                        nRead - nSourceCount,
+                                        mpBuffer + nBufferReadPos + nTargetCount,
+                                        mnBufferSize - nBufferReadPos - nTargetCount,
+                                        RTL_TEXTTOUNICODE_FLAGS_UNDEFINED_DEFAULT   |
+                                        RTL_TEXTTOUNICODE_FLAGS_MBUNDEFINED_DEFAULT |
+                                        RTL_TEXTTOUNICODE_FLAGS_INVALID_DEFAULT,
+                                        &uiInfo,
+                                        &nSrcCvtBytes );
+                    nSourceCount += nSrcCvtBytes;
+
+                    sal_Bool bCont = sal_False;
+                    if( uiInfo & RTL_TEXTTOUNICODE_INFO_DESTBUFFERTOSMALL )
+                    {
+                        implResizeBuffer();
+                        bCont = sal_True;
+                    }
+
+                    if( uiInfo & RTL_TEXTTOUNICODE_INFO_SRCBUFFERTOSMALL )
+                    {
+                        // read next byte
+                        static Sequence< sal_Int8 > aOneByteSeq( 1 );
+                        sal_Int32 nRead = mxStream->readSomeBytes( aData, 1 );
+                        if( nRead == 0 )
+                        {
+                            bEOF = sal_True;
+
+                            // return what we have
+                            // TODO
+                        }
+                        sal_Int32 nOldLen = aData.getLength();
+                        aData.realloc( nOldLen + 1 );
+                        aData.getArray()[ nOldLen ] = aOneByteSeq.getConstArray()[ 0 ];
+                        pbSource = aData.getConstArray();
+                        bCont = sal_True;
+                    }
+
+                    if( bCont )
+                        continue;
+                    break;
+                }
+
+                mnCharsInBuffer += nTargetCount;
+            }
+            catch( NotConnectedException& e1 )
+            {
+                e1;
+                throw IOException();
+                //throw IOException( L"OTextInputStream::implReadString failed" );
+            }
+            catch( BufferSizeExceededException& e2 )
+            {
+                e2;
+                throw IOException();
+            }
+            */
+        }
+
+        // Now there should be characters available
+        // (otherwise the loop should have been breaked before)
+        sal_Unicode c = mpBuffer[ nBufferReadPos++ ];
+
+        if( bFindLineEnd )
+        {
+            if( bFoundFirstLineEndChar )
+            {
+                bFound = sal_True;
+                nCopyLen = nBufferReadPos - 2;
+                if( c == cLineEndChar1 || c == cLineEndChar2 )
+                {
+                    // Same line end char -> new line break
+                    if( c == cFirstLineEndChar )
+                    {
+                        nBufferReadPos--;
+                    }
+                }
+            }
+            else if( c == cLineEndChar1 || c == cLineEndChar2 )
+            {
+                bFoundFirstLineEndChar = sal_True;
+                cFirstLineEndChar = c;
+            }
+        }
+        else
+        {
+            for( sal_Int32 i = 0 ; i < nDelimCount ; i++ )
+            {
+                if( c == pDelims[ i ] )
+                {
+                    bFound = sal_True;
+                    nCopyLen = nBufferReadPos;
+                    if( bRemoveDelimiter )
+                        nCopyLen--;
+                }
+            }
+        }
+    }
+
+    // Create string
+    if( nCopyLen )
+        aRetStr = OUString( mpBuffer, nCopyLen );
+
+    // Copy rest of buffer
+    memmove( mpBuffer, mpBuffer + nBufferReadPos,
+        (mnCharsInBuffer - nBufferReadPos) * sizeof( sal_Unicode ) );
+    mnCharsInBuffer -= nBufferReadPos;
+
+    return aRetStr;
+}
+
+
+sal_Int32 OTextInputStream::implReadNext()
+        throw(IOException, RuntimeException)
+{
+    sal_Int32 nFreeBufferSize = mnBufferSize - mnCharsInBuffer;
+    if( nFreeBufferSize < READ_BYTE_COUNT )
+        implResizeBuffer();
+    nFreeBufferSize = mnBufferSize - mnCharsInBuffer;
+
+    try
+    {
+        Sequence< sal_Int8 > aData;
+        sal_Int32 nBytesToRead = READ_BYTE_COUNT;
+        sal_Int32 nRead = mxStream->readSomeBytes( aData, nBytesToRead );
+        if( nRead < nBytesToRead )
+            mbReachedEOF = sal_True;
+
+        // Try to convert
+        sal_uInt32 uiInfo;
+        sal_Size nSrcCvtBytes = 0;
+        sal_Size nTargetCount = 0;
+        sal_Size nSourceCount = 0;
+        while( sal_True )
+        {
+            const sal_Int8 *pbSource = aData.getConstArray();
+
+            //// the whole source size
+            //sal_Int32 nSourceSize = seqText.getLength() + m_seqSource.getLength();
+            //Sequence<sal_Unicode>     seqUnicode ( nSourceSize );
+//
+            //const sal_Int8 *pbSource = seqText.getConstArray();
+            //sal_Int8 *pbTempMem = 0;
+//
+            //if( m_seqSource.getLength() ) {
+                //// put old rest and new byte sequence into one array
+                //pbTempMem = new sal_Int8[ nSourceSize ];
+                //memcpy( pbTempMem , m_seqSource.getConstArray() , m_seqSource.getLength() );
+                //memcpy( &(pbTempMem[ m_seqSource.getLength() ]) , seqText.getConstArray() , seqText.getLength() );
+                //pbSource = pbTempMem;
+//
+                //// set to zero again
+                //m_seqSource = Sequence< sal_Int8 >();
+            //}
+
+            // All invalid characters are transformed to the unicode undefined char
+            nTargetCount += rtl_convertTextToUnicode(
+                                mConvText2Unicode,
+                                mContextText2Unicode,
+                                (const sal_Char*) &( pbSource[nSourceCount] ),
+                                nRead - nSourceCount,
+                                mpBuffer + mnCharsInBuffer + nTargetCount,
+                                nFreeBufferSize - nTargetCount,
+                                RTL_TEXTTOUNICODE_FLAGS_UNDEFINED_DEFAULT   |
+                                RTL_TEXTTOUNICODE_FLAGS_MBUNDEFINED_DEFAULT |
+                                RTL_TEXTTOUNICODE_FLAGS_INVALID_DEFAULT,
+                                &uiInfo,
+                                &nSrcCvtBytes );
+            nSourceCount += nSrcCvtBytes;
+
+            sal_Bool bCont = sal_False;
+            if( uiInfo & RTL_TEXTTOUNICODE_INFO_DESTBUFFERTOSMALL )
+            {
+                implResizeBuffer();
+                bCont = sal_True;
+            }
+
+            if( uiInfo & RTL_TEXTTOUNICODE_INFO_SRCBUFFERTOSMALL )
+            {
+                // read next byte
+                static Sequence< sal_Int8 > aOneByteSeq( 1 );
+                sal_Int32 nRead = mxStream->readSomeBytes( aData, 1 );
+                if( nRead == 0 )
+                {
+                    mbReachedEOF = sal_True;
+                    break;
+                }
+                sal_Int32 nOldLen = aData.getLength();
+                aData.realloc( nOldLen + 1 );
+                aData.getArray()[ nOldLen ] = aOneByteSeq.getConstArray()[ 0 ];
+                pbSource = aData.getConstArray();
+                bCont = sal_True;
+            }
+
+            if( bCont )
+                continue;
+            break;
+        }
+
+        mnCharsInBuffer += nTargetCount;
+        return nTargetCount;
+    }
+    catch( NotConnectedException& e1 )
+    {
+        e1;
+        throw IOException();
+        //throw IOException( L"OTextInputStream::implReadString failed" );
+    }
+    catch( BufferSizeExceededException& e2 )
+    {
+        e2;
+        throw IOException();
+    }
+}
+
+
+/*
+OUString OTextInputStream::implConvert( const Sequence<sal_Int8> &seqText )
+{
+    sal_uInt32 uiInfo;
+    sal_Size nSrcCvtBytes   = 0;
+    sal_Size nTargetCount   = 0;
+    sal_Size nSourceCount   = 0;
+
+    // the whole source size
+    sal_Int32 nSourceSize = seqText.getLength() + m_seqSource.getLength();
+    Sequence<sal_Unicode>   seqUnicode ( nSourceSize );
+
+    const sal_Int8 *pbSource = seqText.getConstArray();
+    sal_Int8 *pbTempMem = 0;
+
+    if( m_seqSource.getLength() ) {
+        // put old rest and new byte sequence into one array
+        pbTempMem = new sal_Int8[ nSourceSize ];
+        memcpy( pbTempMem , m_seqSource.getConstArray() , m_seqSource.getLength() );
+        memcpy( &(pbTempMem[ m_seqSource.getLength() ]) , seqText.getConstArray() , seqText.getLength() );
+        pbSource = pbTempMem;
+
+        // set to zero again
+        m_seqSource = Sequence< sal_Int8 >();
+    }
+
+    while( sal_True ) {
+
+        // All invalid characters are transformed to the unicode undefined char
+        nTargetCount +=     rtl_convertTextToUnicode(
+                                    m_convText2Unicode,
+                                    m_contextText2Unicode,
+                                    ( const sal_Char * ) &( pbSource[nSourceCount] ),
+                                    nSourceSize - nSourceCount ,
+                                    &( seqUnicode.getArray()[ nTargetCount ] ),
+                                    seqUnicode.getLength() - nTargetCount,
+                                    RTL_TEXTTOUNICODE_FLAGS_UNDEFINED_DEFAULT   |
+                                    RTL_TEXTTOUNICODE_FLAGS_MBUNDEFINED_DEFAULT |
+                                    RTL_TEXTTOUNICODE_FLAGS_INVALID_DEFAULT,
+                                    &uiInfo,
+                                    &nSrcCvtBytes );
+        nSourceCount += nSrcCvtBytes;
+
+        if( uiInfo & RTL_TEXTTOUNICODE_INFO_DESTBUFFERTOSMALL ) {
+            // save necessary bytes for next conversion
+            seqUnicode.realloc( seqUnicode.getLength() * 2 );
+            continue;
+        }
+        break;
+    }
+    if( uiInfo & RTL_TEXTTOUNICODE_INFO_SRCBUFFERTOSMALL ) {
+        m_seqSource.realloc( nSourceSize - nSourceCount );
+        memcpy( m_seqSource.getArray() , &(pbSource[nSourceCount]) , nSourceSize-nSourceCount );
+    }
+
+
+    if( pbTempMem ) {
+        delete pbTempMem;
+    }
+
+    // set to correct unicode size
+    seqUnicode.realloc( nTargetCount );
+
+    return seqUnicode;
+}
+*/
+
+void OTextInputStream::setEncoding( const OUString& Encoding )
+    throw(RuntimeException)
+{
+    OString aOEncodingStr = OUStringToOString( Encoding, RTL_TEXTENCODING_ASCII_US );
+    rtl_TextEncoding encoding = rtl_getTextEncodingFromMimeCharset( aOEncodingStr.getStr() );
+    if( RTL_TEXTENCODING_DONTKNOW == encoding )
+        return;
+
+    mbEncodingInitialized = true;
+    mConvText2Unicode = rtl_createTextToUnicodeConverter( encoding );
+    mContextText2Unicode = rtl_createTextToUnicodeContext( mConvText2Unicode );
+    mEncoding = Encoding;
+}
+
+//===========================================================================
+// XInputStream
+
+sal_Int32 OTextInputStream::readBytes( Sequence< sal_Int8 >& aData, sal_Int32 nBytesToRead )
+    throw(NotConnectedException, BufferSizeExceededException, IOException, RuntimeException)
+{
+    return mxStream->readBytes( aData, nBytesToRead );
+}
+
+sal_Int32 OTextInputStream::readSomeBytes( Sequence< sal_Int8 >& aData, sal_Int32 nMaxBytesToRead )
+    throw(NotConnectedException, BufferSizeExceededException, IOException, RuntimeException)
+{
+    return mxStream->readSomeBytes( aData, nMaxBytesToRead );
+}
+
+void OTextInputStream::skipBytes( sal_Int32 nBytesToSkip )
+    throw(NotConnectedException, BufferSizeExceededException, IOException, RuntimeException)
+{
+    mxStream->skipBytes( nBytesToSkip );
+}
+
+sal_Int32 OTextInputStream::available(  )
+    throw(NotConnectedException, IOException, RuntimeException)
+{
+    return mxStream->available();
+}
+
+void OTextInputStream::closeInput(  )
+    throw(NotConnectedException, IOException, RuntimeException)
+{
+    mxStream->closeInput();
+}
+
+
+
+
+//===========================================================================
+// XActiveDataSink
+
+void OTextInputStream::setInputStream( const Reference< XInputStream >& aStream )
+    throw(RuntimeException)
+{
+    mxStream = aStream;
+}
+
+Reference< XInputStream > OTextInputStream::getInputStream()
+    throw(RuntimeException)
+{
+    return mxStream;
+}
+
+
+Reference< XInterface > SAL_CALL TextInputStream_CreateInstance( const Reference< XMultiServiceFactory > &)
+{
+    return Reference < XInterface >( ( OWeakObject * ) new OTextInputStream() );
+}
+
+
+Sequence< OUString > TextInputStream_getSupportedServiceNames()
+{
+    static Sequence < OUString > *pNames = 0;
+    if( ! pNames )
+    {
+        MutexGuard guard( Mutex::getGlobalMutex() );
+        if( !pNames )
+        {
+            static Sequence< OUString > seqNames(1);
+            seqNames.getArray()[0] = OUString::createFromAscii( SERVICE_NAME );
+            pNames = &seqNames;
+        }
+    }
+    return *pNames;
+}
+
+
+}
+
+
+//==================================================================================================
+// Component exports
+
+extern "C"
+{
+//==================================================================================================
+void SAL_CALL component_getImplementationEnvironment(
+    const sal_Char ** ppEnvTypeName, uno_Environment ** ppEnv )
+{
+    *ppEnvTypeName = CPPU_CURRENT_LANGUAGE_BINDING_NAME;
+}
+//==================================================================================================
+sal_Bool SAL_CALL component_writeInfo(
+    void * pServiceManager, void * pRegistryKey )
+{
+    if (pRegistryKey)
+    {
+        try
+        {
+            Reference< XRegistryKey > xNewKey(
+                reinterpret_cast< XRegistryKey * >( pRegistryKey )->createKey(
+                    OUString::createFromAscii("/" IMPLEMENTATION_NAME "/UNO/SERVICES" ) ) );
+
+            const Sequence< OUString > & rSNL = io_TextStream::TextInputStream_getSupportedServiceNames();
+            const OUString * pArray = rSNL.getConstArray();
+            for ( sal_Int32 nPos = rSNL.getLength(); nPos--; )
+                xNewKey->createKey( pArray[nPos] );
+
+            return sal_True;
+        }
+        catch (InvalidRegistryException &)
+        {
+            OSL_ENSHURE( sal_False, "### InvalidRegistryException!" );
+        }
+    }
+    return sal_False;
+}
+//==================================================================================================
+void * SAL_CALL component_getFactory(
+    const sal_Char * pImplName, void * pServiceManager, void * pRegistryKey )
+{
+    void * pRet = 0;
+
+    if (pServiceManager && rtl_str_compare( pImplName, IMPLEMENTATION_NAME ) == 0)
+    {
+        Reference< XSingleServiceFactory > xFactory( createSingleFactory(
+            reinterpret_cast< XMultiServiceFactory * >( pServiceManager ),
+            OUString::createFromAscii( pImplName ),
+            io_TextStream::TextInputStream_CreateInstance,
+            io_TextStream::TextInputStream_getSupportedServiceNames() ) );
+
+        if (xFactory.is())
+        {
+            xFactory->acquire();
+            pRet = xFactory.get();
+        }
+    }
+
+    return pRet;
+}
+}
+
+
diff --git a/io/source/TextInputStream/makefile.mk b/io/source/TextInputStream/makefile.mk
new file mode 100644
index 000000000000..532a0786da4c
--- /dev/null
+++ b/io/source/TextInputStream/makefile.mk
@@ -0,0 +1,99 @@
+#*************************************************************************
+#
+#   $RCSfile: makefile.mk,v $
+#
+#   $Revision: 1.1.1.1 $
+#
+#   last change: $Author: hr $ $Date: 2000-09-18 17:24:17 $
+#
+#   The Contents of this file are made available subject to the terms of
+#   either of the following licenses
+#
+#          - GNU Lesser General Public License Version 2.1
+#          - Sun Industry Standards Source License Version 1.1
+#
+#   Sun Microsystems Inc., October, 2000
+#
+#   GNU Lesser General Public License Version 2.1
+#   =============================================
+#   Copyright 2000 by Sun Microsystems, Inc.
+#   901 San Antonio Road, Palo Alto, CA 94303, USA
+#
+#   This library is free software; you can redistribute it and/or
+#   modify it under the terms of the GNU Lesser General Public
+#   License version 2.1, as published by the Free Software Foundation.
+#
+#   This library 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
+#   Lesser General Public License for more details.
+#
+#   You should have received a copy of the GNU Lesser General Public
+#   License along with this library; if not, write to the Free Software
+#   Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+#   MA  02111-1307  USA
+#
+#
+#   Sun Industry Standards Source License Version 1.1
+#   =================================================
+#   The contents of this file are subject to the Sun Industry Standards
+#   Source License Version 1.1 (the "License"); You may not use this file
+#   except in compliance with the License. You may obtain a copy of the
+#   License at http://www.openoffice.org/license.html.
+#
+#   Software provided under this License is provided on an "AS IS" basis,
+#   WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+#   WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+#   MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+#   See the License for the specific provisions governing your rights and
+#   obligations concerning the Software.
+#
+#   The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+#
+#   Copyright: 2000 by Sun Microsystems, Inc.
+#
+#   All Rights Reserved.
+#
+#   Contributor(s): _______________________________________
+#
+#
+#
+#*************************************************************************
+
+PRJ=..$/..
+
+PRJNAME=io
+TARGET=tinstrm
+ENABLE_EXCEPTIONS=TRUE
+NO_BSYMBOLIC=TRUE
+
+# --- Settings -----------------------------------------------------
+.INCLUDE :  svpre.mk
+.INCLUDE :  settings.mk
+.INCLUDE :  sv.mk
+# ------------------------------------------------------------------
+
+SLOFILES= \
+    $(SLO)$/TextInputStream.obj
+
+SHL1TARGET= $(TARGET)
+
+SHL1STDLIBS= \
+        $(SALLIB)	\
+        $(CPPULIB) 	\
+        $(VOSLIB)       \
+        $(TOOLSLIB)       \
+        $(UCBHELPERLIB)       \
+        $(CPPUHELPERLIB) 
+
+SHL1DEPN=
+SHL1IMPLIB=		i$(TARGET)
+SHL1LIBS=		$(SLB)$/$(TARGET).lib
+SHL1DEF=		$(MISC)$/$(SHL1TARGET).def
+
+DEF1NAME=		$(SHL1TARGET)
+DEF1EXPORTFILE=	exports.dxp
+
+# --- Targets ------------------------------------------------------
+
+.INCLUDE :	target.mk
diff --git a/io/source/TextOutputStream/TextOutputStream.cxx b/io/source/TextOutputStream/TextOutputStream.cxx
new file mode 100644
index 000000000000..2f54064b021e
--- /dev/null
+++ b/io/source/TextOutputStream/TextOutputStream.cxx
@@ -0,0 +1,356 @@
+/*************************************************************************
+ *
+ *  $RCSfile: TextOutputStream.cxx,v $
+ *
+ *  $Revision: 1.1.1.1 $
+ *
+ *  last change: $Author: hr $ $Date: 2000-09-18 17:24:17 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library 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
+ *  Lesser General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (the "License"); You may not use this file
+ *  except in compliance with the License. You may obtain a copy of the
+ *  License at http://www.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+
+
+#include <osl/mutex.hxx>
+#include <osl/diagnose.h>
+
+#include <uno/mapping.hxx>
+
+#include <cppuhelper/factory.hxx>
+#include <cppuhelper/implbase2.hxx>
+
+#include <rtl/textenc.h>
+#include <rtl/tencinfo.h>
+
+#include <com/sun/star/io/XTextOutputStream.hpp>
+#include <com/sun/star/io/XActiveDataSource.hpp>
+
+
+#define IMPLEMENTATION_NAME "com.sun.star.comp.io.TextOutputStream"
+#define SERVICE_NAME "com.sun.star.io.TextOutputStream"
+
+using namespace ::osl;
+using namespace ::rtl;
+using namespace ::cppu;
+using namespace ::com::sun::star::uno;
+using namespace ::com::sun::star::lang;
+using namespace ::com::sun::star::io;
+using namespace ::com::sun::star::registry;
+
+
+namespace io_TextStream
+{
+
+//===========================================================================
+// Implementation XTextOutputStream
+
+typedef WeakImplHelper2< XTextOutputStream, XActiveDataSource > TextOutputStreamHelper;
+class OCommandEnvironment;
+
+class OTextOutputStream : public TextOutputStreamHelper
+{
+    Reference< XOutputStream > mxStream;
+
+    // Encoding
+    OUString mEncoding;
+    sal_Bool mbEncodingInitialized;
+    rtl_UnicodeToTextConverter  mConvUnicode2Text;
+    rtl_UnicodeToTextContext    mContextUnicode2Text;
+
+    Sequence<sal_Int8> implConvert( const OUString& rSource );
+
+public:
+    OTextOutputStream();
+    ~OTextOutputStream();
+
+    // Methods XTextOutputStream
+    virtual void SAL_CALL writeString( const OUString& aString )
+        throw(IOException, RuntimeException);
+    virtual void SAL_CALL setEncoding( const OUString& Encoding )
+        throw(RuntimeException);
+
+    // Methods XOutputStream
+    virtual void SAL_CALL writeBytes( const Sequence< sal_Int8 >& aData )
+        throw(NotConnectedException, BufferSizeExceededException, IOException, RuntimeException);
+    virtual void SAL_CALL flush(  )
+        throw(NotConnectedException, BufferSizeExceededException, IOException, RuntimeException);
+    virtual void SAL_CALL closeOutput(  )
+        throw(NotConnectedException, BufferSizeExceededException, IOException, RuntimeException);
+
+    // Methods XActiveDataSource
+    virtual void SAL_CALL setOutputStream( const Reference< XOutputStream >& aStream )
+        throw(RuntimeException);
+    virtual Reference< XOutputStream > SAL_CALL getOutputStream(  )
+        throw(RuntimeException);
+};
+
+OTextOutputStream::OTextOutputStream()
+{
+    mbEncodingInitialized = false;
+}
+
+OTextOutputStream::~OTextOutputStream()
+{
+    if( mbEncodingInitialized )
+    {
+        rtl_destroyUnicodeToTextContext( mConvUnicode2Text, mContextUnicode2Text );
+        rtl_destroyUnicodeToTextConverter( mConvUnicode2Text );
+    }
+}
+
+Sequence<sal_Int8> OTextOutputStream::implConvert( const OUString& rSource )
+{
+    const sal_Unicode *puSource = rSource.getStr();
+    sal_Int32 nSourceSize = rSource.getLength();
+
+    sal_Size nTargetCount = 0;
+    sal_Size nSourceCount = 0;
+
+    sal_uInt32 uiInfo;
+    sal_Size nSrcCvtChars;
+
+    // take nSourceSize * 3 as preference
+    // this is an upper boundary for converting to utf8,
+    // which most often used as the target.
+    sal_Int32 nSeqSize =  nSourceSize * 3;
+
+    Sequence<sal_Int8> seqText( nSeqSize );
+    sal_Char *pTarget = (sal_Char *) seqText.getArray();
+    while( sal_True )
+    {
+        nTargetCount += rtl_convertUnicodeToText(
+                                    mConvUnicode2Text,
+                                    mContextUnicode2Text,
+                                    &( puSource[nSourceCount] ),
+                                    nSourceSize - nSourceCount ,
+                                    &( pTarget[nTargetCount] ),
+                                    nSeqSize - nTargetCount,
+                                    RTL_UNICODETOTEXT_FLAGS_UNDEFINED_DEFAULT |
+                                    RTL_UNICODETOTEXT_FLAGS_INVALID_DEFAULT ,
+                                    &uiInfo,
+                                    &nSrcCvtChars);
+        nSourceCount += nSrcCvtChars;
+
+        if( uiInfo & RTL_UNICODETOTEXT_INFO_DESTBUFFERTOSMALL )
+        {
+            nSeqSize *= 2;
+            seqText.realloc( nSeqSize );  // double array size
+            pTarget = (sal_Char*) seqText.getArray();
+            continue;
+        }
+        break;
+    }
+
+    // reduce the size of the buffer (fast, no copy necessary)
+    seqText.realloc( nTargetCount );
+    return seqText;
+}
+
+
+//===========================================================================
+// XTextOutputStream
+
+void OTextOutputStream::writeString( const OUString& aString )
+    throw(IOException, RuntimeException)
+{
+    if( !mbEncodingInitialized )
+    {
+        OUString aUtf8Str( RTL_CONSTASCII_USTRINGPARAM("utf8") );
+        setEncoding( aUtf8Str );
+    }
+    if( !mbEncodingInitialized )
+        return;
+
+    Sequence<sal_Int8> aByteSeq = implConvert( aString );
+    mxStream->writeBytes( aByteSeq );
+}
+
+void OTextOutputStream::setEncoding( const OUString& Encoding )
+    throw(RuntimeException)
+{
+    OString aOEncodingStr = OUStringToOString( Encoding, RTL_TEXTENCODING_ASCII_US );
+    rtl_TextEncoding encoding = rtl_getTextEncodingFromMimeCharset( aOEncodingStr.getStr() );
+    if( RTL_TEXTENCODING_DONTKNOW == encoding )
+        return;
+
+    mbEncodingInitialized = true;
+    mConvUnicode2Text   = rtl_createUnicodeToTextConverter( encoding );
+    mContextUnicode2Text = rtl_createUnicodeToTextContext( mConvUnicode2Text );
+    mEncoding = Encoding;
+}
+
+//===========================================================================
+// XOutputStream
+void OTextOutputStream::writeBytes( const Sequence< sal_Int8 >& aData )
+    throw(NotConnectedException, BufferSizeExceededException, IOException, RuntimeException)
+{
+    mxStream->writeBytes( aData );
+}
+
+void OTextOutputStream::flush(  )
+    throw(NotConnectedException, BufferSizeExceededException, IOException, RuntimeException)
+{
+    mxStream->flush();
+}
+
+void OTextOutputStream::closeOutput(  )
+    throw(NotConnectedException, BufferSizeExceededException, IOException, RuntimeException)
+{
+    mxStream->closeOutput();
+}
+
+
+//===========================================================================
+// XActiveDataSource
+
+void OTextOutputStream::setOutputStream( const Reference< XOutputStream >& aStream )
+    throw(RuntimeException)
+{
+    mxStream = aStream;
+}
+
+Reference< XOutputStream > OTextOutputStream::getOutputStream()
+    throw(RuntimeException)
+{
+    return mxStream;
+}
+
+
+Reference< XInterface > SAL_CALL TextOutputStream_CreateInstance( const Reference< XMultiServiceFactory > &)
+{
+    return Reference < XInterface >( ( OWeakObject * ) new OTextOutputStream() );
+}
+
+
+Sequence< OUString > TextOutputStream_getSupportedServiceNames()
+{
+    static Sequence < OUString > *pNames = 0;
+    if( ! pNames )
+    {
+        MutexGuard guard( Mutex::getGlobalMutex() );
+        if( !pNames )
+        {
+            static Sequence< OUString > seqNames(1);
+            seqNames.getArray()[0] = OUString::createFromAscii( SERVICE_NAME );
+            pNames = &seqNames;
+        }
+    }
+    return *pNames;
+}
+
+
+}
+
+
+//==================================================================================================
+// Component exports
+
+extern "C"
+{
+//==================================================================================================
+void SAL_CALL component_getImplementationEnvironment(
+    const sal_Char ** ppEnvTypeName, uno_Environment ** ppEnv )
+{
+    *ppEnvTypeName = CPPU_CURRENT_LANGUAGE_BINDING_NAME;
+}
+//==================================================================================================
+sal_Bool SAL_CALL component_writeInfo(
+    void * pServiceManager, void * pRegistryKey )
+{
+    if (pRegistryKey)
+    {
+        try
+        {
+            Reference< XRegistryKey > xNewKey(
+                reinterpret_cast< XRegistryKey * >( pRegistryKey )->createKey(
+                    OUString::createFromAscii("/" IMPLEMENTATION_NAME "/UNO/SERVICES" ) ) );
+
+            const Sequence< OUString > & rSNL = io_TextStream::TextOutputStream_getSupportedServiceNames();
+            const OUString * pArray = rSNL.getConstArray();
+            for ( sal_Int32 nPos = rSNL.getLength(); nPos--; )
+                xNewKey->createKey( pArray[nPos] );
+
+            return sal_True;
+        }
+        catch (InvalidRegistryException &)
+        {
+            OSL_ENSHURE( sal_False, "### InvalidRegistryException!" );
+        }
+    }
+    return sal_False;
+}
+//==================================================================================================
+void * SAL_CALL component_getFactory(
+    const sal_Char * pImplName, void * pServiceManager, void * pRegistryKey )
+{
+    void * pRet = 0;
+
+    if (pServiceManager && rtl_str_compare( pImplName, IMPLEMENTATION_NAME ) == 0)
+    {
+        Reference< XSingleServiceFactory > xFactory( createSingleFactory(
+            reinterpret_cast< XMultiServiceFactory * >( pServiceManager ),
+            OUString::createFromAscii( pImplName ),
+            io_TextStream::TextOutputStream_CreateInstance,
+            io_TextStream::TextOutputStream_getSupportedServiceNames() ) );
+
+        if (xFactory.is())
+        {
+            xFactory->acquire();
+            pRet = xFactory.get();
+        }
+    }
+
+    return pRet;
+}
+}
+
+
diff --git a/io/source/TextOutputStream/makefile.mk b/io/source/TextOutputStream/makefile.mk
new file mode 100644
index 000000000000..6b4747e71582
--- /dev/null
+++ b/io/source/TextOutputStream/makefile.mk
@@ -0,0 +1,99 @@
+#*************************************************************************
+#
+#   $RCSfile: makefile.mk,v $
+#
+#   $Revision: 1.1.1.1 $
+#
+#   last change: $Author: hr $ $Date: 2000-09-18 17:24:17 $
+#
+#   The Contents of this file are made available subject to the terms of
+#   either of the following licenses
+#
+#          - GNU Lesser General Public License Version 2.1
+#          - Sun Industry Standards Source License Version 1.1
+#
+#   Sun Microsystems Inc., October, 2000
+#
+#   GNU Lesser General Public License Version 2.1
+#   =============================================
+#   Copyright 2000 by Sun Microsystems, Inc.
+#   901 San Antonio Road, Palo Alto, CA 94303, USA
+#
+#   This library is free software; you can redistribute it and/or
+#   modify it under the terms of the GNU Lesser General Public
+#   License version 2.1, as published by the Free Software Foundation.
+#
+#   This library 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
+#   Lesser General Public License for more details.
+#
+#   You should have received a copy of the GNU Lesser General Public
+#   License along with this library; if not, write to the Free Software
+#   Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+#   MA  02111-1307  USA
+#
+#
+#   Sun Industry Standards Source License Version 1.1
+#   =================================================
+#   The contents of this file are subject to the Sun Industry Standards
+#   Source License Version 1.1 (the "License"); You may not use this file
+#   except in compliance with the License. You may obtain a copy of the
+#   License at http://www.openoffice.org/license.html.
+#
+#   Software provided under this License is provided on an "AS IS" basis,
+#   WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+#   WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+#   MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+#   See the License for the specific provisions governing your rights and
+#   obligations concerning the Software.
+#
+#   The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+#
+#   Copyright: 2000 by Sun Microsystems, Inc.
+#
+#   All Rights Reserved.
+#
+#   Contributor(s): _______________________________________
+#
+#
+#
+#*************************************************************************
+
+PRJ=..$/..
+
+PRJNAME=io
+TARGET=toutstrm
+ENABLE_EXCEPTIONS=TRUE
+NO_BSYMBOLIC=TRUE
+
+# --- Settings -----------------------------------------------------
+.INCLUDE :  svpre.mk
+.INCLUDE :  settings.mk
+.INCLUDE :  sv.mk
+# ------------------------------------------------------------------
+
+SLOFILES= \
+    $(SLO)$/TextOutputStream.obj
+
+SHL1TARGET= $(TARGET)
+
+SHL1STDLIBS= \
+        $(SALLIB)	\
+        $(CPPULIB) 	\
+        $(VOSLIB)       \
+        $(TOOLSLIB)       \
+        $(UCBHELPERLIB)       \
+        $(CPPUHELPERLIB) 
+
+SHL1DEPN=
+SHL1IMPLIB=		i$(TARGET)
+SHL1LIBS=		$(SLB)$/$(TARGET).lib
+SHL1DEF=		$(MISC)$/$(SHL1TARGET).def
+
+DEF1NAME=		$(SHL1TARGET)
+DEF1EXPORTFILE=	exports.dxp
+
+# --- Targets ------------------------------------------------------
+
+.INCLUDE :	target.mk
diff --git a/io/source/acceptor/acc_pipe.cxx b/io/source/acceptor/acc_pipe.cxx
new file mode 100644
index 000000000000..91165b1e4879
--- /dev/null
+++ b/io/source/acceptor/acc_pipe.cxx
@@ -0,0 +1,226 @@
+/*************************************************************************
+ *
+ *  $RCSfile: acc_pipe.cxx,v $
+ *
+ *  $Revision: 1.1.1.1 $
+ *
+ *  last change: $Author: hr $ $Date: 2000-09-18 17:24:17 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library 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
+ *  Lesser General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (the "License"); You may not use this file
+ *  except in compliance with the License. You may obtain a copy of the
+ *  License at http://www.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+#include "acceptor.hxx"
+#include <com/sun/star/connection/ConnectionSetupException.hpp>
+
+#include <cppuhelper/implbase1.hxx>
+
+using namespace ::vos;
+using namespace ::rtl;
+using namespace ::cppu;
+using namespace ::com::sun::star::uno;
+using namespace ::com::sun::star::lang;
+using namespace ::com::sun::star::connection;
+using namespace ::com::sun::star::io;
+
+
+namespace stoc_acceptor
+{
+
+    typedef WeakImplHelper1< XConnection > MyPipeConnection;
+
+    class PipeConnection :
+        public MyPipeConnection
+    {
+    public:
+        PipeConnection( const OUString & s , sal_Bool bIgnoreClose);
+
+        virtual sal_Int32 SAL_CALL read( Sequence< sal_Int8 >& aReadBytes, sal_Int32 nBytesToRead )
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException);
+        virtual void SAL_CALL write( const Sequence< sal_Int8 >& aData )
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException);
+        virtual void SAL_CALL flush(  ) throw(
+            ::com::sun::star::io::IOException,
+            ::com::sun::star::uno::RuntimeException);
+        virtual void SAL_CALL close(  )
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException);
+        virtual ::rtl::OUString SAL_CALL getDescription(  )
+            throw(::com::sun::star::uno::RuntimeException);
+    public:
+        ::vos::OStreamPipe m_pipe;
+        oslInterlockedCount m_nStatus;
+        OUString m_sDescription;
+        sal_Bool m_bIgnoreClose;
+    };
+
+
+
+    PipeConnection::PipeConnection( const OUString &s , sal_Bool bIgnoreClose) :
+        m_nStatus( 0 ),
+        m_sDescription( OUString::createFromAscii( "pipe:" ) ),
+        m_bIgnoreClose( bIgnoreClose )
+    {
+        m_sDescription += s;
+        m_sDescription += OUString::createFromAscii( ":" );
+
+        // make it unique
+        m_sDescription += OUString::valueOf( (sal_Int64) (OObject * ) &m_pipe , 10 );
+    }
+
+    sal_Int32 PipeConnection::read( Sequence < sal_Int8 > & aReadBytes , sal_Int32 nBytesToRead )
+        throw(::com::sun::star::io::IOException,
+              ::com::sun::star::uno::RuntimeException)
+    {
+        if( ! m_nStatus )
+        {
+            if( aReadBytes.getLength() != nBytesToRead )
+            {
+                aReadBytes.realloc( nBytesToRead );
+            }
+            return m_pipe.read( aReadBytes.getArray()  , aReadBytes.getLength() );
+        }
+        else {
+            throw IOException();
+        }
+
+        return 0;
+    }
+
+    void PipeConnection::write( const Sequence < sal_Int8 > &seq )
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException)
+    {
+        if( ! m_nStatus )
+        {
+            if( m_pipe.write( seq.getConstArray() , seq.getLength() ) != seq.getLength() )
+            {
+                throw IOException();
+            }
+        }
+        else {
+            throw IOException();
+        }
+    }
+
+    void PipeConnection::flush( )
+        throw(  ::com::sun::star::io::IOException,
+                ::com::sun::star::uno::RuntimeException)
+    {
+    }
+
+    void PipeConnection::close()
+        throw( ::com::sun::star::io::IOException,
+               ::com::sun::star::uno::RuntimeException)
+    {
+        if( ! m_bIgnoreClose && 1 == osl_incrementInterlockedCount( (&m_nStatus) ) )
+        {
+            m_pipe.close();
+        }
+    }
+
+    OUString PipeConnection::getDescription()
+            throw(::com::sun::star::uno::RuntimeException)
+    {
+        return m_sDescription;
+    }
+
+    /***************
+     * PipeAcceptor
+     **************/
+    PipeAcceptor::PipeAcceptor( const OUString &sPipeName , sal_Bool bIgnoreClose) :
+        m_bClosed( sal_False ),
+        m_sPipeName( sPipeName ),
+        m_bIgnoreClose( bIgnoreClose )
+    {
+    }
+
+
+    void PipeAcceptor::init()
+    {
+#ifdef ENABLEUNICODE
+        m_pipe.create( m_sPipeName.pData , ::vos::OPipe::TOption_Create );
+#else
+        OString o = OUStringToOString( m_sPipeName , RTL_TEXTENCODING_ASCII_US );
+        m_pipe.create( o.pData->buffer , ::vos::OPipe::TOption_Create );
+#endif
+    }
+
+    Reference< XConnection > PipeAcceptor::accept( )
+    {
+        PipeConnection *pConn = new PipeConnection( m_sPipeName , m_bIgnoreClose );
+
+        OPipe::TPipeError status = m_pipe.accept( pConn->m_pipe );
+
+        if( m_bClosed )
+        {
+            // stopAccepting was called !
+            delete pConn;
+            return Reference < XConnection >();
+        }
+        else if( OPipe::E_None == status )
+        {
+            return Reference < XConnection > ( (XConnection * ) pConn );
+        }
+        else
+        {
+            throw ConnectionSetupException();
+        }
+    }
+
+    void PipeAcceptor::stopAccepting()
+    {
+        m_bClosed = sal_True;
+        m_pipe.close();
+    }
+}
diff --git a/io/source/acceptor/acc_socket.cxx b/io/source/acceptor/acc_socket.cxx
new file mode 100644
index 000000000000..3aa709bf9978
--- /dev/null
+++ b/io/source/acceptor/acc_socket.cxx
@@ -0,0 +1,403 @@
+/*************************************************************************
+ *
+ *  $RCSfile: acc_socket.cxx,v $
+ *
+ *  $Revision: 1.1.1.1 $
+ *
+ *  last change: $Author: hr $ $Date: 2000-09-18 17:24:17 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library 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
+ *  Lesser General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (the "License"); You may not use this file
+ *  except in compliance with the License. You may obtain a copy of the
+ *  License at http://www.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+#include "acceptor.hxx"
+
+#include <stl/hash_set>
+
+#include <com/sun/star/connection/XConnectionBroadcaster.hpp>
+#include <com/sun/star/connection/ConnectionSetupException.hpp>
+
+#include <cppuhelper/implbase2.hxx>
+
+using namespace ::osl;
+using namespace ::rtl;
+using namespace ::cppu;
+using namespace ::com::sun::star::uno;
+using namespace ::com::sun::star::io;
+using namespace ::com::sun::star::connection;
+
+
+namespace stoc_acceptor {
+    static void callStarted(Reference<XStreamListener> xStreamListener)
+    {
+        xStreamListener->started();
+    }
+
+    struct callError {
+        const Any & any;
+
+        callError(const Any & any);
+
+        void operator () (Reference<XStreamListener> xStreamListener);
+    };
+
+    callError::callError(const Any & any)
+        : any(any)
+    {
+    }
+
+    void callError::operator () (Reference<XStreamListener> xStreamListener)
+    {
+        xStreamListener->error(any);
+    }
+
+    static void callClosed(Reference<XStreamListener> xStreamListener)
+    {
+        xStreamListener->closed();
+    }
+
+
+    template<class T>
+    struct ReferenceHash
+    {
+        size_t operator () (const ::com::sun::star::uno::Reference<T> & ref) const
+        {
+            return (size_t)ref.get();
+        }
+    };
+
+    template<class T>
+    struct ReferenceEqual
+    {
+        sal_Bool operator () (const ::com::sun::star::uno::Reference<T> & op1,
+                              const ::com::sun::star::uno::Reference<T> & op2) const
+        {
+            return op1.get() == op2.get();
+        }
+    };
+
+
+    class SocketConnection : public ::cppu::WeakImplHelper2<
+        ::com::sun::star::connection::XConnection,
+        ::com::sun::star::connection::XConnectionBroadcaster>
+
+    {
+    public:
+        SocketConnection( const ::rtl::OUString & s , sal_uInt16 nPort , sal_Bool bIgnoreClose );
+
+        virtual sal_Int32 SAL_CALL read( ::com::sun::star::uno::Sequence< sal_Int8 >& aReadBytes,
+                                         sal_Int32 nBytesToRead )
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException);
+        virtual void SAL_CALL write( const ::com::sun::star::uno::Sequence< sal_Int8 >& aData )
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException);
+        virtual void SAL_CALL flush(  ) throw(
+            ::com::sun::star::io::IOException,
+            ::com::sun::star::uno::RuntimeException);
+        virtual void SAL_CALL close(  )
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException);
+        virtual ::rtl::OUString SAL_CALL getDescription(  )
+            throw(::com::sun::star::uno::RuntimeException);
+
+        // XConnectionBroadcaster
+        virtual void SAL_CALL addStreamListener(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XStreamListener>& aListener)
+            throw(::com::sun::star::uno::RuntimeException);
+        virtual void SAL_CALL removeStreamListener(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XStreamListener>& aListener)
+            throw(::com::sun::star::uno::RuntimeException);
+
+    public:
+        ::vos::OStreamSocket m_socket;
+        ::vos::OInetSocketAddr m_addr;
+        oslInterlockedCount m_nStatus;
+        ::rtl::OUString m_sDescription;
+        sal_Bool m_bIgnoreClose;
+
+        ::osl::Mutex _mutex;
+        sal_Bool                             _firstRead;
+          ::std::hash_set< ::com::sun::star::uno::Reference< ::com::sun::star::io::XStreamListener>,
+              ReferenceHash< ::com::sun::star::io::XStreamListener>,
+              ReferenceEqual< ::com::sun::star::io::XStreamListener> > _listeners;
+    };
+
+    template<class T>
+    void notifyListeners(SocketConnection * pCon, T t)
+    {
+        ::osl::MutexGuard guard(pCon->_mutex);
+        ::std::for_each(pCon->_listeners.begin(), pCon->_listeners.end(), t);
+    }
+
+
+    SocketConnection::SocketConnection( const OUString &s,
+                                        sal_uInt16 nPort ,
+                                        sal_Bool bIgnoreClose) :
+        m_nStatus( 0 ),
+        m_sDescription( OUString::createFromAscii( "socket:" ) ),
+        m_bIgnoreClose( bIgnoreClose )
+    {
+        m_sDescription += s;
+        m_sDescription += OUString::createFromAscii( ":" );
+        m_sDescription += OUString::valueOf( (sal_Int32) nPort , 10 );
+        m_sDescription += OUString::createFromAscii( ":" );
+
+        // make it unique
+        m_sDescription += OUString::valueOf( (sal_Int64) (::vos::OObject * ) &m_socket , 10 );
+    }
+
+    sal_Int32 SocketConnection::read( Sequence < sal_Int8 > & aReadBytes , sal_Int32 nBytesToRead )
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException)
+    {
+        if( ! m_nStatus )
+        {
+            if(_firstRead) {
+                _firstRead = false;
+
+                notifyListeners(this, callStarted);
+            }
+
+            if( aReadBytes.getLength() != nBytesToRead )
+            {
+                aReadBytes.realloc( nBytesToRead );
+            }
+
+            sal_Int32 i = 0;
+            i = m_socket.read( aReadBytes.getArray()  , aReadBytes.getLength() );
+
+            if(i != nBytesToRead)
+            {
+                if(i < 0) // error?
+                {
+                    OUString errMessage;
+                    m_socket.getError(errMessage);
+
+                    OUString message(RTL_CONSTASCII_USTRINGPARAM("acc_socket.cxx:SocketConnection::read: error - "));
+                    message += errMessage;
+
+                    IOException ioException(message, Reference<XInterface>(static_cast<XConnection *>(this)));
+
+                    Any any;
+                    any <<= ioException;
+
+                    notifyListeners(this, callError(any));
+
+                    throw ioException;
+                }
+                else  // connection closed!
+                {
+                    notifyListeners(this, callClosed);
+                }
+            }
+
+            return i;
+        }
+        else
+        {
+            OUString message(RTL_CONSTASCII_USTRINGPARAM("acc_socket.cxx:SocketConnection::read: error - connection already closed"));
+
+            IOException ioException(message, Reference<XInterface>(static_cast<XConnection *>(this)));
+
+            Any any;
+            any <<= ioException;
+
+            notifyListeners(this, callError(any));
+
+            throw ioException;
+        }
+    }
+
+    void SocketConnection::write( const Sequence < sal_Int8 > &seq )
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException)
+    {
+        if( ! m_nStatus )
+        {
+            if( m_socket.write( seq.getConstArray() , seq.getLength() ) != seq.getLength() )
+            {
+                OUString errMessage;
+                m_socket.getError(errMessage);
+
+                OUString message(RTL_CONSTASCII_USTRINGPARAM("acc_socket.cxx:SocketConnection::write: error - "));
+                message += errMessage;
+
+                IOException ioException(message, Reference<XInterface>(static_cast<XConnection *>(this)));
+
+                Any any;
+                any <<= ioException;
+
+                notifyListeners(this, callError(any));
+
+                throw ioException;
+            }
+        }
+        else
+        {
+            OUString message(RTL_CONSTASCII_USTRINGPARAM("acc_socket.cxx:SocketConnection::write: error - connection already closed"));
+
+            IOException ioException(message, Reference<XInterface>(static_cast<XConnection *>(this)));
+
+            Any any;
+            any <<= ioException;
+
+            notifyListeners(this, callError(any));
+
+            throw ioException;
+        }
+    }
+
+    void SocketConnection::flush( )
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException)
+    {
+
+    }
+
+    void SocketConnection::close()
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException)
+    {
+        // enshure close is called only once
+        if( ! m_bIgnoreClose && 1 == osl_incrementInterlockedCount( (&m_nStatus) ) )
+        {
+            m_socket.close();
+        }
+    }
+
+    OUString SocketConnection::getDescription()
+            throw( ::com::sun::star::uno::RuntimeException)
+    {
+        return m_sDescription;
+    }
+
+
+    // XConnectionBroadcaster
+    void SAL_CALL SocketConnection::addStreamListener(const Reference<XStreamListener> & aListener) throw(RuntimeException)
+    {
+        MutexGuard guard(_mutex);
+
+        _listeners.insert(aListener);
+    }
+
+    void SAL_CALL SocketConnection::removeStreamListener(const Reference<XStreamListener> & aListener) throw(RuntimeException)
+    {
+        MutexGuard guard(_mutex);
+
+        _listeners.erase(aListener);
+    }
+
+    SocketAcceptor::SocketAcceptor( const OUString &sSocketName ,
+                                    sal_uInt16 nPort ,
+                                    sal_Bool bIgnoreClose ) :
+        m_bClosed( sal_False ),
+        m_sSocketName( sSocketName ),
+        m_nPort( nPort ),
+        m_bIgnoreClose( bIgnoreClose )
+    {
+    }
+
+
+    void SocketAcceptor::init()
+    {
+        m_addr.setPort( m_nPort );
+#ifdef ENABLEUNICODE
+        m_addr.setAddr( m_sSocketName.pData );
+#else
+        OString o = OUStringToOString( m_sSocketName , RTL_TEXTENCODING_ASCII_US );
+        m_addr.setAddr( o.pData->buffer );
+#endif
+        m_socket.setReuseAddr(1);
+
+        if(! m_socket.bind(m_addr) )
+        {
+            throw ConnectionSetupException(
+                OUString(RTL_CONSTASCII_USTRINGPARAM("acc_socket.cxx:SocketAcceptor::init - error - couldn't bind")),
+                Reference<XInterface>());
+        }
+
+        if(! m_socket.listen() )
+        {
+            throw ConnectionSetupException(
+                OUString(RTL_CONSTASCII_USTRINGPARAM("acc_socket.cxx:SocketAcceptor::init - error - can not listen")),
+                Reference<XInterface>());
+        }
+    }
+
+    Reference< XConnection > SocketAcceptor::accept( )
+    {
+
+        SocketConnection *pConn = new SocketConnection( m_sSocketName , m_nPort, m_bIgnoreClose );
+
+        if( m_socket.acceptConnection( pConn->m_socket, pConn->m_addr )!= osl_Socket_Ok )
+        {
+            // stopAccepting was called
+            delete pConn;
+            return Reference < XConnection > ();
+        }
+        if( m_bClosed )
+        {
+            delete pConn;
+            return Reference < XConnection > ();
+        }
+
+        pConn->m_socket.setTcpNoDelay( 1 );
+
+        return Reference < XConnection > ( (XConnection * ) pConn );
+    }
+
+    void SocketAcceptor::stopAccepting()
+    {
+        m_bClosed = sal_True;
+        m_socket.close();
+    }
+}
+
+
diff --git a/io/source/acceptor/acceptor.cxx b/io/source/acceptor/acceptor.cxx
new file mode 100644
index 000000000000..5e88a05d29d8
--- /dev/null
+++ b/io/source/acceptor/acceptor.cxx
@@ -0,0 +1,410 @@
+/*************************************************************************
+ *
+ *  $RCSfile: acceptor.cxx,v $
+ *
+ *  $Revision: 1.1.1.1 $
+ *
+ *  last change: $Author: hr $ $Date: 2000-09-18 17:24:17 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library 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
+ *  Lesser General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (the "License"); You may not use this file
+ *  except in compliance with the License. You may obtain a copy of the
+ *  License at http://www.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+#include <osl/mutex.hxx>
+
+#include <uno/mapping.hxx>
+
+#include <cppuhelper/factory.hxx>
+#include <cppuhelper/implbase1.hxx>
+
+#include <com/sun/star/connection/XAcceptor.hpp>
+
+#include "acceptor.hxx"
+
+#define IMPLEMENTATION_NAME "com.sun.star.comp.io.Acceptor"
+#define SERVICE_NAME "com.sun.star.connection.Acceptor"
+
+using namespace ::osl;
+using namespace ::rtl;
+using namespace ::cppu;
+using namespace ::com::sun::star::uno;
+using namespace ::com::sun::star::lang;
+using namespace ::com::sun::star::registry;
+using namespace ::com::sun::star::connection;
+
+
+namespace stoc_acceptor
+{
+    typedef WeakImplHelper1< XAcceptor > MyImplHelper;
+
+    class OAcceptor : public MyImplHelper
+    {
+    public:
+        OAcceptor(Reference< XMultiServiceFactory > xMultiServiceFactory);
+        ~OAcceptor();
+
+    public:
+        // Methods
+        virtual Reference< XConnection > SAL_CALL accept( const OUString& sConnectionDescription )
+            throw( AlreadyAcceptingException,
+                   ConnectionSetupException,
+                   IllegalArgumentException,
+                   RuntimeException);
+        virtual void SAL_CALL stopAccepting(  ) throw( RuntimeException);
+
+        PipeAcceptor *m_pPipe;
+        SocketAcceptor *m_pSocket;
+        Mutex m_mutex;
+        OUString m_sLastDescription;
+
+        Reference<XMultiServiceFactory> _xMultiServiceFactory;
+        Reference<XAcceptor>            _xAcceptor;
+    };
+
+
+    OAcceptor::OAcceptor(Reference< XMultiServiceFactory > xMultiServiceFactory) :
+        m_pPipe( 0 ),
+        m_pSocket( 0 ),
+        _xMultiServiceFactory(xMultiServiceFactory)
+    {}
+
+    OAcceptor::~OAcceptor()
+    {
+        if( m_pPipe )
+        {
+            delete m_pPipe;
+        }
+        if( m_pSocket )
+        {
+            delete m_pSocket;
+        }
+    }
+
+    Reference< XConnection > OAcceptor::accept( const OUString &sConnectionDescription )
+        throw( AlreadyAcceptingException,
+               ConnectionSetupException,
+               IllegalArgumentException,
+               RuntimeException)
+    {
+#ifdef DEBUG
+        OString tmp = OUStringToOString(sConnectionDescription, RTL_TEXTENCODING_ASCII_US);
+        OSL_TRACE("acceptor %s\n", tmp.getStr());
+#endif
+
+        Reference< XConnection > r;
+        if( m_sLastDescription.getLength() &&
+            m_sLastDescription != sConnectionDescription )
+        {
+            // instantiate another acceptor for different ports
+            throw ConnectionSetupException();
+        }
+
+        if( ! m_sLastDescription.getLength() )
+        {
+            // setup the acceptor
+
+            OUString aTokens[10];
+
+            // split into separate tokens
+            sal_Int32 i = 0,nIndex = 0;
+//              OUString sConnectionId = OUStringToOString( sConnectionDescription , RTL_TEXTENCODING_ASCII_US );
+
+            for(i=0; i < 10 ; i ++ )
+            {
+                sal_Int32 nLastIndex = nIndex;
+                nIndex = sConnectionDescription.indexOf( ( sal_Unicode ) ',' , nIndex );
+                if( -1 == nIndex )
+                {
+                    aTokens[i] = sConnectionDescription.copy( nLastIndex );
+                    break;
+                }
+                else
+                {
+                    aTokens[i] = sConnectionDescription.copy( nLastIndex , nIndex-nLastIndex );
+                }
+                aTokens[i] = aTokens[i].trim();
+                nIndex ++;
+            }
+
+            if( aTokens[0] == OUString( RTL_CONSTASCII_USTRINGPARAM("pipe") ) )
+            {
+                OUString sName;
+                sal_Bool bIgnoreFirstClose = sal_False;;
+
+                for( i = 1 ; i < 10 ; i ++ )
+                {
+                    sal_Int32 nIndex = aTokens[i].indexOf( '=' );
+                    if( -1 != nIndex )
+                    {
+                        OUString aName = aTokens[i].copy( 0 , nIndex ).trim().toLowerCase();
+                        if( nIndex < aTokens[i].getLength() )
+                        {
+                            OUString oValue = aTokens[i].copy( nIndex+1 , aTokens[i].getLength() - nIndex -1 ).trim();
+                            if( aName == OUString( RTL_CONSTASCII_USTRINGPARAM("ignorefirstclose") ) )
+                            {
+                                bIgnoreFirstClose = ( OUString( RTL_CONSTASCII_USTRINGPARAM("1")) == oValue );
+                            }
+                            else if ( aName == OUString( RTL_CONSTASCII_USTRINGPARAM("name") ) )
+                            {
+                                sName = oValue;
+                            }
+                        }
+                    }
+                }
+                m_pPipe = new PipeAcceptor(sName , bIgnoreFirstClose );
+
+                try
+                {
+                    m_pPipe->init();
+                }
+                catch( ... )
+                {
+                    {
+                        MutexGuard guard( m_mutex );
+                        delete m_pPipe;
+                        m_pPipe = 0;
+                    }
+                    throw;
+                }
+            }
+            else if ( aTokens[0] == OUString( RTL_CONSTASCII_USTRINGPARAM("socket")) )
+            {
+                OUString sHost = OUString( RTL_CONSTASCII_USTRINGPARAM("localhost"));
+                sal_uInt16 nPort;
+                sal_Bool bIgnoreFirstClose = sal_False;;
+
+                for( i = 1 ; i < 10 ; i ++ )
+                {
+                    sal_Int32 nIndex = aTokens[i].indexOf( '=' );
+                    if( -1 != nIndex )
+                    {
+                        OUString aName = aTokens[i].copy( 0 , nIndex ).trim().toLowerCase();
+                        if( nIndex < aTokens[i].getLength() )
+                        {
+                            OUString oValue = aTokens[i].copy( nIndex+1 , aTokens[i].getLength() - nIndex -1 ).trim();
+                            if( aName == OUString( RTL_CONSTASCII_USTRINGPARAM("ignorefirstclose")) )
+                            {
+                                bIgnoreFirstClose = ( OUString( RTL_CONSTASCII_USTRINGPARAM("1")) == oValue );
+                            }
+                            else if( OUString( RTL_CONSTASCII_USTRINGPARAM("host")) == aName )
+                            {
+                                sHost = oValue;
+                            }
+                            else if( OUString( RTL_CONSTASCII_USTRINGPARAM("port")) == aName )
+                            {
+                                nPort = oValue.toInt32();
+                            }
+                        }
+                    }
+                }
+
+                m_pSocket = new SocketAcceptor( sHost , nPort , bIgnoreFirstClose );
+
+                try
+                {
+                    m_pSocket->init();
+                }
+                catch( ... )
+                {
+                    {
+                        MutexGuard guard( m_mutex );
+                        delete m_pSocket;
+                        m_pSocket = 0;
+                    }
+                    throw;
+                }
+            }
+            else {
+                OUString delegatee = OUString(RTL_CONSTASCII_USTRINGPARAM("com.sun.star.connection.Acceptor."));
+                delegatee += aTokens[0];
+
+#ifdef DEBUG
+                OString tmp = OUStringToOString(delegatee, RTL_TEXTENCODING_ASCII_US);
+                OSL_TRACE("trying to get service %s\n", tmp.getStr());
+#endif
+                _xAcceptor = Reference<XAcceptor>(_xMultiServiceFactory->createInstance(delegatee), UNO_QUERY);
+
+                if(!_xAcceptor.is())
+                {
+                    OUString message(RTL_CONSTASCII_USTRINGPARAM("Acceptor: unknown delegatee "));
+                    message += delegatee;
+
+                    throw ConnectionSetupException(message, Reference<XInterface>());
+                }
+            }
+            m_sLastDescription = sConnectionDescription;
+        }
+
+        if( m_pPipe )
+        {
+            r = m_pPipe->accept();
+        }
+        else if( m_pSocket )
+        {
+            r = m_pSocket->accept();
+        }
+        else
+        {
+            sal_Int32 index = sConnectionDescription.indexOf((sal_Unicode) ',');
+
+            r = _xAcceptor->accept(m_sLastDescription.copy(index + 1).trim());
+        }
+
+        return r;
+    }
+
+    void SAL_CALL OAcceptor::stopAccepting(  ) throw( RuntimeException)
+    {
+        MutexGuard guard( m_mutex );
+
+        if( m_pPipe )
+        {
+            m_pPipe->stopAccepting();
+        }
+        else if ( m_pSocket )
+        {
+            m_pSocket->stopAccepting();
+        }
+        else
+        {
+            _xAcceptor->stopAccepting();
+        }
+
+    }
+
+
+    Reference< XInterface > SAL_CALL acceptor_CreateInstance( const Reference< XMultiServiceFactory > & xMultiServiceFactory)
+    {
+        return Reference < XInterface >( ( OWeakObject * ) new OAcceptor(xMultiServiceFactory) );
+    }
+
+    Sequence< OUString > acceptor_getSupportedServiceNames()
+    {
+        static Sequence < OUString > *pNames = 0;
+        if( ! pNames )
+        {
+            MutexGuard guard( Mutex::getGlobalMutex() );
+            if( !pNames )
+            {
+                static Sequence< OUString > seqNames(1);
+                seqNames.getArray()[0] = OUString::createFromAscii( SERVICE_NAME );
+                pNames = &seqNames;
+            }
+        }
+        return *pNames;
+    }
+
+}
+
+using namespace stoc_acceptor;
+
+
+
+extern "C"
+{
+//==================================================================================================
+void SAL_CALL component_getImplementationEnvironment(
+    const sal_Char ** ppEnvTypeName, uno_Environment ** ppEnv )
+{
+    *ppEnvTypeName = CPPU_CURRENT_LANGUAGE_BINDING_NAME;
+}
+//==================================================================================================
+sal_Bool SAL_CALL component_writeInfo(
+    void * pServiceManager, void * pRegistryKey )
+{
+    if (pRegistryKey)
+    {
+        try
+        {
+            Reference< XRegistryKey > xNewKey(
+                reinterpret_cast< XRegistryKey * >( pRegistryKey )->createKey(
+                    OUString::createFromAscii("/" IMPLEMENTATION_NAME "/UNO/SERVICES" ) ) );
+
+            const Sequence< OUString > & rSNL = acceptor_getSupportedServiceNames();
+            const OUString * pArray = rSNL.getConstArray();
+            for ( sal_Int32 nPos = rSNL.getLength(); nPos--; )
+                xNewKey->createKey( pArray[nPos] );
+
+            return sal_True;
+        }
+        catch (InvalidRegistryException &)
+        {
+            OSL_ENSHURE( sal_False, "### InvalidRegistryException!" );
+        }
+    }
+    return sal_False;
+}
+//==================================================================================================
+void * SAL_CALL component_getFactory(
+    const sal_Char * pImplName, void * pServiceManager, void * pRegistryKey )
+{
+    void * pRet = 0;
+
+    if (pServiceManager && rtl_str_compare( pImplName, IMPLEMENTATION_NAME ) == 0)
+    {
+        Reference< XSingleServiceFactory > xFactory( createSingleFactory(
+            reinterpret_cast< XMultiServiceFactory * >( pServiceManager ),
+            OUString::createFromAscii( pImplName ),
+            acceptor_CreateInstance, acceptor_getSupportedServiceNames() ) );
+
+        if (xFactory.is())
+        {
+            xFactory->acquire();
+            pRet = xFactory.get();
+        }
+    }
+
+    return pRet;
+}
+}
+
+
+
diff --git a/io/source/acceptor/acceptor.hxx b/io/source/acceptor/acceptor.hxx
new file mode 100644
index 000000000000..bb0641937d2e
--- /dev/null
+++ b/io/source/acceptor/acceptor.hxx
@@ -0,0 +1,106 @@
+/*************************************************************************
+ *
+ *  $RCSfile: acceptor.hxx,v $
+ *
+ *  $Revision: 1.1.1.1 $
+ *
+ *  last change: $Author: hr $ $Date: 2000-09-18 17:24:18 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library 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
+ *  Lesser General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (the "License"); You may not use this file
+ *  except in compliance with the License. You may obtain a copy of the
+ *  License at http://www.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+
+#include <vos/pipe.hxx>
+#include <vos/socket.hxx>
+
+#include <com/sun/star/connection/XConnection.hpp>
+
+namespace stoc_acceptor {
+
+    class PipeAcceptor
+    {
+    public:
+        PipeAcceptor( const ::rtl::OUString &sPipeName , sal_Bool bIgnoreClose );
+
+        void init();
+        ::com::sun::star::uno::Reference < ::com::sun::star::connection::XConnection >
+               accept(  );
+
+        void stopAccepting();
+
+        ::vos::OPipe m_pipe;
+        ::rtl::OUString m_sPipeName;
+        sal_Bool m_bClosed;
+        sal_Bool m_bIgnoreClose;
+    };
+
+    class SocketAcceptor
+    {
+    public:
+        SocketAcceptor( const ::rtl::OUString & sSocketName , sal_uInt16 nPort, sal_Bool bIgnoreClose );
+
+        void init();
+        ::com::sun::star::uno::Reference < ::com::sun::star::connection::XConnection >
+                accept();
+
+        void stopAccepting();
+
+        ::vos::OInetSocketAddr m_addr;
+        ::vos::OAcceptorSocket m_socket;
+        ::rtl::OUString m_sSocketName;
+        sal_uInt16 m_nPort;
+        sal_Bool m_bClosed;
+        sal_Bool m_bIgnoreClose;
+    };
+
+};
+
diff --git a/io/source/acceptor/acceptor.xml b/io/source/acceptor/acceptor.xml
new file mode 100644
index 000000000000..cdb863f54ef0
--- /dev/null
+++ b/io/source/acceptor/acceptor.xml
@@ -0,0 +1,56 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE COMPONENTDESCRIPTION PUBLIC "-//StarOffice//DTD ComponentDescription 1.0//EN" "componentdescription.dtd">
+
+<COMPONENTDESCRIPTION
+    xmlns:xlink="http://www.w3.org/1999/xlink/Namespace" >
+
+<Author> Joerg Budischewski </Author>
+
+<Name>  com.sun.star.comp.io.Acceptor </Name>
+
+<Description>
+    This component allows
+    to accept an connect-attempt from a different process.
+</Description>
+
+<ModuleName>    acceptor    </ModuleName>
+
+<LoaderName>    com.sun.star.loader.SharedLibrary   </LoaderName>
+
+<Language>  c++ </Language>
+
+<Status StatusValue="final"/>
+
+<SupportedService>  com.sun.star.io.Acceptor    </SupportedService>
+
+<ServiceDependency> ... </ServiceDependency>
+
+<ProjectBuildDependency>    cppuhelper  </ProjectBuildDependency>
+<ProjectBuildDependency>    cppu        </ProjectBuildDependency>
+<ProjectBuildDependency>    vos         </ProjectBuildDependency>
+<ProjectBuildDependency>    sal         </ProjectBuildDependency>
+
+<RuntimeModuleDependency>   cppuhelper  </RuntimeModuleDependency>
+<RuntimeModuleDependency>   cppu2       </RuntimeModuleDependency>
+<RuntimeModuleDependency>   vos2MSC     </RuntimeModuleDependency>
+<RuntimeModuleDependency>   sal2        </RuntimeModuleDependency>
+
+<Type>   com.sun.star.connection.XAcceptor                          </Type>
+<Type>   com.sun.star.connection.XConnectionBroadcaster                         </Type>
+<Type>   com.sun.star.io.UnexpectedEOFException                     </Type>
+<Type>   com.sun.star.io.WrongFormatException                           </Type>
+<Type>   com.sun.star.lang.XComponent                               </Type>
+<Type>   com.sun.star.lang.XMultiServiceFactory             </Type>
+<Type>   com.sun.star.lang.XSingleServiceFactory                    </Type>
+<Type>   com.sun.star.lang.XServiceInfo                                 </Type>
+<Type>   com.sun.star.lang.XTypeProvider                                </Type>
+<Type>   com.sun.star.lang.IllegalArgumentException                 </Type>
+<Type>   com.sun.star.registry.XRegistryKey                         </Type>
+<Type>   com.sun.star.registry.XImplementationRegistration          </Type>
+<Type>   com.sun.star.test.XSimpleTest                              </Type>
+<Type>   com.sun.star.uno.TypeClass                                 </Type>
+<Type>   com.sun.star.uno.XWeak                                 </Type>
+<Type>   com.sun.star.uno.XAggregation                              </Type>
+
+</COMPONENTDESCRIPTION>
+
diff --git a/io/source/acceptor/makefile.mk b/io/source/acceptor/makefile.mk
new file mode 100644
index 000000000000..b8b9871d2779
--- /dev/null
+++ b/io/source/acceptor/makefile.mk
@@ -0,0 +1,109 @@
+#*************************************************************************
+#
+#   $RCSfile: makefile.mk,v $
+#
+#   $Revision: 1.1.1.1 $
+#
+#   last change: $Author: hr $ $Date: 2000-09-18 17:24:18 $
+#
+#   The Contents of this file are made available subject to the terms of
+#   either of the following licenses
+#
+#          - GNU Lesser General Public License Version 2.1
+#          - Sun Industry Standards Source License Version 1.1
+#
+#   Sun Microsystems Inc., October, 2000
+#
+#   GNU Lesser General Public License Version 2.1
+#   =============================================
+#   Copyright 2000 by Sun Microsystems, Inc.
+#   901 San Antonio Road, Palo Alto, CA 94303, USA
+#
+#   This library is free software; you can redistribute it and/or
+#   modify it under the terms of the GNU Lesser General Public
+#   License version 2.1, as published by the Free Software Foundation.
+#
+#   This library 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
+#   Lesser General Public License for more details.
+#
+#   You should have received a copy of the GNU Lesser General Public
+#   License along with this library; if not, write to the Free Software
+#   Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+#   MA  02111-1307  USA
+#
+#
+#   Sun Industry Standards Source License Version 1.1
+#   =================================================
+#   The contents of this file are subject to the Sun Industry Standards
+#   Source License Version 1.1 (the "License"); You may not use this file
+#   except in compliance with the License. You may obtain a copy of the
+#   License at http://www.openoffice.org/license.html.
+#
+#   Software provided under this License is provided on an "AS IS" basis,
+#   WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+#   WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+#   MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+#   See the License for the specific provisions governing your rights and
+#   obligations concerning the Software.
+#
+#   The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+#
+#   Copyright: 2000 by Sun Microsystems, Inc.
+#
+#   All Rights Reserved.
+#
+#   Contributor(s): _______________________________________
+#
+#
+#
+#*************************************************************************
+
+PRJ=..$/..
+
+PRJNAME=io
+TARGET=acceptor
+ENABLE_EXCEPTIONS=TRUE
+NO_BSYMBOLIC=TRUE
+COMP1TYPELIST=$(TARGET)
+COMPRDB=$(SOLARBINDIR)$/applicat.rdb
+
+# --- Settings -----------------------------------------------------
+.INCLUDE :  svpre.mk
+.INCLUDE :  settings.mk
+.INCLUDE :  sv.mk
+# ------------------------------------------------------------------
+
+UNOUCRDEP=$(SOLARBINDIR)$/applicat.rdb
+UNOUCRRDB=$(SOLARBINDIR)$/applicat.rdb
+UNOUCROUT=$(OUT)$/inc$/acceptor
+INCPRE+= $(UNOUCROUT)
+
+UNOTYPES=$($(TARGET)_XML2CMPTYPES)
+
+SLOFILES= \
+        $(SLO)$/acceptor.obj \
+        $(SLO)$/acc_pipe.obj \
+        $(SLO)$/acc_socket.obj \
+               $(SLO)$/$(COMP1TYPELIST)_description.obj
+
+
+SHL1TARGET= $(TARGET)
+
+SHL1STDLIBS= \
+        $(SALLIB)	\
+        $(VOSLIB)	\
+        $(CPPULIB) 	\
+        $(CPPUHELPERLIB) 
+
+SHL1DEPN=
+SHL1IMPLIB=		i$(TARGET)
+SHL1LIBS=		$(SLB)$/$(TARGET).lib
+SHL1DEF=		$(MISC)$/$(SHL1TARGET).def
+
+DEF1NAME=		$(SHL1TARGET)
+DEF1EXPORTFILE=	exports.dxp
+
+# --- Targets ------------------------------------------------------
+.INCLUDE :	target.mk
diff --git a/io/source/connector/connector.cxx b/io/source/connector/connector.cxx
new file mode 100644
index 000000000000..cf36d7f0dc35
--- /dev/null
+++ b/io/source/connector/connector.cxx
@@ -0,0 +1,390 @@
+/*************************************************************************
+ *
+ *  $RCSfile: connector.cxx,v $
+ *
+ *  $Revision: 1.1.1.1 $
+ *
+ *  last change: $Author: hr $ $Date: 2000-09-18 17:24:18 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library 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
+ *  Lesser General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (the "License"); You may not use this file
+ *  except in compliance with the License. You may obtain a copy of the
+ *  License at http://www.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+#include <osl/mutex.hxx>
+
+#include <uno/mapping.hxx>
+
+#include <cppuhelper/factory.hxx>
+#include <cppuhelper/implbase1.hxx>
+
+#include <com/sun/star/lang/IllegalArgumentException.hpp>
+#include <com/sun/star/connection/XConnector.hpp>
+
+#include "connector.hxx"
+
+#define IMPLEMENTATION_NAME "com.sun.star.comp.io.Connector"
+#define SERVICE_NAME "com.sun.star.connection.Connector"
+
+using namespace ::osl;
+using namespace ::rtl;
+using namespace ::cppu;
+using namespace ::vos;
+using namespace ::com::sun::star::uno;
+using namespace ::com::sun::star::lang;
+using namespace ::com::sun::star::registry;
+using namespace ::com::sun::star::connection;
+
+namespace stoc_connector
+{
+    typedef WeakImplHelper1< XConnector > MyImplHelper;
+
+    class OConnector : public MyImplHelper
+    {
+        Reference< XMultiServiceFactory > _xMultiServiceFactory;
+
+    public:
+        OConnector(Reference< XMultiServiceFactory > xMultiServiceFactory);
+
+        // Methods
+        virtual Reference< XConnection > SAL_CALL OConnector::connect(
+            const OUString& sConnectionDescription )
+            throw( NoConnectException, ConnectionSetupException, RuntimeException);
+
+    };
+
+    OConnector::OConnector(Reference< XMultiServiceFactory > xMultiServiceFactory)
+        : _xMultiServiceFactory(xMultiServiceFactory)
+    {
+    }
+
+
+    Reference< XConnection > SAL_CALL OConnector::connect( const OUString& sConnectionDescription )
+        throw( NoConnectException, ConnectionSetupException, RuntimeException)
+    {
+#ifdef DEBUG
+        OString tmp = OUStringToOString(sConnectionDescription, RTL_TEXTENCODING_ASCII_US);
+        OSL_TRACE("connector %s\n", tmp.getStr());
+#endif
+
+        // parse string
+        OUString aTokens[10];
+
+        // split into separate tokens
+        sal_Int32 i = 0,nIndex = 0;
+
+        for(i=0; i < 10 ; i ++ )
+        {
+            sal_Int32 nLastIndex = nIndex;
+            nIndex = sConnectionDescription.indexOf( ( sal_Unicode ) ',' , nIndex );
+            if( -1 == nIndex )
+            {
+                aTokens[i] = sConnectionDescription.copy( nLastIndex );
+                break;
+            }
+            else
+            {
+                aTokens[i] = sConnectionDescription.copy( nLastIndex , nIndex-nLastIndex );
+            }
+            aTokens[i] = aTokens[i].trim();
+            nIndex ++;
+        }
+
+        Reference< XConnection > r;
+
+        if( OUString( RTL_CONSTASCII_USTRINGPARAM("pipe")) == aTokens[0]  )
+        {
+            OUString sName;
+            sal_Bool bIgnoreFirstClose = sal_False;;
+
+            for( i = 1 ; i < 10 ; i ++ )
+            {
+                sal_Int32 nIndex = aTokens[i].indexOf( '=' );
+                if( -1 != nIndex )
+                {
+                    OUString aName = aTokens[i].copy( 0 , nIndex ).trim().toLowerCase();
+                    if( nIndex < aTokens[i].getLength() )
+                    {
+                        OUString oValue = aTokens[i].copy( nIndex+1 , aTokens[i].getLength() - nIndex -1 ).trim();
+                        if( aName == OUString( RTL_CONSTASCII_USTRINGPARAM("ignorefirstclose") ))
+                        {
+                            bIgnoreFirstClose = (
+                                OUString( RTL_CONSTASCII_USTRINGPARAM("1")) == oValue );
+                        }
+                        else if ( aName == OUString( RTL_CONSTASCII_USTRINGPARAM("name") ))
+                        {
+                            sName = oValue;
+                        }
+                    }
+                }
+            }
+
+            PipeConnection *pConn = new PipeConnection(sName , bIgnoreFirstClose );
+#ifdef ENABLEUNICODE
+            if( pConn->m_pipe.create( sName.pData, ::vos::OPipe::TOption_Open ) )
+#else
+            OString o = OUStringToOString( sName ,  RTL_TEXTENCODING_ASCII_US );
+            if( pConn->m_pipe.create( o.pData->buffer, ::vos::OPipe::TOption_Open ) )
+#endif
+            {
+                r = Reference < XConnection > ( (XConnection * ) pConn );
+            }
+            else
+            {
+                OUString sMessage = OUString::createFromAscii( "Connector : couldn't connect to pipe " );
+                sMessage += sName;
+                sMessage += OUString::createFromAscii( "(" );
+                sMessage += OUString::valueOf( (sal_Int32 ) pConn->m_pipe.getError() );
+                sMessage += OUString::createFromAscii( ")" );
+                delete pConn;
+                throw NoConnectException( sMessage ,Reference< XInterface > () );
+            }
+        }
+        else if( OUString( RTL_CONSTASCII_USTRINGPARAM("socket")) == aTokens[0] )
+        {
+            OUString sHost;
+            sal_uInt16 nPort;
+            sal_Bool bIgnoreFirstClose = sal_False;;
+
+            for( i = 1 ; i < 10 ; i ++ )
+            {
+                sal_Int32 nIndex = aTokens[i].indexOf( '=' );
+                if( -1 != nIndex )
+                {
+                    OUString aName = aTokens[i].copy( 0 , nIndex ).trim().toLowerCase();
+                    if( nIndex < aTokens[i].getLength() )
+                    {
+                        OUString oValue = aTokens[i].copy( nIndex+1 , aTokens[i].getLength() - nIndex -1 ).trim();
+                        if( aName == OUString( RTL_CONSTASCII_USTRINGPARAM("ignorefirstclose")) )
+                        {
+                            bIgnoreFirstClose = (
+                                OUString( RTL_CONSTASCII_USTRINGPARAM("1"))  == oValue );
+                        }
+                        else if( OUString( RTL_CONSTASCII_USTRINGPARAM("host")) == aName )
+                        {
+                            sHost = oValue;
+                        }
+                        else if( OUString( RTL_CONSTASCII_USTRINGPARAM("port")) == aName )
+                        {
+                            nPort = oValue.toInt32();
+                        }
+                    }
+                }
+            }
+
+            SocketConnection *pConn = new SocketConnection( sHost ,
+                                                            nPort ,
+                                                            bIgnoreFirstClose );
+            if( ! pConn->m_socket.bind( pConn->m_addr ) )
+            {
+                OUString sMessage = OUString::createFromAscii( "Connector : couldn't bind socket (" );
+                OUString sError;
+                pConn->m_socket.getError( sError );
+                sMessage += sError;
+                sMessage += OUString::createFromAscii( ")" );
+                delete pConn;
+                throw ConnectionSetupException( sMessage, Reference < XInterface >() );
+            }
+            pConn->m_socket.setTcpNoDelay( 1 );
+#ifdef ENABLEUNICODE
+            OInetSocketAddr AddrTarget( sHost.pData, nPort );
+#else
+            OString o = OUStringToOString( sHost , RTL_TEXTENCODING_ASCII_US );
+            OInetSocketAddr AddrTarget(o.pData->buffer, nPort );
+#endif
+            if(pConn->m_socket.connect(AddrTarget) != osl_Socket_Ok)
+            {
+                OUString sMessage = OUString::createFromAscii( "Connector : couldn't connect to socket (" );
+                OUString sError;
+                pConn->m_socket.getError( sError );
+                sMessage += sError;
+                sMessage += OUString::createFromAscii( ")" );
+                delete pConn;
+                throw NoConnectException( sMessage, Reference < XInterface > () );
+            }
+            r = Reference< XConnection > ( (XConnection * ) pConn );
+        }
+        else if( OUString( RTL_CONSTASCII_USTRINGPARAM( "channel" )) == aTokens[0] )
+        {
+            OUString sResource;
+            for( i = 1 ; i < 10 ; i ++ )
+            {
+                sal_Int32 nIndex = aTokens[i].indexOf( '=' );
+                if( -1 != nIndex )
+                {
+                    OUString aName = aTokens[i].copy( 0 , nIndex ).trim().toLowerCase();
+                    if( nIndex < aTokens[i].getLength() )
+                    {
+                        OUString oValue = aTokens[i].copy( nIndex+1 , aTokens[i].getLength() - nIndex -1 ).trim();
+                        if( OUString( RTL_CONSTASCII_USTRINGPARAM("resource")) == aName )
+                        {
+                            sResource = oValue;
+                        }
+                    }
+                }
+            }
+
+            ChannelConnection *pConn = new ChannelConnection( sResource );
+
+            r = Reference< XConnection > ( (XConnection * ) pConn );
+        }
+        else
+        {
+            OUString delegatee = OUString(RTL_CONSTASCII_USTRINGPARAM("com.sun.star.connection.Connector."));
+            delegatee += aTokens[0];
+
+#ifdef DEBUG
+            OString tmp = OUStringToOString(delegatee, RTL_TEXTENCODING_ASCII_US);
+            OSL_TRACE("trying to get service %s\n", tmp.getStr());
+#endif
+            Reference<XConnector> xConnector(_xMultiServiceFactory->createInstance(delegatee), UNO_QUERY);
+
+            if(!xConnector.is())
+            {
+                OUString message(RTL_CONSTASCII_USTRINGPARAM("Connector: unknown delegatee "));
+                message += delegatee;
+
+                throw ConnectionSetupException(message, Reference<XInterface>());
+            }
+
+            sal_Int32 index = sConnectionDescription.indexOf((sal_Unicode) ',');
+
+            r = xConnector->connect(sConnectionDescription.copy(index + 1).trim());
+        }
+
+        return r;
+    }
+
+
+    Reference< XInterface > SAL_CALL connector_CreateInstance( const Reference< XMultiServiceFactory > & xMultiServiceFactory)
+    {
+        return Reference < XInterface >( ( OWeakObject * ) new OConnector(xMultiServiceFactory) );
+    }
+
+    Sequence< OUString > connector_getSupportedServiceNames()
+    {
+        static Sequence < OUString > *pNames = 0;
+        if( ! pNames )
+        {
+            MutexGuard guard( Mutex::getGlobalMutex() );
+            if( !pNames )
+            {
+                static Sequence< OUString > seqNames(1);
+                seqNames.getArray()[0] = OUString::createFromAscii( SERVICE_NAME );
+                pNames = &seqNames;
+            }
+        }
+        return *pNames;
+    }
+
+}
+
+using namespace stoc_connector;
+
+
+extern "C"
+{
+//==================================================================================================
+void SAL_CALL component_getImplementationEnvironment(
+    const sal_Char ** ppEnvTypeName, uno_Environment ** ppEnv )
+{
+    *ppEnvTypeName = CPPU_CURRENT_LANGUAGE_BINDING_NAME;
+}
+//==================================================================================================
+sal_Bool SAL_CALL component_writeInfo(
+    void * pServiceManager, void * pRegistryKey )
+{
+    if (pRegistryKey)
+    {
+        try
+        {
+            Reference< XRegistryKey > xNewKey(
+                reinterpret_cast< XRegistryKey * >( pRegistryKey )->createKey(
+                    OUString::createFromAscii("/" IMPLEMENTATION_NAME "/UNO/SERVICES" ) ) );
+
+            const Sequence< OUString > & rSNL = connector_getSupportedServiceNames();
+            const OUString * pArray = rSNL.getConstArray();
+            for ( sal_Int32 nPos = rSNL.getLength(); nPos--; )
+                xNewKey->createKey( pArray[nPos] );
+
+            return sal_True;
+        }
+        catch (InvalidRegistryException &)
+        {
+            OSL_ENSHURE( sal_False, "### InvalidRegistryException!" );
+        }
+    }
+    return sal_False;
+}
+//==================================================================================================
+void * SAL_CALL component_getFactory(
+    const sal_Char * pImplName, void * pServiceManager, void * pRegistryKey )
+{
+    void * pRet = 0;
+
+    if (pServiceManager && rtl_str_compare( pImplName, IMPLEMENTATION_NAME ) == 0)
+    {
+        Reference< XSingleServiceFactory > xFactory( createSingleFactory(
+            reinterpret_cast< XMultiServiceFactory * >( pServiceManager ),
+            OUString::createFromAscii( pImplName ),
+            connector_CreateInstance, connector_getSupportedServiceNames() ) );
+
+        if (xFactory.is())
+        {
+            xFactory->acquire();
+            pRet = xFactory.get();
+        }
+    }
+
+    return pRet;
+}
+}
+
+
diff --git a/io/source/connector/connector.hxx b/io/source/connector/connector.hxx
new file mode 100644
index 000000000000..545a4f5015ff
--- /dev/null
+++ b/io/source/connector/connector.hxx
@@ -0,0 +1,197 @@
+/*************************************************************************
+ *
+ *  $RCSfile: connector.hxx,v $
+ *
+ *  $Revision: 1.1.1.1 $
+ *
+ *  last change: $Author: hr $ $Date: 2000-09-18 17:24:18 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library 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
+ *  Lesser General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (the "License"); You may not use this file
+ *  except in compliance with the License. You may obtain a copy of the
+ *  License at http://www.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+
+#include <vos/channel.hxx>
+
+#include <cppuhelper/implbase1.hxx>
+#include <cppuhelper/implbase2.hxx>
+
+#include <com/sun/star/connection/XConnection.hpp>
+#include <com/sun/star/connection/XConnectionBroadcaster.hpp>
+
+#include <stl/hash_set>
+
+
+namespace stoc_connector
+{
+    template<class T>
+    struct ReferenceHash
+    {
+        size_t operator () (const ::com::sun::star::uno::Reference<T> & ref) const
+        {
+            return (size_t)ref.get();
+        }
+    };
+
+    template<class T>
+    struct ReferenceEqual
+    {
+        sal_Bool operator () (const ::com::sun::star::uno::Reference<T> & op1,
+                              const ::com::sun::star::uno::Reference<T> & op2) const
+        {
+            return op1.get() == op2.get();
+        }
+    };
+
+    class PipeConnection :
+        public ::cppu::WeakImplHelper1< ::com::sun::star::connection::XConnection >
+
+    {
+    public:
+        PipeConnection( const ::rtl::OUString & s , sal_Bool bIgnoreClose );
+
+        virtual sal_Int32 SAL_CALL read( ::com::sun::star::uno::Sequence< sal_Int8 >& aReadBytes,
+                                         sal_Int32 nBytesToRead )
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException);
+        virtual void SAL_CALL write( const ::com::sun::star::uno::Sequence< sal_Int8 >& aData )
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException);
+        virtual void SAL_CALL flush(  ) throw(
+            ::com::sun::star::io::IOException,
+            ::com::sun::star::uno::RuntimeException);
+        virtual void SAL_CALL close(  )
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException);
+        virtual ::rtl::OUString SAL_CALL getDescription(  )
+            throw(::com::sun::star::uno::RuntimeException);
+    public:
+        ::vos::OStreamPipe m_pipe;
+        oslInterlockedCount m_nStatus;
+        ::rtl::OUString m_sDescription;
+        sal_Bool m_bIgnoreClose;
+    };
+
+    class SocketConnection :
+        public ::cppu::WeakImplHelper2< ::com::sun::star::connection::XConnection, ::com::sun::star::connection::XConnectionBroadcaster >
+
+    {
+    public:
+        SocketConnection( const ::rtl::OUString & s , sal_uInt16 nPort  , sal_Bool bIgnoreClose );
+
+        virtual sal_Int32 SAL_CALL read( ::com::sun::star::uno::Sequence< sal_Int8 >& aReadBytes,
+                                         sal_Int32 nBytesToRead )
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException);
+        virtual void SAL_CALL write( const ::com::sun::star::uno::Sequence< sal_Int8 >& aData )
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException);
+        virtual void SAL_CALL flush(  ) throw(
+            ::com::sun::star::io::IOException,
+            ::com::sun::star::uno::RuntimeException);
+        virtual void SAL_CALL close(  )
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException);
+        virtual ::rtl::OUString SAL_CALL getDescription(  )
+            throw(::com::sun::star::uno::RuntimeException);
+
+
+        // XConnectionBroadcaster
+        virtual void SAL_CALL addStreamListener(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XStreamListener>& aListener)
+            throw(::com::sun::star::uno::RuntimeException);
+        virtual void SAL_CALL removeStreamListener(const ::com::sun::star::uno::Reference< ::com::sun::star::io::XStreamListener>& aListener)
+            throw(::com::sun::star::uno::RuntimeException);
+
+    public:
+        ::vos::OConnectorSocket m_socket;
+        ::vos::OInetSocketAddr m_addr;
+        oslInterlockedCount m_nStatus;
+        ::rtl::OUString m_sDescription;
+        sal_Bool m_bIgnoreClose;
+
+        ::osl::Mutex _mutex;
+        sal_Bool                             _firstRead;
+          ::std::hash_set< ::com::sun::star::uno::Reference< ::com::sun::star::io::XStreamListener>,
+              ReferenceHash< ::com::sun::star::io::XStreamListener>,
+              ReferenceEqual< ::com::sun::star::io::XStreamListener> > _listeners;
+    };
+
+    class ChannelConnection :
+        public ::cppu::WeakImplHelper1< ::com::sun::star::connection::XConnection >
+    {
+    public:
+        ChannelConnection( const ::rtl::OUString & sParameter  );
+
+    public:
+        virtual sal_Int32 SAL_CALL read( ::com::sun::star::uno::Sequence< sal_Int8 >& aReadBytes,
+                                         sal_Int32 nBytesToRead )
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException);
+        virtual void SAL_CALL write( const ::com::sun::star::uno::Sequence< sal_Int8 >& aData )
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException);
+        virtual void SAL_CALL flush(  ) throw(
+            ::com::sun::star::io::IOException,
+            ::com::sun::star::uno::RuntimeException);
+        virtual void SAL_CALL close(  )
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException);
+        virtual ::rtl::OUString SAL_CALL getDescription(  )
+            throw(::com::sun::star::uno::RuntimeException);
+    private:
+        ::vos::IStream *m_pStream;
+        ::vos::ORef < ::vos::OChannel > m_channel;
+        oslInterlockedCount m_nStatus;
+        ::rtl::OUString m_sDescription;
+    };
+};
+
+
diff --git a/io/source/connector/connectr.xml b/io/source/connector/connectr.xml
new file mode 100644
index 000000000000..0070f4ed26d9
--- /dev/null
+++ b/io/source/connector/connectr.xml
@@ -0,0 +1,56 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE COMPONENTDESCRIPTION PUBLIC "-//StarOffice//DTD ComponentDescription 1.0//EN" "componentdescription.dtd">
+
+<COMPONENTDESCRIPTION
+    xmlns:xlink="http://www.w3.org/1999/xlink/Namespace" >
+
+<Author> Joerg Budischewski </Author>
+
+<Name>  com.sun.star.comp.io.Connector </Name>
+
+<Description>
+    This component allows
+    to establish a connection to another process.
+</Description>
+
+<ModuleName>    connectr    </ModuleName>
+
+<LoaderName>    com.sun.star.loader.SharedLibrary   </LoaderName>
+
+<Language>  c++ </Language>
+
+<Status StatusValue="final"/>
+
+<SupportedService>  com.sun.star.io.Connector   </SupportedService>
+
+<ServiceDependency> ... </ServiceDependency>
+
+<ProjectBuildDependency>    cppuhelper  </ProjectBuildDependency>
+<ProjectBuildDependency>    cppu        </ProjectBuildDependency>
+<ProjectBuildDependency>    vos         </ProjectBuildDependency>
+<ProjectBuildDependency>    sal         </ProjectBuildDependency>
+
+<RuntimeModuleDependency>   cppuhelper2 </RuntimeModuleDependency>
+<RuntimeModuleDependency>   cppu2       </RuntimeModuleDependency>
+<RuntimeModuleDependency>   vos2            </RuntimeModuleDependency>
+<RuntimeModuleDependency>   sal2        </RuntimeModuleDependency>
+
+<Type>   com.sun.star.connection.XConnector                         </Type>
+<Type>   com.sun.star.connection.XConnectionBroadcaster                         </Type>
+<Type>   com.sun.star.io.UnexpectedEOFException                     </Type>
+<Type>   com.sun.star.io.WrongFormatException                           </Type>
+<Type>   com.sun.star.lang.XComponent                               </Type>
+<Type>   com.sun.star.lang.XMultiServiceFactory             </Type>
+<Type>   com.sun.star.lang.XSingleServiceFactory                    </Type>
+<Type>   com.sun.star.lang.XServiceInfo                                 </Type>
+<Type>   com.sun.star.lang.XTypeProvider                                </Type>
+<Type>   com.sun.star.lang.IllegalArgumentException                 </Type>
+<Type>   com.sun.star.registry.XRegistryKey                         </Type>
+<Type>   com.sun.star.registry.XImplementationRegistration          </Type>
+<Type>   com.sun.star.test.XSimpleTest                              </Type>
+<Type>   com.sun.star.uno.TypeClass                                 </Type>
+<Type>   com.sun.star.uno.XWeak                                 </Type>
+<Type>   com.sun.star.uno.XAggregation                              </Type>
+
+</COMPONENTDESCRIPTION>
+
diff --git a/io/source/connector/ctr_pipe.cxx b/io/source/connector/ctr_pipe.cxx
new file mode 100644
index 000000000000..0e55c4c1fba7
--- /dev/null
+++ b/io/source/connector/ctr_pipe.cxx
@@ -0,0 +1,143 @@
+/*************************************************************************
+ *
+ *  $RCSfile: ctr_pipe.cxx,v $
+ *
+ *  $Revision: 1.1.1.1 $
+ *
+ *  last change: $Author: hr $ $Date: 2000-09-18 17:24:18 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library 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
+ *  Lesser General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (the "License"); You may not use this file
+ *  except in compliance with the License. You may obtain a copy of the
+ *  License at http://www.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+
+#include "connector.hxx"
+
+using namespace ::osl;
+using namespace ::rtl;
+using namespace ::com::sun::star::uno;
+using namespace ::com::sun::star::io;
+using namespace ::com::sun::star::connection;
+
+
+namespace stoc_connector {
+
+    PipeConnection::PipeConnection( const OUString &s , sal_Bool bIgnoreClose ) :
+        m_nStatus( 0 ),
+        m_sDescription( OUString::createFromAscii( "pipe:" ) ),
+        m_bIgnoreClose( bIgnoreClose )
+    {
+        m_sDescription += s;
+        m_sDescription += OUString::createFromAscii( ":" );
+
+        // make it unique
+        m_sDescription += OUString::valueOf( (sal_Int64) &m_pipe , 10 );
+    }
+
+    sal_Int32 PipeConnection::read( Sequence < sal_Int8 > & aReadBytes , sal_Int32 nBytesToRead )
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException)
+    {
+        if( ! m_nStatus )
+        {
+            if( aReadBytes.getLength() != nBytesToRead )
+            {
+                aReadBytes.realloc( nBytesToRead );
+            }
+            return m_pipe.read( aReadBytes.getArray()  , aReadBytes.getLength() );
+        }
+        else {
+            throw IOException();
+        }
+    }
+
+    void PipeConnection::write( const Sequence < sal_Int8 > &seq )
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException)
+    {
+        if( ! m_nStatus )
+        {
+            if( m_pipe.write( seq.getConstArray() , seq.getLength() ) != seq.getLength() )
+            {
+                throw IOException();
+            }
+        }
+        else {
+            throw IOException();
+        }
+    }
+
+    void PipeConnection::flush( )
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException)
+    {
+
+    }
+
+    void PipeConnection::close()
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException)
+    {
+        // ensure that close is called only once
+        if( ! m_bIgnoreClose  && 1 == osl_incrementInterlockedCount( (&m_nStatus) ) )
+        {
+            m_pipe.close();
+        }
+    }
+
+    OUString PipeConnection::getDescription()
+            throw( ::com::sun::star::uno::RuntimeException)
+    {
+        return m_sDescription;
+    }
+
+}
+
diff --git a/io/source/connector/ctr_socket.cxx b/io/source/connector/ctr_socket.cxx
new file mode 100644
index 000000000000..37da3daf9721
--- /dev/null
+++ b/io/source/connector/ctr_socket.cxx
@@ -0,0 +1,265 @@
+/*************************************************************************
+ *
+ *  $RCSfile: ctr_socket.cxx,v $
+ *
+ *  $Revision: 1.1.1.1 $
+ *
+ *  last change: $Author: hr $ $Date: 2000-09-18 17:24:18 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library 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
+ *  Lesser General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (the "License"); You may not use this file
+ *  except in compliance with the License. You may obtain a copy of the
+ *  License at http://www.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+
+#include "connector.hxx"
+
+using namespace ::osl;
+using namespace ::rtl;
+using namespace ::com::sun::star::uno;
+using namespace ::com::sun::star::io;
+using namespace ::com::sun::star::connection;
+
+
+namespace stoc_connector {
+    template<class T>
+    void notifyListeners(SocketConnection * pCon, T t)
+    {
+        ::osl::MutexGuard guard(pCon->_mutex);
+        ::std::for_each(pCon->_listeners.begin(), pCon->_listeners.end(), t);
+    }
+
+
+    static void callStarted(Reference<XStreamListener> xStreamListener)
+    {
+        xStreamListener->started();
+    }
+
+    struct callError {
+        const Any & any;
+
+        callError(const Any & any);
+
+        void operator () (Reference<XStreamListener> xStreamListener);
+    };
+
+    callError::callError(const Any & any)
+        : any(any)
+    {
+    }
+
+    void callError::operator () (Reference<XStreamListener> xStreamListener)
+    {
+        xStreamListener->error(any);
+    }
+
+    static void callClosed(Reference<XStreamListener> xStreamListener)
+    {
+        xStreamListener->closed();
+    }
+
+
+    SocketConnection::SocketConnection( const OUString &s, sal_uInt16 nPort, sal_Bool bIgnoreClose ) :
+        m_nStatus( 0 ),
+        m_sDescription( OUString::createFromAscii( "socket:" ) ),
+        m_bIgnoreClose( bIgnoreClose )
+    {
+        m_sDescription += s;
+        m_sDescription += OUString::createFromAscii( ":" );
+        m_sDescription += OUString::valueOf( (sal_Int32) nPort , 10 );
+        m_sDescription += OUString::createFromAscii( ":" );
+
+        // make it unique
+        m_sDescription += OUString::valueOf( (sal_Int64) &m_socket , 10 );
+    }
+
+    sal_Int32 SocketConnection::read( Sequence < sal_Int8 > & aReadBytes , sal_Int32 nBytesToRead )
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException)
+    {
+        if( ! m_nStatus )
+        {
+            if(_firstRead) {
+                _firstRead = false;
+
+                notifyListeners(this, callStarted);
+            }
+
+
+            if( aReadBytes.getLength() != nBytesToRead )
+            {
+                aReadBytes.realloc( nBytesToRead );
+            }
+            sal_Int32 i = m_socket.read( aReadBytes.getArray()  , aReadBytes.getLength() );
+
+            if(i != nBytesToRead)
+            {
+                if(i < 0) // error?
+                {
+                    OUString errMessage;
+                    m_socket.getError(errMessage);
+
+                    OUString message(RTL_CONSTASCII_USTRINGPARAM("ctr_socket.cxx:SocketConnection::read: error - "));
+                    message += errMessage;
+
+                    IOException ioException(message, Reference<XInterface>(static_cast<XConnection *>(this)));
+
+                    Any any;
+                    any <<= ioException;
+
+                    notifyListeners(this, callError(any));
+
+                    throw ioException;
+                }
+                else  // connection closed!
+                {
+                    notifyListeners(this, callClosed);
+                }
+            }
+
+            return i;
+        }
+        else
+        {
+            OUString message(RTL_CONSTASCII_USTRINGPARAM("ctr_socket.cxx:SocketConnection::read: error - connection already closed"));
+
+            IOException ioException(message, Reference<XInterface>(static_cast<XConnection *>(this)));
+
+            Any any;
+            any <<= ioException;
+
+            notifyListeners(this, callError(any));
+
+            throw ioException;
+        }
+    }
+
+    void SocketConnection::write( const Sequence < sal_Int8 > &seq )
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException)
+    {
+        if( ! m_nStatus )
+        {
+            if( m_socket.write( seq.getConstArray() , seq.getLength() ) != seq.getLength() )
+            {
+                OUString errMessage;
+                m_socket.getError(errMessage);
+
+                OUString message(RTL_CONSTASCII_USTRINGPARAM("ctr_socket.cxx:SocketConnection::write: error - "));
+                message += errMessage;
+
+                IOException ioException(message, Reference<XInterface>(static_cast<XConnection *>(this)));
+
+                Any any;
+                any <<= ioException;
+
+                notifyListeners(this, callError(any));
+
+                throw ioException;
+            }
+        }
+        else
+        {
+            OUString message(RTL_CONSTASCII_USTRINGPARAM("ctr_socket.cxx:SocketConnection::write: error - connection already closed"));
+
+            IOException ioException(message, Reference<XInterface>(static_cast<XConnection *>(this)));
+
+            Any any;
+            any <<= ioException;
+
+            notifyListeners(this, callError(any));
+
+            throw ioException;
+        }
+    }
+
+    void SocketConnection::flush( )
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException)
+    {
+
+    }
+
+    void SocketConnection::close()
+            throw(::com::sun::star::io::IOException,
+                  ::com::sun::star::uno::RuntimeException)
+    {
+            // enshure that close is called only once
+        if( ! m_bIgnoreClose && 1 == osl_incrementInterlockedCount( (&m_nStatus) ) )
+        {
+            m_socket.close();
+            notifyListeners(this, callClosed);
+        }
+    }
+
+    OUString SocketConnection::getDescription()
+            throw( ::com::sun::star::uno::RuntimeException)
+    {
+        return m_sDescription;
+    }
+
+
+
+    // XConnectionBroadcaster
+    void SAL_CALL SocketConnection::addStreamListener(const Reference<XStreamListener> & aListener) throw(RuntimeException)
+    {
+        MutexGuard guard(_mutex);
+
+        _listeners.insert(aListener);
+    }
+
+    void SAL_CALL SocketConnection::removeStreamListener(const Reference<XStreamListener> & aListener) throw(RuntimeException)
+    {
+        MutexGuard guard(_mutex);
+
+        _listeners.erase(aListener);
+    }
+}
+
diff --git a/io/source/connector/makefile.mk b/io/source/connector/makefile.mk
new file mode 100644
index 000000000000..c713dea1b331
--- /dev/null
+++ b/io/source/connector/makefile.mk
@@ -0,0 +1,110 @@
+#*************************************************************************
+#
+#   $RCSfile: makefile.mk,v $
+#
+#   $Revision: 1.1.1.1 $
+#
+#   last change: $Author: hr $ $Date: 2000-09-18 17:24:18 $
+#
+#   The Contents of this file are made available subject to the terms of
+#   either of the following licenses
+#
+#          - GNU Lesser General Public License Version 2.1
+#          - Sun Industry Standards Source License Version 1.1
+#
+#   Sun Microsystems Inc., October, 2000
+#
+#   GNU Lesser General Public License Version 2.1
+#   =============================================
+#   Copyright 2000 by Sun Microsystems, Inc.
+#   901 San Antonio Road, Palo Alto, CA 94303, USA
+#
+#   This library is free software; you can redistribute it and/or
+#   modify it under the terms of the GNU Lesser General Public
+#   License version 2.1, as published by the Free Software Foundation.
+#
+#   This library 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
+#   Lesser General Public License for more details.
+#
+#   You should have received a copy of the GNU Lesser General Public
+#   License along with this library; if not, write to the Free Software
+#   Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+#   MA  02111-1307  USA
+#
+#
+#   Sun Industry Standards Source License Version 1.1
+#   =================================================
+#   The contents of this file are subject to the Sun Industry Standards
+#   Source License Version 1.1 (the "License"); You may not use this file
+#   except in compliance with the License. You may obtain a copy of the
+#   License at http://www.openoffice.org/license.html.
+#
+#   Software provided under this License is provided on an "AS IS" basis,
+#   WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+#   WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+#   MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+#   See the License for the specific provisions governing your rights and
+#   obligations concerning the Software.
+#
+#   The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+#
+#   Copyright: 2000 by Sun Microsystems, Inc.
+#
+#   All Rights Reserved.
+#
+#   Contributor(s): _______________________________________
+#
+#
+#
+#*************************************************************************
+
+PRJ=..$/..
+
+PRJNAME=io
+TARGET=connectr
+ENABLE_EXCEPTIONS=TRUE
+NO_BSYMBOLIC=TRUE
+COMP1TYPELIST=$(TARGET)
+COMPRDB=$(SOLARBINDIR)$/applicat.rdb
+
+# --- Settings -----------------------------------------------------
+.INCLUDE :  svpre.mk
+.INCLUDE :  settings.mk
+.INCLUDE :  sv.mk
+# ------------------------------------------------------------------
+
+UNOUCRDEP=$(SOLARBINDIR)$/applicat.rdb
+UNOUCRRDB=$(SOLARBINDIR)$/applicat.rdb
+UNOUCROUT=$(OUT)$/inc$/connector
+INCPRE+= $(UNOUCROUT)
+
+UNOTYPES=$($(TARGET)_XML2CMPTYPES)
+
+SLOFILES= \
+    $(SLO)$/connector.obj\
+    $(SLO)$/ctr_pipe.obj\
+    $(SLO)$/ctr_socket.obj\
+    $(SLO)$/ctr_channel.obj \
+           $(SLO)$/$(COMP1TYPELIST)_description.obj
+
+SHL1TARGET= $(TARGET)
+
+SHL1STDLIBS= \
+        $(SALLIB)	\
+        $(CPPULIB) 	\
+        $(VOSLIB)       \
+        $(CPPUHELPERLIB) 
+
+SHL1DEPN=
+SHL1IMPLIB=		i$(TARGET)
+SHL1LIBS=		$(SLB)$/$(TARGET).lib
+SHL1DEF=		$(MISC)$/$(SHL1TARGET).def
+
+DEF1NAME=		$(SHL1TARGET)
+DEF1EXPORTFILE=	exports.dxp
+
+# --- Targets ------------------------------------------------------
+
+.INCLUDE :	target.mk
diff --git a/io/source/stm/factreg.cxx b/io/source/stm/factreg.cxx
new file mode 100644
index 000000000000..75dbc5fe72e1
--- /dev/null
+++ b/io/source/stm/factreg.cxx
@@ -0,0 +1,229 @@
+/*************************************************************************
+ *
+ *  $RCSfile: factreg.cxx,v $
+ *
+ *  $Revision: 1.1.1.1 $
+ *
+ *  last change: $Author: hr $ $Date: 2000-09-18 17:24:18 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library 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
+ *  Lesser General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (the "License"); You may not use this file
+ *  except in compliance with the License. You may obtain a copy of the
+ *  License at http://www.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+
+#include <osl/diagnose.h>
+#include <cppuhelper/factory.hxx>
+
+#include <com/sun/star/registry/XRegistryKey.hpp>
+
+using namespace ::rtl;
+using namespace ::cppu;
+using namespace ::com::sun::star::uno;
+using namespace ::com::sun::star::lang;
+using namespace ::com::sun::star::registry;
+
+#include "factreg.hxx"
+
+using namespace io_stm;
+
+extern "C"
+{
+
+
+void SAL_CALL component_getImplementationEnvironment(
+    const sal_Char ** ppEnvTypeName, uno_Environment ** ppEnv )
+{
+    *ppEnvTypeName = CPPU_CURRENT_LANGUAGE_BINDING_NAME;
+}
+
+
+sal_Bool SAL_CALL component_writeInfo(
+    void * pServiceManager, void * pRegistryKey )
+{
+    if (pRegistryKey)
+    {
+        try
+        {
+            Reference< XRegistryKey > xKey(
+                reinterpret_cast< XRegistryKey * >( pRegistryKey ) );
+
+            OUString str = OUString::createFromAscii( "/" );
+            str += OPipeImpl_getImplementationName();
+            str += OUString::createFromAscii( "/UNO/SERVICES" );
+            Reference< XRegistryKey >  xNewKey = xKey->createKey( str );
+            xNewKey->createKey( OPipeImpl_getServiceName() );
+
+            str = OUString::createFromAscii( "/" );
+            str += ODataInputStream_getImplementationName();
+            str += OUString::createFromAscii( "/UNO/SERVICES" );
+            xNewKey = xKey->createKey( str );
+            xNewKey->createKey( ODataInputStream_getServiceName() );
+
+            str = OUString::createFromAscii( "/" );
+            str += ODataOutputStream_getImplementationName();
+            str += OUString::createFromAscii( "/UNO/SERVICES" );
+            xNewKey = xKey->createKey( str );
+            xNewKey->createKey( ODataOutputStream_getServiceName() );
+
+            str = OUString::createFromAscii( "/" );
+            str += OMarkableOutputStream_getImplementationName();
+            str += OUString::createFromAscii( "/UNO/SERVICES" );
+            xNewKey = xKey->createKey( str );
+            xNewKey->createKey( OMarkableOutputStream_getServiceName() );
+
+            str = OUString::createFromAscii( "/" );
+            str += OMarkableInputStream_getImplementationName();
+            str += OUString::createFromAscii( "/UNO/SERVICES" );
+            xNewKey = xKey->createKey( str );
+            xNewKey->createKey( OMarkableInputStream_getServiceName() );
+
+            str = OUString::createFromAscii( "/" );
+            str += OObjectInputStream_getImplementationName();
+            str += OUString::createFromAscii( "/UNO/SERVICES" );
+            xNewKey = xKey->createKey( str );
+            xNewKey->createKey( OObjectInputStream_getServiceName() );
+
+            str = OUString::createFromAscii( "/" );
+            str += OObjectOutputStream_getImplementationName();
+            str += OUString::createFromAscii( "/UNO/SERVICES" );
+            xNewKey = xKey->createKey( str );
+            xNewKey->createKey( OObjectOutputStream_getServiceName() );
+
+            str = OUString::createFromAscii( "/" );
+            str += OPumpImpl_getImplementationName();
+            str += OUString::createFromAscii( "/UNO/SERVICES" );
+            xNewKey = xKey->createKey( str );
+            xNewKey->createKey( OPumpImpl_getServiceName() );
+
+            return sal_True;
+        }
+        catch (InvalidRegistryException &)
+        {
+            OSL_ENSHURE( sal_False, "### InvalidRegistryException!" );
+        }
+    }
+    return sal_False;
+}
+
+
+//               createSingleFactory(
+//              reinterpret_cast< XMultiServiceFactory * >( pServiceManager ),
+//              OUString::createFromAscii( pImplName ),
+//              acceptor_CreateInstance, acceptor_getSupportedServiceNames() ) );
+
+void * SAL_CALL component_getFactory(
+    const sal_Char * pImplName, void * pServiceManager, void * pRegistryKey )
+{
+    void * pRet = 0;
+
+    if (pServiceManager )
+    {
+        Reference< XSingleServiceFactory > xRet;
+        Reference< XMultiServiceFactory > xSMgr =
+            reinterpret_cast< XMultiServiceFactory * > ( pServiceManager );
+
+        OUString aImplementationName = OUString::createFromAscii( pImplName );
+
+        if (aImplementationName == OPipeImpl_getImplementationName() )
+        {
+            xRet = createSingleFactory( xSMgr, aImplementationName,
+                                        OPipeImpl_CreateInstance,
+                                        OPipeImpl_getSupportedServiceNames() );
+        }
+        else if( aImplementationName == ODataInputStream_getImplementationName() ) {
+            xRet = createSingleFactory( xSMgr , aImplementationName,
+                                        ODataInputStream_CreateInstance,
+                                        ODataInputStream_getSupportedServiceNames() );
+        }
+        else if( aImplementationName == ODataOutputStream_getImplementationName() ) {
+            xRet = createSingleFactory( xSMgr , aImplementationName,
+                                    ODataOutputStream_CreateInstance,
+                                        ODataOutputStream_getSupportedServiceNames() );
+        }
+        else if( aImplementationName == OMarkableOutputStream_getImplementationName() ) {
+            xRet = createSingleFactory( xSMgr , aImplementationName,
+                                    OMarkableOutputStream_CreateInstance,
+                                        OMarkableOutputStream_getSupportedServiceNames() );
+        }
+        else if( aImplementationName == OMarkableInputStream_getImplementationName() ) {
+            xRet = createSingleFactory( xSMgr , aImplementationName,
+                                        OMarkableInputStream_CreateInstance,
+                                        OMarkableInputStream_getSupportedServiceNames() );
+        }
+        else if( aImplementationName == OObjectInputStream_getImplementationName() ) {
+            xRet = createSingleFactory( xSMgr , aImplementationName,
+                                        OObjectInputStream_CreateInstance,
+                                        OObjectInputStream_getSupportedServiceNames() );
+        }
+        else if( aImplementationName == OObjectOutputStream_getImplementationName() ) {
+            xRet = createSingleFactory( xSMgr , aImplementationName,
+                                        OObjectOutputStream_CreateInstance,
+                                        OObjectOutputStream_getSupportedServiceNames() );
+        }
+        else if( aImplementationName == OPumpImpl_getImplementationName() ) {
+            xRet = createSingleFactory( xSMgr , aImplementationName,
+                                        OPumpImpl_CreateInstance,
+                                        OPumpImpl_getSupportedServiceNames() );
+        }
+
+        if (xRet.is())
+        {
+            xRet->acquire();
+            pRet = xRet.get();
+        }
+    }
+
+    return pRet;
+}
+
+
+
+}
diff --git a/io/source/stm/factreg.hxx b/io/source/stm/factreg.hxx
new file mode 100644
index 000000000000..bfced90b53fb
--- /dev/null
+++ b/io/source/stm/factreg.hxx
@@ -0,0 +1,105 @@
+/*************************************************************************
+ *
+ *  $RCSfile: factreg.hxx,v $
+ *
+ *  $Revision: 1.1.1.1 $
+ *
+ *  last change: $Author: hr $ $Date: 2000-09-18 17:24:18 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library 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
+ *  Lesser General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (the "License"); You may not use this file
+ *  except in compliance with the License. You may obtain a copy of the
+ *  License at http://www.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+
+namespace io_stm {
+
+// OPipeImpl
+Reference< XInterface > SAL_CALL OPipeImpl_CreateInstance( const Reference< XMultiServiceFactory > & rSMgr ) throw (Exception);
+OUString OPipeImpl_getServiceName();
+OUString    OPipeImpl_getImplementationName();
+Sequence<OUString> OPipeImpl_getSupportedServiceNames(void);
+
+Reference< XInterface > SAL_CALL ODataInputStream_CreateInstance( const Reference< XMultiServiceFactory > & rSMgr ) throw (Exception);
+OUString ODataInputStream_getServiceName();
+OUString    ODataInputStream_getImplementationName();
+Sequence<OUString> ODataInputStream_getSupportedServiceNames(void);
+
+Reference< XInterface > SAL_CALL ODataOutputStream_CreateInstance( const Reference< XMultiServiceFactory > & rSMgr ) throw (Exception);
+OUString ODataOutputStream_getServiceName();
+OUString ODataOutputStream_getImplementationName();
+Sequence<OUString> ODataOutputStream_getSupportedServiceNames(void);
+
+Reference< XInterface > SAL_CALL OMarkableOutputStream_CreateInstance( const Reference< XMultiServiceFactory > & rSMgr ) throw (Exception);
+OUString OMarkableOutputStream_getServiceName();
+OUString OMarkableOutputStream_getImplementationName();
+Sequence<OUString> OMarkableOutputStream_getSupportedServiceNames(void);
+
+Reference< XInterface > SAL_CALL OMarkableInputStream_CreateInstance( const Reference< XMultiServiceFactory > & rSMgr ) throw (Exception);
+OUString OMarkableInputStream_getServiceName();
+OUString    OMarkableInputStream_getImplementationName() ;
+Sequence<OUString> OMarkableInputStream_getSupportedServiceNames(void);
+
+Reference< XInterface > SAL_CALL OObjectOutputStream_CreateInstance( const Reference< XMultiServiceFactory > & rSMgr ) throw(Exception);
+OUString OObjectOutputStream_getServiceName();
+OUString OObjectOutputStream_getImplementationName();
+Sequence<OUString> OObjectOutputStream_getSupportedServiceNames(void);
+
+Reference< XInterface > SAL_CALL OObjectInputStream_CreateInstance( const Reference< XMultiServiceFactory > & rSMgr ) throw(Exception);
+OUString OObjectInputStream_getServiceName();
+OUString    OObjectInputStream_getImplementationName() ;
+Sequence<OUString> OObjectInputStream_getSupportedServiceNames(void);
+
+Reference< XInterface > SAL_CALL OPumpImpl_CreateInstance( const Reference< XMultiServiceFactory > & rSMgr ) throw (Exception);
+OUString OPumpImpl_getServiceName();
+OUString OPumpImpl_getImplementationName();
+Sequence<OUString> OPumpImpl_getSupportedServiceNames(void);
+
+}
diff --git a/io/source/stm/makefile.mk b/io/source/stm/makefile.mk
new file mode 100644
index 000000000000..d93a835998be
--- /dev/null
+++ b/io/source/stm/makefile.mk
@@ -0,0 +1,103 @@
+#*************************************************************************
+#
+#   $RCSfile: makefile.mk,v $
+#
+#   $Revision: 1.1.1.1 $
+#
+#   last change: $Author: hr $ $Date: 2000-09-18 17:24:18 $
+#
+#   The Contents of this file are made available subject to the terms of
+#   either of the following licenses
+#
+#          - GNU Lesser General Public License Version 2.1
+#          - Sun Industry Standards Source License Version 1.1
+#
+#   Sun Microsystems Inc., October, 2000
+#
+#   GNU Lesser General Public License Version 2.1
+#   =============================================
+#   Copyright 2000 by Sun Microsystems, Inc.
+#   901 San Antonio Road, Palo Alto, CA 94303, USA
+#
+#   This library is free software; you can redistribute it and/or
+#   modify it under the terms of the GNU Lesser General Public
+#   License version 2.1, as published by the Free Software Foundation.
+#
+#   This library 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
+#   Lesser General Public License for more details.
+#
+#   You should have received a copy of the GNU Lesser General Public
+#   License along with this library; if not, write to the Free Software
+#   Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+#   MA  02111-1307  USA
+#
+#
+#   Sun Industry Standards Source License Version 1.1
+#   =================================================
+#   The contents of this file are subject to the Sun Industry Standards
+#   Source License Version 1.1 (the "License"); You may not use this file
+#   except in compliance with the License. You may obtain a copy of the
+#   License at http://www.openoffice.org/license.html.
+#
+#   Software provided under this License is provided on an "AS IS" basis,
+#   WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+#   WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+#   MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+#   See the License for the specific provisions governing your rights and
+#   obligations concerning the Software.
+#
+#   The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+#
+#   Copyright: 2000 by Sun Microsystems, Inc.
+#
+#   All Rights Reserved.
+#
+#   Contributor(s): _______________________________________
+#
+#
+#
+#*************************************************************************
+PRJ=..$/..
+
+PRJNAME=io
+TARGET=stm
+ENABLE_EXCEPTIONS=TRUE
+NO_BSYMBOLIC=TRUE
+COMP1TYPELIST=$(TARGET)
+COMPRDB=$(SOLARBINDIR)$/applicat.rdb
+
+# --- Settings -----------------------------------------------------
+.INCLUDE :  svpre.mk
+.INCLUDE :  settings.mk
+.INCLUDE :  sv.mk
+# --- Files --------------------------------------------------------
+SLOFILES = 	$(SLO)$/opipe.obj\
+        $(SLO)$/factreg.obj\
+        $(SLO)$/omark.obj\
+        $(SLO)$/odata.obj \
+        $(SLO)$/streamhelper.obj \
+        $(SLO)$/opump.obj \
+               $(SLO)$/$(COMP1TYPELIST)_description.obj
+
+SHL1TARGET= $(TARGET)
+
+SHL1STDLIBS= \
+        $(SALLIB) 	 \
+        $(CPPULIB)	 \
+        $(CPPUHELPERLIB) 
+
+
+SHL1DEPN=
+SHL1IMPLIB=		i$(TARGET)
+SHL1LIBS=		$(SLB)$/$(TARGET).lib
+SHL1DEF=		$(MISC)$/$(SHL1TARGET).def
+
+DEF1NAME=		$(SHL1TARGET)
+DEF1EXPORTFILE=	exports.dxp
+
+
+# --- Targets ------------------------------------------------------
+.INCLUDE :	target.mk
+
diff --git a/io/source/stm/odata.cxx b/io/source/stm/odata.cxx
new file mode 100644
index 000000000000..834ea08f12c7
--- /dev/null
+++ b/io/source/stm/odata.cxx
@@ -0,0 +1,1710 @@
+/*************************************************************************
+ *
+ *  $RCSfile: odata.cxx,v $
+ *
+ *  $Revision: 1.1.1.1 $
+ *
+ *  last change: $Author: hr $ $Date: 2000-09-18 17:24:18 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library 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
+ *  Lesser General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (the "License"); You may not use this file
+ *  except in compliance with the License. You may obtain a copy of the
+ *  License at http://www.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+
+
+// streams
+#include <hash_map>
+#include <vector>
+
+#include <com/sun/star/io/XObjectInputStream.hpp>
+#include <com/sun/star/io/XObjectOutputStream.hpp>
+#include <com/sun/star/io/XActiveDataSource.hpp>
+#include <com/sun/star/io/XActiveDataSink.hpp>
+#include <com/sun/star/io/XMarkableStream.hpp>
+#include <com/sun/star/io/XConnectable.hpp>
+#include <com/sun/star/io/UnexpectedEOFException.hpp>
+#include <com/sun/star/io/WrongFormatException.hpp>
+#include <com/sun/star/lang/XServiceInfo.hpp>
+
+#include <cppuhelper/weak.hxx>      // OWeakObject
+#include <cppuhelper/factory.hxx>
+#include <cppuhelper/implbase4.hxx>
+#include <cppuhelper/typeprovider.hxx>
+#include <cppuhelper/queryinterface.hxx>
+
+#include <osl/mutex.hxx>
+
+#include <assert.h>
+#include <string.h>
+
+
+using namespace ::cppu;
+using namespace ::osl;
+using namespace ::std;
+using namespace ::rtl;
+using namespace ::com::sun::star::io;
+using namespace ::com::sun::star::uno;
+using namespace ::com::sun::star::lang;
+
+#include "factreg.hxx"
+
+namespace io_stm {
+
+class ODataInputStream :
+    public WeakImplHelper4 <
+                              XDataInputStream,
+                              XActiveDataSink,
+                              XConnectable,
+                              XServiceInfo
+                           >
+{
+public:
+    ODataInputStream( const Reference< XMultiServiceFactory > &r  ) :
+        m_bValidStream( sal_False ),
+        m_rFactory( r )
+        {}
+
+public: // XInputStream
+    virtual sal_Int32 SAL_CALL readBytes(Sequence< sal_Int8 >& aData, sal_Int32 nBytesToRead)
+                                                            throw ( NotConnectedException,
+                                                                        BufferSizeExceededException,
+                                                                        RuntimeException);
+    virtual sal_Int32 SAL_CALL readSomeBytes(Sequence< sal_Int8 >& aData, sal_Int32 nMaxBytesToRead)
+                                                            throw ( NotConnectedException,
+                                                                        BufferSizeExceededException,
+                                                                        RuntimeException);
+    virtual void SAL_CALL skipBytes(sal_Int32 nBytesToSkip)                 throw ( NotConnectedException,
+                                                                        BufferSizeExceededException,
+                                                                        RuntimeException);
+    virtual sal_Int32 SAL_CALL available(void)                          throw ( NotConnectedException,
+                                                                        RuntimeException);
+    virtual void SAL_CALL closeInput(void)                          throw ( NotConnectedException,
+                                                                        RuntimeException);
+
+public: // XDataInputStream
+    virtual sal_Int8 SAL_CALL readBoolean(void) throw (IOException, RuntimeException);
+    virtual sal_Int8 SAL_CALL readByte(void) throw (IOException, RuntimeException);
+    virtual sal_Unicode SAL_CALL readChar(void) throw (IOException, RuntimeException);
+    virtual sal_Int16 SAL_CALL readShort(void) throw (IOException, RuntimeException);
+    virtual sal_Int32 SAL_CALL readLong(void) throw (IOException, RuntimeException);
+    virtual sal_Int64 SAL_CALL readHyper(void) throw (IOException, RuntimeException);
+    virtual float SAL_CALL readFloat(void) throw (IOException, RuntimeException);
+    virtual double SAL_CALL readDouble(void) throw (IOException, RuntimeException);
+    virtual OUString SAL_CALL readUTF(void) throw (IOException, RuntimeException);
+
+
+
+public: // XActiveDataSink
+    virtual void SAL_CALL setInputStream(const Reference< XInputStream > & aStream)
+        throw (RuntimeException);
+    virtual Reference< XInputStream > SAL_CALL getInputStream(void) throw (RuntimeException);
+
+public: // XConnectable
+    virtual void SAL_CALL setPredecessor(const Reference < XConnectable >& aPredecessor) throw (RuntimeException);
+    virtual Reference < XConnectable > SAL_CALL getPredecessor(void) throw (RuntimeException);
+    virtual void SAL_CALL setSuccessor(const Reference < XConnectable >& aSuccessor) throw (RuntimeException);
+    virtual Reference < XConnectable > SAL_CALL getSuccessor(void) throw (RuntimeException) ;
+
+
+public: // XServiceInfo
+    OUString                     SAL_CALL getImplementationName() throw ();
+    Sequence< OUString >         SAL_CALL getSupportedServiceNames(void) throw ();
+    sal_Bool                        SAL_CALL supportsService(const OUString& ServiceName) throw ();
+
+protected:
+    Reference < XMultiServiceFactory > m_rFactory;
+
+    Reference < XConnectable >  m_pred;
+    Reference < XConnectable >  m_succ;
+
+    Reference < XInputStream >  m_input;
+    sal_Bool m_bValidStream;
+};
+
+// XInputStream
+sal_Int32 ODataInputStream::readBytes(Sequence< sal_Int8 >& aData, sal_Int32 nBytesToRead)
+    throw ( NotConnectedException,
+            BufferSizeExceededException,
+            RuntimeException)
+{
+     sal_Int32 nRead;
+
+     if( m_bValidStream )
+    {
+         nRead = m_input->readBytes( aData , nBytesToRead );
+     }
+     else
+    {
+         throw NotConnectedException( );
+     }
+
+     return nRead;
+}
+
+sal_Int32 ODataInputStream::readSomeBytes(Sequence< sal_Int8 >& aData, sal_Int32 nMaxBytesToRead)
+    throw ( NotConnectedException,
+            BufferSizeExceededException,
+            RuntimeException)
+{
+     sal_Int32 nRead;
+     if( m_bValidStream ) {
+         nRead = m_input->readSomeBytes( aData , nMaxBytesToRead );
+     }
+     else {
+         throw NotConnectedException( );
+     }
+
+     return nRead;
+}
+void ODataInputStream::skipBytes(sal_Int32 nBytesToSkip)
+    throw ( NotConnectedException,
+            BufferSizeExceededException,
+            RuntimeException)
+{
+     if( m_bValidStream ) {
+         m_input->skipBytes( nBytesToSkip );
+     }
+     else
+    {
+         throw NotConnectedException( );
+     }
+}
+
+
+sal_Int32 ODataInputStream::available(void)
+    throw ( NotConnectedException,
+            RuntimeException)
+{
+     sal_Int32 nAvail;
+
+     if( m_bValidStream )
+    {
+         nAvail = m_input->available( );
+     }
+     else
+    {
+         throw NotConnectedException( );
+     }
+     return nAvail;
+}
+
+void ODataInputStream::closeInput(void )
+    throw ( NotConnectedException,
+            RuntimeException)
+{
+     if( m_bValidStream ) {
+         m_input->closeInput( );
+         setInputStream( Reference< XInputStream > () );
+         setPredecessor( Reference < XConnectable >() );
+         setSuccessor( Reference < XConnectable >() );
+         m_bValidStream = sal_False;
+     }
+     else
+    {
+         throw NotConnectedException( );
+     }
+}
+
+
+
+
+//== XDataInputStream ===========================================
+
+// XDataInputStream
+sal_Int8 ODataInputStream::readBoolean(void) throw (IOException, RuntimeException)
+{
+    return readByte();
+}
+
+sal_Int8 ODataInputStream::readByte(void)    throw (IOException, RuntimeException)
+{
+    Sequence<sal_Int8> aTmp(1);
+    if( 1 != readBytes( aTmp, 1 ) )
+    {
+        throw UnexpectedEOFException();
+    }
+    return aTmp.getArray()[0];
+}
+
+sal_Unicode ODataInputStream::readChar(void) throw (IOException, RuntimeException)
+{
+    Sequence<sal_Int8> aTmp(2);
+    if( 2 != readBytes( aTmp, 2 ) )
+    {
+        throw UnexpectedEOFException();
+    }
+
+    const sal_uInt8 * pBytes = ( const sal_uInt8 * )aTmp.getConstArray();
+    return ((sal_Unicode)pBytes[0] << 8) + pBytes[1];
+}
+
+sal_Int16 ODataInputStream::readShort(void) throw (IOException, RuntimeException)
+{
+    Sequence<sal_Int8> aTmp(2);
+    if( 2 != readBytes( aTmp, 2 ) )
+    {
+        throw UnexpectedEOFException();
+    }
+
+    const sal_uInt8 * pBytes = ( const sal_uInt8 * ) aTmp.getConstArray();
+    return ((sal_Int16)pBytes[0] << 8) + pBytes[1];
+}
+
+
+sal_Int32 ODataInputStream::readLong(void) throw (IOException, RuntimeException)
+{
+    Sequence<sal_Int8> aTmp(4);
+    if( 4 != readBytes( aTmp, 4 ) )
+    {
+        throw UnexpectedEOFException( );
+    }
+
+    const sal_uInt8 * pBytes = ( const sal_uInt8 * ) aTmp.getConstArray();
+    return ((sal_Int32)pBytes[0] << 24) + ((sal_Int32)pBytes[1] << 16) + ((sal_Int32)pBytes[2] << 8) + pBytes[3];
+}
+
+
+sal_Int64 ODataInputStream::readHyper(void) throw (IOException, RuntimeException)
+{
+    throw WrongFormatException( );
+    return 0;
+}
+
+float ODataInputStream::readFloat(void) throw (IOException, RuntimeException)
+{
+    union { float f; sal_uInt32 n; } a;
+    a.n = readLong();
+    return a.f;
+}
+
+double ODataInputStream::readDouble(void) throw (IOException, RuntimeException)
+{
+    sal_uInt32 n = 1;
+    union { double d; struct { sal_uInt32 n1; sal_uInt32 n2; } ad; } a;
+    if( *(sal_uInt8 *)&n == 1 )
+    {
+        // little endian
+        a.ad.n2 = readLong();
+        a.ad.n1 = readLong();
+    }
+    else
+    {
+        // big endian
+        a.ad.n1 = readLong();
+        a.ad.n2 = readLong();
+    }
+    return a.d;
+}
+
+OUString ODataInputStream::readUTF(void) throw (IOException, RuntimeException)
+{
+    sal_uInt16              nShortLen = (sal_uInt16)readShort();
+    sal_Int32               nUTFLen;
+
+    if( ((sal_uInt16)0xffff) == nShortLen )
+    {
+        // is interpreted as a sign, that string is longer than 64k
+        // incompatible to older XDataInputStream-routines, when strings are exactly 64k
+        nUTFLen = readLong();
+    }
+    else
+    {
+        nUTFLen = ( sal_Int32 ) nShortLen;
+    }
+
+    Sequence<sal_Unicode>   aBuffer( nUTFLen );
+    sal_Unicode *           pStr = aBuffer.getArray();
+
+    sal_Int32 nCount = 0;
+    sal_Int32 nStrLen = 0;
+    while( nCount < nUTFLen )
+    {
+        sal_uInt8 c = (sal_uInt8)readByte();
+        sal_uInt8 char2, char3;
+        switch( c >> 4 )
+        {
+            case 0: case 1: case 2: case 3: case 4: case 5: case 6: case 7:
+                // 0xxxxxxx
+                nCount++;
+                pStr[nStrLen++] = c;
+                break;
+
+            case 12: case 13:
+                // 110x xxxx   10xx xxxx
+                nCount += 2;
+                if( ! ( nCount <= nUTFLen ) )
+                {
+                    throw WrongFormatException( );
+                }
+
+                char2 = (sal_uInt8)readByte();
+                if( ! ( (char2 & 0xC0) == 0x80 ) )
+                {
+                    throw WrongFormatException( );
+                }
+
+                pStr[nStrLen++] = (sal_Unicode(c & 0x1F) << 6) | (char2 & 0x3F);
+                break;
+
+            case 14:
+            // 1110 xxxx  10xx xxxx  10xx xxxx
+                nCount += 3;
+                if( !( nCount <= nUTFLen) )
+                {
+                    throw WrongFormatException( );
+                }
+
+                char2 = (sal_uInt8)readByte();
+                char3 = (sal_uInt8)readByte();
+
+                if( (((char2 & 0xC0) != 0x80) || ((char3 & 0xC0) != 0x80)) ) {
+                    throw WrongFormatException( );
+                }
+                pStr[nStrLen++] = (sal_Unicode(c & 0x0F) << 12) |
+                                (sal_Unicode(char2 & 0x3F) << 6) |
+                                (char3 & 0x3F);
+                break;
+
+            default:
+                // 10xx xxxx,  1111 xxxx
+                throw WrongFormatException();
+                //throw new UTFDataFormatException();
+        }
+    }
+    return OUString( pStr, nStrLen );
+}
+
+
+
+// XActiveDataSource
+void ODataInputStream::setInputStream(const Reference< XInputStream > & aStream)
+    throw (RuntimeException)
+{
+
+    if( m_input != aStream ) {
+        m_input = aStream;
+
+        Reference < XConnectable > pred( m_input , UNO_QUERY );
+        setPredecessor( pred );
+    }
+
+    m_bValidStream = m_input.is();
+}
+
+Reference< XInputStream > ODataInputStream::getInputStream(void) throw (RuntimeException)
+{
+    return m_input;
+}
+
+
+
+// XDataSink
+void ODataInputStream::setSuccessor( const Reference < XConnectable > &r ) throw (RuntimeException)
+{
+     /// if the references match, nothing needs to be done
+     if( m_succ != r ) {
+         /// store the reference for later use
+         m_succ = r;
+
+         if( m_succ.is() ) {
+              /// set this instance as the sink !
+              m_succ->setPredecessor( Reference< XConnectable > (
+                  SAL_STATIC_CAST( XConnectable * , this ) ) );
+         }
+     }
+}
+
+Reference < XConnectable > ODataInputStream::getSuccessor() throw (RuntimeException)
+{
+    return m_succ;
+}
+
+
+// XDataSource
+void ODataInputStream::setPredecessor( const Reference < XConnectable > &r )
+    throw (RuntimeException)
+{
+    if( r != m_pred ) {
+        m_pred = r;
+        if( m_pred.is() ) {
+            m_pred->setSuccessor( Reference< XConnectable > (
+                SAL_STATIC_CAST( XConnectable * , this ) ) );
+        }
+    }
+}
+Reference < XConnectable > ODataInputStream::getPredecessor() throw (RuntimeException)
+{
+    return m_pred;
+}
+
+// XServiceInfo
+OUString ODataInputStream::getImplementationName() throw ()
+{
+    return ODataInputStream_getImplementationName();
+}
+
+// XServiceInfo
+sal_Bool ODataInputStream::supportsService(const OUString& ServiceName) throw ()
+{
+    Sequence< OUString > aSNL = getSupportedServiceNames();
+    const OUString * pArray = aSNL.getConstArray();
+
+    for( sal_Int32 i = 0; i < aSNL.getLength(); i++ )
+        if( pArray[i] == ServiceName )
+            return sal_True;
+
+    return sal_False;
+}
+
+// XServiceInfo
+Sequence< OUString > ODataInputStream::getSupportedServiceNames(void) throw ()
+{
+    Sequence<OUString> seq(1);
+    seq.getArray()[0] = ODataInputStream_getServiceName();
+    return seq;
+}
+
+
+
+
+/***
+*
+* registration information
+*
+*
+****/
+
+Reference< XInterface > SAL_CALL ODataInputStream_CreateInstance( const Reference < XMultiServiceFactory > & rSMgr ) throw( Exception)
+{
+    ODataInputStream *p = new ODataInputStream( rSMgr );
+    return Reference< XInterface > ( (OWeakObject * ) p );
+}
+
+
+OUString ODataInputStream_getServiceName()
+{
+    return OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.io.DataInputStream" ) );
+}
+
+OUString ODataInputStream_getImplementationName()
+{
+    return OUString( RTL_CONSTASCII_USTRINGPARAM(
+        "com.sun.star.comp.io.stm.DataInputStream" ) );
+}
+
+Sequence<OUString> ODataInputStream_getSupportedServiceNames(void)
+{
+    Sequence<OUString> aRet(1);
+    aRet.getArray()[0] = ODataInputStream_getServiceName();
+
+    return aRet;
+}
+
+
+
+
+class ODataOutputStream :
+    public WeakImplHelper4 <
+             XDataOutputStream,
+             XActiveDataSource,
+             XConnectable,
+              XServiceInfo >
+{
+public:
+    ODataOutputStream( const Reference< XMultiServiceFactory >  &r) :
+        m_rFactory(r),
+        m_bValidStream( sal_False )
+        {}
+
+public: // XOutputStream
+    virtual void SAL_CALL writeBytes(const Sequence< sal_Int8 >& aData)
+        throw ( NotConnectedException,
+                BufferSizeExceededException,
+                RuntimeException);
+    virtual void SAL_CALL flush(void)
+        throw ( NotConnectedException,
+                BufferSizeExceededException,
+                RuntimeException);
+    virtual void SAL_CALL closeOutput(void)
+        throw ( NotConnectedException,
+                BufferSizeExceededException,
+                RuntimeException);
+
+public: // XDataOutputStream
+    virtual void SAL_CALL writeBoolean(sal_Bool Value) throw (IOException, RuntimeException);
+    virtual void SAL_CALL writeByte(sal_Int8 Value) throw (IOException, RuntimeException);
+    virtual void SAL_CALL writeChar(sal_Unicode Value) throw (IOException, RuntimeException);
+    virtual void SAL_CALL writeShort(sal_Int16 Value) throw (IOException, RuntimeException);
+    virtual void SAL_CALL writeLong(sal_Int32 Value) throw (IOException, RuntimeException);
+    virtual void SAL_CALL writeHyper(sal_Int64 Value) throw (IOException, RuntimeException);
+    virtual void SAL_CALL writeFloat(float Value) throw (IOException, RuntimeException);
+    virtual void SAL_CALL writeDouble(double Value) throw (IOException, RuntimeException);
+    virtual void SAL_CALL writeUTF(const OUString& Value) throw (IOException, RuntimeException);
+
+public: // XActiveDataSource
+    virtual void SAL_CALL setOutputStream(const Reference< XOutputStream > & aStream)
+        throw (RuntimeException);
+    virtual Reference < XOutputStream > SAL_CALL getOutputStream(void) throw (RuntimeException);
+
+public: // XConnectable
+    virtual void SAL_CALL setPredecessor(const Reference < XConnectable >& aPredecessor)
+        throw (RuntimeException);
+    virtual Reference < XConnectable > SAL_CALL getPredecessor(void)
+        throw (RuntimeException);
+    virtual void SAL_CALL setSuccessor(const Reference < XConnectable >& aSuccessor)
+        throw (RuntimeException);
+    virtual Reference < XConnectable > SAL_CALL getSuccessor(void)
+        throw (RuntimeException);
+
+public: // XServiceInfo
+    OUString                     SAL_CALL getImplementationName() throw ();
+    Sequence< OUString >         SAL_CALL getSupportedServiceNames(void) throw ();
+    sal_Bool                     SAL_CALL supportsService(const OUString& ServiceName) throw ();
+
+protected:
+    Reference < XMultiServiceFactory >  m_rFactory;
+    Reference < XConnectable >  m_succ;
+    Reference < XConnectable >  m_pred;
+
+Reference<  XOutputStream > m_output;
+    sal_Bool m_bValidStream;
+};
+
+
+
+// XOutputStream
+void ODataOutputStream::writeBytes(const Sequence< sal_Int8 >& aData)
+    throw ( NotConnectedException,
+            BufferSizeExceededException,
+            RuntimeException)
+{
+    if( m_bValidStream )
+    {
+        m_output->writeBytes( aData );
+    }
+    else {
+        throw NotConnectedException( );
+    }
+}
+
+void ODataOutputStream::flush(void)
+    throw ( NotConnectedException,
+            BufferSizeExceededException,
+            RuntimeException)
+{
+    if( m_bValidStream )
+    {
+        m_output->flush();
+    }
+    else
+    {
+        throw NotConnectedException();
+    }
+
+}
+
+
+void ODataOutputStream::closeOutput(void)
+    throw ( NotConnectedException,
+            BufferSizeExceededException,
+            RuntimeException)
+{
+    if( m_bValidStream )
+    {
+        m_output->closeOutput();
+        setOutputStream( Reference< XOutputStream > () );
+        setPredecessor( Reference < XConnectable >() );
+        setSuccessor( Reference < XConnectable >() );
+    }
+    else
+    {
+        throw NotConnectedException();
+    }
+}
+
+// XDataOutputStream
+void ODataOutputStream::writeBoolean(sal_Bool Value)
+    throw ( IOException,
+            RuntimeException)
+{
+    if( Value )
+    {
+        writeByte( 1 );
+    }
+    else
+    {
+        writeByte( 0 );
+    }
+}
+
+
+void ODataOutputStream::writeByte(sal_Int8 Value)
+    throw ( IOException,
+            RuntimeException)
+{
+    Sequence<sal_Int8> aTmp( 1 );
+    aTmp.getArray()[0] = Value;
+    writeBytes( aTmp );
+}
+
+void ODataOutputStream::writeChar(sal_Unicode Value)
+    throw ( IOException,
+            RuntimeException)
+{
+    Sequence<sal_Int8> aTmp( 2 );
+    sal_Int8 * pBytes = ( sal_Int8 * ) aTmp.getArray();
+    pBytes[0] = sal_Int8(Value >> 8);
+    pBytes[1] = sal_Int8(Value);
+    writeBytes( aTmp );
+}
+
+
+void ODataOutputStream::writeShort(sal_Int16 Value)
+    throw ( IOException,
+            RuntimeException)
+{
+    Sequence<sal_Int8> aTmp( 2 );
+    sal_Int8 * pBytes = aTmp.getArray();
+    pBytes[0] = sal_Int8(Value >> 8);
+    pBytes[1] = sal_Int8(Value);
+    writeBytes( aTmp );
+}
+
+void ODataOutputStream::writeLong(sal_Int32 Value)
+    throw ( IOException,
+            RuntimeException)
+{
+    Sequence<sal_Int8> aTmp( 4 );
+    sal_Int8 * pBytes = aTmp.getArray();
+    pBytes[0] = sal_Int8(Value >> 24);
+    pBytes[1] = sal_Int8(Value >> 16);
+    pBytes[2] = sal_Int8(Value >> 8);
+    pBytes[3] = sal_Int8(Value);
+    writeBytes( aTmp );
+}
+
+void ODataOutputStream::writeHyper(sal_Int64 Value)
+    throw ( IOException,
+            RuntimeException)
+{
+    throw WrongFormatException();
+}
+
+
+void ODataOutputStream::writeFloat(float Value)
+    throw ( IOException,
+            RuntimeException)
+{
+    union { float f; sal_uInt32 n; } a;
+    a.f = Value;
+    writeLong( a.n );
+}
+
+void ODataOutputStream::writeDouble(double Value)
+    throw ( IOException,
+            RuntimeException)
+{
+    sal_uInt32 n = 1;
+    union { double d; struct { sal_uInt32 n1; sal_uInt32 n2; } ad; } a;
+    a.d = Value;
+    if( *(sal_Int8 *)&n == 1 )
+    {
+        // little endian
+        writeLong( a.ad.n2 );
+        writeLong( a.ad.n1 );
+    }
+    else
+    {
+        // big endian
+        writeLong( a.ad.n1 );
+        writeLong( a.ad.n2 );
+    }
+}
+
+void ODataOutputStream::writeUTF(const OUString& Value)
+    throw ( IOException,
+            RuntimeException)
+{
+    sal_Int32 nStrLen = Value.len();
+    const sal_Unicode * pStr = Value.getStr();
+    sal_Int32 nUTFLen = 0;
+
+    for( sal_Int32 i = 0 ; i < nStrLen ; i++ )
+    {
+        sal_uInt16 c = pStr[i];
+        if( (c >= 0x0001) && (c <= 0x007F) )
+        {
+            nUTFLen++;
+        }
+        else if( c > 0x07FF )
+        {
+            nUTFLen += 3;
+        }
+        else
+        {
+            nUTFLen += 2;
+        }
+    }
+
+
+    // compatibility mode for older implementations, where it was not possible
+    // to write blocks bigger than 64 k. Note that there is a tradeoff. Blocks,
+    // that are exactly 64k long can not be read by older routines when written
+    // with these routines and the other way round !!!!!
+    if( nUTFLen >= 0xFFFF ) {
+        writeShort( (sal_Int16)-1 );
+        writeLong( nUTFLen );
+    }
+    else {
+        writeShort( ((sal_uInt16)nUTFLen) );
+    }
+    for( i = 0 ; i < nStrLen ; i++ )
+    {
+        sal_uInt16 c = pStr[i];
+        if( (c >= 0x0001) && (c <= 0x007F) )
+        {
+            writeByte(sal_Int8(c));
+        }
+        else if( c > 0x07FF )
+        {
+            writeByte(sal_Int8(0xE0 | ((c >> 12) & 0x0F)));
+            writeByte(sal_Int8(0x80 | ((c >>  6) & 0x3F)));
+            writeByte(sal_Int8(0x80 | ((c >>  0) & 0x3F)));
+            //written += 2;
+        }
+        else
+        {
+            writeByte(sal_Int8(0xC0 | ((c >>  6) & 0x1F)));
+            writeByte(sal_Int8(0x80 | ((c >>  0) & 0x3F)));
+            //written += 1;
+        }
+    }
+    //written += strlen + 2;
+}
+
+// XActiveDataSource
+void ODataOutputStream::setOutputStream(const Reference< XOutputStream > & aStream)
+    throw (RuntimeException)
+{
+    if( m_output != aStream ) {
+        m_output = aStream;
+        m_bValidStream = m_output.is();
+
+        Reference < XConnectable > succ( m_output , UNO_QUERY );
+        setSuccessor( succ );
+    }
+}
+
+Reference< XOutputStream > ODataOutputStream::getOutputStream(void)
+    throw (RuntimeException)
+{
+    return m_output;
+}
+
+
+
+
+// XDataSink
+void ODataOutputStream::setSuccessor( const Reference < XConnectable > &r )
+    throw (RuntimeException)
+{
+     /// if the references match, nothing needs to be done
+     if( m_succ != r )
+     {
+         /// store the reference for later use
+         m_succ = r;
+
+         if( m_succ.is() )
+         {
+              /// set this instance as the sink !
+              m_succ->setPredecessor( Reference < XConnectable > (
+                  SAL_STATIC_CAST( XConnectable * , this  ) ));
+         }
+     }
+}
+Reference < XConnectable > ODataOutputStream::getSuccessor()    throw (RuntimeException)
+{
+    return m_succ;
+}
+
+
+// XDataSource
+void ODataOutputStream::setPredecessor( const Reference < XConnectable > &r )   throw (RuntimeException)
+{
+    if( r != m_pred ) {
+        m_pred = r;
+        if( m_pred.is() ) {
+            m_pred->setSuccessor( Reference< XConnectable > (
+                SAL_STATIC_CAST( XConnectable * , this  ) ));
+        }
+    }
+}
+Reference < XConnectable > ODataOutputStream::getPredecessor()  throw (RuntimeException)
+{
+    return m_pred;
+}
+
+
+
+// XServiceInfo
+OUString ODataOutputStream::getImplementationName() throw ()
+{
+    return ODataOutputStream_getImplementationName();
+}
+
+// XServiceInfo
+sal_Bool ODataOutputStream::supportsService(const OUString& ServiceName) throw ()
+{
+    Sequence< OUString > aSNL = getSupportedServiceNames();
+    const OUString * pArray = aSNL.getConstArray();
+
+    for( sal_Int32 i = 0; i < aSNL.getLength(); i++ )
+        if( pArray[i] == ServiceName )
+            return sal_True;
+
+    return sal_False;
+}
+
+// XServiceInfo
+Sequence< OUString > ODataOutputStream::getSupportedServiceNames(void) throw ()
+{
+
+    Sequence<OUString> seq(1);
+    seq.getArray()[0] = ODataOutputStream_getServiceName();
+    return seq;
+}
+
+
+
+
+Reference< XInterface > SAL_CALL ODataOutputStream_CreateInstance( const Reference < XMultiServiceFactory > & rSMgr ) throw(Exception)
+{
+    ODataOutputStream *p = new ODataOutputStream( rSMgr );
+    Reference< XInterface > xService = *p;
+    return xService;
+}
+
+OUString ODataOutputStream_getServiceName()
+{
+    return OUString::createFromAscii( "com.sun.star.io.DataOutputStream" );
+}
+
+OUString ODataOutputStream_getImplementationName()
+{
+    return OUString::createFromAscii( "com.sun.star.comp.io.stm.DataOutputStream" );
+}
+
+Sequence<OUString> ODataOutputStream_getSupportedServiceNames(void)
+{
+    Sequence<OUString> aRet(1);
+    aRet.getArray()[0] = ODataOutputStream_getServiceName();
+
+    return aRet;
+}
+
+//--------------------------------------
+struct equalObjectContainer_Impl
+{
+    sal_Int32 operator()(const Reference< XInterface > & s1,
+                         const Reference< XInterface > & s2) const
+      {
+        return s1 == s2;
+    }
+};
+
+//-----------------------------------------------------------------------------
+struct hashObjectContainer_Impl
+{
+    size_t operator()(const Reference< XInterface > & xRef) const
+    {
+        return (size_t)xRef.get();
+    }
+};
+
+typedef hash_map
+<
+    Reference< XInterface >,
+    sal_Int32,
+    hashObjectContainer_Impl,
+    equalObjectContainer_Impl
+> ObjectContainer_Impl;
+
+//------------------------------
+//------------------------------
+//------------------------------
+//  struct equalXPersistObjectRef_Impl
+//  {
+//      sal_Int32 operator()(const Reference< XPersistObject > & s1, c
+//                           const Reference< XPersistObject > & s2) const
+//      {
+//          return s1 == s2;
+//      }
+//  };
+
+//  //-----------------------------------------------------------------------------
+//  struct hashXPersistObjectRef_Impl
+//  {
+//      size_t operator()(const Reference< XPersistObject > & xRef) const
+//      {
+//          return (size_t)(XInterface *)xRef;
+//      }
+//  };
+
+
+//  typedef NAMESPACE_STD(hash_map)
+//  <
+//      XPersistObjectRef,
+//      sal_Int32,
+//      hashXPersistObjectRef_Impl,
+//      equalXPersistObjectRef_Impl
+//  > XPersistObjectRefHashMap_Impl;
+
+/**
+ */
+/*---------------------------------------------
+*
+*
+*
+*
+*--------------------------------------------*/
+class OObjectOutputStream :
+            public ODataOutputStream,
+            public XObjectOutputStream,
+            public XMarkableStream
+{
+public:
+    OObjectOutputStream( const Reference < XMultiServiceFactory > &r ) :
+                        ODataOutputStream(r) , m_nMaxId(0) , m_bValidMarkable(sal_False) {}
+
+public:
+    Any     SAL_CALL queryInterface( const Type &type );
+    void    SAL_CALL acquire()                       { ODataOutputStream::acquire(); }
+    void    SAL_CALL release()                       { ODataOutputStream::release(); }
+
+public:
+    // XOutputStream
+    virtual void SAL_CALL writeBytes(const Sequence< sal_Int8 >& aData)
+        throw ( NotConnectedException,
+                BufferSizeExceededException,
+                RuntimeException)
+        { ODataOutputStream::writeBytes( aData ); }
+
+    virtual void SAL_CALL flush(void)
+        throw ( NotConnectedException,
+                BufferSizeExceededException,
+                RuntimeException)
+        { ODataOutputStream::flush(); }
+
+    virtual void SAL_CALL closeOutput(void)
+        throw ( NotConnectedException,
+                BufferSizeExceededException,
+                RuntimeException)
+        { ODataOutputStream::closeOutput(); }
+
+public:
+    // XDataOutputStream
+    virtual void SAL_CALL writeBoolean(sal_Bool Value) throw (IOException, RuntimeException)
+                { ODataOutputStream::writeBoolean( Value ); }
+    virtual void SAL_CALL writeByte(sal_Int8 Value) throw (IOException, RuntimeException)
+                { ODataOutputStream::writeByte( Value ); }
+    virtual void SAL_CALL writeChar(sal_Unicode Value) throw (IOException, RuntimeException)
+                { ODataOutputStream::writeChar( Value ); }
+    virtual void SAL_CALL writeShort(sal_Int16 Value) throw (IOException, RuntimeException)
+                { ODataOutputStream::writeShort( Value ); }
+    virtual void SAL_CALL writeLong(sal_Int32 Value) throw (IOException, RuntimeException)
+                { ODataOutputStream::writeLong( Value ); }
+    virtual void SAL_CALL writeHyper(Hyper Value) throw (IOException, RuntimeException)
+                { ODataOutputStream::writeHyper( Value ); }
+    virtual void SAL_CALL writeFloat(float Value) throw (IOException, RuntimeException)
+                { ODataOutputStream::writeFloat( Value ); }
+    virtual void SAL_CALL writeDouble(double Value) throw (IOException, RuntimeException)
+                { ODataOutputStream::writeDouble( Value ); }
+    virtual void SAL_CALL writeUTF(const OUString& Value) throw (IOException, RuntimeException)
+                { ODataOutputStream::writeUTF( Value );}
+
+    // XObjectOutputStream
+    virtual void SAL_CALL writeObject( const Reference< XPersistObject > & r );
+
+public: // XMarkableStream
+    virtual sal_Int32 SAL_CALL createMark(void)                 throw (IOException, RuntimeException);
+    virtual void SAL_CALL deleteMark(sal_Int32 Mark)            throw (IOException, IllegalArgumentException, RuntimeException);
+    virtual void SAL_CALL jumpToMark(sal_Int32 nMark)       throw (IOException, IllegalArgumentException, RuntimeException);
+    virtual void SAL_CALL jumpToFurthest(void)          throw (IOException, RuntimeException);
+    virtual sal_Int32 SAL_CALL offsetToMark(sal_Int32 nMark)
+        throw (IOException, IllegalArgumentException, RuntimeException);
+
+public: //XTypeProvider
+    virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type > SAL_CALL
+            getTypes(  ) throw(::com::sun::star::uno::RuntimeException);
+    virtual ::com::sun::star::uno::Sequence< sal_Int8 > SAL_CALL
+            getImplementationId(  ) throw(::com::sun::star::uno::RuntimeException);
+
+public: // XServiceInfo
+    OUString                   SAL_CALL   getImplementationName() throw ();
+    Sequence< OUString >       SAL_CALL   getSupportedServiceNames(void) throw ();
+    sal_Bool                   SAL_CALL   supportsService(const OUString& ServiceName) throw ();
+
+private:
+    void connectToMarkable();
+private:
+    ObjectContainer_Impl                m_mapObject;
+    sal_Int32                           m_nMaxId;
+    Reference< XMarkableStream >        m_rMarkable;
+    sal_Bool                            m_bValidMarkable;
+};
+
+
+Any OObjectOutputStream::queryInterface( const Type &aType )
+{
+    Any a = ::cppu::queryInterface(
+        aType ,
+        SAL_STATIC_CAST( XMarkableStream * , this ),
+        SAL_STATIC_CAST( XObjectOutputStream * , this ) );
+    if( a.hasValue() )
+    {
+        return a;
+    }
+
+    return ODataOutputStream::queryInterface( aType );
+
+}
+void OObjectOutputStream::writeObject( const Reference< XPersistObject > & xPObj )
+{
+
+    connectToMarkable();
+    sal_Bool bWriteObj = sal_False;
+    // create Mark to write length of info
+    sal_uInt32 nInfoLenMark = m_rMarkable->createMark();
+
+    // length of the info data (is later rewritten)
+    OObjectOutputStream::writeShort( 0 );
+
+    // write the object identifier
+    if( xPObj.is() )
+    {
+        Reference< XInterface > rX( xPObj , UNO_QUERY );
+
+        ObjectContainer_Impl::const_iterator aIt
+            = m_mapObject.find( rX );
+        if( aIt == m_mapObject.end() )
+        {
+            // insert new object in hash table
+            m_mapObject[ rX ] = ++m_nMaxId;
+            ODataOutputStream::writeLong( m_nMaxId );
+            ODataOutputStream::writeUTF( xPObj->getServiceName() );
+            bWriteObj = sal_True;
+        }
+        else
+        {
+            ODataOutputStream::writeLong( (*aIt).second );
+            OUString aName;
+            ODataOutputStream::writeUTF( aName );
+        }
+    }
+    else
+    {
+        ODataOutputStream::writeLong( 0 );
+        OUString aName;
+        ODataOutputStream::writeUTF( aName );
+    }
+
+    sal_uInt32 nObjLenMark = m_rMarkable->createMark();
+    ODataOutputStream::writeLong( 0 );
+
+    sal_Int32 nInfoLen = m_rMarkable->offsetToMark( nInfoLenMark );
+    m_rMarkable->jumpToMark( nInfoLenMark );
+    // write length of the info data
+    ODataOutputStream::writeShort( (sal_Int16)nInfoLen );
+    // jump to the end of the stream
+    m_rMarkable->jumpToFurthest();
+
+    if( bWriteObj )
+        xPObj->write( Reference< XObjectOutputStream > (
+            SAL_STATIC_CAST( XObjectOutputStream * , this ) ) );
+
+    sal_Int32 nObjLen = m_rMarkable->offsetToMark( nObjLenMark ) -4;
+    m_rMarkable->jumpToMark( nObjLenMark );
+    // write length of the info data
+    ODataOutputStream::writeLong( nObjLen );
+    // jump to the end of the stream
+    m_rMarkable->jumpToFurthest();
+
+    m_rMarkable->deleteMark( nObjLenMark );
+    m_rMarkable->deleteMark( nInfoLenMark );
+}
+
+
+
+void OObjectOutputStream::connectToMarkable(void)
+{
+    if( ! m_bValidMarkable ) {
+        if( ! m_bValidStream )
+        {
+            throw NotConnectedException();
+        }
+
+        // find the markable stream !
+        Reference< XInterface > rTry = m_output;
+        while( sal_True ) {
+            if( ! rTry.is() )
+            {
+                throw NotConnectedException();
+            }
+            Reference < XMarkableStream > markable( rTry , UNO_QUERY );
+            if( markable.is() )
+            {
+                m_rMarkable = markable;
+                break;
+            }
+            Reference < XActiveDataSource > source( rTry , UNO_QUERY );
+            rTry = source;
+        }
+        m_bValidMarkable = sal_True;
+    }
+}
+
+
+sal_Int32 OObjectOutputStream::createMark(void)
+    throw (IOException, RuntimeException)
+{
+    connectToMarkable();    // throws an exception, if a markable is not connected !
+
+    return m_rMarkable->createMark();
+}
+
+void OObjectOutputStream::deleteMark(sal_Int32 Mark)
+    throw (IOException, IllegalArgumentException, RuntimeException)
+{
+    if( ! m_bValidMarkable )
+    {
+        throw NotConnectedException();
+    }
+    m_rMarkable->deleteMark( Mark );
+}
+
+void OObjectOutputStream::jumpToMark(sal_Int32 nMark)
+    throw (IOException, IllegalArgumentException, RuntimeException)
+{
+    if( ! m_bValidMarkable )
+    {
+        throw NotConnectedException();
+    }
+    m_rMarkable->jumpToMark( nMark );
+}
+
+
+void OObjectOutputStream::jumpToFurthest(void)
+    throw (IOException, RuntimeException)
+{
+    connectToMarkable();
+    m_rMarkable->jumpToFurthest();
+}
+
+sal_Int32 OObjectOutputStream::offsetToMark(sal_Int32 nMark)
+    throw (IOException, IllegalArgumentException, RuntimeException)
+{
+    if( ! m_bValidMarkable )
+    {
+        throw NotConnectedException();
+    }
+    return m_rMarkable->offsetToMark( nMark );
+}
+
+
+
+
+Reference< XInterface > SAL_CALL OObjectOutputStream_CreateInstance( const Reference < XMultiServiceFactory > & rSMgr )
+    throw(Exception)
+{
+    OObjectOutputStream *p = new OObjectOutputStream( rSMgr );
+    return  Reference< XInterface > ( SAL_STATIC_CAST( OWeakObject * , p ) );
+}
+
+OUString OObjectOutputStream_getServiceName()
+{
+    return OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.io.ObjectOutputStream" ) );
+}
+
+OUString OObjectOutputStream_getImplementationName()
+{
+    return OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.comp.io.stm.ObjectOutputStream" ) );
+}
+
+Sequence<OUString> OObjectOutputStream_getSupportedServiceNames(void)
+{
+    Sequence<OUString> aRet(1);
+    aRet.getArray()[0] = OObjectOutputStream_getServiceName();
+    return aRet;
+}
+
+Sequence< Type > SAL_CALL OObjectOutputStream::getTypes(void) throw( RuntimeException )
+{
+    static OTypeCollection *pCollection = 0;
+    if( ! pCollection )
+    {
+        MutexGuard guard( Mutex::getGlobalMutex() );
+        if( ! pCollection )
+        {
+            static OTypeCollection collection(
+                getCppuType( (Reference< XMarkableStream > * ) 0 ),
+                getCppuType( (Reference< XObjectOutputStream > * ) 0 ),
+                ODataOutputStream::getTypes() );
+            pCollection = &collection;
+        }
+    }
+    return (*pCollection).getTypes();
+}
+
+Sequence< sal_Int8 > SAL_CALL OObjectOutputStream::getImplementationId(  ) throw( RuntimeException)
+{
+    static OImplementationId *pId = 0;
+    if( ! pId )
+    {
+        MutexGuard guard( Mutex::getGlobalMutex() );
+        if( ! pId )
+        {
+            static OImplementationId id( sal_False );
+            pId = &id;
+        }
+    }
+    return (*pId).getImplementationId();
+}
+
+
+// XServiceInfo
+OUString OObjectOutputStream::getImplementationName() throw ()
+{
+    return ODataInputStream_getImplementationName();
+}
+
+// XServiceInfo
+sal_Bool OObjectOutputStream::supportsService(const OUString& ServiceName) throw ()
+{
+    Sequence< OUString > aSNL = getSupportedServiceNames();
+    const OUString * pArray = aSNL.getConstArray();
+
+    for( sal_Int32 i = 0; i < aSNL.getLength(); i++ )
+        if( pArray[i] == ServiceName )
+            return sal_True;
+
+    return sal_False;
+}
+
+// XServiceInfo
+Sequence< OUString > OObjectOutputStream::getSupportedServiceNames(void) throw ()
+{
+    Sequence<OUString> seq(1);
+    seq.getArray()[0] = OObjectOutputStream_getServiceName();
+    return seq;
+}
+
+
+
+
+
+class OObjectInputStream :
+    public ODataInputStream,
+    public XObjectInputStream,
+    public XMarkableStream
+{
+public:
+    OObjectInputStream( const Reference < XMultiServiceFactory > &r) :
+        ODataInputStream(r),
+        m_bValidMarkable(sal_False)
+        {}
+public:
+    Any     SAL_CALL queryInterface( const Type &type );
+    void    SAL_CALL acquire()                       { ODataInputStream::acquire(); }
+    void    SAL_CALL release()                       { ODataInputStream::release(); }
+
+public: // XInputStream
+    virtual sal_Int32 SAL_CALL readBytes(Sequence< sal_Int8 >& aData, sal_Int32 nBytesToRead)
+        throw ( NotConnectedException,
+                BufferSizeExceededException,
+                RuntimeException)
+        { return ODataInputStream::readBytes( aData , nBytesToRead ); }
+
+    virtual sal_Int32 SAL_CALL readSomeBytes(Sequence< sal_Int8 >& aData, sal_Int32 nMaxBytesToRead)
+        throw ( NotConnectedException,
+                BufferSizeExceededException,
+                RuntimeException)
+        { return ODataInputStream::readSomeBytes( aData, nMaxBytesToRead ); }
+
+    virtual void SAL_CALL skipBytes(sal_Int32 nBytesToSkip)
+        throw ( NotConnectedException,
+                BufferSizeExceededException,
+                RuntimeException)
+        { ODataInputStream::skipBytes( nBytesToSkip ); }
+
+    virtual sal_Int32 SAL_CALL available(void)
+        throw ( NotConnectedException,
+                RuntimeException)
+        { return ODataInputStream::available(); }
+
+    virtual void SAL_CALL closeInput(void)
+        throw ( NotConnectedException,
+                RuntimeException)
+        { ODataInputStream::closeInput(); }
+
+public: // XDataInputStream
+    virtual sal_Int8 SAL_CALL readBoolean(void) throw (IOException, RuntimeException)
+                { return ODataInputStream::readBoolean(); }
+    virtual sal_Int8 SAL_CALL readByte(void) throw (IOException, RuntimeException)
+                { return ODataInputStream::readByte(); }
+    virtual sal_Unicode SAL_CALL readChar(void) throw (IOException, RuntimeException)
+                { return ODataInputStream::readChar(); }
+    virtual sal_Int16 SAL_CALL readShort(void) throw (IOException, RuntimeException)
+                { return ODataInputStream::readShort(); }
+    virtual sal_Int32 SAL_CALL readLong(void) throw (IOException, RuntimeException)
+                { return ODataInputStream::readLong(); }
+    virtual Hyper SAL_CALL readHyper(void) throw (IOException, RuntimeException)
+                { return ODataInputStream::readHyper(); }
+    virtual float SAL_CALL readFloat(void) throw (IOException, RuntimeException)
+                { return ODataInputStream::readFloat(); }
+    virtual double SAL_CALL readDouble(void) throw (IOException, RuntimeException)
+        { return ODataInputStream::readDouble(); }
+    virtual OUString SAL_CALL readUTF(void) throw (IOException, RuntimeException)
+                { return ODataInputStream::readUTF(); }
+
+public: // XObjectInputStream
+    virtual Reference< XPersistObject > SAL_CALL readObject( );
+
+public: // XMarkableStream
+    virtual sal_Int32 SAL_CALL createMark(void)
+        throw (IOException, RuntimeException);
+    virtual void SAL_CALL deleteMark(sal_Int32 Mark)            throw (IOException, IllegalArgumentException, RuntimeException);
+    virtual void SAL_CALL jumpToMark(sal_Int32 nMark)       throw (IOException, IllegalArgumentException, RuntimeException);
+    virtual void SAL_CALL jumpToFurthest(void)          throw (IOException, RuntimeException);
+    virtual sal_Int32 SAL_CALL offsetToMark(sal_Int32 nMark)
+        throw (IOException, IllegalArgumentException, RuntimeException);
+
+public: //XTypeProvider
+    virtual ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Type > SAL_CALL
+            getTypes(  ) throw(::com::sun::star::uno::RuntimeException);
+    virtual ::com::sun::star::uno::Sequence< sal_Int8 > SAL_CALL
+            getImplementationId(  ) throw(::com::sun::star::uno::RuntimeException);
+
+public: // XServiceInfo
+    OUString                     SAL_CALL getImplementationName() throw ();
+    Sequence< OUString >         SAL_CALL getSupportedServiceNames(void) throw ();
+    sal_Bool                     SAL_CALL supportsService(const OUString& ServiceName) throw ();
+
+private:
+    void connectToMarkable();
+private:
+    sal_Bool                m_bValidMarkable;
+    Reference < XMarkableStream > m_rMarkable;
+    vector < Reference<  XPersistObject > > m_aPersistVector;
+
+};
+
+
+Any OObjectInputStream::queryInterface( const Type &aType )
+{
+    Any a = ::cppu::queryInterface(
+        aType ,
+        SAL_STATIC_CAST( XMarkableStream * , this ),
+        SAL_STATIC_CAST( XObjectInputStream * , this ) );
+    if( a.hasValue() )
+    {
+        return a;
+    }
+
+    return ODataInputStream::queryInterface( aType );
+
+}
+
+Reference< XPersistObject >  OObjectInputStream::readObject()
+{
+    // check if chain contains a XMarkableStream
+    connectToMarkable();
+
+    Reference< XPersistObject > xLoadedObj;
+
+    // create Mark to skip newer versions
+    sal_uInt32 nMark = m_rMarkable->createMark();
+    // length of the data
+    sal_Int32 nLen = (sal_uInt16) ODataInputStream::readShort();
+    if( nLen < 0xc )
+    {
+        throw WrongFormatException();
+    }
+
+    // read the object identifier
+    sal_uInt32 nId = readLong();
+
+    // the name of the persist model
+    // MM ???
+    OUString aName = readUTF();
+
+    // Read the length of the object
+    sal_Int32 nObjLen = readLong();
+    if( ( 0 == nId && 0 != nObjLen ) )
+    {
+        throw WrongFormatException();
+    }
+
+    // skip data of new version
+    skipBytes( nLen - m_rMarkable->offsetToMark( nMark ) );
+
+    sal_Bool bLoadSuccesfull = sal_True;
+    if( nId )
+    {
+        if( aName.len() )
+        {
+            // load the object
+            Reference< XInterface > x = m_rFactory->createInstance( aName );
+            xLoadedObj = Reference< XPersistObject >( x, UNO_QUERY );
+            if( xLoadedObj.is() )
+            {
+                sal_uInt32 nSize = m_aPersistVector.size();
+                if( nSize <= nId )
+                {
+                    // grow to the right size
+                    Reference< XPersistObject > xEmpty;
+                    m_aPersistVector.insert( m_aPersistVector.end(), (long)(nId - nSize + 1), xEmpty );
+                }
+
+                m_aPersistVector[nId] = xLoadedObj;
+                xLoadedObj->read( Reference< XObjectInputStream >(
+                    SAL_STATIC_CAST( XObjectInputStream *, this ) ) );
+            }
+            else
+            {
+                // no service with this name could be instantiated
+                bLoadSuccesfull = sal_False;
+            }
+        }
+        else {
+            if( m_aPersistVector.size() < nId )
+            {
+                // id unknown, load failure !
+                bLoadSuccesfull = sal_False;
+            }
+            else
+            {
+                // Object has alread been read,
+                xLoadedObj = m_aPersistVector[nId];
+            }
+        }
+    }
+
+    // skip to the position behind the object
+    skipBytes( nObjLen + nLen - m_rMarkable->offsetToMark( nMark ) );
+    m_rMarkable->deleteMark( nMark );
+
+    if( ! bLoadSuccesfull )
+    {
+        throw WrongFormatException();
+    }
+    return xLoadedObj;
+}
+
+
+void OObjectInputStream::connectToMarkable()
+{
+    if( ! m_bValidMarkable ) {
+        if( ! m_bValidStream )
+        {
+            throw NotConnectedException( );
+        }
+
+        // find the markable stream !
+        Reference< XInterface > rTry = m_input;
+        while( sal_True ) {
+            if( ! rTry.is() )
+            {
+                throw NotConnectedException( );
+            }
+            Reference<  XMarkableStream > markable( rTry , UNO_QUERY );
+            if( markable.is() )
+            {
+                m_rMarkable = markable;
+                break;
+            }
+            Reference < XActiveDataSink > sink( rTry , UNO_QUERY );
+            rTry = sink;
+        }
+        m_bValidMarkable = sal_True;
+    }
+}
+
+sal_Int32 OObjectInputStream::createMark(void)              throw (IOException, RuntimeException)
+{
+    connectToMarkable();    // throws an exception, if a markable is not connected !
+
+    return m_rMarkable->createMark();
+}
+
+void OObjectInputStream::deleteMark(sal_Int32 Mark)         throw (IOException, IllegalArgumentException, RuntimeException)
+{
+    if( ! m_bValidMarkable )
+    {
+        throw NotConnectedException();
+    }
+    m_rMarkable->deleteMark( Mark );
+}
+
+void OObjectInputStream::jumpToMark(sal_Int32 nMark)        throw (IOException, IllegalArgumentException, RuntimeException)
+{
+    if( ! m_bValidMarkable )
+    {
+        throw NotConnectedException();
+    }
+    m_rMarkable->jumpToMark( nMark );
+}
+void OObjectInputStream::jumpToFurthest(void)           throw (IOException, RuntimeException)
+{
+    connectToMarkable();
+    m_rMarkable->jumpToFurthest();
+}
+
+sal_Int32 OObjectInputStream::offsetToMark(sal_Int32 nMark)
+    throw (IOException, IllegalArgumentException, RuntimeException)
+{
+    if( ! m_bValidMarkable )
+    {
+        throw NotConnectedException();
+    }
+    return m_rMarkable->offsetToMark( nMark );
+}
+
+
+Sequence< Type > SAL_CALL OObjectInputStream::getTypes(void) throw( RuntimeException )
+{
+    static OTypeCollection *pCollection = 0;
+    if( ! pCollection )
+    {
+        MutexGuard guard( Mutex::getGlobalMutex() );
+        if( ! pCollection )
+        {
+            static OTypeCollection collection(
+                getCppuType( (Reference< XMarkableStream > * ) 0 ),
+                getCppuType( (Reference< XObjectInputStream > * ) 0 ),
+                ODataInputStream::getTypes() );
+            pCollection = &collection;
+        }
+    }
+    return (*pCollection).getTypes();
+}
+
+Sequence< sal_Int8 > SAL_CALL OObjectInputStream::getImplementationId(  ) throw( RuntimeException)
+{
+    static OImplementationId *pId = 0;
+    if( ! pId )
+    {
+        MutexGuard guard( Mutex::getGlobalMutex() );
+        if( ! pId )
+        {
+            static OImplementationId id( sal_False );
+            pId = &id;
+        }
+    }
+    return (*pId).getImplementationId();
+}
+
+
+// XServiceInfo
+OUString OObjectInputStream::getImplementationName() throw ()
+{
+    return OObjectInputStream_getImplementationName();
+}
+
+// XServiceInfo
+sal_Bool OObjectInputStream::supportsService(const OUString& ServiceName) throw ()
+{
+    Sequence< OUString > aSNL = getSupportedServiceNames();
+    const OUString * pArray = aSNL.getConstArray();
+
+    for( sal_Int32 i = 0; i < aSNL.getLength(); i++ )
+        if( pArray[i] == ServiceName )
+            return sal_True;
+
+    return sal_False;
+}
+
+// XServiceInfo
+Sequence< OUString > OObjectInputStream::getSupportedServiceNames(void) throw ()
+{
+    Sequence<OUString> seq(1);
+    seq.getArray()[0] = OObjectInputStream_getServiceName();
+    return seq;
+}
+
+
+
+
+Reference< XInterface > SAL_CALL OObjectInputStream_CreateInstance( const Reference < XMultiServiceFactory > & rSMgr ) throw(Exception)
+{
+    OObjectInputStream *p = new OObjectInputStream( rSMgr );
+    return Reference< XInterface> (
+        SAL_STATIC_CAST( OWeakObject *, p ) );
+}
+
+OUString OObjectInputStream_getServiceName()
+{
+    return OUString::createFromAscii( "com.sun.star.io.ObjectInputStream" );
+}
+
+OUString OObjectInputStream_getImplementationName()
+{
+    return OUString::createFromAscii( "com.sun.star.comp.io.stm.ObjectInputStream" );
+}
+
+Sequence<OUString> OObjectInputStream_getSupportedServiceNames(void)
+{
+    Sequence<OUString> aRet(1);
+    aRet.getArray()[0] = OObjectInputStream_getServiceName();
+
+    return aRet;
+}
+
+}
diff --git a/io/source/stm/omark.cxx b/io/source/stm/omark.cxx
new file mode 100644
index 000000000000..ea34eb7b97f7
--- /dev/null
+++ b/io/source/stm/omark.cxx
@@ -0,0 +1,1015 @@
+/*************************************************************************
+ *
+ *  $RCSfile: omark.cxx,v $
+ *
+ *  $Revision: 1.1.1.1 $
+ *
+ *  last change: $Author: hr $ $Date: 2000-09-18 17:24:18 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library 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
+ *  Lesser General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (the "License"); You may not use this file
+ *  except in compliance with the License. You may obtain a copy of the
+ *  License at http://www.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+
+#include <map>
+#include <vector>
+
+#include <com/sun/star/io/XMarkableStream.hpp>
+#include <com/sun/star/io/XOutputStream.hpp>
+#include <com/sun/star/io/XInputStream.hpp>
+#include <com/sun/star/io/XActiveDataSource.hpp>
+#include <com/sun/star/io/XActiveDataSink.hpp>
+#include <com/sun/star/io/XConnectable.hpp>
+#include <com/sun/star/lang/XServiceInfo.hpp>
+
+#include <cppuhelper/factory.hxx>
+#include <cppuhelper/weak.hxx>      // OWeakObject
+#include <cppuhelper/implbase5.hxx>
+
+#include <osl/mutex.hxx>
+
+#include <assert.h>
+#include <string.h>
+
+
+using namespace ::std;
+using namespace ::rtl;
+using namespace ::cppu;
+using namespace ::osl;
+using namespace ::com::sun::star::io;
+using namespace ::com::sun::star::uno;
+using namespace ::com::sun::star::lang;
+
+#include "streamhelper.hxx"
+#include "factreg.hxx"
+
+namespace io_stm {
+
+/***********************
+*
+* OMarkableOutputStream.
+*
+* This object allows to set marks in an outputstream. It is allowed to jump back to the marks and
+* rewrite the some bytes.
+*
+*         The object must buffer the data since the last mark set. Flush will not
+*         have any effect. As soon as the last mark has been removed, the object may write the data
+*         through to the chained object.
+*
+**********************/
+class OMarkableOutputStream :
+    public WeakImplHelper5< XOutputStream ,
+                            XActiveDataSource ,
+                            XMarkableStream ,
+                            XConnectable,
+                            XServiceInfo
+                          >
+{
+public:
+    OMarkableOutputStream(  );
+    ~OMarkableOutputStream();
+
+public: // XOutputStream
+    virtual void SAL_CALL writeBytes(const Sequence< sal_Int8 >& aData)
+        throw ( NotConnectedException,
+                BufferSizeExceededException,
+                RuntimeException);
+    virtual void SAL_CALL flush(void)
+        throw ( NotConnectedException,
+                BufferSizeExceededException,
+                RuntimeException);
+    virtual void SAL_CALL closeOutput(void)
+        throw ( NotConnectedException,
+                BufferSizeExceededException,
+                RuntimeException);
+
+public: // XMarkable
+    virtual sal_Int32 SAL_CALL createMark(void)
+        throw (IOException, RuntimeException);
+    virtual void SAL_CALL deleteMark(sal_Int32 Mark)
+        throw (IOException,
+               IllegalArgumentException,
+               RuntimeException);
+    virtual void SAL_CALL jumpToMark(sal_Int32 nMark)
+        throw (IOException,
+               IllegalArgumentException,
+               RuntimeException);
+    virtual void SAL_CALL jumpToFurthest(void)
+        throw (IOException, RuntimeException);
+    virtual sal_Int32 SAL_CALL offsetToMark(sal_Int32 nMark)
+        throw (IOException,
+               IllegalArgumentException,
+               RuntimeException);
+
+public: // XActiveDataSource
+    virtual void SAL_CALL setOutputStream(const Reference < XOutputStream > & aStream)
+        throw (RuntimeException);
+    virtual Reference < XOutputStream > SAL_CALL getOutputStream(void)
+        throw (RuntimeException);
+
+public: // XConnectable
+    virtual void SAL_CALL setPredecessor(const Reference < XConnectable > & aPredecessor)
+        throw (RuntimeException);
+    virtual Reference < XConnectable > SAL_CALL getPredecessor(void) throw (RuntimeException);
+    virtual void SAL_CALL setSuccessor(const Reference < XConnectable >& aSuccessor)
+        throw (RuntimeException);
+    virtual Reference<  XConnectable >  SAL_CALL getSuccessor(void) throw (RuntimeException);
+
+public: // XServiceInfo
+    OUString                     SAL_CALL getImplementationName() throw ();
+    Sequence< OUString >         SAL_CALL getSupportedServiceNames(void) throw ();
+    sal_Bool                        SAL_CALL supportsService(const OUString& ServiceName) throw ();
+
+private:
+    // helper methods
+    void checkMarksAndFlush() throw( NotConnectedException, BufferSizeExceededException);
+
+    Reference< XConnectable > m_succ;
+    Reference< XConnectable > m_pred;
+
+    Reference< XOutputStream >  m_output;
+    sal_Bool m_bValidStream;
+
+    IRingBuffer *m_pBuffer;
+    map<sal_Int32,sal_Int32,less< sal_Int32 > > m_mapMarks;
+    sal_Int32 m_nCurrentPos;
+    sal_Int32 m_nCurrentMark;
+
+    Mutex m_mutex;
+};
+
+OMarkableOutputStream::OMarkableOutputStream( )
+{
+    m_pBuffer = new MemRingBuffer;
+    m_nCurrentPos = 0;
+    m_nCurrentMark = 0;
+}
+
+OMarkableOutputStream::~OMarkableOutputStream()
+{
+    m_nCurrentMark;
+    delete m_pBuffer;
+}
+
+
+// XOutputStream
+void OMarkableOutputStream::writeBytes(const Sequence< sal_Int8 >& aData)
+    throw ( NotConnectedException,
+            BufferSizeExceededException,
+            RuntimeException)
+{
+    if( m_bValidStream ) {
+        if( m_mapMarks.empty() && ( m_pBuffer->getSize() == 0 ) ) {
+            // no mark and  buffer active, simple write through
+            m_output->writeBytes( aData );
+        }
+        else {
+            MutexGuard guard( m_mutex );
+            // new data must be buffered
+            try
+            {
+                m_pBuffer->writeAt( m_nCurrentPos , aData );
+                m_nCurrentPos += aData.getLength();
+            }
+            catch( IRingBuffer_OutOfBoundsException & )
+            {
+                throw BufferSizeExceededException();
+            }
+            catch( IRingBuffer_OutOfMemoryException & )
+            {
+                throw BufferSizeExceededException();
+            }
+            checkMarksAndFlush();
+        }
+    }
+    else {
+        throw NotConnectedException();
+    }
+}
+
+void OMarkableOutputStream::flush(void)
+    throw ( NotConnectedException,
+            BufferSizeExceededException,
+            RuntimeException)
+{
+    // Markable must ignore flush !
+}
+
+void OMarkableOutputStream::closeOutput(void)
+    throw ( NotConnectedException,
+            BufferSizeExceededException,
+            RuntimeException)
+{
+    if( m_bValidStream ) {
+        MutexGuard guard( m_mutex );
+        // all marks must be cleared and all
+
+        if( ! m_mapMarks.empty() )
+        {
+            m_mapMarks.clear();
+         }
+        m_nCurrentPos = m_pBuffer->getSize();
+          checkMarksAndFlush();
+
+        m_output->closeOutput();
+
+        setOutputStream( Reference< XOutputStream > () );
+        setPredecessor( Reference < XConnectable >() );
+        setSuccessor( Reference< XConnectable > () );
+    }
+    else {
+        throw NotConnectedException();
+    }
+}
+
+
+sal_Int32 OMarkableOutputStream::createMark(void)
+    throw ( IOException,
+            RuntimeException)
+{
+    MutexGuard guard( m_mutex );
+    sal_Int32 nMark = m_nCurrentMark;
+
+    m_mapMarks[nMark] = m_nCurrentPos;
+
+    m_nCurrentMark ++;
+    return nMark;
+}
+
+void OMarkableOutputStream::deleteMark(sal_Int32 Mark)
+    throw( IOException,
+           IllegalArgumentException,
+           RuntimeException)
+{
+    MutexGuard guard( m_mutex );
+    map<sal_Int32,sal_Int32,less<sal_Int32> >::iterator ii = m_mapMarks.find( Mark );
+
+    if( ii == m_mapMarks.end() ) {
+        throw IllegalArgumentException( );
+    }
+    else {
+        m_mapMarks.erase( ii );
+        checkMarksAndFlush();
+    }
+}
+
+void OMarkableOutputStream::jumpToMark(sal_Int32 nMark)
+    throw (IOException,
+           IllegalArgumentException,
+           RuntimeException)
+{
+    MutexGuard guard( m_mutex );
+    map<sal_Int32,sal_Int32,less<sal_Int32> >::iterator ii = m_mapMarks.find( nMark );
+
+    if( ii == m_mapMarks.end() ) {
+        throw IllegalArgumentException(  );
+    }
+    else {
+        m_nCurrentPos = (*ii).second;
+    }
+}
+
+void OMarkableOutputStream::jumpToFurthest(void)
+    throw (IOException,
+           RuntimeException)
+{
+    MutexGuard guard( m_mutex );
+    m_nCurrentPos = m_pBuffer->getSize();
+    checkMarksAndFlush();
+}
+
+sal_Int32 OMarkableOutputStream::offsetToMark(sal_Int32 nMark)
+    throw (IOException,
+           IllegalArgumentException,
+           RuntimeException)
+{
+
+    MutexGuard guard( m_mutex );
+    map<sal_Int32,sal_Int32,less<sal_Int32> >::const_iterator ii = m_mapMarks.find( nMark );
+
+    if( ii == m_mapMarks.end() )
+    {
+        throw IllegalArgumentException( );
+    }
+    return m_nCurrentPos - (*ii).second;
+}
+
+
+
+// XActiveDataSource2
+void OMarkableOutputStream::setOutputStream(const Reference < XOutputStream >& aStream)
+    throw (RuntimeException)
+{
+    if( m_output != aStream ) {
+        m_output = aStream;
+
+        Reference < XConnectable > succ( m_output , UNO_QUERY );
+        setSuccessor( succ );
+    }
+    m_bValidStream = m_output.is();
+}
+
+Reference< XOutputStream > OMarkableOutputStream::getOutputStream(void) throw (RuntimeException)
+{
+    return m_output;
+}
+
+
+
+void OMarkableOutputStream::setSuccessor( const Reference< XConnectable > &r )
+    throw (RuntimeException)
+{
+     /// if the references match, nothing needs to be done
+     if( m_succ != r ) {
+         /// store the reference for later use
+         m_succ = r;
+
+         if( m_succ.is() ) {
+              m_succ->setPredecessor( Reference < XConnectable > (
+                  SAL_STATIC_CAST( XConnectable * , this  ) ) );
+         }
+     }
+}
+Reference <XConnectable > OMarkableOutputStream::getSuccessor()     throw (RuntimeException)
+{
+    return m_succ;
+}
+
+
+// XDataSource
+void OMarkableOutputStream::setPredecessor( const Reference< XConnectable > &r )
+    throw (RuntimeException)
+{
+    if( r != m_pred ) {
+        m_pred = r;
+        if( m_pred.is() ) {
+            m_pred->setSuccessor( Reference < XConnectable > (
+                SAL_STATIC_CAST ( XConnectable * , this ) ) );
+        }
+    }
+}
+Reference < XConnectable > OMarkableOutputStream::getPredecessor() throw (RuntimeException)
+{
+    return m_pred;
+}
+
+
+// private methods
+
+void OMarkableOutputStream::checkMarksAndFlush() throw(     NotConnectedException,
+                                                            BufferSizeExceededException)
+{
+    map<sal_Int32,sal_Int32,less<sal_Int32> >::iterator ii;
+
+    // find the smallest mark
+    sal_Int32 nNextFound = m_nCurrentPos;
+    for( ii = m_mapMarks.begin() ; ii != m_mapMarks.end() ; ii ++ ) {
+        if( (*ii).second <= nNextFound )  {
+            nNextFound = (*ii).second;
+        }
+    }
+
+    if( nNextFound ) {
+        // some data must be released !
+        m_nCurrentPos -= nNextFound;
+        for( ii = m_mapMarks.begin() ; ii != m_mapMarks.end() ; ii ++ ) {
+            (*ii).second -= nNextFound;
+        }
+
+        Sequence<sal_Int8> seq(nNextFound);
+        m_pBuffer->readAt( 0 , seq , nNextFound );
+        m_pBuffer->forgetFromStart( nNextFound );
+
+        // now write data through to streams
+        m_output->writeBytes( seq );
+    }
+    else {
+        // nothing to do. There is a mark or the current cursor position, that prevents
+        // releasing data !
+    }
+}
+
+
+// XServiceInfo
+OUString OMarkableOutputStream::getImplementationName() throw ()
+{
+    return OMarkableOutputStream_getImplementationName();
+}
+
+// XServiceInfo
+sal_Bool OMarkableOutputStream::supportsService(const OUString& ServiceName) throw ()
+{
+    Sequence< OUString > aSNL = getSupportedServiceNames();
+    const OUString * pArray = aSNL.getConstArray();
+
+    for( sal_Int32 i = 0; i < aSNL.getLength(); i++ )
+        if( pArray[i] == ServiceName )
+            return sal_True;
+
+    return sal_False;
+}
+
+// XServiceInfo
+Sequence< OUString > OMarkableOutputStream::getSupportedServiceNames(void) throw ()
+{
+
+    Sequence<OUString> seq(1);
+    seq.getArray()[0] = OMarkableOutputStream_getServiceName();
+    return seq;
+}
+
+
+
+
+/*------------------------
+*
+* external binding
+*
+*------------------------*/
+Reference< XInterface > SAL_CALL OMarkableOutputStream_CreateInstance( const Reference < XMultiServiceFactory > & ) throw(Exception)
+{
+    OMarkableOutputStream *p = new OMarkableOutputStream( );
+
+    return Reference < XInterface > ( ( OWeakObject * ) p );
+}
+
+OUString OMarkableOutputStream_getServiceName()
+{
+    return OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.io.MarkableOutputStream" ) );
+}
+
+OUString    OMarkableOutputStream_getImplementationName()
+{
+    return OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.comp.io.stm.MarkableOutputStream" ));
+}
+
+Sequence<OUString> OMarkableOutputStream_getSupportedServiceNames(void)
+{
+    Sequence<OUString> aRet(1);
+    aRet.getArray()[0] = OMarkableOutputStream_getServiceName();
+
+    return aRet;
+}
+
+
+
+
+
+
+//------------------------------------------------
+//
+// XMarkableInputStream
+//
+//------------------------------------------------
+
+class OMarkableInputStream :
+    public WeakImplHelper5
+    <
+             XInputStream,
+             XActiveDataSink,
+             XMarkableStream,
+             XConnectable,
+             XServiceInfo
+    >
+{
+public:
+    OMarkableInputStream(  );
+    ~OMarkableInputStream();
+
+
+public: // XInputStream
+    virtual sal_Int32 SAL_CALL readBytes(Sequence< sal_Int8 >& aData, sal_Int32 nBytesToRead)
+        throw ( NotConnectedException,
+                BufferSizeExceededException,
+                RuntimeException) ;
+    virtual sal_Int32 SAL_CALL readSomeBytes(Sequence< sal_Int8 >& aData, sal_Int32 nMaxBytesToRead)
+        throw ( NotConnectedException,
+                BufferSizeExceededException,
+                RuntimeException);
+    virtual void SAL_CALL skipBytes(sal_Int32 nBytesToSkip)
+        throw ( NotConnectedException,
+                BufferSizeExceededException,
+                RuntimeException);
+
+    virtual sal_Int32 SAL_CALL available(void)
+        throw ( NotConnectedException,
+                RuntimeException);
+    virtual void SAL_CALL closeInput(void) throw (NotConnectedException, RuntimeException);
+
+public: // XMarkable
+    virtual sal_Int32 SAL_CALL createMark(void)
+        throw (IOException, RuntimeException);
+    virtual void SAL_CALL deleteMark(sal_Int32 Mark)
+        throw (IOException, RuntimeException);
+    virtual void SAL_CALL jumpToMark(sal_Int32 nMark)
+        throw (IOException, IllegalArgumentException, RuntimeException);
+    virtual void SAL_CALL jumpToFurthest(void)
+        throw (IOException, RuntimeException);
+    virtual sal_Int32 SAL_CALL offsetToMark(sal_Int32 nMark)
+        throw (IOException, IllegalArgumentException,RuntimeException);
+
+public: // XActiveDataSink
+    virtual void SAL_CALL setInputStream(const Reference < XInputStream > & aStream)
+        throw (RuntimeException);
+    virtual Reference < XInputStream > SAL_CALL getInputStream(void)
+        throw (RuntimeException);
+
+public: // XConnectable
+    virtual void SAL_CALL setPredecessor(const Reference < XConnectable > & aPredecessor)
+        throw (RuntimeException);
+    virtual Reference < XConnectable > SAL_CALL getPredecessor(void)
+        throw (RuntimeException);
+    virtual void SAL_CALL setSuccessor(const Reference < XConnectable > & aSuccessor)
+        throw (RuntimeException);
+    virtual Reference < XConnectable > SAL_CALL getSuccessor(void) throw (RuntimeException);
+
+public: // XServiceInfo
+    OUString                     SAL_CALL getImplementationName() throw ();
+    Sequence< OUString >         SAL_CALL getSupportedServiceNames(void) throw ();
+    sal_Bool                         SAL_CALL  supportsService(const OUString& ServiceName) throw ();
+
+private:
+    void checkMarksAndFlush();
+
+    Reference < XConnectable >  m_succ;
+    Reference < XConnectable >  m_pred;
+
+    Reference< XInputStream > m_input;
+    sal_Bool m_bValidStream;
+
+    IRingBuffer *m_pBuffer;
+    map<sal_Int32,sal_Int32,less< sal_Int32 > > m_mapMarks;
+    sal_Int32 m_nCurrentPos;
+    sal_Int32 m_nCurrentMark;
+
+    Mutex m_mutex;
+};
+
+OMarkableInputStream::OMarkableInputStream()
+{
+    m_nCurrentPos = 0;
+    m_nCurrentMark = 0;
+    m_pBuffer = new MemRingBuffer;
+}
+
+
+OMarkableInputStream::~OMarkableInputStream()
+{
+    if( m_pBuffer ) {
+        delete m_pBuffer;
+    }
+}
+
+
+
+
+// XInputStream
+
+sal_Int32 OMarkableInputStream::readBytes(Sequence< sal_Int8 >& aData, sal_Int32 nBytesToRead)
+    throw ( NotConnectedException,
+            BufferSizeExceededException,
+            RuntimeException)
+{
+    sal_Int32 nBytesRead;
+
+    if( m_bValidStream ) {
+        MutexGuard guard( m_mutex );
+        if( m_mapMarks.empty() && ! m_pBuffer->getSize() ) {
+            // normal read !
+            nBytesRead = m_input->readBytes( aData, nBytesToRead );
+        }
+        else {
+            // read from buffer
+            sal_Int32 nRead;
+
+            // read enough bytes into buffer
+            if( m_pBuffer->getSize() - m_nCurrentPos < nBytesToRead  ) {
+                sal_Int32 nToRead = nBytesToRead - ( m_pBuffer->getSize() - m_nCurrentPos );
+                nRead = m_input->readBytes( aData , nToRead );
+
+                assert( aData.getLength() == nRead );
+
+                try
+                {
+                    m_pBuffer->writeAt( m_pBuffer->getSize() , aData );
+                }
+                catch( IRingBuffer_OutOfMemoryException & ) {
+                    throw BufferSizeExceededException();
+                }
+                catch( IRingBuffer_OutOfBoundsException & ) {
+                    throw BufferSizeExceededException();
+                }
+
+                if( nRead < nToRead ) {
+                    nBytesToRead = nBytesToRead - (nToRead-nRead);
+                }
+            }
+
+            assert( m_pBuffer->getSize() - m_nCurrentPos >= nBytesToRead  );
+
+            m_pBuffer->readAt( m_nCurrentPos , aData , nBytesToRead );
+
+            m_nCurrentPos += nBytesToRead;
+            nBytesRead = nBytesToRead;
+        }
+    }
+    else {
+        throw IOException( OUString( RTL_CONSTASCII_USTRINGPARAM("not chained")) ,
+                           Reference < XInterface > () );
+    }
+    return nBytesRead;
+}
+
+
+sal_Int32 OMarkableInputStream::readSomeBytes(Sequence< sal_Int8 >& aData, sal_Int32 nMaxBytesToRead)
+    throw ( NotConnectedException,
+            BufferSizeExceededException,
+            RuntimeException)
+{
+
+    sal_Int32 nBytesRead;
+    if( m_bValidStream ) {
+        MutexGuard guard( m_mutex );
+        if( m_mapMarks.empty() && ! m_pBuffer->getSize() ) {
+            // normal read !
+            nBytesRead = m_input->readSomeBytes( aData, nMaxBytesToRead );
+        }
+        else {
+            // read from buffer
+            sal_Int32 nRead = 0;
+            sal_Int32 nInBuffer = m_pBuffer->getSize() - m_nCurrentPos;
+            sal_Int32 nAdditionalBytesToRead = Min(nMaxBytesToRead-nInBuffer,m_input->available());
+            nAdditionalBytesToRead = Max(0 , nAdditionalBytesToRead );
+
+            // read enough bytes into buffer
+            if( 0 == nInBuffer ) {
+                nRead = m_input->readSomeBytes( aData , nMaxBytesToRead );
+            }
+            else if( nAdditionalBytesToRead ) {
+                nRead = m_input->readBytes( aData , nAdditionalBytesToRead );
+            }
+
+            if( nRead ) {
+                aData.realloc( nRead );
+                try
+                {
+                    m_pBuffer->writeAt( m_pBuffer->getSize() , aData );
+                }
+                catch( IRingBuffer_OutOfMemoryException & )
+                {
+                    throw BufferSizeExceededException();
+                }
+                catch( IRingBuffer_OutOfBoundsException &  )
+                {
+                    throw BufferSizeExceededException();
+                }
+            }
+
+            nBytesRead = Min( nMaxBytesToRead , nInBuffer + nRead );
+
+            // now take everything from buffer !
+            m_pBuffer->readAt( m_nCurrentPos , aData , nBytesRead );
+
+            m_nCurrentPos += nBytesRead;
+        }
+    }
+    else
+    {
+        throw NotConnectedException();
+    }
+    return nBytesRead;
+
+
+}
+
+
+void OMarkableInputStream::skipBytes(sal_Int32 nBytesToSkip)
+    throw ( NotConnectedException,
+            BufferSizeExceededException,
+            RuntimeException)
+{
+    // this method is blocking
+    sal_Int32 nRead;
+    Sequence<sal_Int8> seqDummy( nBytesToSkip );
+
+    nRead = readBytes( seqDummy , nBytesToSkip );
+}
+
+sal_Int32 OMarkableInputStream::available(void) throw (NotConnectedException, RuntimeException)
+{
+    sal_Int32 nAvail;
+    if( m_bValidStream ) {
+        MutexGuard guard( m_mutex );
+        nAvail = m_input->available() + ( m_pBuffer->getSize() - m_nCurrentPos );
+    }
+    else
+    {
+        throw IOException( OUString( RTL_CONSTASCII_USTRINGPARAM( "Not chained" ) ) ,
+                           Reference< XInterface > ());
+    }
+
+    return nAvail;
+}
+
+
+void OMarkableInputStream::closeInput(void) throw (NotConnectedException, RuntimeException)
+{
+    if( m_bValidStream ) {
+        MutexGuard guard( m_mutex );
+
+        m_input->closeInput();
+
+        setInputStream( Reference< XInputStream > () );
+        setPredecessor( Reference< XConnectable > () );
+        setSuccessor( Reference< XConnectable >() );
+
+        delete m_pBuffer;
+        m_pBuffer = 0;
+        m_nCurrentPos = 0;
+        m_nCurrentMark = 0;
+    }
+    else {
+        throw IOException(
+            OUString( RTL_CONSTASCII_USTRINGPARAM( "Not chained" ) ),
+            Reference< XInterface > () );
+    }
+}
+
+// XMarkable
+
+sal_Int32 OMarkableInputStream::createMark(void)            throw (IOException, RuntimeException)
+{
+    MutexGuard guard( m_mutex );
+    sal_Int32 nMark = m_nCurrentMark;
+
+    m_mapMarks[nMark] = m_nCurrentPos;
+
+    m_nCurrentMark ++;
+    return nMark;
+}
+
+void OMarkableInputStream::deleteMark(sal_Int32 Mark)       throw (IOException, RuntimeException)
+{
+    MutexGuard guard( m_mutex );
+    map<sal_Int32,sal_Int32,less<sal_Int32> >::iterator ii = m_mapMarks.find( Mark );
+
+    if( ii == m_mapMarks.end() ) {
+        throw IOException( OUString( RTL_CONSTASCII_USTRINGPARAM("Mark does not exist") ),
+                           Reference < XInterface > () );
+    }
+    else {
+        m_mapMarks.erase( ii );
+        checkMarksAndFlush();
+    }
+}
+
+void OMarkableInputStream::jumpToMark(sal_Int32 nMark)
+    throw (IOException,
+           IllegalArgumentException,
+           RuntimeException)
+{
+    MutexGuard guard( m_mutex );
+    map<sal_Int32,sal_Int32,less<sal_Int32> >::iterator ii = m_mapMarks.find( nMark );
+
+    if( ii == m_mapMarks.end() )
+    {
+        throw IllegalArgumentException(  );
+    }
+    else
+    {
+        m_nCurrentPos = (*ii).second;
+    }
+}
+
+void OMarkableInputStream::jumpToFurthest(void)         throw (IOException, RuntimeException)
+{
+    MutexGuard guard( m_mutex );
+    m_nCurrentPos = m_pBuffer->getSize();
+    checkMarksAndFlush();
+}
+
+sal_Int32 OMarkableInputStream::offsetToMark(sal_Int32 nMark)
+     throw (IOException,
+           IllegalArgumentException,
+           RuntimeException)
+{
+    MutexGuard guard( m_mutex );
+    map<sal_Int32,sal_Int32,less<sal_Int32> >::const_iterator ii = m_mapMarks.find( nMark );
+
+    if( ii == m_mapMarks.end() )
+    {
+        throw IllegalArgumentException( );
+    }
+    return m_nCurrentPos - (*ii).second;
+}
+
+
+
+
+
+
+
+// XActiveDataSource
+void OMarkableInputStream::setInputStream(const Reference< XInputStream > & aStream)
+    throw (RuntimeException)
+{
+
+    if( m_input != aStream ) {
+        m_input = aStream;
+
+        Reference < XConnectable >  pred( m_input , UNO_QUERY );
+        setPredecessor( pred );
+    }
+
+    m_bValidStream = m_input.is();
+
+}
+
+Reference< XInputStream > OMarkableInputStream::getInputStream(void) throw (RuntimeException)
+{
+    return m_input;
+}
+
+
+
+// XDataSink
+void OMarkableInputStream::setSuccessor( const Reference< XConnectable > &r )
+    throw (RuntimeException)
+{
+     /// if the references match, nothing needs to be done
+     if( m_succ != r ) {
+         /// store the reference for later use
+         m_succ = r;
+
+         if( m_succ.is() ) {
+              /// set this instance as the sink !
+              m_succ->setPredecessor( Reference< XConnectable > (
+                  SAL_STATIC_CAST( XConnectable * , this ) ) );
+         }
+     }
+}
+
+Reference < XConnectable >  OMarkableInputStream::getSuccessor() throw (RuntimeException)
+{
+    return m_succ;
+}
+
+
+// XDataSource
+void OMarkableInputStream::setPredecessor( const Reference < XConnectable >  &r )
+    throw (RuntimeException)
+{
+    if( r != m_pred ) {
+        m_pred = r;
+        if( m_pred.is() ) {
+            m_pred->setSuccessor( Reference< XConnectable > (
+                SAL_STATIC_CAST( XConnectable * , this ) ) );
+        }
+    }
+}
+Reference< XConnectable >  OMarkableInputStream::getPredecessor() throw (RuntimeException)
+{
+    return m_pred;
+}
+
+
+
+
+void OMarkableInputStream::checkMarksAndFlush()
+{
+    map<sal_Int32,sal_Int32,less<sal_Int32> >::iterator ii;
+
+    // find the smallest mark
+    sal_Int32 nNextFound = m_nCurrentPos;
+    for( ii = m_mapMarks.begin() ; ii != m_mapMarks.end() ; ii ++ ) {
+        if( (*ii).second <= nNextFound )  {
+            nNextFound = (*ii).second;
+        }
+    }
+
+    if( nNextFound ) {
+        // some data must be released !
+        m_nCurrentPos -= nNextFound;
+        for( ii = m_mapMarks.begin() ; ii != m_mapMarks.end() ; ii ++ ) {
+            (*ii).second -= nNextFound;
+        }
+
+        m_pBuffer->forgetFromStart( nNextFound );
+
+    }
+    else {
+        // nothing to do. There is a mark or the current cursor position, that prevents
+        // releasing data !
+    }
+}
+
+
+
+// XServiceInfo
+OUString OMarkableInputStream::getImplementationName() throw ()
+{
+    return OMarkableInputStream_getImplementationName();
+}
+
+// XServiceInfo
+sal_Bool OMarkableInputStream::supportsService(const OUString& ServiceName) throw ()
+{
+    Sequence< OUString > aSNL = getSupportedServiceNames();
+    const OUString * pArray = aSNL.getConstArray();
+
+    for( sal_Int32 i = 0; i < aSNL.getLength(); i++ )
+        if( pArray[i] == ServiceName )
+            return sal_True;
+
+    return sal_False;
+}
+
+// XServiceInfo
+Sequence< OUString > OMarkableInputStream::getSupportedServiceNames(void) throw ()
+{
+
+    Sequence<OUString> seq(1);
+    seq.getArray()[0] = OMarkableInputStream_getServiceName();
+    return seq;
+}
+
+
+/*------------------------
+*
+* external binding
+*
+*------------------------*/
+Reference < XInterface > SAL_CALL OMarkableInputStream_CreateInstance(
+    const Reference < XMultiServiceFactory > & rSMgr ) throw(Exception)
+{
+    OMarkableInputStream *p = new OMarkableInputStream( );
+    return Reference< XInterface > ( (OWeakObject * ) p );
+}
+
+OUString OMarkableInputStream_getServiceName()
+{
+    return OUString::createFromAscii( "com.sun.star.io.MarkableInputStream" );
+}
+
+OUString    OMarkableInputStream_getImplementationName()
+{
+    return OUString::createFromAscii( "com.sun.star.comp.io.stm.MarkableInputStream" );
+}
+
+Sequence<OUString> OMarkableInputStream_getSupportedServiceNames(void)
+{
+    Sequence<OUString> aRet(1);
+    aRet.getArray()[0] = OMarkableInputStream_getServiceName();
+
+    return aRet;
+}
+
+}
diff --git a/io/source/stm/opipe.cxx b/io/source/stm/opipe.cxx
new file mode 100644
index 000000000000..a3ba15cdd7d3
--- /dev/null
+++ b/io/source/stm/opipe.cxx
@@ -0,0 +1,508 @@
+/*************************************************************************
+ *
+ *  $RCSfile: opipe.cxx,v $
+ *
+ *  $Revision: 1.1.1.1 $
+ *
+ *  last change: $Author: hr $ $Date: 2000-09-18 17:24:18 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library 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
+ *  Lesser General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (the "License"); You may not use this file
+ *  except in compliance with the License. You may obtain a copy of the
+ *  License at http://www.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+
+// streams
+#include <com/sun/star/io/XInputStream.hpp>
+#include <com/sun/star/io/XOutputStream.hpp>
+#include <com/sun/star/io/XConnectable.hpp>
+
+#include <com/sun/star/lang/XServiceInfo.hpp>
+
+#include <cppuhelper/factory.hxx>
+
+#include <cppuhelper/implbase4.hxx>      // OWeakObject
+
+#include <osl/conditn.hxx>
+#include <osl/mutex.hxx>
+
+#include <assert.h>
+#include <string.h>
+
+using namespace ::rtl;
+using namespace ::osl;
+using namespace ::cppu;
+using namespace ::com::sun::star::uno;
+using namespace ::com::sun::star::io;
+using namespace ::com::sun::star::lang;
+
+#include "factreg.hxx"
+#include "streamhelper.hxx"
+
+// Implementation and service names
+#define IMPLEMENTATION_NAME "com.sun.star.comp.io.stm.Pipe"
+#define SERVICE_NAME "com.sun.star.io.Pipe"
+#define MAX_BUFFER_SIZE     0x80000000
+
+
+namespace io_stm{
+
+class OPipeImpl :
+    public WeakImplHelper4< XInputStream , XOutputStream , XConnectable , XServiceInfo >
+{
+public:
+    OPipeImpl( );
+    ~OPipeImpl();
+
+public: // XInputStream
+    virtual sal_Int32 SAL_CALL readBytes(Sequence< sal_Int8 >& aData, sal_Int32 nBytesToRead)
+        throw(  NotConnectedException,
+                BufferSizeExceededException,
+                RuntimeException );
+    virtual sal_Int32 SAL_CALL readSomeBytes(Sequence< sal_Int8 >& aData, sal_Int32 nMaxBytesToRead)
+        throw( NotConnectedException,
+               BufferSizeExceededException,
+               RuntimeException );
+    virtual void SAL_CALL skipBytes(sal_Int32 nBytesToSkip)
+        throw( NotConnectedException,
+               BufferSizeExceededException,
+               RuntimeException );
+    virtual sal_Int32 SAL_CALL available(void)
+        throw( NotConnectedException,
+               RuntimeException );
+    virtual void SAL_CALL closeInput(void)
+        throw( NotConnectedException,
+               RuntimeException );
+
+public: // XOutputStream
+
+    virtual void SAL_CALL writeBytes(const Sequence< sal_Int8 >& aData)
+        throw( NotConnectedException,
+               BufferSizeExceededException,
+               RuntimeException );
+    virtual void SAL_CALL flush(void)
+        throw( NotConnectedException,
+               BufferSizeExceededException,
+               RuntimeException );
+    virtual void SAL_CALL closeOutput(void)
+        throw( NotConnectedException,
+               BufferSizeExceededException,
+               RuntimeException );
+
+public: // XConnectable
+    virtual void SAL_CALL setPredecessor(const Reference< XConnectable >& aPredecessor)
+        throw( RuntimeException );
+    virtual Reference< XConnectable > SAL_CALL getPredecessor(void) throw( RuntimeException );
+    virtual void SAL_CALL setSuccessor(const Reference < XConnectable > & aSuccessor)
+        throw( RuntimeException );
+    virtual Reference < XConnectable > SAL_CALL getSuccessor(void) throw( RuntimeException ) ;
+
+
+public: // XServiceInfo
+    OUString                    SAL_CALL getImplementationName() throw(  );
+    Sequence< OUString >         SAL_CALL getSupportedServiceNames(void) throw(  );
+    sal_Bool                        SAL_CALL supportsService(const OUString& ServiceName) throw(  );
+
+private:
+
+    // DEBUG
+    inline void checkInvariant();
+
+    Reference < XConnectable >  m_succ;
+    Reference < XConnectable >  m_pred;
+
+    sal_Int32 m_nBytesToSkip;
+
+    sal_Int8  *m_p;
+
+    sal_Bool m_bOutputStreamClosed;
+    sal_Bool m_bInputStreamClosed;
+
+    oslCondition m_conditionBytesAvail;
+    Mutex     m_mutexAccess;
+    IFIFO       *m_pFIFO;
+};
+
+
+
+OPipeImpl::OPipeImpl()
+{
+    m_nBytesToSkip  = 0;
+
+    m_bOutputStreamClosed   = sal_False;
+    m_bInputStreamClosed    = sal_False;
+
+    m_pFIFO = new MemFIFO;
+    m_conditionBytesAvail = osl_createCondition();
+}
+
+OPipeImpl::~OPipeImpl()
+{
+    osl_destroyCondition( m_conditionBytesAvail );
+    delete m_pFIFO;
+}
+
+
+// These invariants must hold when entering a guarded method or leaving a guarded method.
+void OPipeImpl::checkInvariant()
+{
+
+}
+
+sal_Int32 OPipeImpl::readBytes(Sequence< sal_Int8 >& aData, sal_Int32 nBytesToRead)
+    throw( NotConnectedException, BufferSizeExceededException,RuntimeException )
+{
+    while( sal_True )
+    {
+        { // start guarded section
+            MutexGuard guard( m_mutexAccess );
+            if( m_bInputStreamClosed )
+            {
+                throw NotConnectedException();
+            }
+            sal_Int32 nOccupiedBufferLen = m_pFIFO->getSize();
+
+            if( m_bOutputStreamClosed && nBytesToRead > nOccupiedBufferLen )
+            {
+                nBytesToRead = nOccupiedBufferLen;
+            }
+
+            if( nOccupiedBufferLen < nBytesToRead )
+            {
+                // wait outside guarded section
+                osl_resetCondition( m_conditionBytesAvail );
+            }
+            else {
+                // necessary bytes are available
+                m_pFIFO->read( aData , nBytesToRead );
+                return nBytesToRead;
+            }
+        } // end guarded section
+
+        // wait for new data outside guarded section!
+        osl_waitCondition( m_conditionBytesAvail , 0 );
+    }
+
+    // this point is never reached
+    return 0;
+}
+
+
+sal_Int32 OPipeImpl::readSomeBytes(Sequence< sal_Int8 >& aData, sal_Int32 nMaxBytesToRead)
+    throw( NotConnectedException,
+           BufferSizeExceededException,
+           RuntimeException )
+{
+    while( sal_True ) {
+        {
+            MutexGuard guard( m_mutexAccess );
+            if( m_bInputStreamClosed )
+            {
+                throw NotConnectedException();
+            }
+            if( m_pFIFO->getSize() )
+            {
+                sal_Int32 nSize = Min( nMaxBytesToRead , m_pFIFO->getSize() );
+                aData.realloc( nSize );
+                m_pFIFO->read( aData , nSize );
+                return nSize;
+            }
+
+            if( m_bOutputStreamClosed )
+            {
+                // no bytes in buffer anymore
+                return 0;
+            }
+        }
+
+        osl_waitCondition( m_conditionBytesAvail , 0 );
+    }
+
+    // this point is never reached
+    return 0;
+}
+
+
+void OPipeImpl::skipBytes(sal_Int32 nBytesToSkip)
+    throw( NotConnectedException,
+           BufferSizeExceededException,
+           RuntimeException )
+{
+    MutexGuard guard( m_mutexAccess );
+    if( nBytesToSkip + m_nBytesToSkip > MAX_BUFFER_SIZE || 0 > nBytesToSkip + m_nBytesToSkip )
+    {
+        throw BufferSizeExceededException();
+    }
+    m_nBytesToSkip += nBytesToSkip;
+
+    nBytesToSkip = Min( m_pFIFO->getSize() , m_nBytesToSkip );
+    m_pFIFO->skip( nBytesToSkip );
+    m_nBytesToSkip -= nBytesToSkip;
+}
+
+
+sal_Int32 OPipeImpl::available(void)
+    throw( NotConnectedException,
+           RuntimeException )
+ {
+    MutexGuard guard( m_mutexAccess );
+    checkInvariant();
+    return m_pFIFO->getSize();
+}
+
+void OPipeImpl::closeInput(void)
+    throw( NotConnectedException,
+           RuntimeException)
+{
+    MutexGuard guard( m_mutexAccess );
+
+    m_bInputStreamClosed = sal_True;
+
+    delete m_pFIFO;
+    m_pFIFO = 0;
+
+    // readBytes may throw an exception
+    osl_setCondition( m_conditionBytesAvail );
+
+    setSuccessor( Reference< XConnectable > () );
+    return;
+}
+
+
+void OPipeImpl::writeBytes(const Sequence< sal_Int8 >& aData)
+    throw( NotConnectedException,
+           BufferSizeExceededException,
+           RuntimeException)
+{
+    MutexGuard guard( m_mutexAccess );
+    checkInvariant();
+
+    if( m_bOutputStreamClosed )
+    {
+        throw NotConnectedException();
+    }
+
+    if( m_bInputStreamClosed )
+    {
+        throw NotConnectedException();
+    }
+
+    // check skipping
+    sal_Int32 nLen = aData.getLength();
+    if( m_nBytesToSkip  && m_nBytesToSkip >= nLen  ) {
+        // all must be skipped - forget whole call
+        m_nBytesToSkip -= nLen;
+        return;
+    }
+
+    // adjust buffersize if necessary
+
+    try
+    {
+        if( m_nBytesToSkip )
+        {
+            Sequence< sal_Int8 > seqCopy( nLen - m_nBytesToSkip );
+            memcpy( seqCopy.getArray() , &( aData.getConstArray()[m_nBytesToSkip] ) , nLen-m_nBytesToSkip );
+            m_pFIFO->write( seqCopy );
+        }
+        else
+        {
+            m_pFIFO->write( aData );
+        }
+        m_nBytesToSkip = 0;
+    }
+    catch ( IFIFO_OutOfBoundsException & )
+    {
+        throw BufferSizeExceededException();
+    }
+    catch ( IFIFO_OutOfMemoryException & )
+    {
+        throw BufferSizeExceededException();
+    }
+
+    // readBytes may check again if enough bytes are available
+    osl_setCondition( m_conditionBytesAvail );
+
+    checkInvariant();
+}
+
+
+void OPipeImpl::flush(void)
+    throw( NotConnectedException,
+           BufferSizeExceededException,
+           RuntimeException)
+{
+    // nothing to do for a pipe
+    return;
+}
+
+void OPipeImpl::closeOutput(void)
+    throw( NotConnectedException,
+           BufferSizeExceededException,
+           RuntimeException)
+{
+    MutexGuard guard( m_mutexAccess );
+
+    m_bOutputStreamClosed = sal_True;
+    osl_setCondition( m_conditionBytesAvail );
+    setPredecessor( Reference < XConnectable > () );
+    return;
+}
+
+
+void OPipeImpl::setSuccessor( const Reference < XConnectable >  &r )
+    throw( RuntimeException )
+{
+     /// if the references match, nothing needs to be done
+     if( m_succ != r ) {
+         /// store the reference for later use
+         m_succ = r;
+
+         if( m_succ.is() )
+         {
+              m_succ->setPredecessor(
+                  Reference< XConnectable > ( SAL_STATIC_CAST( XConnectable * , this ) ) );
+         }
+     }
+}
+
+Reference < XConnectable > OPipeImpl::getSuccessor()    throw( RuntimeException )
+{
+    return m_succ;
+}
+
+
+// XDataSource
+void OPipeImpl::setPredecessor( const Reference < XConnectable > &r )
+    throw( RuntimeException )
+{
+    if( r != m_pred ) {
+        m_pred = r;
+        if( m_pred.is() ) {
+            m_pred->setSuccessor(
+                Reference < XConnectable > ( SAL_STATIC_CAST( XConnectable * , this ) ) );
+        }
+    }
+}
+
+Reference < XConnectable > OPipeImpl::getPredecessor() throw( RuntimeException )
+{
+    return m_pred;
+}
+
+
+
+
+// XServiceInfo
+OUString OPipeImpl::getImplementationName() throw(  )
+{
+    return OPipeImpl_getImplementationName();
+}
+
+// XServiceInfo
+sal_Bool OPipeImpl::supportsService(const OUString& ServiceName) throw(  )
+{
+    Sequence< OUString > aSNL = getSupportedServiceNames();
+    const OUString * pArray = aSNL.getConstArray();
+
+    for( sal_Int32 i = 0; i < aSNL.getLength(); i++ )
+        if( pArray[i] == ServiceName )
+            return sal_True;
+
+    return sal_False;
+}
+
+// XServiceInfo
+Sequence< OUString > OPipeImpl::getSupportedServiceNames(void) throw(  )
+{
+    Sequence<OUString> seq(1);
+    seq.getArray()[0] = OPipeImpl_getServiceName();
+    return seq;
+}
+
+
+
+
+
+/* implementation functions
+*
+*
+*/
+
+
+Reference < XInterface > SAL_CALL OPipeImpl_CreateInstance(
+    const Reference < XMultiServiceFactory > & rSMgr ) throw(Exception)
+{
+    OPipeImpl *p = new OPipeImpl;
+
+    return Reference < XInterface > ( SAL_STATIC_CAST( OWeakObject * , p ) );
+}
+
+
+OUString OPipeImpl_getServiceName()
+{
+    return OUString( RTL_CONSTASCII_USTRINGPARAM ( SERVICE_NAME ) );
+}
+
+OUString    OPipeImpl_getImplementationName()
+{
+    return OUString( RTL_CONSTASCII_USTRINGPARAM ( SERVICE_NAME ) );
+}
+
+Sequence<OUString> OPipeImpl_getSupportedServiceNames(void)
+{
+    Sequence<OUString> aRet(1);
+    aRet.getArray()[0] = OPipeImpl_getServiceName();
+
+    return aRet;
+}
+}
+
+
diff --git a/io/source/stm/opump.cxx b/io/source/stm/opump.cxx
new file mode 100644
index 000000000000..facb90d9d614
--- /dev/null
+++ b/io/source/stm/opump.cxx
@@ -0,0 +1,431 @@
+/*************************************************************************
+ *
+ *  $RCSfile: opump.cxx,v $
+ *
+ *  $Revision: 1.1.1.1 $
+ *
+ *  last change: $Author: hr $ $Date: 2000-09-18 17:24:18 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library 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
+ *  Lesser General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (the "License"); You may not use this file
+ *  except in compliance with the License. You may obtain a copy of the
+ *  License at http://www.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+
+#include <stdio.h>
+
+#include <osl/diagnose.h>
+
+#include <com/sun/star/io/XActiveDataSource.hpp>
+#include <com/sun/star/io/XActiveDataSink.hpp>
+#include <com/sun/star/io/XActiveDataControl.hpp>
+#include <com/sun/star/io/XConnectable.hpp>
+#include <com/sun/star/lang/XSingleServiceFactory.hpp>
+#include <com/sun/star/lang/XMultiServiceFactory.hpp>
+#include <com/sun/star/registry/XRegistryKey.hpp>
+
+#include <uno/dispatcher.h>
+#include <uno/mapping.hxx>
+#include <cppuhelper/implbase4.hxx>
+#include <cppuhelper/factory.hxx>
+#include <osl/mutex.hxx>
+#include <osl/thread.h>
+#include <stl/list>
+
+using namespace osl;
+using namespace std;
+using namespace rtl;
+using namespace cppu;
+using namespace com::sun::star::uno;
+using namespace com::sun::star::lang;
+using namespace com::sun::star::registry;
+using namespace com::sun::star::io;
+
+namespace io_stm {
+
+    class Pump : public WeakImplHelper4<
+          XActiveDataSource, XActiveDataSink, XActiveDataControl, XConnectable >
+    {
+        Mutex                                   m_aMutex;
+        oslThread                               m_aThread;
+
+        Reference< XConnectable >               m_xPred;
+        Reference< XConnectable >               m_xSucc;
+        Reference< XInputStream >               m_xInput;
+        Reference< XOutputStream >              m_xOutput;
+        list< Reference< XStreamListener > >    m_aListeners;
+
+        void run();
+        static void static_run( void* pObject );
+
+        void close();
+        void fireError( list< Reference< XStreamListener > > & , Any & exception);
+
+    public:
+        Pump();
+        virtual ~Pump();
+
+        // XActiveDataSource
+        virtual void SAL_CALL setOutputStream( const Reference< ::com::sun::star::io::XOutputStream >& xOutput ) throw();
+        virtual Reference< ::com::sun::star::io::XOutputStream > SAL_CALL getOutputStream() throw();
+
+        // XActiveDataSink
+        virtual void SAL_CALL setInputStream( const Reference< ::com::sun::star::io::XInputStream >& xStream ) throw();
+        virtual Reference< ::com::sun::star::io::XInputStream > SAL_CALL getInputStream() throw();
+
+        // XActiveDataControl
+        virtual void SAL_CALL addListener( const Reference< ::com::sun::star::io::XStreamListener >& xListener ) throw();
+        virtual void SAL_CALL removeListener( const Reference< ::com::sun::star::io::XStreamListener >& xListener ) throw();
+        virtual void SAL_CALL start() throw();
+        virtual void SAL_CALL terminate() throw();
+
+        // XConnectable
+        virtual void SAL_CALL setPredecessor( const Reference< ::com::sun::star::io::XConnectable >& xPred ) throw();
+        virtual Reference< ::com::sun::star::io::XConnectable > SAL_CALL getPredecessor() throw();
+        virtual void SAL_CALL setSuccessor( const Reference< ::com::sun::star::io::XConnectable >& xSucc ) throw();
+        virtual Reference< ::com::sun::star::io::XConnectable > SAL_CALL getSuccessor() throw();
+
+    };
+
+Pump::Pump() : m_aThread( NULL )
+{
+}
+
+Pump::~Pump()
+{
+    // exit gracefully
+    osl_joinWithThread( m_aThread );
+    osl_freeThreadHandle( m_aThread );
+}
+
+void Pump::fireError( list< Reference< XStreamListener > > &aList , Any & exception )
+{
+    list< Reference< XStreamListener > > aLocalListeners = aList;
+    list< Reference< XStreamListener > >::iterator it;
+    for( it = aLocalListeners.begin();
+         it != aLocalListeners.end(); ++it )
+    {
+        try
+        {
+            (*it)->error( exception );
+        }
+        catch ( RuntimeException &e )
+        {
+            OString sMessage = OUStringToOString( e.Message , RTL_TEXTENCODING_ASCII_US );
+            OSL_ENSHURE( !"com.sun.star.comp.stoc.Pump: unexpected exception during calling listeners", sMessage.getStr() );
+        }
+    }
+}
+
+void Pump::close()
+{
+    // close streams and release references
+
+    if( m_xInput.is() )
+    {
+        m_xInput->closeInput();
+        m_xInput = Reference< XInputStream >();
+    }
+    if( m_xOutput.is() )
+    {
+        m_xOutput->closeOutput();
+        m_xOutput = Reference< XOutputStream >();
+    }
+    m_aListeners = list< Reference< XStreamListener > >();
+    m_xSucc = Reference< XConnectable >();
+    m_xPred = Reference< XConnectable >();
+}
+
+void Pump::static_run( void* pObject )
+{
+    ((Pump*)pObject)->run();
+}
+
+void Pump::run()
+{
+    Guard< Mutex > aGuard( m_aMutex );
+
+    try
+    {
+        list< Reference< XStreamListener > >::iterator it;
+        for( it = m_aListeners.begin(); it != m_aListeners.end(); ++it )
+        {
+            (*it)->started();
+        }
+
+        try
+        {
+            Sequence< sal_Int8 > aData;
+            long nBytes;
+            while( nBytes = m_xInput->readBytes( aData, 65536 ) )
+            {
+                m_xOutput->writeBytes( aData );
+                if( nBytes < 65536 ) // marks EOF or error
+                    break;
+                osl_yieldThread();
+            }
+
+        }
+        catch ( IOException & e )
+        {
+            Any aException;
+            aException <<= e;
+            fireError( m_aListeners , aException );
+        }
+        catch ( RuntimeException & e )
+        {
+            Any aException;
+            aException <<= e;
+            fireError( m_aListeners , aException );
+        }
+        catch ( Exception & e )
+        {
+            Any aException;
+            aException <<= e;
+            fireError( m_aListeners , aException );
+        }
+
+        // listeners may remove themselves when called this way
+        list< Reference< XStreamListener > > aLocalListeners = m_aListeners;
+        close();
+
+        for( it = aLocalListeners.begin();
+             it != aLocalListeners.end(); ++it )
+        {
+            try
+            {
+                (*it)->closed();
+            }
+            catch ( RuntimeException &e )
+            {
+                OString sMessage = OUStringToOString( e.Message , RTL_TEXTENCODING_ASCII_US );
+                OSL_ENSHURE( !"com.sun.star.comp.stoc.Pump: unexpected exception during calling listeners", sMessage.getStr() );
+            }
+        }
+    }
+    catch ( com::sun::star::uno::Exception &e )
+    {
+        // we are the last on the stack.
+        // this is to avoid crashing the program, when e.g. a bridge crashes
+        OString sMessage = OUStringToOString( e.Message , RTL_TEXTENCODING_ASCII_US );
+        OSL_ENSHURE( !"com.sun.star.comp.stoc.Pump: unexpected exception", sMessage.getStr() );
+    }
+}
+
+// ------------------------------------------------------------
+
+/*
+ * XConnectable
+ */
+
+void Pump::setPredecessor( const Reference< XConnectable >& xPred ) throw()
+{
+    Guard< Mutex > aGuard( m_aMutex );
+
+    m_xPred = xPred;
+}
+
+// ------------------------------------------------------------
+
+Reference< XConnectable > Pump::getPredecessor() throw()
+{
+    Guard< Mutex > aGuard( m_aMutex );
+
+    return m_xPred;
+}
+
+// ------------------------------------------------------------
+
+void Pump::setSuccessor( const Reference< XConnectable >& xSucc ) throw()
+{
+    Guard< Mutex > aGuard( m_aMutex );
+
+    m_xSucc = xSucc;
+}
+
+// ------------------------------------------------------------
+
+Reference< XConnectable > Pump::getSuccessor() throw()
+{
+    Guard< Mutex > aGuard( m_aMutex );
+
+    return m_xSucc;
+}
+
+// -----------------------------------------------------------------
+
+/*
+ * XActiveDataControl
+ */
+
+void Pump::addListener( const Reference< XStreamListener >& xListener ) throw()
+{
+    Guard< Mutex > aGuard( m_aMutex );
+
+    m_aListeners.push_back( xListener );
+}
+
+// ------------------------------------------------------------
+
+void Pump::removeListener( const Reference< XStreamListener >& xListener ) throw()
+{
+    Guard< Mutex > aGuard( m_aMutex );
+
+    m_aListeners.remove( xListener );
+}
+
+// ------------------------------------------------------------
+
+void Pump::start() throw()
+{
+    Guard< Mutex > aGuard( m_aMutex );
+
+    m_aThread = osl_createThread(
+        (oslWorkerFunction)Pump::static_run,
+        (void*)this
+        );
+}
+
+// ------------------------------------------------------------
+
+void Pump::terminate() throw()
+{
+    osl_joinWithThread( m_aThread );
+
+    Guard< Mutex > aGuard( m_aMutex );
+
+    // listeners may remove themselves when called this way
+    list< Reference< XStreamListener > > aLocalListeners = m_aListeners;
+    close();
+
+    for( list< Reference< XStreamListener > >::iterator it = aLocalListeners.begin();
+         it != aLocalListeners.end(); ++it )
+    {
+        (*it)->terminated();
+    }
+}
+
+// ------------------------------------------------------------
+
+/*
+ * XActiveDataSink
+ */
+
+void Pump::setInputStream( const Reference< XInputStream >& xStream ) throw()
+{
+    Guard< Mutex > aGuard( m_aMutex );
+
+    m_xInput = xStream;
+    Reference< XConnectable > xConnect( xStream, UNO_QUERY );
+    if( xConnect.is() )
+        xConnect->setSuccessor( this );
+    // data transfer starts in XActiveDataControl::start
+}
+
+// ------------------------------------------------------------
+
+Reference< XInputStream > Pump::getInputStream() throw()
+{
+    Guard< Mutex > aGuard( m_aMutex );
+
+    return m_xInput;
+}
+
+// ------------------------------------------------------------
+
+/*
+ * XActiveDataSource
+ */
+
+void Pump::setOutputStream( const Reference< XOutputStream >& xOut ) throw()
+{
+    Guard< Mutex > aGuard( m_aMutex );
+
+    m_xOutput = xOut;
+    Reference< XConnectable > xConnect( xOut, UNO_QUERY );
+    if( xConnect.is() )
+        xConnect->setPredecessor( this );
+    // data transfer starts in XActiveDataControl::start
+}
+
+// ------------------------------------------------------------
+
+Reference< XOutputStream > Pump::getOutputStream() throw()
+{
+    Guard< Mutex > aGuard( m_aMutex );
+
+    return m_xOutput;
+}
+
+
+Reference< XInterface > SAL_CALL OPumpImpl_CreateInstance( const Reference< XMultiServiceFactory > & rSMgr ) throw (Exception)
+{
+    return Reference< XInterface >( *new Pump );
+}
+
+OUString OPumpImpl_getServiceName()
+{
+    return OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.io.Pump" ) );
+}
+
+OUString OPumpImpl_getImplementationName()
+{
+    return OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.comp.io.Pump") );
+}
+
+Sequence<OUString> OPumpImpl_getSupportedServiceNames(void)
+{
+    OUString s = OPumpImpl_getServiceName();
+    Sequence< OUString > seq( &s , 1 );
+    return seq;
+}
+
+}
+
diff --git a/io/source/stm/stm.xml b/io/source/stm/stm.xml
new file mode 100644
index 000000000000..0a0f6f7b31d2
--- /dev/null
+++ b/io/source/stm/stm.xml
@@ -0,0 +1,428 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE COMPONENTDESCRIPTION PUBLIC "-//StarOffice//DTD ComponentDescription 1.0//EN" "componentdescription.dtd">
+
+<COMPONENTDESCRIPTION
+    xmlns:xlink="http://www.w3.org/1999/xlink/Namespace" >
+
+<Author> Joerg Budischewski </Author>
+
+<Name>  com.sun.star.comp.io.stm.Pipe </Name>
+
+<Description>
+    This component provides ...
+</Description>
+
+<ModuleName>    stm </ModuleName>
+
+<LoaderName>    com.sun.star.loader.SharedLibrary   </LoaderName>
+
+<Language>  c++ </Language>
+
+<Status StatusValue="final"/>
+
+<SupportedService>  com.sun.star.io.Pipe    </SupportedService>
+
+<ServiceDependency> ... </ServiceDependency>
+
+<ProjectBuildDependency>    cppuhelper  </ProjectBuildDependency>
+<ProjectBuildDependency>    cppu        </ProjectBuildDependency>
+<ProjectBuildDependency>    vos         </ProjectBuildDependency>
+<ProjectBuildDependency>    sal         </ProjectBuildDependency>
+
+<RuntimeModuleDependency>   cppuhelper  </RuntimeModuleDependency>
+<RuntimeModuleDependency>   cppu2       </RuntimeModuleDependency>
+<RuntimeModuleDependency>   vos2MSC     </RuntimeModuleDependency>
+<RuntimeModuleDependency>   sal2        </RuntimeModuleDependency>
+
+<Type>   com.sun.star.io.XObjectInputStream                 </Type>
+<Type>   com.sun.star.io.XObjectOutputStream                    </Type>
+<Type>   com.sun.star.io.XActiveDataSource                  </Type>
+<Type>   com.sun.star.io.XActiveDataSink                    </Type>
+<Type>   com.sun.star.io.XMarkableStream                    </Type>
+<Type>   com.sun.star.io.UnexpectedEOFException                     </Type>
+<Type>   com.sun.star.io.WrongFormatException                           </Type>
+<Type>   com.sun.star.lang.XComponent                               </Type>
+<Type>   com.sun.star.lang.XMultiServiceFactory             </Type>
+<Type>   com.sun.star.lang.XSingleServiceFactory                    </Type>
+<Type>   com.sun.star.lang.XServiceInfo                                 </Type>
+<Type>   com.sun.star.lang.XTypeProvider                                </Type>
+<Type>   com.sun.star.lang.IllegalArgumentException                 </Type>
+<Type>   com.sun.star.registry.XRegistryKey                         </Type>
+<Type>   com.sun.star.registry.XImplementationRegistration          </Type>
+<Type>   com.sun.star.test.XSimpleTest                              </Type>
+<Type>   com.sun.star.uno.TypeClass                                 </Type>
+<Type>   com.sun.star.uno.XWeak                                 </Type>
+<Type>   com.sun.star.uno.XAggregation                              </Type>
+
+</COMPONENTDESCRIPTION>
+
+
+
+<COMPONENTDESCRIPTION
+    xmlns:xlink="http://www.w3.org/1999/xlink/Namespace" >
+
+<Author> Joerg Budischewski </Author>
+
+<Name>  com.sun.star.comp.io.stm.DataInputStream </Name>
+
+<Description>
+    This component provides ...
+</Description>
+
+<ModuleName>    acceptor    </ModuleName>
+
+<LoaderName>    com.sun.star.loader.SharedLibrary   </LoaderName>
+
+<Language>  c++ </Language>
+
+<Status StatusValue="final"/>
+
+<SupportedService>  com.sun.star.io.DataInputStream </SupportedService>
+
+<ServiceDependency> ... </ServiceDependency>
+
+<ProjectBuildDependency>    cppuhelper  </ProjectBuildDependency>
+<ProjectBuildDependency>    cppu        </ProjectBuildDependency>
+<ProjectBuildDependency>    sal         </ProjectBuildDependency>
+
+<RuntimeModuleDependency>   cppuhelper  </RuntimeModuleDependency>
+<RuntimeModuleDependency>   cppu2       </RuntimeModuleDependency>
+<RuntimeModuleDependency>   sal2        </RuntimeModuleDependency>
+
+<Type>   com.sun.star.io.XObjectInputStream                 </Type>
+<Type>   com.sun.star.io.XObjectOutputStream                    </Type>
+<Type>   com.sun.star.io.XActiveDataSource                  </Type>
+<Type>   com.sun.star.io.XActiveDataSink                    </Type>
+<Type>   com.sun.star.io.XMarkableStream                    </Type>
+<Type>   com.sun.star.io.UnexpectedEOFException                     </Type>
+<Type>   com.sun.star.io.WrongFormatException                           </Type>
+<Type>   com.sun.star.lang.XComponent                               </Type>
+<Type>   com.sun.star.lang.XMultiServiceFactory             </Type>
+<Type>   com.sun.star.lang.XSingleServiceFactory                    </Type>
+<Type>   com.sun.star.lang.XServiceInfo                                 </Type>
+<Type>   com.sun.star.lang.XTypeProvider                                </Type>
+<Type>   com.sun.star.lang.IllegalArgumentException                 </Type>
+<Type>   com.sun.star.registry.XRegistryKey                         </Type>
+<Type>   com.sun.star.registry.XImplementationRegistration          </Type>
+<Type>   com.sun.star.test.XSimpleTest                              </Type>
+<Type>   com.sun.star.uno.TypeClass                                 </Type>
+<Type>   com.sun.star.uno.XWeak                                 </Type>
+<Type>   com.sun.star.uno.XAggregation                              </Type>
+
+</COMPONENTDESCRIPTION>
+
+<COMPONENTDESCRIPTION
+    xmlns:xlink="http://www.w3.org/1999/xlink/Namespace" >
+
+<Author> Joerg Budischewski </Author>
+
+<Name>  com.sun.star.comp.io.stm.DataOutputStream </Name>
+
+<Description>
+    This component provides ...
+</Description>
+
+<ModuleName>    acceptor    </ModuleName>
+
+<LoaderName>    com.sun.star.loader.SharedLibrary   </LoaderName>
+
+<Language>  c++ </Language>
+
+<Status StatusValue="final"/>
+
+<SupportedService>  com.sun.star.io.DataOutputStream    </SupportedService>
+
+<ServiceDependency> ... </ServiceDependency>
+
+<ProjectBuildDependency>    cppuhelper  </ProjectBuildDependency>
+<ProjectBuildDependency>    cppu        </ProjectBuildDependency>
+<ProjectBuildDependency>    sal         </ProjectBuildDependency>
+
+<RuntimeModuleDependency>   cppuhelper  </RuntimeModuleDependency>
+<RuntimeModuleDependency>   cppu2       </RuntimeModuleDependency>
+<RuntimeModuleDependency>   sal2        </RuntimeModuleDependency>
+
+<Type>   com.sun.star.io.XObjectInputStream                 </Type>
+<Type>   com.sun.star.io.XObjectOutputStream                    </Type>
+<Type>   com.sun.star.io.XActiveDataSource                  </Type>
+<Type>   com.sun.star.io.XActiveDataSink                    </Type>
+<Type>   com.sun.star.io.XMarkableStream                    </Type>
+<Type>   com.sun.star.io.UnexpectedEOFException                     </Type>
+<Type>   com.sun.star.io.WrongFormatException                           </Type>
+<Type>   com.sun.star.lang.XComponent                               </Type>
+<Type>   com.sun.star.lang.XMultiServiceFactory             </Type>
+<Type>   com.sun.star.lang.XSingleServiceFactory                    </Type>
+<Type>   com.sun.star.lang.XServiceInfo                                 </Type>
+<Type>   com.sun.star.lang.XTypeProvider                                </Type>
+<Type>   com.sun.star.lang.IllegalArgumentException                 </Type>
+<Type>   com.sun.star.registry.XRegistryKey                         </Type>
+<Type>   com.sun.star.registry.XImplementationRegistration          </Type>
+<Type>   com.sun.star.test.XSimpleTest                              </Type>
+<Type>   com.sun.star.uno.TypeClass                                 </Type>
+<Type>   com.sun.star.uno.XWeak                                 </Type>
+<Type>   com.sun.star.uno.XAggregation                              </Type>
+
+</COMPONENTDESCRIPTION>
+
+
+<COMPONENTDESCRIPTION
+    xmlns:xlink="http://www.w3.org/1999/xlink/Namespace" >
+
+<Author> Joerg Budischewski </Author>
+
+<Name>  com.sun.star.comp.io.stm.ObjectInputStream </Name>
+
+<Description>
+    This component provides ...
+</Description>
+
+<ModuleName>    acceptor    </ModuleName>
+
+<LoaderName>    com.sun.star.loader.SharedLibrary   </LoaderName>
+
+<Language>  c++ </Language>
+
+<Status StatusValue="final"/>
+
+<SupportedService>  com.sun.star.io.ObjectInputStream   </SupportedService>
+
+<ServiceDependency> ... </ServiceDependency>
+
+<ProjectBuildDependency>    cppuhelper  </ProjectBuildDependency>
+<ProjectBuildDependency>    cppu        </ProjectBuildDependency>
+<ProjectBuildDependency>    sal         </ProjectBuildDependency>
+
+<RuntimeModuleDependency>   cppuhelper  </RuntimeModuleDependency>
+<RuntimeModuleDependency>   cppu2       </RuntimeModuleDependency>
+<RuntimeModuleDependency>   sal2        </RuntimeModuleDependency>
+
+<Type>   com.sun.star.io.XObjectInputStream                 </Type>
+<Type>   com.sun.star.io.XObjectOutputStream                    </Type>
+<Type>   com.sun.star.io.XActiveDataSource                  </Type>
+<Type>   com.sun.star.io.XActiveDataSink                    </Type>
+<Type>   com.sun.star.io.XMarkableStream                    </Type>
+<Type>   com.sun.star.io.UnexpectedEOFException                     </Type>
+<Type>   com.sun.star.io.WrongFormatException                           </Type>
+<Type>   com.sun.star.lang.XComponent                               </Type>
+<Type>   com.sun.star.lang.XMultiServiceFactory             </Type>
+<Type>   com.sun.star.lang.XSingleServiceFactory                    </Type>
+<Type>   com.sun.star.lang.XServiceInfo                                 </Type>
+<Type>   com.sun.star.lang.XTypeProvider                                </Type>
+<Type>   com.sun.star.lang.IllegalArgumentException                 </Type>
+<Type>   com.sun.star.registry.XRegistryKey                         </Type>
+<Type>   com.sun.star.registry.XImplementationRegistration          </Type>
+<Type>   com.sun.star.test.XSimpleTest                              </Type>
+<Type>   com.sun.star.uno.TypeClass                                 </Type>
+<Type>   com.sun.star.uno.XWeak                                 </Type>
+<Type>   com.sun.star.uno.XAggregation                              </Type>
+
+</COMPONENTDESCRIPTION>
+
+
+<COMPONENTDESCRIPTION
+    xmlns:xlink="http://www.w3.org/1999/xlink/Namespace" >
+
+<Author> Joerg Budischewski </Author>
+
+<Name>  com.sun.star.comp.io.stm.ObjectOutputStream </Name>
+
+<Description>
+    This component provides ...
+</Description>
+
+<ModuleName>    acceptor    </ModuleName>
+
+<LoaderName>    com.sun.star.loader.SharedLibrary   </LoaderName>
+
+<Language>  c++ </Language>
+
+<Status StatusValue="final"/>
+
+<SupportedService>  com.sun.star.io.ObjectOutputStream  </SupportedService>
+
+<ServiceDependency> ... </ServiceDependency>
+
+<ProjectBuildDependency>    cppuhelper  </ProjectBuildDependency>
+<ProjectBuildDependency>    cppu        </ProjectBuildDependency>
+<ProjectBuildDependency>    sal         </ProjectBuildDependency>
+
+<RuntimeModuleDependency>   cppuhelper  </RuntimeModuleDependency>
+<RuntimeModuleDependency>   cppu2       </RuntimeModuleDependency>
+<RuntimeModuleDependency>   sal2        </RuntimeModuleDependency>
+
+<Type>   com.sun.star.io.XObjectInputStream                 </Type>
+<Type>   com.sun.star.io.XObjectOutputStream                    </Type>
+<Type>   com.sun.star.io.XActiveDataSource                  </Type>
+<Type>   com.sun.star.io.XActiveDataSink                    </Type>
+<Type>   com.sun.star.io.XMarkableStream                    </Type>
+<Type>   com.sun.star.io.UnexpectedEOFException                     </Type>
+<Type>   com.sun.star.io.WrongFormatException                           </Type>
+<Type>   com.sun.star.lang.XComponent                               </Type>
+<Type>   com.sun.star.lang.XMultiServiceFactory             </Type>
+<Type>   com.sun.star.lang.XSingleServiceFactory                    </Type>
+<Type>   com.sun.star.lang.XServiceInfo                                 </Type>
+<Type>   com.sun.star.lang.XTypeProvider                                </Type>
+<Type>   com.sun.star.lang.IllegalArgumentException                 </Type>
+<Type>   com.sun.star.registry.XRegistryKey                         </Type>
+<Type>   com.sun.star.registry.XImplementationRegistration          </Type>
+<Type>   com.sun.star.test.XSimpleTest                              </Type>
+<Type>   com.sun.star.uno.TypeClass                                 </Type>
+<Type>   com.sun.star.uno.XWeak                                 </Type>
+<Type>   com.sun.star.uno.XAggregation                              </Type>
+
+</COMPONENTDESCRIPTION>
+
+
+<COMPONENTDESCRIPTION
+    xmlns:xlink="http://www.w3.org/1999/xlink/Namespace" >
+
+<Author> Joerg Budischewski </Author>
+
+<Name>  com.sun.star.comp.io.stm.MarkableInputStream </Name>
+
+<Description>
+    This component provides ...
+</Description>
+
+<ModuleName>    acceptor    </ModuleName>
+
+<LoaderName>    com.sun.star.loader.SharedLibrary   </LoaderName>
+
+<Language>  c++ </Language>
+
+<Status StatusValue="final"/>
+
+<SupportedService>  com.sun.star.io.MarkableInputStream </SupportedService>
+
+<ServiceDependency> ... </ServiceDependency>
+
+<ProjectBuildDependency>    cppuhelper  </ProjectBuildDependency>
+<ProjectBuildDependency>    cppu        </ProjectBuildDependency>
+<ProjectBuildDependency>    sal         </ProjectBuildDependency>
+
+<RuntimeModuleDependency>   cppuhelper  </RuntimeModuleDependency>
+<RuntimeModuleDependency>   cppu2       </RuntimeModuleDependency>
+<RuntimeModuleDependency>   sal2        </RuntimeModuleDependency>
+
+<Type>   com.sun.star.io.XObjectInputStream                 </Type>
+<Type>   com.sun.star.io.XObjectOutputStream                    </Type>
+<Type>   com.sun.star.io.XActiveDataSource                  </Type>
+<Type>   com.sun.star.io.XActiveDataSink                    </Type>
+<Type>   com.sun.star.io.XMarkableStream                    </Type>
+<Type>   com.sun.star.io.UnexpectedEOFException                     </Type>
+<Type>   com.sun.star.io.WrongFormatException                           </Type>
+<Type>   com.sun.star.lang.XComponent                               </Type>
+<Type>   com.sun.star.lang.XMultiServiceFactory             </Type>
+<Type>   com.sun.star.lang.XSingleServiceFactory                    </Type>
+<Type>   com.sun.star.lang.XServiceInfo                                 </Type>
+<Type>   com.sun.star.lang.XTypeProvider                                </Type>
+<Type>   com.sun.star.lang.IllegalArgumentException                 </Type>
+<Type>   com.sun.star.registry.XRegistryKey                         </Type>
+<Type>   com.sun.star.registry.XImplementationRegistration          </Type>
+<Type>   com.sun.star.test.XSimpleTest                              </Type>
+<Type>   com.sun.star.uno.TypeClass                                 </Type>
+<Type>   com.sun.star.uno.XWeak                                 </Type>
+<Type>   com.sun.star.uno.XAggregation                              </Type>
+
+</COMPONENTDESCRIPTION>
+
+<COMPONENTDESCRIPTION
+    xmlns:xlink="http://www.w3.org/1999/xlink/Namespace" >
+
+<Author> Joerg Budischewski </Author>
+
+<Name>  com.sun.star.comp.io.stm.MarkableOutputStream </Name>
+
+<Description>
+    This component provides ...
+</Description>
+
+<ModuleName>    acceptor    </ModuleName>
+
+<LoaderName>    com.sun.star.loader.SharedLibrary   </LoaderName>
+
+<Language>  c++ </Language>
+
+<Status StatusValue="final"/>
+
+<SupportedService>  com.sun.star.io.MarkableOutputStream    </SupportedService>
+
+<ServiceDependency> ... </ServiceDependency>
+
+<ProjectBuildDependency>    cppuhelper  </ProjectBuildDependency>
+<ProjectBuildDependency>    cppu        </ProjectBuildDependency>
+<ProjectBuildDependency>    sal         </ProjectBuildDependency>
+
+<RuntimeModuleDependency>   cppuhelper  </RuntimeModuleDependency>
+<RuntimeModuleDependency>   cppu2       </RuntimeModuleDependency>
+<RuntimeModuleDependency>   sal2        </RuntimeModuleDependency>
+
+<Type>   com.sun.star.io.XObjectInputStream                 </Type>
+<Type>   com.sun.star.io.XObjectOutputStream                    </Type>
+<Type>   com.sun.star.io.XActiveDataSource                  </Type>
+<Type>   com.sun.star.io.XActiveDataSink                    </Type>
+<Type>   com.sun.star.io.XMarkableStream                    </Type>
+<Type>   com.sun.star.io.UnexpectedEOFException                     </Type>
+<Type>   com.sun.star.io.WrongFormatException                           </Type>
+<Type>   com.sun.star.lang.XComponent                               </Type>
+<Type>   com.sun.star.lang.XMultiServiceFactory             </Type>
+<Type>   com.sun.star.lang.XSingleServiceFactory                    </Type>
+<Type>   com.sun.star.lang.XServiceInfo                                 </Type>
+<Type>   com.sun.star.lang.XTypeProvider                                </Type>
+<Type>   com.sun.star.lang.IllegalArgumentException                 </Type>
+<Type>   com.sun.star.registry.XRegistryKey                         </Type>
+<Type>   com.sun.star.registry.XImplementationRegistration          </Type>
+<Type>   com.sun.star.test.XSimpleTest                              </Type>
+<Type>   com.sun.star.uno.TypeClass                                 </Type>
+<Type>   com.sun.star.uno.XWeak                                 </Type>
+<Type>   com.sun.star.uno.XAggregation                              </Type>
+
+</COMPONENTDESCRIPTION>
+
+
+<COMPONENTDESCRIPTION
+    xmlns:xlink="http://www.w3.org/1999/xlink/Namespace" >
+
+<Author> Juergen Schmidt </Author>
+
+<Name>  com.sun.star.comp.stoc.Pump </Name>
+
+<Description>
+    This component provides ...
+</Description>
+
+<ModuleName>    io  </ModuleName>
+
+<LoaderName>    com.sun.star.loader.SharedLibrary   </LoaderName>
+
+<Language>  c++ </Language>
+
+<Status StatusValue="final"/>
+
+<SupportedService>  com.sun.star.io.Pump    </SupportedService>
+
+<ServiceDependency> ... </ServiceDependency>
+
+<ProjectBuildDependency>    cppuhelper  </ProjectBuildDependency>
+<ProjectBuildDependency>    cppu        </ProjectBuildDependency>
+<ProjectBuildDependency>    sal         </ProjectBuildDependency>
+
+<RuntimeModuleDependency>   cppuhelper  </RuntimeModuleDependency>
+<RuntimeModuleDependency>   cppu1       </RuntimeModuleDependency>
+<RuntimeModuleDependency>   sal1        </RuntimeModuleDependency>
+
+<Type>  com.sun.star.io.XConnectable                </Type>
+<Type>  com.sun.star.io.XActiveDataSource           </Type>
+<Type>  com.sun.star.io.XActiveDataSink             </Type>
+<Type>  com.sun.star.io.XActiveDataControl          </Type>
+<Type>  com.sun.star.lang.XTypeProvider             </Type>
+<Type>  com.sun.star.lang.XServiceInfo              </Type>
+<Type>  com.sun.star.lang.XSingleServiceFactory     </Type>
+<Type>  com.sun.star.lang.XMultiServiceFactory      </Type>
+<Type>  com.sun.star.registry.XRegistryKey          </Type>
+<Type>  com.sun.star.uno.XAggregation               </Type>
+<Type>  com.sun.star.uno.XWeak                      </Type>
+<Type>  com.sun.star.uno.TypeClass                  </Type>
+
+</COMPONENTDESCRIPTION>
+
diff --git a/io/source/stm/streamhelper.cxx b/io/source/stm/streamhelper.cxx
new file mode 100644
index 000000000000..9d4bd79e66a6
--- /dev/null
+++ b/io/source/stm/streamhelper.cxx
@@ -0,0 +1,275 @@
+/*************************************************************************
+ *
+ *  $RCSfile: streamhelper.cxx,v $
+ *
+ *  $Revision: 1.1.1.1 $
+ *
+ *  last change: $Author: hr $ $Date: 2000-09-18 17:24:18 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library 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
+ *  Lesser General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (the "License"); You may not use this file
+ *  except in compliance with the License. You may obtain a copy of the
+ *  License at http://www.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+#include <rtl/alloc.h>
+
+#include <assert.h>
+#include <string.h>
+
+#include <com/sun/star/uno/Sequence.hxx>
+
+#include <com/sun/star/uno/Exception.hpp>
+
+using namespace ::com::sun::star::uno;
+
+#include "streamhelper.hxx"
+
+namespace io_stm {
+
+void MemFIFO::write( const Sequence< sal_Int8 > &seq )
+    throw ( IFIFO_OutOfMemoryException,
+            IFIFO_OutOfBoundsException )
+{
+    try
+    {
+        writeAt(getSize(), seq );
+    }
+    catch( IRingBuffer_OutOfMemoryException & )
+    {
+        throw IFIFO_OutOfMemoryException();
+    }
+    catch( IRingBuffer_OutOfBoundsException & )
+    {
+        throw IFIFO_OutOfBoundsException();
+    }
+}
+
+void MemFIFO::read( Sequence<sal_Int8> &seq , sal_Int32 nBufferLen ) throw (IFIFO_OutOfBoundsException)
+{
+    try
+    {
+        readAt(0, seq , nBufferLen);
+        forgetFromStart( nBufferLen );
+    }
+    catch ( IRingBuffer_OutOfBoundsException & )
+    {
+        throw IFIFO_OutOfBoundsException();
+    }
+}
+
+void MemFIFO::skip( sal_Int32 nBytesToSkip ) throw ( IFIFO_OutOfBoundsException )
+{
+    try
+    {
+        forgetFromStart( nBytesToSkip );
+    }
+    catch( IRingBuffer_OutOfBoundsException & )
+    {
+        throw IFIFO_OutOfBoundsException();
+    }
+}
+
+
+
+MemRingBuffer::MemRingBuffer()
+{
+    m_nBufferLen            = 0;
+    m_p                     = 0;
+    m_nStart                = 0;
+    m_nOccupiedBuffer       = 0;
+}
+
+MemRingBuffer::~MemRingBuffer()
+{
+    if( m_p ) {
+        rtl_freeMemory( m_p );
+    }
+}
+
+void MemRingBuffer::resizeBuffer( sal_Int32 nMinSize ) throw( IRingBuffer_OutOfMemoryException)
+{
+    sal_Int32 nNewLen = 1;
+
+    while( nMinSize > nNewLen ) {
+        nNewLen = nNewLen << 1;
+    }
+
+    // buffer never shrinks !
+    if( nNewLen < m_nBufferLen ) {
+        nNewLen = m_nBufferLen;
+    }
+
+    if( nNewLen != m_nBufferLen ) {
+        m_p = ( sal_Int8 * ) rtl_reallocateMemory( m_p , nNewLen );
+        if( !m_p ) {
+            throw IRingBuffer_OutOfMemoryException();
+        }
+
+        if( m_nStart + m_nOccupiedBuffer > m_nBufferLen ) {
+            memmove( &( m_p[m_nStart+(nNewLen-m_nBufferLen)]) , &(m_p[m_nStart]) , m_nBufferLen - m_nStart );
+            m_nStart += nNewLen - m_nBufferLen;
+        }
+        m_nBufferLen = nNewLen;
+    }
+}
+
+
+void MemRingBuffer::readAt( sal_Int32 nPos, Sequence<sal_Int8> &seq , sal_Int32 nBytesToRead ) const
+                                                        throw(IRingBuffer_OutOfBoundsException)
+{
+    if( nPos + nBytesToRead > m_nOccupiedBuffer ) {
+        throw IRingBuffer_OutOfBoundsException();
+    }
+
+    sal_Int32 nStartReadingPos = nPos + m_nStart;
+    if( nStartReadingPos >= m_nBufferLen ) {
+        nStartReadingPos -= m_nBufferLen;
+    }
+
+    seq.realloc( nBytesToRead );
+
+    if( nStartReadingPos + nBytesToRead > m_nBufferLen ) {
+        sal_Int32 nDeltaLen = m_nBufferLen - nStartReadingPos;
+        memcpy( seq.getArray() , &(m_p[nStartReadingPos]) , nDeltaLen );
+        memcpy( &(seq.getArray()[nDeltaLen]), m_p , nBytesToRead - nDeltaLen );
+    }
+    else {
+        memcpy( seq.getArray() , &(m_p[nStartReadingPos]) , nBytesToRead );
+    }
+}
+
+
+void MemRingBuffer::writeAt( sal_Int32 nPos, const Sequence<sal_Int8> &seq )
+                                                        throw (IRingBuffer_OutOfBoundsException,
+                                                                IRingBuffer_OutOfMemoryException )
+{
+    checkInvariants();
+    sal_Int32 nLen = seq.getLength();
+
+    if( nPos > 0x80000000 || nPos < 0 ||  nPos + nLen < 0 || nPos + nLen > 0x80000000 )
+    {
+        throw IRingBuffer_OutOfBoundsException();
+    }
+
+    if( nPos + nLen - m_nOccupiedBuffer > 0 ) {
+        resizeBuffer( nPos + seq.getLength() );
+    }
+
+    sal_Int32 nStartWritingIndex = m_nStart + nPos;
+    if( nStartWritingIndex >= m_nBufferLen ) {
+        nStartWritingIndex -= m_nBufferLen;
+    }
+
+    if( nLen + nStartWritingIndex > m_nBufferLen ) {
+        // two area copy
+        memcpy( &(m_p[nStartWritingIndex]) , seq.getConstArray(), m_nBufferLen-nStartWritingIndex );
+        memcpy( m_p , &( seq.getConstArray()[m_nBufferLen-nStartWritingIndex] ),
+                                        nLen - (m_nBufferLen-nStartWritingIndex) );
+
+    }
+    else {
+        // one area copy
+        memcpy( &( m_p[nStartWritingIndex]), seq.getConstArray() , nLen );
+    }
+    m_nOccupiedBuffer = Max( nPos + seq.getLength() , m_nOccupiedBuffer );
+    checkInvariants();
+}
+
+
+sal_Int32 MemRingBuffer::getSize()  const throw()
+{
+    return m_nOccupiedBuffer;
+}
+
+void MemRingBuffer::forgetFromStart( sal_Int32 nBytesToForget ) throw (IRingBuffer_OutOfBoundsException)
+{
+    checkInvariants();
+    if( nBytesToForget > m_nOccupiedBuffer ) {
+        throw IRingBuffer_OutOfBoundsException();
+    }
+    m_nStart += nBytesToForget;
+    if( m_nStart >= m_nBufferLen ) {
+        m_nStart = m_nStart - m_nBufferLen;
+    }
+    m_nOccupiedBuffer -= nBytesToForget;
+    checkInvariants();
+}
+
+
+void MemRingBuffer::forgetFromEnd( sal_Int32 nBytesToForget ) throw (IRingBuffer_OutOfBoundsException)
+{
+    checkInvariants();
+    if( nBytesToForget > m_nOccupiedBuffer ) {
+        throw IRingBuffer_OutOfBoundsException();
+    }
+    m_nOccupiedBuffer -= nBytesToForget;
+    checkInvariants();
+}
+
+
+void MemRingBuffer::shrink() throw ()
+{
+    checkInvariants();
+
+    // Up to now, only shrinking of while buffer works.
+    // No other shrinking supported up to now.
+    if( ! m_nOccupiedBuffer ) {
+        if( m_p ) {
+            free( m_p );
+        }
+        m_p = 0;
+        m_nBufferLen = 0;
+        m_nStart = 0;
+    }
+
+    checkInvariants();
+}
+
+}
diff --git a/io/source/stm/streamhelper.hxx b/io/source/stm/streamhelper.hxx
new file mode 100644
index 000000000000..6c6c154a968d
--- /dev/null
+++ b/io/source/stm/streamhelper.hxx
@@ -0,0 +1,177 @@
+/*************************************************************************
+ *
+ *  $RCSfile: streamhelper.hxx,v $
+ *
+ *  $Revision: 1.1.1.1 $
+ *
+ *  last change: $Author: hr $ $Date: 2000-09-18 17:24:18 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  This library 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
+ *  Lesser General Public License for more details.
+ *
+ *  You should have received a copy of the GNU Lesser General Public
+ *  License along with this library; if not, write to the Free Software
+ *  Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ *  MA  02111-1307  USA
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (the "License"); You may not use this file
+ *  except in compliance with the License. You may obtain a copy of the
+ *  License at http://www.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+#define Max( a, b )     (((a)>(b)) ? (a) : (b) )
+#define Min( a, b )     (((a)<(b)) ? (a) : (b) )
+
+namespace io_stm {
+
+class IFIFO_OutOfBoundsException :
+                public Exception
+{};
+
+class IFIFO_OutOfMemoryException :
+                public Exception
+{};
+
+class IFIFO
+{
+public:
+
+
+    virtual void    write( const Sequence<sal_Int8> &) throw( IFIFO_OutOfMemoryException,
+                                                              IFIFO_OutOfBoundsException )=0;
+
+    virtual void    read( Sequence<sal_Int8> & , sal_Int32 nBytesToRead )
+                                                    throw( IFIFO_OutOfBoundsException )=0;
+    virtual void    skip( sal_Int32 nBytesToSkip )
+                                        throw( IFIFO_OutOfBoundsException )=0;
+    virtual sal_Int32   getSize() const throw(  )  =0;
+    virtual void    shrink() throw() = 0;
+
+    virtual ~IFIFO() {};
+};
+
+
+class IRingBuffer_OutOfBoundsException :
+                public Exception
+{};
+
+class IRingBuffer_OutOfMemoryException :
+                public Exception
+{};
+
+class IRingBuffer
+{
+public:
+    /***
+    * overwrites data at given position. Size is automatically extended, when
+    * data is written beyond end.
+    *
+    ***/
+
+    virtual void    writeAt( sal_Int32 nPos, const Sequence<sal_Int8> &)
+        throw( IRingBuffer_OutOfMemoryException,
+               IRingBuffer_OutOfBoundsException )=0;
+    virtual void    readAt( sal_Int32 nPos, Sequence<sal_Int8> & , sal_Int32 nBytesToRead ) const
+        throw( IRingBuffer_OutOfBoundsException )=0;
+    virtual sal_Int32   getSize() const throw(  )  =0;
+    virtual void    forgetFromStart( sal_Int32 nBytesToForget ) throw()=0;
+    virtual void    forgetFromEnd( sal_Int32 nBytesToForget ) throw()=0;
+    virtual void    shrink() throw() = 0;
+    virtual ~IRingBuffer() {};
+};
+
+
+class MemRingBuffer :
+        public IRingBuffer
+{
+public:
+    MemRingBuffer();
+    virtual ~MemRingBuffer();
+
+    virtual void    writeAt( sal_Int32 nPos, const Sequence<sal_Int8> &)
+                                                    throw(  IRingBuffer_OutOfMemoryException,
+                                                                IRingBuffer_OutOfBoundsException );
+    virtual void    readAt( sal_Int32 nPos, Sequence<sal_Int8> & , sal_Int32 nBytesToRead ) const
+                                                    throw( IRingBuffer_OutOfBoundsException );
+    virtual sal_Int32   getSize() const throw(  );
+    virtual void    forgetFromStart( sal_Int32 nBytesToForget ) throw(IRingBuffer_OutOfBoundsException);
+    virtual void    forgetFromEnd( sal_Int32 nBytesToForget ) throw(IRingBuffer_OutOfBoundsException);
+
+    virtual void shrink() throw();
+
+private:
+
+    void resizeBuffer( sal_Int32 nMinSize ) throw( IRingBuffer_OutOfMemoryException );
+    inline void checkInvariants()
+    {
+        assert( m_nBufferLen >= 0 );
+        assert( m_nOccupiedBuffer >= 0 );
+        assert( m_nOccupiedBuffer <= m_nBufferLen );
+        assert( m_nStart >= 0 );
+        assert( 0 == m_nStart || m_nStart < m_nBufferLen );
+    }
+
+    sal_Int8    *m_p;
+    sal_Int32   m_nBufferLen;
+    sal_Int32   m_nStart;
+    sal_Int32   m_nOccupiedBuffer;
+};
+
+
+class MemFIFO :
+        public  IFIFO,
+        private MemRingBuffer
+{
+public:
+    virtual void    write( const Sequence<sal_Int8> &) throw( IFIFO_OutOfMemoryException,
+                                                              IFIFO_OutOfBoundsException );
+    virtual void    read( Sequence<sal_Int8> & , sal_Int32 nBytesToRead )
+                                                    throw( IFIFO_OutOfBoundsException );
+    virtual void    skip( sal_Int32 nBytesToSkip ) throw( IFIFO_OutOfBoundsException );
+    virtual sal_Int32   getSize()  const throw(  )
+                        { return MemRingBuffer::getSize(); }
+    virtual void    shrink() throw()
+                        { MemRingBuffer::shrink(); }
+
+};
+
+}