xref: /trunk/main/sal/osl/all/loadmodulerelative.cxx (revision cdf0e10c)
1 /*************************************************************************
2  *
3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4  *
5  * Copyright 2000, 2010 Oracle and/or its affiliates.
6  *
7  * OpenOffice.org - a multi-platform office productivity suite
8  *
9  * This file is part of OpenOffice.org.
10  *
11  * OpenOffice.org is free software: you can redistribute it and/or modify
12  * it under the terms of the GNU Lesser General Public License version 3
13  * only, as published by the Free Software Foundation.
14  *
15  * OpenOffice.org is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18  * GNU Lesser General Public License version 3 for more details
19  * (a copy is included in the LICENSE file that accompanied this code).
20  *
21  * You should have received a copy of the GNU Lesser General Public License
22  * version 3 along with OpenOffice.org.  If not, see
23  * <http://www.openoffice.org/license.html>
24  * for a copy of the LGPLv3 License.
25  *
26  ************************************************************************/
27 
28 // MARKER(update_precomp.py): autogen include statement, do not remove
29 #include "precompiled_sal.hxx"
30 
31 #include "sal/config.h"
32 
33 #include <cstddef>
34 
35 #include "osl/diagnose.h"
36 #include "osl/module.h"
37 #include "osl/module.hxx"
38 #include "osl/thread.h"
39 #include "rtl/malformeduriexception.hxx"
40 #include "rtl/uri.hxx"
41 #include "rtl/ustring.h"
42 #include "rtl/ustring.hxx"
43 #include "sal/types.h"
44 
45 extern "C" {
46 
47 oslModule SAL_CALL osl_loadModuleRelative(
48     oslGenericFunction const baseModule, rtl_uString * const relativePath,
49     sal_Int32 const mode)
50 {
51     ::rtl::OUString base;
52     if (!::osl::Module::getUrlFromAddress(baseModule, base)) {
53         OSL_TRACE("osl::Module::getUrlFromAddress failed");
54         return NULL;
55     }
56     ::rtl::OUString abs;
57     try {
58         abs = ::rtl::Uri::convertRelToAbs(base, relativePath);
59     } catch (::rtl::MalformedUriException & e) {
60         (void) e; // avoid warnings
61         OSL_TRACE(
62             "rtl::MalformedUriException <%s>",
63             rtl::OUStringToOString(e.getMessage(), osl_getThreadTextEncoding()).
64                 getStr());
65             //TODO: let some OSL_TRACE variant take care of text conversion?
66         return NULL;
67     }
68     return ::osl_loadModule(abs.pData, mode);
69 }
70 
71 }
72