/********************************************************/

/*  ntapi: Native API core library                      */

/*  Copyright (C) 2013--2021  Z. Gilboa                 */

/*  Released under GPLv2 and GPLv3; see COPYING.NTAPI.  */

/********************************************************/

#include <psxtypes/psxtypes.h>

#include <ntapi/nt_port.h>

#include <ntapi/nt_tty.h>

#include <ntapi/ntapi.h>

#include "ntapi_impl.h"

#include "ntapi_pty.h"

static int32_t __pty_xquery_inherit_info(

	void *			hport,

	nt_io_status_block *	iosb,

	void *			pty_info,

	uint32_t		pty_info_length,

	nt_pty_client_info *	pty_client_info)

{

	int32_t			status;

	nt_pty_sigctl_msg	msg;

	nt_pty_inherit_info * 	inherit;

	if (pty_info_length < sizeof(nt_pty_inherit_info))

		return NT_STATUS_INVALID_PARAMETER;

	__ntapi->tt_aligned_block_memset(

		&msg,0,sizeof(msg));

	msg.header.msg_type        = NT_LPC_NEW_MESSAGE;

	msg.header.data_size       = sizeof(msg.data);

	msg.header.msg_size        = sizeof(msg);

	msg.data.ttyinfo.opcode    = NT_TTY_PTY_QUERY;

	msg.data.ctlinfo.hpty      = NT_INVALID_HANDLE_VALUE;

	msg.data.ctlinfo.ctlcode   = NT_PTY_INHERIT_INFORMATION;

	msg.data.ctlinfo.ctxarg[0] = pty_client_info->any[0];

	msg.data.ctlinfo.ctxarg[1] = pty_client_info->any[1];

	msg.data.ctlinfo.ctxarg[2] = pty_client_info->any[2];

	msg.data.ctlinfo.ctxarg[3] = pty_client_info->any[3];

	if ((status = __ntapi->zw_request_wait_reply_port(hport,&msg,&msg)))

		return status;

	else if (msg.data.ttyinfo.status)

		return msg.data.ttyinfo.status;

	inherit            = (nt_pty_inherit_info *)pty_info;

	inherit->hpty      = msg.data.ctlinfo.hpty;

	inherit->luid.low  = msg.data.ctlinfo.luid.low;

	inherit->luid.high = msg.data.ctlinfo.luid.high;

	inherit->access    = (uint32_t)msg.data.ctlinfo.ctxarg[0];

	inherit->flags     = (uint32_t)msg.data.ctlinfo.ctxarg[1];

	inherit->share     = (uint32_t)msg.data.ctlinfo.ctxarg[2];

	inherit->options   = (uint32_t)msg.data.ctlinfo.ctxarg[3];

	__ntapi->tt_guid_copy(

		&inherit->guid,

		&msg.data.ctlinfo.guid);

	iosb->status = NT_STATUS_SUCCESS;

	iosb->info   = sizeof(*inherit);

	return NT_STATUS_SUCCESS;

}

static int32_t __pty_xquery_context_info(

	void *			hport,

	nt_io_status_block *	iosb,

	void *			pty_info,

	uint32_t		pty_info_length,

	nt_pty_client_info *	pty_client_info)

{

	int32_t			status;

	nt_pty_sigctl_msg	msg;

	nt_pty_context_info * 	context;

	if (pty_info_length < sizeof(nt_pty_inherit_info))

		return NT_STATUS_INVALID_PARAMETER;

	__ntapi->tt_aligned_block_memset(

		&msg,0,sizeof(msg));

	msg.header.msg_type        = NT_LPC_NEW_MESSAGE;

	msg.header.data_size       = sizeof(msg.data);

	msg.header.msg_size        = sizeof(msg);

	msg.data.ttyinfo.opcode    = NT_TTY_PTY_QUERY;

	msg.data.ctlinfo.hpty      = NT_INVALID_HANDLE_VALUE;

	msg.data.ctlinfo.ctlcode   = NT_PTY_CONTEXT_INFORMATION;

	msg.data.ctlinfo.ctxarg[0] = pty_client_info->any[0];

	msg.data.ctlinfo.ctxarg[1] = pty_client_info->any[1];

	msg.data.ctlinfo.ctxarg[2] = pty_client_info->any[2];

	msg.data.ctlinfo.ctxarg[3] = pty_client_info->any[3];

	__ntapi->tt_guid_copy(

		&msg.data.ctlinfo.guid,

		&(nt_guid)TTY_PTS_GUID);

	if ((status = __ntapi->zw_request_wait_reply_port(hport,&msg,&msg)))

		return status;

	else if (msg.data.ttyinfo.status)

		return msg.data.ttyinfo.status;

	context            = (nt_pty_context_info *)pty_info;

	context->hpty      = msg.data.ctlinfo.hpty;

	context->luid.low  = msg.data.ctlinfo.luid.low;

	context->luid.high = msg.data.ctlinfo.luid.high;

	context->ctxarg[0] = msg.data.ctlinfo.ctxarg[0];

	context->ctxarg[1] = msg.data.ctlinfo.ctxarg[1];

	context->ctxarg[2] = msg.data.ctlinfo.ctxarg[2];

	context->ctxarg[3] = msg.data.ctlinfo.ctxarg[3];

	__ntapi->tt_guid_copy(

		&context->guid,

		&msg.data.ctlinfo.guid);

	iosb->status = NT_STATUS_SUCCESS;

	iosb->info   = sizeof(*context);

	return NT_STATUS_SUCCESS;

}

int32_t	__stdcall __ntapi_pty_xquery(

	void *			hport,

	nt_io_status_block *	iosb,

	void *			pty_info,

	uint32_t		pty_info_length,

	nt_pty_info_class	pty_info_class,

	nt_pty_client_info *	pty_client_info)

{

	if (pty_info_class == NT_PTY_INHERIT_INFORMATION)

		return __pty_xquery_inherit_info(

			hport,iosb,pty_info,

			pty_info_length,

			pty_client_info);

	else if (pty_info_class == NT_PTY_CONTEXT_INFORMATION)

		return __pty_xquery_context_info(

			hport,iosb,pty_info,

			pty_info_length,

			pty_client_info);

	return NT_STATUS_WRONG_COMPARTMENT;

}