V10/lbin/mailx/hostname.c

#ident "@(#)hostname.c	1.3 'attmail mail(1) command'"
#ident	"@(#)mailx:hostname.c	1.3.1.1"
/*	Copyright (c) 1984 AT&T	*/
/*	  All Rights Reserved  	*/

/*	THIS IS UNPUBLISHED PROPRIETARY SOURCE CODE OF AT&T	*/
/*	The copyright notice above does not evidence any   	*/
/*	actual or intended publication of such source code.	*/

#ident	"@(#)mailx:hostname.c	1.3"
/*
 * mailx -- a modified version of a University of California at Berkeley
 *	mail program
 *
 * Code to figure out what host we are on.
 */

#include "rcv.h"
#include "configdefs.h"

#ifdef preSVr4
# define	MAILCNFG	"/usr/lib/mail/mailcnfg"
#else
# define	MAILCNFG	"/etc/mail/mailcnfg"
# include "maillock.h"
# include <sys/utsname.h>
#endif


char host[64];
char domain[128];
/*
 * Initialize the network name of the current host.
 */
void
inithost()
{
	register struct netmach *np;
#ifdef GATEWAY
	FILE *fp;							/* adb */

	if (fp = fopen(GATEWAY, "r")) {					/* adb */
		fgets(host, sizeof host, fp);				/* adb */
		host[strlen(host)-1] = 0;				/* adb */
		fclose(fp);						/* adb */
	} else {							/* adb */
		getuname(host, sizeof host);				/* adb */
	}
#else
	struct utsname name;
	char *fp;
	extern char *xgetenv();
	extern int  xsetenv();

	xsetenv(MAILCNFG);
	if (fp = xgetenv("CLUSTER")) {
		strncpy(host, fp, sizeof(host));
	} else {
		uname(&name);
		strncpy(host, name.nodename, sizeof host);
	}
#endif
	strcpy(domain, host);
	strcat(domain, maildomain());
	for (np = netmach; np->nt_machine != 0; np++)
		if (strcmp(np->nt_machine, EMPTY) == 0)
			break;
	if (np->nt_machine == 0) {
		printf("Cannot find empty slot for dynamic host entry\n");
		exit(1);
	}
	np->nt_machine = host;
	np++;
	np->nt_machine = domain;
	if (debug) fprintf(stderr, "host '%s', domain '%s'\n", host, domain);
}

#ifdef WHOAMI
getuname(sys,length)
char *sys;
int length;
{
	FILE *fp;

	if (fp = fopen(WHOAMI, "r")) {
		fgets(sys, length, fp);
		sys[strlen(sys)-1] = 0;
		fclose(fp);
	} else {
		strcpy(sys,"????");
	}
}
#else
#include <sys/utsname.h>
char *
getuname(sys,length)
char *sys;
int length;
{
	struct utsname name;
	uname(&name);
	strncpy(sys, getuname(), length);
	return;
}
#endif /* WHOAMI */