librols/gethostid.c

   1 /*
   2  * This file has been modified for the cdrkit suite.
   3  *
   4  * The behaviour and appearence of the program code below can differ to a major
   5  * extent from the version distributed by the original author(s).
   6  *
   7  * For details, see Changelog file distributed with the cdrkit package. If you
   8  * received this file from another source then ask the distributing person for
   9  * a log of modifications.
  10  *
  11  */
  12
  13 /* @(#)gethostid.c      1.15 03/06/15 Copyright 1995-2003 J. Schilling */
  14 /*
  15  *      Copyright (c) 1995-2003 J. Schilling
  16  */
  17 /*
  18  * This program is free software; you can redistribute it and/or modify
  19  * it under the terms of the GNU General Public License version 2
  20  * as published by the Free Software Foundation.
  21  *
  22  * This program is distributed in the hope that it will be useful,
  23  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  24  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  25  * GNU General Public License for more details.
  26  *
  27  * You should have received a copy of the GNU General Public License along with
  28  * this program; see the file COPYING.  If not, write to the Free Software
  29  * Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  30  */
  31
  32 #include <mconfig.h>
  33 #include <standard.h>
  34 #include <stdxlib.h>
  35 #include <utypes.h>
  36 #ifdef  HAVE_SYS_SYSTEMINFO_H
  37 #include <sys/systeminfo.h>
  38 #endif
  39 #include <libport.h>
  40
  41 #ifndef HAVE_GETHOSTID
  42 EXPORT  long    gethostid       __PR((void));
  43 #endif
  44
  45
  46 #if     !defined(HAVE_GETHOSTID)
  47
  48 #if     defined(SI_HW_SERIAL)
  49
  50 EXPORT long
  51 gethostid()
  52 {
  53         long    id;
  54
  55         char    hbuf[257];
  56         sysinfo(SI_HW_SERIAL, hbuf, sizeof (hbuf));
  57         id = atoi(hbuf);
  58         return (id);
  59 }
  60 #else
  61
  62 #include <errno.h>
  63 EXPORT long
  64 gethostid()
  65 {
  66         long    id = -1L;
  67
  68 #ifdef  ENOSYS
  69         seterrno(ENOSYS);
  70 #else
  71         seterrno(EINVAL);
  72 #endif
  73         return (id);
  74 }
  75 #endif
  76
  77 #endif