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 : * This file incorporates work covered by the following license notice:
10 : *
11 : * Licensed to the Apache Software Foundation (ASF) under one or more
12 : * contributor license agreements. See the NOTICE file distributed
13 : * with this work for additional information regarding copyright
14 : * ownership. The ASF licenses this file to you under the Apache
15 : * License, Version 2.0 (the "License"); you may not use this file
16 : * except in compliance with the License. You may obtain a copy of
17 : * the License at http://www.apache.org/licenses/LICENSE-2.0 .
18 : */
19 :
20 :
21 : #if defined(WNT)
22 : #include <prewin.h>
23 : #include <postwin.h>
24 : #endif
25 :
26 : #include "impldde.hxx"
27 :
28 : #include <vcl/svapp.hxx>
29 : #include <vcl/fixed.hxx>
30 : #include <vcl/edit.hxx>
31 : #include <vcl/button.hxx>
32 : #include <vcl/msgbox.hxx>
33 : #include <sot/exchange.hxx>
34 : #include <rtl/strbuf.hxx>
35 : #include <rtl/ustring.hxx>
36 :
37 : #include "dde.hrc"
38 : #include <sfx2/lnkbase.hxx>
39 : #include <sfx2/linkmgr.hxx>
40 : #include <sfx2/sfxresid.hxx>
41 :
42 : #include <com/sun/star/uno/Any.hxx>
43 : #include <com/sun/star/uno/Sequence.hxx>
44 :
45 : #include <svl/svdde.hxx>
46 : #include <sot/formats.hxx>
47 :
48 : #define DDELINK_ERROR_APP 1
49 : #define DDELINK_ERROR_DATA 2
50 :
51 : using namespace ::com::sun::star::uno;
52 :
53 : namespace sfx2
54 : {
55 :
56 0 : class SvDDELinkEditDialog : public ModalDialog
57 : {
58 : FixedText aFtDdeApp;
59 : Edit aEdDdeApp;
60 : FixedText aFtDdeTopic;
61 : Edit aEdDdeTopic;
62 : FixedText aFtDdeItem;
63 : Edit aEdDdeItem;
64 : FixedLine aGroupDdeChg;
65 : OKButton aOKButton1;
66 : CancelButton aCancelButton1;
67 :
68 : DECL_STATIC_LINK( SvDDELinkEditDialog, EditHdl_Impl, Edit* );
69 : public:
70 : SvDDELinkEditDialog( Window* pParent, SvBaseLink* );
71 : OUString GetCmd() const;
72 : };
73 :
74 0 : SvDDELinkEditDialog::SvDDELinkEditDialog( Window* pParent, SvBaseLink* pLink )
75 : : ModalDialog( pParent, SfxResId( MD_DDE_LINKEDIT ) ),
76 : aFtDdeApp( this, SfxResId( FT_DDE_APP ) ),
77 : aEdDdeApp( this, SfxResId( ED_DDE_APP ) ),
78 : aFtDdeTopic( this, SfxResId( FT_DDE_TOPIC ) ),
79 : aEdDdeTopic( this, SfxResId( ED_DDE_TOPIC ) ),
80 : aFtDdeItem( this, SfxResId( FT_DDE_ITEM ) ),
81 : aEdDdeItem( this, SfxResId( ED_DDE_ITEM ) ),
82 : aGroupDdeChg( this, SfxResId( GROUP_DDE_CHG ) ),
83 : aOKButton1( this, SfxResId( 1 ) ),
84 0 : aCancelButton1( this, SfxResId( 1 ) )
85 : {
86 0 : FreeResource();
87 :
88 0 : OUString sServer, sTopic, sItem;
89 0 : pLink->GetLinkManager()->GetDisplayNames( pLink, &sServer, &sTopic, &sItem );
90 :
91 0 : aEdDdeApp.SetText( sServer );
92 0 : aEdDdeTopic.SetText( sTopic );
93 0 : aEdDdeItem.SetText( sItem );
94 :
95 0 : aEdDdeApp.SetModifyHdl( STATIC_LINK( this, SvDDELinkEditDialog, EditHdl_Impl));
96 0 : aEdDdeTopic.SetModifyHdl( STATIC_LINK( this, SvDDELinkEditDialog, EditHdl_Impl));
97 0 : aEdDdeItem.SetModifyHdl( STATIC_LINK( this, SvDDELinkEditDialog, EditHdl_Impl));
98 :
99 0 : aOKButton1.Enable( !sServer.isEmpty() && !sTopic.isEmpty() && !sItem.isEmpty() );
100 0 : }
101 :
102 0 : OUString SvDDELinkEditDialog::GetCmd() const
103 : {
104 0 : OUString sCmd( aEdDdeApp.GetText() ), sRet;
105 0 : ::sfx2::MakeLnkName( sRet, &sCmd, aEdDdeTopic.GetText(), aEdDdeItem.GetText() );
106 0 : return sRet;
107 : }
108 :
109 0 : IMPL_STATIC_LINK( SvDDELinkEditDialog, EditHdl_Impl, Edit *, pEdit )
110 : {
111 : (void)pEdit; // unused variable
112 0 : pThis->aOKButton1.Enable( !pThis->aEdDdeApp.GetText().isEmpty() &&
113 0 : !pThis->aEdDdeTopic.GetText().isEmpty() &&
114 0 : !pThis->aEdDdeItem.GetText().isEmpty() );
115 0 : return 0;
116 : }
117 :
118 0 : SvDDEObject::SvDDEObject()
119 0 : : pConnection( 0 ), pLink( 0 ), pRequest( 0 ), pGetData( 0 ), nError( 0 )
120 : {
121 0 : SetUpdateTimeout( 100 );
122 0 : bWaitForData = sal_False;
123 0 : }
124 :
125 0 : SvDDEObject::~SvDDEObject()
126 : {
127 0 : delete pLink;
128 0 : delete pRequest;
129 0 : delete pConnection;
130 0 : }
131 :
132 0 : bool SvDDEObject::GetData( ::com::sun::star::uno::Any & rData /*out param*/,
133 : const OUString & rMimeType,
134 : bool bSynchron )
135 : {
136 0 : if( !pConnection )
137 0 : return false;
138 :
139 0 : if( pConnection->GetError() ) // then we try once more
140 : {
141 0 : OUString sServer( pConnection->GetServiceName() );
142 0 : OUString sTopic( pConnection->GetTopicName() );
143 :
144 0 : delete pConnection;
145 0 : pConnection = new DdeConnection( sServer, sTopic );
146 0 : if( pConnection->GetError() )
147 0 : nError = DDELINK_ERROR_APP;
148 : }
149 :
150 0 : if( bWaitForData ) // we are in an rekursive loop, get out again
151 0 : return false;
152 :
153 : // Lock against Reentrance
154 0 : bWaitForData = sal_True;
155 :
156 : // if you want to print, we'll wait until the data is available
157 0 : if( bSynchron )
158 : {
159 0 : DdeRequest aReq( *pConnection, sItem, 5000 );
160 0 : aReq.SetDataHdl( LINK( this, SvDDEObject, ImplGetDDEData ) );
161 0 : aReq.SetFormat( SotExchange::GetFormatIdFromMimeType( rMimeType ));
162 :
163 0 : pGetData = &rData;
164 :
165 0 : do {
166 0 : aReq.Execute();
167 0 : } while( aReq.GetError() && ImplHasOtherFormat( aReq ) );
168 :
169 0 : if( pConnection->GetError() )
170 0 : nError = DDELINK_ERROR_DATA;
171 :
172 0 : bWaitForData = sal_False;
173 : }
174 : else
175 : {
176 : // otherwise it will be executed asynchronously
177 : {
178 0 : if( pRequest )
179 0 : delete pRequest;
180 :
181 0 : pRequest = new DdeRequest( *pConnection, sItem );
182 0 : pRequest->SetDataHdl( LINK( this, SvDDEObject, ImplGetDDEData ) );
183 0 : pRequest->SetDoneHdl( LINK( this, SvDDEObject, ImplDoneDDEData ) );
184 : pRequest->SetFormat( SotExchange::GetFormatIdFromMimeType(
185 0 : rMimeType ) );
186 0 : pRequest->Execute();
187 : }
188 :
189 0 : OUString aEmptyStr;
190 0 : rData <<= aEmptyStr;
191 : }
192 0 : return 0 == pConnection->GetError();
193 : }
194 :
195 :
196 0 : bool SvDDEObject::Connect( SvBaseLink * pSvLink )
197 : {
198 : #if defined(WNT)
199 : static sal_Bool bInWinExec = sal_False;
200 : #endif
201 0 : sal_uInt16 nLinkType = pSvLink->GetUpdateMode();
202 0 : if( pConnection ) // Connection is already made
203 : {
204 : // well, then just add it as dependent
205 : AddDataAdvise( pSvLink,
206 : SotExchange::GetFormatMimeType( pSvLink->GetContentType()),
207 : LINKUPDATE_ONCALL == nLinkType
208 : ? ADVISEMODE_ONLYONCE
209 0 : : 0 );
210 0 : AddConnectAdvise( pSvLink );
211 :
212 0 : return true;
213 : }
214 :
215 0 : if( !pSvLink->GetLinkManager() )
216 0 : return false;
217 :
218 0 : OUString sServer, sTopic;
219 0 : pSvLink->GetLinkManager()->GetDisplayNames( pSvLink, &sServer, &sTopic, &sItem );
220 :
221 0 : if( sServer.isEmpty() || sTopic.isEmpty() || sItem.isEmpty() )
222 0 : return false;
223 :
224 0 : pConnection = new DdeConnection( sServer, sTopic );
225 0 : if( pConnection->GetError() )
226 : {
227 : // Is it possible to address the system-Topic?
228 : // then the server is up, it just does not know the topic!
229 0 : if( sTopic.equalsIgnoreAsciiCase( "SYSTEM" ) )
230 : {
231 : bool bSysTopic;
232 : {
233 0 : DdeConnection aTmp(sServer, OUString("SYSTEM"));
234 0 : bSysTopic = !aTmp.GetError();
235 : }
236 :
237 0 : if( bSysTopic )
238 : {
239 0 : nError = DDELINK_ERROR_DATA;
240 0 : return false;
241 : }
242 : // otherwise in Win/WinNT, start the Application directly
243 : }
244 :
245 : #if defined(WNT)
246 :
247 : // Server not up, try once more to start it.
248 : if( !bInWinExec )
249 : {
250 : OStringBuffer aCmdLine(OUStringToOString(sServer, RTL_TEXTENCODING_ASCII_US));
251 : aCmdLine.append(".exe ");
252 : aCmdLine.append(OUStringToOString(sTopic, RTL_TEXTENCODING_ASCII_US));
253 :
254 : if( WinExec( aCmdLine.getStr(), SW_SHOWMINIMIZED ) < 32 )
255 : nError = DDELINK_ERROR_APP;
256 : else
257 : {
258 : sal_uInt16 i;
259 : for( i=0; i<5; i++ )
260 : {
261 : bInWinExec = sal_True;
262 : Application::Reschedule();
263 : bInWinExec = sal_False;
264 :
265 : delete pConnection;
266 : pConnection = new DdeConnection( sServer, sTopic );
267 : if( !pConnection->GetError() )
268 : break;
269 : }
270 :
271 : if( i == 5 )
272 : {
273 : nError = DDELINK_ERROR_APP;
274 : }
275 : }
276 : }
277 : else
278 : #endif // WNT
279 : {
280 0 : nError = DDELINK_ERROR_APP;
281 : }
282 : }
283 :
284 0 : if( LINKUPDATE_ALWAYS == nLinkType && !pLink && !pConnection->GetError() )
285 : {
286 : // Setting up Hot Link, Data will be available at some point later on
287 0 : pLink = new DdeHotLink( *pConnection, sItem );
288 0 : pLink->SetDataHdl( LINK( this, SvDDEObject, ImplGetDDEData ) );
289 0 : pLink->SetDoneHdl( LINK( this, SvDDEObject, ImplDoneDDEData ) );
290 0 : pLink->SetFormat( pSvLink->GetContentType() );
291 0 : pLink->Execute();
292 : }
293 :
294 0 : if( pConnection->GetError() )
295 0 : return false;
296 :
297 : AddDataAdvise( pSvLink,
298 : SotExchange::GetFormatMimeType( pSvLink->GetContentType()),
299 : LINKUPDATE_ONCALL == nLinkType
300 : ? ADVISEMODE_ONLYONCE
301 0 : : 0 );
302 0 : AddConnectAdvise( pSvLink );
303 0 : SetUpdateTimeout( 0 );
304 0 : return true;
305 : }
306 :
307 0 : void SvDDEObject::Edit( Window* pParent, sfx2::SvBaseLink* pBaseLink, const Link& rEndEditHdl )
308 : {
309 0 : SvDDELinkEditDialog aDlg( pParent, pBaseLink );
310 0 : if ( RET_OK == aDlg.Execute() && rEndEditHdl.IsSet() )
311 : {
312 0 : OUString sCommand = aDlg.GetCmd();
313 0 : rEndEditHdl.Call( &sCommand );
314 0 : }
315 0 : }
316 :
317 0 : bool SvDDEObject::ImplHasOtherFormat( DdeTransaction& rReq )
318 : {
319 0 : sal_uInt16 nFmt = 0;
320 0 : switch( rReq.GetFormat() )
321 : {
322 : case FORMAT_RTF:
323 0 : nFmt = FORMAT_STRING;
324 0 : break;
325 :
326 : case SOT_FORMATSTR_ID_HTML_SIMPLE:
327 : case SOT_FORMATSTR_ID_HTML:
328 0 : nFmt = FORMAT_RTF;
329 0 : break;
330 :
331 : case FORMAT_GDIMETAFILE:
332 0 : nFmt = FORMAT_BITMAP;
333 0 : break;
334 :
335 : case SOT_FORMATSTR_ID_SVXB:
336 0 : nFmt = FORMAT_GDIMETAFILE;
337 0 : break;
338 :
339 : // something else?
340 : }
341 0 : if( nFmt )
342 0 : rReq.SetFormat( nFmt ); // try it once more
343 0 : return 0 != nFmt;
344 : }
345 :
346 0 : bool SvDDEObject::IsPending() const
347 : /* [Description]
348 :
349 : The method determines whether the data-object can be read from a DDE.
350 :
351 : Returned is the following:
352 : ERRCODE_NONE if it has been completely read
353 : ERRCODE_SO_PENDING if it has not been completely read
354 : ERRCODE_SO_FALSE otherwise
355 : */
356 : {
357 0 : return bWaitForData;
358 : }
359 :
360 0 : bool SvDDEObject::IsDataComplete() const
361 : {
362 0 : return bWaitForData;
363 : }
364 :
365 0 : IMPL_LINK( SvDDEObject, ImplGetDDEData, DdeData*, pData )
366 : {
367 0 : sal_uIntPtr nFmt = pData->GetFormat();
368 0 : switch( nFmt )
369 : {
370 : case FORMAT_GDIMETAFILE:
371 0 : break;
372 :
373 : case FORMAT_BITMAP:
374 0 : break;
375 :
376 : default:
377 : {
378 0 : const sal_Char* p = (sal_Char*)( pData->operator const void*() );
379 0 : long nLen = FORMAT_STRING == nFmt ? (p ? strlen( p ) : 0) : (long)*pData;
380 :
381 0 : Sequence< sal_Int8 > aSeq( (const sal_Int8*)p, nLen );
382 0 : if( pGetData )
383 : {
384 0 : *pGetData <<= aSeq; // Copy Data
385 0 : pGetData = 0; // reset the pointer here
386 : }
387 : else
388 : {
389 0 : Any aVal;
390 0 : aVal <<= aSeq;
391 : DataChanged( SotExchange::GetFormatMimeType(
392 0 : pData->GetFormat() ), aVal );
393 0 : bWaitForData = sal_False;
394 0 : }
395 : }
396 : }
397 :
398 0 : return 0;
399 : }
400 :
401 0 : IMPL_LINK( SvDDEObject, ImplDoneDDEData, void*, pData )
402 : {
403 0 : bool bValid = (sal_Bool)(sal_uIntPtr)pData;
404 0 : if( !bValid && ( pRequest || pLink ))
405 : {
406 0 : DdeTransaction* pReq = 0;
407 0 : if( !pLink || ( pLink && pLink->IsBusy() ))
408 0 : pReq = pRequest; // only the one that is ready
409 0 : else if( pRequest && pRequest->IsBusy() )
410 0 : pReq = pLink; // only the one that is ready
411 :
412 0 : if( pReq )
413 : {
414 0 : if( ImplHasOtherFormat( *pReq ) )
415 : {
416 0 : pReq->Execute();
417 : }
418 0 : else if( pReq == pRequest )
419 : {
420 0 : bWaitForData = sal_False;
421 : }
422 0 : }
423 : }
424 : else
425 : // End waiting
426 0 : bWaitForData = sal_False;
427 :
428 0 : return 0;
429 : }
430 :
431 : }
432 :
433 : /* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|
