stdethers.tproj/stdethers.c

   1 /*
   2  * Copyright (c) 1999 Apple Computer, Inc. All rights reserved.
   3  *
   4  * @APPLE_LICENSE_HEADER_START@
   5  *
   6  * Copyright (c) 1999-2003 Apple Computer, Inc.  All Rights Reserved.
   7  *
   8  * This file contains Original Code and/or Modifications of Original Code
   9  * as defined in and that are subject to the Apple Public Source License
  10  * Version 2.0 (the 'License'). You may not use this file except in
  11  * compliance with the License. Please obtain a copy of the License at
  12  * http://www.opensource.apple.com/apsl/ and read it before using this
  13  * file.
  14  *
  15  * The Original Code and all software distributed under the License are
  16  * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
  17  * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
  18  * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
  19  * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
  20  * Please see the License for the specific language governing rights and
  21  * limitations under the License.
  22  *
  23  * @APPLE_LICENSE_HEADER_END@
  24  */
  25 /*      $OpenBSD: stdethers.c,v 1.3 1997/09/11 19:47:33 deraadt Exp $ */
  26
  27 /*
  28  * Copyright (c) 1995 Mats O Jansson <moj@stacken.kth.se>
  29  * All rights reserved.
  30  *
  31  * Redistribution and use in source and binary forms, with or without
  32  * modification, are permitted provided that the following conditions
  33  * are met:
  34  * 1. Redistributions of source code must retain the above copyright
  35  *    notice, this list of conditions and the following disclaimer.
  36  * 2. Redistributions in binary form must reproduce the above copyright
  37  *    notice, this list of conditions and the following disclaimer in the
  38  *    documentation and/or other materials provided with the distribution.
  39  * 3. All advertising materials mentioning features or use of this software
  40  *    must display the following acknowledgement:
  41  *      This product includes software developed by Mats O Jansson
  42  * 4. The name of the author may not be used to endorse or promote products
  43  *    derived from this software without specific prior written permission.
  44  *
  45  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS
  46  * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
  47  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  48  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
  49  * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  50  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  51  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  52  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  53  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  54  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  55  * SUCH DAMAGE.
  56  */
  57
  58 #ifndef LINT
  59 static char rcsid[] = "$OpenBSD: stdethers.c,v 1.3 1997/09/11 19:47:33 deraadt Exp $";
  60 #endif
  61
  62 #include <sys/types.h>
  63 #include <sys/socket.h>
  64 #include <net/if.h>
  65 #include <netinet/in.h>
  66 #include <netinet/if_ether.h>
  67 #include <stdio.h>
  68 #include <string.h>
  69 #include <ctype.h>
  70
  71 char *ProgramName = "stdethers";
  72
  73 extern int   ether_line(char *, struct ether_addr *, char *);
  74
  75 #ifndef NTOA_FIX
  76 #define NTOA(x) (char *)ether_ntoa(x)
  77 #else
  78 #define NTOA(x) (char *) working_ntoa((u_char *) x)
  79
  80 /* As of 1995-12-02 NetBSD and OpenBSD has an SunOS 4 incompatible ether_ntoa.
  81    The code in usr/lib/libc/net/ethers seems to do the correct thing
  82    when asking YP but not when returning string from ether_ntoa.
  83  */
  84
  85 char *
  86 working_ntoa(e)
  87         u_char  *e;
  88 {
  89         static char a[] = "xx:xx:xx:xx:xx:xx";
  90
  91         sprintf(a, "%x:%x:%x:%x:%x:%x",
  92                 e[0], e[1], e[2], e[3], e[4], e[5]);
  93         return a;
  94 }
  95 #endif
  96
  97 static int read_line(fp, buf, size)
  98 FILE *fp;
  99 char *buf;
 100 int size;
 101 {
 102         int done = 0;
 103
 104         do {
 105                 while (fgets(buf, size, fp)) {
 106                         int len = strlen(buf);
 107                         done += len;
 108                         if (len > 1 && buf[len-2] == '\\' &&
 109                                         buf[len-1] == '\n') {
 110                                 int ch;
 111                                 buf += len - 2;
 112                                 size -= len - 2;
 113                                 *buf = '\n'; buf[1] = '\0';
 114                                 /*
 115                                  * Skip leading white space on next line
 116                                  */
 117                                 while ((ch = getc(fp)) != EOF &&
 118                                         isascii(ch) && isspace(ch))
 119                                                 ;
 120                                 (void) ungetc(ch, fp);
 121                         } else {
 122                                 return done;
 123                         }
 124                 }
 125         } while (size > 0 && !feof(fp));
 126
 127         return done;
 128 }
 129
 130 int
 131 main (argc,argv)
 132 int argc;
 133 char *argv[];
 134 {
 135         FILE    *data_file;
 136         char     data_line[1024];
 137         int      usage = 0;
 138         int      line_no = 0;
 139         int      len;
 140         char    *p,*k,*v;
 141         struct ether_addr eth_addr;
 142         char     hostname[256];
 143
 144         if (argc > 2) {
 145                 usage++;
 146         }
 147
 148         if (usage) {
 149                 fprintf(stderr,
 150                         "usage: %s [file]\n",
 151                         ProgramName);
 152                 exit(1);
 153         }
 154
 155         if (argc == 2) {
 156                 data_file = fopen(argv[1], "r");
 157                 if (data_file == NULL) {
 158                         fprintf(stderr,
 159                                 "%s: can't open %s\n",
 160                                 ProgramName,
 161                                 argv[1]);
 162                         exit(1);
 163                 }
 164         } else {
 165                 data_file = stdin;
 166         }
 167
 168         while (read_line(data_file,data_line,sizeof(data_line))) {
 169
 170                 line_no++;
 171                 len = strlen(data_line);
 172
 173                 if (len > 0) {
 174                         if (data_line[0] == '#')
 175                                 continue;
 176                 }
 177
 178                 /*
 179                  * Check if we have the whole line
 180                  */
 181
 182                 if (data_line[len-1] != '\n') {
 183                         if (argc == 2) {
 184                                 fprintf(stderr,
 185                                         "line %d in \"%s\" is too long",
 186                                         line_no, argv[1]);
 187                         } else {
 188                                 fprintf(stderr,
 189                                         "line %d in \"stdin\" is too long",
 190                                         line_no);
 191                         }
 192                 } else {
 193                         data_line[len-1] = '\0';
 194                 }
 195
 196                 p = (char *) &data_line;
 197
 198                 k  = p;                         /* save start of key */
 199                 while (!isspace(*p)) { p++; };  /* find first "space" */
 200                 while (isspace(*p)) { p++; };   /* move over "space" */
 201
 202                 v = p;                          /* save start of value */
 203                 while(*p != '\0') { p++; };     /* find end of string */
 204
 205                 if (ether_line(data_line, &eth_addr, hostname) == 0) {
 206                         fprintf(stdout, "%s\t%s\n",
 207                                 NTOA(&eth_addr),
 208                                 hostname);
 209                 } else {
 210                         fprintf(stderr,
 211                                 "%s: ignoring line %d: \"%s\"\n",
 212                                 ProgramName,
 213                                 line_no,
 214                                 data_line);
 215                 }
 216         }
 217
 218         return(0);
 219
 220 }