etc/atalkd/nbp.c

   1 /*
   2  * $Id: nbp.c,v 1.13 2009-10-14 02:24:05 didg Exp $
   3  *
   4  * Copyright (c) 1990,1993 Regents of The University of Michigan.
   5  * All Rights Reserved. See COPYRIGHT.
   6  */
   7
   8 #ifdef HAVE_CONFIG_H
   9 #include "config.h"
  10 #endif /* HAVE_CONFIG_H */
  11
  12 #include <stdlib.h>
  13 #include <string.h>
  14 #include <errno.h>
  15 #include <atalk/logger.h>
  16 #include <sys/types.h>
  17 #include <sys/param.h>
  18 #include <sys/socket.h>
  19 #include <sys/ioctl.h>
  20 #ifdef TRU64
  21 #include <sys/mbuf.h>
  22 #include <net/route.h>
  23 #endif /* TRU64 */
  24 #include <net/if.h>
  25 #include <netatalk/at.h>
  26 #include <atalk/ddp.h>
  27 #include <atalk/atp.h>
  28 #include <atalk/nbp.h>
  29 #include <atalk/util.h>
  30
  31 #ifdef __svr4__
  32 #include <sys/sockio.h>
  33 #endif /* __svr4__ */
  34
  35 #include "atserv.h"
  36 #include "interface.h"
  37 #include "list.h"
  38 #include "rtmp.h"
  39 #include "gate.h"
  40 #include "zip.h"
  41 #include "nbp.h"
  42 #include "multicast.h"
  43
  44 extern int      transition;
  45
  46 struct nbptab   *nbptab = NULL;
  47
  48 static
  49 void nbp_ack( int fd, int nh_op, int nh_id, struct sockaddr_at *to)
  50 {
  51     struct nbphdr       nh;
  52     char                *data, packet[ SZ_NBPHDR + 1 ];
  53
  54     nh.nh_op = nh_op;
  55     nh.nh_cnt = 0;
  56     nh.nh_id = nh_id;
  57     data = packet;
  58     *data++ = DDPTYPE_NBP;
  59     memcpy( data, &nh, SZ_NBPHDR );
  60     data += SZ_NBPHDR;
  61     if ( sendto( fd, packet, data - packet, 0, (struct sockaddr *)to,
  62             sizeof( struct sockaddr_at )) < 0 ) {
  63         LOG(log_error, logtype_atalkd, "sendto: %s", strerror(errno) );
  64     }
  65 }
  66
  67 int nbp_packet(struct atport *ap, struct sockaddr_at *from, char *data, int len)
  68 {
  69     struct nbphdr       nh;
  70     struct nbptuple     nt;
  71     struct nbpnve       nn;
  72     struct sockaddr_at  sat;
  73     struct nbptab       *ntab;
  74     struct ziptab       *zt=NULL;
  75     struct interface    *iface;
  76     struct list         *l;
  77     struct rtmptab      *rtmp;
  78     char                *end, *nbpop, *zonep, packet[ ATP_BUFSIZ ];
  79     int                 n, i, cc, locallkup;
  80     u_char              tmplen;
  81
  82     end = data + len;
  83     if ( data >= end ) {
  84         LOG(log_info, logtype_atalkd, "nbp_packet malformed packet" );
  85         return 1;
  86     }
  87     if ( *data++ != DDPTYPE_NBP ) {
  88         LOG(log_info, logtype_atalkd, "nbp_packet bad ddp type" );
  89         return 1;
  90     }
  91
  92     if ( data + SZ_NBPHDR + SZ_NBPTUPLE > end ) {
  93         LOG(log_info, logtype_atalkd, "nbp_packet: malformed packet" );
  94         return 1;
  95     }
  96     memcpy( &nh, data, SZ_NBPHDR );
  97     nbpop = data;                       /* remember for fwd and brrq */
  98     data += SZ_NBPHDR;
  99     if ( nh.nh_cnt != 1 ) {
 100         LOG(log_info, logtype_atalkd, "nbp_packet: bad tuple count (%d/%d)", nh.nh_cnt,
 101                 nh.nh_op );
 102         return 1;
 103     }
 104
 105     memcpy( &nt, data, SZ_NBPTUPLE );
 106     data += SZ_NBPTUPLE;
 107
 108     memset( &nn.nn_sat, 0, sizeof( struct sockaddr_at ));
 109 #ifdef BSD4_4
 110     nn.nn_sat.sat_len = sizeof( struct sockaddr_at );
 111 #endif /* BSD4_4 */
 112     nn.nn_sat.sat_family = AF_APPLETALK;
 113     nn.nn_sat.sat_addr.s_net = nt.nt_net;
 114     nn.nn_sat.sat_addr.s_node = nt.nt_node;
 115     nn.nn_sat.sat_port = nt.nt_port;
 116
 117     /* object */
 118     tmplen = (u_char) *data;
 119     if ( data >= end || tmplen > 32 || data + tmplen > end ) {
 120         LOG(log_info, logtype_atalkd, "nbp_packet: malformed packet" );
 121         return 1;
 122     }
 123     nn.nn_objlen = tmplen;
 124     data++;
 125     memcpy( nn.nn_obj, data, nn.nn_objlen );
 126     data += nn.nn_objlen;
 127
 128     /* type */
 129     tmplen = (u_char) *data;
 130     if ( data >= end || tmplen > 32 || data + tmplen > end ) {
 131         LOG(log_info, logtype_atalkd, "nbp_packet: malformed packet" );
 132         return 1;
 133     }
 134     nn.nn_typelen = tmplen;
 135     data++;
 136     memcpy( nn.nn_type, data, nn.nn_typelen );
 137     data += nn.nn_typelen;
 138
 139     /* zone */
 140     tmplen = (u_char) *data;
 141     if ( data >= end || tmplen > 32 || data + tmplen > end ) {
 142         LOG(log_info, logtype_atalkd, "nbp_packet: malformed packet" );
 143         return 1;
 144     }
 145     zonep = data;                       /* remember for fwd */
 146     nn.nn_zonelen = tmplen;
 147     data++;
 148     memcpy( nn.nn_zone, data, nn.nn_zonelen );
 149     data += nn.nn_zonelen;
 150
 151     if ( data != end ) {
 152         LOG(log_info, logtype_atalkd, "nbp_packet: malformed packet" );
 153         return 1;
 154     }
 155
 156     locallkup = 0;
 157     switch ( nh.nh_op ) {
 158
 159     case NBPOP_RGSTR :
 160         /*
 161          * Find the ziptab entry for the zone we're trying to register in.
 162          */
 163         if ( nn.nn_zonelen == 0 ||
 164                 ( nn.nn_zonelen == 1 && *nn.nn_zone == '*' )) {
 165             if ( interfaces->i_next->i_rt->rt_zt ) {
 166                 zt = (struct ziptab *)interfaces->i_next->i_rt->rt_zt->l_data;
 167             } else {
 168                 zt = NULL;
 169             }
 170         } else {
 171             for ( zt = ziptab; zt; zt = zt->zt_next ) {
 172                 if ( zt->zt_len == nn.nn_zonelen && strndiacasecmp( zt->zt_name,
 173                         nn.nn_zone, zt->zt_len ) == 0 ) {
 174                     break;
 175                 }
 176             }
 177             if ( zt == NULL ) {
 178                 nbp_ack( ap->ap_fd, NBPOP_ERROR, (int)nh.nh_id, from );
 179                 return 0;
 180             }
 181         }
 182
 183         /*
 184          * Observe that we don't have to do any local-zone verification
 185          * if the zone aleady has a multicast address set.
 186          */
 187         if ( zt != NULL && zt->zt_bcast == NULL ) {
 188             /*
 189              * Check if zone is associated with any of our local interfaces.
 190              */
 191             for ( iface = interfaces; iface; iface = iface->i_next ) {
 192                 for ( l = iface->i_rt->rt_zt; l; l = l->l_next ) {
 193                     if ( zt == (struct ziptab *)l->l_data ) {
 194                         break;
 195                     }
 196                 }
 197                 if ( l != NULL ) {
 198                     break;
 199                 }
 200             }
 201             if ( iface == NULL ) {
 202                 nbp_ack( ap->ap_fd, NBPOP_ERROR, (int)nh.nh_id, from );
 203                 return 0;
 204             }
 205
 206             /* calculate and save multicast address */
 207             if (zone_bcast(zt) < 0) {
 208                 LOG(log_error, logtype_atalkd, "nbp_packet: zone_bcast");
 209                 return -1;
 210             }
 211
 212             for ( iface = interfaces; iface; iface = iface->i_next ) {
 213                 if (( iface->i_flags & IFACE_PHASE2 ) == 0 ) {
 214                     continue;
 215                 }
 216                 for ( l = iface->i_rt->rt_zt; l; l = l->l_next ) {
 217                     if ( zt == (struct ziptab *)l->l_data ) {
 218                         /* add multicast */
 219                         if (addmulti(iface->i_name, zt->zt_bcast) < 0) {
 220                             LOG(log_error, logtype_atalkd, "nbp_packet: addmulti: %s",
 221                                     strerror(errno) );
 222                             return -1;
 223                         }
 224                     }
 225                 }
 226             }
 227         }
 228
 229         if (( ntab = (struct nbptab *)malloc( sizeof( struct nbptab )))
 230                 == NULL ) {
 231             LOG(log_error, logtype_atalkd, "nbp_packet: malloc: %s", strerror(errno) );
 232             return -1;
 233         }
 234         memcpy( &ntab->nt_nve, &nn, sizeof( struct nbpnve ));
 235         ntab->nt_iface = ap->ap_iface;
 236         ntab->nt_next = nbptab;
 237         ntab->nt_prev = NULL;
 238         if ( nbptab ) {
 239             nbptab->nt_prev = ntab;
 240         }
 241         nbptab = ntab;
 242
 243         nbp_ack( ap->ap_fd, NBPOP_OK, (int)nh.nh_id, from );
 244         break;
 245
 246     case NBPOP_UNRGSTR :
 247         /* deal with local zone info */
 248         if (( nn.nn_zonelen == 1 && *nn.nn_zone == '*' ) ||
 249             ( nn.nn_zonelen == 0 )) {
 250           locallkup = 1;
 251           if ( interfaces->i_next->i_rt->rt_zt ) {
 252             zt = (struct ziptab *)interfaces->i_next->i_rt->rt_zt->l_data;
 253           } else {
 254             zt = NULL;
 255           }
 256         }
 257
 258         /* remove from our data, perhaps removing a multicast address */
 259         for ( ntab = nbptab; ntab; ntab = ntab->nt_next ) {
 260             if ( ntab->nt_nve.nn_objlen != nn.nn_objlen ||
 261                     strndiacasecmp( ntab->nt_nve.nn_obj, nn.nn_obj,
 262                     nn.nn_objlen )) {
 263                 continue;
 264             }
 265             if ( ntab->nt_nve.nn_typelen != nn.nn_typelen ||
 266                     strndiacasecmp( ntab->nt_nve.nn_type, nn.nn_type,
 267                     nn.nn_typelen )) {
 268                 continue;
 269             }
 270             /*
 271              * I *think* we really do check the zone, here.
 272              *
 273              * i changed it to better handle local zone cases as well.
 274              * -- asun
 275              */
 276
 277             /* match local zones */
 278             if (locallkup) {
 279               /* ntab is also local zone */
 280               if (( ntab->nt_nve.nn_zonelen == 1 &&
 281                     *ntab->nt_nve.nn_zone == '*' ) ||
 282                   (ntab->nt_nve.nn_zonelen == 0))
 283                 break;
 284
 285               /* ntab is default zone */
 286               if (zt && (zt->zt_len == ntab->nt_nve.nn_zonelen) &&
 287                   (strndiacasecmp(ntab->nt_nve.nn_zone, zt->zt_name,
 288                                   zt->zt_len) == 0)) {
 289                 break;
 290               }
 291             }
 292
 293             /* match particular zone */
 294             if ((ntab->nt_nve.nn_zonelen == nn.nn_zonelen) &&
 295                 (strndiacasecmp( ntab->nt_nve.nn_zone, nn.nn_zone,
 296                                 nn.nn_zonelen ) == 0)) {
 297                 break;
 298             }
 299         }
 300         if ( ntab == NULL ) {
 301             nbp_ack( ap->ap_fd, NBPOP_ERROR, (int)nh.nh_id, from );
 302             return 0;
 303         }
 304
 305         if ( ntab->nt_next != NULL ) {
 306             ntab->nt_next->nt_prev = ntab->nt_prev;
 307         }
 308         if ( ntab->nt_prev != NULL ) {
 309             ntab->nt_prev->nt_next = ntab->nt_next;
 310         }
 311         if ( ntab == nbptab ) {
 312             nbptab = ntab->nt_next;
 313         }
 314
 315         /*
 316          * Check for another nbptab entry with the same zone.  If
 317          * there isn't one, find the ziptab entry for the zone and
 318          * remove the multicast address from the appropriate interfaces.
 319          * XXX
 320          */
 321
 322         nbp_ack( ap->ap_fd, NBPOP_OK, (int)nh.nh_id, from );
 323         break;
 324
 325     case NBPOP_BRRQ :
 326         /*
 327          * Couple of things:  1. Unless we have the -t flag (which is sort
 328          * of a misnomer, since you need it if you're doing any phase 1
 329          * work), always send NBPOP_FWD.  2. If we get a zone of '*',
 330          * and we know what the sender meant by '*', we copy the real
 331          * zone into the packet.
 332          */
 333         if ( nn.nn_zonelen == 0 ||
 334                 ( nn.nn_zonelen == 1 && *nn.nn_zone == '*' )) {
 335             iface = ap->ap_iface;
 336             if ( iface && iface->i_rt->rt_zt ) {
 337                 zt = (struct ziptab *)iface->i_rt->rt_zt->l_data;
 338             } else if ( interfaces->i_next->i_rt->rt_zt ) {
 339                 zt = (struct ziptab *)interfaces->i_next->i_rt->rt_zt->l_data;
 340             } else {
 341                 zt = NULL;
 342             }
 343
 344             /*
 345              * Copy zone into packet.  Note that we're changing len, data, and
 346              * nbpop.  Later, we'll use ( data - len ) to mean the beginning
 347              * of this packet.
 348              */
 349             if ( zt ) {
 350                 memcpy( packet, data - len, len );
 351                 nbpop = packet + ( len - ( data - nbpop ));
 352                 data = packet + ( len - ( data - zonep ));
 353                 *data++ = zt->zt_len;
 354                 memcpy( data, zt->zt_name, zt->zt_len );
 355                 data += zt->zt_len;
 356                 len = data - packet;
 357             }
 358         } else {
 359             for ( zt = ziptab; zt; zt = zt->zt_next ) {
 360                 if ( zt->zt_len == nn.nn_zonelen && strndiacasecmp( zt->zt_name,
 361                         nn.nn_zone, zt->zt_len ) == 0 ) {
 362                     break;
 363                 }
 364             }
 365             if ( zt == NULL ) {
 366                 nbp_ack( ap->ap_fd, NBPOP_ERROR, (int)nh.nh_id, from );
 367                 return 0;
 368             }
 369         }
 370
 371         /*
 372          * If we've got no zones, send out LKUP on the local net.
 373          * Otherwise, look through the zone table.
 374          */
 375         if ( zt == NULL ) {
 376 #ifdef BSD4_4
 377             sat.sat_len = sizeof( struct sockaddr_at );
 378 #endif /* BSD4_4 */
 379             sat.sat_family = AF_APPLETALK;
 380             sat.sat_port = ap->ap_port;
 381
 382             nh.nh_op = NBPOP_LKUP;
 383             memcpy( nbpop, &nh, SZ_NBPHDR );
 384             sat.sat_addr.s_net = 0;                     /* XXX */
 385             sat.sat_addr.s_node = ATADDR_BCAST;
 386
 387             /* Find the first non-loopback ap */
 388             for ( iface = interfaces; iface; iface = iface->i_next ) {
 389                 if ((( iface->i_flags & IFACE_LOOPBACK ) == 0) &&
 390                     (iface == ap->ap_iface ||
 391                     (iface->i_flags & IFACE_ISROUTER))) {
 392                     break;
 393                 }
 394             }
 395             if ( iface == NULL ) {
 396                 return 0;
 397             }
 398             for ( ap = iface->i_ports; ap; ap = ap->ap_next ) {
 399                 if ( ap->ap_packet == nbp_packet ) {
 400                     break;
 401                 }
 402             }
 403
 404             if ( sendto( ap->ap_fd, data - len, len, 0, (struct sockaddr *)&sat,
 405                     sizeof( struct sockaddr_at )) < 0 ) {
 406                 LOG(log_error, logtype_atalkd, "nbp brrq sendto: %s", strerror(errno) );
 407             }
 408
 409             locallkup = 1;
 410         } else {
 411 #ifdef BSD4_4
 412             sat.sat_len = sizeof( struct sockaddr_at );
 413 #endif /* BSD4_4 */
 414             sat.sat_family = AF_APPLETALK;
 415             sat.sat_port = ap->ap_port;
 416             for ( l = zt->zt_rt; l; l = l->l_next ) {
 417                 rtmp = (struct rtmptab *)l->l_data;
 418
 419                 if ( rtmp->rt_gate == NULL ) {
 420                     for ( iface = interfaces; iface;
 421                             iface = iface->i_next ) {
 422                         if ( iface->i_rt == rtmp ) {
 423                             break;
 424                         }
 425                     }
 426                     if ( !iface ) {
 427                         LOG(log_error, logtype_atalkd, "nbp_packet: \
 428 Can't find route's interface!" );
 429                         return -1;
 430                     }
 431                     ap = iface->i_ports;
 432                 } else {
 433                     ap = rtmp->rt_gate->g_iface->i_ports;
 434                 }
 435                 for ( ; ap; ap = ap->ap_next ) {
 436                     if ( ap->ap_packet == nbp_packet ) {
 437                         break;
 438                     }
 439                 }
 440                 if ( !ap ) {
 441                     LOG(log_error, logtype_atalkd, "nbp_packet: Can't find port!" );
 442                     return -1;
 443                 }
 444
 445                 if ( transition &&
 446                         ( rtmp->rt_flags & RTMPTAB_EXTENDED ) == 0 ) {
 447                     if ( rtmp->rt_gate == NULL ) {
 448                         locallkup = 1;
 449                     }
 450                     nh.nh_op = NBPOP_LKUP;
 451                     memcpy( nbpop, &nh, SZ_NBPHDR );
 452                     sat.sat_addr.s_net = rtmp->rt_firstnet;
 453                     sat.sat_addr.s_node = ATADDR_BCAST;
 454                 } else {
 455                     if ( rtmp->rt_gate == NULL ) {
 456                         nh.nh_op = NBPOP_LKUP;
 457                         memcpy( nbpop, &nh, SZ_NBPHDR );
 458                         sat.sat_addr.s_net = 0;
 459                         sat.sat_addr.s_node = ATADDR_BCAST;
 460                         locallkup = 1;
 461                     } else {
 462                         nh.nh_op = NBPOP_FWD;
 463                         memcpy( nbpop, &nh, SZ_NBPHDR );
 464                         sat.sat_addr.s_net = rtmp->rt_firstnet;
 465                         sat.sat_addr.s_node = 0;
 466                     }
 467                 }
 468
 469                 if ( sendto( ap->ap_fd, data - len, len, 0,
 470                         (struct sockaddr *)&sat,
 471                         sizeof( struct sockaddr_at )) < 0 ) {
 472                     LOG(log_error, logtype_atalkd, "nbp brrq sendto %u.%u: %s",
 473                             ntohs( sat.sat_addr.s_net ), sat.sat_addr.s_node,
 474                             strerror(errno) );
 475                     continue;
 476                 }
 477             }
 478         }
 479
 480         if ( !locallkup ) {
 481             break;
 482         }
 483         /*FALL THROUGH*/
 484
 485     case NBPOP_FWD :
 486         /* send lkup on net. we need to make sure we're a router. */
 487         if ( !locallkup && (ap->ap_iface->i_flags & IFACE_ISROUTER)) {
 488             nh.nh_op = NBPOP_LKUP;
 489             memcpy( nbpop, &nh, SZ_NBPHDR );
 490             from->sat_addr.s_net = 0;
 491             from->sat_addr.s_node = ATADDR_BCAST;
 492             if ( sendto( ap->ap_fd, data - len, len, 0, (struct sockaddr *)from,
 493                     sizeof( struct sockaddr_at )) < 0 ) {
 494                 LOG(log_error, logtype_atalkd, "nbp fwd sendto %u.%u: %s",
 495                         ntohs( from->sat_addr.s_net ), from->sat_addr.s_node,
 496                         strerror(errno) );
 497                 return 0;
 498             }
 499         }
 500         /*FALL THROUGH*/
 501
 502     case NBPOP_LKUP :
 503         /* search our data */
 504         n = i = 0;
 505         data = packet + 1 + SZ_NBPHDR;
 506         end = packet + sizeof( packet );
 507
 508         for ( ntab = nbptab; ntab; ntab = ntab->nt_next ) {
 509             /* don't send out entries if we don't want to route. */
 510             if ((ap->ap_iface != ntab->nt_iface) &&
 511                 (ntab->nt_iface->i_flags & IFACE_ISROUTER) == 0) {
 512               continue;
 513             }
 514
 515             if ( nn.nn_objlen != 1 || *nn.nn_obj != '=' ) {
 516                 if ( ntab->nt_nve.nn_objlen != nn.nn_objlen ||
 517                         strndiacasecmp( ntab->nt_nve.nn_obj, nn.nn_obj,
 518                         nn.nn_objlen )) {
 519                     continue;
 520                 }
 521             }
 522
 523             if ( nn.nn_typelen != 1 || *nn.nn_type != '=' ) {
 524                 if ( ntab->nt_nve.nn_typelen != nn.nn_typelen ||
 525                         strndiacasecmp( ntab->nt_nve.nn_type, nn.nn_type,
 526                         nn.nn_typelen )) {
 527                     continue;
 528                 }
 529             }
 530
 531             if ( nn.nn_zonelen != 0 &&
 532                     ( nn.nn_zonelen != 1 || *nn.nn_zone != '*' )) {
 533                 if ( ntab->nt_nve.nn_zonelen == 0 ||
 534                         ( ntab->nt_nve.nn_zonelen == 1 &&
 535                         *ntab->nt_nve.nn_zone == '*' )) {
 536                     if ( interfaces->i_next->i_rt->rt_zt ) {
 537                         zt = (struct ziptab *)interfaces->i_next->i_rt->
 538                                 rt_zt->l_data;
 539                         if ( zt->zt_len != nn.nn_zonelen ||
 540                                 strndiacasecmp( zt->zt_name, nn.nn_zone,
 541                                 zt->zt_len )) {
 542                             continue;
 543                         }
 544                     }
 545                 } else {
 546                     if ( ntab->nt_nve.nn_zonelen != nn.nn_zonelen ||
 547                             strndiacasecmp( ntab->nt_nve.nn_zone, nn.nn_zone,
 548                             nn.nn_zonelen )) {
 549                         continue;
 550                     }
 551                 }
 552             }
 553
 554             /*
 555              * Another tuple won't fit. Send what we've already
 556              * got, and start the next packet.
 557              */
 558             if ( n > 14 || data + SZ_NBPTUPLE + 3 + ntab->nt_nve.nn_objlen +
 559                     ntab->nt_nve.nn_typelen + ntab->nt_nve.nn_zonelen > end ) {
 560                 nh.nh_op = NBPOP_LKUPREPLY;
 561                 nh.nh_cnt = n;
 562                 cc = data - packet;
 563                 data = packet;
 564                 *data++ = DDPTYPE_NBP;
 565                 memcpy( data, &nh, SZ_NBPHDR );
 566
 567                 if ( sendto( ap->ap_fd, packet, cc, 0,
 568                         (struct sockaddr *)&nn.nn_sat,
 569                         sizeof( struct sockaddr_at )) < 0 ) {
 570                     LOG(log_error, logtype_atalkd, "nbp lkup sendto %u.%u: %s",
 571                             ntohs( nn.nn_sat.sat_addr.s_net ),
 572                             nn.nn_sat.sat_addr.s_node,
 573                             strerror(errno) );
 574                     return 0;
 575                 }
 576
 577                 n = 0;
 578                 data = packet + 1 + SZ_NBPHDR;
 579                 end = packet + sizeof( packet );
 580             }
 581
 582             nt.nt_net = ntab->nt_nve.nn_sat.sat_addr.s_net;
 583             nt.nt_node = ntab->nt_nve.nn_sat.sat_addr.s_node;
 584             nt.nt_port = ntab->nt_nve.nn_sat.sat_port;
 585             /*
 586              * Right now, we'll just give each name a unique enum.  In
 587              * the future, we might need to actually assign and save
 588              * an enum, based on the associated address.  For the moment,
 589              * the enums will be unique and constant, since the order
 590              * is fixed.
 591              */
 592             nt.nt_enum = i++;
 593
 594             memcpy( data, &nt, SZ_NBPTUPLE );
 595             data += SZ_NBPTUPLE;
 596
 597             *data++ = ntab->nt_nve.nn_objlen;
 598             memcpy( data, ntab->nt_nve.nn_obj, ntab->nt_nve.nn_objlen );
 599             data += ntab->nt_nve.nn_objlen;
 600
 601             *data++ = ntab->nt_nve.nn_typelen;
 602             memcpy(data, ntab->nt_nve.nn_type, ntab->nt_nve.nn_typelen );
 603             data += ntab->nt_nve.nn_typelen;
 604
 605             /*
 606              * Macs won't see something with a zone of 0 length.  We
 607              * will always return '*' instead.  Perhaps we should
 608              * unconditionally return the real zone?
 609              */
 610             if ( ntab->nt_nve.nn_zonelen ) {
 611                 *data++ = ntab->nt_nve.nn_zonelen;
 612                 memcpy( data, ntab->nt_nve.nn_zone, ntab->nt_nve.nn_zonelen );
 613                 data += ntab->nt_nve.nn_zonelen;
 614             } else {
 615                 *data++ = 1;
 616                 *data++ = '*';
 617             }
 618
 619             n++;
 620         }
 621
 622         if ( n != 0 ) {
 623             nh.nh_op = NBPOP_LKUPREPLY;
 624             nh.nh_cnt = n;
 625             cc = data - packet;
 626             data = packet;
 627             *data++ = DDPTYPE_NBP;
 628             memcpy( data, &nh, SZ_NBPHDR );
 629
 630             if ( sendto( ap->ap_fd, packet, cc, 0,
 631                     (struct sockaddr *)&nn.nn_sat,
 632                     sizeof( struct sockaddr_at )) < 0 ) {
 633                 LOG(log_error, logtype_atalkd, "nbp lkup sendto %u.%u: %s",
 634                         ntohs( nn.nn_sat.sat_addr.s_net ),
 635                         nn.nn_sat.sat_addr.s_node,
 636                         strerror(errno) );
 637                 return 0;
 638             }
 639         }
 640         break;
 641
 642     default :
 643         LOG(log_info, logtype_atalkd, "nbp_packet: bad op (%d)", nh.nh_op );
 644         return 1;
 645     }
 646
 647     return 0;
 648 }