Updated with new support for Windows NT in front end and thread lib
[dyninst.git] / pdutil / src / sunosKludges.C
1 /*
2  * Copyright (c) 1996 Barton P. Miller
3  * 
4  * We provide the Paradyn Parallel Performance Tools (below
5  * described as Paradyn") on an AS IS basis, and do not warrant its
6  * validity or performance.  We reserve the right to update, modify,
7  * or discontinue this software at any time.  We shall have no
8  * obligation to supply such updates or modifications or any other
9  * form of support to you.
10  * 
11  * This license is for research uses.  For such uses, there is no
12  * charge. We define "research use" to mean you may freely use it
13  * inside your organization for whatever purposes you see fit. But you
14  * may not re-distribute Paradyn or parts of Paradyn, in any form
15  * source or binary (including derivatives), electronic or otherwise,
16  * to any other organization or entity without our permission.
17  * 
18  * (for other uses, please contact us at paradyn@cs.wisc.edu)
19  * 
20  * All warranties, including without limitation, any warranty of
21  * merchantability or fitness for a particular purpose, are hereby
22  * excluded.
23  * 
24  * By your use of Paradyn, you understand and agree that we (or any
25  * other person or entity with proprietary rights in Paradyn) are
26  * under no obligation to provide either maintenance services,
27  * update services, notices of latent defects, or correction of
28  * defects for Paradyn.
29  * 
30  * Even if advised of the possibility of such damages, under no
31  * circumstances shall we (or any other person or entity with
32  * proprietary rights in the software licensed hereunder) be liable
33  * to you or any third party for direct, indirect, or consequential
34  * damages of any character regardless of type of action, including,
35  * without limitation, loss of profits, loss of use, loss of good
36  * will, or computer failure or malfunction.  You agree to indemnify
37  * us (and any other person or entity with proprietary rights in the
38  * software licensed hereunder) for any and all liability it may
39  * incur to third parties resulting from your use of Paradyn.
40  */
41
42 #include "util/h/headers.h"
43
44 extern "C" {
45 extern int accept(int, struct sockaddr *addr, int *);
46 extern int bind(int s, struct sockaddr *, int);
47 extern void bzero(char *b, int length);
48 extern int connect(int s, struct sockaddr*, int);
49 extern int gethostname(char*, int);
50 extern int getrusage(int, struct rusage*);
51 extern int getsockname(int, struct sockaddr*, int *);
52 extern int listen(int, int);
53 extern int munmap(caddr_t, int);
54 extern int ptrace(enum ptracereq, int, char*, int, char*);
55 extern int rexec(char **ahost, u_short inport, char *user, char *passwd,
56                  char *cmd, int *fd2p);
57 extern int select (int, fd_set*, fd_set*, fd_set*, struct timeval*);
58 extern int socket(int, int, int);
59 extern int socketpair(int, int, int, int sv[2]);
60 extern int vfork();
61 extern int fork();
62 extern int strcasecmp(char *s1, char *s2);
63 extern int strncasecmp(char *s1, char *s2, int n);
64 extern int pipe(int fd[2]);
65
66 extern int shmget(key_t, int, int);
67 char *shmat(int, char *, int);
68 int shmdt(char *);
69 int shmctl(int, int, struct shmid_ds *);
70 };
71
72 /* Non standard (even from sunos4 to sunos5 -- blech */
73
74 /* POSIX */
75 void P_abort() { abort();}
76 int P_close (int FILEDES) { return (close(FILEDES));}
77 int P_dup2 (int OLD, int NEW) { return (dup2(OLD, NEW));}
78 // int P_execlp (const char *FILENAME, const char *ARG0) {
79 //  return (execlp(FILENAME, ARG0, NULL));}
80 int P_execvp (const char *FILENAME, char *const ARGV[]) {
81   return (execvp(FILENAME, ARGV));}
82 void P__exit (int STATUS) { _exit(STATUS);}
83 int P_fcntl (int FILEDES, int COMMAND, int ARG2) {
84   return (fcntl(FILEDES, COMMAND, ARG2));}
85 FILE * P_fdopen (int FILEDES, const char *OPENTYPE) {
86   return (fdopen(FILEDES, OPENTYPE));}
87 FILE * P_fopen (const char *FILENAME, const char *OPENTYPE) {
88   return (fopen(FILENAME, OPENTYPE));}
89 int P_fstat (int FILEDES, struct stat *BUF) { return (fstat(FILEDES, BUF));}
90 pid_t P_getpid () { return (getpid());}
91 int P_kill(pid_t PID, int SIGNUM) { return (kill(PID, SIGNUM));}
92 off_t P_lseek (int FILEDES, off_t OFFSET, int WHENCE) {
93   return (lseek(FILEDES, OFFSET, WHENCE));}
94 int P_open(const char *FILENAME, int FLAGS, mode_t MODE) {
95   return (open(FILENAME, FLAGS, MODE));}
96 int P_pclose (FILE *STREAM) { return (pclose(STREAM));}
97 FILE *P_popen (const char *COMMAND, const char *MODE) { return (popen(COMMAND, MODE));}
98 size_t P_read (int FILEDES, void *BUFFER, size_t SIZE) {
99   return (read(FILEDES, BUFFER, SIZE));}
100 int P_uname(utsname *unm) { return (uname(unm));}
101 pid_t P_wait(int *status_ptr) { return (wait(status_ptr));}
102 pid_t P_waitpid(pid_t pid, int *statusp, int options) {
103   return (waitpid(pid, statusp, options));}
104 size_t P_write (int FILEDES, const void *BUFFER, size_t SIZE) {
105   return (write(FILEDES, BUFFER, SIZE));}
106 int P_chdir(const char *path) { return (chdir(path)); }
107 int P_putenv(const char *item) { return putenv((char *)item); }
108
109 /* SYSTEM-V shared memory */
110 int P_shmget(key_t theKey, int size, int flags) {return shmget(theKey, size, flags);}
111 void *P_shmat(int shmid, void *addr, int flags) {return shmat(shmid, (char*)addr, flags);}
112 int P_shmdt(void *addr) {return shmdt((char*)addr);}
113 int P_shmctl(int shmid, int cmd, struct shmid_ds *buf) {return shmctl(shmid, cmd, buf);}
114
115 /* ANSI */
116 void P_exit (int STATUS) { exit(STATUS);}
117 int P_fflush(FILE *stream) {return (fflush(stream));}
118 char *P_fgets (char *S, int COUNT, FILE *STREAM) { return (fgets(S, COUNT, STREAM));}
119 void * P_malloc (size_t SIZE) { return (malloc(SIZE));}
120 void * P_memcpy (void *A1, const void *A2, size_t SIZE) {
121   return (memcpy(A1, A2, SIZE));}
122 void * P_memset (void *BLOCK, int C, unsigned SIZE) {
123   return (memset(BLOCK, C, SIZE));}
124 void P_perror (const char *MESSAGE) { perror(MESSAGE);}
125 P_sig_handler P_signal (int SIGNUM, P_sig_handler ACTION) {
126   return (signal(SIGNUM, ACTION));}
127 char *P_strcat(char *TO, const char *FROM) { return (strcat(TO, FROM));}
128 char *P_strchr(const char *S, int C) { return (strchr(S, C));}
129 int P_strcmp(const char *S1, const char *S2) { return (strcmp(S1, S2));}
130 char *P_strcpy(char *TO, const char *FROM) { return (strcpy(TO, FROM));}
131 char *P_strdup(const char *FROM) { return (strdup(FROM));}
132 size_t P_strlen (const char *S) { return (strlen(S));}
133 char * P_strncat (char *TO, const char *FROM, size_t SIZE) {
134   return (strncat(TO, FROM, SIZE));}
135 int P_strncmp (const char *S1, const char *S2, size_t SIZE) {
136   return (strncmp(S1, S2, SIZE));}
137 char * P_strncpy (char *TO, const char *FROM, size_t SIZE) {
138   return (strncpy(TO, FROM, SIZE));}
139 char * P_strrchr (const char *STRING, int C) { return (strrchr(STRING, C));}
140 char * P_strstr (const char *HAYSTACK, const char *NEEDLE) {
141   return (strstr(HAYSTACK, NEEDLE));}
142 double P_strtod (const char *STRING, char **TAILPTR) {
143   return(strtod(STRING, TAILPTR));}
144 char * P_strtok (char *NEWSTRING, const char *DELIMITERS) {
145   return (strtok(NEWSTRING, DELIMITERS));}
146 long int P_strtol (const char *STRING, char **TAILPTR, int BASE){
147   return (strtol(STRING, TAILPTR, BASE));}
148 unsigned long int P_strtoul(const char *STRING, char **TAILPTR, int BASE){
149   return (strtoul(STRING, TAILPTR, BASE));}
150
151 /* BSD */
152
153 int P_accept (int SOCK, struct sockaddr *ADDR, size_t *LENGTH_PTR) {
154   return (accept(SOCK, ADDR, (int*) LENGTH_PTR));}
155
156 int P_bind(int socket, struct sockaddr *addr, size_t len) {
157   return (bind(socket, addr, len));}
158
159 // void P_bzero(void *block, size_t size) { bzero(block, size);}
160
161 int P_connect(int socket, struct sockaddr *addr, size_t len) {
162   return (connect(socket, addr, len));}
163
164 struct hostent *P_gethostbyname (const char *NAME) { return (gethostbyname(NAME));}
165
166 int P_gethostname(char *name, size_t size) {
167   return (gethostname(name, size));}
168
169 int P_getrusage(int i, struct rusage *r) {return (getrusage(i, r));}
170
171 struct servent *P_getservbyname (const char *NAME, const char *PROTO) {
172   return (getservbyname(NAME, PROTO));}
173
174 int P_getsockname (int SOCKET, struct sockaddr *ADDR, size_t *LENGTH_PTR) {
175   return (getsockname(SOCKET, ADDR, (int*) LENGTH_PTR));}
176
177 int P_getsockopt(int fd, int level, int optname, void *optval, int *optlen) {
178    return getsockopt(fd, level, optname, optval, optlen);
179 }
180
181 int P_setsockopt(int fd, int level, int optname, void *optval, int optlen) {
182    return setsockopt(fd, level, optname, optval, optlen);
183 }
184
185 /* int P_gettimeofday (struct timeval *TP, struct timezone *TZP) {
186   return (gettimeofday(TP, TZP));} */
187
188 int P_listen(int socket, unsigned int n) {
189   return (listen(socket, n));}
190
191 caddr_t P_mmap(caddr_t addr, size_t len, int prot, int flags,
192                int fd, off_t off) {
193   return (mmap(addr, len, prot, flags, fd, off));}
194
195 int P_munmap(caddr_t ca, int i) {return (munmap(ca, i));}
196
197 int P_select (int wid, fd_set *rd, fd_set *wr, fd_set *ex, struct timeval *tm) {
198   return (select(wid, rd, wr, ex, tm));}
199
200 int P_socket (int NAMESPACE, int STYLE, int PROTOCOL) {
201   return (socket(NAMESPACE, STYLE, PROTOCOL));}
202
203 int P_socketpair(int Namespace, int style, int protocol, int filedes[2]) {
204   return (socketpair(Namespace, style, protocol, filedes));}
205   // note: "namespace" is now a reserved word in c++!
206
207 int P_pipe(int fd[2]) { return (pipe(fd)); }
208
209 int P_strcasecmp(const char *s1, const char *s2) {
210   return (strcasecmp((char*)s1, (char*)s2));}
211
212 int P_strncasecmp (const char *S1, const char *S2, size_t N) {
213   return (strncasecmp((char*)S1, (char*)S2, N));}
214
215 int P_endservent(void) { return endservent(); }
216
217 /* SunOS */
218 int P_ptrace(enum ptracereq req, int pid, char *addr, int data, char *addr2) {
219   return (ptrace(req, pid, addr, data, addr2));}
220 int P_rexec(char **ahost, u_short inport, char *user,
221             char *passwd, char *cmd, int *fd2p){
222   return (rexec(ahost, inport, user, passwd, cmd, fd2p));}
223
224 void P_xdr_destroy(XDR *xdrs) { xdr_destroy(xdrs); }
225 bool_t P_xdr_u_char(XDR *x, u_char *u) { return (xdr_u_char(x, u));}
226 bool_t P_xdr_int(XDR *x, int *i) { return (xdr_int(x, i));}
227 bool_t P_xdr_double(XDR *x, double *d) { return (xdr_double(x, d));}
228 bool_t P_xdr_u_int(XDR *x, u_int *u) { return (xdr_u_int(x, u));}
229 bool_t P_xdr_float(XDR *x, float *f) { return (xdr_float(x, f));}
230 bool_t P_xdr_char(XDR *x, char *c) { return (xdr_char(x, c));}
231 bool_t P_xdr_string(XDR *x, char **c, const u_int maxsize) {
232   return (xdr_string(x, c, maxsize));}
233 bool_t P_xdrrec_endofrecord(XDR *x, int now) {return (xdrrec_endofrecord(x, now));}
234 bool_t P_xdrrec_skiprecord(XDR*x) { return (xdrrec_skiprecord(x));}
235 bool_t P_xdrrec_eof(XDR*x) { return (xdrrec_eof(x));}
236 void P_xdrrec_create(XDR *x, const u_int send_sz, const u_int rec_sz,
237                      caddr_t handle, 
238                      xdr_rd_func readit, xdr_wr_func writeit) {
239   xdrrec_create(x, send_sz, rec_sz, handle, readit, writeit);}
240
241
242
243
244
245