Return to suspend.c CVS log

Up to [XINU] / xinu / sys

Annotation of xinu/sys/suspend.c, revision 1.1.1.1

1.1       root        1: /* suspend.c - suspend */
                      2: 
                      3: #include <conf.h>
                      4: #include <kernel.h>
                      5: #include <proc.h>
                      6: 
                      7: /*------------------------------------------------------------------------
                      8:  *  suspend  --  suspend a process, placing it in hibernation
                      9:  *------------------------------------------------------------------------
                     10:  */
                     11: SYSCALL        suspend(pid)
                     12:        int     pid;                    /* id of process to suspend     */
                     13: {
                     14:        struct  pentry  *pptr;          /* pointer to proc. tab. entry  */
                     15:        PStype  ps;                     /* saved processor status       */
                     16:        int     prio;                   /* priority returned            */
                     17: 
                     18:        disable(ps);
                     19:        if (isbadpid(pid) || pid==NULLPROC ||
                     20:         ((pptr= &proctab[pid])->pstate!=PRCURR && pptr->pstate!=PRREADY)) {
                     21:                restore(ps);
                     22:                return(SYSERR);
                     23:        }
                     24:        if (pptr->pstate == PRREADY) {
                     25:                dequeue(pid);
                     26:                pptr->pstate = PRSUSP;
                     27:        } else {
                     28:                pptr->pstate = PRSUSP;
                     29:                resched();
                     30:        }
                     31:        prio = pptr->pprio;
                     32:        restore(ps);
                     33:        return(prio);
                     34: }

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