/*******************************************************************************
 * Copyright IBM Corp. and others 1998
 *
 * This program and the accompanying materials are made available under
 * the terms of the Eclipse Public License 2.0 which accompanies this
 * distribution and is available at https://www.eclipse.org/legal/epl-2.0/
 * or the Apache License, Version 2.0 which accompanies this distribution and
 * is available at https://www.apache.org/licenses/LICENSE-2.0.
 *
 * This Source Code may also be made available under the following
 * Secondary Licenses when the conditions for such availability set
 * forth in the Eclipse Public License, v. 2.0 are satisfied: GNU
 * General Public License, version 2 with the GNU Classpath
 * Exception [1] and GNU General Public License, version 2 with the
 * OpenJDK Assembly Exception [2].
 *
 * [1] https://www.gnu.org/software/classpath/license.html
 * [2] https://openjdk.org/legal/assembly-exception.html
 *
 * SPDX-License-Identifier: EPL-2.0 OR Apache-2.0 OR GPL-2.0-only WITH Classpath-exception-2.0 OR GPL-2.0-only WITH OpenJDK-assembly-exception-1.0
 *******************************************************************************/

#include "j9user.h"
#include "j9.h"
#include "j9protos.h"
#include "j9consts.h"
#include "omrthread.h"
#include "j9dump.h"
#include "jni.h"
#include "vmaccess.h"
#include "jvminit.h"

#include "jcl_internal.h"
#include "j9port.h"
#include "ut_j9jcl.h"



#define J9_SIQUIT_CYCLE_MSEC  200

#if defined(J9VM_INTERP_SIG_QUIT_THREAD)   /* priv. proto (autogen) */
static UDATA sigQuitHandler(struct J9PortLibrary* portLibrary, void* userData);
#endif /* J9VM_INTERP_SIG_QUIT_THREAD && PORT_SIGNAL_SUPPORT (autogen) */

#if defined(J9VM_INTERP_SIG_QUIT_THREAD)   /* priv. proto (autogen) */
static UDATA sigQuitWrapper(struct J9PortLibrary* portLibrary, U_32 gpType, void* gpInfo, void* userData);
#endif /* J9VM_INTERP_SIG_QUIT_THREAD && PORT_SIGNAL_SUPPORT (autogen) */

#if (defined(J9VM_INTERP_SIG_QUIT_THREAD)) /* priv. proto (autogen) */

jint
J9SigQuitStartup(J9JavaVM * vm)
{
	PORT_ACCESS_FROM_JAVAVM(vm);

	Trc_JCL_J9SigQuitStartup_Entry();

	if (vm->sigFlags & J9_SIG_NO_SIG_QUIT) {
		/* Set if -Xrs command-line option */
		Trc_JCL_J9SigQuitStartup_Disabled();
		return 0;
	}

	if (j9sig_set_async_signal_handler(sigQuitWrapper, vm, J9PORT_SIG_FLAG_SIGQUIT)) {
		Trc_JCL_J9SigQuitStartup_Failure();
		return JNI_ERR;
	}

	vm->J9SigQuitShutdown = J9SigQuitShutdown;

	Trc_JCL_J9SigQuitStartup_Exit();

	return 0;
}

#endif /* J9VM_INTERP_SIG_QUIT_THREAD (autogen) */


#if (defined(J9VM_INTERP_SIG_QUIT_THREAD)) /* priv. proto (autogen) */

void
J9SigQuitShutdown(J9JavaVM * vm)
{
	PORT_ACCESS_FROM_JAVAVM(vm);

	Trc_JCL_J9SigQuitShutdown_Entry();
	j9sig_set_async_signal_handler(sigQuitWrapper, vm, 0);
	Trc_JCL_J9SigQuitShutdown_Exit();
}

#endif /* J9VM_INTERP_SIG_QUIT_THREAD (autogen) */


#if defined(J9VM_INTERP_SIG_QUIT_THREAD)   /* priv. proto (autogen) */

