kern_return_t
exception_parse_reply(ipc_kmsg_t kmsg)
{
mig_reply_header_t *msg =
(mig_reply_header_t *) &kmsg->ikm_header;
kern_return_t kr;
if ((msg->Head.msgh_bits !=
MACH_MSGH_BITS(MACH_MSG_TYPE_PORT_SEND_ONCE, 0)) ||
(msg->Head.msgh_size != sizeof *msg) ||
(msg->Head.msgh_id != MACH_EXCEPTION_REPLY_ID) ||
(BAD_TYPECHECK(&msg->RetCodeType, &exc_RetCode_proto))) {
/*
* Bozo user sent us a misformatted reply.
*/
kmsg->ikm_header.msgh_remote_port = MACH_PORT_NULL;
ipc_kmsg_destroy(kmsg);
return MIG_REPLY_MISMATCH;
}
kr = msg->RetCode;
if ((kmsg->ikm_size == IKM_SAVED_KMSG_SIZE) &&
(ikm_cache() == IKM_NULL))
ikm_cache() = kmsg;
else
ikm_free(kmsg);
return kr;
}
/* Routine send_message */
mig_external kern_return_t Cache_send_message
(
mach_port_t send_port,
string_t message
)
{
typedef struct {
mach_msg_header_t Head;
mach_msg_type_t messageType;
string_t message;
} Request;
typedef struct {
mach_msg_header_t Head;
mach_msg_type_t RetCodeType;
kern_return_t RetCode;
} Reply;
union {
Request In;
Reply Out;
} Mess;
register Request *InP = &Mess.In;
register Reply *OutP = &Mess.Out;
mach_msg_return_t msg_result;
auto const mach_msg_type_t messageType = {
/* msgt_name = */ MACH_MSG_TYPE_STRING_C,
/* msgt_size = */ 8,
/* msgt_number = */ 1024,
/* msgt_inline = */ TRUE,
/* msgt_longform = */ FALSE,
/* msgt_deallocate = */ FALSE,
/* msgt_unused = */ 0
};
auto const mach_msg_type_t RetCodeCheck = {
/* msgt_name = */ MACH_MSG_TYPE_INTEGER_32,
/* msgt_size = */ 32,
/* msgt_number = */ 1,
/* msgt_inline = */ TRUE,
/* msgt_longform = */ FALSE,
/* msgt_deallocate = */ FALSE,
/* msgt_unused = */ 0
};
InP->messageType = messageType;
(void) mig_strncpy(InP->message, message, 1024);
InP->Head.msgh_bits =
MACH_MSGH_BITS(19, MACH_MSG_TYPE_MAKE_SEND_ONCE);
/* msgh_size passed as argument */
InP->Head.msgh_request_port = send_port;
InP->Head.msgh_reply_port = mig_get_reply_port();
InP->Head.msgh_seqno = 0;
InP->Head.msgh_id = 4066;
msg_result = mach_msg(&InP->Head, MACH_SEND_MSG|MACH_RCV_MSG|MACH_MSG_OPTION_NONE, 1052, sizeof(Reply), InP->Head.msgh_reply_port, MACH_MSG_TIMEOUT_NONE, MACH_PORT_NULL);
if (msg_result != MACH_MSG_SUCCESS) {
mig_dealloc_reply_port(InP->Head.msgh_reply_port);
return msg_result;
}
mig_put_reply_port(InP->Head.msgh_reply_port);
if (OutP->Head.msgh_id != 4166) {
if (OutP->Head.msgh_id == MACH_NOTIFY_SEND_ONCE)
return MIG_SERVER_DIED;
else {
mig_dealloc_reply_port(InP->Head.msgh_reply_port);
return MIG_REPLY_MISMATCH;
}
}
#if TypeCheck
if ((OutP->Head.msgh_bits & MACH_MSGH_BITS_COMPLEX) ||
(OutP->Head.msgh_size != 32))
return MIG_TYPE_ERROR;
#endif /* TypeCheck */
#if TypeCheck
if (BAD_TYPECHECK (&OutP->RetCodeType, &RetCodeCheck))
return MIG_TYPE_ERROR;
#endif /* TypeCheck */
return OutP->RetCode;
}
/* Routine device_intr_register */
mig_internal void _Xdevice_intr_register
(mach_msg_header_t *InHeadP, mach_msg_header_t *OutHeadP)
{
typedef struct {
mach_msg_header_t Head;
mach_msg_type_t lineType;
int line;
mach_msg_type_t idType;
int id;
mach_msg_type_t flagsType;
int flags;
mach_msg_type_t receive_portType;
ipc_port_t receive_port;
} Request;
typedef struct {
mach_msg_header_t Head;
mach_msg_type_t RetCodeType;
kern_return_t RetCode;
} Reply;
Request *In0P = (Request *) InHeadP;
Reply *OutP = (Reply *) OutHeadP;
mig_external kern_return_t experimental_device_intr_register
(ipc_port_t master_port, int line, int id, int flags, ipc_port_t receive_port);
const mach_msg_type_t lineCheck = {
/* msgt_name = */ 2,
/* msgt_size = */ 32,
/* msgt_number = */ 1,
/* msgt_inline = */ TRUE,
/* msgt_longform = */ FALSE,
/* msgt_deallocate = */ FALSE,
/* msgt_unused = */ 0
};
const mach_msg_type_t idCheck = {
/* msgt_name = */ 2,
/* msgt_size = */ 32,
/* msgt_number = */ 1,
/* msgt_inline = */ TRUE,
/* msgt_longform = */ FALSE,
/* msgt_deallocate = */ FALSE,
/* msgt_unused = */ 0
};
const mach_msg_type_t flagsCheck = {
/* msgt_name = */ 2,
/* msgt_size = */ 32,
/* msgt_number = */ 1,
/* msgt_inline = */ TRUE,
/* msgt_longform = */ FALSE,
/* msgt_deallocate = */ FALSE,
/* msgt_unused = */ 0
};
#if TypeCheck
if ((In0P->Head.msgh_size != 56) ||
!(In0P->Head.msgh_bits & MACH_MSGH_BITS_COMPLEX))
{ OutP->RetCode = MIG_BAD_ARGUMENTS; return; }
#endif /* TypeCheck */
#if TypeCheck
if (BAD_TYPECHECK(&In0P->lineType, &lineCheck))
{ OutP->RetCode = MIG_BAD_ARGUMENTS; return; }
#endif /* TypeCheck */
#if TypeCheck
if (BAD_TYPECHECK(&In0P->idType, &idCheck))
{ OutP->RetCode = MIG_BAD_ARGUMENTS; return; }
#endif /* TypeCheck */
#if TypeCheck
if (BAD_TYPECHECK(&In0P->flagsType, &flagsCheck))
{ OutP->RetCode = MIG_BAD_ARGUMENTS; return; }
#endif /* TypeCheck */
#if TypeCheck
if ((In0P->receive_portType.msgt_inline != TRUE) ||
(In0P->receive_portType.msgt_longform != FALSE) ||
(In0P->receive_portType.msgt_name != 17) ||
(In0P->receive_portType.msgt_number != 1) ||
(In0P->receive_portType.msgt_size != 32))
{ OutP->RetCode = MIG_BAD_ARGUMENTS; return; }
#endif /* TypeCheck */
OutP->RetCode = experimental_device_intr_register((ipc_port_t) In0P->Head.msgh_request_port, In0P->line, In0P->id, In0P->flags, In0P->receive_port);
}
/* Routine vm_allocate_contiguous */
mig_internal void _Xvm_allocate_contiguous
(mach_msg_header_t *InHeadP, mach_msg_header_t *OutHeadP)
{
typedef struct {
mach_msg_header_t Head;
mach_msg_type_t target_taskType;
ipc_port_t target_task;
mach_msg_type_t sizeType;
vm_size_t size;
} Request;
typedef struct {
mach_msg_header_t Head;
mach_msg_type_t RetCodeType;
kern_return_t RetCode;
mach_msg_type_t vaddrType;
vm_address_t vaddr;
mach_msg_type_t paddrType;
vm_address_t paddr;
} Reply;
Request *In0P = (Request *) InHeadP;
Reply *OutP = (Reply *) OutHeadP;
mig_external kern_return_t experimental_vm_allocate_contiguous
(host_t host_priv, vm_map_t target_task, vm_address_t *vaddr, vm_address_t *paddr, vm_size_t size);
const mach_msg_type_t sizeCheck = {
/* msgt_name = */ 2,
/* msgt_size = */ 32,
/* msgt_number = */ 1,
/* msgt_inline = */ TRUE,
/* msgt_longform = */ FALSE,
/* msgt_deallocate = */ FALSE,
/* msgt_unused = */ 0
};
const mach_msg_type_t vaddrType = {
/* msgt_name = */ 2,
/* msgt_size = */ 32,
/* msgt_number = */ 1,
/* msgt_inline = */ TRUE,
/* msgt_longform = */ FALSE,
/* msgt_deallocate = */ FALSE,
/* msgt_unused = */ 0
};
const mach_msg_type_t paddrType = {
/* msgt_name = */ 2,
/* msgt_size = */ 32,
/* msgt_number = */ 1,
/* msgt_inline = */ TRUE,
/* msgt_longform = */ FALSE,
/* msgt_deallocate = */ FALSE,
/* msgt_unused = */ 0
};
vm_map_t target_task;
#if TypeCheck
if ((In0P->Head.msgh_size != 40) ||
!(In0P->Head.msgh_bits & MACH_MSGH_BITS_COMPLEX))
{ OutP->RetCode = MIG_BAD_ARGUMENTS; return; }
#endif /* TypeCheck */
#if TypeCheck
if ((In0P->target_taskType.msgt_inline != TRUE) ||
(In0P->target_taskType.msgt_longform != FALSE) ||
(In0P->target_taskType.msgt_name != 17) ||
(In0P->target_taskType.msgt_number != 1) ||
(In0P->target_taskType.msgt_size != 32))
{ OutP->RetCode = MIG_BAD_ARGUMENTS; return; }
#endif /* TypeCheck */
#if TypeCheck
if (BAD_TYPECHECK(&In0P->sizeType, &sizeCheck))
{ OutP->RetCode = MIG_BAD_ARGUMENTS; return; }
#endif /* TypeCheck */
target_task = convert_port_to_map(In0P->target_task);
OutP->RetCode = experimental_vm_allocate_contiguous(convert_port_to_host_priv((ipc_port_t) In0P->Head.msgh_request_port), target_task, &OutP->vaddr, &OutP->paddr, In0P->size);
vm_map_deallocate(target_task);
if (OutP->RetCode != KERN_SUCCESS)
return;
if (IP_VALID(In0P->target_task))
ipc_port_release_send(In0P->target_task);
OutP->Head.msgh_size = 48;
OutP->vaddrType = vaddrType;
OutP->paddrType = paddrType;
}
/* Routine device_intr_enable */
mig_internal void _Xdevice_intr_enable
(mach_msg_header_t *InHeadP, mach_msg_header_t *OutHeadP)
{
typedef struct {
mach_msg_header_t Head;
mach_msg_type_t lineType;
int line;
mach_msg_type_t statusType;
char status;
char statusPad[3];
} Request;
typedef struct {
mach_msg_header_t Head;
mach_msg_type_t RetCodeType;
kern_return_t RetCode;
} Reply;
Request *In0P = (Request *) InHeadP;
Reply *OutP = (Reply *) OutHeadP;
mig_external kern_return_t experimental_device_intr_enable
(ipc_port_t master_port, int line, char status);
const mach_msg_type_t lineCheck = {
/* msgt_name = */ 2,
/* msgt_size = */ 32,
/* msgt_number = */ 1,
/* msgt_inline = */ TRUE,
/* msgt_longform = */ FALSE,
/* msgt_deallocate = */ FALSE,
/* msgt_unused = */ 0
};
const mach_msg_type_t statusCheck = {
/* msgt_name = */ 8,
/* msgt_size = */ 8,
/* msgt_number = */ 1,
/* msgt_inline = */ TRUE,
/* msgt_longform = */ FALSE,
/* msgt_deallocate = */ FALSE,
/* msgt_unused = */ 0
};
#if TypeCheck
if ((In0P->Head.msgh_size != 40) ||
(In0P->Head.msgh_bits & MACH_MSGH_BITS_COMPLEX))
{ OutP->RetCode = MIG_BAD_ARGUMENTS; return; }
#endif /* TypeCheck */
#if TypeCheck
if (BAD_TYPECHECK(&In0P->lineType, &lineCheck))
{ OutP->RetCode = MIG_BAD_ARGUMENTS; return; }
#endif /* TypeCheck */
#if TypeCheck
if (BAD_TYPECHECK(&In0P->statusType, &statusCheck))
{ OutP->RetCode = MIG_BAD_ARGUMENTS; return; }
#endif /* TypeCheck */
OutP->RetCode = experimental_device_intr_enable((ipc_port_t) In0P->Head.msgh_request_port, In0P->line, In0P->status);
}
/* SimpleRoutine exception_raise_request */
mig_internal void _Xexception_raise_request
(mach_msg_header_t *InHeadP, mach_msg_header_t *OutHeadP)
{
typedef struct {
mach_msg_header_t Head;
mach_msg_type_t threadType;
mach_port_t thread;
mach_msg_type_t taskType;
mach_port_t task;
mach_msg_type_t exceptionType;
integer_t exception;
mach_msg_type_t codeType;
integer_t code;
mach_msg_type_t subcodeType;
integer_t subcode;
} Request;
typedef struct {
mach_msg_header_t Head;
mach_msg_type_t RetCodeType;
kern_return_t RetCode;
} Reply;
register Request *In0P = (Request *) InHeadP;
register Reply *OutP = (Reply *) OutHeadP;
mig_external kern_return_t S_exception_raise_request
(mach_port_t exception_port, mach_port_t reply, mach_port_t thread, mach_port_t task, integer_t exception, integer_t code, integer_t subcode);
auto const mach_msg_type_t threadCheck = {
/* msgt_name = */ 17,
/* msgt_size = */ 32,
/* msgt_number = */ 1,
/* msgt_inline = */ TRUE,
/* msgt_longform = */ FALSE,
/* msgt_deallocate = */ FALSE,
/* msgt_unused = */ 0
};
auto const mach_msg_type_t taskCheck = {
/* msgt_name = */ 17,
/* msgt_size = */ 32,
/* msgt_number = */ 1,
/* msgt_inline = */ TRUE,
/* msgt_longform = */ FALSE,
/* msgt_deallocate = */ FALSE,
/* msgt_unused = */ 0
};
auto const mach_msg_type_t exceptionCheck = {
/* msgt_name = */ 2,
/* msgt_size = */ 32,
/* msgt_number = */ 1,
/* msgt_inline = */ TRUE,
/* msgt_longform = */ FALSE,
/* msgt_deallocate = */ FALSE,
/* msgt_unused = */ 0
};
auto const mach_msg_type_t codeCheck = {
/* msgt_name = */ 2,
/* msgt_size = */ 32,
/* msgt_number = */ 1,
/* msgt_inline = */ TRUE,
/* msgt_longform = */ FALSE,
/* msgt_deallocate = */ FALSE,
/* msgt_unused = */ 0
};
auto const mach_msg_type_t subcodeCheck = {
/* msgt_name = */ 2,
/* msgt_size = */ 32,
/* msgt_number = */ 1,
/* msgt_inline = */ TRUE,
/* msgt_longform = */ FALSE,
/* msgt_deallocate = */ FALSE,
/* msgt_unused = */ 0
};
#if TypeCheck
if ((In0P->Head.msgh_size != 64) ||
!(In0P->Head.msgh_bits & MACH_MSGH_BITS_COMPLEX))
{ OutP->RetCode = MIG_BAD_ARGUMENTS; return; }
#endif /* TypeCheck */
#if TypeCheck
if (BAD_TYPECHECK(&In0P->threadType, &threadCheck))
{ OutP->RetCode = MIG_BAD_ARGUMENTS; return; }
#endif /* TypeCheck */
#if TypeCheck
if (BAD_TYPECHECK(&In0P->taskType, &taskCheck))
{ OutP->RetCode = MIG_BAD_ARGUMENTS; return; }
#endif /* TypeCheck */
#if TypeCheck
if (BAD_TYPECHECK(&In0P->exceptionType, &exceptionCheck))
{ OutP->RetCode = MIG_BAD_ARGUMENTS; return; }
#endif /* TypeCheck */
#if TypeCheck
if (BAD_TYPECHECK(&In0P->codeType, &codeCheck))
{ OutP->RetCode = MIG_BAD_ARGUMENTS; return; }
#endif /* TypeCheck */
#if TypeCheck
if (BAD_TYPECHECK(&In0P->subcodeType, &subcodeCheck))
{ OutP->RetCode = MIG_BAD_ARGUMENTS; return; }
#endif /* TypeCheck */
OutP->RetCode = S_exception_raise_request(In0P->Head.msgh_request_port, In0P->Head.msgh_reply_port, In0P->thread, In0P->task, In0P->exception, In0P->code, In0P->subcode);
}
/* SimpleRoutine thread_terminate_release */
mig_internal void _Xthread_terminate_release
(mach_msg_header_t *InHeadP, mach_msg_header_t *OutHeadP)
{
typedef struct {
mach_msg_header_t Head;
mach_msg_type_t taskType;
ipc_port_t task;
mach_msg_type_t thread_nameType;
mach_port_t thread_name;
mach_msg_type_t reply_portType;
mach_port_t reply_port;
mach_msg_type_t addressType;
vm_address_t address;
mach_msg_type_t sizeType;
vm_size_t size;
} Request;
typedef struct {
mach_msg_header_t Head;
mach_msg_type_t RetCodeType;
kern_return_t RetCode;
} Reply;
Request *In0P = (Request *) InHeadP;
Reply *OutP = (Reply *) OutHeadP;
mig_external kern_return_t thread_terminate_release
(thread_t thread, task_t task, mach_port_t thread_name, mach_port_t reply_port, vm_address_t address, vm_size_t size);
const mach_msg_type_t thread_nameCheck = {
/* msgt_name = */ 15,
/* msgt_size = */ 32,
/* msgt_number = */ 1,
/* msgt_inline = */ TRUE,
/* msgt_longform = */ FALSE,
/* msgt_deallocate = */ FALSE,
/* msgt_unused = */ 0
};
const mach_msg_type_t reply_portCheck = {
/* msgt_name = */ 15,
/* msgt_size = */ 32,
/* msgt_number = */ 1,
/* msgt_inline = */ TRUE,
/* msgt_longform = */ FALSE,
/* msgt_deallocate = */ FALSE,
/* msgt_unused = */ 0
};
const mach_msg_type_t addressCheck = {
/* msgt_name = */ 2,
/* msgt_size = */ 32,
/* msgt_number = */ 1,
/* msgt_inline = */ TRUE,
/* msgt_longform = */ FALSE,
/* msgt_deallocate = */ FALSE,
/* msgt_unused = */ 0
};
const mach_msg_type_t sizeCheck = {
/* msgt_name = */ 2,
/* msgt_size = */ 32,
/* msgt_number = */ 1,
/* msgt_inline = */ TRUE,
/* msgt_longform = */ FALSE,
/* msgt_deallocate = */ FALSE,
/* msgt_unused = */ 0
};
thread_t thread;
task_t task;
#if TypeCheck
if ((In0P->Head.msgh_size != 64) ||
!(In0P->Head.msgh_bits & MACH_MSGH_BITS_COMPLEX))
{ OutP->RetCode = MIG_BAD_ARGUMENTS; return; }
#endif /* TypeCheck */
#if TypeCheck
if ((In0P->taskType.msgt_inline != TRUE) ||
(In0P->taskType.msgt_longform != FALSE) ||
(In0P->taskType.msgt_name != 17) ||
(In0P->taskType.msgt_number != 1) ||
(In0P->taskType.msgt_size != 32))
{ OutP->RetCode = MIG_BAD_ARGUMENTS; return; }
#endif /* TypeCheck */
#if TypeCheck
if (BAD_TYPECHECK(&In0P->thread_nameType, &thread_nameCheck))
{ OutP->RetCode = MIG_BAD_ARGUMENTS; return; }
#endif /* TypeCheck */
#if TypeCheck
if (BAD_TYPECHECK(&In0P->reply_portType, &reply_portCheck))
{ OutP->RetCode = MIG_BAD_ARGUMENTS; return; }
#endif /* TypeCheck */
#if TypeCheck
if (BAD_TYPECHECK(&In0P->addressType, &addressCheck))
{ OutP->RetCode = MIG_BAD_ARGUMENTS; return; }
#endif /* TypeCheck */
#if TypeCheck
if (BAD_TYPECHECK(&In0P->sizeType, &sizeCheck))
{ OutP->RetCode = MIG_BAD_ARGUMENTS; return; }
#endif /* TypeCheck */
thread = convert_port_to_thread((ipc_port_t) In0P->Head.msgh_request_port);
task = convert_port_to_task(In0P->task);
OutP->RetCode = thread_terminate_release(thread, task, In0P->thread_name, In0P->reply_port, In0P->address, In0P->size);
task_deallocate(task);
thread_deallocate(thread);
if (OutP->RetCode != KERN_SUCCESS)
return;
if (IP_VALID(In0P->task))
ipc_port_release_send(In0P->task);
}
