File:  [Research Unix] / researchv10no / cmd / cfront / libC / otask / timer.c
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Tue Apr 24 17:21:35 2018 UTC (8 years, 1 month ago) by root
Branches: belllabs, MAIN
CVS tags: researchv10, HEAD
researchv10 Norman

#include "task.h"

timer::timer(int d)
{
	s_state = IDLE;
	insert(d, (object*)this);
}

timer::~timer()
{
	if (s_state != TERMINATED) task_error(E_TIMERDEL);
}

void
timer::reset(int d)
{
	remove();
	insert(d, (object*)this);
}

void
timer::print(int n, int baseClass)
{
	if (!baseClass)
		printf("timer %ld == clock+%ld\n",s_time,s_time-clock);

	sched::print(n, 1);
}

void
timer::resume()  // time is up; "delete" timer & schedule next task
{
	s_state = TERMINATED;
	alert();
	schedule();
}

void
timer::setwho(object*)
{
}

int timer::o_type()
{
	return TIMER;
}


unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.