Parcel.cpp revision eaac99a7172da52a76ba48c26413778a74951b1a 
1/*
2 * Copyright (C) 2005 The Android Open Source Project
3 *
4 * Licensed under the Apache License, Version 2.0 (the "License");
5 * you may not use this file except in compliance with the License.
6 * You may obtain a copy of the License at
7 *
8 *      http://www.apache.org/licenses/LICENSE-2.0
9 *
10 * Unless required by applicable law or agreed to in writing, software
11 * distributed under the License is distributed on an "AS IS" BASIS,
12 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
13 * See the License for the specific language governing permissions and
14 * limitations under the License.
15 */
16
17#define LOG_TAG "Parcel"
18//#define LOG_NDEBUG 0
19
20#include <binder/Parcel.h>
21
22#include <binder/IPCThreadState.h>
23#include <binder/Binder.h>
24#include <binder/BpBinder.h>
25#include <binder/ProcessState.h>
26#include <binder/TextOutput.h>
27
28#include <errno.h>
29#include <utils/Debug.h>
30#include <utils/Log.h>
31#include <utils/String8.h>
32#include <utils/String16.h>
33#include <utils/misc.h>
34#include <utils/Flattenable.h>
35#include <cutils/ashmem.h>
36
37#include <private/binder/binder_module.h>
38#include <private/binder/Static.h>
39
40#include <inttypes.h>
41#include <stdio.h>
42#include <stdlib.h>
43#include <stdint.h>
44#include <sys/mman.h>
45
46#ifndef INT32_MAX
47#define INT32_MAX ((int32_t)(2147483647))
48#endif
49
50#define LOG_REFS(...)
51//#define LOG_REFS(...) ALOG(LOG_DEBUG, "Parcel", __VA_ARGS__)
52#define LOG_ALLOC(...)
53//#define LOG_ALLOC(...) ALOG(LOG_DEBUG, "Parcel", __VA_ARGS__)
54
55// ---------------------------------------------------------------------------
56
57// This macro should never be used at runtime, as a too large value
58// of s could cause an integer overflow. Instead, you should always
59// use the wrapper function pad_size()
60#define PAD_SIZE_UNSAFE(s) (((s)+3)&~3)
61
62static size_t pad_size(size_t s) {
63    if (s > (SIZE_T_MAX - 3)) {
64        abort();
65    }
66    return PAD_SIZE_UNSAFE(s);
67}
68
69// Note: must be kept in sync with android/os/StrictMode.java's PENALTY_GATHER
70#define STRICT_MODE_PENALTY_GATHER (0x40 << 16)
71
72// Note: must be kept in sync with android/os/Parcel.java's EX_HAS_REPLY_HEADER
73#define EX_HAS_REPLY_HEADER -128
74
75// Maximum size of a blob to transfer in-place.
76static const size_t IN_PLACE_BLOB_LIMIT = 40 * 1024;
77
78// XXX This can be made public if we want to provide
79// support for typed data.
80struct small_flat_data
81{
82    uint32_t type;
83    uint32_t data;
84};
85
86namespace android {
87
88static pthread_mutex_t gParcelGlobalAllocSizeLock = PTHREAD_MUTEX_INITIALIZER;
89static size_t gParcelGlobalAllocSize = 0;
90static size_t gParcelGlobalAllocCount = 0;
91
92void acquire_object(const sp<ProcessState>& proc,
93    const flat_binder_object& obj, const void* who)
94{
95    switch (obj.type) {
96        case BINDER_TYPE_BINDER:
97            if (obj.binder) {
98                LOG_REFS("Parcel %p acquiring reference on local %p", who, obj.cookie);
99                reinterpret_cast<IBinder*>(obj.cookie)->incStrong(who);
100            }
101            return;
102        case BINDER_TYPE_WEAK_BINDER:
103            if (obj.binder)
104                reinterpret_cast<RefBase::weakref_type*>(obj.binder)->incWeak(who);
105            return;
106        case BINDER_TYPE_HANDLE: {
107            const sp<IBinder> b = proc->getStrongProxyForHandle(obj.handle);
108            if (b != NULL) {
109                LOG_REFS("Parcel %p acquiring reference on remote %p", who, b.get());
110                b->incStrong(who);
111            }
112            return;
113        }
114        case BINDER_TYPE_WEAK_HANDLE: {
115            const wp<IBinder> b = proc->getWeakProxyForHandle(obj.handle);
116            if (b != NULL) b.get_refs()->incWeak(who);
117            return;
118        }
119        case BINDER_TYPE_FD: {
120            // intentionally blank -- nothing to do to acquire this, but we do
121            // recognize it as a legitimate object type.
122            return;
123        }
124    }
125
126    ALOGD("Invalid object type 0x%08x", obj.type);
127}
128
129void release_object(const sp<ProcessState>& proc,
130    const flat_binder_object& obj, const void* who)
131{
132    switch (obj.type) {
133        case BINDER_TYPE_BINDER:
134            if (obj.binder) {
135                LOG_REFS("Parcel %p releasing reference on local %p", who, obj.cookie);
136                reinterpret_cast<IBinder*>(obj.cookie)->decStrong(who);
137            }
138            return;
139        case BINDER_TYPE_WEAK_BINDER:
140            if (obj.binder)
141                reinterpret_cast<RefBase::weakref_type*>(obj.binder)->decWeak(who);
142            return;
143        case BINDER_TYPE_HANDLE: {
144            const sp<IBinder> b = proc->getStrongProxyForHandle(obj.handle);
145            if (b != NULL) {
146                LOG_REFS("Parcel %p releasing reference on remote %p", who, b.get());
147                b->decStrong(who);
148            }
149            return;
150        }
151        case BINDER_TYPE_WEAK_HANDLE: {
152            const wp<IBinder> b = proc->getWeakProxyForHandle(obj.handle);
153            if (b != NULL) b.get_refs()->decWeak(who);
154            return;
155        }
156        case BINDER_TYPE_FD: {
157            if (obj.cookie != 0) close(obj.handle);
158            return;
159        }
160    }
161
162    ALOGE("Invalid object type 0x%08x", obj.type);
163}
164
165inline static status_t finish_flatten_binder(
166    const sp<IBinder>& /*binder*/, const flat_binder_object& flat, Parcel* out)
167{
168    return out->writeObject(flat, false);
169}
170
171status_t flatten_binder(const sp<ProcessState>& /*proc*/,
172    const sp<IBinder>& binder, Parcel* out)
173{
174    flat_binder_object obj;
175
176    obj.flags = 0x7f | FLAT_BINDER_FLAG_ACCEPTS_FDS;
177    if (binder != NULL) {
178        IBinder *local = binder->localBinder();
179        if (!local) {
180            BpBinder *proxy = binder->remoteBinder();
181            if (proxy == NULL) {
182                ALOGE("null proxy");
183            }
184            const int32_t handle = proxy ? proxy->handle() : 0;
185            obj.type = BINDER_TYPE_HANDLE;
186            obj.binder = 0; /* Don't pass uninitialized stack data to a remote process */
187            obj.handle = handle;
188            obj.cookie = 0;
189        } else {
190            obj.type = BINDER_TYPE_BINDER;
191            obj.binder = reinterpret_cast<uintptr_t>(local->getWeakRefs());
192            obj.cookie = reinterpret_cast<uintptr_t>(local);
193        }
194    } else {
195        obj.type = BINDER_TYPE_BINDER;
196        obj.binder = 0;
197        obj.cookie = 0;
198    }
199
200    return finish_flatten_binder(binder, obj, out);
201}
202
203status_t flatten_binder(const sp<ProcessState>& /*proc*/,
204    const wp<IBinder>& binder, Parcel* out)
205{
206    flat_binder_object obj;
207
208    obj.flags = 0x7f | FLAT_BINDER_FLAG_ACCEPTS_FDS;
209    if (binder != NULL) {
210        sp<IBinder> real = binder.promote();
211        if (real != NULL) {
212            IBinder *local = real->localBinder();
213            if (!local) {
214                BpBinder *proxy = real->remoteBinder();
215                if (proxy == NULL) {
216                    ALOGE("null proxy");
217                }
218                const int32_t handle = proxy ? proxy->handle() : 0;
219                obj.type = BINDER_TYPE_WEAK_HANDLE;
220                obj.binder = 0; /* Don't pass uninitialized stack data to a remote process */
221                obj.handle = handle;
222                obj.cookie = 0;
223            } else {
224                obj.type = BINDER_TYPE_WEAK_BINDER;
225                obj.binder = reinterpret_cast<uintptr_t>(binder.get_refs());
226                obj.cookie = reinterpret_cast<uintptr_t>(binder.unsafe_get());
227            }
228            return finish_flatten_binder(real, obj, out);
229        }
230
231        // XXX How to deal?  In order to flatten the given binder,
232        // we need to probe it for information, which requires a primary
233        // reference...  but we don't have one.
234        //
235        // The OpenBinder implementation uses a dynamic_cast<> here,
236        // but we can't do that with the different reference counting
237        // implementation we are using.
238        ALOGE("Unable to unflatten Binder weak reference!");
239        obj.type = BINDER_TYPE_BINDER;
240        obj.binder = 0;
241        obj.cookie = 0;
242        return finish_flatten_binder(NULL, obj, out);
243
244    } else {
245        obj.type = BINDER_TYPE_BINDER;
246        obj.binder = 0;
247        obj.cookie = 0;
248        return finish_flatten_binder(NULL, obj, out);
249    }
250}
251
252inline static status_t finish_unflatten_binder(
253    BpBinder* /*proxy*/, const flat_binder_object& /*flat*/,
254    const Parcel& /*in*/)
255{
256    return NO_ERROR;
257}
258
259status_t unflatten_binder(const sp<ProcessState>& proc,
260    const Parcel& in, sp<IBinder>* out)
261{
262    const flat_binder_object* flat = in.readObject(false);
263
264    if (flat) {
265        switch (flat->type) {
266            case BINDER_TYPE_BINDER:
267                *out = reinterpret_cast<IBinder*>(flat->cookie);
268                return finish_unflatten_binder(NULL, *flat, in);
269            case BINDER_TYPE_HANDLE:
270                *out = proc->getStrongProxyForHandle(flat->handle);
271                return finish_unflatten_binder(
272                    static_cast<BpBinder*>(out->get()), *flat, in);
273        }
274    }
275    return BAD_TYPE;
276}
277
278status_t unflatten_binder(const sp<ProcessState>& proc,
279    const Parcel& in, wp<IBinder>* out)
280{
281    const flat_binder_object* flat = in.readObject(false);
282
283    if (flat) {
284        switch (flat->type) {
285            case BINDER_TYPE_BINDER:
286                *out = reinterpret_cast<IBinder*>(flat->cookie);
287                return finish_unflatten_binder(NULL, *flat, in);
288            case BINDER_TYPE_WEAK_BINDER:
289                if (flat->binder != 0) {
290                    out->set_object_and_refs(
291                        reinterpret_cast<IBinder*>(flat->cookie),
292                        reinterpret_cast<RefBase::weakref_type*>(flat->binder));
293                } else {
294                    *out = NULL;
295                }
296                return finish_unflatten_binder(NULL, *flat, in);
297            case BINDER_TYPE_HANDLE:
298            case BINDER_TYPE_WEAK_HANDLE:
299                *out = proc->getWeakProxyForHandle(flat->handle);
300                return finish_unflatten_binder(
301                    static_cast<BpBinder*>(out->unsafe_get()), *flat, in);
302        }
303    }
304    return BAD_TYPE;
305}
306
307// ---------------------------------------------------------------------------
308
309Parcel::Parcel()
310{
311    LOG_ALLOC("Parcel %p: constructing", this);
312    initState();
313}
314
315Parcel::~Parcel()
316{
317    freeDataNoInit();
318    LOG_ALLOC("Parcel %p: destroyed", this);
319}
320
321size_t Parcel::getGlobalAllocSize() {
322    pthread_mutex_lock(&gParcelGlobalAllocSizeLock);
323    size_t size = gParcelGlobalAllocSize;
324    pthread_mutex_unlock(&gParcelGlobalAllocSizeLock);
325    return size;
326}
327
328size_t Parcel::getGlobalAllocCount() {
329    pthread_mutex_lock(&gParcelGlobalAllocSizeLock);
330    size_t count = gParcelGlobalAllocCount;
331    pthread_mutex_unlock(&gParcelGlobalAllocSizeLock);
332    return count;
333}
334
335const uint8_t* Parcel::data() const
336{
337    return mData;
338}
339
340size_t Parcel::dataSize() const
341{
342    return (mDataSize > mDataPos ? mDataSize : mDataPos);
343}
344
345size_t Parcel::dataAvail() const
346{
347    // TODO: decide what to do about the possibility that this can
348    // report an available-data size that exceeds a Java int's max
349    // positive value, causing havoc.  Fortunately this will only
350    // happen if someone constructs a Parcel containing more than two
351    // gigabytes of data, which on typical phone hardware is simply
352    // not possible.
353    return dataSize() - dataPosition();
354}
355
356size_t Parcel::dataPosition() const
357{
358    return mDataPos;
359}
360
361size_t Parcel::dataCapacity() const
362{
363    return mDataCapacity;
364}
365
366status_t Parcel::setDataSize(size_t size)
367{
368    if (size > INT32_MAX) {
369        // don't accept size_t values which may have come from an
370        // inadvertent conversion from a negative int.
371        return BAD_VALUE;
372    }
373
374    status_t err;
375    err = continueWrite(size);
376    if (err == NO_ERROR) {
377        mDataSize = size;
378        ALOGV("setDataSize Setting data size of %p to %zu", this, mDataSize);
379    }
380    return err;
381}
382
383void Parcel::setDataPosition(size_t pos) const
384{
385    if (pos > INT32_MAX) {
386        // don't accept size_t values which may have come from an
387        // inadvertent conversion from a negative int.
388        abort();
389    }
390
391    mDataPos = pos;
392    mNextObjectHint = 0;
393}
394
395status_t Parcel::setDataCapacity(size_t size)
396{
397    if (size > INT32_MAX) {
398        // don't accept size_t values which may have come from an
399        // inadvertent conversion from a negative int.
400        return BAD_VALUE;
401    }
402
403    if (size > mDataCapacity) return continueWrite(size);
404    return NO_ERROR;
405}
406
407status_t Parcel::setData(const uint8_t* buffer, size_t len)
408{
409    if (len > INT32_MAX) {
410        // don't accept size_t values which may have come from an
411        // inadvertent conversion from a negative int.
412        return BAD_VALUE;
413    }
414
415    status_t err = restartWrite(len);
416    if (err == NO_ERROR) {
417        memcpy(const_cast<uint8_t*>(data()), buffer, len);
418        mDataSize = len;
419        mFdsKnown = false;
420    }
421    return err;
422}
423
424status_t Parcel::appendFrom(const Parcel *parcel, size_t offset, size_t len)
425{
426    const sp<ProcessState> proc(ProcessState::self());
427    status_t err;
428    const uint8_t *data = parcel->mData;
429    const binder_size_t *objects = parcel->mObjects;
430    size_t size = parcel->mObjectsSize;
431    int startPos = mDataPos;
432    int firstIndex = -1, lastIndex = -2;
433
434    if (len == 0) {
435        return NO_ERROR;
436    }
437
438    if (len > INT32_MAX) {
439        // don't accept size_t values which may have come from an
440        // inadvertent conversion from a negative int.
441        return BAD_VALUE;
442    }
443
444    // range checks against the source parcel size
445    if ((offset > parcel->mDataSize)
446            || (len > parcel->mDataSize)
447            || (offset + len > parcel->mDataSize)) {
448        return BAD_VALUE;
449    }
450
451    // Count objects in range
452    for (int i = 0; i < (int) size; i++) {
453        size_t off = objects[i];
454        if ((off >= offset) && (off < offset + len)) {
455            if (firstIndex == -1) {
456                firstIndex = i;
457            }
458            lastIndex = i;
459        }
460    }
461    int numObjects = lastIndex - firstIndex + 1;
462
463    if ((mDataSize+len) > mDataCapacity) {
464        // grow data
465        err = growData(len);
466        if (err != NO_ERROR) {
467            return err;
468        }
469    }
470
471    // append data
472    memcpy(mData + mDataPos, data + offset, len);
473    mDataPos += len;
474    mDataSize += len;
475
476    err = NO_ERROR;
477
478    if (numObjects > 0) {
479        // grow objects
480        if (mObjectsCapacity < mObjectsSize + numObjects) {
481            int newSize = ((mObjectsSize + numObjects)*3)/2;
482            binder_size_t *objects =
483                (binder_size_t*)realloc(mObjects, newSize*sizeof(binder_size_t));
484            if (objects == (binder_size_t*)0) {
485                return NO_MEMORY;
486            }
487            mObjects = objects;
488            mObjectsCapacity = newSize;
489        }
490
491        // append and acquire objects
492        int idx = mObjectsSize;
493        for (int i = firstIndex; i <= lastIndex; i++) {
494            size_t off = objects[i] - offset + startPos;
495            mObjects[idx++] = off;
496            mObjectsSize++;
497
498            flat_binder_object* flat
499                = reinterpret_cast<flat_binder_object*>(mData + off);
500            acquire_object(proc, *flat, this);
501
502            if (flat->type == BINDER_TYPE_FD) {
503                // If this is a file descriptor, we need to dup it so the
504                // new Parcel now owns its own fd, and can declare that we
505                // officially know we have fds.
506                flat->handle = dup(flat->handle);
507                flat->cookie = 1;
508                mHasFds = mFdsKnown = true;
509                if (!mAllowFds) {
510                    err = FDS_NOT_ALLOWED;
511                }
512            }
513        }
514    }
515
516    return err;
517}
518
519bool Parcel::pushAllowFds(bool allowFds)
520{
521    const bool origValue = mAllowFds;
522    if (!allowFds) {
523        mAllowFds = false;
524    }
525    return origValue;
526}
527
528void Parcel::restoreAllowFds(bool lastValue)
529{
530    mAllowFds = lastValue;
531}
532
533bool Parcel::hasFileDescriptors() const
534{
535    if (!mFdsKnown) {
536        scanForFds();
537    }
538    return mHasFds;
539}
540
541// Write RPC headers.  (previously just the interface token)
542status_t Parcel::writeInterfaceToken(const String16& interface)
543{
544    writeInt32(IPCThreadState::self()->getStrictModePolicy() |
545               STRICT_MODE_PENALTY_GATHER);
546    // currently the interface identification token is just its name as a string
547    return writeString16(interface);
548}
549
550bool Parcel::checkInterface(IBinder* binder) const
551{
552    return enforceInterface(binder->getInterfaceDescriptor());
553}
554
555bool Parcel::enforceInterface(const String16& interface,
556                              IPCThreadState* threadState) const
557{
558    int32_t strictPolicy = readInt32();
559    if (threadState == NULL) {
560        threadState = IPCThreadState::self();
561    }
562    if ((threadState->getLastTransactionBinderFlags() &
563         IBinder::FLAG_ONEWAY) != 0) {
564      // For one-way calls, the callee is running entirely
565      // disconnected from the caller, so disable StrictMode entirely.
566      // Not only does disk/network usage not impact the caller, but
567      // there's no way to commuicate back any violations anyway.
568      threadState->setStrictModePolicy(0);
569    } else {
570      threadState->setStrictModePolicy(strictPolicy);
571    }
572    const String16 str(readString16());
573    if (str == interface) {
574        return true;
575    } else {
576        ALOGW("**** enforceInterface() expected '%s' but read '%s'",
577                String8(interface).string(), String8(str).string());
578        return false;
579    }
580}
581
582const binder_size_t* Parcel::objects() const
583{
584    return mObjects;
585}
586
587size_t Parcel::objectsCount() const
588{
589    return mObjectsSize;
590}
591
592status_t Parcel::errorCheck() const
593{
594    return mError;
595}
596
597void Parcel::setError(status_t err)
598{
599    mError = err;
600}
601
602status_t Parcel::finishWrite(size_t len)
603{
604    if (len > INT32_MAX) {
605        // don't accept size_t values which may have come from an
606        // inadvertent conversion from a negative int.
607        return BAD_VALUE;
608    }
609
610    //printf("Finish write of %d\n", len);
611    mDataPos += len;
612    ALOGV("finishWrite Setting data pos of %p to %zu", this, mDataPos);
613    if (mDataPos > mDataSize) {
614        mDataSize = mDataPos;
615        ALOGV("finishWrite Setting data size of %p to %zu", this, mDataSize);
616    }
617    //printf("New pos=%d, size=%d\n", mDataPos, mDataSize);
618    return NO_ERROR;
619}
620
621status_t Parcel::writeUnpadded(const void* data, size_t len)
622{
623    if (len > INT32_MAX) {
624        // don't accept size_t values which may have come from an
625        // inadvertent conversion from a negative int.
626        return BAD_VALUE;
627    }
628
629    size_t end = mDataPos + len;
630    if (end < mDataPos) {
631        // integer overflow
632        return BAD_VALUE;
633    }
634
635    if (end <= mDataCapacity) {
636restart_write:
637        memcpy(mData+mDataPos, data, len);
638        return finishWrite(len);
639    }
640
641    status_t err = growData(len);
642    if (err == NO_ERROR) goto restart_write;
643    return err;
644}
645
646status_t Parcel::write(const void* data, size_t len)
647{
648    if (len > INT32_MAX) {
649        // don't accept size_t values which may have come from an
650        // inadvertent conversion from a negative int.
651        return BAD_VALUE;
652    }
653
654    void* const d = writeInplace(len);
655    if (d) {
656        memcpy(d, data, len);
657        return NO_ERROR;
658    }
659    return mError;
660}
661
662void* Parcel::writeInplace(size_t len)
663{
664    if (len > INT32_MAX) {
665        // don't accept size_t values which may have come from an
666        // inadvertent conversion from a negative int.
667        return NULL;
668    }
669
670    const size_t padded = pad_size(len);
671
672    // sanity check for integer overflow
673    if (mDataPos+padded < mDataPos) {
674        return NULL;
675    }
676
677    if ((mDataPos+padded) <= mDataCapacity) {
678restart_write:
679        //printf("Writing %ld bytes, padded to %ld\n", len, padded);
680        uint8_t* const data = mData+mDataPos;
681
682        // Need to pad at end?
683        if (padded != len) {
684#if BYTE_ORDER == BIG_ENDIAN
685            static const uint32_t mask[4] = {
686                0x00000000, 0xffffff00, 0xffff0000, 0xff000000
687            };
688#endif
689#if BYTE_ORDER == LITTLE_ENDIAN
690            static const uint32_t mask[4] = {
691                0x00000000, 0x00ffffff, 0x0000ffff, 0x000000ff
692            };
693#endif
694            //printf("Applying pad mask: %p to %p\n", (void*)mask[padded-len],
695            //    *reinterpret_cast<void**>(data+padded-4));
696            *reinterpret_cast<uint32_t*>(data+padded-4) &= mask[padded-len];
697        }
698
699        finishWrite(padded);
700        return data;
701    }
702
703    status_t err = growData(padded);
704    if (err == NO_ERROR) goto restart_write;
705    return NULL;
706}
707
708status_t Parcel::writeInt32(int32_t val)
709{
710    return writeAligned(val);
711}
712
713status_t Parcel::writeUint32(uint32_t val)
714{
715    return writeAligned(val);
716}
717
718status_t Parcel::writeInt32Array(size_t len, const int32_t *val) {
719    if (len > INT32_MAX) {
720        // don't accept size_t values which may have come from an
721        // inadvertent conversion from a negative int.
722        return BAD_VALUE;
723    }
724
725    if (!val) {
726        return writeAligned(-1);
727    }
728    status_t ret = writeAligned(len);
729    if (ret == NO_ERROR) {
730        ret = write(val, len * sizeof(*val));
731    }
732    return ret;
733}
734status_t Parcel::writeByteArray(size_t len, const uint8_t *val) {
735    if (len > INT32_MAX) {
736        // don't accept size_t values which may have come from an
737        // inadvertent conversion from a negative int.
738        return BAD_VALUE;
739    }
740
741    if (!val) {
742        return writeAligned(-1);
743    }
744    status_t ret = writeAligned(len);
745    if (ret == NO_ERROR) {
746        ret = write(val, len * sizeof(*val));
747    }
748    return ret;
749}
750
751status_t Parcel::writeInt64(int64_t val)
752{
753    return writeAligned(val);
754}
755
756status_t Parcel::writeUint64(uint64_t val)
757{
758    return writeAligned(val);
759}
760
761status_t Parcel::writePointer(uintptr_t val)
762{
763    return writeAligned<binder_uintptr_t>(val);
764}
765
766status_t Parcel::writeFloat(float val)
767{
768    return writeAligned(val);
769}
770
771#if defined(__mips__) && defined(__mips_hard_float)
772
773status_t Parcel::writeDouble(double val)
774{
775    union {
776        double d;
777        unsigned long long ll;
778    } u;
779    u.d = val;
780    return writeAligned(u.ll);
781}
782
783#else
784
785status_t Parcel::writeDouble(double val)
786{
787    return writeAligned(val);
788}
789
790#endif
791
792status_t Parcel::writeCString(const char* str)
793{
794    return write(str, strlen(str)+1);
795}
796
797status_t Parcel::writeString8(const String8& str)
798{
799    status_t err = writeInt32(str.bytes());
800    // only write string if its length is more than zero characters,
801    // as readString8 will only read if the length field is non-zero.
802    // this is slightly different from how writeString16 works.
803    if (str.bytes() > 0 && err == NO_ERROR) {
804        err = write(str.string(), str.bytes()+1);
805    }
806    return err;
807}
808
809status_t Parcel::writeString16(const String16& str)
810{
811    return writeString16(str.string(), str.size());
812}
813
814status_t Parcel::writeString16(const char16_t* str, size_t len)
815{
816    if (str == NULL) return writeInt32(-1);
817
818    status_t err = writeInt32(len);
819    if (err == NO_ERROR) {
820        len *= sizeof(char16_t);
821        uint8_t* data = (uint8_t*)writeInplace(len+sizeof(char16_t));
822        if (data) {
823            memcpy(data, str, len);
824            *reinterpret_cast<char16_t*>(data+len) = 0;
825            return NO_ERROR;
826        }
827        err = mError;
828    }
829    return err;
830}
831
832status_t Parcel::writeStrongBinder(const sp<IBinder>& val)
833{
834    return flatten_binder(ProcessState::self(), val, this);
835}
836
837status_t Parcel::writeWeakBinder(const wp<IBinder>& val)
838{
839    return flatten_binder(ProcessState::self(), val, this);
840}
841
842status_t Parcel::writeNativeHandle(const native_handle* handle)
843{
844    if (!handle || handle->version != sizeof(native_handle))
845        return BAD_TYPE;
846
847    status_t err;
848    err = writeInt32(handle->numFds);
849    if (err != NO_ERROR) return err;
850
851    err = writeInt32(handle->numInts);
852    if (err != NO_ERROR) return err;
853
854    for (int i=0 ; err==NO_ERROR && i<handle->numFds ; i++)
855        err = writeDupFileDescriptor(handle->data[i]);
856
857    if (err != NO_ERROR) {
858        ALOGD("write native handle, write dup fd failed");
859        return err;
860    }
861    err = write(handle->data + handle->numFds, sizeof(int)*handle->numInts);
862    return err;
863}
864
865status_t Parcel::writeFileDescriptor(int fd, bool takeOwnership)
866{
867    flat_binder_object obj;
868    obj.type = BINDER_TYPE_FD;
869    obj.flags = 0x7f | FLAT_BINDER_FLAG_ACCEPTS_FDS;
870    obj.binder = 0; /* Don't pass uninitialized stack data to a remote process */
871    obj.handle = fd;
872    obj.cookie = takeOwnership ? 1 : 0;
873    return writeObject(obj, true);
874}
875
876status_t Parcel::writeDupFileDescriptor(int fd)
877{
878    int dupFd = dup(fd);
879    if (dupFd < 0) {
880        return -errno;
881    }
882    status_t err = writeFileDescriptor(dupFd, true /*takeOwnership*/);
883    if (err) {
884        close(dupFd);
885    }
886    return err;
887}
888
889// WARNING: This method must stay in sync with
890// Parcelable.Creator<ParcelFileDescriptor> CREATOR
891// in frameworks/base/core/java/android/os/ParcelFileDescriptor.java
892status_t Parcel::writeParcelFileDescriptor(int fd, int commChannel) {
893    status_t status;
894
895    if (fd < 0) {
896        status = writeInt32(0); // ParcelFileDescriptor is null
897        if (status) return status;
898    } else {
899        status = writeInt32(1); // ParcelFileDescriptor is not null
900        if (status) return status;
901        status = writeDupFileDescriptor(fd);
902        if (status) return status;
903        if (commChannel < 0) {
904            status = writeInt32(0); // commChannel is null
905            if (status) return status;
906        } else {
907            status = writeInt32(1); // commChannel is not null
908            if (status) return status;
909            status = writeDupFileDescriptor(commChannel);
910        }
911    }
912    return status;
913}
914
915status_t Parcel::writeBlob(size_t len, WritableBlob* outBlob)
916{
917    status_t status;
918
919    if (len > INT32_MAX) {
920        // don't accept size_t values which may have come from an
921        // inadvertent conversion from a negative int.
922        return BAD_VALUE;
923    }
924
925    if (!mAllowFds || len <= IN_PLACE_BLOB_LIMIT) {
926        ALOGV("writeBlob: write in place");
927        status = writeInt32(0);
928        if (status) return status;
929
930        void* ptr = writeInplace(len);
931        if (!ptr) return NO_MEMORY;
932
933        outBlob->init(false /*mapped*/, ptr, len);
934        return NO_ERROR;
935    }
936
937    ALOGV("writeBlob: write to ashmem");
938    int fd = ashmem_create_region("Parcel Blob", len);
939    if (fd < 0) return NO_MEMORY;
940
941    mBlobAshmemSize += len;
942
943    int result = ashmem_set_prot_region(fd, PROT_READ | PROT_WRITE);
944    if (result < 0) {
945        status = result;
946    } else {
947        void* ptr = ::mmap(NULL, len, PROT_READ | PROT_WRITE, MAP_SHARED, fd, 0);
948        if (ptr == MAP_FAILED) {
949            status = -errno;
950        } else {
951            result = ashmem_set_prot_region(fd, PROT_READ);
952            if (result < 0) {
953                status = result;
954            } else {
955                status = writeInt32(1);
956                if (!status) {
957                    status = writeFileDescriptor(fd, true /*takeOwnership*/);
958                    if (!status) {
959                        outBlob->init(true /*mapped*/, ptr, len);
960                        return NO_ERROR;
961                    }
962                }
963            }
964        }
965        ::munmap(ptr, len);
966    }
967    ::close(fd);
968    return status;
969}
970
971status_t Parcel::write(const FlattenableHelperInterface& val)
972{
973    status_t err;
974
975    // size if needed
976    const size_t len = val.getFlattenedSize();
977    const size_t fd_count = val.getFdCount();
978
979    if ((len > INT32_MAX) || (fd_count > INT32_MAX)) {
980        // don't accept size_t values which may have come from an
981        // inadvertent conversion from a negative int.
982        return BAD_VALUE;
983    }
984
985    err = this->writeInt32(len);
986    if (err) return err;
987
988    err = this->writeInt32(fd_count);
989    if (err) return err;
990
991    // payload
992    void* const buf = this->writeInplace(pad_size(len));
993    if (buf == NULL)
994        return BAD_VALUE;
995
996    int* fds = NULL;
997    if (fd_count) {
998        fds = new int[fd_count];
999    }
1000
1001    err = val.flatten(buf, len, fds, fd_count);
1002    for (size_t i=0 ; i<fd_count && err==NO_ERROR ; i++) {
1003        err = this->writeDupFileDescriptor( fds[i] );
1004    }
1005
1006    if (fd_count) {
1007        delete [] fds;
1008    }
1009
1010    return err;
1011}
1012
1013status_t Parcel::writeObject(const flat_binder_object& val, bool nullMetaData)
1014{
1015    const bool enoughData = (mDataPos+sizeof(val)) <= mDataCapacity;
1016    const bool enoughObjects = mObjectsSize < mObjectsCapacity;
1017    if (enoughData && enoughObjects) {
1018restart_write:
1019        *reinterpret_cast<flat_binder_object*>(mData+mDataPos) = val;
1020
1021        // Need to write meta-data?
1022        if (nullMetaData || val.binder != 0) {
1023            mObjects[mObjectsSize] = mDataPos;
1024            acquire_object(ProcessState::self(), val, this);
1025            mObjectsSize++;
1026        }
1027
1028        // remember if it's a file descriptor
1029        if (val.type == BINDER_TYPE_FD) {
1030            if (!mAllowFds) {
1031                return FDS_NOT_ALLOWED;
1032            }
1033            mHasFds = mFdsKnown = true;
1034        }
1035
1036        return finishWrite(sizeof(flat_binder_object));
1037    }
1038
1039    if (!enoughData) {
1040        const status_t err = growData(sizeof(val));
1041        if (err != NO_ERROR) return err;
1042    }
1043    if (!enoughObjects) {
1044        size_t newSize = ((mObjectsSize+2)*3)/2;
1045        binder_size_t* objects = (binder_size_t*)realloc(mObjects, newSize*sizeof(binder_size_t));
1046        if (objects == NULL) return NO_MEMORY;
1047        mObjects = objects;
1048        mObjectsCapacity = newSize;
1049    }
1050
1051    goto restart_write;
1052}
1053
1054status_t Parcel::writeNoException()
1055{
1056    return writeInt32(0);
1057}
1058
1059void Parcel::remove(size_t /*start*/, size_t /*amt*/)
1060{
1061    LOG_ALWAYS_FATAL("Parcel::remove() not yet implemented!");
1062}
1063
1064status_t Parcel::read(void* outData, size_t len) const
1065{
1066    if (len > INT32_MAX) {
1067        // don't accept size_t values which may have come from an
1068        // inadvertent conversion from a negative int.
1069        return BAD_VALUE;
1070    }
1071
1072    if ((mDataPos+pad_size(len)) >= mDataPos && (mDataPos+pad_size(len)) <= mDataSize
1073            && len <= pad_size(len)) {
1074        memcpy(outData, mData+mDataPos, len);
1075        mDataPos += pad_size(len);
1076        ALOGV("read Setting data pos of %p to %zu", this, mDataPos);
1077        return NO_ERROR;
1078    }
1079    return NOT_ENOUGH_DATA;
1080}
1081
1082const void* Parcel::readInplace(size_t len) const
1083{
1084    if (len > INT32_MAX) {
1085        // don't accept size_t values which may have come from an
1086        // inadvertent conversion from a negative int.
1087        return NULL;
1088    }
1089
1090    if ((mDataPos+pad_size(len)) >= mDataPos && (mDataPos+pad_size(len)) <= mDataSize
1091            && len <= pad_size(len)) {
1092        const void* data = mData+mDataPos;
1093        mDataPos += pad_size(len);
1094        ALOGV("readInplace Setting data pos of %p to %zu", this, mDataPos);
1095        return data;
1096    }
1097    return NULL;
1098}
1099
1100template<class T>
1101status_t Parcel::readAligned(T *pArg) const {
1102    COMPILE_TIME_ASSERT_FUNCTION_SCOPE(PAD_SIZE_UNSAFE(sizeof(T)) == sizeof(T));
1103
1104    if ((mDataPos+sizeof(T)) <= mDataSize) {
1105        const void* data = mData+mDataPos;
1106        mDataPos += sizeof(T);
1107        *pArg =  *reinterpret_cast<const T*>(data);
1108        return NO_ERROR;
1109    } else {
1110        return NOT_ENOUGH_DATA;
1111    }
1112}
1113
1114template<class T>
1115T Parcel::readAligned() const {
1116    T result;
1117    if (readAligned(&result) != NO_ERROR) {
1118        result = 0;
1119    }
1120
1121    return result;
1122}
1123
1124template<class T>
1125status_t Parcel::writeAligned(T val) {
1126    COMPILE_TIME_ASSERT_FUNCTION_SCOPE(PAD_SIZE_UNSAFE(sizeof(T)) == sizeof(T));
1127
1128    if ((mDataPos+sizeof(val)) <= mDataCapacity) {
1129restart_write:
1130        *reinterpret_cast<T*>(mData+mDataPos) = val;
1131        return finishWrite(sizeof(val));
1132    }
1133
1134    status_t err = growData(sizeof(val));
1135    if (err == NO_ERROR) goto restart_write;
1136    return err;
1137}
1138
1139status_t Parcel::readInt32(int32_t *pArg) const
1140{
1141    return readAligned(pArg);
1142}
1143
1144int32_t Parcel::readInt32() const
1145{
1146    return readAligned<int32_t>();
1147}
1148
1149status_t Parcel::readUint32(uint32_t *pArg) const
1150{
1151    return readAligned(pArg);
1152}
1153
1154uint32_t Parcel::readUint32() const
1155{
1156    return readAligned<uint32_t>();
1157}
1158
1159status_t Parcel::readInt64(int64_t *pArg) const
1160{
1161    return readAligned(pArg);
1162}
1163
1164
1165int64_t Parcel::readInt64() const
1166{
1167    return readAligned<int64_t>();
1168}
1169
1170status_t Parcel::readUint64(uint64_t *pArg) const
1171{
1172    return readAligned(pArg);
1173}
1174
1175uint64_t Parcel::readUint64() const
1176{
1177    return readAligned<uint64_t>();
1178}
1179
1180status_t Parcel::readPointer(uintptr_t *pArg) const
1181{
1182    status_t ret;
1183    binder_uintptr_t ptr;
1184    ret = readAligned(&ptr);
1185    if (!ret)
1186        *pArg = ptr;
1187    return ret;
1188}
1189
1190uintptr_t Parcel::readPointer() const
1191{
1192    return readAligned<binder_uintptr_t>();
1193}
1194
1195
1196status_t Parcel::readFloat(float *pArg) const
1197{
1198    return readAligned(pArg);
1199}
1200
1201
1202float Parcel::readFloat() const
1203{
1204    return readAligned<float>();
1205}
1206
1207#if defined(__mips__) && defined(__mips_hard_float)
1208
1209status_t Parcel::readDouble(double *pArg) const
1210{
1211    union {
1212      double d;
1213      unsigned long long ll;
1214    } u;
1215    u.d = 0;
1216    status_t status;
1217    status = readAligned(&u.ll);
1218    *pArg = u.d;
1219    return status;
1220}
1221
1222double Parcel::readDouble() const
1223{
1224    union {
1225      double d;
1226      unsigned long long ll;
1227    } u;
1228    u.ll = readAligned<unsigned long long>();
1229    return u.d;
1230}
1231
1232#else
1233
1234status_t Parcel::readDouble(double *pArg) const
1235{
1236    return readAligned(pArg);
1237}
1238
1239double Parcel::readDouble() const
1240{
1241    return readAligned<double>();
1242}
1243
1244#endif
1245
1246status_t Parcel::readIntPtr(intptr_t *pArg) const
1247{
1248    return readAligned(pArg);
1249}
1250
1251
1252intptr_t Parcel::readIntPtr() const
1253{
1254    return readAligned<intptr_t>();
1255}
1256
1257
1258const char* Parcel::readCString() const
1259{
1260    const size_t avail = mDataSize-mDataPos;
1261    if (avail > 0) {
1262        const char* str = reinterpret_cast<const char*>(mData+mDataPos);
1263        // is the string's trailing NUL within the parcel's valid bounds?
1264        const char* eos = reinterpret_cast<const char*>(memchr(str, 0, avail));
1265        if (eos) {
1266            const size_t len = eos - str;
1267            mDataPos += pad_size(len+1);
1268            ALOGV("readCString Setting data pos of %p to %zu", this, mDataPos);
1269            return str;
1270        }
1271    }
1272    return NULL;
1273}
1274
1275String8 Parcel::readString8() const
1276{
1277    int32_t size = readInt32();
1278    // watch for potential int overflow adding 1 for trailing NUL
1279    if (size > 0 && size < INT32_MAX) {
1280        const char* str = (const char*)readInplace(size+1);
1281        if (str) return String8(str, size);
1282    }
1283    return String8();
1284}
1285
1286String16 Parcel::readString16() const
1287{
1288    size_t len;
1289    const char16_t* str = readString16Inplace(&len);
1290    if (str) return String16(str, len);
1291    ALOGE("Reading a NULL string not supported here.");
1292    return String16();
1293}
1294
1295const char16_t* Parcel::readString16Inplace(size_t* outLen) const
1296{
1297    int32_t size = readInt32();
1298    // watch for potential int overflow from size+1
1299    if (size >= 0 && size < INT32_MAX) {
1300        *outLen = size;
1301        const char16_t* str = (const char16_t*)readInplace((size+1)*sizeof(char16_t));
1302        if (str != NULL) {
1303            return str;
1304        }
1305    }
1306    *outLen = 0;
1307    return NULL;
1308}
1309
1310sp<IBinder> Parcel::readStrongBinder() const
1311{
1312    sp<IBinder> val;
1313    unflatten_binder(ProcessState::self(), *this, &val);
1314    return val;
1315}
1316
1317wp<IBinder> Parcel::readWeakBinder() const
1318{
1319    wp<IBinder> val;
1320    unflatten_binder(ProcessState::self(), *this, &val);
1321    return val;
1322}
1323
1324int32_t Parcel::readExceptionCode() const
1325{
1326  int32_t exception_code = readAligned<int32_t>();
1327  if (exception_code == EX_HAS_REPLY_HEADER) {
1328    int32_t header_start = dataPosition();
1329    int32_t header_size = readAligned<int32_t>();
1330    // Skip over fat responses headers.  Not used (or propagated) in
1331    // native code
1332    setDataPosition(header_start + header_size);
1333    // And fat response headers are currently only used when there are no
1334    // exceptions, so return no error:
1335    return 0;
1336  }
1337  return exception_code;
1338}
1339
1340native_handle* Parcel::readNativeHandle() const
1341{
1342    int numFds, numInts;
1343    status_t err;
1344    err = readInt32(&numFds);
1345    if (err != NO_ERROR) return 0;
1346    err = readInt32(&numInts);
1347    if (err != NO_ERROR) return 0;
1348
1349    native_handle* h = native_handle_create(numFds, numInts);
1350    if (!h) {
1351        return 0;
1352    }
1353
1354    for (int i=0 ; err==NO_ERROR && i<numFds ; i++) {
1355        h->data[i] = dup(readFileDescriptor());
1356        if (h->data[i] < 0) err = BAD_VALUE;
1357    }
1358    err = read(h->data + numFds, sizeof(int)*numInts);
1359    if (err != NO_ERROR) {
1360        native_handle_close(h);
1361        native_handle_delete(h);
1362        h = 0;
1363    }
1364    return h;
1365}
1366
1367
1368int Parcel::readFileDescriptor() const
1369{
1370    const flat_binder_object* flat = readObject(true);
1371    if (flat) {
1372        switch (flat->type) {
1373            case BINDER_TYPE_FD:
1374                //ALOGI("Returning file descriptor %ld from parcel %p", flat->handle, this);
1375                return flat->handle;
1376        }
1377    }
1378    return BAD_TYPE;
1379}
1380
1381// WARNING: This method must stay in sync with writeToParcel()
1382// in frameworks/base/core/java/android/os/ParcelFileDescriptor.java
1383int Parcel::readParcelFileDescriptor(int& outCommChannel) const {
1384    int fd;
1385    outCommChannel = -1;
1386
1387    if (readInt32() == 0) {
1388        fd = -1;
1389    } else {
1390        fd = readFileDescriptor();
1391        if (fd >= 0 && readInt32() != 0) {
1392            outCommChannel = readFileDescriptor();
1393        }
1394    }
1395    return fd;
1396}
1397
1398status_t Parcel::readBlob(size_t len, ReadableBlob* outBlob) const
1399{
1400    int32_t useAshmem;
1401    status_t status = readInt32(&useAshmem);
1402    if (status) return status;
1403
1404    if (!useAshmem) {
1405        ALOGV("readBlob: read in place");
1406        const void* ptr = readInplace(len);
1407        if (!ptr) return BAD_VALUE;
1408
1409        outBlob->init(false /*mapped*/, const_cast<void*>(ptr), len);
1410        return NO_ERROR;
1411    }
1412
1413    ALOGV("readBlob: read from ashmem");
1414    int fd = readFileDescriptor();
1415    if (fd == int(BAD_TYPE)) return BAD_VALUE;
1416
1417    void* ptr = ::mmap(NULL, len, PROT_READ, MAP_SHARED, fd, 0);
1418    if (ptr == MAP_FAILED) return NO_MEMORY;
1419
1420    outBlob->init(true /*mapped*/, ptr, len);
1421    return NO_ERROR;
1422}
1423
1424status_t Parcel::read(FlattenableHelperInterface& val) const
1425{
1426    // size
1427    const size_t len = this->readInt32();
1428    const size_t fd_count = this->readInt32();
1429
1430    if (len > INT32_MAX) {
1431        // don't accept size_t values which may have come from an
1432        // inadvertent conversion from a negative int.
1433        return BAD_VALUE;
1434    }
1435
1436    // payload
1437    void const* const buf = this->readInplace(pad_size(len));
1438    if (buf == NULL)
1439        return BAD_VALUE;
1440
1441    int* fds = NULL;
1442    if (fd_count) {
1443        fds = new int[fd_count];
1444    }
1445
1446    status_t err = NO_ERROR;
1447    for (size_t i=0 ; i<fd_count && err==NO_ERROR ; i++) {
1448        fds[i] = dup(this->readFileDescriptor());
1449        if (fds[i] < 0) {
1450            err = BAD_VALUE;
1451            ALOGE("dup() failed in Parcel::read, i is %zu, fds[i] is %d, fd_count is %zu, error: %s",
1452                i, fds[i], fd_count, strerror(errno));
1453        }
1454    }
1455
1456    if (err == NO_ERROR) {
1457        err = val.unflatten(buf, len, fds, fd_count);
1458    }
1459
1460    if (fd_count) {
1461        delete [] fds;
1462    }
1463
1464    return err;
1465}
1466const flat_binder_object* Parcel::readObject(bool nullMetaData) const
1467{
1468    const size_t DPOS = mDataPos;
1469    if ((DPOS+sizeof(flat_binder_object)) <= mDataSize) {
1470        const flat_binder_object* obj
1471                = reinterpret_cast<const flat_binder_object*>(mData+DPOS);
1472        mDataPos = DPOS + sizeof(flat_binder_object);
1473        if (!nullMetaData && (obj->cookie == 0 && obj->binder == 0)) {
1474            // When transferring a NULL object, we don't write it into
1475            // the object list, so we don't want to check for it when
1476            // reading.
1477            ALOGV("readObject Setting data pos of %p to %zu", this, mDataPos);
1478            return obj;
1479        }
1480
1481        // Ensure that this object is valid...
1482        binder_size_t* const OBJS = mObjects;
1483        const size_t N = mObjectsSize;
1484        size_t opos = mNextObjectHint;
1485
1486        if (N > 0) {
1487            ALOGV("Parcel %p looking for obj at %zu, hint=%zu",
1488                 this, DPOS, opos);
1489
1490            // Start at the current hint position, looking for an object at
1491            // the current data position.
1492            if (opos < N) {
1493                while (opos < (N-1) && OBJS[opos] < DPOS) {
1494                    opos++;
1495                }
1496            } else {
1497                opos = N-1;
1498            }
1499            if (OBJS[opos] == DPOS) {
1500                // Found it!
1501                ALOGV("Parcel %p found obj %zu at index %zu with forward search",
1502                     this, DPOS, opos);
1503                mNextObjectHint = opos+1;
1504                ALOGV("readObject Setting data pos of %p to %zu", this, mDataPos);
1505                return obj;
1506            }
1507
1508            // Look backwards for it...
1509            while (opos > 0 && OBJS[opos] > DPOS) {
1510                opos--;
1511            }
1512            if (OBJS[opos] == DPOS) {
1513                // Found it!
1514                ALOGV("Parcel %p found obj %zu at index %zu with backward search",
1515                     this, DPOS, opos);
1516                mNextObjectHint = opos+1;
1517                ALOGV("readObject Setting data pos of %p to %zu", this, mDataPos);
1518                return obj;
1519            }
1520        }
1521        ALOGW("Attempt to read object from Parcel %p at offset %zu that is not in the object list",
1522             this, DPOS);
1523    }
1524    return NULL;
1525}
1526
1527void Parcel::closeFileDescriptors()
1528{
1529    size_t i = mObjectsSize;
1530    if (i > 0) {
1531        //ALOGI("Closing file descriptors for %zu objects...", i);
1532    }
1533    while (i > 0) {
1534        i--;
1535        const flat_binder_object* flat
1536            = reinterpret_cast<flat_binder_object*>(mData+mObjects[i]);
1537        if (flat->type == BINDER_TYPE_FD) {
1538            //ALOGI("Closing fd: %ld", flat->handle);
1539            close(flat->handle);
1540        }
1541    }
1542}
1543
1544uintptr_t Parcel::ipcData() const
1545{
1546    return reinterpret_cast<uintptr_t>(mData);
1547}
1548
1549size_t Parcel::ipcDataSize() const
1550{
1551    return (mDataSize > mDataPos ? mDataSize : mDataPos);
1552}
1553
1554uintptr_t Parcel::ipcObjects() const
1555{
1556    return reinterpret_cast<uintptr_t>(mObjects);
1557}
1558
1559size_t Parcel::ipcObjectsCount() const
1560{
1561    return mObjectsSize;
1562}
1563
1564void Parcel::ipcSetDataReference(const uint8_t* data, size_t dataSize,
1565    const binder_size_t* objects, size_t objectsCount, release_func relFunc, void* relCookie)
1566{
1567    binder_size_t minOffset = 0;
1568    freeDataNoInit();
1569    mError = NO_ERROR;
1570    mData = const_cast<uint8_t*>(data);
1571    mDataSize = mDataCapacity = dataSize;
1572    //ALOGI("setDataReference Setting data size of %p to %lu (pid=%d)", this, mDataSize, getpid());
1573    mDataPos = 0;
1574    ALOGV("setDataReference Setting data pos of %p to %zu", this, mDataPos);
1575    mObjects = const_cast<binder_size_t*>(objects);
1576    mObjectsSize = mObjectsCapacity = objectsCount;
1577    mNextObjectHint = 0;
1578    mOwner = relFunc;
1579    mOwnerCookie = relCookie;
1580    for (size_t i = 0; i < mObjectsSize; i++) {
1581        binder_size_t offset = mObjects[i];
1582        if (offset < minOffset) {
1583            ALOGE("%s: bad object offset %" PRIu64 " < %" PRIu64 "\n",
1584                  __func__, (uint64_t)offset, (uint64_t)minOffset);
1585            mObjectsSize = 0;
1586            break;
1587        }
1588        minOffset = offset + sizeof(flat_binder_object);
1589    }
1590    scanForFds();
1591}
1592
1593void Parcel::print(TextOutput& to, uint32_t /*flags*/) const
1594{
1595    to << "Parcel(";
1596
1597    if (errorCheck() != NO_ERROR) {
1598        const status_t err = errorCheck();
1599        to << "Error: " << (void*)(intptr_t)err << " \"" << strerror(-err) << "\"";
1600    } else if (dataSize() > 0) {
1601        const uint8_t* DATA = data();
1602        to << indent << HexDump(DATA, dataSize()) << dedent;
1603        const binder_size_t* OBJS = objects();
1604        const size_t N = objectsCount();
1605        for (size_t i=0; i<N; i++) {
1606            const flat_binder_object* flat
1607                = reinterpret_cast<const flat_binder_object*>(DATA+OBJS[i]);
1608            to << endl << "Object #" << i << " @ " << (void*)OBJS[i] << ": "
1609                << TypeCode(flat->type & 0x7f7f7f00)
1610                << " = " << flat->binder;
1611        }
1612    } else {
1613        to << "NULL";
1614    }
1615
1616    to << ")";
1617}
1618
1619void Parcel::releaseObjects()
1620{
1621    const sp<ProcessState> proc(ProcessState::self());
1622    size_t i = mObjectsSize;
1623    uint8_t* const data = mData;
1624    binder_size_t* const objects = mObjects;
1625    while (i > 0) {
1626        i--;
1627        const flat_binder_object* flat
1628            = reinterpret_cast<flat_binder_object*>(data+objects[i]);
1629        release_object(proc, *flat, this);
1630    }
1631}
1632
1633void Parcel::acquireObjects()
1634{
1635    const sp<ProcessState> proc(ProcessState::self());
1636    size_t i = mObjectsSize;
1637    uint8_t* const data = mData;
1638    binder_size_t* const objects = mObjects;
1639    while (i > 0) {
1640        i--;
1641        const flat_binder_object* flat
1642            = reinterpret_cast<flat_binder_object*>(data+objects[i]);
1643        acquire_object(proc, *flat, this);
1644    }
1645}
1646
1647void Parcel::freeData()
1648{
1649    freeDataNoInit();
1650    initState();
1651}
1652
1653void Parcel::freeDataNoInit()
1654{
1655    if (mOwner) {
1656        LOG_ALLOC("Parcel %p: freeing other owner data", this);
1657        //ALOGI("Freeing data ref of %p (pid=%d)", this, getpid());
1658        mOwner(this, mData, mDataSize, mObjects, mObjectsSize, mOwnerCookie);
1659    } else {
1660        LOG_ALLOC("Parcel %p: freeing allocated data", this);
1661        releaseObjects();
1662        if (mData) {
1663            LOG_ALLOC("Parcel %p: freeing with %zu capacity", this, mDataCapacity);
1664            pthread_mutex_lock(&gParcelGlobalAllocSizeLock);
1665            gParcelGlobalAllocSize -= mDataCapacity;
1666            gParcelGlobalAllocCount--;
1667            pthread_mutex_unlock(&gParcelGlobalAllocSizeLock);
1668            free(mData);
1669        }
1670        if (mObjects) free(mObjects);
1671    }
1672}
1673
1674status_t Parcel::growData(size_t len)
1675{
1676    if (len > INT32_MAX) {
1677        // don't accept size_t values which may have come from an
1678        // inadvertent conversion from a negative int.
1679        return BAD_VALUE;
1680    }
1681
1682    size_t newSize = ((mDataSize+len)*3)/2;
1683    return (newSize <= mDataSize)
1684            ? (status_t) NO_MEMORY
1685            : continueWrite(newSize);
1686}
1687
1688status_t Parcel::restartWrite(size_t desired)
1689{
1690    if (desired > INT32_MAX) {
1691        // don't accept size_t values which may have come from an
1692        // inadvertent conversion from a negative int.
1693        return BAD_VALUE;
1694    }
1695
1696    if (mOwner) {
1697        freeData();
1698        return continueWrite(desired);
1699    }
1700
1701    uint8_t* data = (uint8_t*)realloc(mData, desired);
1702    if (!data && desired > mDataCapacity) {
1703        mError = NO_MEMORY;
1704        return NO_MEMORY;
1705    }
1706
1707    releaseObjects();
1708
1709    if (data) {
1710        LOG_ALLOC("Parcel %p: restart from %zu to %zu capacity", this, mDataCapacity, desired);
1711        pthread_mutex_lock(&gParcelGlobalAllocSizeLock);
1712        gParcelGlobalAllocSize += desired;
1713        gParcelGlobalAllocSize -= mDataCapacity;
1714        pthread_mutex_unlock(&gParcelGlobalAllocSizeLock);
1715        mData = data;
1716        mDataCapacity = desired;
1717    }
1718
1719    mDataSize = mDataPos = 0;
1720    ALOGV("restartWrite Setting data size of %p to %zu", this, mDataSize);
1721    ALOGV("restartWrite Setting data pos of %p to %zu", this, mDataPos);
1722
1723    free(mObjects);
1724    mObjects = NULL;
1725    mObjectsSize = mObjectsCapacity = 0;
1726    mNextObjectHint = 0;
1727    mHasFds = false;
1728    mFdsKnown = true;
1729    mAllowFds = true;
1730
1731    return NO_ERROR;
1732}
1733
1734status_t Parcel::continueWrite(size_t desired)
1735{
1736    if (desired > INT32_MAX) {
1737        // don't accept size_t values which may have come from an
1738        // inadvertent conversion from a negative int.
1739        return BAD_VALUE;
1740    }
1741
1742    // If shrinking, first adjust for any objects that appear
1743    // after the new data size.
1744    size_t objectsSize = mObjectsSize;
1745    if (desired < mDataSize) {
1746        if (desired == 0) {
1747            objectsSize = 0;
1748        } else {
1749            while (objectsSize > 0) {
1750                if (mObjects[objectsSize-1] < desired)
1751                    break;
1752                objectsSize--;
1753            }
1754        }
1755    }
1756
1757    if (mOwner) {
1758        // If the size is going to zero, just release the owner's data.
1759        if (desired == 0) {
1760            freeData();
1761            return NO_ERROR;
1762        }
1763
1764        // If there is a different owner, we need to take
1765        // posession.
1766        uint8_t* data = (uint8_t*)malloc(desired);
1767        if (!data) {
1768            mError = NO_MEMORY;
1769            return NO_MEMORY;
1770        }
1771        binder_size_t* objects = NULL;
1772
1773        if (objectsSize) {
1774            objects = (binder_size_t*)calloc(objectsSize, sizeof(binder_size_t));
1775            if (!objects) {
1776                free(data);
1777
1778                mError = NO_MEMORY;
1779                return NO_MEMORY;
1780            }
1781
1782            // Little hack to only acquire references on objects
1783            // we will be keeping.
1784            size_t oldObjectsSize = mObjectsSize;
1785            mObjectsSize = objectsSize;
1786            acquireObjects();
1787            mObjectsSize = oldObjectsSize;
1788        }
1789
1790        if (mData) {
1791            memcpy(data, mData, mDataSize < desired ? mDataSize : desired);
1792        }
1793        if (objects && mObjects) {
1794            memcpy(objects, mObjects, objectsSize*sizeof(binder_size_t));
1795        }
1796        //ALOGI("Freeing data ref of %p (pid=%d)", this, getpid());
1797        mOwner(this, mData, mDataSize, mObjects, mObjectsSize, mOwnerCookie);
1798        mOwner = NULL;
1799
1800        LOG_ALLOC("Parcel %p: taking ownership of %zu capacity", this, desired);
1801        pthread_mutex_lock(&gParcelGlobalAllocSizeLock);
1802        gParcelGlobalAllocSize += desired;
1803        gParcelGlobalAllocCount++;
1804        pthread_mutex_unlock(&gParcelGlobalAllocSizeLock);
1805
1806        mData = data;
1807        mObjects = objects;
1808        mDataSize = (mDataSize < desired) ? mDataSize : desired;
1809        ALOGV("continueWrite Setting data size of %p to %zu", this, mDataSize);
1810        mDataCapacity = desired;
1811        mObjectsSize = mObjectsCapacity = objectsSize;
1812        mNextObjectHint = 0;
1813
1814    } else if (mData) {
1815        if (objectsSize < mObjectsSize) {
1816            // Need to release refs on any objects we are dropping.
1817            const sp<ProcessState> proc(ProcessState::self());
1818            for (size_t i=objectsSize; i<mObjectsSize; i++) {
1819                const flat_binder_object* flat
1820                    = reinterpret_cast<flat_binder_object*>(mData+mObjects[i]);
1821                if (flat->type == BINDER_TYPE_FD) {
1822                    // will need to rescan because we may have lopped off the only FDs
1823                    mFdsKnown = false;
1824                }
1825                release_object(proc, *flat, this);
1826            }
1827            binder_size_t* objects =
1828                (binder_size_t*)realloc(mObjects, objectsSize*sizeof(binder_size_t));
1829            if (objects) {
1830                mObjects = objects;
1831            }
1832            mObjectsSize = objectsSize;
1833            mNextObjectHint = 0;
1834        }
1835
1836        // We own the data, so we can just do a realloc().
1837        if (desired > mDataCapacity) {
1838            uint8_t* data = (uint8_t*)realloc(mData, desired);
1839            if (data) {
1840                LOG_ALLOC("Parcel %p: continue from %zu to %zu capacity", this, mDataCapacity,
1841                        desired);
1842                pthread_mutex_lock(&gParcelGlobalAllocSizeLock);
1843                gParcelGlobalAllocSize += desired;
1844                gParcelGlobalAllocSize -= mDataCapacity;
1845                pthread_mutex_unlock(&gParcelGlobalAllocSizeLock);
1846                mData = data;
1847                mDataCapacity = desired;
1848            } else if (desired > mDataCapacity) {
1849                mError = NO_MEMORY;
1850                return NO_MEMORY;
1851            }
1852        } else {
1853            if (mDataSize > desired) {
1854                mDataSize = desired;
1855                ALOGV("continueWrite Setting data size of %p to %zu", this, mDataSize);
1856            }
1857            if (mDataPos > desired) {
1858                mDataPos = desired;
1859                ALOGV("continueWrite Setting data pos of %p to %zu", this, mDataPos);
1860            }
1861        }
1862
1863    } else {
1864        // This is the first data.  Easy!
1865        uint8_t* data = (uint8_t*)malloc(desired);
1866        if (!data) {
1867            mError = NO_MEMORY;
1868            return NO_MEMORY;
1869        }
1870
1871        if(!(mDataCapacity == 0 && mObjects == NULL
1872             && mObjectsCapacity == 0)) {
1873            ALOGE("continueWrite: %zu/%p/%zu/%zu", mDataCapacity, mObjects, mObjectsCapacity, desired);
1874        }
1875
1876        LOG_ALLOC("Parcel %p: allocating with %zu capacity", this, desired);
1877        pthread_mutex_lock(&gParcelGlobalAllocSizeLock);
1878        gParcelGlobalAllocSize += desired;
1879        gParcelGlobalAllocCount++;
1880        pthread_mutex_unlock(&gParcelGlobalAllocSizeLock);
1881
1882        mData = data;
1883        mDataSize = mDataPos = 0;
1884        ALOGV("continueWrite Setting data size of %p to %zu", this, mDataSize);
1885        ALOGV("continueWrite Setting data pos of %p to %zu", this, mDataPos);
1886        mDataCapacity = desired;
1887    }
1888
1889    return NO_ERROR;
1890}
1891
1892void Parcel::initState()
1893{
1894    LOG_ALLOC("Parcel %p: initState", this);
1895    mError = NO_ERROR;
1896    mData = 0;
1897    mDataSize = 0;
1898    mDataCapacity = 0;
1899    mDataPos = 0;
1900    ALOGV("initState Setting data size of %p to %zu", this, mDataSize);
1901    ALOGV("initState Setting data pos of %p to %zu", this, mDataPos);
1902    mObjects = NULL;
1903    mObjectsSize = 0;
1904    mObjectsCapacity = 0;
1905    mNextObjectHint = 0;
1906    mHasFds = false;
1907    mFdsKnown = true;
1908    mAllowFds = true;
1909    mOwner = NULL;
1910    mBlobAshmemSize = 0;
1911}
1912
1913void Parcel::scanForFds() const
1914{
1915    bool hasFds = false;
1916    for (size_t i=0; i<mObjectsSize; i++) {
1917        const flat_binder_object* flat
1918            = reinterpret_cast<const flat_binder_object*>(mData + mObjects[i]);
1919        if (flat->type == BINDER_TYPE_FD) {
1920            hasFds = true;
1921            break;
1922        }
1923    }
1924    mHasFds = hasFds;
1925    mFdsKnown = true;
1926}
1927
1928size_t Parcel::getBlobAshmemSize() const
1929{
1930    return mBlobAshmemSize;
1931}
1932
1933// --- Parcel::Blob ---
1934
1935Parcel::Blob::Blob() :
1936        mMapped(false), mData(NULL), mSize(0) {
1937}
1938
1939Parcel::Blob::~Blob() {
1940    release();
1941}
1942
1943void Parcel::Blob::release() {
1944    if (mMapped && mData) {
1945        ::munmap(mData, mSize);
1946    }
1947    clear();
1948}
1949
1950void Parcel::Blob::init(bool mapped, void* data, size_t size) {
1951    mMapped = mapped;
1952    mData = data;
1953    mSize = size;
1954}
1955
1956void Parcel::Blob::clear() {
1957    mMapped = false;
1958    mData = NULL;
1959    mSize = 0;
1960}
1961
1962}; // namespace android
1963