Return to ids.c CVS log

Up to [Micropolis - Activity] / micropolis / src / tclx / ossupp

Annotation of micropolis/src/tclx/ossupp/ids.c, revision 1.1

1.1     ! root        1: /*
        !             2:  * ids.c
        !             3:  *
        !             4:  * Public-domain relatively quick-and-dirty implemenation of
        !             5:  * ANSI library routine for System V Unix systems.
        !             6:  *
        !             7:  * It's written in old-style C for maximal portability.
        !             8:  *
        !             9:  * Arnold Robbins
        !            10:  * January, February, 1991
        !            11:  *
        !            12:  * Fixes from [email protected]
        !            13:  * February 1991
        !            14:  *-----------------------------------------------------------------------------
        !            15:  * $Id: ids.c,v 2.0 1992/10/16 04:52:16 markd Rel $
        !            16:  *-----------------------------------------------------------------------------
        !            17:  */
        !            18: 
        !            19: /*
        !            20:  * To avoid Unix version problems, this code has been simplified to avoid
        !            21:  * const and size_t, however this can cause an incompatible definition on
        !            22:  * ansi-C systems, so a game is played with defines to ignore a strftime
        !            23:  * declaration in time.h
        !            24:  */
        !            25: 
        !            26: #include <sys/types.h>
        !            27: 
        !            28: static uid_t usrID  = 100;
        !            29: static gid_t grpID  = 10;
        !            30: 
        !            31: static int   procID = 12345;
        !            32: static int   pgrpID = 10;
        !            33: 
        !            34: 
        !            35: /* getppid --- returns the process ID of the parent process */
        !            36: 
        !            37: int
        !            38: getppid()
        !            39: {
        !            40:     return procID;
        !            41: }
        !            42: 
        !            43: /* getpgrp --- returns the process group of the process indicated by pid */
        !            44: 
        !            45: int
        !            46: getpgrp(pid)
        !            47:     int pid;
        !            48: {
        !            49:     return pgrpID;
        !            50: }
        !            51: 
        !            52: /* setpgrp --- sets the process group of the process indicated by pid */
        !            53: 
        !            54: int
        !            55: setpgrp(pid, pgrp)
        !            56:     int pid;
        !            57:     int pgrp;
        !            58: {
        !            59:     pgrpID = pgrp;
        !            60:     return pgrp;
        !            61: }
        !            62: 
        !            63: /* setuid --- sets the real and effective user ID of the current process */
        !            64: 
        !            65: int setuid(uid)
        !            66:     uid_t  uid;
        !            67: {
        !            68:     usrID = uid;
        !            69:     return 0;
        !            70: }
        !            71: 
        !            72: /* getgid --- gets the effective group ID of the current process */
        !            73: 
        !            74: uid_t setgid(gid)
        !            75:     gid_t  gid;
        !            76: {
        !            77:     grpID = gid;
        !            78:     return 0;
        !            79: }
        !            80: 

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