Return to clock.c CVS log

Up to [Plan 9 NeXT] / lucent / sys / src / 9 / gnot

Annotation of lucent/sys/src/9/gnot/clock.c, revision 1.1.1.1

1.1       root        1: #include       "u.h"
                      2: #include       "../port/lib.h"
                      3: #include       "mem.h"
                      4: #include       "dat.h"
                      5: #include       "fns.h"
                      6: #include       "io.h"
                      7: 
                      8: #include       "ureg.h"
                      9: 
                     10: void
                     11: delay(int ms)
                     12: {
                     13:        int i;
                     14: 
                     15:        ms *= 1000;     /* experimentally determined */
                     16:        for(i=0; i<ms; i++)
                     17:                ;
                     18: }
                     19: 
                     20: void
                     21: clock(Ureg *ur)
                     22: {
                     23:        Proc *p;
                     24:        int user, nrun = 0;
                     25: 
                     26:        user = (ur->sr&SUPER) == 0;
                     27:        if(user){
                     28:                u->dbgreg = ur;
                     29:                u->p->pc = ur->pc;
                     30:        }
                     31: 
                     32:        SYNCREG[1] = 0x5F;      /* clear interrupt */
                     33:        m->ticks++;
                     34:        p = m->proc;
                     35:        if(p){
                     36:                nrun = 1;
                     37:                p->pc = ur->pc;
                     38:                if (p->state==Running)
                     39:                        p->time[p->insyscall]++;
                     40:        }
                     41:        nrun = (nrdy+nrun)*1000;
                     42:        MACHP(0)->load = (MACHP(0)->load*19+nrun)/20;
                     43:        checkalarms();
                     44:        kbdclock();
                     45:        duartclock();
                     46:        mouseclock();
                     47:        dspclock();
                     48:        kproftimer(ur->pc);
                     49:        if((ur->sr&SPL(7)) == 0 && p && p->state==Running){
                     50:                if(anyready()){
                     51:                        if(p->hasspin)
                     52:                                p->hasspin = 0;
                     53:                        else
                     54:                                sched();
                     55:                }
                     56:                if(user){
                     57:                        (*(ulong*)(USTKTOP-BY2WD)) += TK2MS(1); /* profiling clock */
                     58:                        notify(ur);
                     59:                }
                     60:        }
                     61: }

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