securityd-26232.tar.gz

[apple/securityd.git] / src / transwalkers.h

/*
 * Copyright (c) 2003-2004 Apple Computer, Inc. All Rights Reserved.
 * 
 * @APPLE_LICENSE_HEADER_START@
 * 
 * This file contains Original Code and/or Modifications of Original Code
 * as defined in and that are subject to the Apple Public Source License
 * Version 2.0 (the 'License'). You may not use this file except in
 * compliance with the License. Please obtain a copy of the License at
 * http://www.opensource.apple.com/apsl/ and read it before using this
 * file.
 * 
 * The Original Code and all software distributed under the License are
 * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
 * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
 * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
 * Please see the License for the specific language governing rights and
 * limitations under the License.
 * 
 * @APPLE_LICENSE_HEADER_END@
 */


//
// transwalkers - server side transition data walking support
//
// These are data walker operators for securely marshaling and unmarshaling
// data structures across IPC. They are also in charge of fixing byte order
// inconsistencies between server and clients.
//
#ifndef _H_TRANSWALKERS
#define _H_TRANSWALKERS

#include <security_cdsa_utilities/AuthorizationWalkers.h>
#include "flippers.h"
#include "server.h"
#include <security_cdsa_utilities/context.h>
        
using LowLevelMemoryUtilities::increment;
using LowLevelMemoryUtilities::difference;


//
// Should we flip data?
// This looks at the current client's process information (a thread-global state)
// to determine flip status. Valid (only) within BEGIN_IPC/END_IPC brackets.
//
bool flipClient();


//
// A CheckingReconstituteWalker is a variant of an ordinary ReconstituteWalker
// that checks object pointers and sizes against the incoming block limits.
// It throws an exception if incoming data has pointers outside the incoming block.
// This avoids trouble inside of securityd caused (by bug or malice)
// from someone spoofing the client access side.
//
class CheckingReconstituteWalker {
private:
        void check(void *addr, size_t size)
        {
                if (addr < mBase || increment(addr, size) > mLimit)
                        CssmError::throwMe(CSSM_ERRCODE_INVALID_POINTER);
        }

public:
    CheckingReconstituteWalker(void *ptr, void *base, size_t size, bool flip);
        
        template <class T>
        void operator () (T &obj, size_t size = sizeof(T))
        {
                check(increment(&obj, -mOffset), size);
                if (mFlip)
                        Flippers::flip(obj);
        }

    template <class T>
    void operator () (T * &addr, size_t size = sizeof(T))
    {
                DEBUGWALK("checkreconst:ptr");
        if (addr) {
                        // process the pointer
                        void *p = addr;
                        blob(p, size);
                        addr = reinterpret_cast<T *>(p);

                        // now flip the contents
                        if (mFlip)
                                Flippers::flip(*addr);
                }
    }
        
        template <class T>
        void blob(T * &addr, size_t size)
        {
                DEBUGWALK("checkreconst:blob");
                if (addr) {
                        // flip the address (the pointer itself)
                        if (mFlip) {
                                secdebug("flippers", "flipping %s@%p", Debug::typeName(addr).c_str(), addr);
                                Flippers::flip(addr);
                        }
                        
                        // check the address against the transmitted bounds
                        check(addr, size);
                        
                        // relocate it
            addr = increment<T>(addr, mOffset);
                }
    }
        
    static const bool needsRelinking = true;
    static const bool needsSize = false;
    
private:
        void *mBase;                    // old base address
        void *mLimit;                   // old last byte address + 1
    off_t mOffset;                      // relocation offset
        bool mFlip;                             // apply byte order flipping
};


//
// Process an incoming (IPC) data blob of type T.
// This relocates pointers to fit in the local address space,
// and fixes byte order issues as needed.
//
template <class T>
void relocate(T *obj, T *base, size_t size)
{
    if (obj) {
                if (base == NULL)       // invalid, could confuse walkers
                        CssmError::throwMe(CSSM_ERRCODE_INVALID_POINTER);
        CheckingReconstituteWalker relocator(obj, base, size,
                        Server::process().byteFlipped());
        walk(relocator, base);
    }
}


//
// Special handling for incoming CSSM contexts.
//
void relocate(Context &context, void *base, Context::Attr *attrs, uint32 attrSize);


