xref: /AOO41X/main/svtools/source/control/filectrl2.cxx (revision cdf0e10c4e3984b49a9502b011690b615761d4a3)
1*cdf0e10cSrcweir /*************************************************************************
2*cdf0e10cSrcweir  *
3*cdf0e10cSrcweir  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4*cdf0e10cSrcweir  *
5*cdf0e10cSrcweir  * Copyright 2000, 2010 Oracle and/or its affiliates.
6*cdf0e10cSrcweir  *
7*cdf0e10cSrcweir  * OpenOffice.org - a multi-platform office productivity suite
8*cdf0e10cSrcweir  *
9*cdf0e10cSrcweir  * This file is part of OpenOffice.org.
10*cdf0e10cSrcweir  *
11*cdf0e10cSrcweir  * OpenOffice.org is free software: you can redistribute it and/or modify
12*cdf0e10cSrcweir  * it under the terms of the GNU Lesser General Public License version 3
13*cdf0e10cSrcweir  * only, as published by the Free Software Foundation.
14*cdf0e10cSrcweir  *
15*cdf0e10cSrcweir  * OpenOffice.org is distributed in the hope that it will be useful,
16*cdf0e10cSrcweir  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17*cdf0e10cSrcweir  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18*cdf0e10cSrcweir  * GNU Lesser General Public License version 3 for more details
19*cdf0e10cSrcweir  * (a copy is included in the LICENSE file that accompanied this code).
20*cdf0e10cSrcweir  *
21*cdf0e10cSrcweir  * You should have received a copy of the GNU Lesser General Public License
22*cdf0e10cSrcweir  * version 3 along with OpenOffice.org.  If not, see
23*cdf0e10cSrcweir  * <http://www.openoffice.org/license.html>
24*cdf0e10cSrcweir  * for a copy of the LGPLv3 License.
25*cdf0e10cSrcweir  *
26*cdf0e10cSrcweir  ************************************************************************/
27*cdf0e10cSrcweir 
28*cdf0e10cSrcweir // MARKER(update_precomp.py): autogen include statement, do not remove
29*cdf0e10cSrcweir #include "precompiled_svtools.hxx"
30*cdf0e10cSrcweir 
31*cdf0e10cSrcweir // this file contains code from filectrl.cxx which needs to be compiled with enabled exception hanling
32*cdf0e10cSrcweir #include <svtools/filectrl.hxx>
33*cdf0e10cSrcweir #include <com/sun/star/lang/XMultiServiceFactory.hpp>
34*cdf0e10cSrcweir #include <com/sun/star/ui/dialogs/XFilePicker.hpp>
35*cdf0e10cSrcweir #include <vcl/unohelp.hxx>
36*cdf0e10cSrcweir #include <tools/urlobj.hxx>
37*cdf0e10cSrcweir #include <osl/file.h>
38*cdf0e10cSrcweir #include <vcl/stdtext.hxx>
39*cdf0e10cSrcweir #include <tools/debug.hxx>
40*cdf0e10cSrcweir 
41*cdf0e10cSrcweir using namespace ::com::sun::star::uno;
42*cdf0e10cSrcweir using namespace ::com::sun::star::lang;
43*cdf0e10cSrcweir using namespace ::com::sun::star::ui;
44*cdf0e10cSrcweir 
45*cdf0e10cSrcweir void FileControl::ImplBrowseFile( )
46*cdf0e10cSrcweir {
47*cdf0e10cSrcweir 	try
48*cdf0e10cSrcweir 	{
49*cdf0e10cSrcweir 		XubString aNewText;
50*cdf0e10cSrcweir 
51*cdf0e10cSrcweir 		const ::rtl::OUString sServiceName = ::rtl::OUString::createFromAscii( "com.sun.star.ui.dialogs.FilePicker" );
52*cdf0e10cSrcweir 
53*cdf0e10cSrcweir 		Reference< XMultiServiceFactory > xMSF = vcl::unohelper::GetMultiServiceFactory();
54*cdf0e10cSrcweir 		Reference < dialogs::XFilePicker > xFilePicker( xMSF->createInstance( sServiceName ), UNO_QUERY );
55*cdf0e10cSrcweir 		if ( xFilePicker.is() )
56*cdf0e10cSrcweir 		{
57*cdf0e10cSrcweir 			// transform the system notation text into a file URL
58*cdf0e10cSrcweir 			::rtl::OUString sSystemNotation = GetText(), sFileURL;
59*cdf0e10cSrcweir 			oslFileError nError = osl_getFileURLFromSystemPath( sSystemNotation.pData, &sFileURL.pData );
60*cdf0e10cSrcweir             if ( nError == osl_File_E_INVAL )
61*cdf0e10cSrcweir                 sFileURL = GetText();   // #97709# Maybe URL is already a file URL...
62*cdf0e10cSrcweir 
63*cdf0e10cSrcweir             //#90430# Check if URL is really a file URL
64*cdf0e10cSrcweir             ::rtl::OUString aTmp;
65*cdf0e10cSrcweir             if ( osl_getSystemPathFromFileURL( sFileURL.pData, &aTmp.pData ) == osl_File_E_None )
66*cdf0e10cSrcweir             {
67*cdf0e10cSrcweir 			    // initially set this directory
68*cdf0e10cSrcweir 			    xFilePicker->setDisplayDirectory( sFileURL );
69*cdf0e10cSrcweir             }
70*cdf0e10cSrcweir 
71*cdf0e10cSrcweir 			if ( xFilePicker.is() && xFilePicker->execute() )
72*cdf0e10cSrcweir 			{
73*cdf0e10cSrcweir 				Sequence < rtl::OUString > aPathSeq = xFilePicker->getFiles();
74*cdf0e10cSrcweir 
75*cdf0e10cSrcweir 				if ( aPathSeq.getLength() )
76*cdf0e10cSrcweir 				{
77*cdf0e10cSrcweir 					aNewText = aPathSeq[0];
78*cdf0e10cSrcweir 					INetURLObject aObj( aNewText );
79*cdf0e10cSrcweir 					if ( aObj.GetProtocol() == INET_PROT_FILE )
80*cdf0e10cSrcweir 						aNewText = aObj.PathToFileName();
81*cdf0e10cSrcweir 					SetText( aNewText );
82*cdf0e10cSrcweir 					maEdit.GetModifyHdl().Call( &maEdit );
83*cdf0e10cSrcweir 				}
84*cdf0e10cSrcweir 			}
85*cdf0e10cSrcweir 		}
86*cdf0e10cSrcweir 		else
87*cdf0e10cSrcweir 			ShowServiceNotAvailableError( this, sServiceName, sal_True );
88*cdf0e10cSrcweir 	}
89*cdf0e10cSrcweir 	catch( const Exception& )
90*cdf0e10cSrcweir 	{
91*cdf0e10cSrcweir 		DBG_ERROR( "FileControl::ImplBrowseFile: caught an exception while executing the file picker!" );
92*cdf0e10cSrcweir 	}
93*cdf0e10cSrcweir }
94*cdf0e10cSrcweir 
95