home bbs files messages ]

Just a sample of the Echomail archive

Cooperative anarchy at its finest, still active today. Darkrealms is the Zone 1 Hub.

   BINKD      Support for the Internet BinKD mailer      8,958 messages   

[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]

   Message 7,605 of 8,958   
   Oli to All   
   Perl on_handshake(): @me contains no val   
   08 Sep 21 11:37:42   
   
   MSGID: 2:280/464.47 61389274   
   PID: JamNNTPd/Linux 1   
   CHRS: LATIN-1 2   
   TZUTC: 0100   
   TID: CrashMail II/Linux 1.7   
   HELP! ;)   
   I'm trying to use the @me array in on_handshake(), but no matter what I do I   
   always get the error:   
      
   "Perl on_handshake(): @me contains no valid addresses"   
      
   even with this simple sub:   
      
   sub on_handshake   
   {   
     @me;   
   }   
      
   + 08 Sep 09:45:26 [51014] incoming session with unknown   
   - 08 Sep 09:45:27 [51014] VER binkd/1.1a-112/Linux binkp/1.1   
   + 08 Sep 09:45:27 [51014] addr: 4000:1/1@testnet   
   + 08 Sep 09:45:27 [51014] Perl on_handshake(): @me contains no valid addresses   
   - 08 Sep 09:45:27 [51014] hiding aka 2000:1/2@fakenet   
      
   Is this a bug or how do I use @me? The perlhooks documentation says   
      
   5) on_handshake()   
      - for server called after receiving remote addresses (before addr is sent)   
      - best for hide_aka and present_aka logic :-)   
      - return non-empty string to abort session with that reason   
        otherwise, if @me is defined present @me as our akas   
      
      
   The error message is from perlhooks.c   
      
     if ((me = perl_get_av("me", FALSE)) != NULL) {   
       FTN_ADDR addr;   
       int n = 0, N = av_len(me) + 1;   
       if (N > 0) state->pAddr = xalloc(N*sizeof(FTN_ADDR));   
       for (i = 0; i < N; i++) {   
         svp = av_fetch(me, i, FALSE);   
         if (svp == NULL) continue;   
         if (!parse_ftnaddress(SvPV(*svp, len), &addr, cfg->pDomains.first))   
   continue;   
         exp_ftnaddress(&addr, cfg->pAddr, cfg->nAddr, cfg->pDomains.first);   
         state->pAddr[n++] = addr;   
       }   
       state->nAddr = n;   
       if (n == 0) Log(LL_WARN, "Perl on_handshake(): @me contains no valid   
   addresses");   
     }   
      
   ---   
    * Origin: 1995| Invention of the Cookie. The End. (2:280/464.47)   
   SEEN-BY: 1/123 14/0 30/0 80/1 90/1 103/705 105/81 114/709 120/340   
   SEEN-BY: 123/131 124/5016 129/305 154/10 203/0 218/700 221/0 1 6 226/30   
   SEEN-BY: 227/114 229/200 424 426 550 664 700 1017 240/1120 5832 249/109   
   SEEN-BY: 249/206 307 317 261/38 280/464 5003 5555 282/464 1038 292/854   
   SEEN-BY: 292/8125 301/0 1 101 113 123 812 310/31 322/757 341/66 342/200   
   SEEN-BY: 396/45 423/120 460/58 633/280 712/848 770/1 920/1 2452/250   
   SEEN-BY: 5020/1042 5058/104   
   PATH: 280/464 301/1 229/426   
      

[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]


(c) 1994,  bbs@darkrealms.ca