//
// A FlipWalker is a walker operator that collects its direct invocations
// into a set of memory objects. These objects can then collectively be
// byte-flipped (exactly once :-) at the flick of a method.
//
class FlipWalker {
private:
        struct Base {
                virtual ~Base() { }
                virtual void flip() const = 0;
        };

        template <class T>
        struct FlipRef : public Base {
                T &obj;
                FlipRef(T &s) : obj(s)          { }
                void flip() const                       { Flippers::flip(obj); }
        };

        template <class T>
        struct FlipPtr : public Base {
                T * &obj;
                FlipPtr(T * &s) : obj(s)        { }
                void flip() const                       { Flippers::flip(*obj); Flippers::flip(obj); }
        };

        template <class T>
        struct FlipBlob : public Base {
                T * &obj;
                FlipBlob(T * &s) : obj(s)       { }
                void flip() const                       { Flippers::flip(obj); }
        };
        
        struct Flipper {
                Base *impl;
                Flipper(Base *p) : impl(p)      { }
                bool operator < (const Flipper &other) const
                        { return impl < other.impl; }
        };
        
public:
        ~FlipWalker();
        void doFlips(bool active = true);
        
        template <class T>
        void operator () (T &obj, size_t = sizeof(T))
        { mFlips.insert(new FlipRef<T>(obj)); }
        
        template <class T>
        T *operator () (T * &addr, size_t size = sizeof(T))
        { mFlips.insert(new FlipPtr<T>(addr)); return addr; }
        
        template <class T>
        void blob(T * &addr, size_t size)
        { mFlips.insert(new FlipBlob<T>(addr)); }
        
        static const bool needsRelinking = true;
        static const bool needsSize = true;
        
private:
        set<Flipper> mFlips;
};


//
// A raw flip, conditioned on the client's flip state
//
template <class T>
void flip(T &addr)
{
        if (flipClient()) {
                secdebug("flippers", "raw flipping %s", Debug::typeName(addr).c_str());
                Flippers::flip(addr);
        }
}


//
// Take an object at value, flip it, and return appropriately flipped
// addr/base pointers ready to be returned through IPC.
// Note that this doesn't set the outgoing length (aka 'fooLength') field.
//
template <class T>
void flips(T *value, T ** &addr, T ** &base)
{
        *addr = *base = value;
        if (flipClient()) {
                FlipWalker w;           // collector
                walk(w, value);         // collect all flippings needed
                w.doFlips();            // execute flips (flips value but leaves addr alone)
                Flippers::flip(*base); // flip base (so it arrives right side up)
        }
}


//
// Take a DATA type RPC argument purportedly representing a Blob of some kind,
// turn it into a Blob, and fail properly if it's not kosher.
//
template <class BlobType>
const BlobType *makeBlob(const CssmData &blobData, CSSM_RETURN error = CSSM_ERRCODE_INVALID_DATA)
{
        if (!blobData.data() || blobData.length() < sizeof(BlobType))
                CssmError::throwMe(error);
        const BlobType *blob = static_cast<const BlobType *>(blobData.data());
        if (blob->totalLength != blobData.length())
                CssmError::throwMe(error);
        return blob;
}


//
// An OutputData object will take memory allocated within securityd,
// hand it to the MIG return-output parameters, and schedule it to be released
// after the MIG reply has been sent. It will also get rid of it in case of
// error.
//
class OutputData : public CssmData {
public:
        OutputData(void **outP, mach_msg_type_number_t *outLength)
                : mData(*outP), mLength(*outLength) { }
        ~OutputData()
        { mData = data(); mLength = length(); Server::releaseWhenDone(mData); }
    
    void operator = (const CssmData &source)
    { CssmData::operator = (source); }
        
private:
        void * &mData;
        mach_msg_type_number_t &mLength;
};


//
// Choose a Database from a choice of two sources, giving preference
// to persistent stores and to earlier sources.
//
Database *pickDb(Database *db1, Database *db2);

static inline Database *dbOf(Key *key)  { return key ? &key->database() : NULL; }

inline Database *pickDb(Key *k1, Key *k2) { return pickDb(dbOf(k1), dbOf(k2)); }
inline Database *pickDb(Database *db1, Key *k2) { return pickDb(db1, dbOf(k2)); }
inline Database *pickDb(Key *k1, Database *db2) { return pickDb(dbOf(k1), db2); }


#endif //_H_TRANSWALKERS