]> git.zerfleddert.de Git - micropolis/blame - src/tclx/ossupp/ids.c
correctly resize editor window to be in sync with the mini map
[micropolis] / src / tclx / ossupp / ids.c
CommitLineData
6a5fa4e0
MG
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 ado@elsie.nci.nih.gov
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
28static uid_t usrID = 100;
29static gid_t grpID = 10;
30
31static int procID = 12345;
32static int pgrpID = 10;
33
34
35/* getppid --- returns the process ID of the parent process */
36
37int
38getppid()
39{
40 return procID;
41}
42
43/* getpgrp --- returns the process group of the process indicated by pid */
44
45int
46getpgrp(pid)
47 int pid;
48{
49 return pgrpID;
50}
51
52/* setpgrp --- sets the process group of the process indicated by pid */
53
54int
55setpgrp(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
65int 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
74uid_t setgid(gid)
75 gid_t gid;
76{
77 grpID = gid;
78 return 0;
79}
80
Impressum, Datenschutz