diff options
Diffstat (limited to 'cppu/test/alignment/pass1.cxx')
| -rw-r--r-- | cppu/test/alignment/pass1.cxx | 243 |
1 files changed, 243 insertions, 0 deletions
diff --git a/cppu/test/alignment/pass1.cxx b/cppu/test/alignment/pass1.cxx new file mode 100644 index 000000000000..0a0f4b7c726c --- /dev/null +++ b/cppu/test/alignment/pass1.cxx @@ -0,0 +1,243 @@ +/************************************************************************* + * + * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. + * + * Copyright 2008 by Sun Microsystems, Inc. + * + * OpenOffice.org - a multi-platform office productivity suite + * + * $RCSfile: pass1.cxx,v $ + * $Revision: 1.6 $ + * + * This file is part of OpenOffice.org. + * + * OpenOffice.org is free software: you can redistribute it and/or modify + * it under the terms of the GNU Lesser General Public License version 3 + * only, as published by the Free Software Foundation. + * + * OpenOffice.org 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 version 3 for more details + * (a copy is included in the LICENSE file that accompanied this code). + * + * You should have received a copy of the GNU Lesser General Public License + * version 3 along with OpenOffice.org. If not, see + * <http://www.openoffice.org/license.html> + * for a copy of the LGPLv3 License. + * + ************************************************************************/ + +// MARKER(update_precomp.py): autogen include statement, do not remove +#include "precompiled_cppu.hxx" + +#include "sal/main.h" + +#include <stdio.h> +#include <vector> + +#include <rtl/string.hxx> +#include <rtl/strbuf.hxx> +#include <rtl/bootstrap.hxx> +#include <rtl/process.h> + +#include <registry/reflread.hxx> + +// starting the executable: +// -env:UNO_CFG_URL=local;<absolute_path>..\\..\\test\\cfg_data;<absolute_path>\\cfg_update +// -env:UNO_TYPES=cpputest.rdb + +#include <cppuhelper/bootstrap.hxx> + +#include <com/sun/star/lang/XComponent.hpp> +#include <com/sun/star/registry/XRegistryKey.hpp> +#include <com/sun/star/registry/XSimpleRegistry.hpp> + +#define OUSTR(x) ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM(x) ) +#define OSTR(x) ::rtl::OUStringToOString( x, RTL_TEXTENCODING_ASCII_US ) + + +using namespace ::cppu; +using namespace ::rtl; +using namespace ::osl; +using namespace ::com::sun::star; +using namespace ::com::sun::star::uno; + + +static void find_all_structs( + Reference< registry::XRegistryKey > const & xKey, + ::std::vector< OUString > * pNames ) +{ + if (xKey.is() && xKey->isValid()) + { + if (xKey->getValueType() == registry::RegistryValueType_BINARY) + { + Sequence< sal_Int8 > aBytes( xKey->getBinaryValue() ); + RegistryTypeReader aReader( + (const sal_uInt8 *)aBytes.getConstArray(), + aBytes.getLength(), sal_False ); + + switch (aReader.getTypeClass()) + { + case RT_TYPE_EXCEPTION: + case RT_TYPE_STRUCT: + pNames->push_back( aReader.getTypeName().replace( '/', '.' ) ); + break; + default: + break; + } + } + + Sequence< Reference< registry::XRegistryKey > > keys( xKey->openKeys() ); + Reference< registry::XRegistryKey > const * pKeys = keys.getConstArray(); + for ( sal_Int32 nPos = keys.getLength(); nPos--; ) + { + find_all_structs( pKeys[ nPos ], pNames ); + } + } +} + +static OString makeIncludeName( OUString const & name ) SAL_THROW( () ) +{ + return OSTR(name.replace( '.', '/' )); +} +static OString makeCppName( OUString const & name ) SAL_THROW( () ) +{ + OStringBuffer buf( 64 ); + OString str( OSTR(name) ); + sal_Int32 n = 0; + do + { + buf.append( str.getToken( 0, '.', n ) ); + if (n >= 0) + buf.append( "::" ); + } + while (n >= 0); + return buf.makeStringAndClear(); +} + +//================================================================================================== +SAL_IMPLEMENT_MAIN() +{ + sal_Int32 argc = rtl_getAppCommandArgCount(); + if (argc < 1) + { + fprintf( stderr, "usage: pass1 pass2_source [typelist_to_stdout]\n" ); + return 1; + } + + try + { + // determine types rdb + OUString rdb_name; + Bootstrap bootstrap; + if (!bootstrap.getFrom( OUSTR("UNO_TYPES"), rdb_name ) || !rdb_name.getLength()) + { + fprintf( + stderr, + "### no UNO_TYPES registry found!!!\n\n" + "usage: pass1 pass2_source [typelist_to_stdout]\n" ); + return 1; + } + + Reference< XComponentContext > xContext( defaultBootstrap_InitialComponentContext() ); + + // read out all struct names from given registry + Reference< registry::XSimpleRegistry > xSimReg( createSimpleRegistry() ); + OSL_ASSERT( xSimReg.is() ); + xSimReg->open( rdb_name, sal_True, sal_False ); + OSL_ASSERT( xSimReg->isValid() ); + Reference< registry::XRegistryKey > xKey( xSimReg->getRootKey() ); + OSL_ASSERT( xKey.is() && xKey->isValid() ); + + ::std::vector< OUString > names; + names.reserve( 128 ); + find_all_structs( xKey->openKey( OUSTR("UCR") ), &names ); + + OUString fileName; + OSL_VERIFY( osl_Process_E_None == rtl_getAppCommandArg( 0, &fileName.pData ) ); + bool bDumpStdOut = (argc > 1); + + // generate pass2 output file [and type list] + OString str( OSTR(fileName) ); + FILE * hPass2 = fopen( str.getStr(), "w" ); + OSL_ASSERT( hPass2 ); + + size_t nPos; + for ( nPos = names.size(); nPos--; ) + { + OUString const & name = names[ nPos ]; + if (bDumpStdOut) + { + // type name on stdout + OString str2( OSTR(name) ); + fprintf( stdout, "%s\n", str2.getStr() ); + } + // all includes + OString includeName( makeIncludeName( name ) ); + fprintf( hPass2, "#include <%s.hdl>\n", includeName.getStr() ); + } + // include diagnose.h + fprintf( + hPass2, + "\n#include <diagnose.h>\n" + "#include \"sal/main.h\"\n\n" + "SAL_IMPLEMENT_MAIN()\n{\n" ); + // generate all type checks + for ( nPos = names.size(); nPos--; ) + { + OUString const & name = names[ nPos ]; + typelib_TypeDescription * pTD = 0; + typelib_typedescription_getByName( &pTD, name.pData ); + if (pTD) + { + if (! pTD->bComplete) + { + typelib_typedescription_complete( &pTD ); + } + typelib_CompoundTypeDescription * pCTD = (typelib_CompoundTypeDescription *)pTD; + + OString cppName( makeCppName( name ) ); + fprintf( + hPass2, "\tBINTEST_VERIFYSIZE( %s, %ld );\n", + cppName.getStr(), static_cast< long >(pTD->nSize) ); + fprintf( + hPass2, "\tBINTEST_VERIFYALIGNMENT( %s, %ld );\n", + cppName.getStr(), static_cast< long >(pTD->nAlignment) ); + // offset checks + for ( sal_Int32 nPos2 = pCTD->nMembers; nPos2--; ) + { + OString memberName( OSTR(pCTD->ppMemberNames[ nPos2 ]) ); + fprintf( + hPass2, "\tBINTEST_VERIFYOFFSET( %s, %s, %ld );\n", + cppName.getStr(), memberName.getStr(), + static_cast< long >(pCTD->pMemberOffsets[ nPos2 ]) ); + } + typelib_typedescription_release( pTD ); + } + else + { + OString str2( OSTR(name) ); + fprintf( stderr, "### cannot dump type %s!!!\n", str2.getStr() ); + } + } + fprintf( + hPass2, + "\n\tfprintf( stdout, \"> alignment test succeeded.\\n\" );\n" + "\treturn 0;\n}\n\n" ); + fclose( hPass2 ); + + Reference< lang::XComponent > xComp( xContext, UNO_QUERY ); + if (xComp.is()) + { + xComp->dispose(); + } + return 0; + } + catch (Exception & exc) + { + OString str( OUStringToOString( exc.Message, RTL_TEXTENCODING_ASCII_US ) ); + ::fprintf( stderr, "# caught exception: %s\n", str.getStr() ); + return 1; + } +} |