michael@0: /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
michael@0: /* This Source Code Form is subject to the terms of the Mozilla Public
michael@0:  * License, v. 2.0. If a copy of the MPL was not distributed with this
michael@0:  * file, You can obtain one at http://mozilla.org/MPL/2.0/. */
michael@0: 
michael@0: #include "prio.h"
michael@0: #include "prenv.h"
michael@0: #include "prmem.h"
michael@0: #include "prlink.h"
michael@0: #include "prsystem.h"
michael@0: #include "prnetdb.h"
michael@0: #include "prprf.h"
michael@0: #include "prvrsion.h"
michael@0: 
michael@0: #include "plerror.h"
michael@0: #include "plgetopt.h"
michael@0: #include "obsolete/probslet.h"
michael@0: 
michael@0: #include <string.h>
michael@0: 
michael@0: #define DNS_BUFFER 100
michael@0: #define ADDR_BUFFER 100
michael@0: #define HOST_BUFFER 1024
michael@0: #define PROTO_BUFFER 1500
michael@0: 
michael@0: #define NETADDR_SIZE(addr) \
michael@0:     (PR_AF_INET == (addr)->raw.family ? \
michael@0:     sizeof((addr)->inet) : sizeof((addr)->ipv6))
michael@0: 
michael@0: static PRFileDesc *err = NULL;
michael@0: 
michael@0: static void Help(void)
michael@0: {
michael@0:     PR_fprintf(err, "Usage: [-V] [-h]\n");
michael@0:     PR_fprintf(err, "\t<nul>    Name of host to lookup          (default: self)\n");
michael@0:     PR_fprintf(err, "\t-V       Display runtime version info    (default: FALSE)\n");
michael@0:     PR_fprintf(err, "\t-h       This message and nothing else\n");
michael@0: }  /* Help */
michael@0: 
michael@0: static void DumpAddr(const PRNetAddr* address, const char *msg)
michael@0: {
michael@0:     PRUint32 *word = (PRUint32*)address;
michael@0:     PRUint32 addr_len = sizeof(PRNetAddr);
michael@0:     PR_fprintf(err, "%s[%d]\t", msg, NETADDR_SIZE(address));
michael@0:     while (addr_len > 0)
michael@0:     {
michael@0:         PR_fprintf(err, " %08x", *word++);
michael@0:         addr_len -= sizeof(PRUint32);
michael@0:     }
michael@0:     PR_fprintf(err, "\n");
michael@0: }  /* DumpAddr */
michael@0: 
michael@0: static PRStatus PrintAddress(const PRNetAddr* address)
michael@0: {
michael@0:     PRNetAddr translation;
michael@0:     char buffer[ADDR_BUFFER];
michael@0:     PRStatus rv = PR_NetAddrToString(address, buffer, sizeof(buffer));
michael@0:     if (PR_FAILURE == rv) PL_FPrintError(err, "PR_NetAddrToString");
michael@0:     else
michael@0:     {
michael@0:         PR_fprintf(err, "\t%s\n", buffer);
michael@0:         memset(&translation, 0, sizeof(translation));
michael@0:         rv = PR_StringToNetAddr(buffer, &translation);
michael@0:         if (PR_FAILURE == rv) PL_FPrintError(err, "PR_StringToNetAddr");
michael@0:         else
michael@0:         {
michael@0:             PRSize addr_len = NETADDR_SIZE(address);
michael@0:             if (0 != memcmp(address, &translation, addr_len))
michael@0:             {
michael@0:                 PR_fprintf(err, "Address translations do not match\n");
michael@0:                 DumpAddr(address, "original");
michael@0:                 DumpAddr(&translation, "translate");
michael@0:                 rv = PR_FAILURE;
michael@0:             }
michael@0:         }
michael@0:     }
michael@0:     return rv;
michael@0: }  /* PrintAddress */
michael@0: 
michael@0: int main(int argc, char **argv)
michael@0: {
michael@0:     PRStatus rv;
michael@0:     PLOptStatus os;
michael@0:     PRHostEnt host;
michael@0:     PRProtoEnt proto;
michael@0:     const char *name = NULL;
michael@0:     PRBool failed = PR_FALSE, version = PR_FALSE;
michael@0:     PLOptState *opt = PL_CreateOptState(argc, argv, "Vh");
michael@0: 
michael@0:     err = PR_GetSpecialFD(PR_StandardError);
michael@0: 
michael@0:     while (PL_OPT_EOL != (os = PL_GetNextOpt(opt)))
michael@0:     {
michael@0:         if (PL_OPT_BAD == os) continue;
michael@0:         switch (opt->option)
michael@0:         {
michael@0:         case 0:  /* Name of host to lookup */
michael@0:             name = opt->value;
michael@0:             break;
michael@0:          case 'V':  /* Do version discovery */
michael@0:             version = PR_TRUE;
michael@0:             break;
michael@0:         case 'h':  /* user wants some guidance */
michael@0:          default:
michael@0:             Help();  /* so give him an earful */
michael@0:             return 2;  /* but not a lot else */
michael@0:         }
michael@0:     }
michael@0:     PL_DestroyOptState(opt);
michael@0: 
michael@0:     if (version)
michael@0:     {
michael@0: #if defined(WINNT)
michael@0: #define NSPR_LIB "libnspr4"
michael@0: #else
michael@0: #define NSPR_LIB "nspr4"
michael@0: #endif
michael@0:         const PRVersionDescription *version_info;
michael@0:         char *nspr_path = PR_GetEnv("LD_LIBRARY_PATH");
michael@0:         char *nspr_name = PR_GetLibraryName(nspr_path, NSPR_LIB);
michael@0:         PRLibrary *runtime = PR_LoadLibrary(nspr_name);
michael@0:         if (NULL == runtime)
michael@0:             PL_FPrintError(err, "PR_LoadLibrary");
michael@0:         else
michael@0:         {
michael@0:             versionEntryPointType versionPoint = (versionEntryPointType)
michael@0:                 PR_FindSymbol(runtime, "libVersionPoint");
michael@0:             if (NULL == versionPoint)
michael@0:                 PL_FPrintError(err, "PR_FindSymbol");
michael@0:             else
michael@0:             {
michael@0:                 char buffer[100];
michael@0:                 PRExplodedTime exploded;
michael@0:                 version_info = versionPoint();
michael@0:                 (void)PR_fprintf(err, "Runtime library version information\n");
michael@0:                 PR_ExplodeTime(
michael@0:                     version_info->buildTime, PR_GMTParameters, &exploded);
michael@0:                 (void)PR_FormatTime(
michael@0:                     buffer, sizeof(buffer), "%d %b %Y %H:%M:%S", &exploded);
michael@0:                 (void)PR_fprintf(err, "  Build time: %s GMT\n", buffer);
michael@0:                 (void)PR_fprintf(
michael@0:                     err, "  Build time: %s\n", version_info->buildTimeString);
michael@0:                 (void)PR_fprintf(
michael@0:                     err, "  %s V%u.%u.%u (%s%s%s)\n",
michael@0:                     version_info->description,
michael@0:                     version_info->vMajor,
michael@0:                     version_info->vMinor,
michael@0:                     version_info->vPatch,
michael@0:                     (version_info->beta ? " beta " : ""),
michael@0:                     (version_info->debug ? " debug " : ""),
michael@0:                     (version_info->special ? " special" : ""));
michael@0:                 (void)PR_fprintf(err, "  filename: %s\n", version_info->filename);
michael@0:                 (void)PR_fprintf(err, "  security: %s\n", version_info->security);
michael@0:                 (void)PR_fprintf(err, "  copyright: %s\n", version_info->copyright);
michael@0:                 (void)PR_fprintf(err, "  comment: %s\n", version_info->comment);
michael@0:             }
michael@0:         }
michael@0:         if (NULL != nspr_name) PR_FreeLibraryName(nspr_name);
michael@0:     }
michael@0: 
michael@0:     {
michael@0:         if (NULL == name)
michael@0:         {
michael@0:             char *me = (char*)PR_MALLOC(DNS_BUFFER);
michael@0:             rv = PR_GetSystemInfo(PR_SI_HOSTNAME, me, DNS_BUFFER);
michael@0:             if (PR_FAILURE == rv)
michael@0:             {
michael@0:                 failed = PR_TRUE;
michael@0:                 PL_FPrintError(err, "PR_GetSystemInfo");
michael@0:                 return 2;
michael@0:             }
michael@0:             name = me;  /* just leak the storage */
michael@0:         }
michael@0:     }
michael@0: 
michael@0:     {
michael@0:         char buffer[HOST_BUFFER];
michael@0:         PR_fprintf(err, "Translating the name %s ...", name);
michael@0: 
michael@0:         rv = PR_GetHostByName(name, buffer, sizeof(buffer), &host);
michael@0:         if (PR_FAILURE == rv)
michael@0:         {
michael@0:             failed = PR_TRUE;
michael@0:             PL_FPrintError(err, "PR_GetHostByName");
michael@0:         }
michael@0:         else
michael@0:         {
michael@0:             PRIntn index = 0;
michael@0:             PRNetAddr address;
michael@0:             memset(&address, 0, sizeof(PRNetAddr));
michael@0:             PR_fprintf(err, "success .. enumerating results\n");
michael@0:             do
michael@0:             {
michael@0:                 index = PR_EnumerateHostEnt(index, &host, 0, &address);
michael@0:                 if (index > 0) PrintAddress(&address);
michael@0:                 else if (-1 == index)
michael@0:                 {
michael@0:                     failed = PR_TRUE;
michael@0:                     PL_FPrintError(err, "PR_EnumerateHostEnt");
michael@0:                 }
michael@0:             } while (index > 0);
michael@0:         }
michael@0:     }
michael@0: 
michael@0: 
michael@0:     {
michael@0:         char buffer[PROTO_BUFFER];
michael@0:         /*
michael@0:         ** Get Proto by name/number
michael@0:         */
michael@0:         rv = PR_GetProtoByName("tcp", &buffer[1], sizeof(buffer) - 1, &proto);
michael@0:         rv = PR_GetProtoByNumber(6, &buffer[3], sizeof(buffer) - 3, &proto);
michael@0:     }
michael@0: 
michael@0:     return (failed) ? 1 : 0;
michael@0: }