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 <cassert>
23 : #include <cstdlib>
24 : #include <new>
25 : #include <vector>
26 :
27 : #include "boost/noncopyable.hpp"
28 : #include "com/sun/star/io/IOException.hpp"
29 : #include "com/sun/star/uno/Reference.hxx"
30 : #include "com/sun/star/uno/RuntimeException.hpp"
31 : #include "com/sun/star/uno/Sequence.hxx"
32 : #include "com/sun/star/uno/XInterface.hpp"
33 : #include "cppu/unotype.hxx"
34 : #include "rtl/byteseq.hxx"
35 : #include "rtl/ref.hxx"
36 : #include "rtl/textcvt.h"
37 : #include "rtl/textenc.h"
38 : #include "rtl/ustring.h"
39 : #include "rtl/ustring.hxx"
40 : #include "sal/types.h"
41 : #include "typelib/typeclass.h"
42 : #include "typelib/typedescription.h"
43 : #include "typelib/typedescription.hxx"
44 : #include "uno/any2.h"
45 : #include "uno/data.h"
46 : #include "uno/dispatcher.hxx"
47 :
48 : #include "binaryany.hxx"
49 : #include "bridge.hxx"
50 : #include "cache.hxx"
51 : #include "readerstate.hxx"
52 : #include "unmarshal.hxx"
53 :
54 : namespace binaryurp {
55 :
56 : namespace {
57 :
58 25378 : void * allocate(sal_Size size) {
59 25378 : void * p = rtl_allocateMemory(size);
60 25378 : if (p == 0) {
61 0 : throw std::bad_alloc();
62 : }
63 25378 : return p;
64 : }
65 :
66 17438 : std::vector< BinaryAny >::iterator copyMemberValues(
67 : css::uno::TypeDescription const & type,
68 : std::vector< BinaryAny >::iterator const & it, void * buffer) throw ()
69 : {
70 : assert(
71 : type.is() &&
72 : (type.get()->eTypeClass == typelib_TypeClass_STRUCT ||
73 : type.get()->eTypeClass == typelib_TypeClass_EXCEPTION) &&
74 : buffer != 0);
75 17438 : type.makeComplete();
76 17438 : std::vector< BinaryAny >::iterator i(it);
77 : typelib_CompoundTypeDescription * ctd =
78 17438 : reinterpret_cast< typelib_CompoundTypeDescription * >(type.get());
79 17438 : if (ctd->pBaseTypeDescription != 0) {
80 : i = copyMemberValues(
81 : css::uno::TypeDescription(&ctd->pBaseTypeDescription->aBase), i,
82 115 : buffer);
83 : }
84 74332 : for (sal_Int32 j = 0; j != ctd->nMembers; ++j) {
85 : uno_type_copyData(
86 113788 : static_cast< char * >(buffer) + ctd->pMemberOffsets[j],
87 : const_cast< void * >(
88 113788 : i++->getValue(css::uno::TypeDescription(ctd->ppTypeRefs[j]))),
89 170682 : ctd->ppTypeRefs[j], 0);
90 : }
91 17438 : return i;
92 : }
93 :
94 : }
95 :
96 514550 : Unmarshal::Unmarshal(
97 : rtl::Reference< Bridge > const & bridge, ReaderState & state,
98 : css::uno::Sequence< sal_Int8 > const & buffer):
99 514550 : bridge_(bridge), state_(state), buffer_(buffer)
100 : {
101 514550 : data_ = reinterpret_cast< sal_uInt8 const * >(buffer_.getConstArray());
102 514550 : end_ = data_ + buffer_.getLength();
103 514550 : }
104 :
105 514550 : Unmarshal::~Unmarshal() {}
106 :
107 1254190 : sal_uInt8 Unmarshal::read8() {
108 1254190 : check(1);
109 1254190 : return *data_++;
110 : }
111 :
112 565060 : sal_uInt16 Unmarshal::read16() {
113 565060 : check(2);
114 565060 : sal_uInt16 n = static_cast< sal_uInt16 >(*data_++) << 8;
115 565060 : return n | *data_++;
116 : }
117 :
118 574174 : sal_uInt32 Unmarshal::read32() {
119 574174 : check(4);
120 574174 : sal_uInt32 n = static_cast< sal_uInt32 >(*data_++) << 24;
121 574174 : n |= static_cast< sal_uInt32 >(*data_++) << 16;
122 574174 : n |= static_cast< sal_uInt32 >(*data_++) << 8;
123 574174 : return n | *data_++;
124 : }
125 :
126 235727 : css::uno::TypeDescription Unmarshal::readType() {
127 235727 : sal_uInt8 flags = read8();
128 235727 : typelib_TypeClass tc = static_cast< typelib_TypeClass >(flags & 0x7F);
129 235727 : switch (tc) {
130 : case typelib_TypeClass_VOID:
131 : case typelib_TypeClass_BOOLEAN:
132 : case typelib_TypeClass_BYTE:
133 : case typelib_TypeClass_SHORT:
134 : case typelib_TypeClass_UNSIGNED_SHORT:
135 : case typelib_TypeClass_LONG:
136 : case typelib_TypeClass_UNSIGNED_LONG:
137 : case typelib_TypeClass_HYPER:
138 : case typelib_TypeClass_UNSIGNED_HYPER:
139 : case typelib_TypeClass_FLOAT:
140 : case typelib_TypeClass_DOUBLE:
141 : case typelib_TypeClass_CHAR:
142 : case typelib_TypeClass_STRING:
143 : case typelib_TypeClass_TYPE:
144 : case typelib_TypeClass_ANY:
145 79506 : if ((flags & 0x80) != 0) {
146 : throw css::io::IOException(
147 : "binaryurp::Unmarshal: cache flag of simple type is set",
148 0 : css::uno::Reference< css::uno::XInterface >());
149 : }
150 : return css::uno::TypeDescription(
151 : *typelib_static_type_getByTypeClass(
152 79506 : static_cast< typelib_TypeClass >(tc)));
153 : case typelib_TypeClass_SEQUENCE:
154 : case typelib_TypeClass_ENUM:
155 : case typelib_TypeClass_STRUCT:
156 : case typelib_TypeClass_EXCEPTION:
157 : case typelib_TypeClass_INTERFACE:
158 : {
159 156221 : sal_uInt16 idx = readCacheIndex();
160 156221 : if ((flags & 0x80) == 0) {
161 154489 : if (idx == cache::ignore || !state_.typeCache[idx].is()) {
162 : throw css::io::IOException(
163 : "binaryurp::Unmarshal: unknown type cache index",
164 0 : css::uno::Reference< css::uno::XInterface >());
165 : }
166 154489 : return state_.typeCache[idx];
167 : } else {
168 1732 : OUString const str(readString());
169 3464 : css::uno::TypeDescription t(str);
170 3464 : if (!t.is() ||
171 1732 : t.get()->eTypeClass != static_cast< typelib_TypeClass >(tc))
172 : {
173 :
174 : throw css::io::IOException(
175 0 : "binaryurp::Unmarshal: type with unknown name: " + str,
176 0 : css::uno::Reference< css::uno::XInterface >());
177 : }
178 3500 : for (css::uno::TypeDescription t2(t);
179 1768 : t2.get()->eTypeClass == typelib_TypeClass_SEQUENCE;)
180 : {
181 37 : t2.makeComplete();
182 74 : t2 = css::uno::TypeDescription(
183 : reinterpret_cast< typelib_IndirectTypeDescription * >(
184 74 : t2.get())->pType);
185 37 : if (!t2.is()) {
186 : throw css::io::IOException(
187 : ("binaryurp::Unmarshal: sequence type with unknown"
188 : " component type"),
189 0 : css::uno::Reference< css::uno::XInterface >());
190 : }
191 37 : switch (t2.get()->eTypeClass) {
192 : case typelib_TypeClass_VOID:
193 : case typelib_TypeClass_EXCEPTION:
194 : throw css::io::IOException(
195 : ("binaryurp::Unmarshal: sequence type with bad"
196 : " component type"),
197 1 : css::uno::Reference< css::uno::XInterface >());
198 : default:
199 36 : break;
200 : }
201 1732 : }
202 1731 : if (idx != cache::ignore) {
203 1730 : state_.typeCache[idx] = t;
204 : }
205 3463 : return t;
206 : }
207 : }
208 : default:
209 : throw css::io::IOException(
210 : "binaryurp::Unmarshal: type of unknown type class",
211 0 : css::uno::Reference< css::uno::XInterface >());
212 : }
213 : }
214 :
215 315653 : OUString Unmarshal::readOid() {
216 315653 : OUString oid(readString());
217 2738905 : for (sal_Int32 i = 0; i != oid.getLength(); ++i) {
218 2423252 : if (oid[i] > 0x7F) {
219 : throw css::io::IOException(
220 : "binaryurp::Unmarshal: OID contains non-ASCII character",
221 0 : css::uno::Reference< css::uno::XInterface >());
222 : }
223 : }
224 315653 : sal_uInt16 idx = readCacheIndex();
225 315653 : if (oid.isEmpty() && idx != cache::ignore) {
226 67328 : if (state_.oidCache[idx].isEmpty()) {
227 : throw css::io::IOException(
228 : "binaryurp::Unmarshal: unknown OID cache index",
229 0 : css::uno::Reference< css::uno::XInterface >());
230 : }
231 67328 : return state_.oidCache[idx];
232 : }
233 248325 : if (idx != cache::ignore) {
234 51684 : state_.oidCache[idx] = oid;
235 : }
236 248325 : return oid;
237 : }
238 :
239 50463 : rtl::ByteSequence Unmarshal::readTid() {
240 : rtl::ByteSequence tid(
241 : *static_cast< sal_Sequence * const * >(
242 : readSequence(
243 : css::uno::TypeDescription(
244 50463 : cppu::UnoType< css::uno::Sequence< sal_Int8 > >::get())).
245 : getValue(
246 : css::uno::TypeDescription(
247 100926 : cppu::UnoType< css::uno::Sequence< sal_Int8 > >::get()))));
248 50463 : sal_uInt16 idx = readCacheIndex();
249 50463 : if (tid.getLength() == 0) {
250 50198 : if (idx == cache::ignore || state_.tidCache[idx].getLength() == 0) {
251 : throw css::io::IOException(
252 : "binaryurp::Unmarshal: unknown TID cache index",
253 0 : css::uno::Reference< css::uno::XInterface >());
254 : }
255 50198 : return state_.tidCache[idx];
256 : }
257 265 : if (idx != cache::ignore) {
258 265 : state_.tidCache[idx] = tid;
259 : }
260 265 : return tid;
261 : }
262 :
263 690766 : BinaryAny Unmarshal::readValue(css::uno::TypeDescription const & type) {
264 : assert(type.is());
265 690766 : switch (type.get()->eTypeClass) {
266 : default:
267 0 : std::abort(); // this cannot happen
268 : // pseudo fall-through to avoid compiler warnings
269 : case typelib_TypeClass_VOID:
270 5344 : return BinaryAny();
271 : case typelib_TypeClass_BOOLEAN:
272 : {
273 26260 : sal_uInt8 v = read8();
274 26260 : if (v > 1) {
275 : throw css::io::IOException(
276 : "binaryurp::Unmarshal: boolean of unknown value",
277 0 : css::uno::Reference< css::uno::XInterface >());
278 : }
279 26260 : return BinaryAny(type, &v);
280 : }
281 : case typelib_TypeClass_BYTE:
282 : {
283 23 : sal_uInt8 v = read8();
284 23 : return BinaryAny(type, &v);
285 : }
286 : case typelib_TypeClass_SHORT:
287 : case typelib_TypeClass_UNSIGNED_SHORT:
288 : case typelib_TypeClass_CHAR:
289 : {
290 42723 : sal_uInt16 v = read16();
291 42723 : return BinaryAny(type, &v);
292 : }
293 : case typelib_TypeClass_LONG:
294 : case typelib_TypeClass_UNSIGNED_LONG:
295 : case typelib_TypeClass_FLOAT:
296 : {
297 57176 : sal_uInt32 v = read32();
298 57176 : return BinaryAny(type, &v);
299 : }
300 : case typelib_TypeClass_HYPER:
301 : case typelib_TypeClass_UNSIGNED_HYPER:
302 : case typelib_TypeClass_DOUBLE:
303 : {
304 22298 : sal_uInt64 v = read64();
305 22298 : return BinaryAny(type, &v);
306 : }
307 : case typelib_TypeClass_STRING:
308 : {
309 194697 : OUString v(readString());
310 194697 : return BinaryAny(type, &v.pData);
311 : }
312 : case typelib_TypeClass_TYPE:
313 : {
314 21897 : css::uno::TypeDescription v(readType());
315 21897 : typelib_TypeDescription * p = v.get();
316 21897 : return BinaryAny(type, &p);
317 : }
318 : case typelib_TypeClass_ANY:
319 : {
320 83940 : css::uno::TypeDescription t(readType());
321 83940 : if (t.get()->eTypeClass == typelib_TypeClass_ANY) {
322 : throw css::io::IOException(
323 : "binaryurp::Unmarshal: any of type ANY",
324 0 : css::uno::Reference< css::uno::XInterface >());
325 : }
326 83940 : return readValue(t);
327 : }
328 : case typelib_TypeClass_SEQUENCE:
329 8918 : type.makeComplete();
330 8918 : return readSequence(type);
331 : case typelib_TypeClass_ENUM:
332 : {
333 2432 : sal_Int32 v = static_cast< sal_Int32 >(read32());
334 2432 : type.makeComplete();
335 : typelib_EnumTypeDescription * etd =
336 2432 : reinterpret_cast< typelib_EnumTypeDescription * >(type.get());
337 2432 : bool found = false;
338 7155 : for (sal_Int32 i = 0; i != etd->nEnumValues; ++i) {
339 7155 : if (etd->pEnumValues[i] == v) {
340 2432 : found = true;
341 2432 : break;
342 : }
343 : }
344 2432 : if (!found) {
345 : throw css::io::IOException(
346 : "binaryurp::Unmarshal: unknown enum value",
347 0 : css::uno::Reference< css::uno::XInterface >());
348 : }
349 2432 : return BinaryAny(type, &v);
350 : }
351 : case typelib_TypeClass_STRUCT:
352 : case typelib_TypeClass_EXCEPTION:
353 : {
354 17323 : std::vector< BinaryAny > as;
355 17323 : readMemberValues(type, &as);
356 17323 : void * buf = allocate(type.get()->nSize);
357 17323 : copyMemberValues(type, as.begin(), buf);
358 : uno_Any raw;
359 : raw.pType = reinterpret_cast< typelib_TypeDescriptionReference * >(
360 17323 : type.get());
361 17323 : raw.pData = buf;
362 17323 : raw.pReserved = 0;
363 17323 : return BinaryAny(raw);
364 : }
365 : case typelib_TypeClass_INTERFACE:
366 : {
367 : css::uno::UnoInterfaceReference obj(
368 207735 : bridge_->registerIncomingInterface(readOid(), type));
369 207735 : return BinaryAny(type, &obj.m_pUnoI);
370 : }
371 : }
372 : }
373 :
374 514549 : void Unmarshal::done() const {
375 514549 : if (data_ != end_) {
376 : throw css::io::IOException(
377 : "binaryurp::Unmarshal: block contains excess data",
378 0 : css::uno::Reference< css::uno::XInterface >());
379 : }
380 514549 : }
381 :
382 2928087 : void Unmarshal::check(sal_Int32 size) const {
383 2928087 : if (end_ - data_ < size) {
384 : throw css::io::IOException(
385 : "binaryurp::Unmarshal: trying to read past end of block",
386 0 : css::uno::Reference< css::uno::XInterface >());
387 : }
388 2928087 : }
389 :
390 571463 : sal_uInt32 Unmarshal::readCompressed() {
391 571463 : sal_uInt8 n = read8();
392 571463 : return n == 0xFF ? read32() : n;
393 : }
394 :
395 522337 : sal_uInt16 Unmarshal::readCacheIndex() {
396 522337 : sal_uInt16 idx = read16();
397 522337 : if (idx >= cache::size && idx != cache::ignore) {
398 : throw css::io::IOException(
399 : "binaryurp::Unmarshal: cache index out of range",
400 0 : css::uno::Reference< css::uno::XInterface >());
401 : }
402 522337 : return idx;
403 : }
404 :
405 22298 : sal_uInt64 Unmarshal::read64() {
406 22298 : check(8);
407 22298 : sal_uInt64 n = static_cast< sal_uInt64 >(*data_++) << 56;
408 22298 : n |= static_cast< sal_uInt64 >(*data_++) << 48;
409 22298 : n |= static_cast< sal_uInt64 >(*data_++) << 40;
410 22298 : n |= static_cast< sal_uInt64 >(*data_++) << 32;
411 22298 : n |= static_cast< sal_uInt64 >(*data_++) << 24;
412 22298 : n |= static_cast< sal_uInt64 >(*data_++) << 16;
413 22298 : n |= static_cast< sal_uInt64 >(*data_++) << 8;
414 22298 : return n | *data_++;
415 : }
416 :
417 512082 : OUString Unmarshal::readString() {
418 512082 : sal_uInt32 n = readCompressed();
419 512082 : if (n > SAL_MAX_INT32) {
420 : throw css::uno::RuntimeException(
421 : "binaryurp::Unmarshal: string size too large",
422 0 : css::uno::Reference< css::uno::XInterface >());
423 : }
424 512082 : check(static_cast< sal_Int32 >(n));
425 512082 : OUString s;
426 512082 : if (!rtl_convertStringToUString(
427 : &s.pData, reinterpret_cast< char const * >(data_),
428 : static_cast< sal_Int32 >(n), RTL_TEXTENCODING_UTF8,
429 : (RTL_TEXTTOUNICODE_FLAGS_UNDEFINED_ERROR |
430 : RTL_TEXTTOUNICODE_FLAGS_MBUNDEFINED_ERROR |
431 512082 : RTL_TEXTTOUNICODE_FLAGS_INVALID_ERROR)))
432 : {
433 : throw css::io::IOException(
434 : "binaryurp::Unmarshal: string does not contain UTF-8",
435 0 : css::uno::Reference< css::uno::XInterface >());
436 : }
437 512082 : data_ += n;
438 512082 : return s;
439 : }
440 :
441 59381 : BinaryAny Unmarshal::readSequence(css::uno::TypeDescription const & type) {
442 : assert(type.is() && type.get()->eTypeClass == typelib_TypeClass_SEQUENCE);
443 59381 : sal_uInt32 n = readCompressed();
444 59381 : if (n > SAL_MAX_INT32) {
445 : throw css::uno::RuntimeException(
446 : "binaryurp::Unmarshal: sequence size too large",
447 0 : css::uno::Reference< css::uno::XInterface >());
448 : }
449 59381 : if (n == 0) {
450 51043 : return BinaryAny(type, 0);
451 : }
452 : css::uno::TypeDescription ctd(
453 : reinterpret_cast< typelib_IndirectTypeDescription * >(
454 8338 : type.get())->pType);
455 8338 : if (ctd.get()->eTypeClass == typelib_TypeClass_BYTE) {
456 283 : check(static_cast< sal_Int32 >(n));
457 : rtl::ByteSequence s(
458 : reinterpret_cast< sal_Int8 const * >(data_),
459 283 : static_cast< sal_Int32 >(n));
460 283 : data_ += n;
461 283 : sal_Sequence * p = s.getHandle();
462 283 : return BinaryAny(type, &p);
463 : }
464 16110 : std::vector< BinaryAny > as;
465 194771 : for (sal_uInt32 i = 0; i != n; ++i) {
466 186716 : as.push_back(readValue(ctd));
467 : }
468 : assert(ctd.get()->nSize >= 0);
469 16110 : sal_uInt64 size = static_cast< sal_uInt64 >(n) *
470 16110 : static_cast< sal_uInt64 >(ctd.get()->nSize);
471 : // sal_uInt32 * sal_Int32 -> sal_uInt64 cannot overflow
472 8055 : if (size > SAL_MAX_SIZE - SAL_SEQUENCE_HEADER_SIZE) {
473 : throw css::uno::RuntimeException(
474 : "binaryurp::Unmarshal: sequence size too large",
475 0 : css::uno::Reference< css::uno::XInterface >());
476 : }
477 : void * buf = allocate(
478 8055 : SAL_SEQUENCE_HEADER_SIZE + static_cast< sal_Size >(size));
479 8055 : static_cast< sal_Sequence * >(buf)->nRefCount = 0;
480 : static_cast< sal_Sequence * >(buf)->nElements =
481 8055 : static_cast< sal_Int32 >(n);
482 194771 : for (sal_uInt32 i = 0; i != n; ++i) {
483 : uno_copyData(
484 373432 : static_cast< sal_Sequence * >(buf)->elements + i * ctd.get()->nSize,
485 560148 : const_cast< void * >(as[i].getValue(ctd)), ctd.get(), 0);
486 : }
487 16393 : return BinaryAny(type, reinterpret_cast< sal_Sequence ** >(&buf));
488 : }
489 :
490 17438 : void Unmarshal::readMemberValues(
491 : css::uno::TypeDescription const & type, std::vector< BinaryAny > * values)
492 : {
493 : assert(
494 : type.is() &&
495 : (type.get()->eTypeClass == typelib_TypeClass_STRUCT ||
496 : type.get()->eTypeClass == typelib_TypeClass_EXCEPTION) &&
497 : values != 0);
498 17438 : type.makeComplete();
499 : typelib_CompoundTypeDescription * ctd =
500 17438 : reinterpret_cast< typelib_CompoundTypeDescription * >(type.get());
501 17438 : if (ctd->pBaseTypeDescription != 0) {
502 : readMemberValues(
503 : css::uno::TypeDescription(&ctd->pBaseTypeDescription->aBase),
504 115 : values);
505 : }
506 74332 : for (sal_Int32 i = 0; i != ctd->nMembers; ++i) {
507 : values->push_back(
508 56894 : readValue(css::uno::TypeDescription(ctd->ppTypeRefs[i])));
509 : }
510 17438 : }
511 :
512 : }
513 :
514 : /* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|