inet/ether_line.c

   1 /* Copyright (C) 1996 Free Software Foundation, Inc.
   2 This file is part of the GNU C Library.
   3
   4 The GNU C Library is free software; you can redistribute it and/or
   5 modify it under the terms of the GNU Library General Public License as
   6 published by the Free Software Foundation; either version 2 of the
   7 License, or (at your option) any later version.
   8
   9 The GNU C Library is distributed in the hope that it will be useful,
  10 but WITHOUT ANY WARRANTY; without even the implied warranty of
  11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12 Library General Public License for more details.
  13
  14 You should have received a copy of the GNU Library General Public
  15 License along with the GNU C Library; see the file COPYING.LIB.  If
  16 not, write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  17 Boston, MA 02111-1307, USA.  */
  18
  19 #include <stdlib.h>
  20 #include <netinet/ether.h>
  21 #include <netinet/if_ether.h>
  22
  23
  24 int
  25 ether_line (const char *line, struct ether_addr *addr, char *hostname)
  26 {
  27   size_t cnt;
  28   char *cp;
  29
  30   for (cnt = 0; cnt < 6; ++cnt)
  31     {
  32       unsigned int number;
  33       char ch;
  34
  35       ch = tolower (*line++);
  36       if ((ch < '0' || ch > '9') && (ch < 'a' || ch > 'f'))
  37         return -1;
  38       number = isdigit (ch) ? (ch - '0') : (ch - 'a' + 10);
  39
  40       ch = tolower (*line);
  41       if ((cnt < 5 && ch != ':') || (cnt == 5 && ch != '\0' && !isspace (ch)))
  42         {
  43           ++line;
  44           if ((ch < '0' || ch > '9') && (ch < 'a' || ch > 'f'))
  45             return -1;
  46           number <<= 4;
  47           number = isdigit (ch) ? (ch - '0') : (ch - 'a' + 10);
  48
  49           ch = *line;
  50           if (cnt < 5 && ch != ':')
  51             return -1;
  52         }
  53
  54       /* Store result.  */
  55       addr->ether_addr_octet[cnt] = (unsigned char) number;
  56
  57       /* Skip ':'.  */
  58       if (ch != '\0')
  59         ++line;
  60     }
  61
  62   /* Remove trailing white space.  */
  63   cp = strchr (line, '#');
  64   if (cp == NULL)
  65     cp = strchr (line, '\0');
  66   while (cp > line && isspace (cp[-1]))
  67     --cp;
  68   *cp = '\0';
  69
  70   if (*line == '\0')
  71     /* No hostname.  */
  72     return -1;
  73
  74   /* XXX This can cause trouble because the hostname might be too long
  75      but we have no possibility to check it here.  */
  76   strcpy (hostname, line);
  77
  78   return 0;
  79 }