netbyte.cpp
上传用户:zhongxx05
上传日期:2007-06-06
资源大小:33641k
文件大小:14k
- /* ***** BEGIN LICENSE BLOCK *****
- * Version: RCSL 1.0/RPSL 1.0
- *
- * Portions Copyright (c) 1995-2002 RealNetworks, Inc. All Rights Reserved.
- *
- * The contents of this file, and the files included with this file, are
- * subject to the current version of the RealNetworks Public Source License
- * Version 1.0 (the "RPSL") available at
- * http://www.helixcommunity.org/content/rpsl unless you have licensed
- * the file under the RealNetworks Community Source License Version 1.0
- * (the "RCSL") available at http://www.helixcommunity.org/content/rcsl,
- * in which case the RCSL will apply. You may also obtain the license terms
- * directly from RealNetworks. You may not use this file except in
- * compliance with the RPSL or, if you have a valid RCSL with RealNetworks
- * applicable to this file, the RCSL. Please see the applicable RPSL or
- * RCSL for the rights, obligations and limitations governing use of the
- * contents of the file.
- *
- * This file is part of the Helix DNA Technology. RealNetworks is the
- * developer of the Original Code and owns the copyrights in the portions
- * it created.
- *
- * This file, and the files included with this file, is distributed and made
- * available on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
- * EXPRESS OR IMPLIED, AND REALNETWORKS HEREBY DISCLAIMS ALL SUCH WARRANTIES,
- * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY, FITNESS
- * FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
- *
- * Technology Compatibility Kit Test Suite(s) Location:
- * http://www.helixcommunity.org/content/tck
- *
- * Contributor(s):
- *
- * ***** END LICENSE BLOCK ***** */
- #include "hxcom.h"
- #include "hlxclib/ctype.h"
- #include "safestring.h"
- #include "netbyte.h"
- #include "hxtypes.h"
- #include "ihxpckts.h"
- #include "hxbuffer.h"
- #ifdef _MACINTOSH
- #include "hxstrutl.h" // for isascii definition
- #endif
- #include "hxheap.h"
- #ifdef _DEBUG
- #undef HX_THIS_FILE
- static const char HX_THIS_FILE[] = __FILE__;
- #endif
- #ifndef INADDR_NONE
- #define INADDR_NONE -1
- #endif
- #if defined(HELIX_CONFIG_NOSTATICS)
- # include "globals/hxglobals.h"
- #endif
- #if defined(HELIX_CONFIG_NOSTATICS)
- # define STATIC_CHAR_ARRAY(name, length)
- static const char _##name = ' ';
- char*& str = (char*&)HXGlobalCharArray::Get(&_##name, length, "" );
- #else
- # define STATIC_CHAR_ARRAY(name, length) static char name[length];
- #endif /* HELIX_CONFIG_NOSTATICS */
- #ifndef NET_ENDIAN
- NetWord WToNet(HostWord wHost) {
- /* Hopefully, a portable implementation
- ** (although it's unnecessary labor on a
- ** non-swapped machine)
- */
- NetWord wNet;
- unsigned char *uc = (unsigned char *)&wNet;
- *uc++ = (unsigned char) ((wHost & 0xFF00) >> 8);
- *uc++ = (unsigned char) (wHost & 0x00FF);
- return wNet;
- }
- HostWord WToHost(NetWord wNet) {
- HostWord wHost;
- unsigned char *uc = (unsigned char *)&wNet;
- wHost = (*uc++) << 8;
- wHost += (*uc++);
- return wHost;
- }
- NetDWord DwToNet(HostDWord dwHost) {
- NetDWord dwNet;
- unsigned char *uc = (unsigned char *)&dwNet;
- *uc++ = (unsigned char) ((dwHost & 0xFF000000L) >> 24);
- *uc++ = (unsigned char) ((dwHost & 0x00FF0000L) >> 16);
- *uc++ = (unsigned char) ((dwHost & 0x0000FF00L) >> 8);
- *uc++ = (unsigned char) (dwHost & 0x000000FFL);
- return dwNet;
- }
- HostDWord DwToHost(NetDWord dwNet) {
- HostDWord dwHost;
- unsigned char *uc = (unsigned char *)&dwNet;
- dwHost = ((unsigned long)(*uc++)) << 24;
- dwHost += ((unsigned long)(*uc++)) << 16;
- dwHost += ((unsigned long)(*uc++)) << 8;
- dwHost += (unsigned long)(*uc++);
- return dwHost;
- }
- #endif
- int
- TestBigEndian(void)
- {
- unsigned long test = 0x000000FF;
- char *temp = (char *)&test;
- /* on big endian machines, the first byte should be 0x00, on little endian 0xFF.*/
- return (temp[0] == 0);
- }
- /* Converts 2 byte ints from big endian to little endian or vice versa */
- void
- SwapWordBytes(HostWord *data, int numInts)
- {
- INT32 i;
- INT16 temp;
- char *temp1, *temp2;
- /* temp2 points to our temporary int that will hold the swapped bytes */
- temp2 = (char *) &temp;
- for(i = 0; i < numInts; i++)
- {
- temp1 = (char *) &data[i];
- temp2[0] = temp1[1];
- temp2[1] = temp1[0];
- data[i] = temp;
- }
- }
- /* Converts 4 byte ints from big endian to little endian or vice versa */
- void
- SwapDWordBytes(HostDWord *data, int numInts)
- {
- INT32 i,temp;
- char *temp1, *temp2;
- /* temp2 points to our temporary int that will hold the swapped bytes */
- temp2 = (char *) &temp;
- for(i = 0; i < numInts; i++)
- {
- temp1 = (char *) &data[i];
- temp2[0] = temp1[3];
- temp2[1] = temp1[2];
- temp2[2] = temp1[1];
- temp2[3] = temp1[0];
- data[i] = temp;
- }
- }
- /*
- * IP domain addresses will NOT be recignized as valid addresses
- * even if they are specified as "99.99.234" or "99.234"
- */
- int
- IsNumericAddr(const char* addrStr, UINT32 size)
- {
- // check the params
- if (NULL == addrStr || 0 == size)
- {
- return 0;
- }
-
- const char* ptr = (addrStr && size) ? addrStr+size-1 : 0;
- int len = (int)size;
- int numericAddr = 0;
- int dotCount = 0;
- if (isdigit(*ptr))
- numericAddr = 1;
- while (--len)
- {
- if (*ptr == '.')
- dotCount++;
- else if (isalpha(*ptr))
- numericAddr = 0;
- --ptr;
- }
- return (dotCount == 3) ? numericAddr : 0;
- }
- void
- NetLongToAscii(UINT32 addr, IHXBuffer* pAddrBuf)
- {
- char str[16]; /* Flawfinder: ignore */ // max addr string length + NULL -- "255.255.255.255"
- char* ptr = (char *)str;
- char* prevStrEnd = 0;
- SafeSprintf(ptr, sizeof(str), "%lu", ((addr&0xff000000) >> 24));
- ptr = (char *)memchr(str, 0, 16);
- prevStrEnd = ptr;
- SafeSprintf(ptr, sizeof(str)-(ptr-str), ".%lu", ((addr&0x00ff0000) >> 16));
- ptr = (char *)memchr(prevStrEnd, 0, 16);
- prevStrEnd = ptr;
- SafeSprintf(ptr, sizeof(str)-(ptr-str), ".%lu", ((addr&0x0000ff00) >> 8));
- ptr = (char *)memchr(prevStrEnd, 0, 16);
- SafeSprintf(ptr, sizeof(str)-(ptr-str), ".%lu", (addr&0x000000ff));
- pAddrBuf->Set((BYTE *)str, strlen(str)+1);
- }
- // takes the addr in HOST-byte order!!!
- // its too late in the cycle to make this fundamental a change
- // so we r keeping it the same
- char*
- HXInetNtoa(UINT32 addr)
- {
- STATIC_CHAR_ARRAY(str, 16); /* Flawfinder: ignore */ // max addr string length + NULL -- "255.255.255.255"
- char* ptr = (char *)str;
- char* prevStrEnd = 0;
- SafeSprintf(ptr, sizeof(str), "%lu", ((addr&0xff000000) >> 24));
- ptr = (char *)memchr(str, 0, 16);
- prevStrEnd = ptr;
- SafeSprintf(ptr, sizeof(str)-(ptr-str), ".%lu", ((addr&0x00ff0000) >> 16));
- ptr = (char *)memchr(prevStrEnd, 0, 16);
- prevStrEnd = ptr;
- SafeSprintf(ptr, sizeof(str)-(ptr-str), ".%lu", ((addr&0x0000ff00) >> 8));
- ptr = (char *)memchr(prevStrEnd, 0, 16);
- SafeSprintf(ptr, sizeof(str)-(ptr-str), ".%lu", (addr&0x000000ff));
- return str;
- }
- /*
- * ++Copyright++ 1983, 1990, 1993
- * -
- * Copyright (c) 1983, 1990, 1993
- * The Regents of the University of California. All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- * 1. Redistributions of source code must retain the above copyright
- * notice, this list of conditions and the following disclaimer.
- * 2. Redistributions in binary form must reproduce the above copyright
- * notice, this list of conditions and the following disclaimer in the
- * documentation and/or other materials provided with the distribution.
- * 3. All advertising materials mentioning features or use of this software
- * must display the following acknowledgement:
- * This product includes software developed by the University of
- * California, Berkeley and its contributors.
- * 4. Neither the name of the University nor the names of its contributors
- * may be used to endorse or promote products derived from this software
- * without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
- * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
- * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
- * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
- * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
- * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
- * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
- * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
- * SUCH DAMAGE.
- * -
- * Portions Copyright (c) 1993 by Digital Equipment Corporation.
- *
- * 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, and that
- * the name of Digital Equipment Corporation not be used in advertising or
- * publicity pertaining to distribution of the document or software without
- * specific, written prior permission.
- *
- * THE SOFTWARE IS PROVIDED "AS IS" AND DIGITAL EQUIPMENT CORP. DISCLAIMS ALL
- * WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES
- * OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL DIGITAL EQUIPMENT
- * CORPORATION 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.
- * -
- * --Copyright--
- */
- /*
- * Ascii internet address interpretation routine.
- * The value returned is in network order.
- * Check whether "cp" is a valid ascii representation
- * of an Internet address and convert to a binary address.
- * Returns 1 if the address is valid, 0 if not.
- * This replaces inet_addr, the return value from which
- * cannot distinguish between failure and a local broadcast address.
- */
- UINT32
- HXinet_addr(const char* cp)
- {
- UINT32 val = 0;
- int base = 0, n = 0;
- char c;
- UINT parts[4];
- UINT *pp = parts;
- c = *cp;
- for (;;)
- {
- /*
- * Collect number up to ``.''.
- * Values are specified as for C:
- * 0x=hex, 0=octal, isdigit=decimal.
- */
- if (!isdigit(c))
- return (INADDR_NONE);
- val = 0; base = 10;
- if (c == '0')
- {
- c = *++cp;
- if (c == 'x' || c == 'X')
- {
- base = 16, c = *++cp;
- }
- else
- {
- base = 8;
- }
- }
-
- for (;;)
- {
- if (isascii(c) && isdigit(c))
- {
- val = (val * base) + (c - '0');
- c = *++cp;
- }
- else if (base == 16 && isascii(c) && isxdigit(c))
- {
- val = (val << 4) | (c + 10 - (islower(c) ? 'a' : 'A'));
- c = *++cp;
- }
- else
- {
- break;
- }
- }
- if (c == '.')
- {
- /*
- * Internet format:
- * a.b.c.d
- * a.b.c (with c treated as 16 bits)
- * a.b (with b treated as 24 bits)
- */
- if (pp >= parts + 3)
- {
- return (INADDR_NONE);
- }
- *pp++ = val;
- c = *++cp;
- }
- else
- {
- break;
- }
- }
- /*
- * Check for trailing characters.
- */
- if (c != ' ' && (!isascii(c) || !isspace(c)))
- {
- return (INADDR_NONE);
- }
- /*
- * Concoct the address according to
- * the number of parts specified.
- */
- n = pp - parts + 1;
- switch (n)
- {
- case 0:
- return (INADDR_NONE); /* initial nondigit */
- case 1: /* a -- 32 bits */
- break;
- case 2: /* a.b -- 8.24 bits */
- if (val > 0xffffff)
- return (INADDR_NONE);
- val |= parts[0] << 24;
- break;
- case 3: /* a.b.c -- 8.8.16 bits */
- if (val > 0xffff)
- return (INADDR_NONE);
- val |= (parts[0] << 24) | (parts[1] << 16);
- break;
- case 4: /* a.b.c.d -- 8.8.8.8 bits */
- if (val > 0xff)
- return (INADDR_NONE);
- val |= (parts[0] << 24) | (parts[1] << 16) | (parts[2] << 8);
- break;
- }
- return DwToNet(val);
- }
- // to store actual netbyte order of bytes in a string
- // on a little endian machine basically swap the bytes
- char*
- NetLongAddrToDecimalStr(ULONG32 ulAddr)
- {
- STATIC_CHAR_ARRAY(str, 11);/* Flawfinder: ignore */ // max decimal digits (4 Gig) for a 4-byte number
- unsigned long test = 0x000000FF;
- char *temp = (char *)&test;
- if (temp[0] != 0x0) // big-endian
- {
- ULONG32 addr = 0;
- char* temp1 = (char *)&addr;
- temp = (char *)&ulAddr;
- temp1[0] = temp[3];
- temp1[1] = temp[2];
- temp1[2] = temp[1];
- temp1[3] = temp[0];
- SafeSprintf(str, sizeof(str), "%lu", (unsigned long)addr);
- }
- else
- {
- SafeSprintf(str, sizeof(str), "%lu", (unsigned long)ulAddr);
- }
- return str;
- }
- char*
- NetLongToAsciiStr(UINT32 addr)
- {
- STATIC_CHAR_ARRAY(str, 16);/* Flawfinder: ignore */ // max addr string length + NULL -- "255.255.255.255"
- UCHAR* tmp = (UCHAR *)&addr;
- char* ptr = (char *)str;
- char* prevStrEnd = 0;
- SafeSprintf(ptr, sizeof(str), "%u", tmp[0]);
- ptr = (char *)memchr(str, 0, 16);
- prevStrEnd = ptr;
- SafeSprintf(ptr, sizeof(str)-(ptr-str), ".%u", tmp[1]);
- ptr = (char *)memchr(str, 0, 16);
- prevStrEnd = ptr;
- SafeSprintf(ptr, sizeof(str)-(ptr-str), ".%u", tmp[2]);
- ptr = (char *)memchr(str, 0, 16);
- prevStrEnd = ptr;
- SafeSprintf(ptr, sizeof(str)-(ptr-str), ".%u", tmp[3]);
- return str;
- }