static UDATA 
sigQuitHandler(struct J9PortLibrary* portLibrary, void* userData)
{
	J9RASAsyncPidInfo *rasAsyncPidInfo = (J9RASAsyncPidInfo *)userData;
	J9JavaVM *vm = rasAsyncPidInfo->vm;
	J9RASdumpEventData eventData = { 0 };
	omrthread_t currentThread = NULL;
	static U_64 lastDumpTime = 0;
	UDATA currentPriority = 0;
	PORT_ACCESS_FROM_JAVAVM(vm);

	if (omrthread_attach_ex(&currentThread, J9THREAD_ATTR_DEFAULT)) {
		return 0;
	}

	/* Minimise overlapping dump requests (Note that this probably won't work very well 
	 * with multiple VM instances, since lastDumpTime is a static). The proper solution is
	 * to make this handler multi-VM aware, rather than registering one handler per VM
	 */
	if ( j9time_hires_delta(lastDumpTime, j9time_hires_clock(), J9PORT_TIME_DELTA_IN_MILLISECONDS) < J9_SIQUIT_CYCLE_MSEC ) {
		return 0;
	}

	currentPriority = omrthread_get_priority(currentThread);
	omrthread_set_priority(currentThread, J9THREAD_PRIORITY_MAX);

	/**** WARNING: do not try and attach a VM thread here, as we may be debugging a deadlock ****/

	eventData.siPid = rasAsyncPidInfo->siPid;
	eventData.detailData = rasAsyncPidInfo->siPidName;
	if (0 != eventData.siPid) {
		Trc_JCL_signal_pid("SIGQUIT", eventData.siPid, eventData.detailData);
	}

	J9DMP_TRIGGER(vm, NULL, J9RAS_DUMP_ON_USER_SIGNAL, &eventData);

	/* Listeners to this event may deadlock, so run dumps first */
	TRIGGER_J9HOOK_VM_USER_INTERRUPT(vm->hookInterface, vm);

	/* Update cycle time only after finished dumps */
	lastDumpTime = j9time_hires_clock();

	omrthread_set_priority(currentThread, currentPriority);
	omrthread_detach(currentThread);

	return 0;
}
#endif /* J9VM_INTERP_SIG_QUIT_THREAD  (autogen) */


#if defined(J9VM_INTERP_SIG_QUIT_THREAD)   /* priv. proto (autogen) */

static UDATA 
sigQuitWrapper(struct J9PortLibrary* portLibrary, U_32 gpType, void* gpInfo, void* userData)
{
	J9JavaVM *vm = userData;
	UDATA result = 0;
	J9RASAsyncPidInfo rasAsyncPidInfo = { 0 };
	PORT_ACCESS_FROM_JAVAVM(vm);

	rasAsyncPidInfo.vm = vm;
	if (NULL != gpInfo) {
		OMRPORT_ACCESS_FROM_J9PORT(PORTLIB);
		const char *infoName = NULL;
		void *infoValue = NULL;
		U_32 infoType = omrsig_info(gpInfo, OMRPORT_SIG_SIGNAL, OMRPORT_SIG_SENDER_PID, &infoName, &infoValue);
		if (OMRPORT_SIG_VALUE_32 == infoType) {
			rasAsyncPidInfo.siPid = *(U_32 *)infoValue;
		} else if (OMRPORT_SIG_VALUE_64 == infoType) {
			rasAsyncPidInfo.siPid = (UDATA)*(U_64 *)infoValue;
		}
		if (0 != rasAsyncPidInfo.siPid) {
			/* siPidName needs to be freed after use. */
			rasAsyncPidInfo.siPidName = omrsysinfo_get_process_name(rasAsyncPidInfo.siPid);
		}
	}

	j9sig_protect(sigQuitHandler, &rasAsyncPidInfo,
		vm->internalVMFunctions->structuredSignalHandlerVM, vm,
		J9PORT_SIG_FLAG_SIGALLSYNC | J9PORT_SIG_FLAG_MAY_CONTINUE_EXECUTION,
		&result);

	j9mem_free_memory((void *)rasAsyncPidInfo.siPidName);

	return result;
}
#endif /* J9VM_INTERP_SIG_QUIT_THREAD  (autogen) */
