Return to ids.c CVS log

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

Micropolis Activity

/*
 * ids.c
 *
 * Public-domain relatively quick-and-dirty implemenation of
 * ANSI library routine for System V Unix systems.
 *
 * It's written in old-style C for maximal portability.
 *
 * Arnold Robbins
 * January, February, 1991
 *
 * Fixes from [email protected]
 * February 1991
 *-----------------------------------------------------------------------------
 * $Id: ids.c,v 1.1.1.1 2020/03/11 09:08:51 root Exp $
 *-----------------------------------------------------------------------------
 */

/*
 * To avoid Unix version problems, this code has been simplified to avoid
 * const and size_t, however this can cause an incompatible definition on
 * ansi-C systems, so a game is played with defines to ignore a strftime
 * declaration in time.h
 */

#include <sys/types.h>

static uid_t usrID  = 100;
static gid_t grpID  = 10;

static int   procID = 12345;
static int   pgrpID = 10;


/* getppid --- returns the process ID of the parent process */

int
getppid()
{
    return procID;
}

/* getpgrp --- returns the process group of the process indicated by pid */

int
getpgrp(pid)
    int pid;
{
    return pgrpID;
}

/* setpgrp --- sets the process group of the process indicated by pid */

int
setpgrp(pid, pgrp)
    int pid;
    int pgrp;
{
    pgrpID = pgrp;
    return pgrp;
}

/* setuid --- sets the real and effective user ID of the current process */

int setuid(uid)
    uid_t  uid;
{
    usrID = uid;
    return 0;
}

/* getgid --- gets the effective group ID of the current process */

uid_t setgid(gid)
    gid_t  gid;
{
    grpID = gid;
    return 0;
}

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