FreeCalypso > hg > fc-tourmaline

view src/gpf/osl/os_evt.c @ 268:f2e52cab0a73

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
abb_inth.c: check all interrupt causes, not just one The original code used if - else if - else if etc constructs, thus the first detected interrupt was the only one handled. However, Iota ITSTATREG is a clear-on-read register, thus if we only handle the first detected interrupt and skip checking the others, then the other interrupts will be lost, if more than one interrupt happened to occur in one ABB interrupt handling cycle - a form of rare race condition. Change the code to check all interrupts that were read in this cycle.
author Mychaela Falconia <falcon@freecalypso.org>
date Sun, 13 Jun 2021 18:17:53 +0000
parents 4e78acac3d88
children
line wrap: on
line source

/*
 * This C module is a reconstruction based on the disassembly of
 * os_evt.obj in frame_na7_db_fl.lib from the Leonardo package.
 */

/* set of included headers from COFF symtab: */
#include <stdio.h>
#include <string.h>
#include "gpfconf.h"	/* FreeCalypso addition */
#include "../../nucleus/nucleus.h"
#include "typedefs.h"
#include "os.h"
#include "gdi.h"
#include "os_types.h"
#include "os_glob.h"

extern T_OS_EVTGRP_TABLE_ENTRY EvtGrpTable[];

GLOBAL LONG
os_SetEvents(OS_HANDLE evt_grp_handle, unsigned event_flags)
{
	if (!EvtGrpTable[evt_grp_handle].Name[0])
		return(OS_ERROR);
	if (NU_Set_Events(&EvtGrpTable[evt_grp_handle].EvtGrp, event_flags,
				NU_OR) == NU_SUCCESS)
		return(OS_OK);
	else
		return(OS_ERROR);
}

GLOBAL LONG
os_RetrieveEvents(OS_HANDLE evt_grp_handle, unsigned event_flags, char option,
		  unsigned *retrieved_events, unsigned suspend)
{
	if (!EvtGrpTable[evt_grp_handle].Name[0])
		return(OS_ERROR);
	if (NU_Retrieve_Events(&EvtGrpTable[evt_grp_handle].EvtGrp,
				event_flags, option, retrieved_events, suspend)
			== NU_SUCCESS)
		return(OS_OK);
	else
		return(OS_ERROR);
}

GLOBAL LONG
os_GetEventGroupHandle(char *evt_grp_name, OS_HANDLE *evt_grp_handle)
{
	int idx;

	for (idx = 0; idx <= MaxEventGroups; idx++) {
		if (!EvtGrpTable[idx].Name[0])
			break;
		if (!strncmp(EvtGrpTable[idx].Name, evt_grp_name,
				RESOURCE_NAMELEN))
			break;
	}
	if (idx > MaxEventGroups || !EvtGrpTable[idx].Name[0]) {
		*evt_grp_handle = -1;
		return(OS_ERROR);
	}
	*evt_grp_handle = idx;
	return(OS_OK);
}

GLOBAL LONG
os_EventGroupInformation(OS_HANDLE evt_grp_handle, char *Name,
			 unsigned *mask_evt, unsigned *tasks_waiting,
			 OS_HANDLE *first_task)
{
	if (!EvtGrpTable[evt_grp_handle].Name[0])
		return(OS_ERROR);
	if (NU_Event_Group_Information(&EvtGrpTable[evt_grp_handle].EvtGrp,
					Name, mask_evt, tasks_waiting,
					first_task) == NU_SUCCESS)
		return(OS_OK);
	else
		return(OS_ERROR);
}