2008-08-02 18:31:32 +04:00
|
|
|
|
/*
|
2014-11-22 02:46:22 +03:00
|
|
|
|
* Copyright 2008 - 2014 Chris Young <chris@unsatisfactorysoftware.co.uk>
|
2008-08-02 18:31:32 +04:00
|
|
|
|
*
|
|
|
|
|
* 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/>.
|
|
|
|
|
*/
|
|
|
|
|
|
2010-12-30 03:53:11 +03:00
|
|
|
|
#include "amiga/os3support.h"
|
2011-02-10 00:52:28 +03:00
|
|
|
|
|
2014-11-22 19:24:26 +03:00
|
|
|
|
#include <proto/dos.h>
|
2008-08-03 20:10:10 +04:00
|
|
|
|
#include <proto/exec.h>
|
2011-03-13 22:12:03 +03:00
|
|
|
|
#include <proto/timer.h>
|
2008-08-03 20:10:10 +04:00
|
|
|
|
|
2011-03-13 22:12:03 +03:00
|
|
|
|
#include <stdio.h>
|
|
|
|
|
#include <stdbool.h>
|
2011-02-17 00:29:39 +03:00
|
|
|
|
#include <pbl.h>
|
|
|
|
|
|
2014-03-09 20:14:05 +04:00
|
|
|
|
#include "utils/errors.h"
|
2014-11-22 19:24:26 +03:00
|
|
|
|
#include "utils/log.h"
|
2014-03-09 20:14:05 +04:00
|
|
|
|
|
2016-01-21 22:23:10 +03:00
|
|
|
|
#include "amiga/misc.h"
|
2014-03-09 20:14:05 +04:00
|
|
|
|
#include "amiga/schedule.h"
|
|
|
|
|
|
2015-01-13 03:01:45 +03:00
|
|
|
|
#ifdef AMIGA_NS_ASYNC
|
2014-11-22 19:24:26 +03:00
|
|
|
|
static struct MsgPort *smsgport = NULL; /* to send messages for the scheduler to */
|
2015-01-13 02:43:00 +03:00
|
|
|
|
#endif
|
2014-11-22 02:46:22 +03:00
|
|
|
|
static struct TimeRequest *tioreq;
|
|
|
|
|
struct Device *TimerBase;
|
2015-01-13 02:29:36 +03:00
|
|
|
|
#ifdef __amigaos4__
|
2014-11-22 02:46:22 +03:00
|
|
|
|
struct TimerIFace *ITimer;
|
2015-01-13 02:43:00 +03:00
|
|
|
|
#endif
|
2014-11-22 02:46:22 +03:00
|
|
|
|
|
2016-01-21 22:23:10 +03:00
|
|
|
|
static APTR pool_nscb = NULL;
|
|
|
|
|
static APTR pool_timereq = NULL;
|
|
|
|
|
|
2011-02-17 00:29:39 +03:00
|
|
|
|
struct nscallback
|
|
|
|
|
{
|
|
|
|
|
struct TimeVal tv;
|
|
|
|
|
void *callback;
|
|
|
|
|
void *p;
|
|
|
|
|
struct TimeRequest *treq;
|
|
|
|
|
};
|
|
|
|
|
|
2014-11-22 02:46:22 +03:00
|
|
|
|
struct ami_schedule_message {
|
|
|
|
|
struct Message msg;
|
|
|
|
|
int type;
|
2014-11-22 19:24:26 +03:00
|
|
|
|
int t;
|
|
|
|
|
void *callback;
|
|
|
|
|
void *p;
|
|
|
|
|
};
|
2014-11-22 02:46:22 +03:00
|
|
|
|
|
|
|
|
|
enum {
|
|
|
|
|
AMI_S_SCHEDULE = 0,
|
2014-11-22 19:24:26 +03:00
|
|
|
|
AMI_S_RUN,
|
2014-11-22 02:46:22 +03:00
|
|
|
|
AMI_S_STARTUP,
|
|
|
|
|
AMI_S_EXIT
|
|
|
|
|
};
|
|
|
|
|
|
2014-11-18 02:47:28 +03:00
|
|
|
|
static PblHeap *schedule_list;
|
2011-02-17 00:29:39 +03:00
|
|
|
|
|
2014-07-03 03:08:56 +04:00
|
|
|
|
/**
|
|
|
|
|
* Remove timer event
|
|
|
|
|
*
|
|
|
|
|
* \param nscb callback
|
|
|
|
|
*
|
|
|
|
|
* The timer event for the callback is aborted
|
|
|
|
|
*/
|
|
|
|
|
|
|
|
|
|
static void ami_schedule_remove_timer_event(struct nscallback *nscb)
|
2008-08-02 18:31:32 +04:00
|
|
|
|
{
|
2011-02-17 00:29:39 +03:00
|
|
|
|
if(!nscb) return;
|
2008-08-03 20:10:10 +04:00
|
|
|
|
|
2014-03-08 18:13:27 +04:00
|
|
|
|
if(nscb->treq)
|
2008-09-09 10:25:22 +04:00
|
|
|
|
{
|
2014-03-08 18:13:27 +04:00
|
|
|
|
if(CheckIO((struct IORequest *)nscb->treq)==NULL)
|
|
|
|
|
AbortIO((struct IORequest *)nscb->treq);
|
2011-02-17 00:29:39 +03:00
|
|
|
|
|
2014-03-08 18:13:27 +04:00
|
|
|
|
WaitIO((struct IORequest *)nscb->treq);
|
2016-01-21 22:23:10 +03:00
|
|
|
|
ami_misc_itempool_free(pool_timereq, nscb->treq, sizeof(struct TimeRequest));
|
2014-03-08 18:13:27 +04:00
|
|
|
|
}
|
2008-08-02 18:31:32 +04:00
|
|
|
|
}
|
|
|
|
|
|
2014-07-03 03:08:56 +04:00
|
|
|
|
/**
|
|
|
|
|
* Add timer event
|
|
|
|
|
*
|
|
|
|
|
* \param nscb callback
|
|
|
|
|
* \param t time in ms
|
|
|
|
|
*
|
|
|
|
|
* NetSurf will be signalled in t ms for this event.
|
|
|
|
|
*/
|
|
|
|
|
|
|
|
|
|
static nserror ami_schedule_add_timer_event(struct nscallback *nscb, int t)
|
|
|
|
|
{
|
|
|
|
|
struct TimeVal tv;
|
|
|
|
|
ULONG time_us = t * 1000; /* t converted to <20>s */
|
|
|
|
|
|
|
|
|
|
nscb->tv.Seconds = time_us / 1000000;
|
|
|
|
|
nscb->tv.Microseconds = time_us % 1000000;
|
|
|
|
|
|
|
|
|
|
GetSysTime(&tv);
|
|
|
|
|
AddTime(&nscb->tv,&tv); // now contains time when event occurs
|
|
|
|
|
|
2016-01-21 22:23:10 +03:00
|
|
|
|
if((nscb->treq = ami_misc_itempool_alloc(pool_timereq, sizeof(struct TimeRequest)))) {
|
2014-07-03 03:08:56 +04:00
|
|
|
|
*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);
|
|
|
|
|
} else {
|
|
|
|
|
return NSERROR_NOMEM;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
return NSERROR_OK;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
|
* Locate a scheduled callback
|
|
|
|
|
*
|
|
|
|
|
* \param callback callback function
|
|
|
|
|
* \param p user parameter, passed to callback function
|
|
|
|
|
* \param remove remove callback from the heap
|
|
|
|
|
*
|
|
|
|
|
* A scheduled callback matching both callback and p is returned, or NULL if none present.
|
|
|
|
|
*/
|
|
|
|
|
|
2014-07-02 21:35:16 +04:00
|
|
|
|
static struct nscallback *ami_schedule_locate(void (*callback)(void *p), void *p, bool remove)
|
|
|
|
|
{
|
|
|
|
|
PblIterator *iterator;
|
|
|
|
|
struct nscallback *nscb;
|
|
|
|
|
bool found_cb = false;
|
|
|
|
|
|
|
|
|
|
/* check there is something on the list */
|
2016-01-21 22:23:10 +03:00
|
|
|
|
if (schedule_list == NULL) return NULL;
|
2014-07-02 21:35:16 +04:00
|
|
|
|
if(pblHeapIsEmpty(schedule_list)) return NULL;
|
|
|
|
|
|
|
|
|
|
iterator = pblHeapIterator(schedule_list);
|
|
|
|
|
|
|
|
|
|
while ((nscb = pblIteratorNext(iterator)) != -1) {
|
|
|
|
|
if ((nscb->callback == callback) && (nscb->p == p)) {
|
|
|
|
|
if (remove == true) pblIteratorRemove(iterator);
|
|
|
|
|
found_cb = true;
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
pblIteratorFree(iterator);
|
|
|
|
|
|
|
|
|
|
if (found_cb == true) return nscb;
|
|
|
|
|
else return NULL;
|
|
|
|
|
}
|
|
|
|
|
|
2014-07-02 21:43:44 +04:00
|
|
|
|
/**
|
|
|
|
|
* Reschedule a callback.
|
2014-07-03 03:08:56 +04:00
|
|
|
|
*
|
|
|
|
|
* \param nscb callback
|
|
|
|
|
* \param t time in ms
|
|
|
|
|
*
|
|
|
|
|
* The nscallback will be rescheduled for t ms.
|
2014-07-02 21:43:44 +04:00
|
|
|
|
*/
|
|
|
|
|
|
2014-07-03 03:08:56 +04:00
|
|
|
|
static nserror ami_schedule_reschedule(struct nscallback *nscb, int t)
|
2014-07-02 21:43:44 +04:00
|
|
|
|
{
|
2014-07-03 03:08:56 +04:00
|
|
|
|
ami_schedule_remove_timer_event(nscb);
|
|
|
|
|
if (ami_schedule_add_timer_event(nscb, t) != NSERROR_OK)
|
|
|
|
|
return NSERROR_NOMEM;
|
2014-07-02 21:43:44 +04:00
|
|
|
|
|
|
|
|
|
pblHeapConstruct(schedule_list);
|
|
|
|
|
return NSERROR_OK;
|
|
|
|
|
}
|
|
|
|
|
|
2008-08-03 20:10:10 +04:00
|
|
|
|
/**
|
|
|
|
|
* 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.
|
|
|
|
|
*/
|
|
|
|
|
|
2014-03-08 18:13:27 +04:00
|
|
|
|
static nserror schedule_remove(void (*callback)(void *p), void *p)
|
2008-08-02 18:31:32 +04:00
|
|
|
|
{
|
2008-08-03 20:10:10 +04:00
|
|
|
|
struct nscallback *nscb;
|
2008-11-03 22:21:40 +03:00
|
|
|
|
|
2014-07-02 21:35:16 +04:00
|
|
|
|
nscb = ami_schedule_locate(callback, p, true);
|
2011-02-17 00:29:39 +03:00
|
|
|
|
|
2014-07-02 21:35:16 +04:00
|
|
|
|
if(nscb != NULL) {
|
2014-07-03 03:08:56 +04:00
|
|
|
|
ami_schedule_remove_timer_event(nscb);
|
2016-01-21 22:23:10 +03:00
|
|
|
|
ami_misc_itempool_free(pool_nscb, nscb, sizeof(struct nscallback));
|
2014-03-08 18:13:27 +04:00
|
|
|
|
pblHeapConstruct(schedule_list);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
return NSERROR_OK;
|
2008-08-02 18:31:32 +04:00
|
|
|
|
}
|
|
|
|
|
|
2014-03-08 18:13:27 +04:00
|
|
|
|
static void schedule_remove_all(void)
|
2011-03-13 22:43:56 +03:00
|
|
|
|
{
|
|
|
|
|
PblIterator *iterator;
|
|
|
|
|
struct nscallback *nscb;
|
|
|
|
|
|
|
|
|
|
if(pblHeapIsEmpty(schedule_list)) return;
|
|
|
|
|
|
|
|
|
|
iterator = pblHeapIterator(schedule_list);
|
|
|
|
|
|
|
|
|
|
while ((nscb = pblIteratorNext(iterator)) != -1)
|
|
|
|
|
{
|
2014-07-03 03:08:56 +04:00
|
|
|
|
ami_schedule_remove_timer_event(nscb);
|
2011-03-13 22:43:56 +03:00
|
|
|
|
pblIteratorRemove(iterator);
|
2016-01-21 22:23:10 +03:00
|
|
|
|
ami_misc_itempool_free(pool_nscb, nscb, sizeof(struct nscallback));
|
2011-03-13 22:43:56 +03:00
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
pblIteratorFree(iterator);
|
|
|
|
|
}
|
|
|
|
|
|
2014-03-08 18:13:27 +04:00
|
|
|
|
static int ami_schedule_compare(const void *prev, const void *next)
|
|
|
|
|
{
|
|
|
|
|
struct nscallback *nscb1 = *(struct nscallback **)prev;
|
|
|
|
|
struct nscallback *nscb2 = *(struct nscallback **)next;
|
|
|
|
|
|
|
|
|
|
return CmpTime(&nscb1->tv, &nscb2->tv);
|
|
|
|
|
}
|
|
|
|
|
|
2008-08-03 20:10:10 +04:00
|
|
|
|
|
2014-11-22 19:24:26 +03:00
|
|
|
|
/**
|
|
|
|
|
* Process events up to current time.
|
|
|
|
|
* NetSurf entry point after being signalled by the scheduler process.
|
|
|
|
|
*/
|
|
|
|
|
static void schedule_run(struct ami_schedule_message *asmsg)
|
|
|
|
|
{
|
|
|
|
|
void (*callback)(void *p) = asmsg->callback;
|
|
|
|
|
void *p = asmsg->p;
|
|
|
|
|
|
|
|
|
|
callback(p);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
|
* Process events up to current time.
|
|
|
|
|
*
|
|
|
|
|
* This implementation only takes the top entry off the heap, it does not
|
|
|
|
|
* venture to later scheduled events until the next time it is called -
|
|
|
|
|
* immediately afterwards, if we're in a timer signalled loop.
|
|
|
|
|
*/
|
|
|
|
|
static void ami_scheduler_run(struct MsgPort *nsmsgport)
|
2008-08-02 18:31:32 +04:00
|
|
|
|
{
|
2008-08-03 20:10:10 +04:00
|
|
|
|
struct nscallback *nscb;
|
|
|
|
|
void (*callback)(void *p);
|
2008-08-17 20:24:22 +04:00
|
|
|
|
void *p;
|
2014-11-22 20:15:52 +03:00
|
|
|
|
struct TimeVal tv;
|
2015-01-13 02:29:36 +03:00
|
|
|
|
struct ami_schedule_message *asmsg;
|
2008-08-03 20:10:10 +04:00
|
|
|
|
|
2015-01-13 03:01:45 +03:00
|
|
|
|
#ifndef AMIGA_NS_ASYNC
|
2015-01-13 02:29:36 +03:00
|
|
|
|
asmsg = AllocVecTagList(sizeof(struct ami_schedule_message), NULL);
|
|
|
|
|
#else
|
|
|
|
|
asmsg = AllocSysObjectTags(ASOT_MESSAGE,
|
2014-11-22 19:24:26 +03:00
|
|
|
|
ASOMSG_Size, sizeof(struct ami_schedule_message),
|
|
|
|
|
TAG_END);
|
2015-01-13 02:29:36 +03:00
|
|
|
|
#endif
|
2011-02-17 00:29:39 +03:00
|
|
|
|
nscb = pblHeapGetFirst(schedule_list);
|
2011-02-19 20:19:38 +03:00
|
|
|
|
if(nscb == -1) return;
|
2008-08-03 20:10:10 +04:00
|
|
|
|
|
2014-11-22 20:15:52 +03:00
|
|
|
|
/* Ensure the scheduled event time has passed (CmpTime<=0)
|
|
|
|
|
* in case something been deleted between the timer
|
|
|
|
|
* signalling us and us responding to it.
|
|
|
|
|
*/
|
|
|
|
|
GetSysTime(&tv);
|
|
|
|
|
if(CmpTime(&tv, &nscb->tv) > 0) return;
|
|
|
|
|
|
2011-02-17 00:29:39 +03:00
|
|
|
|
callback = nscb->callback;
|
|
|
|
|
p = nscb->p;
|
2014-07-03 03:08:56 +04:00
|
|
|
|
ami_schedule_remove_timer_event(nscb);
|
2011-02-17 00:29:39 +03:00
|
|
|
|
pblHeapRemoveFirst(schedule_list);
|
2016-01-21 22:23:10 +03:00
|
|
|
|
ami_misc_itempool_free(pool_nscb, nscb, sizeof(struct nscallback));
|
2014-11-22 19:24:26 +03:00
|
|
|
|
|
|
|
|
|
asmsg->type = AMI_S_RUN;
|
|
|
|
|
asmsg->callback = callback;
|
|
|
|
|
asmsg->p = p;
|
|
|
|
|
|
2015-01-13 03:01:45 +03:00
|
|
|
|
#ifndef AMIGA_NS_ASYNC
|
2015-01-13 02:29:36 +03:00
|
|
|
|
schedule_run(asmsg);
|
|
|
|
|
FreeVec(asmsg);
|
|
|
|
|
#else
|
2014-11-22 19:24:26 +03:00
|
|
|
|
PutMsg(nsmsgport, (struct Message *)asmsg);
|
2015-01-13 02:29:36 +03:00
|
|
|
|
#endif
|
2014-11-22 19:24:26 +03:00
|
|
|
|
return;
|
2008-08-02 18:31:32 +04:00
|
|
|
|
}
|
2008-09-08 22:14:14 +04:00
|
|
|
|
|
2015-01-13 02:29:36 +03:00
|
|
|
|
static struct MsgPort *ami_schedule_open_timer(struct MsgPort *msgport)
|
2011-02-19 20:19:38 +03:00
|
|
|
|
{
|
2015-01-13 02:29:36 +03:00
|
|
|
|
if(msgport == NULL) {
|
|
|
|
|
msgport = AllocSysObjectTags(ASOT_PORT,
|
2014-11-29 22:56:54 +03:00
|
|
|
|
ASO_NoTrack, FALSE,
|
2011-02-19 20:19:38 +03:00
|
|
|
|
TAG_DONE);
|
2015-01-13 02:29:36 +03:00
|
|
|
|
}
|
2015-01-19 02:13:32 +03:00
|
|
|
|
#ifdef __amigaos4__
|
2011-02-19 20:19:38 +03:00
|
|
|
|
tioreq = (struct TimeRequest *)AllocSysObjectTags(ASOT_IOREQUEST,
|
|
|
|
|
ASOIOR_Size,sizeof(struct TimeRequest),
|
|
|
|
|
ASOIOR_ReplyPort,msgport,
|
|
|
|
|
ASO_NoTrack,FALSE,
|
|
|
|
|
TAG_DONE);
|
2015-01-19 02:13:32 +03:00
|
|
|
|
#else
|
|
|
|
|
tioreq = (struct TimeRequest *)CreateIORequest(msgport, sizeof(struct TimeRequest));
|
|
|
|
|
#endif
|
2011-02-19 20:19:38 +03:00
|
|
|
|
|
|
|
|
|
OpenDevice("timer.device", UNIT_WAITUNTIL, (struct IORequest *)tioreq, 0);
|
|
|
|
|
|
|
|
|
|
TimerBase = (struct Device *)tioreq->Request.io_Device;
|
2015-01-19 02:13:32 +03:00
|
|
|
|
#ifdef __amigaos4__
|
2014-11-29 22:56:54 +03:00
|
|
|
|
ITimer = (struct TimerIFace *)GetInterface((struct Library *)TimerBase, "main", 1, NULL);
|
2015-01-19 02:13:32 +03:00
|
|
|
|
#endif
|
2014-11-22 02:46:22 +03:00
|
|
|
|
return msgport;
|
2011-02-19 20:19:38 +03:00
|
|
|
|
}
|
|
|
|
|
|
2014-11-22 02:46:22 +03:00
|
|
|
|
static void ami_schedule_close_timer(struct MsgPort *msgport)
|
2011-02-19 20:19:38 +03:00
|
|
|
|
{
|
2015-01-13 02:29:36 +03:00
|
|
|
|
#ifdef __amigaos4__
|
2014-07-03 03:08:56 +04:00
|
|
|
|
if(ITimer) DropInterface((struct Interface *)ITimer);
|
2015-01-13 02:29:36 +03:00
|
|
|
|
#endif
|
2011-02-19 20:19:38 +03:00
|
|
|
|
CloseDevice((struct IORequest *) tioreq);
|
2014-11-22 02:46:22 +03:00
|
|
|
|
FreeSysObject(ASOT_IOREQUEST, tioreq);
|
2015-01-13 02:29:36 +03:00
|
|
|
|
|
|
|
|
|
/* Will be NULL if the GUI code is allocating/deallocating (no async mode) */
|
|
|
|
|
if(msgport != NULL) FreeSysObject(ASOT_PORT, msgport);
|
2011-02-19 20:19:38 +03:00
|
|
|
|
}
|
2014-03-08 18:13:27 +04:00
|
|
|
|
|
2014-11-22 02:46:22 +03:00
|
|
|
|
/**
|
|
|
|
|
* Initialise amiga scheduler
|
|
|
|
|
*
|
2015-01-13 02:29:36 +03:00
|
|
|
|
* \param msgport optional already opened message port
|
|
|
|
|
*
|
|
|
|
|
* \return true if initialised ok or false on error.
|
2014-11-22 02:46:22 +03:00
|
|
|
|
*/
|
2015-01-13 02:29:36 +03:00
|
|
|
|
static struct MsgPort *ami_schedule_create(struct MsgPort *msgport)
|
2014-11-11 02:50:28 +03:00
|
|
|
|
{
|
2015-01-13 02:29:36 +03:00
|
|
|
|
msgport = ami_schedule_open_timer(msgport);
|
2014-11-11 02:50:28 +03:00
|
|
|
|
schedule_list = pblHeapNew();
|
2014-11-22 02:46:22 +03:00
|
|
|
|
if(schedule_list == PBL_ERROR_OUT_OF_MEMORY) return NULL;
|
2014-11-11 02:50:28 +03:00
|
|
|
|
|
|
|
|
|
pblHeapSetCompareFunction(schedule_list, ami_schedule_compare);
|
|
|
|
|
|
2014-11-22 02:46:22 +03:00
|
|
|
|
return msgport;
|
2014-11-11 02:50:28 +03:00
|
|
|
|
}
|
|
|
|
|
|
2014-11-22 02:46:22 +03:00
|
|
|
|
/**
|
|
|
|
|
* Finalise amiga scheduler
|
|
|
|
|
*
|
2015-01-13 02:29:36 +03:00
|
|
|
|
* \param msgport optional message port to free
|
2014-11-22 02:46:22 +03:00
|
|
|
|
*/
|
2014-11-22 19:24:26 +03:00
|
|
|
|
static void ami_schedule_free(struct MsgPort *msgport)
|
2014-11-11 02:50:28 +03:00
|
|
|
|
{
|
|
|
|
|
schedule_remove_all();
|
|
|
|
|
pblHeapFree(schedule_list); // this should be empty at this point
|
|
|
|
|
schedule_list = NULL;
|
|
|
|
|
|
2014-11-22 02:46:22 +03:00
|
|
|
|
ami_schedule_close_timer(msgport);
|
2014-11-11 02:50:28 +03:00
|
|
|
|
}
|
|
|
|
|
|
2015-01-13 02:43:00 +03:00
|
|
|
|
static nserror ami_scheduler_schedule(struct ami_schedule_message *asmsg)
|
|
|
|
|
{
|
|
|
|
|
struct nscallback *nscb;
|
|
|
|
|
|
|
|
|
|
if(schedule_list == NULL) return NSERROR_INIT_FAILED;
|
|
|
|
|
if (asmsg->t < 0) return schedule_remove(asmsg->callback, asmsg->p);
|
|
|
|
|
|
|
|
|
|
if ((nscb = ami_schedule_locate(asmsg->callback, asmsg->p, false))) {
|
|
|
|
|
return ami_schedule_reschedule(nscb, asmsg->t);
|
|
|
|
|
}
|
|
|
|
|
|
2016-01-21 22:23:10 +03:00
|
|
|
|
nscb = ami_misc_itempool_alloc(pool_nscb, sizeof(struct nscallback));
|
2015-01-13 02:43:00 +03:00
|
|
|
|
if(!nscb) return NSERROR_NOMEM;
|
|
|
|
|
|
|
|
|
|
if (ami_schedule_add_timer_event(nscb, asmsg->t) != NSERROR_OK)
|
|
|
|
|
return NSERROR_NOMEM;
|
|
|
|
|
|
|
|
|
|
nscb->callback = asmsg->callback;
|
|
|
|
|
nscb->p = asmsg->p;
|
|
|
|
|
|
|
|
|
|
pblHeapInsert(schedule_list, nscb);
|
|
|
|
|
|
|
|
|
|
return NSERROR_OK;
|
|
|
|
|
}
|
|
|
|
|
|
2014-03-08 18:13:27 +04:00
|
|
|
|
/* exported function documented in amiga/schedule.h */
|
|
|
|
|
nserror ami_schedule(int t, void (*callback)(void *p), void *p)
|
2014-11-22 19:24:26 +03:00
|
|
|
|
{
|
2015-01-13 02:29:36 +03:00
|
|
|
|
struct ami_schedule_message *asmsg;
|
2014-11-22 19:24:26 +03:00
|
|
|
|
|
2015-01-13 03:01:45 +03:00
|
|
|
|
#ifndef AMIGA_NS_ASYNC
|
2015-01-13 02:29:36 +03:00
|
|
|
|
asmsg = AllocVecTagList(sizeof(struct ami_schedule_message), NULL);
|
|
|
|
|
#else
|
|
|
|
|
if(smsgport == NULL) return NSERROR_INIT_FAILED;
|
|
|
|
|
asmsg = AllocSysObjectTags(ASOT_MESSAGE,
|
2014-11-22 19:24:26 +03:00
|
|
|
|
ASOMSG_Size, sizeof(struct ami_schedule_message),
|
|
|
|
|
TAG_END);
|
2015-01-13 02:29:36 +03:00
|
|
|
|
#endif
|
2014-11-22 19:24:26 +03:00
|
|
|
|
|
|
|
|
|
asmsg->type = AMI_S_SCHEDULE;
|
|
|
|
|
asmsg->t = t;
|
|
|
|
|
asmsg->callback = callback;
|
|
|
|
|
asmsg->p = p;
|
|
|
|
|
|
2015-01-13 03:01:45 +03:00
|
|
|
|
#ifndef AMIGA_NS_ASYNC
|
2015-01-13 02:29:36 +03:00
|
|
|
|
ami_scheduler_schedule(asmsg);
|
|
|
|
|
FreeVec(asmsg);
|
|
|
|
|
#else
|
2014-11-22 19:24:26 +03:00
|
|
|
|
PutMsg(smsgport, (struct Message *)asmsg);
|
2015-01-13 02:29:36 +03:00
|
|
|
|
#endif
|
2014-11-22 19:24:26 +03:00
|
|
|
|
return NSERROR_OK;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* exported interface documented in amiga/schedule.h */
|
|
|
|
|
void ami_schedule_handle(struct MsgPort *nsmsgport)
|
|
|
|
|
{
|
2015-01-13 02:29:36 +03:00
|
|
|
|
/* nsmsgport is the NetSurf message port that the scheduler task
|
|
|
|
|
* (or timer.device in no-async mode) is sending messages to. */
|
|
|
|
|
|
2015-01-13 03:01:45 +03:00
|
|
|
|
#ifndef AMIGA_NS_ASYNC
|
2015-01-13 02:29:36 +03:00
|
|
|
|
struct TimerRequest *timermsg;
|
|
|
|
|
|
|
|
|
|
while((timermsg = (struct TimerRequest *)GetMsg(nsmsgport))) {
|
|
|
|
|
/* reply first, as we don't need the message contents and
|
|
|
|
|
* it crashes if we reply after schedule_run has executed.
|
|
|
|
|
*/
|
|
|
|
|
ReplyMsg((struct Message *)timermsg);
|
|
|
|
|
ami_scheduler_run(NULL);
|
|
|
|
|
}
|
|
|
|
|
#else
|
2014-11-22 19:24:26 +03:00
|
|
|
|
struct ami_schedule_message *asmsg;
|
|
|
|
|
|
|
|
|
|
while((asmsg = (struct ami_schedule_message *)GetMsg(nsmsgport))) {
|
|
|
|
|
if(asmsg->msg.mn_Node.ln_Type == NT_REPLYMSG) {
|
|
|
|
|
/* if it's a reply, free stuff */
|
|
|
|
|
FreeSysObject(ASOT_MESSAGE, asmsg);
|
|
|
|
|
} else {
|
|
|
|
|
switch(asmsg->type) {
|
|
|
|
|
case AMI_S_STARTUP:
|
|
|
|
|
smsgport = asmsg->msg.mn_ReplyPort;
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case AMI_S_RUN:
|
|
|
|
|
schedule_run(asmsg);
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
default:
|
|
|
|
|
// unknown message
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
FreeSysObject(ASOT_MESSAGE, asmsg); /* don't reply, just free */
|
|
|
|
|
}
|
|
|
|
|
}
|
2015-01-13 02:29:36 +03:00
|
|
|
|
#endif
|
2014-11-22 19:24:26 +03:00
|
|
|
|
}
|
2014-11-22 02:46:22 +03:00
|
|
|
|
|
2015-07-05 13:00:47 +03:00
|
|
|
|
#ifdef AMIGA_NS_ASYNC
|
2014-11-22 02:46:22 +03:00
|
|
|
|
static int32 ami_scheduler_process(STRPTR args, int32 length, APTR execbase)
|
|
|
|
|
{
|
|
|
|
|
struct Process *proc = (struct Process *)FindTask(NULL);
|
|
|
|
|
struct MsgPort *nsmsgport = proc->pr_Task.tc_UserData;
|
2014-11-22 19:24:26 +03:00
|
|
|
|
struct MsgPort *schedulermsgport = AllocSysObjectTags(ASOT_PORT, TAG_END);
|
2014-11-22 02:46:22 +03:00
|
|
|
|
struct MsgPort *timermsgport = ami_schedule_create();
|
|
|
|
|
bool running = true;
|
|
|
|
|
struct TimerRequest *timermsg = NULL;
|
|
|
|
|
ULONG schedulesig = 1L << schedulermsgport->mp_SigBit;
|
|
|
|
|
ULONG timersig = 1L << timermsgport->mp_SigBit;
|
|
|
|
|
uint32 signalmask = schedulesig | timersig;
|
|
|
|
|
uint32 signal = 0;
|
|
|
|
|
|
|
|
|
|
/* Send a startup message to the message port we were given when we were created.
|
|
|
|
|
* This tells NetSurf where to send scheduler events to. */
|
|
|
|
|
|
2014-11-22 19:24:26 +03:00
|
|
|
|
struct ami_schedule_message *asmsg = AllocSysObjectTags(ASOT_MESSAGE,
|
2014-11-22 02:46:22 +03:00
|
|
|
|
ASOMSG_Size, sizeof(struct ami_schedule_message),
|
|
|
|
|
ASOMSG_ReplyPort, schedulermsgport,
|
|
|
|
|
TAG_END);
|
|
|
|
|
|
2014-11-22 19:24:26 +03:00
|
|
|
|
asmsg->type = AMI_S_STARTUP;
|
|
|
|
|
PutMsg(nsmsgport, (struct Message *)asmsg);
|
2014-11-22 02:46:22 +03:00
|
|
|
|
|
|
|
|
|
/* Main loop for this process */
|
|
|
|
|
|
|
|
|
|
while(running) {
|
|
|
|
|
signal = Wait(signalmask);
|
|
|
|
|
|
|
|
|
|
if(signal & schedulesig) {
|
|
|
|
|
while((asmsg = (struct ami_schedule_message *)GetMsg(schedulermsgport))) {
|
2014-11-22 19:24:26 +03:00
|
|
|
|
if(asmsg->msg.mn_Node.ln_Type == NT_REPLYMSG) {
|
|
|
|
|
/* if it's a reply, free stuff */
|
|
|
|
|
FreeSysObject(ASOT_MESSAGE, asmsg);
|
|
|
|
|
} else {
|
|
|
|
|
switch(asmsg->type) {
|
|
|
|
|
case AMI_S_SCHEDULE:
|
|
|
|
|
ami_scheduler_schedule(asmsg);
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case AMI_S_EXIT:
|
|
|
|
|
running = false;
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
default:
|
|
|
|
|
// unknown message
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
FreeSysObject(ASOT_MESSAGE, asmsg); /* don't reply, just free */
|
|
|
|
|
}
|
2014-11-22 02:46:22 +03:00
|
|
|
|
}
|
|
|
|
|
}
|
2014-11-22 20:10:07 +03:00
|
|
|
|
|
|
|
|
|
if(signal & timersig) {
|
|
|
|
|
while((timermsg = (struct TimerRequest *)GetMsg(timermsgport))) {
|
|
|
|
|
/* reply first, as we don't need the message contents and
|
|
|
|
|
* it crashes if we reply after schedule_run has executed.
|
|
|
|
|
*/
|
|
|
|
|
ReplyMsg((struct Message *)timermsg);
|
2014-11-22 20:15:52 +03:00
|
|
|
|
ami_scheduler_run(nsmsgport);
|
2014-11-22 20:10:07 +03:00
|
|
|
|
}
|
|
|
|
|
}
|
2014-11-22 02:46:22 +03:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
ami_schedule_free(timermsgport);
|
2014-12-01 21:44:04 +03:00
|
|
|
|
FreeSysObject(ASOT_PORT, schedulermsgport);
|
2014-11-22 02:46:22 +03:00
|
|
|
|
|
|
|
|
|
return RETURN_OK;
|
|
|
|
|
}
|
2015-01-13 02:29:36 +03:00
|
|
|
|
#endif
|
2014-11-22 02:46:22 +03:00
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
|
* Create a new process for the scheduler.
|
|
|
|
|
*
|
|
|
|
|
* \param nsmsgport Message port to send scheduler events to.
|
|
|
|
|
* \return NSERROR_OK on success or error code on faliure.
|
|
|
|
|
*/
|
|
|
|
|
nserror ami_scheduler_process_create(struct MsgPort *nsmsgport)
|
|
|
|
|
{
|
2016-01-21 22:23:10 +03:00
|
|
|
|
pool_nscb = ami_misc_itempool_create(sizeof(struct nscallback));
|
|
|
|
|
pool_timereq = ami_misc_itempool_create(sizeof(struct TimeRequest));
|
|
|
|
|
|
2015-01-13 03:01:45 +03:00
|
|
|
|
#ifndef AMIGA_NS_ASYNC
|
2015-01-13 02:29:36 +03:00
|
|
|
|
ami_schedule_create(nsmsgport);
|
|
|
|
|
#else
|
2014-11-22 19:24:26 +03:00
|
|
|
|
if(nsmsgport == NULL) return NSERROR_INIT_FAILED;
|
|
|
|
|
|
2014-11-22 02:46:22 +03:00
|
|
|
|
struct Process *proc = CreateNewProcTags(
|
|
|
|
|
NP_Name, "NetSurf scheduler",
|
2014-11-22 19:24:26 +03:00
|
|
|
|
NP_Entry, ami_scheduler_process,
|
2014-11-22 02:46:22 +03:00
|
|
|
|
NP_Child, TRUE,
|
2014-11-22 19:38:26 +03:00
|
|
|
|
NP_StackSize, 2048,
|
2014-11-22 02:46:22 +03:00
|
|
|
|
NP_Priority, 1,
|
|
|
|
|
NP_UserData, nsmsgport,
|
|
|
|
|
TAG_DONE);
|
|
|
|
|
|
|
|
|
|
if(proc == NULL) {
|
|
|
|
|
return NSERROR_NOMEM;
|
|
|
|
|
}
|
|
|
|
|
|
2015-05-28 18:08:46 +03:00
|
|
|
|
LOG("Waiting for scheduler process to start up...");
|
2014-11-22 19:24:26 +03:00
|
|
|
|
|
|
|
|
|
WaitPort(nsmsgport);
|
|
|
|
|
struct ami_schedule_message *asmsg = (struct ami_schedule_message *)GetMsg(nsmsgport);
|
|
|
|
|
|
|
|
|
|
if(asmsg->type == AMI_S_STARTUP) { /* We shouldn't get any other messages at this stage */
|
|
|
|
|
smsgport = asmsg->msg.mn_ReplyPort;
|
|
|
|
|
ReplyMsg((struct Message *)asmsg);
|
|
|
|
|
}
|
2015-01-13 02:29:36 +03:00
|
|
|
|
#endif
|
2015-05-28 18:08:46 +03:00
|
|
|
|
LOG("Scheduler started");
|
2014-11-22 19:24:26 +03:00
|
|
|
|
|
2014-11-22 02:46:22 +03:00
|
|
|
|
return NSERROR_OK;
|
|
|
|
|
}
|
|
|
|
|
|
2014-11-22 19:24:26 +03:00
|
|
|
|
/* exported function documented in amiga/schedule.h */
|
|
|
|
|
void ami_scheduler_process_delete(void)
|
|
|
|
|
{
|
2015-01-13 03:01:45 +03:00
|
|
|
|
#ifndef AMIGA_NS_ASYNC
|
2015-01-13 02:29:36 +03:00
|
|
|
|
ami_schedule_free(NULL);
|
|
|
|
|
#else
|
2014-11-22 19:24:26 +03:00
|
|
|
|
if(smsgport == NULL) return;
|
|
|
|
|
|
|
|
|
|
struct ami_schedule_message *asmsg = AllocSysObjectTags(ASOT_MESSAGE,
|
|
|
|
|
ASOMSG_Size, sizeof(struct ami_schedule_message),
|
|
|
|
|
TAG_END);
|
|
|
|
|
|
|
|
|
|
asmsg->type = AMI_S_EXIT;
|
|
|
|
|
PutMsg(smsgport, (struct Message *)asmsg);
|
2014-12-02 00:48:37 +03:00
|
|
|
|
smsgport = NULL; /* this is freed via another copy of this pointer */
|
2015-01-13 02:29:36 +03:00
|
|
|
|
#endif
|
2016-01-21 22:23:10 +03:00
|
|
|
|
|
|
|
|
|
ami_misc_itempool_delete(pool_timereq);
|
|
|
|
|
ami_misc_itempool_delete(pool_nscb);
|
2014-11-22 19:24:26 +03:00
|
|
|
|
}
|
|
|
|
|
|