home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Internet Tools 1993 July / Internet Tools.iso / RockRidge / mail / mmdf / mmdf-IIb.43 / lib / addr / td.c < prev    next >
Encoding:
C/C++ Source or Header  |  1986-02-01  |  1.3 KB  |  78 lines
  1. #include "util.h"
  2. #include "mmdf.h"
  3. #include "ch.h"
  4. #include "dm.h"
  5.  
  6. extern LLog *logptr;
  7.  
  8. main ()
  9. {
  10.     char adr [LINESIZE];
  11.     char result [LINESIZE];
  12.     Dmn_route rbuf;
  13.     Dmn_route *route = &rbuf;
  14.     Domain dbuf;
  15.     Domain *dmn = &dbuf;
  16.     Chan *tchan;
  17.  
  18.     mmdf_init ("TEST-DM");
  19.     siginit ();
  20.     logptr -> ll_level = LLOGFTR;
  21.  
  22.     while (TRUE)
  23.     {
  24.     int i;
  25.  
  26.     printf ("\ngive test string (q to quit):");
  27.     scanf ("%s", adr);
  28.     if (lexequ (adr, "q"))
  29.     {
  30.         printf ("quitting\n");
  31.         exit(0);
  32.     }
  33.     printf ("received: '%s'\n", adr);
  34.  
  35.  
  36.     printf ("dm_v2route (%s) gives: ",adr);
  37.     dmn = dm_v2route (adr, result, route);
  38.     if (dmn  == (Domain *) NOTOK)
  39.     {
  40.         printf ("Error \n\n\n");
  41.     }
  42.     else
  43.     {
  44.         printf ("%s \n", dmn->dm_show);
  45.         printf ("domain in full is '%s'\n", result);
  46.         printf ("Route: '%s'\n", route->dm_buf);
  47.         for (i=0; i <= route->dm_argc; i++)
  48.           printf ("    Component (%d): '%s'\n", i, route->dm_argv[i]);
  49.     }
  50.     fflush (stdout);
  51.  
  52.  
  53.     for (i=1;;i++)
  54.     {
  55.         if ((tchan = ch_h2chan (adr, i)) == (Chan *) NOTOK)
  56.         {
  57.         printf ("ch_h2chan returns NOTOK\n");
  58.         break;
  59.         }
  60.         else
  61.         {
  62.         if (tchan == (Chan *) OK)
  63.             printf ("local reference (%d)\n", i);
  64.         else
  65.             printf ("ch_h2chan (%d) gives channel '%s'\n", i, tchan -> ch_show);
  66.         }
  67.     }
  68.  
  69.  
  70.     printf ("\n\n");
  71.    }
  72. }
  73.  
  74. err_abrt ()
  75. {
  76. printf ("aborting\n");
  77. }
  78.