1991/0808/pc/clock.c (diff list | history)

pc/clock.c on 1991/0704
1991/0704		#include "u.h" #include "lib.h" #include "mem.h" #include "dat.h" #include "fns.h" #include "io.h"
1991/0706		#include "ureg.h"
1991/0704
1991/0705		/* * 8253 timer */ enum {
1991/0709		T0cntr= 0x40, /* counter ports */ T1cntr= 0x41, /* ... */ T2cntr= 0x42, /* ... */ Tmode= 0x43, /* mode port */
1991/0705
1991/0709		Load0square= 0x36, /* load counter 0 with 2 bytes, * output a square wave whose * period is the counter period */ Freq= 1193182, /* Real clock frequency */
1991/0808		FHZ= 1000, /* hertz for fast clock */
1991/0705		};
1991/0719		/* * delay for l milliseconds */ void delay(int l) { int i; while(--l){ for(i=0; i < 404; i++) ; } }
1991/0704		void clockinit(void) {
1991/0709		/* * set vector for clock interrupts */
1991/0716		setvec(Clockvec, clock);
1991/0709		/* * make clock output a square wave with a 1/HZ period */ outb(Tmode, Load0square); outb(T0cntr, (Freq/HZ)); /* low byte */ outb(T0cntr, (Freq/HZ)>>8); /* high byte */
1991/0704		}
1991/0705		void
1991/0706		clock(Ureg *ur)
1991/0705		{
1991/0706		Proc *p;
1991/0705		m->ticks++;
1991/0711		checkalarms();
1991/0730		mouseclock();
1991/0711
1991/0808		/* * process time accounting */
1991/0706		p = m->proc; if(p){
1991/0711		p->pc = ur->pc;
1991/0706		if (p->state==Running) p->time[p->insyscall]++; }
1991/0801
1991/0802		if(u && p && p->state==Running){
1991/0808		/* * preemption */
1991/0730		if(anyready()){ if(p->hasspin) p->hasspin = 0; else sched(); }
1991/0808		/* * notes for processes that might be spinning * in user mode. */ if((ur->cs&0xffff) == UESEL){
1991/0802		if(u->nnote) notify(ur); } }
1991/0808		} /* * a faster (1 MS) clock tick for a non-interrupting serial port or * kernel profiling. m->ticks still increments as usual. */ void fclock(Ureg *ur) { static ulong ticks; uartintr0(ur); /* poll the serial port */ if((ticks++ % (FHZ/HZ)) == 0) clock(ur); } void fclockinit(void) { int x; /* * set vector for clock interrupts */ setvec(Clockvec, fclock); /* * make clock output a square wave with a 1/FHZ period */ x = splhi(); outb(Tmode, Load0square); outb(T0cntr, (Freq/FHZ)); /* low byte */ outb(T0cntr, (Freq/FHZ)>>8); /* high byte */ splx(x);
1991/0705		}