updated copyright for release 1.1
[dyninst.git] / pdutil / src / aixv32Kludges.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 rexec(char **ahost, u_short inport, char *user, char *passwd,
54                  char *cmd, int *fd2p);
55 extern int socket(int, int, int);
56 extern int socketpair(int, int, int, int sv[2]);
57 extern int pipe(int fd[2]);
58 extern int vfork();
59 extern int fork();
60 extern int strcasecmp(char *s1, char *s2);
61 extern int strncasecmp(char *s1, char *s2, int n);
62 };
63
64 /* Non standard (even from sunos4 to sunos5 -- blech */
65
66 /* POSIX */
67 void P_abort() { abort();}
68 int P_close (int FILEDES) { return (close(FILEDES));}
69 int P_dup2 (int OLD, int NEW) { return (dup2(OLD, NEW));}
70 // int P_execlp (const char *FILENAME, const char *ARG0) {
71 //  return (execlp(FILENAME, ARG0, NULL));}
72 int P_execvp (const char *FILENAME, char *const ARGV[]) {
73   return (execvp(FILENAME, ARGV));}
74 void P__exit (int STATUS) { _exit(STATUS);}
75 int P_fcntl (int filedes, int command, int arg2) {
76   return (fcntl(filedes, command, arg2));}
77 FILE * P_fdopen (int FILEDES, const char *OPENTYPE) {
78   return (fdopen(FILEDES, OPENTYPE));}
79 FILE * P_fopen (const char *FILENAME, const char *OPENTYPE) {
80   return (fopen(FILENAME, OPENTYPE));}
81 int P_fstat (int FILEDES, struct stat *BUF) { return (fstat(FILEDES, BUF));}
82 pid_t P_getpid () { return (getpid());}
83 int P_kill(pid_t PID, int SIGNUM) { return (kill(PID, SIGNUM));}
84 off_t P_lseek (int FILEDES, off_t OFFSET, int WHENCE) {
85   return (lseek(FILEDES, OFFSET, WHENCE));}
86 int P_open(const char *FILENAME, int FLAGS, mode_t MODE) {
87   return (open(FILENAME, FLAGS, MODE));}
88 int P_pclose (FILE *STREAM) { return (pclose(STREAM));}
89 FILE *P_popen (const char *COMMAND, const char *MODE) { return (popen(COMMAND, MODE));}
90 size_t P_read (int FILEDES, void *BUFFER, size_t SIZE) {
91   return (read(FILEDES, BUFFER, SIZE));}
92 int P_uname(utsname *unm) { return (uname(unm));}
93 pid_t P_wait(int *status_ptr) { return (wait(status_ptr));}
94 pid_t P_waitpid(pid_t pid, int *statusp, int options) {
95   return (waitpid(pid, statusp, options));}
96 size_t P_write (int FILEDES, const void *BUFFER, size_t SIZE) {
97   return (write(FILEDES, BUFFER, SIZE));}
98 int P_chdir(const char *path) { return (chdir(path)); }
99
100 /* ANSI */
101 void P_exit (int STATUS) { exit(STATUS);}
102 int P_fflush(FILE *stream) {return (fflush(stream));}
103 char *P_fgets (char *S, int COUNT, FILE *STREAM) { return (fgets(S, COUNT, STREAM));}
104 void * P_malloc (size_t SIZE) { return (malloc(SIZE));}
105 void * P_memcpy (void *A1, const void *A2, size_t SIZE) {
106   return (memcpy(A1, A2, SIZE));}
107 void * P_memset (void *BLOCK, int C, unsigned SIZE) {
108   return (memset(BLOCK, C, SIZE));}
109 void P_perror (const char *MESSAGE) { perror(MESSAGE);}
110 P_sig_handler P_signal (int SIGNUM, P_sig_handler ACTION) {
111   return (signal(SIGNUM, ACTION));}
112 char *P_strcat(char *TO, const char *FROM) { return (strcat(TO, FROM));}
113 char *P_strchr(const char *S, int C) { return (strchr(S, C));}
114 int P_strcmp(const char *S1, const char *S2) { return (strcmp(S1, S2));}
115 char *P_strcpy(char *TO, const char *FROM) { return (strcpy(TO, FROM));}
116 char *P_strdup(const char *FROM) { return (strdup(FROM));}
117 size_t P_strlen (const char *S) { return (strlen(S));}
118 char * P_strncat (char *TO, const char *FROM, size_t SIZE) {
119   return (strncat(TO, FROM, SIZE));}
120 int P_strncmp (const char *S1, const char *S2, size_t SIZE) {
121   return (strncmp(S1, S2, SIZE));}
122 char * P_strncpy (char *TO, const char *FROM, size_t SIZE) {
123   return (strncpy(TO, FROM, SIZE));}
124 char * P_strrchr (const char *STRING, int C) { return (strrchr(STRING, C));}
125 char * P_strstr (const char *HAYSTACK, const char *NEEDLE) {
126   return (strstr(HAYSTACK, NEEDLE));}
127 double P_strtod (const char *STRING, char **TAILPTR) {
128   return(strtod(STRING, TAILPTR));}
129 char * P_strtok (char *NEWSTRING, const char *DELIMITERS) {
130   return (strtok(NEWSTRING, DELIMITERS));}
131 long int P_strtol (const char *STRING, char **TAILPTR, int BASE){
132   return (strtol(STRING, TAILPTR, BASE));}
133 unsigned long int P_strtoul(const char *STRING, char **TAILPTR, int BASE){
134   return (strtoul(STRING, TAILPTR, BASE));}
135
136 /* BSD */
137
138 int P_accept (int SOCK, struct sockaddr *ADDR, size_t *LENGTH_PTR) {
139   return (accept(SOCK, ADDR, (int*) LENGTH_PTR));}
140
141 int P_bind(int socket, struct sockaddr *addr, size_t len) {
142   return (bind(socket, addr, len));}
143
144 // void P_bzero(void *block, size_t size) { bzero(block, size);}
145
146 int P_connect(int socket, struct sockaddr *addr, size_t len) {
147   return (connect(socket, addr, len));}
148
149 struct hostent *P_gethostbyname (const char *NAME) { return (gethostbyname(NAME));}
150
151 int P_gethostname(char *name, size_t size) {
152   return (gethostname(name, size));}
153
154 int P_getrusage(int i, struct rusage *r) {return (getrusage(i, r));}
155
156 struct servent *P_getservbyname (const char *NAME, const char *PROTO) {
157   return (getservbyname(NAME, PROTO));}
158
159 int P_getsockname (int SOCKET, struct sockaddr *ADDR, size_t *LENGTH_PTR) {
160   return (getsockname(SOCKET, ADDR, (int*) LENGTH_PTR));}
161
162 /* int P_gettimeofday (struct timeval *TP, struct timezone *TZP) {
163   return (gettimeofday(TP, TZP));} */
164
165 int P_listen(int socket, unsigned int n) {
166   return (listen(socket, n));}
167
168 caddr_t P_mmap(caddr_t addr, size_t len, int prot, int flags,
169                int fd, off_t off) {
170   return (mmap(addr, len, prot, flags, fd, off));}
171
172 int P_munmap(caddr_t ca, int i) {return (munmap(ca, i));}
173
174 int P_select (int wid, fd_set *rd, fd_set *wr, fd_set *ex, struct timeval *tm) {
175   return (select(wid, rd, wr, ex, tm));}
176
177 int P_socket (int NAMESPACE, int STYLE, int PROTOCOL) {
178   return (socket(NAMESPACE, STYLE, PROTOCOL));}
179
180 int P_socketpair(int NAMESPACE, int style, int protocol, int filedes[2]) {
181   return (socketpair(NAMESPACE, style, protocol, filedes));}
182
183 int P_pipe(int fd[2]) { return (pipe(fd)); }
184
185 int P_strcasecmp(const char *s1, const char *s2) {
186   return (strcasecmp((char*)s1, (char*)s2));}
187
188 int P_strncasecmp (const char *S1, const char *S2, size_t N) {
189   return (strncasecmp((char*)S1, (char*)S2, N));}
190
191 int P_endservent(void) { return endservent(); }
192
193 int P_rexec(char **ahost, u_short inport, char *user,
194             char *passwd, char *cmd, int *fd2p){
195   return (rexec(ahost, inport, user, passwd, cmd, fd2p));}
196
197 void P_xdr_destroy(XDR *xdrs) { xdr_destroy(xdrs); }
198 bool_t P_xdr_u_char(XDR *x, u_char *u) { return (xdr_u_char(x, u));}
199 bool_t P_xdr_int(XDR *x, int *i) { return (xdr_int(x, i));}
200 bool_t P_xdr_double(XDR *x, double *d) { return (xdr_double(x, d));}
201 bool_t P_xdr_u_int(XDR *x, u_int *u) { return (xdr_u_int(x, u));}
202 bool_t P_xdr_float(XDR *x, float *f) { return (xdr_float(x, f));}
203 bool_t P_xdr_char(XDR *x, char *c) { return (xdr_char(x, c));}
204 bool_t P_xdr_string(XDR *x, char **c, const u_int maxsize) {
205   return (xdr_string(x, c, maxsize));}
206 bool_t P_xdrrec_endofrecord(XDR *x, int now) {return (xdrrec_endofrecord(x, now));}
207 bool_t P_xdrrec_skiprecord(XDR*x) { return (xdrrec_skiprecord(x));}
208 void P_xdrrec_create(XDR *x, const u_int send_sz, const u_int rec_sz,
209                      caddr_t handle, 
210                      xdr_rd_func readit, xdr_wr_func writeit) {
211   xdrrec_create(x, send_sz, rec_sz, handle, readit, writeit);}
212
213
214
215
216
217