KOALA.H
/* 
 * KOALA.H 
 * Koala Object with Custom Marshaling, Chapter 6 
 * 
 * Classes that implement the CKoala object with a custom interface 
 * to demonstrate local/remote transparency. 
 * 
 * Copyright (c)1993-1995 Microsoft Corporation, All Right Reserved 
 * 
 * Kraig Brockschmidt, Microsoft 
 * Internet  :  kraigb@microsoft.com 
 * Compuserve:  >INTERNET:kraigb@microsoft.com 
 */ 
 
 
#ifndef _KOALA_H_ 
#define _KOALA_H_ 
 
#define CHAPTER6 
#include <inole.h> 
 
 
/* 
 * Marshaling packet data structure as used by our IMarshal. 
 * This is duplicated in ..\koalaprx\koala.h. 
 */ 
typedef struct 
    { 
    HWND        hWnd;       //Message window 
    } KOALAMARSHAL, *PKOALAMARSHAL; 
 
//Intertask messages, duplicated in ..\koalaprx\koala.h. 
#define MSG_RELEASE             1000 
#define MSG_EAT                 1001 
#define MSG_SLEEP               1002 
#define MSG_PROCREATE           1003 
#define MSG_SLEEPAFTEREATING    1004 
 
 
 
//KOALA.CPP 
 
LRESULT APIENTRY ObjectWndProc(HWND, UINT, WPARAM, LPARAM); 
 
class CKoala : public IMarshal 
    { 
    friend LRESULT APIENTRY KoalaWndProc(HWND, UINT, WPARAM, LPARAM); 
 
    protected: 
        ULONG           m_cRef;         //Object reference count 
        PFNDESTROYED    m_pfnDestroy;   //To call on closure 
 
        HWND            m_hWnd;         //For marshaling 
 
        BOOL            m_fJustAte; 
        short           m_cSleepAfterEat; 
 
    public: 
        CKoala(PFNDESTROYED); 
        ~CKoala(void); 
 
        BOOL    Init(HINSTANCE, HWND); 
        DWORD   HandleCall(UINT, LPARAM); 
 
        STDMETHODIMP QueryInterface(REFIID, LPVOID *); 
        STDMETHODIMP_(ULONG) AddRef(void); 
        STDMETHODIMP_(ULONG) Release(void); 
 
        STDMETHODIMP GetUnmarshalClass(REFIID, LPVOID, DWORD 
            , LPVOID, DWORD, LPCLSID); 
        STDMETHODIMP GetMarshalSizeMax(REFIID, LPVOID, DWORD 
            , LPVOID, DWORD, LPDWORD); 
        STDMETHODIMP MarshalInterface(LPSTREAM, REFIID, LPVOID 
            , DWORD, LPVOID, DWORD); 
        STDMETHODIMP UnmarshalInterface(LPSTREAM, REFIID, LPVOID *); 
        STDMETHODIMP ReleaseMarshalData(LPSTREAM); 
        STDMETHODIMP DisconnectObject(DWORD); 
    }; 
 
typedef CKoala *PCKoala; 
 
 
#define CBOBJECTWNDEXTRA        sizeof(PCKoala) 
#define OBJECTWL_STRUCTURE      0 
 
 
#endif //_KOALA_H_