netsurf/amiga/schedule.c

170 lines
3.9 KiB
C
Raw Normal View History

/*
* Copyright 2008 Chris Young <chris@unsatisfactorysoftware.co.uk>
*
* This file is part of NetSurf, http://www.netsurf-browser.org/
*
* NetSurf is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; version 2 of the License.
*
* NetSurf is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program. If not, see <http://www.gnu.org/licenses/>.
*/
#include "desktop/browser.h"
#include "amiga/object.h"
#include "amiga/schedule.h"
#include <proto/exec.h>
/**
* Schedule a callback.
*
* \param t interval before the callback should be made / cs
* \param callback callback function
* \param p user parameter, passed to callback function
*
* The callback function will be called as soon as possible after t cs have
* passed.
*/
void schedule(int t, void (*callback)(void *p), void *p)
{
struct nsObject *obj;
struct nscallback *nscb;
struct timeval tv;
obj = AddObject(schedule_list,AMINS_CALLBACK);
if(!obj) return;
obj->objstruct_size = sizeof(struct nscallback);
obj->objstruct = AllocVec(obj->objstruct_size,MEMF_PRIVATE | MEMF_CLEAR);
if(!obj->objstruct)
{
DelObject(obj);
return;
}
nscb = (struct nscallback *)obj->objstruct;
nscb->tv.Seconds = 0;
nscb->tv.Microseconds = t*10000;
while(nscb->tv.Microseconds >= 1000000)
{
nscb->tv.Seconds++;
nscb->tv.Microseconds -= 1000000;
}
GetSysTime(&tv);
AddTime(&nscb->tv,&tv); // now contains time when event occurs
#ifdef AMI_SCHEDULER_USES_TIMER
if(nscb->treq = AllocVec(sizeof(struct TimeRequest),MEMF_PRIVATE | MEMF_CLEAR))
{
*nscb->treq = *tioreq;
nscb->treq->Request.io_Command=TR_ADDREQUEST;
nscb->treq->Time.Seconds=nscb->tv.Seconds; // secs
nscb->treq->Time.Microseconds=nscb->tv.Microseconds; // micro
SendIO((struct IORequest *)nscb->treq);
}
#endif
nscb->callback = callback;
nscb->p = p;
}
/**
* Unschedule a callback.
*
* \param callback callback function
* \param p user parameter, passed to callback function
*
* All scheduled callbacks matching both callback and p are removed.
*/
void schedule_remove(void (*callback)(void *p), void *p)
{
struct nsObject *node;
struct nsObject *nnode;
struct nscallback *nscb;
if(IsMinListEmpty(schedule_list)) return;
node = (struct nsObject *)GetHead((struct List *)schedule_list);
do
{
nnode=(struct nsObject *)GetSucc((struct Node *)node);
nscb = node->objstruct;
if(!nscb) continue;
if((nscb->callback == callback) && (nscb->p == p))
{
ami_remove_timer_event(nscb);
DelObject(node);
}
}while (node=nnode);
}
/**
* Process events up to current time.
*/
BOOL schedule_run(void)
{
struct nsObject *node;
struct nsObject *nnode;
struct nscallback *nscb;
void (*callback)(void *p);
void *p;
struct timeval tv;
if(IsMinListEmpty(schedule_list)) return false;
GetSysTime(&tv);
node = (struct nsObject *)GetHead((struct List *)schedule_list);
do
{
nnode=(struct nsObject *)GetSucc((struct Node *)node);
if((node->Type == AMINS_CALLBACK) && (node->objstruct))
{
nscb = node->objstruct;
if(CmpTime(&tv,&nscb->tv) <= 0)
{
callback = nscb->callback;
p = nscb->p;
ami_remove_timer_event(nscb);
DelObject(node);
callback(p);
}
}
} while(node=nnode);
return true;
}
void ami_remove_timer_event(struct nscallback *nscb)
{
#ifdef AMI_SCHEDULER_USES_TIMER
if(!nscb) return;
if(nscb->treq)
{
if(CheckIO((struct IORequest *)nscb->treq)==NULL)
AbortIO((struct IORequest *)nscb->treq);
WaitIO((struct IORequest *)nscb->treq);
FreeVec(nscb->treq);
}
#endif
}