Line data Source code
1 : /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
2 : /*
3 : * This file is part of the LibreOffice project.
4 : *
5 : * This Source Code Form is subject to the terms of the Mozilla Public
6 : * License, v. 2.0. If a copy of the MPL was not distributed with this
7 : * file, You can obtain one at http://mozilla.org/MPL/2.0/.
8 : */
9 :
10 : #include <com/sun/star/lang/XMultiServiceFactory.hpp>
11 : #include <com/sun/star/task/InteractionHandler.hpp>
12 : #include <com/sun/star/ucb/XCommandEnvironment.hpp>
13 : #include <com/sun/star/ucb/XContentAccess.hpp>
14 : #include <com/sun/star/sdbc/XResultSet.hpp>
15 : #include <com/sun/star/sdbc/XRow.hpp>
16 :
17 : #include <comphelper/processfactory.hxx>
18 : #include <officecfg/Office/Common.hxx>
19 : #include <rtl/uri.hxx>
20 : #include <ucbhelper/content.hxx>
21 : #include <ucbhelper/commandenvironment.hxx>
22 :
23 : #include <svtools/PlaceEditDialog.hxx>
24 : #include <svtools/ServerDetailsControls.hxx>
25 : #include <config_oauth2.h>
26 :
27 : using namespace std;
28 : using namespace com::sun::star::lang;
29 : using namespace com::sun::star::sdbc;
30 : using namespace com::sun::star::task;
31 : using namespace com::sun::star::ucb;
32 : using namespace com::sun::star::uno;
33 :
34 0 : DetailsContainer::DetailsContainer( VclBuilderContainer* pBuilder, const OString& rFrame )
35 : {
36 0 : pBuilder->get( m_pFrame, rFrame );
37 0 : }
38 :
39 0 : DetailsContainer::~DetailsContainer( )
40 : {
41 0 : }
42 :
43 0 : void DetailsContainer::show( bool bShow )
44 : {
45 0 : m_pFrame->Show( bShow );
46 0 : }
47 :
48 0 : INetURLObject DetailsContainer::getUrl( )
49 : {
50 : // Don't use that class directly: make it smarter by subclassing it.
51 0 : return INetURLObject( );
52 : }
53 :
54 0 : bool DetailsContainer::setUrl( const INetURLObject& )
55 : {
56 : // That class doesn't contain any logic... it defers the dirty work
57 : // to the sub classes.
58 0 : return false;
59 : }
60 :
61 0 : void DetailsContainer::notifyChange( )
62 : {
63 0 : m_aChangeHdl.Call( this );
64 0 : }
65 :
66 0 : IMPL_LINK_NOARG( DetailsContainer, ValueChangeHdl )
67 : {
68 0 : notifyChange( );
69 0 : return 0;
70 : }
71 :
72 0 : HostDetailsContainer::HostDetailsContainer( VclBuilderContainer* pBuilder, sal_uInt16 nPort, const OUString& sScheme ) :
73 : DetailsContainer( pBuilder, "HostDetails" ),
74 : m_nDefaultPort( nPort ),
75 0 : m_sScheme( sScheme )
76 : {
77 0 : pBuilder->get( m_pEDHost, "host" );
78 0 : m_pEDHost->SetModifyHdl( LINK( this, DetailsContainer, ValueChangeHdl ) );
79 :
80 0 : pBuilder->get( m_pEDPort, "port" );
81 0 : m_pEDPort->SetModifyHdl( LINK( this, DetailsContainer, ValueChangeHdl ) );
82 :
83 0 : pBuilder->get( m_pEDPath, "path" );
84 0 : m_pEDPath->SetModifyHdl( LINK( this, DetailsContainer, ValueChangeHdl ) );
85 :
86 0 : show( false );
87 0 : }
88 :
89 0 : void HostDetailsContainer::show( bool bShow )
90 : {
91 0 : DetailsContainer::show( bShow );
92 0 : if ( bShow )
93 0 : m_pEDPort->SetValue( m_nDefaultPort );
94 0 : }
95 :
96 0 : INetURLObject HostDetailsContainer::getUrl( )
97 : {
98 0 : OUString sHost = m_pEDHost->GetText().trim( );
99 0 : sal_Int64 nPort = m_pEDPort->GetValue();
100 0 : OUString sPath = m_pEDPath->GetText().trim( );
101 :
102 0 : OUString sUrl;
103 0 : if ( !sHost.isEmpty( ) )
104 : {
105 0 : sUrl = m_sScheme + "://" + sHost;
106 0 : if ( nPort != m_nDefaultPort )
107 0 : sUrl += ":" + OUString::number( nPort );
108 0 : if ( !sPath.isEmpty( ) )
109 0 : if ( sPath.indexOf( '/' ) != 0 )
110 0 : sUrl += "/";
111 0 : sUrl += sPath;
112 : }
113 :
114 0 : return INetURLObject( sUrl );
115 : }
116 :
117 0 : bool HostDetailsContainer::setUrl( const INetURLObject& rUrl )
118 : {
119 0 : bool bSuccess = verifyScheme( INetURLObject::GetScheme( rUrl.GetProtocol( ) ) );
120 :
121 0 : if ( bSuccess )
122 : {
123 0 : m_pEDHost->SetText( rUrl.GetHost( ) );
124 0 : m_pEDPort->SetValue( rUrl.GetPort( ) );
125 0 : m_pEDPath->SetText( rUrl.GetURLPath() );
126 : }
127 :
128 0 : return bSuccess;
129 : }
130 :
131 0 : bool HostDetailsContainer::verifyScheme( const OUString& sScheme )
132 : {
133 0 : return sScheme.equals( m_sScheme + "://" );
134 : }
135 :
136 0 : DavDetailsContainer::DavDetailsContainer( VclBuilderContainer* pBuilder ) :
137 0 : HostDetailsContainer( pBuilder, 80, "http" )
138 : {
139 0 : pBuilder->get( m_pCBDavs, "webdavs" );
140 0 : m_pCBDavs->SetToggleHdl( LINK( this, DavDetailsContainer, ToggledDavsHdl ) );
141 :
142 0 : show( false );
143 0 : }
144 :
145 0 : void DavDetailsContainer::show( bool bShow )
146 : {
147 0 : HostDetailsContainer::show( bShow );
148 :
149 0 : m_pCBDavs->Show( bShow );
150 :
151 0 : if ( bShow )
152 0 : m_pCBDavs->Check( false );
153 0 : }
154 :
155 0 : bool DavDetailsContainer::verifyScheme( const OUString& rScheme )
156 : {
157 0 : bool bValid = false;
158 0 : if ( rScheme == "http://" )
159 : {
160 0 : bValid = true;
161 0 : m_pCBDavs->Check( false );
162 : }
163 0 : else if ( rScheme == "https://" )
164 : {
165 0 : bValid = true;
166 0 : m_pCBDavs->Check( true );
167 : }
168 0 : return bValid;
169 : }
170 :
171 0 : IMPL_LINK( DavDetailsContainer, ToggledDavsHdl, CheckBox*, pCheckBox )
172 : {
173 : // Change default port if needed
174 0 : bool bCheckedDavs = pCheckBox->IsChecked();
175 0 : if ( m_pEDPort->GetValue() == 80 && bCheckedDavs )
176 0 : m_pEDPort->SetValue( 443 );
177 0 : else if ( m_pEDPort->GetValue() == 443 && !bCheckedDavs )
178 0 : m_pEDPort->SetValue( 80 );
179 :
180 0 : OUString sScheme( "http" );
181 0 : if ( bCheckedDavs )
182 0 : sScheme = "https";
183 0 : setScheme( sScheme );
184 :
185 0 : notifyChange( );
186 :
187 0 : return 0;
188 : }
189 :
190 0 : SmbDetailsContainer::SmbDetailsContainer( VclBuilderContainer* pBuilder ) :
191 0 : DetailsContainer( pBuilder, "SmbDetails" )
192 : {
193 0 : pBuilder->get( m_pEDHost, "smbHost" );
194 0 : m_pEDHost->SetModifyHdl( LINK( this, DetailsContainer, ValueChangeHdl ) );
195 :
196 0 : pBuilder->get( m_pEDShare, "smbShare" );
197 0 : m_pEDShare->SetModifyHdl( LINK( this, DetailsContainer, ValueChangeHdl ) );
198 :
199 0 : pBuilder->get( m_pEDPath, "smbPath" );
200 0 : m_pEDPath->SetModifyHdl( LINK( this, DetailsContainer, ValueChangeHdl ) );
201 :
202 0 : show( false );
203 0 : }
204 :
205 0 : INetURLObject SmbDetailsContainer::getUrl( )
206 : {
207 0 : OUString sHost = m_pEDHost->GetText().trim( );
208 0 : OUString sShare = m_pEDShare->GetText().trim( );
209 0 : OUString sPath = m_pEDPath->GetText().trim( );
210 :
211 0 : OUString sUrl;
212 0 : if ( !sHost.isEmpty( ) )
213 : {
214 0 : sUrl = "smb://" + sHost + "/";
215 0 : if ( !sShare.isEmpty( ) )
216 0 : sUrl += sShare;
217 0 : if ( !sPath.isEmpty( ) )
218 0 : if ( sPath.indexOf( '/' ) != 0 )
219 0 : sUrl += "/";
220 0 : sUrl += sPath;
221 : }
222 :
223 0 : return INetURLObject( sUrl );
224 : }
225 :
226 0 : bool SmbDetailsContainer::setUrl( const INetURLObject& rUrl )
227 : {
228 0 : bool bSuccess = rUrl.GetProtocol() == INetProtocol::Smb;
229 :
230 0 : if ( bSuccess )
231 : {
232 0 : OUString sShare = rUrl.getName( 0 );
233 0 : OUString sFullPath = rUrl.GetURLPath( );
234 0 : OUString sPath;
235 0 : if ( sFullPath.getLength( ) > sShare.getLength( ) )
236 : {
237 0 : sal_Int32 nPos = sShare.getLength( );
238 0 : if ( nPos != 0 )
239 0 : ++nPos;
240 0 : sPath = sFullPath.copy( nPos );
241 : }
242 :
243 0 : m_pEDHost->SetText( rUrl.GetHost( ) );
244 0 : m_pEDShare->SetText( sShare );
245 0 : m_pEDPath->SetText( sPath );
246 : }
247 :
248 0 : return bSuccess;
249 : }
250 :
251 0 : CmisDetailsContainer::CmisDetailsContainer( VclBuilderContainer* pBuilder ) :
252 : DetailsContainer( pBuilder, "CmisDetails" ),
253 : m_sUsername( ),
254 : m_xCmdEnv( ),
255 : m_aServerTypesURLs( ),
256 : m_aRepoIds( ),
257 0 : m_sRepoId( )
258 : {
259 0 : Reference< XComponentContext > xContext = ::comphelper::getProcessComponentContext();
260 : Reference< XInteractionHandler > xGlobalInteractionHandler(
261 0 : InteractionHandler::createWithParent(xContext, 0), UNO_QUERY );
262 0 : m_xCmdEnv = new ucbhelper::CommandEnvironment( xGlobalInteractionHandler, Reference< XProgressHandler >() );
263 :
264 0 : pBuilder->get( m_pLBServerType, "serverType" );
265 0 : m_pLBServerType->SetSelectHdl( LINK( this, CmisDetailsContainer, SelectServerTypeHdl ) );
266 :
267 0 : pBuilder->get( m_pEDBinding, "binding" );
268 0 : m_pEDBinding->SetModifyHdl( LINK( this, DetailsContainer, ValueChangeHdl ) );
269 :
270 0 : pBuilder->get( m_pLBRepository, "repositories" );
271 0 : m_pLBRepository->SetSelectHdl( LINK( this, CmisDetailsContainer, SelectRepoHdl ) );
272 :
273 0 : pBuilder->get( m_pBTRepoRefresh, "repositoriesRefresh" );
274 0 : m_pBTRepoRefresh->SetClickHdl( LINK( this, CmisDetailsContainer, RefreshReposHdl ) );
275 :
276 0 : pBuilder->get( m_pEDPath, "cmisPath" );
277 0 : m_pEDPath->SetModifyHdl( LINK( this, DetailsContainer, ValueChangeHdl ) );
278 :
279 0 : show( false );
280 :
281 : // Load the ServerType entries
282 0 : bool bSkipGDrive = OUString( GDRIVE_CLIENT_ID ).isEmpty() ||
283 0 : OUString( GDRIVE_CLIENT_SECRET ).isEmpty();
284 0 : bool bSkipAlfresco = OUString( ALFRESCO_CLOUD_CLIENT_ID ).isEmpty() ||
285 0 : OUString( ALFRESCO_CLOUD_CLIENT_SECRET ).isEmpty();
286 0 : bool bSkipOneDrive= OUString( ONEDRIVE_CLIENT_ID ).isEmpty() ||
287 0 : OUString( ONEDRIVE_CLIENT_SECRET ).isEmpty();
288 :
289 :
290 0 : Sequence< OUString > aTypesUrlsList( officecfg::Office::Common::Misc::CmisServersUrls::get( xContext ) );
291 0 : Sequence< OUString > aTypesNamesList( officecfg::Office::Common::Misc::CmisServersNames::get( xContext ) );
292 0 : for ( sal_Int32 i = 0; i < aTypesUrlsList.getLength( ) && aTypesNamesList.getLength( ); ++i )
293 : {
294 0 : OUString sUrl = aTypesUrlsList[i];
295 0 : if ( !( sUrl == GDRIVE_BASE_URL && bSkipGDrive ) &&
296 0 : !( sUrl.startsWith( ALFRESCO_CLOUD_BASE_URL ) && bSkipAlfresco ) &&
297 0 : !( sUrl == ONEDRIVE_BASE_URL && bSkipOneDrive ) )
298 : {
299 0 : m_pLBServerType->InsertEntry( aTypesNamesList[i] );
300 0 : m_aServerTypesURLs.push_back( sUrl );
301 : }
302 0 : }
303 0 : }
304 :
305 0 : INetURLObject CmisDetailsContainer::getUrl( )
306 : {
307 0 : OUString sBindingUrl = m_pEDBinding->GetText().trim( );
308 0 : OUString sPath = m_pEDPath->GetText().trim( );
309 :
310 0 : OUString sUrl;
311 0 : if ( !sBindingUrl.isEmpty( ) && !m_sRepoId.isEmpty() )
312 : {
313 : OUString sEncodedBinding = rtl::Uri::encode(
314 0 : sBindingUrl + "#" + m_sRepoId,
315 : rtl_UriCharClassRelSegment,
316 : rtl_UriEncodeKeepEscapes,
317 0 : RTL_TEXTENCODING_UTF8 );
318 0 : sUrl = "vnd.libreoffice.cmis://" + sEncodedBinding;
319 : }
320 0 : sUrl += sPath;
321 :
322 0 : return INetURLObject( sUrl );
323 : }
324 :
325 0 : bool CmisDetailsContainer::setUrl( const INetURLObject& rUrl )
326 : {
327 0 : bool bSuccess = rUrl.GetProtocol() == INetProtocol::Cmis;
328 :
329 0 : if ( bSuccess )
330 : {
331 0 : OUString sBindingUrl;
332 0 : OUString sRepositoryId;
333 :
334 0 : OUString sDecodedHost = rUrl.GetHost( INetURLObject::DECODE_WITH_CHARSET );
335 0 : INetURLObject aHostUrl( sDecodedHost );
336 0 : sBindingUrl = aHostUrl.GetURLNoMark( );
337 0 : sRepositoryId = aHostUrl.GetMark( );
338 :
339 0 : m_pEDBinding->SetText( sBindingUrl );
340 0 : m_pEDPath->SetText( rUrl.GetURLPath() );
341 : }
342 0 : return bSuccess;
343 : }
344 :
345 0 : void CmisDetailsContainer::setUsername( const OUString& rUsername )
346 : {
347 0 : m_sUsername = rUsername;
348 0 : }
349 :
350 0 : void CmisDetailsContainer::selectRepository( )
351 : {
352 : // Get the repo ID and call the Change listener
353 0 : sal_uInt16 nPos = m_pLBRepository->GetSelectEntryPos( );
354 0 : m_sRepoId = m_aRepoIds[nPos];
355 :
356 0 : notifyChange( );
357 0 : }
358 :
359 0 : IMPL_LINK_NOARG( CmisDetailsContainer, SelectServerTypeHdl )
360 : {
361 : // Set a sample URL for the server
362 0 : sal_uInt16 nId = m_pLBServerType->GetSelectEntryPos( );
363 0 : m_pEDBinding->SetText( m_aServerTypesURLs[nId] );
364 0 : return 0;
365 : }
366 :
367 0 : IMPL_LINK_NOARG( CmisDetailsContainer, RefreshReposHdl )
368 : {
369 0 : OUString sBindingUrl = m_pEDBinding->GetText().trim( );
370 :
371 : // Clean the listbox
372 0 : m_pLBRepository->Clear( );
373 0 : m_aRepoIds.clear( );
374 :
375 : // Compute the URL
376 0 : OUString sUrl;
377 0 : if ( !sBindingUrl.isEmpty( ) )
378 : {
379 : OUString sEncodedBinding = rtl::Uri::encode(
380 : sBindingUrl,
381 : rtl_UriCharClassRelSegment,
382 : rtl_UriEncodeKeepEscapes,
383 0 : RTL_TEXTENCODING_UTF8 );
384 0 : sUrl = "vnd.libreoffice.cmis://" + sEncodedBinding;
385 : }
386 :
387 : // Get the Content
388 0 : ::ucbhelper::Content aCnt( sUrl, m_xCmdEnv, comphelper::getProcessComponentContext() );
389 0 : Sequence< OUString > aProps( 1 );
390 0 : aProps[0] = "Title";
391 :
392 : try
393 : {
394 0 : Reference< XResultSet > xResultSet( aCnt.createCursor( aProps ), UNO_QUERY_THROW );
395 0 : Reference< XContentAccess > xAccess( xResultSet, UNO_QUERY_THROW );
396 0 : while ( xResultSet->next() )
397 : {
398 0 : OUString sURL = xAccess->queryContentIdentifierString( );
399 0 : INetURLObject aURL( sURL );
400 0 : OUString sId = aURL.GetURLPath( INetURLObject::DECODE_WITH_CHARSET );
401 0 : sId = sId.copy( 1 );
402 0 : m_aRepoIds.push_back( sId );
403 :
404 0 : Reference< XRow > xRow( xResultSet, UNO_QUERY );
405 0 : OUString sName = xRow->getString( 1 );
406 0 : m_pLBRepository->InsertEntry( sName );
407 0 : }
408 : }
409 0 : catch ( const Exception& )
410 : {
411 : }
412 :
413 : // Auto-select the first one
414 0 : if ( m_pLBRepository->GetEntryCount( ) > 0 )
415 : {
416 0 : m_pLBRepository->SelectEntryPos( 0 );
417 0 : selectRepository( );
418 : }
419 :
420 0 : return 0;
421 : }
422 :
423 0 : IMPL_LINK_NOARG( CmisDetailsContainer, SelectRepoHdl )
424 : {
425 0 : selectRepository( );
426 0 : return 0;
427 798 : }
428 :
429 : /* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|
