libxmlsec

1 files changed, 403 insertions, 0 deletions

diff --git a/xmlsecurity/source/xmlsec/mscrypt/xmlencryption_mscryptimpl.cxx b/xmlsecurity/source/xmlsec/mscrypt/xmlencryption_mscryptimpl.cxx
new file mode 100644
index 000000000000..9a4f0a0e6cc7
--- /dev/null
+++ b/xmlsecurity/source/xmlsec/mscrypt/xmlencryption_mscryptimpl.cxx
@@ -0,0 +1,403 @@
+/*************************************************************************
+ *
+ *  $RCSfile: xmlencryption_mscryptimpl.cxx,v $
+ *
+ *  $Revision: 1.1.1.1 $
+ *
+ *  last change: $Author: mt $ $Date: 2004-07-12 13:15:22 $
+ *
+ *  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): _______________________________________
+ *
+ *
+ ************************************************************************/
+
+#ifndef _SAL_CONFIG_H_
+#include <sal/config.h>
+#endif
+
+#ifndef _RTL_UUID_H_
+#include <rtl/uuid.h>
+#endif
+
+#ifndef _XMLENCRYPTION_MSCRYPTIMPL_HXX_
+#include "xmlencryption_mscryptimpl.hxx"
+#endif
+
+#ifndef _XMLDOCUMENTWRAPPER_XMLSECIMPL_HXX_
+#include "xmldocumentwrapper_xmlsecimpl.hxx"
+#endif
+
+#ifndef _XMLELEMENTWRAPPER_XMLSECIMPL_HXX_
+#include "xmlelementwrapper_xmlsecimpl.hxx"
+#endif
+
+#ifndef _XMLSECURITYCONTEXT_MSCRYPTIMPL_HXX_
+#include "xmlsecuritycontext_mscryptimpl.hxx"
+#endif
+
+#include "xmlsec/xmlsec.h"
+#include "xmlsec/xmltree.h"
+#include "xmlsec/xmlenc.h"
+#include "xmlsec/crypto.h"
+
+#ifdef UNX
+#define stricmp strcasecmp
+#endif
+
+using namespace ::com::sun::star::uno ;
+using namespace ::com::sun::star::lang ;
+using ::com::sun::star::lang::XMultiServiceFactory ;
+using ::com::sun::star::lang::XSingleServiceFactory ;
+using ::rtl::OUString ;
+
+using ::com::sun::star::xml::wrapper::XXMLElementWrapper ;
+using ::com::sun::star::xml::wrapper::XXMLDocumentWrapper ;
+using ::com::sun::star::xml::crypto::XSecurityEnvironment ;
+using ::com::sun::star::xml::crypto::XXMLEncryption ;
+using ::com::sun::star::xml::crypto::XXMLEncryptionTemplate ;
+using ::com::sun::star::xml::crypto::XXMLSecurityContext ;
+
+XMLEncryption_MSCryptImpl :: XMLEncryption_MSCryptImpl( const Reference< XMultiServiceFactory >& aFactory ) : m_xServiceManager( aFactory ) {
+}
+
+XMLEncryption_MSCryptImpl :: ~XMLEncryption_MSCryptImpl() {
+}
+
+/* XXMLEncryption */
+Reference< XXMLEncryptionTemplate >
+SAL_CALL XMLEncryption_MSCryptImpl :: encrypt(
+    const Reference< XXMLEncryptionTemplate >& aTemplate ,
+    const Reference< XXMLSecurityContext >& aSecurityCtx
+) throw( com::sun::star::xml::crypto::XMLEncryptionException,
+         com::sun::star::uno::SecurityException )
+{
+    xmlSecKeysMngrPtr pMngr = NULL ;
+    xmlSecEncCtxPtr pEncCtx = NULL ;
+    xmlNodePtr pEncryptedData = NULL ;
+    xmlNodePtr pEncryptedKey = NULL ;
+    xmlNodePtr pContent = NULL ;
+
+    if( !aTemplate.is() )
+        throw RuntimeException() ;
+
+    if( !aSecurityCtx.is() )
+        throw RuntimeException() ;
+
+    //Get Keys Manager
+    Reference< XUnoTunnel > xSecTunnel( aSecurityCtx , UNO_QUERY ) ;
+    if( !xSecTunnel.is() ) {
+         throw RuntimeException() ;
+    }
+
+    XMLSecurityContext_MSCryptImpl* pSecCtxt = ( XMLSecurityContext_MSCryptImpl* )xSecTunnel->getSomething( XMLSecurityContext_MSCryptImpl::getUnoTunnelId() ) ;
+    if( pSecCtxt == NULL )
+        throw RuntimeException() ;
+
+    pMngr = pSecCtxt->keysManager() ;
+
+
+    //Create Encryption context
+    pEncCtx = xmlSecEncCtxCreate( pMngr ) ;
+    if( pEncCtx == NULL )
+        throw RuntimeException() ;
+
+
+    //Get the encryption template
+    Reference< XXMLElementWrapper > xTemplate = aTemplate->getTemplate() ;
+    if( !xTemplate.is() ) {
+        xmlSecEncCtxDestroy( pEncCtx ) ;
+        throw RuntimeException() ;
+    }
+
+    Reference< XUnoTunnel > xTplTunnel( xTemplate , UNO_QUERY ) ;
+    if( !xTplTunnel.is() ) {
+        xmlSecEncCtxDestroy( pEncCtx ) ;
+        throw RuntimeException() ;
+    }
+
+    XMLElementWrapper_XmlSecImpl* pTemplate = ( XMLElementWrapper_XmlSecImpl* )xTplTunnel->getSomething( XMLElementWrapper_XmlSecImpl::getUnoTunnelImplementationId() ) ;
+    if( pTemplate == NULL ) {
+        xmlSecEncCtxDestroy( pEncCtx ) ;
+        throw RuntimeException() ;
+    }
+
+    pEncryptedData = pTemplate->getNativeElement() ;
+
+    //Find the element to be encrypted.
+    //This element is wrapped in the CipherValue sub-element.
+    xmlNodePtr pCipherData = pEncryptedData->children;
+    while (pCipherData != NULL && stricmp((const char *)(pCipherData->name), "CipherData"))
+    {
+        pCipherData = pCipherData->next;
+    }
+
+    if( pCipherData == NULL ) {
+        xmlSecEncCtxDestroy( pEncCtx ) ;
+        throw RuntimeException() ;
+    }
+
+    xmlNodePtr pCipherValue = pCipherData->children;
+    while (pCipherValue != NULL && stricmp((const char *)(pCipherValue->name), "CipherValue"))
+    {
+        pCipherValue = pCipherValue->next;
+    }
+
+    if( pCipherValue == NULL ) {
+        xmlSecEncCtxDestroy( pEncCtx ) ;
+        throw RuntimeException() ;
+    }
+
+    pContent = pCipherValue->children;
+
+    if( pContent == NULL ) {
+        xmlSecEncCtxDestroy( pEncCtx ) ;
+        throw RuntimeException() ;
+    }
+
+    xmlUnlinkNode(pContent);
+    xmlAddNextSibling(pEncryptedData, pContent);
+
+    //remember the position of the element to be signed
+    sal_Bool isParentRef = sal_True;
+    xmlNodePtr pParent = pEncryptedData->parent;
+    xmlNodePtr referenceNode;
+
+    if (pEncryptedData == pParent->children)
+    {
+        referenceNode = pParent;
+    }
+    else
+    {
+        referenceNode = pEncryptedData->prev;
+        isParentRef = sal_False;
+    }
+
+    //Encrypt the template
+    if( xmlSecEncCtxXmlEncrypt( pEncCtx , pEncryptedData , pContent ) < 0 ) {
+        xmlSecEncCtxDestroy( pEncCtx ) ;
+        throw RuntimeException() ;
+    }
+
+    xmlSecEncCtxDestroy( pEncCtx ) ;
+
+    //get the new EncryptedData element
+    if (isParentRef)
+    {
+        pTemplate->setNativeElement(referenceNode->children) ;
+    }
+    else
+    {
+        pTemplate->setNativeElement(referenceNode->next);
+    }
+
+    return aTemplate ;
+}
+
+/* XXMLEncryption */
+Reference< XXMLElementWrapper > SAL_CALL
+XMLEncryption_MSCryptImpl :: decrypt(
+    const Reference< XXMLEncryptionTemplate >& aTemplate ,
+    const Reference< XXMLSecurityContext >& aSecurityCtx
+) throw( com::sun::star::xml::crypto::XMLEncryptionException ,
+         com::sun::star::uno::SecurityException) {
+    xmlSecKeysMngrPtr pMngr = NULL ;
+    xmlSecEncCtxPtr pEncCtx = NULL ;
+    xmlNodePtr pEncryptedData = NULL ;
+    xmlNodePtr pContent = NULL ;
+
+    if( !aTemplate.is() )
+        throw RuntimeException() ;
+
+    if( !aSecurityCtx.is() )
+        throw RuntimeException() ;
+
+    //Get Keys Manager
+    Reference< XUnoTunnel > xSecTunnel( aSecurityCtx , UNO_QUERY ) ;
+    if( !xSecTunnel.is() ) {
+         throw RuntimeException() ;
+    }
+
+    XMLSecurityContext_MSCryptImpl* pSecCtxt = ( XMLSecurityContext_MSCryptImpl* )xSecTunnel->getSomething( XMLSecurityContext_MSCryptImpl::getUnoTunnelId() ) ;
+    if( pSecCtxt == NULL )
+        throw RuntimeException() ;
+
+    pMngr = pSecCtxt->keysManager() ;
+
+
+    //Create Encryption context
+    pEncCtx = xmlSecEncCtxCreate( pMngr ) ;
+    if( pEncCtx == NULL )
+        throw RuntimeException() ;
+
+
+    //Get the encryption template
+    Reference< XXMLElementWrapper > xTemplate = aTemplate->getTemplate() ;
+    if( !xTemplate.is() ) {
+        xmlSecEncCtxDestroy( pEncCtx ) ;
+        throw RuntimeException() ;
+    }
+
+    Reference< XUnoTunnel > xTplTunnel( xTemplate , UNO_QUERY ) ;
+    if( !xTplTunnel.is() ) {
+        xmlSecEncCtxDestroy( pEncCtx ) ;
+        throw RuntimeException() ;
+    }
+
+    XMLElementWrapper_XmlSecImpl* pTemplate = ( XMLElementWrapper_XmlSecImpl* )xTplTunnel->getSomething( XMLElementWrapper_XmlSecImpl::getUnoTunnelImplementationId() ) ;
+    if( pTemplate == NULL ) {
+        xmlSecEncCtxDestroy( pEncCtx ) ;
+        throw RuntimeException() ;
+    }
+
+    pEncryptedData = pTemplate->getNativeElement() ;
+
+    //remember the position of the element to be signed
+    sal_Bool isParentRef = sal_True;
+    xmlNodePtr pParent = pEncryptedData->parent;
+    xmlNodePtr referenceNode;
+
+    if (pEncryptedData == pParent->children)
+    {
+        referenceNode = pParent;
+    }
+    else
+    {
+        referenceNode = pEncryptedData->prev;
+        isParentRef = sal_False;
+    }
+
+    //Decrypt the template
+    if( xmlSecEncCtxDecrypt( pEncCtx , pEncryptedData ) < 0 || pEncCtx->result == NULL ) {
+        xmlSecEncCtxDestroy( pEncCtx ) ;
+        throw RuntimeException() ;
+    }
+    /*----------------------------------------
+    if( pEncCtx->resultReplaced != 0 ) {
+        pContent = pEncryptedData ;
+
+        Reference< XUnoTunnel > xTunnel( ret , UNO_QUERY ) ;
+        if( !xTunnel.is() ) {
+            xmlSecEncCtxDestroy( pEncCtx ) ;
+            throw RuntimeException() ;
+        }
+        XMLElementWrapper_XmlSecImpl* pNode = ( XMLElementWrapper_XmlSecImpl* )xTunnel->getSomething( XMLElementWrapper_XmlSecImpl::getUnoTunnelImplementationId() ) ;
+        if( pNode == NULL ) {
+            xmlSecEncCtxDestroy( pEncCtx ) ;
+            throw RuntimeException() ;
+        }
+
+        pNode->setNativeElement( pContent ) ;
+    } else {
+        xmlSecEncCtxDestroy( pEncCtx ) ;
+        throw RuntimeException() ;
+    }
+    ----------------------------------------*/
+
+    //Destroy the encryption context
+    xmlSecEncCtxDestroy( pEncCtx ) ;
+
+    //get the decrypted element
+    XMLElementWrapper_XmlSecImpl * ret = new XMLElementWrapper_XmlSecImpl(isParentRef?
+        (referenceNode->children):(referenceNode->next));
+
+    return ret;
+}
+
+/* XInitialization */
+void SAL_CALL XMLEncryption_MSCryptImpl :: initialize( const Sequence< Any >& aArguments ) throw( Exception, RuntimeException ) {
+    // TBD
+} ;
+
+/* XServiceInfo */
+OUString SAL_CALL XMLEncryption_MSCryptImpl :: getImplementationName() throw( RuntimeException ) {
+    return impl_getImplementationName() ;
+}
+
+/* XServiceInfo */
+sal_Bool SAL_CALL XMLEncryption_MSCryptImpl :: supportsService( const OUString& serviceName) throw( RuntimeException ) {
+    Sequence< OUString > seqServiceNames = getSupportedServiceNames() ;
+    const OUString* pArray = seqServiceNames.getConstArray() ;
+    for( sal_Int32 i = 0 ; i < seqServiceNames.getLength() ; i ++ ) {
+        if( *( pArray + i ) == serviceName )
+            return sal_True ;
+    }
+    return sal_False ;
+}
+
+/* XServiceInfo */
+Sequence< OUString > SAL_CALL XMLEncryption_MSCryptImpl :: getSupportedServiceNames() throw( RuntimeException ) {
+    return impl_getSupportedServiceNames() ;
+}
+
+//Helper for XServiceInfo
+Sequence< OUString > XMLEncryption_MSCryptImpl :: impl_getSupportedServiceNames() {
+    ::osl::Guard< ::osl::Mutex > aGuard( ::osl::Mutex::getGlobalMutex() ) ;
+    Sequence< OUString > seqServiceNames( 1 ) ;
+    seqServiceNames.getArray()[0] = OUString::createFromAscii( "com.sun.star.xml.crypto.XMLEncryption" ) ;
+    return seqServiceNames ;
+}
+
+OUString XMLEncryption_MSCryptImpl :: impl_getImplementationName() throw( RuntimeException ) {
+    return OUString::createFromAscii( "com.sun.star.xml.security.bridge.xmlsec.XMLEncryption_MSCryptImpl" ) ;
+}
+
+//Helper for registry
+Reference< XInterface > SAL_CALL XMLEncryption_MSCryptImpl :: impl_createInstance( const Reference< XMultiServiceFactory >& aServiceManager ) throw( RuntimeException ) {
+    return Reference< XInterface >( *new XMLEncryption_MSCryptImpl( aServiceManager ) ) ;
+}
+
+Reference< XSingleServiceFactory > XMLEncryption_MSCryptImpl :: impl_createFactory( const Reference< XMultiServiceFactory >& aServiceManager ) {
+    //Reference< XSingleServiceFactory > xFactory ;
+    //xFactory = ::cppu::createSingleFactory( aServiceManager , impl_getImplementationName , impl_createInstance , impl_getSupportedServiceNames ) ;
+    //return xFactory ;
+    return ::cppu::createSingleFactory( aServiceManager , impl_getImplementationName() , impl_createInstance , impl_getSupportedServiceNames() ) ;
+}
+