diff options
Diffstat (limited to 'odk/source/unoapploader')
-rw-r--r-- | odk/source/unoapploader/unx/unoapploader.c | 310 | ||||
-rw-r--r-- | odk/source/unoapploader/win/unoapploader.c | 410 |
2 files changed, 720 insertions, 0 deletions
diff --git a/odk/source/unoapploader/unx/unoapploader.c b/odk/source/unoapploader/unx/unoapploader.c new file mode 100644 index 000000000..3a3559929 --- /dev/null +++ b/odk/source/unoapploader/unx/unoapploader.c @@ -0,0 +1,310 @@ +/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ +/* + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (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.apache.org/licenses/LICENSE-2.0 . + */ + +#include <stdlib.h> +#include <unistd.h> +#include <stdio.h> +#include <string.h> +#include <sys/stat.h> + +#ifdef LINUX +#define __USE_GNU +#endif +#include <dlfcn.h> + +#include <cppuhelper/findsofficepath.h> +#include <rtl/string.h> +#include <sal/types.h> + +static char* getPath(void); +static char* createCommandName( char* argv0 ); + +static const int SEPARATOR = '/'; +static const char* PATHSEPARATOR = ":"; + + +/* + * The main function implements a loader for applications which use UNO. + * + * <p>This code runs on the Unix/Linux platforms only.</p> + * + * <p>The main function detects a UNO installation on the system and adds the + * relevant directories of the installation to the LD_LIBRARY_PATH environment + * variable. After that, the application process is loaded and started, whereby + * the new process inherits the environment of the calling process, including + * the modified LD_LIBRARY_PATH environment variable. The application's + * executable name must be the same as the name of this executable, prefixed + * by '_'.</p> + * <p>On MACOSX DYLD_LIBRARY_PATH is used instead of LD_LIBRARY_PATH!<p> + * + * <p>A UNO installation can be specified by the user by setting the UNO_PATH + * environment variable to the program directory of the UNO installation. + * If no installation is specified by the user, the default installation on + * the system will be taken. The default installation is found from the + * PATH environment variable. This requires that the 'soffice' executable or + * a symbolic link is in one of the directories listed in the PATH environment + * variable.</p> + */ +int main( int argc, char *argv[] ) +{ + char* path; + char* cmdname; + + (void) argc; /* avoid warning about unused parameter */ + + /* get the path of the UNO installation */ + path = getPath(); + + if ( path != NULL ) + { +#if defined(MACOSX) + static const char* ENVVARNAME = "DYLD_LIBRARY_PATH"; +#elif defined(AIX) + static const char* ENVVARNAME = "LIBPATH"; +#else + static const char* ENVVARNAME = "LD_LIBRARY_PATH"; +#endif + char* libpath; + char* value; + char* envstr; + int size; + + size_t pathlen = strlen(path); + struct stat stats; + int ret; + + static char const unoinfoSuffix[] = "/unoinfo"; + char * unoinfo = malloc( + pathlen + RTL_CONSTASCII_LENGTH(unoinfoSuffix) + 1); + /*TODO: overflow */ + if (unoinfo == NULL) { + free(path); + fprintf(stderr, "Error: out of memory!\n"); + exit(EXIT_FAILURE); + } + strcpy(unoinfo, path); + strcpy( + unoinfo + pathlen, + unoinfoSuffix + (pathlen == 0 || path[pathlen - 1] != '/' ? 0 : 1)); + ret = lstat(unoinfo, &stats); + free(unoinfo); + + if (ret == 0) { + char * cmd = malloc( + 2 * pathlen + RTL_CONSTASCII_LENGTH("/unoinfo c++") + 1); + /*TODO: overflow */ + char const * p; + char * q; + FILE * f; + size_t n = 1000; + size_t old = 0; + if (cmd == NULL) { + fprintf(stderr, "Error: out of memory!\n"); + exit(EXIT_FAILURE); + } + p = path; + q = cmd; + while (*p != '\0') { + *q++ = '\\'; + *q++ = *p++; + } + if (p == path || p[-1] != '/') { + *q++ = '/'; + } + strcpy(q, "unoinfo c++"); + f = popen(cmd, "r"); + free(cmd); + if (f == NULL) + { + fprintf(stderr, "Error: calling unoinfo failed!\n"); + exit(EXIT_FAILURE); + } + libpath = NULL; + for (;;) { + size_t m; + libpath = realloc(libpath, n); + if (libpath == NULL) { + fprintf( + stderr, + "Error: out of memory reading unoinfo output!\n"); + exit(EXIT_FAILURE); + } + m = fread(libpath + old, 1, n - old - 1, f); + if (m != n - old - 1) { + if (ferror(f)) { + fprintf(stderr, "Error: cannot read unoinfo output!\n"); + exit(EXIT_FAILURE); + } + libpath[old + m] = '\0'; + break; + } + if (n >= SAL_MAX_SIZE / 2) { + fprintf( + stderr, + "Error: out of memory reading unoinfo output!\n"); + exit(EXIT_FAILURE); + } + old = n - 1; + n *= 2; + } + if (pclose(f) != 0) { + fprintf(stderr, "Error: executing unoinfo failed!\n"); + exit(EXIT_FAILURE); + } + free(path); + } + else + { + /* Assume an old OOo 2.x installation without unoinfo: */ + libpath = path; + } + + value = getenv( ENVVARNAME ); + + // workaround for finding wrong libsqlite3.dylib in the office installation + // For MacOS > 10.6 nss uses the system lib -> unresolved symbol _sqlite3_wal_checkpoint +#ifdef MACOSX + size = strlen( ENVVARNAME ) + strlen( "=/usr/lib:" ) + strlen( libpath ) + 1; +#else + size = strlen( ENVVARNAME ) + strlen( "=" ) + strlen( libpath ) + 1; +#endif + if ( value != NULL ) + size += strlen( PATHSEPARATOR ) + strlen( value ); + envstr = (char*) malloc( size ); + strcpy( envstr, ENVVARNAME ); +#ifdef MACOSX + strcat( envstr, "=/usr/lib:" ); +#else + strcat( envstr, "=" ); +#endif + strcat( envstr, libpath ); + free( libpath ); + if ( value != NULL ) + { + strcat( envstr, PATHSEPARATOR ); + strcat( envstr, value ); + } + /* coverity[tainted_data : FALSE] */ + putenv( envstr ); + } + else + { + fprintf( stderr, "Warning: no office installation found!\n" ); + fflush( stderr ); + } + + /* set the executable name for the application process */ + cmdname = createCommandName( argv[0] ); + argv[0] = cmdname; + + /* + * create the application process; + * if successful, execvp doesn't return to the calling process + */ + /* coverity[tainted_string] - createCommandName creates a safe string */ + execvp( cmdname, argv ); + fprintf( stderr, "Error: execvp failed!\n" ); + fflush( stderr ); + + return 0; +} + +/* + * Gets the path of a UNO installation. + * + * @return the installation path or NULL, if no installation was specified or + * found, or if an error occurred. + * Returned pointer must be released with free() + */ +char* getPath(void) +{ + char* path = cppuhelper_detail_findSofficePath(); + + if ( path == NULL ) + { + fprintf( stderr, "Warning: getting path from PATH environment " + "variable failed!\n" ); + fflush( stderr ); + } + + return path; +} + +/* + * Creates the application's executable file name. + * + * <p>The application's executable file name is the name of this executable + * prefixed by '_'.</p> + * + * @param argv0 specifies the argv[0] parameter of the main function + * + * @return the application's executable file name or NULL, if an error occurred + */ +char* createCommandName( char* argv0 ) +{ + const char* CMDPREFIX = "_"; + const char* prgname = NULL; + + char* cmdname = NULL; + char* sep = NULL; +#ifndef AIX + Dl_info dl_info; +#endif + + /* get the executable file name from argv0 */ + prgname = argv0; + +#ifndef AIX + /* + * if argv0 doesn't contain an absolute path name, try to get the absolute + * path name from dladdr; note that this only works for Solaris, not for + * Linux + */ + if ( argv0 != NULL && *argv0 != SEPARATOR && + dladdr( (void*) &createCommandName, &dl_info ) && + dl_info.dli_fname != NULL && *dl_info.dli_fname == SEPARATOR ) + { + prgname = dl_info.dli_fname; + } +#endif + + /* prefix the executable file name by '_' */ + if ( prgname != NULL ) + { + cmdname = (char*) malloc( strlen( prgname ) + strlen( CMDPREFIX ) + 1 ); + sep = strrchr( prgname, SEPARATOR ); + if ( sep != NULL ) + { + int pos = ++sep - prgname; + strncpy( cmdname, prgname, pos ); + cmdname[ pos ] = '\0'; + strcat( cmdname, CMDPREFIX ); + strcat( cmdname, sep ); + } + else + { + strcpy( cmdname, CMDPREFIX ); + strcat( cmdname, prgname ); + } + } + + return cmdname; +} + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ diff --git a/odk/source/unoapploader/win/unoapploader.c b/odk/source/unoapploader/win/unoapploader.c new file mode 100644 index 000000000..4baa3ddda --- /dev/null +++ b/odk/source/unoapploader/win/unoapploader.c @@ -0,0 +1,410 @@ +/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */ +/* + * This file is part of the LibreOffice project. + * + * This Source Code Form is subject to the terms of the Mozilla Public + * License, v. 2.0. If a copy of the MPL was not distributed with this + * file, You can obtain one at http://mozilla.org/MPL/2.0/. + * + * This file incorporates work covered by the following license notice: + * + * Licensed to the Apache Software Foundation (ASF) under one or more + * contributor license agreements. See the NOTICE file distributed + * with this work for additional information regarding copyright + * ownership. The ASF licenses this file to you under the Apache + * License, Version 2.0 (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.apache.org/licenses/LICENSE-2.0 . + */ + +#include <assert.h> +#include <stdlib.h> +#include <stdio.h> +#include <string.h> +#include <process.h> + +#if !defined WIN32_LEAN_AND_MEAN +# define WIN32_LEAN_AND_MEAN +#endif +#include <windows.h> + +#include <cppuhelper/findsofficepath.h> +#include <sal/types.h> + +#define MY_SIZE(s) (sizeof (s) / sizeof *(s)) +#define MY_LENGTH(s) (MY_SIZE(s) - 1) + +static wchar_t* getPath(void); +static wchar_t* createCommandLine( wchar_t const * lpCmdLine ); +static FILE* getErrorFile( int create ); +static void writeError( const char* errstr ); +static void closeErrorFile(void); + +/* + * The main function implements a loader for applications which use UNO. + * + * <p>This code runs on the Windows platform only.</p> + * + * <p>The main function detects a UNO installation on the system and adds the + * program directory of the UNO installation to the PATH environment variable. + * After that, the application process is loaded and started, whereby the + * new process inherits the environment of the calling process, including + * the modified PATH environment variable. The application's executable name + * must be the same as the name of this executable, prefixed by '_'.</p> + * + * <p>A UNO installation can be specified by the user by setting the UNO_PATH + * environment variable to the program directory of the UNO installation. + * If no installation is specified by the user, the default installation on + * the system will be taken. The default installation is read from the + * default value of the key "Software\LibreOffice\UNO\InstallPath" from the + * root key HKEY_CURRENT_USER in the Windows Registry. If this key is missing, + * the key is read from the root key HKEY_LOCAL_MACHINE.</p> + */ +int WINAPI wWinMain( HINSTANCE hInstance, HINSTANCE hPrevInstance, + LPWSTR lpCmdLine, int nCmdShow ) +{ + (void) hInstance; /* unused */ + (void) hPrevInstance; /* unused */ + (void) nCmdShow; /* unused */ + + /* get the path of the UNO installation */ + wchar_t* path = getPath(); + + if ( path != NULL ) + { + wchar_t cmd[ + MY_LENGTH(L"\"") + MAX_PATH + + MY_LENGTH(L"\\unoinfo.exe\" c++")]; + /* hopefully does not overflow */ + cmd[0] = L'"'; + wcscpy(cmd + 1, path); + if (wcschr(cmd + 1, L'"') != NULL) { + free(path); + writeError("Error: bad characters in UNO installation path!\n"); + closeErrorFile(); + return 1; + } + size_t pathsize = wcslen(cmd); + wcscpy( + cmd + pathsize, + &L"\\unoinfo.exe\" c++"[ + pathsize == 1 || cmd[pathsize - 1] != L'\\' ? 0 : 1]); + SECURITY_ATTRIBUTES sec; + sec.nLength = sizeof (SECURITY_ATTRIBUTES); + sec.lpSecurityDescriptor = NULL; + sec.bInheritHandle = TRUE; + HANDLE stdoutRead; + HANDLE stdoutWrite; + HANDLE temp; + if (CreatePipe(&temp, &stdoutWrite, &sec, 0) == 0 || + DuplicateHandle( + GetCurrentProcess(), temp, GetCurrentProcess(), &stdoutRead, 0, + FALSE, DUPLICATE_CLOSE_SOURCE | DUPLICATE_SAME_ACCESS) == 0) + { + free(path); + writeError("Error: CreatePipe/DuplicateHandle failed!\n"); + closeErrorFile(); + return 1; + } + STARTUPINFOW startinfo; + PROCESS_INFORMATION procinfo; + memset(&startinfo, 0, sizeof(startinfo)); + startinfo.cb = sizeof(startinfo); + startinfo.lpDesktop = L""; + startinfo.dwFlags = STARTF_USESTDHANDLES; + startinfo.hStdOutput = stdoutWrite; + BOOL ret = CreateProcessW( + NULL, cmd, NULL, NULL, TRUE, 0, NULL, NULL, &startinfo, &procinfo); + if (ret != FALSE) { + // Release result of GetPath() + free(path); + + char * buf = NULL; + char * tmp; + DWORD n = 1000; + DWORD k = 0; + DWORD exitcode; + CloseHandle(stdoutWrite); + CloseHandle(procinfo.hThread); + for (;;) { + DWORD m; + tmp = realloc(buf, n); + if (tmp == NULL) { + free(buf); + writeError( + "Error: out of memory reading unoinfo output!\n"); + closeErrorFile(); + return 1; + } + buf = tmp; + if (!ReadFile(stdoutRead, buf + k, n - k, &m, NULL)) + { + DWORD err = GetLastError(); + if (err == ERROR_HANDLE_EOF || err == ERROR_BROKEN_PIPE) { + break; + } + writeError("Error: cannot read unoinfo output!\n"); + closeErrorFile(); + return 1; + } + if (m == 0) { + break; + } + k += m; + if (k >= n) { + if (n >= MAXDWORD / 2) { + writeError( + "Error: out of memory reading unoinfo output!\n"); + closeErrorFile(); + return 1; + } + n *= 2; + } + } + if ((k & 1) == 1) { + writeError("Error: bad unoinfo output!\n"); + closeErrorFile(); + return 1; + } + CloseHandle(stdoutRead); + if (!GetExitCodeProcess(procinfo.hProcess, &exitcode) || + exitcode != 0) + { + writeError("Error: executing unoinfo failed!\n"); + closeErrorFile(); + return 1; + } + path = (wchar_t*)realloc(buf, k + sizeof(wchar_t)); + if (path == NULL) + { + free(buf); + writeError( + "Error: out of memory zero-terminating unoinfo output!\n"); + closeErrorFile(); + return 1; + } + path[k / 2] = L'\0'; + } else { + if (GetLastError() != ERROR_FILE_NOT_FOUND) { + free(path); + writeError("Error: calling unoinfo failed!\n"); + closeErrorFile(); + return 1; + } + CloseHandle(stdoutRead); + CloseHandle(stdoutWrite); + } + + /* get the value of the PATH environment variable */ + const wchar_t* ENVVARNAME = L"PATH"; + const wchar_t* PATHSEPARATOR = L";"; + wchar_t* value = _wgetenv( ENVVARNAME ); + + /* + * add the UNO installation path to the PATH environment variable; + * note that this only affects the environment variable of the current + * process, the command processor's environment is not changed + */ + size_t size = wcslen( ENVVARNAME ) + wcslen( L"=" ) + wcslen( path ) + 1; + if ( value != NULL ) + size += wcslen( PATHSEPARATOR ) + wcslen( value ); + wchar_t* envstr = (wchar_t*) malloc( size*sizeof(wchar_t) ); + assert(envstr); + wcscpy( envstr, ENVVARNAME ); + wcscat( envstr, L"=" ); + wcscat( envstr, path ); + if ( value != NULL ) + { + wcscat( envstr, PATHSEPARATOR ); + wcscat( envstr, value ); + } + /* coverity[tainted_data : FALSE] */ + _wputenv( envstr ); + free( envstr ); + free( path ); + } + else + { + writeError( "Warning: no UNO installation found!\n" ); + } + + /* create the command line for the application process */ + wchar_t* cmdline = createCommandLine( lpCmdLine ); + if ( cmdline == NULL ) + { + writeError( "Error: cannot create command line!\n" ); + closeErrorFile(); + return 1; + } + + /* create the application process */ + STARTUPINFOW startup_info; + PROCESS_INFORMATION process_info; + memset( &startup_info, 0, sizeof(startup_info) ); + startup_info.cb = sizeof(startup_info); + BOOL bCreate = CreateProcessW( NULL, cmdline, NULL, NULL, FALSE, 0, NULL, NULL, + &startup_info, &process_info ); + free( cmdline ); + if ( !bCreate ) + { + writeError( "Error: cannot create process!\n" ); + closeErrorFile(); + return 1; + } + + /* close the error file */ + closeErrorFile(); + + return 0; +} + +/* + * Gets the path of a UNO installation. + * + * @return the installation path or NULL, if no installation was specified or + * found, or if an error occurred. + * Returned pointer must be released with free() + */ +wchar_t* getPath() +{ + wchar_t* path = cppuhelper_detail_findSofficePath(); + + if ( path == NULL ) + writeError( "Warning: getting path from Windows Registry failed!\n" ); + + return path; +} + +/* + * Creates the command line for the application process including the absolute + * path of the executable. + * + * <p>The application's executable file name is the name of this executable + * prefixed by '_'.</p> + * + * @param appendix specifies the command line for the application excluding + * the executable name + * + * @return the command line for the application process or NULL, if an error + * occurred + */ +wchar_t* createCommandLine( wchar_t const * appendix ) +{ + const wchar_t* CMDPREFIX = L"_"; + const wchar_t* DQUOTE = L"\""; + const wchar_t* SPACE = L" "; + + wchar_t* cmdline = NULL; + + wchar_t cmdname[ _MAX_PATH ]; + wchar_t drive[ _MAX_DRIVE ]; + wchar_t dir[ _MAX_PATH ]; + wchar_t base[ _MAX_FNAME ]; + wchar_t newbase[ _MAX_FNAME ]; + wchar_t ext[ _MAX_EXT ]; + + /* get the absolute path of the executable file */ + if ( GetModuleFileNameW( NULL, cmdname, MY_SIZE( cmdname ) ) ) + { + /* prefix the executable file name by '_' */ + _wsplitpath( cmdname, drive, dir, base, ext ); + wcscpy( newbase, CMDPREFIX ); + wcscat( newbase, base ); + _wmakepath( cmdname, drive, dir, newbase, ext ); + + /* create the command line */ + cmdline = (wchar_t*) malloc( (wcslen( DQUOTE ) + wcslen( cmdname ) + + wcslen ( DQUOTE ) + wcslen( SPACE ) + wcslen( appendix ) + 1) * sizeof(wchar_t) ); + assert(cmdline); + wcscpy( cmdline, DQUOTE ); + wcscat( cmdline, cmdname ); + wcscat( cmdline, DQUOTE ); + wcscat( cmdline, SPACE ); + wcscat( cmdline, appendix ); + } + + return cmdline; +} + +/* + * Gets the pointer to the error file. + * + * <p>The error file will only be created, if create != 0.</p> + * + * <p>The error file has the name <executable file name>-error.log and is + * created in the same directory as the executable file. If this fails, + * the error file is created in the directory designated for temporary files. + * </p> + + * @param create specifies, if the error file should be created (create != 0) + * + * @return the pointer to the open error file or NULL, if no error file is + * open or can be created + */ +FILE* getErrorFile( int create ) +{ + const wchar_t* MODE = L"w"; + const wchar_t* BASEPOSTFIX = L"-error"; + const wchar_t* EXTENSION = L".log"; + + static FILE* ferr = NULL; + + wchar_t fname[ _MAX_PATH ]; + wchar_t drive[ _MAX_DRIVE ]; + wchar_t dir[ _MAX_PATH ]; + wchar_t base[ _MAX_FNAME ]; + wchar_t newbase[ _MAX_FNAME ]; + wchar_t ext[ _MAX_EXT ]; + + if ( ferr == NULL && create ) + { + /* get the absolute path of the executable file */ + if ( GetModuleFileNameW( NULL, fname, MY_SIZE( fname ) ) ) + { + /* create error file in the directory of the executable file */ + _wsplitpath( fname, drive, dir, base, ext ); + wcscpy( newbase, base ); + wcscat( newbase, BASEPOSTFIX ); + _wmakepath( fname, drive, dir, newbase, EXTENSION ); + ferr = _wfopen( fname, MODE ); + + if ( ferr == NULL ) + { + /* create error file in the temp directory */ + GetTempPathW(MY_SIZE( fname ), fname ); + wcscat( fname, newbase ); + wcscat( fname, EXTENSION ); + ferr = _wfopen( fname, MODE ); + } + } + } + + return ferr; +} + +/* + * Writes an error message to the error file. + * + * @param errstr specifies the error message + */ +void writeError( const char* errstr ) +{ + FILE* ferr = getErrorFile( 1 ); + if ( ferr != NULL ) + { + fputs( errstr, ferr ); + fflush( ferr ); + } +} + +/* + * Closes the error file. + */ +void closeErrorFile() +{ + FILE* ferr = getErrorFile( 0 ); + if ( ferr != NULL ) + fclose( ferr ); +} + +/* vim:set shiftwidth=4 softtabstop=4 expandtab: */ |