/* * Copyright (C) 2000-2006 Erik Andersen * * Licensed under the LGPL v2.1, see the file COPYING.LIB in this tarball. */ #define __FORCE_GLIBC #include #include #include #include #include #include #include #include #include /* Experimentally off - libc_hidden_proto(memcpy) */ libc_hidden_proto(open) /* libc_hidden_proto(close) */ libc_hidden_proto(read) libc_hidden_proto(write) libc_hidden_proto(getuid) libc_hidden_proto(geteuid) libc_hidden_proto(gethostbyname_r) libc_hidden_proto(gethostname) #define HOSTID "/etc/hostid" #ifdef __USE_BSD int sethostid(long int new_id) { int fd; int ret; if (geteuid() || getuid()) return __set_errno(EPERM); if ((fd=open(HOSTID,O_CREAT|O_WRONLY,0644))<0) return -1; ret = write(fd,(void *)&new_id,sizeof(new_id)) == sizeof(new_id) ? 0 : -1; close (fd); return ret; } #endif long int gethostid(void) { char host[MAXHOSTNAMELEN + 1]; int fd, id; /* If hostid was already set then we can return that value. * It is not an error if we cannot read this file. It is not even an * error if we cannot read all the bytes, we just carry on trying... */ if ((fd=open(HOSTID,O_RDONLY))>=0 && read(fd,(void *)&id,sizeof(id))) { close (fd); return id; } if (fd >= 0) close (fd); /* Try some methods of returning a unique 32 bit id. Clearly IP * numbers, if on the internet, will have a unique address. If they * are not on the internet then we can return 0 which means they should * really set this number via a sethostid() call. If their hostname * returns the loopback number (i.e. if they have put their hostname * in the /etc/hosts file with 127.0.0.1) then all such hosts will * have a non-unique hostid, but it doesn't matter anyway and * gethostid() will return a non zero number without the need for * setting one anyway. * Mitch */ if (gethostname(host,MAXHOSTNAMELEN)>=0 && *host) { struct hostent *hp; struct in_addr in; struct hostent ghbn_h; char ghbn_buf[sizeof(struct in_addr) + sizeof(struct in_addr *)*2 + sizeof(char *)*((2 + 5/*MAX_ALIASES*/ + 1)/*ALIAS_DIM*/) + 256/*namebuffer*/ + 32/* margin */]; int ghbn_errno; /* replace gethostbyname() with gethostbyname_r() - ron@zing.net */ /*if ((hp = gethostbyname(host)) == (struct hostent *)NULL)*/ gethostbyname_r(host, &ghbn_h, ghbn_buf, sizeof(ghbn_buf), &hp, &ghbn_errno); if (hp == (struct hostent *)NULL) /* This is not a error if we get here, as all it means is that * this host is not on a network and/or they have not * configured their network properly. So we return the unset * hostid which should be 0, meaning that they should set it !! */ return 0; else { memcpy((char *) &in, (char *) hp->h_addr, hp->h_length); /* Just so it doesn't look exactly like the IP addr */ return(in.s_addr<<16|in.s_addr>>16); } } else return 0; }