1 kumpf 1.2 //%2006////////////////////////////////////////////////////////////////////////
 2           //
 3           // Copyright (c) 2000, 2001, 2002 BMC Software; Hewlett-Packard Development
 4           // Company, L.P.; IBM Corp.; The Open Group; Tivoli Systems.
 5           // Copyright (c) 2003 BMC Software; Hewlett-Packard Development Company, L.P.;
 6           // IBM Corp.; EMC Corporation, The Open Group.
 7           // Copyright (c) 2004 BMC Software; Hewlett-Packard Development Company, L.P.;
 8           // IBM Corp.; EMC Corporation; VERITAS Software Corporation; The Open Group.
 9           // Copyright (c) 2005 Hewlett-Packard Development Company, L.P.; IBM Corp.;
10           // EMC Corporation; VERITAS Software Corporation; The Open Group.
11           // Copyright (c) 2006 Hewlett-Packard Development Company, L.P.; IBM Corp.;
12           // EMC Corporation; Symantec Corporation; The Open Group.
13           //
14           // Permission is hereby granted, free of charge, to any person obtaining a copy
15           // of this software and associated documentation files (the "Software"), to
16           // deal in the Software without restriction, including without limitation the
17           // rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
18           // sell copies of the Software, and to permit persons to whom the Software is
19           // furnished to do so, subject to the following conditions:
20           // 
21           // THE ABOVE COPYRIGHT NOTICE AND THIS PERMISSION NOTICE SHALL BE INCLUDED IN
22 kumpf 1.2 // ALL COPIES OR SUBSTANTIAL PORTIONS OF THE SOFTWARE. THE SOFTWARE IS PROVIDED
23           // "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT
24           // LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR
25           // PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
26           // HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
27           // ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
28           // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
29           //
30           //==============================================================================
31           //
32           //%/////////////////////////////////////////////////////////////////////////////
33           
34           #include "DynamicLibrary.h"
35           

36 ouyang.jian 1.6 #include <dlfcn.h>

37 kumpf       1.2 
38                 #if defined(PEGASUS_ZOS_SECURITY)
39                 # include <sys/stat.h>
40                 # include "DynamicLibraryzOS_inline.h"
41                 #endif
42                 
43                 PEGASUS_NAMESPACE_BEGIN
44                 
45                 Boolean DynamicLibrary::_load()
46                 {
47                     CString cstr = _fileName.getCString();
48                 
49                 #if defined(PEGASUS_ZOS_SECURITY)
50                     if (!hasProgramControl(cstr))
51                     {
52                         return false;
53                     }
54                 #endif
55                 
56                 #if defined(PEGASUS_OS_ZOS)

57 mark.hamzy  1.7     _handle = dlopen(cstr, RTLD_LAZY | RTLD_GLOBAL);
58                 #elif defined(PEGASUS_OS_VMS)
59                     _handle = dlopen(cstr, RTLD_NOW);

60 kumpf       1.2 #else

61 mark.hamzy  1.7     _handle = dlopen(cstr, RTLD_NOW | RTLD_GLOBAL);

62 kumpf       1.2 #endif
63                 
64                     if (_handle == 0)
65                     {
66                         // Record the load error message
67                         _loadErrorMessage = dlerror();
68                     }
69                 

70 kumpf       1.5     return isLoaded();

71 kumpf       1.2 }
72                 
73                 void DynamicLibrary::_unload()
74                 {
75                     dlclose(_handle);
76                 }
77                 

78 kumpf       1.4 DynamicLibrary::DynamicSymbolHandle DynamicLibrary::getSymbol(

79 kumpf       1.2     const String& symbolName)
80                 {
81                     PEGASUS_ASSERT(isLoaded());
82                 
83                     CString cstr = symbolName.getCString();
84                 

85 kumpf       1.4     DynamicSymbolHandle func =
86                         (DynamicSymbolHandle) dlsym(_handle, (const char *)cstr);

87 kumpf       1.2 
88                     return func;
89                 }
90                 
91                 PEGASUS_NAMESPACE_END