diff options
Diffstat (limited to 'include/mach/flick_mach3_glue.h')
| -rw-r--r-- | include/mach/flick_mach3_glue.h | 218 |
1 files changed, 218 insertions, 0 deletions
diff --git a/include/mach/flick_mach3_glue.h b/include/mach/flick_mach3_glue.h new file mode 100644 index 0000000..7deb620 --- /dev/null +++ b/include/mach/flick_mach3_glue.h @@ -0,0 +1,218 @@ +/* + * Copyright (c) 1995 The University of Utah and + * the Computer Systems Laboratory at the University of Utah (CSL). + * All rights reserved. + * + * Permission to use, copy, modify and distribute this software is hereby + * granted provided that (1) source code retains these copyright, permission, + * and disclaimer notices, and (2) redistributions including binaries + * reproduce the notices in supporting documentation, and (3) all advertising + * materials mentioning features or use of this software display the following + * acknowledgement: ``This product includes software developed by the + * Computer Systems Laboratory at the University of Utah.'' + * + * THE UNIVERSITY OF UTAH AND CSL ALLOW FREE USE OF THIS SOFTWARE IN ITS "AS + * IS" CONDITION. THE UNIVERSITY OF UTAH AND CSL DISCLAIM ANY LIABILITY OF + * ANY KIND FOR ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE. + * + * CSL requests users of this software to return to csl-dist@cs.utah.edu any + * improvements that they make and grant CSL redistribution rights. + * + * Author: Bryan Ford, University of Utah CSL + */ +/* + * Glue for the Flick's Mach 3 backend. (Flick := Flexible IDL Compiler Kit.) + * This file is included from every stub source code (.c) file generated by that backend. + * Stubs are built primarily out of invocations of these macros. + */ +#ifndef _MACH_FLICK_MACH3_GLUE_H_ +#define _MACH_FLICK_MACH3_GLUE_H_ + +#include <stdlib.h> +#include <string.h> +#include <mach/flick_mach3.h> + + +/*** Internal Flick data types ***/ + +/* Each client stub allocates one of these on its stack first thing, + and holds all the important generic state throughout RPC processing. */ +struct flick_mach3_rpc_desc +{ + /* This is initially set to point to init_buf, + but is dynamically re-allocated if more space is needed. */ + char *msg_buf; + vm_size_t msg_buf_size; + + /* Before calling flick_mach3_rpc(), + the client stub sets this to the offset of the end of the data it marshaled. + It always starts marshaling at offset 4*4, to leave room for a mach_msg_header + (which is actually 6*4 bytes, but overwrites the 2*4-byte marshaled IDL ID). */ + vm_size_t send_end_ofs; + + /* flick_mach3_rpc() sets these to the offset of the data to unmarshal, + and the offset of the end of the data to unmarshal, respectively. */ + vm_size_t rcv_ofs, rcv_end_ofs; + + /* The size of this buffer varies from stub to stub. */ + char init_buf[0]; +}; + +/* Each server stub allocates one of these on its stack first thing, + and holds all the important generic state throughout RPC processing. */ +struct flick_mach3_rpc_serv_desc +{ + /* This is initially set to point to init_buf, + but is dynamically re-allocated if more space is needed. */ + char *msg_buf; + vm_size_t msg_buf_size; + + /* Before calling flick_mach3_rpc(), + the client stub sets this to the offset of the end of the data it marshaled. + It always starts marshaling at offset 4*4, to leave room for a mach_msg_header + (which is actually 6*4 bytes, but overwrites the 2*4-byte marshaled IDL ID). */ + vm_size_t send_end_ofs; + + /* flick_mach3_rpc() sets these to the offset of the data to unmarshal, + and the offset of the end of the data to unmarshal, respectively. */ + vm_size_t rcv_ofs, rcv_end_ofs; + + /* The size of this buffer varies from stub to stub. */ + char init_buf[0]; +}; + + +/*** Encoding ***/ + +#define flick_mach3_encode_new_glob(max_size) \ +{ \ + while (_desc.d.send_end_ofs + (max_size) > _desc.d.msg_buf_size) \ + { \ + mach_msg_return_t result = flick_mach3_rpc_grow_buf(&_desc); \ + /*XXX result */ \ + } \ + _e_chunk = _desc.d.msg_buf + _desc.d.send_end_ofs; \ +} +#define flick_mach3_encode_end_glob(max_size) \ + _desc.d.send_end_ofs += (max_size); + +#define flick_mach3_encode_new_chunk(size) /* do nothing */ +#define flick_mach3_encode_end_chunk(size) (_e_chunk += (size)) + +#define flick_mach3_encode_prim(_ofs, _data, _name, _bits, _ctype) \ +{ \ + struct { mach_msg_type_t _t; _ctype _v; } *_p = (void*)(_e_chunk + _ofs); \ + mach_msg_type_t _tmpl = { _name, _bits, 1, 1, 0, 0 }; \ + _p->_t = _tmpl; _p->_v = (_data); \ +} + +#define flick_mach3_encode_boolean(_ofs, _data) \ + flick_mach3_encode_prim(_ofs, _data, MACH_MSG_TYPE_BOOLEAN, 32, signed32_t); + +#define flick_mach3_encode_char8(_ofs, _data) \ + flick_mach3_encode_prim(_ofs, _data, MACH_MSG_TYPE_CHAR, 8, signed8_t); +#define flick_mach3_encode_char16(_ofs, _data) \ + flick_mach3_encode_prim(_ofs, _data, MACH_MSG_TYPE_INTEGER_16, 8, signed16_t); + +#define flick_mach3_encode_signed8(_ofs, _data) \ + flick_mach3_encode_prim(_ofs, _data, MACH_MSG_TYPE_INTEGER_8, 8, signed8_t); +#define flick_mach3_encode_unsigned8(ofs, data) \ + flick_mach3_encode_prim(_ofs, _data, MACH_MSG_TYPE_INTEGER_8, 8, unsigned8_t); +#define flick_mach3_encode_signed16(_ofs, _data) \ + flick_mach3_encode_prim(_ofs, _data, MACH_MSG_TYPE_INTEGER_16, 16, signed16_t); +#define flick_mach3_encode_unsigned16(ofs, data) \ + flick_mach3_encode_prim(_ofs, _data, MACH_MSG_TYPE_INTEGER_16, 16, unsigned16_t); +#define flick_mach3_encode_signed32(_ofs, _data) \ + flick_mach3_encode_prim(_ofs, _data, MACH_MSG_TYPE_INTEGER_32, 32, signed32_t); +#define flick_mach3_encode_unsigned32(ofs, data) \ + flick_mach3_encode_prim(_ofs, _data, MACH_MSG_TYPE_INTEGER_32, 32, unsigned32_t); + +#define flick_mach3_encode_port(_ofs, _data, _adjust) \ +{ \ + if (_adjust > 1) { \ + kern_return_t res = mach_port_mod_refs(mach_task_self(), (_data), \ + MACH_PORT_RIGHT_SEND, -(_adjust-1)); \ + } \ + flick_mach3_encode_prim(_ofs, _data, \ + _adjust ? MACH_MSG_TYPE_MOVE_SEND : MACH_MSG_TYPE_COPY_SEND, \ + 32, mach_port_t); \ +} + + +/*** Decoding ***/ + +#if TypeCheck +#define flick_iftypecheck(code) code +#else +#define flick_iftypecheck(code) +#endif + +#define flick_mach3_decode_new_glob(max_size) +#define flick_mach3_decode_end_glob(max_size) + +#define flick_mach3_decode_new_chunk(size) \ +{ \ + flick_iftypecheck( \ + if (_desc.d.rcv_ofs + (size) > _d_msgsize) \ + XXX throw MIG_TYPE_ERROR; \ + ); \ + _d_chunk = _desc.d.msg_buf + _desc.d.rcv_ofs; \ +} +#define flick_mach3_decode_end_chunk(size) \ + _desc.d.rcv_ofs += (size); + +#define flick_mach3_decode_prim(_ofs, _data, _name, _bits, _ctype) \ +{ \ + struct { mach_msg_type_t _t; _ctype _v; } *_p = (void*)(_d_chunk + _ofs); \ + flick_iftypecheck( ({ \ + mach_msg_type_t _tmpl = { _name, _bits, 1, 1, 0, 0 }; \ + if (*((signed32_t*)&_tmpl) != *((signed32_t)&_p->_t)) \ + XXX throw MIG_TYPE_ERROR; \ + )} ) \ + (_data) = _p->_v; \ +} + +#define flick_mach3_decode_boolean(_ofs, _data) \ + flick_mach3_decode_prim(_ofs, _data, MACH_MSG_TYPE_BOOLEAN, 32, signed32_t); + +#define flick_mach3_decode_char8(_ofs, _data) \ + flick_mach3_decode_prim(_ofs, _data, MACH_MSG_TYPE_CHAR, 8, signed8_t); +#define flick_mach3_decode_char16(_ofs, _data) \ + flick_mach3_decode_prim(_ofs, _data, MACH_MSG_TYPE_INTEGER_16, 8, signed16_t); + +#define flick_mach3_decode_signed8(_ofs, _data) \ + flick_mach3_decode_prim(_ofs, _data, MACH_MSG_TYPE_INTEGER_8, 8, signed8_t); +#define flick_mach3_decode_unsigned8(_ofs, _data) \ + flick_mach3_decode_prim(_ofs, _data, MACH_MSG_TYPE_INTEGER_8, 8, unsigned8_t); +#define flick_mach3_decode_signed16(_ofs, _data) \ + flick_mach3_decode_prim(_ofs, _data, MACH_MSG_TYPE_INTEGER_16, 16, signed16_t); +#define flick_mach3_decode_unsigned16(_ofs, _data) \ + flick_mach3_decode_prim(_ofs, _data, MACH_MSG_TYPE_INTEGER_16, 16, unsigned16_t); +#define flick_mach3_decode_signed32(_ofs, _data) \ + flick_mach3_decode_prim(_ofs, _data, MACH_MSG_TYPE_INTEGER_32, 32, signed32_t); +#define flick_mach3_decode_unsigned32(_ofs, _data) \ + flick_mach3_decode_prim(_ofs, _data, MACH_MSG_TYPE_INTEGER_32, 32, unsigned32_t); + +#define flick_mach3_decode_port(_ofs, _data, _adjust) \ +{ \ + flick_mach3_decode_prim(_ofs, _data, MACH_MSG_TYPE_PORT_SEND, 32, mach_port_t); \ + if (_adjust != 1) { \ + kern_return_t res = mach_port_mod_refs(mach_task_self(), (_data), \ + MACH_PORT_RIGHT_SEND, _adjust-1); \ + } \ +} + + +/*** Client-side support ***/ + +mach_msg_return_t flick_mach3_rpc(struct flick_mach3_rpc_desc *rpc, + mach_port_t send_target, mach_msg_bits_t send_msgh_bits); + +#define flick_mach3_rpc_macro(iscomplex) \ +{ \ + kern_return_t result = flick_mach3_rpc(&_desc.d, _msg_request/*XXX*/, \ + (iscomplex ? MACH_MSGH_BITS_COMPLEX : 0) \ + | MACH_MSGH_BITS(MACH_MSG_TYPE_COPY_SEND, MACH_MSG_TYPE_MAKE_SEND_ONCE));\ +} + +#endif /* _MACH_FLICK_MACH3_GLUE_H_ */ |