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 : #include <sal/config.h>
21 :
22 : #include <boost/noncopyable.hpp>
23 : #include <vcl/svapp.hxx>
24 : #include <vcl/settings.hxx>
25 : #include <osl/module.hxx>
26 : #include <osl/file.hxx>
27 : #include <unotools/transliterationwrapper.hxx>
28 :
29 : #include "callform.hxx"
30 : #include "global.hxx"
31 : #include "adiasync.hxx"
32 :
33 : extern "C" {
34 :
35 : typedef void (CALLTYPE* ExFuncPtr1)(void*);
36 : typedef void (CALLTYPE* ExFuncPtr2)(void*, void*);
37 : typedef void (CALLTYPE* ExFuncPtr3)(void*, void*, void*);
38 : typedef void (CALLTYPE* ExFuncPtr4)(void*, void*, void*, void*);
39 : typedef void (CALLTYPE* ExFuncPtr5)(void*, void*, void*, void*, void*);
40 : typedef void (CALLTYPE* ExFuncPtr6)(void*, void*, void*, void*, void*, void*);
41 : typedef void (CALLTYPE* ExFuncPtr7)(void*, void*, void*, void*, void*, void*, void*);
42 : typedef void (CALLTYPE* ExFuncPtr8)(void*, void*, void*, void*, void*, void*, void*, void*);
43 : typedef void (CALLTYPE* ExFuncPtr9)(void*, void*, void*, void*, void*, void*, void*, void*, void*);
44 : typedef void (CALLTYPE* ExFuncPtr10)(void*, void*, void*, void*, void*, void*, void*, void*, void*, void*);
45 : typedef void (CALLTYPE* ExFuncPtr11)(void*, void*, void*, void*, void*, void*, void*, void*, void*, void*, void*);
46 : typedef void (CALLTYPE* ExFuncPtr12)(void*, void*, void*, void*, void*, void*, void*, void*, void*, void*, void*, void*);
47 : typedef void (CALLTYPE* ExFuncPtr13)(void*, void*, void*, void*, void*, void*, void*, void*, void*, void*, void*, void*, void*);
48 : typedef void (CALLTYPE* ExFuncPtr14)(void*, void*, void*, void*, void*, void*, void*, void*, void*, void*, void*, void*, void*, void*);
49 : typedef void (CALLTYPE* ExFuncPtr15)(void*, void*, void*, void*, void*, void*, void*, void*, void*, void*, void*, void*, void*, void*, void*);
50 : typedef void (CALLTYPE* ExFuncPtr16)(void*, void*, void*, void*, void*, void*, void*, void*, void*, void*, void*, void*, void*, void*, void*, void*);
51 :
52 : typedef void (CALLTYPE* GetFuncCountPtr)(sal_uInt16& nCount);
53 : typedef void (CALLTYPE* GetFuncDataPtr)
54 : (sal_uInt16& nNo, sal_Char* pFuncName, sal_uInt16& nParamCount, ParamType* peType, sal_Char* pInternalName);
55 :
56 : typedef void (CALLTYPE* SetLanguagePtr)( sal_uInt16& nLanguage );
57 : typedef void (CALLTYPE* GetParamDesc)
58 : (sal_uInt16& nNo, sal_uInt16& nParam, sal_Char* pName, sal_Char* pDesc );
59 :
60 : typedef void (CALLTYPE* IsAsync) ( sal_uInt16& nNo,
61 : ParamType* peType );
62 : typedef void (CALLTYPE* Advice) ( sal_uInt16& nNo,
63 : AdvData& pfCallback );
64 : typedef void (CALLTYPE* Unadvice)( double& nHandle );
65 :
66 : typedef void (CALLTYPE* FARPROC) ( void );
67 :
68 : }
69 :
70 : #ifndef DISABLE_DYNLOADING
71 : #define GETFUNCTIONCOUNT "GetFunctionCount"
72 : #define GETFUNCTIONDATA "GetFunctionData"
73 : #define SETLANGUAGE "SetLanguage"
74 : #define GETPARAMDESC "GetParameterDescription"
75 : #define ISASYNC "IsAsync"
76 : #define ADVICE "Advice"
77 : #define UNADVICE "Unadvice"
78 : #endif
79 :
80 : class ModuleData: private boost::noncopyable
81 : {
82 : friend class ModuleCollection;
83 : OUString aName;
84 : osl::Module* pInstance;
85 : public:
86 0 : ModuleData(const OUString& rStr, osl::Module* pInst) : aName(rStr), pInstance(pInst) {}
87 0 : ~ModuleData() { delete pInstance; }
88 :
89 0 : const OUString& GetName() const { return aName; }
90 0 : osl::Module* GetInstance() const { return pInstance; }
91 : };
92 :
93 0 : FuncData::FuncData(const ModuleData*pModule,
94 : const OUString& rIName,
95 : const OUString& rFName,
96 : sal_uInt16 nNo,
97 : sal_uInt16 nCount,
98 : const ParamType* peType,
99 : ParamType eType) :
100 : pModuleData (pModule),
101 : aInternalName (rIName),
102 : aFuncName (rFName),
103 : nNumber (nNo),
104 : nParamCount (nCount),
105 0 : eAsyncType (eType)
106 : {
107 0 : for (sal_uInt16 i = 0; i < MAXFUNCPARAM; i++)
108 0 : eParamType[i] = peType[i];
109 0 : }
110 :
111 0 : FuncData::FuncData(const FuncData& rData) :
112 : pModuleData (rData.pModuleData),
113 : aInternalName (rData.aInternalName),
114 : aFuncName (rData.aFuncName),
115 : nNumber (rData.nNumber),
116 : nParamCount (rData.nParamCount),
117 0 : eAsyncType (rData.eAsyncType)
118 : {
119 0 : for (sal_uInt16 i = 0; i < MAXFUNCPARAM; i++)
120 0 : eParamType[i] = rData.eParamType[i];
121 0 : }
122 :
123 : namespace {
124 :
125 76 : class ModuleCollection
126 : {
127 : typedef boost::ptr_map<OUString, ModuleData> MapType;
128 : MapType maData;
129 : public:
130 76 : ModuleCollection() {}
131 :
132 : const ModuleData* findByName(const OUString& rName) const;
133 : void insert(ModuleData* pNew);
134 : void clear();
135 : };
136 :
137 0 : const ModuleData* ModuleCollection::findByName(const OUString& rName) const
138 : {
139 0 : MapType::const_iterator it = maData.find(rName);
140 0 : return it == maData.end() ? NULL : it->second;
141 : }
142 :
143 0 : void ModuleCollection::insert(ModuleData* pNew)
144 : {
145 0 : if (!pNew)
146 0 : return;
147 :
148 0 : OUString aName = pNew->GetName();
149 0 : maData.insert(aName, pNew);
150 : }
151 :
152 20 : void ModuleCollection::clear()
153 : {
154 20 : maData.clear();
155 20 : }
156 :
157 76 : ModuleCollection aModuleCollection;
158 :
159 : }
160 :
161 0 : bool InitExternalFunc(const OUString& rModuleName)
162 : {
163 : #ifdef DISABLE_DYNLOADING
164 : (void) rModuleName;
165 : return false;
166 : #else
167 : // Module already loaded?
168 0 : const ModuleData* pTemp = aModuleCollection.findByName(rModuleName);
169 0 : if (pTemp)
170 0 : return false;
171 :
172 0 : OUString aNP;
173 0 : aNP = rModuleName;
174 :
175 0 : bool bRet = false;
176 0 : osl::Module* pLib = new osl::Module( aNP );
177 0 : if (pLib->is())
178 : {
179 0 : FARPROC fpGetCount = (FARPROC)pLib->getFunctionSymbol(GETFUNCTIONCOUNT);
180 0 : FARPROC fpGetData = (FARPROC)pLib->getFunctionSymbol(GETFUNCTIONDATA);
181 0 : if ((fpGetCount != NULL) && (fpGetData != NULL))
182 : {
183 0 : FARPROC fpIsAsync = (FARPROC)pLib->getFunctionSymbol(ISASYNC);
184 0 : FARPROC fpAdvice = (FARPROC)pLib->getFunctionSymbol(ADVICE);
185 0 : FARPROC fpSetLanguage = (FARPROC)pLib->getFunctionSymbol(SETLANGUAGE);
186 0 : if ( fpSetLanguage )
187 : {
188 0 : LanguageType eLanguage = Application::GetSettings().GetUILanguageTag().getLanguageType();
189 0 : sal_uInt16 nLanguage = (sal_uInt16) eLanguage;
190 0 : (*((SetLanguagePtr)fpSetLanguage))( nLanguage );
191 : }
192 :
193 : // Module in die Collection aufnehmen
194 0 : ModuleData* pModuleData = new ModuleData(rModuleName, pLib);
195 0 : aModuleCollection.insert(pModuleData);
196 :
197 : // Schnittstelle initialisieren
198 0 : AdvData pfCallBack = &ScAddInAsyncCallBack;
199 : FuncData* pFuncData;
200 0 : FuncCollection* pFuncCol = ScGlobal::GetFuncCollection();
201 : sal_uInt16 nCount;
202 0 : (*((GetFuncCountPtr)fpGetCount))(nCount);
203 0 : for (sal_uInt16 i=0; i < nCount; i++)
204 : {
205 : sal_Char cFuncName[256];
206 : sal_Char cInternalName[256];
207 : sal_uInt16 nParamCount;
208 : ParamType eParamType[MAXFUNCPARAM];
209 0 : ParamType eAsyncType = ParamType::NONE;
210 : // initialize all, in case the AddIn behaves bad
211 0 : cFuncName[0] = 0;
212 0 : cInternalName[0] = 0;
213 0 : nParamCount = 0;
214 0 : for ( sal_uInt16 j=0; j<MAXFUNCPARAM; j++ )
215 : {
216 0 : eParamType[j] = ParamType::NONE;
217 : }
218 : (*((GetFuncDataPtr)fpGetData))(i, cFuncName, nParamCount,
219 0 : eParamType, cInternalName);
220 0 : if( fpIsAsync )
221 : {
222 0 : (*((IsAsync)fpIsAsync))(i, &eAsyncType);
223 0 : if ( fpAdvice && eAsyncType != ParamType::NONE )
224 0 : (*((Advice)fpAdvice))( i, pfCallBack );
225 : }
226 0 : OUString aInternalName( cInternalName, strlen(cInternalName), osl_getThreadTextEncoding() );
227 0 : OUString aFuncName( cFuncName, strlen(cFuncName), osl_getThreadTextEncoding() );
228 : pFuncData = new FuncData( pModuleData,
229 : aInternalName,
230 : aFuncName,
231 : i,
232 : nParamCount,
233 : eParamType,
234 0 : eAsyncType );
235 0 : pFuncCol->insert(pFuncData);
236 0 : }
237 0 : bRet = true;
238 : }
239 : else
240 0 : delete pLib;
241 : }
242 : else
243 0 : delete pLib;
244 0 : return bRet;
245 : #endif
246 : }
247 :
248 20 : void ExitExternalFunc()
249 : {
250 20 : aModuleCollection.clear();
251 20 : }
252 :
253 0 : bool FuncData::Call(void** ppParam) const
254 : {
255 : #ifdef DISABLE_DYNLOADING
256 : (void) ppParam;
257 : return false;
258 : #else
259 0 : bool bRet = false;
260 0 : osl::Module* pLib = pModuleData->GetInstance();
261 0 : FARPROC fProc = (FARPROC)pLib->getFunctionSymbol(aFuncName);
262 0 : if (fProc != NULL)
263 : {
264 0 : switch (nParamCount)
265 : {
266 : case 1 :
267 0 : (*((ExFuncPtr1)fProc))(ppParam[0]);
268 0 : bRet = true;
269 0 : break;
270 : case 2 :
271 0 : (*((ExFuncPtr2)fProc))(ppParam[0], ppParam[1]);
272 0 : bRet = true;
273 0 : break;
274 : case 3 :
275 0 : (*((ExFuncPtr3)fProc))(ppParam[0], ppParam[1], ppParam[2]);
276 0 : bRet = true;
277 0 : break;
278 : case 4 :
279 0 : (*((ExFuncPtr4)fProc))(ppParam[0], ppParam[1], ppParam[2], ppParam[3]);
280 0 : bRet = true;
281 0 : break;
282 : case 5 :
283 0 : (*((ExFuncPtr5)fProc))(ppParam[0], ppParam[1], ppParam[2], ppParam[3], ppParam[4]);
284 0 : bRet = true;
285 0 : break;
286 : case 6 :
287 0 : (*((ExFuncPtr6)fProc))(ppParam[0], ppParam[1], ppParam[2], ppParam[3], ppParam[4], ppParam[5]);
288 0 : bRet = true;
289 0 : break;
290 : case 7 :
291 0 : (*((ExFuncPtr7)fProc))( ppParam[0], ppParam[1], ppParam[2], ppParam[3], ppParam[4], ppParam[5],
292 0 : ppParam[6]);
293 0 : bRet = true;
294 0 : break;
295 : case 8 :
296 0 : (*((ExFuncPtr8)fProc))( ppParam[0], ppParam[1], ppParam[2], ppParam[3], ppParam[4], ppParam[5],
297 0 : ppParam[6], ppParam[7]);
298 0 : bRet = true;
299 0 : break;
300 : case 9 :
301 0 : (*((ExFuncPtr9)fProc))( ppParam[0], ppParam[1], ppParam[2], ppParam[3], ppParam[4], ppParam[5],
302 0 : ppParam[6], ppParam[7], ppParam[8]);
303 0 : bRet = true;
304 0 : break;
305 : case 10 :
306 0 : (*((ExFuncPtr10)fProc))( ppParam[0], ppParam[1], ppParam[2], ppParam[3], ppParam[4], ppParam[5],
307 0 : ppParam[6], ppParam[7], ppParam[8], ppParam[9]);
308 0 : bRet = true;
309 0 : break;
310 : case 11 :
311 0 : (*((ExFuncPtr11)fProc))( ppParam[0], ppParam[1], ppParam[2], ppParam[3], ppParam[4], ppParam[5],
312 0 : ppParam[6], ppParam[7], ppParam[8], ppParam[9], ppParam[10]);
313 0 : bRet = true;
314 0 : break;
315 : case 12:
316 0 : (*((ExFuncPtr12)fProc))( ppParam[0], ppParam[1], ppParam[2], ppParam[3], ppParam[4], ppParam[5],
317 0 : ppParam[6], ppParam[7], ppParam[8], ppParam[9], ppParam[10], ppParam[11]);
318 0 : bRet = true;
319 0 : break;
320 : case 13:
321 0 : (*((ExFuncPtr13)fProc))( ppParam[0], ppParam[1], ppParam[2], ppParam[3], ppParam[4], ppParam[5],
322 0 : ppParam[6], ppParam[7], ppParam[8], ppParam[9], ppParam[10], ppParam[11],
323 0 : ppParam[12]);
324 0 : bRet = true;
325 0 : break;
326 : case 14 :
327 0 : (*((ExFuncPtr14)fProc))( ppParam[0], ppParam[1], ppParam[2], ppParam[3], ppParam[4], ppParam[5],
328 0 : ppParam[6], ppParam[7], ppParam[8], ppParam[9], ppParam[10], ppParam[11],
329 0 : ppParam[12], ppParam[13]);
330 0 : bRet = true;
331 0 : break;
332 : case 15 :
333 0 : (*((ExFuncPtr15)fProc))( ppParam[0], ppParam[1], ppParam[2], ppParam[3], ppParam[4], ppParam[5],
334 0 : ppParam[6], ppParam[7], ppParam[8], ppParam[9], ppParam[10], ppParam[11],
335 0 : ppParam[12], ppParam[13], ppParam[14]);
336 0 : bRet = true;
337 0 : break;
338 : case 16 :
339 0 : (*((ExFuncPtr16)fProc))( ppParam[0], ppParam[1], ppParam[2], ppParam[3], ppParam[4], ppParam[5],
340 0 : ppParam[6], ppParam[7], ppParam[8], ppParam[9], ppParam[10], ppParam[11],
341 0 : ppParam[12], ppParam[13], ppParam[14], ppParam[15]);
342 0 : bRet = true;
343 0 : break;
344 0 : default : break;
345 : }
346 : }
347 0 : return bRet;
348 : #endif
349 : }
350 :
351 0 : bool FuncData::Unadvice( double nHandle )
352 : {
353 : #ifdef DISABLE_DYNLOADING
354 : (void) nHandle;
355 : return false;
356 : #else
357 0 : bool bRet = false;
358 0 : osl::Module* pLib = pModuleData->GetInstance();
359 0 : FARPROC fProc = (FARPROC)pLib->getFunctionSymbol(UNADVICE);
360 0 : if (fProc != NULL)
361 : {
362 0 : ((::Unadvice)fProc)(nHandle);
363 0 : bRet = true;
364 : }
365 0 : return bRet;
366 : #endif
367 : }
368 :
369 0 : const OUString& FuncData::GetModuleName() const
370 : {
371 0 : return pModuleData->GetName();
372 : }
373 :
374 0 : bool FuncData::getParamDesc( OUString& aName, OUString& aDesc, sal_uInt16 nParam ) const
375 : {
376 : #ifdef DISABLE_DYNLOADING
377 : (void) aName;
378 : (void) aDesc;
379 : (void) nParam;
380 : return false;
381 : #else
382 0 : bool bRet = false;
383 0 : if ( nParam <= nParamCount )
384 : {
385 0 : osl::Module* pLib = pModuleData->GetInstance();
386 0 : FARPROC fProc = (FARPROC) pLib->getFunctionSymbol(GETPARAMDESC);
387 0 : if ( fProc != NULL )
388 : {
389 : sal_Char pcName[256];
390 : sal_Char pcDesc[256];
391 0 : *pcName = *pcDesc = 0;
392 0 : sal_uInt16 nFuncNo = nNumber; // nicht per Reference versauen lassen..
393 0 : ((::GetParamDesc)fProc)( nFuncNo, nParam, pcName, pcDesc );
394 0 : aName = OUString( pcName, 256, osl_getThreadTextEncoding() );
395 0 : aDesc = OUString( pcDesc, 256, osl_getThreadTextEncoding() );
396 0 : bRet = true;
397 : }
398 : }
399 0 : if ( !bRet )
400 : {
401 0 : aName = OUString();
402 0 : aDesc = OUString();
403 : }
404 0 : return bRet;
405 : #endif
406 : }
407 :
408 20 : FuncCollection::FuncCollection() {}
409 0 : FuncCollection::FuncCollection(const FuncCollection& r) : maData(r.maData) {}
410 :
411 0 : const FuncData* FuncCollection::findByName(const OUString& rName) const
412 : {
413 0 : MapType::const_iterator it = maData.find(rName);
414 0 : return it == maData.end() ? NULL : it->second;
415 : }
416 :
417 5588 : FuncData* FuncCollection::findByName(const OUString& rName)
418 : {
419 5588 : MapType::iterator it = maData.find(rName);
420 5588 : return it == maData.end() ? NULL : it->second;
421 : }
422 :
423 0 : void FuncCollection::insert(FuncData* pNew)
424 : {
425 0 : OUString aName = pNew->GetInternalName();
426 0 : maData.insert(aName, pNew);
427 0 : }
428 :
429 4 : FuncCollection::const_iterator FuncCollection::begin() const
430 : {
431 4 : return maData.begin();
432 : }
433 :
434 4 : FuncCollection::const_iterator FuncCollection::end() const
435 : {
436 4 : return maData.end();
437 228 : }
438 :
439 : /* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|