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