Skip to content
Projeler
Gruplar
Parçacıklar
Yardım
Yükleniyor...
Oturum aç / Kaydol
Gezinmeyi değiştir
C
core
Proje
Proje
Ayrıntılar
Etkinlik
Cycle Analytics
Depo (repository)
Depo (repository)
Dosyalar
Kayıtlar (commit)
Dallar (branch)
Etiketler
Katkıda bulunanlar
Grafik
Karşılaştır
Grafikler
Konular (issue)
0
Konular (issue)
0
Liste
Pano
Etiketler
Kilometre Taşları
Birleştirme (merge) Talepleri
0
Birleştirme (merge) Talepleri
0
CI / CD
CI / CD
İş akışları (pipeline)
İşler
Zamanlamalar
Grafikler
Paketler
Paketler
Wiki
Wiki
Parçacıklar
Parçacıklar
Üyeler
Üyeler
Collapse sidebar
Close sidebar
Etkinlik
Grafik
Grafikler
Yeni bir konu (issue) oluştur
İşler
Kayıtlar (commit)
Konu (issue) Panoları
Kenar çubuğunu aç
LibreOffice
core
Commits
4c937bbd
Kaydet (Commit)
4c937bbd
authored
Mar 28, 2003
tarafından
Daniel Boelzle
Dosyalara gözat
Seçenekler
Dosyalara Gözat
İndir
Eposta Yamaları
Sade Fark
#107130# new
üst
dfdc52e7
Expand all
Hide whitespace changes
Inline
Side-by-side
Showing
18 changed files
with
1667 additions
and
0 deletions
+1667
-0
build.lst
cli_ure/prj/build.lst
+7
-0
d.lst
cli_ure/prj/d.lst
+5
-0
climaker_app.cxx
cli_ure/source/climaker/climaker_app.cxx
+0
-0
climaker_emit.cxx
cli_ure/source/climaker/climaker_emit.cxx
+0
-0
climaker_share.h
cli_ure/source/climaker/climaker_share.h
+168
-0
makefile.mk
cli_ure/source/climaker/makefile.mk
+122
-0
makefile.mk
cli_ure/source/native/makefile.mk
+112
-0
msvc.map
cli_ure/source/native/msvc.map
+7
-0
native_bootstrap.cxx
cli_ure/source/native/native_bootstrap.cxx
+148
-0
native_share.h
cli_ure/source/native/native_share.h
+137
-0
makefile.mk
cli_ure/source/ure/makefile.mk
+101
-0
DisposeGuard.cs
cli_ure/source/ure/uno/util/DisposeGuard.cs
+101
-0
WeakAdapter.cs
cli_ure/source/ure/uno/util/WeakAdapter.cs
+152
-0
WeakBase.cs
cli_ure/source/ure/uno/util/WeakBase.cs
+212
-0
WeakComponentBase.cs
cli_ure/source/ure/uno/util/WeakComponentBase.cs
+143
-0
makefile.mk
cli_ure/unotypes/makefile.mk
+95
-0
makefile.pmk
cli_ure/util/makefile.pmk
+70
-0
target.pmk
cli_ure/util/target.pmk
+87
-0
No files found.
cli_ure/prj/build.lst
0 → 100644
Dosyayı görüntüle @
4c937bbd
ure cli_ure : cppuhelper cppu sal codemaker offapi udkapi NULL
ure cli_ure usr1 - all tt_mkout NULL
ure cli_ure\source\climaker nmake - all ure_source_climaker NULL
ure cli_ure\unotypes nmake - all ure_unotypes ure_source_climaker NULL
ure cli_ure\source\ure nmake - all ure_source_ure ure_unotypes NULL
ure cli_ure\source\native nmake - all ure_source_native ure_source_ure ure_unotypes NULL
#ure cli_ure\util nmake - all ure_util ure_source_ure ure_source_native NULL
cli_ure/prj/d.lst
0 → 100644
Dosyayı görüntüle @
4c937bbd
..\%__SRC%\bin\climaker.exe %_DEST%\bin%_EXT%\climaker.exe
..\%__SRC%\bin\climaker.pdb %_DEST%\bin%_EXT%\climaker.pdb
..\%__SRC%\bin\cli_* %_DEST%\bin%_EXT%\cli_*
..\%__SRC%\bin\cppuhelper* %_DEST%\bin%_EXT%\cppuhelper*
cli_ure/source/climaker/climaker_app.cxx
0 → 100644
Dosyayı görüntüle @
4c937bbd
This diff is collapsed.
Click to expand it.
cli_ure/source/climaker/climaker_emit.cxx
0 → 100644
Dosyayı görüntüle @
4c937bbd
This diff is collapsed.
Click to expand it.
cli_ure/source/climaker/climaker_share.h
0 → 100644
Dosyayı görüntüle @
4c937bbd
/*************************************************************************
*
* $RCSfile: climaker_share.h,v $
*
* $Revision: 1.1 $
*
* last change: $Author: dbo $ $Date: 2003-03-28 10:17:38 $
*
* 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): _______________________________________
*
*
************************************************************************/
#using <mscorlib.dll>
#include <vcclr.h>
#include "osl/diagnose.h"
#include "com/sun/star/reflection/XConstantTypeDescription.hpp"
#include "com/sun/star/reflection/XConstantsTypeDescription.hpp"
#include "com/sun/star/reflection/XEnumTypeDescription.hpp"
#include "com/sun/star/reflection/XInterfaceTypeDescription.hpp"
#include "com/sun/star/reflection/XCompoundTypeDescription.hpp"
#define OUSTR(x) ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM(x) )
namespace
css
=
::
com
::
sun
::
star
;
namespace
climaker
{
//--------------------------------------------------------------------------------------------------
extern
bool
g_verbose
;
//--------------------------------------------------------------------------------------------------
inline
::
System
::
String
*
ustring_to_String
(
::
rtl
::
OUString
const
&
ustr
)
{
return
new
::
System
::
String
(
ustr
.
getStr
(),
0
,
ustr
.
getLength
()
);
}
//--------------------------------------------------------------------------------------------------
inline
::
rtl
::
OUString
String_to_ustring
(
::
System
::
String
*
str
)
{
OSL_ASSERT
(
sizeof
(
wchar_t
)
==
sizeof
(
sal_Unicode
)
);
wchar_t
const
__pin
*
chars
=
PtrToStringChars
(
str
);
return
::
rtl
::
OUString
(
chars
,
str
->
get_Length
()
);
}
//==================================================================================================
__gc
class
TypeEmitter
:
public
::
System
::
IDisposable
{
const
::
System
::
Reflection
::
MethodAttributes
s_ctor_attr
;
::
System
::
Reflection
::
Emit
::
ModuleBuilder
*
m_module_builder
;
::
System
::
Reflection
::
Assembly
*
m_extra_assemblies
__gc
[];
::
System
::
Reflection
::
MethodInfo
*
m_method_info_Type_GetTypeFromHandle
;
::
System
::
Type
*
m_type_Exception
;
::
System
::
Type
*
get_type_Exception
();
::
System
::
Type
*
m_type_RuntimeException
;
::
System
::
Type
*
get_type_RuntimeException
();
::
System
::
Reflection
::
ConstructorInfo
*
m_ctor_uno_MethodAttribute
;
::
System
::
Reflection
::
ConstructorInfo
*
m_default_ctor_uno_MethodAttribute
;
::
System
::
Reflection
::
ConstructorInfo
*
get_ctor_uno_MethodAttribute
();
::
System
::
Type
*
m_type_Any
;
::
System
::
Type
*
m_type_Any_ref
;
::
System
::
Reflection
::
FieldInfo
*
m_field_Any_VOID
;
void
emit_Any_boxed_ctor
(
::
System
::
Reflection
::
Emit
::
TypeBuilder
*
type_builder
,
::
System
::
Reflection
::
Emit
::
FieldBuilder
*
field_Type
,
::
System
::
Reflection
::
Emit
::
FieldBuilder
*
field_Value
,
::
System
::
Type
*
integral_type
);
::
System
::
Type
*
get_type_Any
();
__gc
class
iface_entry
{
public
:
css
::
reflection
::
XInterfaceTypeDescription
*
m_xType
;
::
System
::
Reflection
::
Emit
::
TypeBuilder
*
m_type_builder
;
};
::
System
::
Collections
::
Hashtable
*
m_incomplete_ifaces
;
::
System
::
Type
*
complete_iface_type
(
iface_entry
*
entry
);
__gc
class
struct_entry
{
public
:
::
System
::
String
*
m_member_names
__gc
[];
::
System
::
Type
*
m_param_types
__gc
[];
::
System
::
Reflection
::
ConstructorInfo
*
m_default_ctor
;
::
System
::
Reflection
::
ConstructorInfo
*
m_ctor
;
};
::
System
::
Collections
::
Hashtable
*
m_generated_structs
;
::
System
::
Type
*
get_type
(
::
System
::
String
*
cli_name
,
bool
throw_exc
);
::
System
::
Type
*
get_type
(
css
::
uno
::
Reference
<
css
::
reflection
::
XConstantTypeDescription
>
const
&
xType
);
::
System
::
Type
*
get_type
(
css
::
uno
::
Reference
<
css
::
reflection
::
XConstantsTypeDescription
>
const
&
xType
);
::
System
::
Type
*
get_type
(
css
::
uno
::
Reference
<
css
::
reflection
::
XEnumTypeDescription
>
const
&
xType
);
::
System
::
Type
*
get_type
(
css
::
uno
::
Reference
<
css
::
reflection
::
XCompoundTypeDescription
>
const
&
xType
);
::
System
::
Type
*
get_type
(
css
::
uno
::
Reference
<
css
::
reflection
::
XInterfaceTypeDescription
>
const
&
xType
);
public
:
TypeEmitter
(
::
System
::
Reflection
::
Emit
::
ModuleBuilder
*
module_builder
,
::
System
::
Reflection
::
Assembly
*
assemblies
__gc
[]
);
// must be called to finish up uncompleted types
void
Dispose
();
::
System
::
Reflection
::
Assembly
*
type_resolve
(
::
System
::
Object
*
sender
,
::
System
::
ResolveEventArgs
*
args
);
::
System
::
Type
*
get_type
(
css
::
uno
::
Reference
<
css
::
reflection
::
XTypeDescription
>
const
&
xType
);
};
}
cli_ure/source/climaker/makefile.mk
0 → 100644
Dosyayı görüntüle @
4c937bbd
#*************************************************************************
#
# $RCSfile: makefile.mk,v $
#
# $Revision: 1.1 $
#
# last change: $Author: dbo $ $Date: 2003-03-28 10:17:38 $
#
# 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
=
cli_ure
.INCLUDE
:
$(PRJ)$/util$/makefile.pmk
.IF
"$(BUILD_FOR_CLI)"
!=
""
TARGET
=
climaker
TARGETTYPE
=
CUI
LIBTARGET
=
NO
ENABLE_EXCEPTIONS
=
TRUE
.INCLUDE
:
settings.mk
UNOUCRDEP
=
$(SOLARBINDIR)$/
udkapi.rdb
UNOUCRRDB
=
$(SOLARBINDIR)$/
udkapi.rdb
CPPUMAKERFLAGS
=
UNOTYPES
=
\
com.sun.star.uno.TypeClass
\
com.sun.star.uno.XAggregation
\
com.sun.star.uno.XWeak
\
com.sun.star.uno.XComponentContext
\
com.sun.star.lang.XTypeProvider
\
com.sun.star.lang.XInitialization
\
com.sun.star.lang.XComponent
\
com.sun.star.lang.XMultiComponentFactory
\
com.sun.star.container.XSet
\
com.sun.star.container.XHierarchicalNameAccess
\
com.sun.star.loader.XImplementationLoader
\
com.sun.star.registry.XSimpleRegistry
\
com.sun.star.registry.XRegistryKey
\
com.sun.star.reflection.XTypeDescriptionEnumerationAccess
\
com.sun.star.reflection.XConstantTypeDescription
\
com.sun.star.reflection.XConstantsTypeDescription
\
com.sun.star.reflection.XIndirectTypeDescription
\
com.sun.star.reflection.XEnumTypeDescription
\
com.sun.star.reflection.XInterfaceTypeDescription
\
com.sun.star.reflection.XInterfaceMethodTypeDescription
\
com.sun.star.reflection.XInterfaceAttributeTypeDescription
\
com.sun.star.reflection.XCompoundTypeDescription
\
com.sun.star.reflection.XEnumTypeDescription
CFLAGS
+=
-clr
:noAssembly
CXXFILES
=
\
climaker_emit.cxx
\
climaker_app.cxx
APP1TARGET
=
$(TARGET)
APP1OBJS
=
$
(
foreach,i,
$
(
subst,.cxx,.obj
$(CXXFILES)
)
$(OBJ)$/$i
)
APP1STDLIBS
=
\
$(CPPUHELPERLIB)
\
$(CPPULIB)
\
$(SALLIB)
\
mscoree.lib
.INCLUDE
:
target.mk
.ENDIF
cli_ure/source/native/makefile.mk
0 → 100644
Dosyayı görüntüle @
4c937bbd
#*************************************************************************
#
# $RCSfile: makefile.mk,v $
#
# $Revision: 1.1 $
#
# last change: $Author: dbo $ $Date: 2003-03-28 10:17:40 $
#
# 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
=
cli_ure
.INCLUDE
:
$(PRJ)$/util$/makefile.pmk
.IF
"$(BUILD_FOR_CLI)"
!=
""
TARGET
=
cppuhelper_cli
NO_BSYMBOLIC
=
TRUE
ENABLE_EXCEPTIONS
=
TRUE
USE_DEFFILE
=
TRUE
.INCLUDE
:
settings.mk
UNOUCRRDB
=
$(SOLARBINDIR)$/
udkapi.rdb
UNOUCRDEP
=
$(UNOUCRRDB)
UNOUCROUT
=
$(OUT)$/
inc
INCPRE
+=
$(OUT)$/
inc
CPPUMAKERFLAGS
=
UNOTYPES
=
\
com.sun.star.lang.XSingleComponentFactory
\
com.sun.star.loader.CannotActivateFactoryException
\
com.sun.star.registry.CannotRegisterImplementationException
\
com.sun.star.registry.XRegistryKey
CFLAGS
+=
-clr
-AI
$(OUT)$/
bin
SLOFILES
=
\
$(SLO)$/
native_ure.obj
\
$(SLO)$/
native_bootstrap.obj
SHL1TARGET
=
$(TARGET)$(UDK_MAJOR)$(COMID)
SHL1STDLIBS
=
\
$(CPPUHELPERLIB)
\
$(CPPULIB)
\
$(SALLIB)
\
mscoree.lib
SHL1VERSIONMAP
=
msvc.map
SHL1DEPN
=
SHL1IMPLIB
=
i
$(TARGET)
SHL1LIBS
=
$(SLB)$/$(TARGET)
.lib
SHL1DEF
=
$(MISC)$/$(SHL1TARGET)
.def
DEF1NAME
=
$(SHL1TARGET)
.INCLUDE
:
target.mk
.ENDIF
cli_ure/source/native/msvc.map
0 → 100644
Dosyayı görüntüle @
4c937bbd
UDK_3.1 {
global:
?ServiceFactory_load@util@uno@@YA?AV?$Reference@VXSingleComponentFactory@lang@star@sun@com@@@2star@sun@com@@ABVOUString@rtl@@@Z;
?ServiceFactory_writeInfo@util@uno@@YAXABVOUString@rtl@@ABV?$Reference@VXRegistryKey@registry@star@sun@com@@@2star@sun@com@@@Z;
local:
*;
};
cli_ure/source/native/native_bootstrap.cxx
0 → 100644
Dosyayı görüntüle @
4c937bbd
/*************************************************************************
*
* $RCSfile: native_bootstrap.cxx,v $
*
* $Revision: 1.1 $
*
* last change: $Author: dbo $ $Date: 2003-03-28 10:17:40 $
*
* 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 "native_share.h"
#include "rtl/bootstrap.hxx"
#include "cppuhelper/bootstrap.hxx"
using
namespace
::
rtl
;
using
namespace
::
com
::
sun
::
star
;
using
namespace
::
com
::
sun
::
star
::
uno
;
namespace
uno
{
namespace
util
{
//==============================================================================
__sealed
__gc
class
Bootstrap
{
inline
Bootstrap
();
public
:
/** Bootstraps the initial component context from a native UNO installation.
@see cppuhelper/defaultBootstrap_InitialComponentContext()
*/
static
::
unoidl
::
com
::
sun
::
star
::
uno
::
XComponentContext
*
defaultBootstrap_InitialComponentContext
();
/** Bootstraps the initial component context from a native UNO installation.
@param ini_file
ini_file (may be null: uno.rc besides cppuhelper lib)
@param bootstrap_parameters
bootstrap parameters (maybe null)
@see cppuhelper/defaultBootstrap_InitialComponentContext()
*/
static
::
unoidl
::
com
::
sun
::
star
::
uno
::
XComponentContext
*
defaultBootstrap_InitialComponentContext
(
::
System
::
String
*
ini_file
,
::
System
::
Collections
::
IDictionaryEnumerator
*
bootstrap_parameters
);
};
//______________________________________________________________________________
::
unoidl
::
com
::
sun
::
star
::
uno
::
XComponentContext
*
Bootstrap
::
defaultBootstrap_InitialComponentContext
()
{
return
defaultBootstrap_InitialComponentContext
(
0
,
0
);
}
//______________________________________________________________________________
::
unoidl
::
com
::
sun
::
star
::
uno
::
XComponentContext
*
Bootstrap
::
defaultBootstrap_InitialComponentContext
(
::
System
::
String
*
ini_file
,
::
System
::
Collections
::
IDictionaryEnumerator
*
bootstrap_parameters
)
{
bootstrap_parameters
->
Reset
();
while
(
bootstrap_parameters
->
MoveNext
())
{
OUString
key
(
String_to_ustring
(
__try_cast
<
::
System
::
String
*
>
(
bootstrap_parameters
->
get_Key
()
)
)
);
OUString
value
(
String_to_ustring
(
__try_cast
<
::
System
::
String
*
>
(
bootstrap_parameters
->
get_Value
()
)
)
);
// // xxx todo srx644 only
// ::rtl::Bootstrap::set( key, value );
}
// bootstrap native uno
Reference
<
XComponentContext
>
xContext
;
if
(
0
==
ini_file
)
{
xContext
=
::
cppu
::
defaultBootstrap_InitialComponentContext
();
}
else
{
xContext
=
::
cppu
::
defaultBootstrap_InitialComponentContext
(
String_to_ustring
(
__try_cast
<
::
System
::
String
*
>
(
ini_file
)
)
);
}
return
__try_cast
<
::
unoidl
::
com
::
sun
::
star
::
uno
::
XComponentContext
*
>
(
to_cli
(
xContext
)
);
}
}
}
cli_ure/source/native/native_share.h
0 → 100644
Dosyayı görüntüle @
4c937bbd
/*************************************************************************
*
* $RCSfile: native_share.h,v $
*
* $Revision: 1.1 $
*
* last change: $Author: dbo $ $Date: 2003-03-28 10:17:41 $
*
* 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/ustring.hxx"
#include "uno/mapping.hxx"
#define OUSTR(x) ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM(x) )
#using <mscorlib.dll>
#using <cli_ure.dll>
#using <cli_udkapi.dll>
#include <vcclr.h>
namespace
uno
{
namespace
util
{
//------------------------------------------------------------------------------
inline
::
System
::
String
*
ustring_to_String
(
::
rtl
::
OUString
const
&
ustr
)
{
return
new
::
System
::
String
(
ustr
.
getStr
(),
0
,
ustr
.
getLength
()
);
}
//------------------------------------------------------------------------------
inline
::
rtl
::
OUString
String_to_ustring
(
::
System
::
String
*
str
)
{
OSL_ASSERT
(
sizeof
(
wchar_t
)
==
sizeof
(
sal_Unicode
)
);
wchar_t
const
__pin
*
chars
=
PtrToStringChars
(
str
);
return
::
rtl
::
OUString
(
chars
,
str
->
get_Length
()
);
}
//------------------------------------------------------------------------------
::
com
::
sun
::
star
::
uno
::
Mapping
const
&
get_uno_to_cli
();
//------------------------------------------------------------------------------
::
com
::
sun
::
star
::
uno
::
Mapping
const
&
get_cli_to_uno
();
template
<
typename
T
>
inline
::
System
::
Object
*
to_cli
(
::
com
::
sun
::
star
::
uno
::
Reference
<
T
>
const
&
x
)
{
intptr_t
intptr
=
reinterpret_cast
<
intptr_t
>
(
get_uno_to_cli
().
mapInterface
(
x
.
get
(),
::
getCppuType
(
&
x
)
)
);
::
System
::
Runtime
::
InteropServices
::
GCHandle
handle
(
::
System
::
Runtime
::
InteropServices
::
GCHandle
::
op_Explicit
(
intptr
)
);
::
System
::
Object
*
ret
=
handle
.
get_Target
();
handle
.
Free
();
return
ret
;
}
template
<
typename
T
>
inline
void
to_uno
(
::
com
::
sun
::
star
::
uno
::
Reference
<
T
>
*
pRet
,
::
System
::
Object
*
x
)
{
::
com
::
sun
::
star
::
uno
::
Mapping
const
&
mapping
=
get_cli_to_uno
();
::
System
::
Runtime
::
InteropServices
::
GCHandle
handle
(
::
System
::
Runtime
::
InteropServices
::
GCHandle
::
Alloc
(
x
)
);
T
*
ret
=
0
;
mapping
.
mapInterface
(
reinterpret_cast
<
void
**
>
(
&
ret
),
reinterpret_cast
<
void
*
>
(
::
System
::
Runtime
::
InteropServices
::
GCHandle
::
op_Explicit
(
handle
)
#if defined _WIN32
.
ToInt32
()
#elif defined _WIN64
.
ToInt64
()
#else
#error ERROR: either _WIN64 or _WIN32 must be defined
ERROR
:
either
_WIN64
or
_WIN32
must
be
defined
#endif
),
::
getCppuType
(
pRet
)
);
handle
.
Free
();
pRet
->
set
(
ret
,
SAL_NO_ACQUIRE
/* takeover ownership */
);
}
}
}
cli_ure/source/ure/makefile.mk
0 → 100644
Dosyayı görüntüle @
4c937bbd
#*************************************************************************
#
# $RCSfile: makefile.mk,v $
#
# $Revision: 1.1 $
#
# last change: $Author: dbo $ $Date: 2003-03-28 10:17:42 $
#
# 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
=
cli_ure
.INCLUDE
:
$(PRJ)$/util$/makefile.pmk
.IF
"$(BUILD_FOR_CLI)"
!=
""
# for dummy
TARGET
=
cli_ure
.INCLUDE
:
settings.mk
.INCLUDE
:
$(PRJ)$/util$/target.pmk
.INCLUDE
:
target.mk
CLI_URE
=
$(OUT)$/
bin
$/
cli_ure.dll
ALLTAR
:
\
$(CLI_URE)
CSFILES
=
\
uno
$/
QueryInterface.cs
\
uno
$/
Runtime.cs
\
uno
$/
util
$/
ServiceImplementationAttribute.cs
\
uno
$/
util
$/
DisposeGuard.cs
\
uno
$/
util
$/
WeakAdapter.cs
\
uno
$/
util
$/
WeakBase.cs
\
uno
$/
util
$/
WeakComponentBase.cs
\
uno
$/
util
$/
ServiceBase.cs
\
uno
$/
util
$/
ServiceFactory.cs
$(CLI_URE)
:
$(CLI_UDKAPI) $(CSFILES)
+csc.exe
$(CSCFLAGS)
\
-target
:
library
\
-out:$@
\
-reference:$(CLI_UDKAPI)
\
-reference:System.dll
\
$(CSFILES)
.ENDIF
cli_ure/source/ure/uno/util/DisposeGuard.cs
0 → 100644
Dosyayı görüntüle @
4c937bbd
/*************************************************************************
*
* $RCSfile: DisposeGuard.cs,v $
*
* $Revision: 1.1 $
*
* last change: $Author: dbo $ $Date: 2003-03-28 10:17:44 $
*
* 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): _______________________________________
*
*
************************************************************************/
using
System
;
using
unoidl.com.sun.star.lang
;
namespace
uno.util
{
/** Helper class to conveniently auto dispose UNO objects from within
managed code.
*/
public
struct
DisposeGuard
:
IDisposable
{
private
XComponent
m_xComponent
;
/** ctor.
@param obj target object
*/
public
DisposeGuard
(
Object
obj
)
{
m_xComponent
=
(
XComponent
)
uno
.
Runtime
.
queryInterface_throw
(
typeof
(
XComponent
),
obj
);
}
/** ctor.
@param obj target object
*/
public
DisposeGuard
(
XComponent
obj
)
{
m_xComponent
=
obj
;
}
/** System.IDisposable impl
*/
public
void
Dispose
()
{
if
(
null
!=
m_xComponent
)
m_xComponent
.
dispose
();
}
}
}
cli_ure/source/ure/uno/util/WeakAdapter.cs
0 → 100644
Dosyayı görüntüle @
4c937bbd
/*************************************************************************
*
* $RCSfile: WeakAdapter.cs,v $
*
* $Revision: 1.1 $
*
* last change: $Author: dbo $ $Date: 2003-03-28 10:17:46 $
*
* 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): _______________________________________
*
*
************************************************************************/
using
System
;
using
unoidl.com.sun.star.uno
;
using
unoidl.com.sun.star.lang
;
namespace
uno.util
{
/** An XAdapter implementation that holds a weak reference
(System.WeakReference) to an object.
Clients can register listeners (unoidl.com.sun.star.lang.XReference)
which are notified when the object (the one which is kept weak) is
being finalized. That is, that object is being destroyed because there
are not any hard references to it.
*/
public
class
WeakAdapter
:
XAdapter
{
// references the XWeak implementation
private
WeakReference
m_weakRef
;
// contains XReference objects registered by addReference
private
delegate
void
XReference_dispose
();
private
XReference_dispose
m_XReference_dispose
;
/** ctor.
@param obj the object that is to be held weakly
*/
public
WeakAdapter
(
Object
obj
)
{
m_weakRef
=
new
WeakReference
(
obj
);
m_XReference_dispose
=
null
;
}
/** Called by the XWeak implementation (WeakBase) when it is being
finalized. It is only being called once.
The registererd XReference listeners are notified. On notification
they are to unregister themselves. The notification is thread-safe.
However, it is possible to add a listener during the notification
process, which will never receive a notification.
To prevent this, one would have to synchronize this method with
the addReference method. But this can result in deadlocks in a
multithreaded environment.
*/
internal
/* non-virtual */
void
referentDying
()
{
XReference_dispose
call
;
lock
(
this
)
{
call
=
m_XReference_dispose
;
m_XReference_dispose
=
null
;
}
if
(
null
!=
call
)
call
();
}
// XAdapter impl
/** Called to obtain a hard reference o the object which is kept weakly
by this instance.
@return hard reference to the object
*/
public
Object
queryAdapted
()
{
return
m_weakRef
.
Target
;
}
/** Called by clients to register listener which are notified when the
weak object is dying.
@param xReference a listener
*/
public
void
removeReference
(
XReference
xReference
)
{
lock
(
this
)
{
m_XReference_dispose
-=
new
XReference_dispose
(
xReference
.
dispose
);
}
}
/** Called by clients to unregister listeners.
@param xReference a listener
*/
public
void
addReference
(
XReference
xReference
)
{
lock
(
this
)
{
m_XReference_dispose
+=
new
XReference_dispose
(
xReference
.
dispose
);
}
}
}
}
cli_ure/source/ure/uno/util/WeakBase.cs
0 → 100644
Dosyayı görüntüle @
4c937bbd
/*************************************************************************
*
* $RCSfile: WeakBase.cs,v $
*
* $Revision: 1.1 $
*
* last change: $ $Date: 2003-03-28 10:17:48 $
*
* 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): _______________________________________
*
*
************************************************************************/
using
System
;
using
System.Collections
;
using
unoidl.com.sun.star.uno
;
using
unoidl.com.sun.star.lang
;
namespace
uno.util
{
/** This class can be used as a base class for UNO objects.
It implements the capability to be kept weakly
(unoidl.com.sun.star.uno.XWeak) and it implements
unoidl.com.sun.star.lang.XTypeProvider which is necessary for
using the object from StarBasic.
*/
public
class
WeakBase
:
XWeak
,
XTypeProvider
{
// Contains all WeakAdapter which have been created in this class
// They have to be notified when this object dies
private
WeakAdapter
m_adapter
;
protected
static
Hashtable
s_types
=
new
Hashtable
();
protected
static
Hashtable
s_impl_ids
=
new
Hashtable
();
// XWeak impl
/** The returned XAdapter implementation can be used to keap a
weak reference to this object.
@return a weak adapter
*/
public
XAdapter
queryAdapter
()
{
if
(
null
==
m_adapter
)
{
lock
(
this
)
{
if
(
null
==
m_adapter
)
m_adapter
=
new
WeakAdapter
(
this
);
}
}
return
m_adapter
;
}
/** Overrides of Object.Finalize method.
When there are no references to this object anymore, then the
garbage collector calls this method, thereby causing the adapter
object to be notified. The adapter, in turn, notifies all
listeners (unoidl.com.sun.star.uno.XReference).
*/
~
WeakBase
()
{
if
(
null
!=
m_adapter
)
m_adapter
.
referentDying
();
}
// XTypeProvider impl
/** Returns an array of Type objects which represent all implemented
UNO interfaces of this object.
@return Type objects of all implemented interfaces.
*/
public
Type
[]
getTypes
()
{
Type
[]
types
;
Type
type
=
GetType
();
lock
(
s_types
)
{
types
=
(
Type
[])
s_types
[
type
];
if
(
null
==
types
)
{
Type
[]
interfaces
=
type
.
GetInterfaces
();
ArrayList
list
=
new
ArrayList
(
interfaces
.
Length
);
for
(
Int32
pos
=
0
;
pos
<
interfaces
.
Length
;
++
pos
)
{
Type
iface
=
interfaces
[
pos
];
// xxx todo: as long as the bridge cannot introduce
// native CTS types into UNO on the fly
if
(
iface
.
FullName
.
StartsWith
(
"unoidl."
))
{
list
.
Add
(
iface
);
}
}
Int32
len
=
list
.
Count
;
Type
[]
ar
=
new
Type
[
len
];
for
(
Int32
pos
=
0
;
pos
<
len
;
++
pos
)
ar
[
pos
]
=
(
Type
)
list
[
pos
];
s_types
[
type
]
=
ar
;
types
=
ar
;
}
}
return
types
;
}
/** Provides an identifier that represents the set of UNO interfaces
implemented by this class. All instances of this class which run
in the same CLR return the same array.
@return identifier as array of bytes
*/
public
byte
[]
getImplementationId
()
{
byte
[]
id
;
Type
type
=
GetType
();
lock
(
s_impl_ids
)
{
id
=
(
byte
[])
s_impl_ids
[
type
];
if
(
null
==
id
)
{
Int32
hash
=
GetHashCode
();
String
name
=
type
.
FullName
;
Int32
len
=
name
.
Length
;
id
=
new
byte
[
4
+
(
2
*
len
)
];
id
[
0
]=
(
byte
)
(
hash
&
0xff
);
id
[
1
]=
(
byte
)
((
hash
>>
8
)
&
0xff
);
id
[
2
]=
(
byte
)
((
hash
>>
16
)
&
0xff
);
id
[
3
]=
(
byte
)
((
hash
>>
24
)
&
0xff
);
for
(
Int32
pos
=
0
;
pos
<
len
;
++
pos
)
{
UInt16
c
=
Convert
.
ToUInt16
(
name
[
pos
]
);
id
[
4
+
(
2
*
pos
)
]
=
(
byte
)
(
c
&
0xff
);
id
[
4
+
(
2
*
pos
)
+
1
]
=
(
byte
)
((
c
>>
8
)
&
0xff
);
}
s_impl_ids
[
type
]
=
id
;
}
}
return
id
;
}
// System.Object
//______________________________________________________________________________________________
public
override
String
ToString
()
{
System
.
Text
.
StringBuilder
buf
=
new
System
.
Text
.
StringBuilder
(
base
.
ToString
(),
256
);
buf
.
Append
(
"\nUNO Object Implementation:\n\tImplementationId: "
);
buf
.
Append
(
getImplementationId
()
);
buf
.
Append
(
"\n\tInterfaces: "
);
Type
[]
types
=
getTypes
();
for
(
Int32
pos
=
0
;
pos
<
types
.
Length
;
++
pos
)
{
buf
.
Append
(
types
[
pos
].
FullName
);
if
(
pos
<
(
types
.
Length
-
1
))
buf
.
Append
(
", "
);
}
return
buf
.
ToString
();
}
}
}
cli_ure/source/ure/uno/util/WeakComponentBase.cs
0 → 100644
Dosyayı görüntüle @
4c937bbd
/*************************************************************************
*
* $RCSfile: WeakComponentBase.cs,v $
*
* $Revision: 1.1 $
*
* last change: $Author: dbo $ $Date: 2003-03-28 10:17:48 $
*
* 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): _______________________________________
*
*
************************************************************************/
using
System
;
using
unoidl.com.sun.star.lang
;
namespace
uno.util
{
/** This class can be used as a base class for UNO objects.
It implements the capability to be kept weakly
(unoidl.com.sun.star.uno.XWeak) and it implements
unoidl.com.sun.star.lang.XTypeProvider which is necessary for
using the object from StarBasic.
In addition, it implements the interface
unoidl.com.sun.star.lang.XComponent to be disposed explicitly.
*/
public
class
WeakComponentBase
:
WeakBase
,
XComponent
,
IDisposable
{
private
delegate
void
t_disposing
(
EventObject
evt
);
private
t_disposing
m_disposing
=
null
;
/** Disposing callback called when the object is being disposed.
This method has to be implemented by sub classes.
*/
protected
virtual
void
disposing
()
{
}
// XComponent impl
/** This method is called by the owner of this object to explicitly
dispose it. This implementation of dispose() first notifies all
registered event listeners and finally this object by calling its
protected disposing().
*/
public
void
dispose
()
{
// send disposing notifications to listeners
t_disposing
call
;
lock
(
this
)
{
call
=
m_disposing
;
m_disposing
=
null
;
}
if
(
null
!=
call
)
{
EventObject
evt
=
new
EventObject
(
this
);
call
(
evt
);
}
// call sub class
disposing
();
}
/** Registers an event listener being notified when this object is disposed.
@param xListener event listener
*/
public
void
addEventListener
(
XEventListener
xListener
)
{
lock
(
this
)
{
m_disposing
+=
new
t_disposing
(
xListener
.
disposing
);
}
}
/** Revokes an event listener from being notified when this object is disposed.
@param xListener event listener
*/
public
void
removeEventListener
(
XEventListener
xListener
)
{
lock
(
this
)
{
m_disposing
-=
new
t_disposing
(
xListener
.
disposing
);
}
}
/** System.IDisposable implementation to conveniently auto dispose
UNO objects within CLI code.
*/
public
void
Dispose
()
{
dispose
();
}
}
}
cli_ure/unotypes/makefile.mk
0 → 100644
Dosyayı görüntüle @
4c937bbd
#*************************************************************************
#
# $RCSfile: makefile.mk,v $
#
# $Revision: 1.1 $
#
# last change: $Author: dbo $ $Date: 2003-03-28 10:17:50 $
#
# 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
=
cli_ure
.INCLUDE
:
$(PRJ)$/util$/makefile.pmk
.IF
"$(BUILD_FOR_CLI)"
!=
""
# for dummy
TARGET
=
cli_ure
.INCLUDE
:
settings.mk
.INCLUDE
:
$(PRJ)$/util$/target.pmk
.INCLUDE
:
target.mk
ALLTAR
:
\
$(CLI_OFFAPI)
$(CLI_UDKAPI)
:
$(SOLARBINDIR)$/udkapi.rdb
+$(CLIMAKER)
-O
$@
$(CLIMAKER_FLAGS)
\
--version
"3.1.0.0"
\
--product
"OpenOffice.org SDK"
\
--description
"This assembly contains UNO-API metadata of the OpenOffice.org Software Development Kit (SDK)."
\
$(SOLARBINDIR)$/udkapi.rdb
$(CLI_OFFAPI)
:
$(CLI_UDKAPI) $(SOLARBINDIR)$/offapi.rdb
+$(CLIMAKER)
-O
$@
$(CLIMAKER_FLAGS)
\
--version
"1.0.0.0"
\
--product
"OpenOffice.org SDK"
\
--description
"This assembly contains API metadata of the OpenOffice.org Software Development Kit (SDK)."
\
--reference
$(CLI_UDKAPI)
\
-X
$(SOLARBINDIR)$/udkapi.rdb
$(SOLARBINDIR)$/offapi.rdb
.ENDIF
cli_ure/util/makefile.pmk
0 → 100644
Dosyayı görüntüle @
4c937bbd
#*************************************************************************
#
# $RCSfile: makefile.pmk,v $
#
# $Revision: 1.1 $
#
# last change: $Author: dbo $ $Date: 2003-03-28 10:17:51 $
#
# 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): _______________________________________
#
#
#
#*************************************************************************
.IF
"$(COM)$(COMEX)"
==
"MSC8"
BUILD_FOR_CLI
=
"true"
.ENDIF
CLIMAKER
=
$(OUT)$/
bin
$/
climaker.exe
CLI_UDKAPI
=
$(OUT)$/
bin
$/
cli_udkapi.dll
CLI_OFFAPI
=
$(OUT)$/
bin
$/
cli_offapi.dll
cli_ure/util/target.pmk
0 → 100644
Dosyayı görüntüle @
4c937bbd
#*************************************************************************
#
# $RCSfile: target.pmk,v $
#
# $Revision: 1.1 $
#
# last change: $Author: dbo $ $Date: 2003-03-28 10:17:51 $
#
# 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): _______________________________________
#
#
#
#*************************************************************************
###### C# ######
CSCFLAGS = -warnaserror+ -incremental-
.IF "$(debug)" == ""
.IF "$(product)" == ""
CSCFLAGS += -checked+ -define:DEBUG -define:TRACE
.ELSE
CSCFLAGS += -o
.ENDIF
.ELSE # DEBUG
CSCFLAGS += -debug+ -checked+ -define:DEBUG -define:TRACE
.ENDIF
###### climaker ######
CLIMAKER_FLAGS =
.IF "$(debug)" != ""
CLIMAKER_FLAGS += --verbose
.ENDIF
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment