version 1.7, 2003/04/15 12:05:48
|
version 1.8, 2003/05/21 11:32:22
|
|
|
return ::recv(socket, (char*)ptr, size, 0); | return ::recv(socket, (char*)ptr, size, 0); |
#elif defined(PEGASUS_OS_ZOS) | #elif defined(PEGASUS_OS_ZOS) |
int i=::read(socket, (char*)ptr, size); | int i=::read(socket, (char*)ptr, size); |
|
#ifdef PEGASUS_HAVE_EBCDIC |
__atoe_l((char *)ptr,size); | __atoe_l((char *)ptr,size); |
|
#endif |
return i; | return i; |
#elif defined(PEGASUS_OS_OS400) | #elif defined(PEGASUS_OS_OS400) |
int i=::read(socket, (char*)ptr, size); | int i=::read(socket, (char*)ptr, size); |
|
|
char * ptr2 = (char *)malloc(size); | char * ptr2 = (char *)malloc(size); |
int i; | int i; |
memcpy(ptr2,ptr,size); | memcpy(ptr2,ptr,size); |
|
#ifdef PEGASUS_HAVE_EBCDIC |
__etoa_l(ptr2,size); | __etoa_l(ptr2,size); |
|
#endif |
i = ::write(socket, ptr2, size); | i = ::write(socket, ptr2, size); |
free(ptr2); | free(ptr2); |
return i; | return i; |