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