desktop/source/app/userinstall.cxx

   1 /*************************************************************************
   2  *
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * Copyright 2008 by Sun Microsystems, Inc.
   6  *
   7  * OpenOffice.org - a multi-platform office productivity suite
   8  *
   9  * $RCSfile: userinstall.cxx,v $
  10  * $Revision: 1.23 $
  11  *
  12  * This file is part of OpenOffice.org.
  13  *
  14  * OpenOffice.org is free software: you can redistribute it and/or modify
  15  * it under the terms of the GNU Lesser General Public License version 3
  16  * only, as published by the Free Software Foundation.
  17  *
  18  * OpenOffice.org is distributed in the hope that it will be useful,
  19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21  * GNU Lesser General Public License version 3 for more details
  22  * (a copy is included in the LICENSE file that accompanied this code).
  23  *
  24  * You should have received a copy of the GNU Lesser General Public License
  25  * version 3 along with OpenOffice.org.  If not, see
  26  * <http://www.openoffice.org/license.html>
  27  * for a copy of the LGPLv3 License.
  28  *
  29  ************************************************************************/
  30
  31 // MARKER(update_precomp.py): autogen include statement, do not remove
  32 #include "precompiled_desktop.hxx"
  33
  34
  35 #include "userinstall.hxx"
  36 #include "langselect.hxx"
  37
  38 #include <stdio.h>
  39 #include <rtl/ustring.hxx>
  40 #include <rtl/ustrbuf.hxx>
  41 #include <osl/file.hxx>
  42 #include <osl/mutex.hxx>
  43 #include <osl/process.h>
  44 #include <osl/diagnose.h>
  45 #include <vos/security.hxx>
  46 #include <vos/ref.hxx>
  47 #include <vos/process.hxx>
  48
  49 #ifndef _TOOLS_RESMGR_HXX_
  50 #include <tools/resmgr.hxx>
  51 #endif
  52 #include <unotools/bootstrap.hxx>
  53 #include <svtools/languageoptions.hxx>
  54 #ifndef _SVTOOLS_SYSLOCALEOPTIONSOPTIONS_HXX
  55 #include <svtools/syslocaleoptions.hxx>
  56 #endif
  57 #include <comphelper/processfactory.hxx>
  58 #include <com/sun/star/container/XNameAccess.hpp>
  59 #include <com/sun/star/lang/XMultiServiceFactory.hpp>
  60 #include <com/sun/star/beans/XPropertySet.hpp>
  61 #include <i18npool/mslangid.hxx>
  62 #include <com/sun/star/uno/Any.hxx>
  63 #include <com/sun/star/util/XChangesBatch.hpp>
  64 #include <com/sun/star/beans/XHierarchicalPropertySet.hpp>
  65 #include <com/sun/star/beans/NamedValue.hpp>
  66 #include <com/sun/star/container/XHierarchicalNameAccess.hpp>
  67 #include <com/sun/star/lang/XComponent.hpp>
  68 #include <com/sun/star/lang/XLocalizable.hpp>
  69 #include <com/sun/star/lang/Locale.hpp>
  70
  71 #include "app.hxx"
  72
  73 using namespace rtl;
  74 using namespace osl;
  75 using namespace utl;
  76 using namespace com::sun::star::container;
  77 using namespace com::sun::star::uno;
  78 using namespace com::sun::star::lang;
  79 using namespace com::sun::star::beans;
  80 using namespace com::sun::star::util;
  81
  82
  83 namespace desktop {
  84
  85     static UserInstall::UserInstallError create_user_install(OUString&);
  86
  87     static bool is_user_install()
  88     {
  89         try
  90         {
  91             OUString sConfigSrvc(
  92                  RTL_CONSTASCII_USTRINGPARAM(
  93                     "com.sun.star.configuration.ConfigurationProvider" ) );
  94             OUString sAccessSrvc(
  95                  RTL_CONSTASCII_USTRINGPARAM(
  96                     "com.sun.star.configuration.ConfigurationAccess" ) );
  97
  98             // get configuration provider
  99             Reference< XMultiServiceFactory > theMSF
 100                 = comphelper::getProcessServiceFactory();
 101             Reference< XMultiServiceFactory > theConfigProvider
 102                 = Reference< XMultiServiceFactory >(
 103                     theMSF->createInstance(sConfigSrvc), UNO_QUERY_THROW);
 104
 105             // localize the provider to user selection
 106 //            Reference< XLocalizable > localizable(theConfigProvider, UNO_QUERY_THROW);
 107 //            LanguageType aUserLanguageType = LanguageSelection::getLanguageType();
 108 //            Locale aLocale( MsLangId::convertLanguageToIsoString(aUserLanguageType));
 109 //            localizable->setLocale(aLocale);
 110
 111             Reference< XLocalizable > localizable(theConfigProvider, UNO_QUERY_THROW);
 112             OUString aUserLanguage = LanguageSelection::getLanguageString();
 113             Locale aLocale = LanguageSelection::IsoStringToLocale(aUserLanguage);
 114             localizable->setLocale(aLocale);
 115
 116             Sequence< Any > theArgs(1);
 117             NamedValue v;
 118             v.Name = OUString::createFromAscii("NodePath");
 119             v.Value = makeAny(OUString::createFromAscii("org.openoffice.Setup"));
 120             theArgs[0] <<= v;
 121             Reference< XHierarchicalNameAccess> hnacc(
 122                 theConfigProvider->createInstanceWithArguments(
 123                     sAccessSrvc, theArgs), UNO_QUERY_THROW);
 124
 125             try
 126             {
 127                 sal_Bool bValue = sal_False;
 128                 hnacc->getByHierarchicalName(
 129                         OUString( RTL_CONSTASCII_USTRINGPARAM(
 130                             "Office/ooSetupInstCompleted" ) ) ) >>= bValue;
 131
 132                 return bValue ? true : false;
 133             }
 134             catch ( NoSuchElementException const & )
 135             {
 136                 // just return false in this case.
 137             }
 138         }
 139         catch (Exception const & e)
 140         {
 141             OString msg(OUStringToOString(e.Message, RTL_TEXTENCODING_ASCII_US));
 142             OSL_ENSURE(sal_False, msg.getStr());
 143         }
 144
 145         return false;
 146     }
 147
 148     UserInstall::UserInstallError UserInstall::finalize()
 149     {
 150         OUString aUserInstallPath;
 151         utl::Bootstrap::PathStatus aLocateResult =
 152             utl::Bootstrap::locateUserInstallation(aUserInstallPath);
 153
 154         switch (aLocateResult) {
 155
 156             case utl::Bootstrap::DATA_INVALID:
 157             case utl::Bootstrap::DATA_MISSING:
 158             case utl::Bootstrap::DATA_UNKNOWN:
 159                 // cannot find a valid path or path is missing
 160                 return E_Unknown;
 161
 162             case utl::Bootstrap::PATH_EXISTS:
 163             {
 164                 // path exists, check if an installation lives there
 165                 if ( is_user_install() )
 166                 {
 167                     return E_None;
 168                 }
 169                 // Note: fall-thru intended.
 170             }
 171             case utl::Bootstrap::PATH_VALID:
 172                 // found a path but need to create user install
 173                 return create_user_install(aUserInstallPath);
 174             default:
 175                 return E_Unknown;
 176         }
 177     }
 178
 179     static osl::FileBase::RC copy_recursive( const rtl::OUString& srcUnqPath, const rtl::OUString& dstUnqPath)
 180     {
 181
 182         FileBase::RC err;
 183         DirectoryItem aDirItem;
 184         DirectoryItem::get(srcUnqPath, aDirItem);
 185         FileStatus aFileStatus(FileStatusMask_All);
 186         aDirItem.getFileStatus(aFileStatus);
 187
 188         if( aFileStatus.getFileType() == FileStatus::Directory)
 189         {
 190             // create directory if not already there
 191             err = Directory::create( dstUnqPath );
 192             if (err == osl::FileBase::E_EXIST)
 193                 err = osl::FileBase::E_None;
 194
 195             FileBase::RC next = err;
 196             if (err == osl::FileBase::E_None)
 197             {
 198                 // iterate through directory contents
 199                 Directory aDir( srcUnqPath );
 200                 aDir.open();
 201                 while (err ==  osl::FileBase::E_None &&
 202                     (next = aDir.getNextItem( aDirItem )) == osl::FileBase::E_None)
 203                 {
 204                     aDirItem.getFileStatus(aFileStatus);
 205                     // generate new src/dst pair and make recursive call
 206                     rtl::OUString newSrcUnqPath = aFileStatus.getFileURL();
 207                     rtl::OUString newDstUnqPath = dstUnqPath;
 208                     rtl::OUString itemname = aFileStatus.getFileName();
 209                     // append trailing '/' if needed
 210                     if (newDstUnqPath.lastIndexOf(sal_Unicode('/')) != newDstUnqPath.getLength()-1)
 211                         newDstUnqPath += rtl::OUString::createFromAscii("/");
 212                     newDstUnqPath += itemname;
 213                     // recursion
 214                     err = copy_recursive(newSrcUnqPath, newDstUnqPath);
 215                 }
 216                 aDir.close();
 217
 218                 if ( err != osl::FileBase::E_None )
 219                     return err;
 220                 if( next != FileBase::E_NOENT )
 221                     err = FileBase::E_INVAL;
 222             }
 223         }
 224         else
 225         {
 226             // copy single file - foldback
 227             err = File::copy( srcUnqPath,dstUnqPath );
 228         }
 229         return err;
 230     }
 231
 232     static const char *pszSrcList[] = {
 233         "/presets",
 234         NULL
 235     };
 236     static const char *pszDstList[] = {
 237         "/user",
 238         NULL
 239     };
 240
 241
 242     static UserInstall::UserInstallError create_user_install(OUString& aUserPath)
 243     {
 244         OUString aBasePath;
 245         if (utl::Bootstrap::locateBaseInstallation(aBasePath) != utl::Bootstrap::PATH_EXISTS)
 246             return UserInstall::E_InvalidBaseinstall;
 247
 248         // create the user directory
 249         FileBase::RC rc = Directory::create(aUserPath);
 250         if ((rc != FileBase::E_None) && (rc != FileBase::E_EXIST)) return UserInstall::E_Creation;
 251
 252 #ifdef UNIX
 253         // set safer permissions for the user directory by default
 254         File::setAttributes(aUserPath, Attribute_OwnWrite| Attribute_OwnRead| Attribute_OwnExe);
 255 #endif
 256
 257             // copy data from shared data directory of base installation
 258         for (sal_Int32 i=0; pszSrcList[i]!=NULL && pszDstList[i]!=NULL; i++)
 259         {
 260             rc = copy_recursive(
 261                     aBasePath + OUString::createFromAscii(pszSrcList[i]),
 262                     aUserPath + OUString::createFromAscii(pszDstList[i]));
 263             if ((rc != FileBase::E_None) && (rc != FileBase::E_EXIST))
 264             {
 265                 if ( rc == FileBase::E_NOSPC )
 266                     return UserInstall::E_NoDiskSpace;
 267                 else if ( rc == FileBase::E_ACCES )
 268                     return UserInstall::E_NoWriteAccess;
 269                 else
 270                     return UserInstall::E_Creation;
 271             }
 272         }
 273         try
 274         {
 275             OUString sConfigSrvc = OUString::createFromAscii("com.sun.star.configuration.ConfigurationProvider");
 276             OUString sAccessSrvc = OUString::createFromAscii("com.sun.star.configuration.ConfigurationUpdateAccess");
 277
 278             // get configuration provider
 279             Reference< XMultiServiceFactory > theMSF = comphelper::getProcessServiceFactory();
 280             Reference< XMultiServiceFactory > theConfigProvider = Reference< XMultiServiceFactory >(
 281                 theMSF->createInstance(sConfigSrvc), UNO_QUERY_THROW);
 282             Sequence< Any > theArgs(1);
 283             NamedValue v(OUString::createFromAscii("NodePath"), makeAny(OUString::createFromAscii("org.openoffice.Setup")));
 284             //v.Name = OUString::createFromAscii("NodePath");
 285             //v.Value = makeAny(OUString::createFromAscii("org.openoffice.Setup"));
 286             theArgs[0] <<= v;
 287             Reference< XHierarchicalPropertySet> hpset(
 288                 theConfigProvider->createInstanceWithArguments(sAccessSrvc, theArgs), UNO_QUERY_THROW);
 289             hpset->setHierarchicalPropertyValue(OUString::createFromAscii("Office/ooSetupInstCompleted"), makeAny(sal_True));
 290             Reference< XChangesBatch >(hpset, UNO_QUERY_THROW)->commitChanges();
 291         }
 292         catch ( PropertyVetoException& )
 293         {
 294             // we are not allowed to change this
 295         }
 296         catch (Exception& e)
 297         {
 298             OString aMsg("create_user_install(): ");
 299             aMsg += OUStringToOString(e.Message, RTL_TEXTENCODING_ASCII_US);
 300             OSL_ENSURE(sal_False, aMsg.getStr());
 301             return UserInstall::E_Creation;
 302         }
 303
 304         return UserInstall::E_None;
 305
 306     }
 307 }
 308
 309