cb690d1f0b
and res_* modules in a way that works for ELF. I moved the aliases out of res_stubs.c and into the individual modules where the entry points are defined. Weak aliases don't work in ELF unless that is the case. (Actually, I'm surprised it worked for a.out.) This should fix the undefined "inet_addr" and related symbols in various applications that fail to include <arpa/inet.h> or <resolv.h> as they are supposed to do.
115 lines
2.6 KiB
C
115 lines
2.6 KiB
C
/*
|
|
* Copyright (c) 1996, 1998 by Internet Software Consortium.
|
|
*
|
|
* Permission to use, copy, modify, and distribute this software for any
|
|
* purpose with or without fee is hereby granted, provided that the above
|
|
* copyright notice and this permission notice appear in all copies.
|
|
*
|
|
* THE SOFTWARE IS PROVIDED "AS IS" AND INTERNET SOFTWARE CONSORTIUM DISCLAIMS
|
|
* ALL WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES
|
|
* OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL INTERNET SOFTWARE
|
|
* CONSORTIUM BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
|
|
* DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
|
|
* PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS
|
|
* ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
|
|
* SOFTWARE.
|
|
*/
|
|
|
|
#if defined(LIBC_SCCS) && !defined(lint)
|
|
static char rcsid[] = "$Id: nsap_addr.c,v 1.5 1998/06/11 09:02:45 peter Exp $";
|
|
#endif /* LIBC_SCCS and not lint */
|
|
|
|
#include <sys/types.h>
|
|
#include <sys/param.h>
|
|
#include <sys/socket.h>
|
|
#include <netinet/in.h>
|
|
#include <arpa/inet.h>
|
|
#include <arpa/nameser.h>
|
|
#include <ctype.h>
|
|
#include <resolv.h>
|
|
|
|
static char
|
|
xtob(c)
|
|
register int c;
|
|
{
|
|
return (c - (((c >= '0') && (c <= '9')) ? '0' : '7'));
|
|
}
|
|
|
|
u_int
|
|
inet_nsap_addr(ascii, binary, maxlen)
|
|
const char *ascii;
|
|
u_char *binary;
|
|
int maxlen;
|
|
{
|
|
u_char c, nib;
|
|
u_int len = 0;
|
|
|
|
while ((c = *ascii++) != '\0' && len < (u_int)maxlen) {
|
|
if (c == '.' || c == '+' || c == '/')
|
|
continue;
|
|
if (!isascii(c))
|
|
return (0);
|
|
if (islower(c))
|
|
c = toupper(c);
|
|
if (isxdigit(c)) {
|
|
nib = xtob(c);
|
|
c = *ascii++;
|
|
if (c != '\0') {
|
|
c = toupper(c);
|
|
if (isxdigit(c)) {
|
|
*binary++ = (nib << 4) | xtob(c);
|
|
len++;
|
|
} else
|
|
return (0);
|
|
}
|
|
else
|
|
return (0);
|
|
}
|
|
else
|
|
return (0);
|
|
}
|
|
return (len);
|
|
}
|
|
|
|
char *
|
|
inet_nsap_ntoa(binlen, binary, ascii)
|
|
int binlen;
|
|
register const u_char *binary;
|
|
register char *ascii;
|
|
{
|
|
register int nib;
|
|
int i;
|
|
static char tmpbuf[255*3];
|
|
char *start;
|
|
|
|
if (ascii)
|
|
start = ascii;
|
|
else {
|
|
ascii = tmpbuf;
|
|
start = tmpbuf;
|
|
}
|
|
|
|
if (binlen > 255)
|
|
binlen = 255;
|
|
|
|
for (i = 0; i < binlen; i++) {
|
|
nib = *binary >> 4;
|
|
*ascii++ = nib + (nib < 10 ? '0' : '7');
|
|
nib = *binary++ & 0x0f;
|
|
*ascii++ = nib + (nib < 10 ? '0' : '7');
|
|
if (((i % 2) == 0 && (i + 1) < binlen))
|
|
*ascii++ = '.';
|
|
}
|
|
*ascii = '\0';
|
|
return (start);
|
|
}
|
|
|
|
/*
|
|
* Weak aliases for applications that use certain private entry points,
|
|
* and fail to include <arpa/inet.h>.
|
|
*/
|
|
#undef inet_nsap_addr
|
|
__weak_reference(__inet_nsap_addr, inet_nsap_addr);
|
|
#undef inet_nsap_ntoa
|
|
__weak_reference(__inet_nsap_ntoa, inet_nsap_ntoa);
|