From 094ca96844842928810f14844413109fc6cdd890 Mon Sep 17 00:00:00 2001 From: Eduardo Chappa Date: Sun, 3 Feb 2013 00:59:38 -0700 Subject: Initial Alpine Version --- imap/src/osdep/dos/os_dnf.c | 95 +++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 95 insertions(+) create mode 100644 imap/src/osdep/dos/os_dnf.c (limited to 'imap/src/osdep/dos/os_dnf.c') diff --git a/imap/src/osdep/dos/os_dnf.c b/imap/src/osdep/dos/os_dnf.c new file mode 100644 index 00000000..dcc3ea64 --- /dev/null +++ b/imap/src/osdep/dos/os_dnf.c @@ -0,0 +1,95 @@ +/* ======================================================================== + * Copyright 1988-2006 University of Washington + * + * Licensed under the Apache License, Version 2.0 (the "License"); + * you may not use this file except in compliance with the License. + * You may obtain a copy of the License at + * + * http://www.apache.org/licenses/LICENSE-2.0 + * + * + * ======================================================================== + */ + +/* + * Program: Operating-system dependent routines -- MS-DOS (PC-NFS) version + * + * Author: Mark Crispin + * Networks and Distributed Computing + * Computing & Communications + * University of Washington + * Administration Building, AG-44 + * Seattle, WA 98195 + * Internet: MRC@CAC.Washington.EDU + * + * Date: 11 April 1989 + * Last Edited: 30 August 2006 + */ + +/* Private function prototypes */ + +#include "tcp_dos.h" /* must be before osdep includes tcp.h */ +#include "mail.h" +#include "osdep.h" +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include "misc.h" + + +#include "fs_dos.c" +#include "ftl_dos.c" +#include "nl_dos.c" +#include "env_dos.c" +#undef write +#include "tcp_dos.c" + + +/* Return my local host name + * Returns: my local host name + */ + +char *mylocalhost (void) +{ + if (!myLocalHost) { /* known yet? */ + char *s,tmp[MAILTMPLEN]; + unsigned long myip; + /* see if known host name */ + if (!gethostname (tmp,MAILTMPLEN-1)) s = tmp; + /* no, try host address */ + else if (get_myipaddr ((char *) &myip)) + sprintf (s = tmp,"[%s]",inet_ntoa (myip)); + else s = "random-pc"; /* say what? */ + myLocalHost = cpystr (s); /* record for subsequent use */ + } + return myLocalHost; +} + + +/* Look up host address + * Accepts: pointer to pointer to host name + * socket address block + * Returns: non-zero with host address in socket, official host name in host; + * else NIL + */ + +long lookuphost (char **host,struct sockaddr_in *sin) +{ + long ret = -1; + char tmp[MAILTMPLEN]; + struct hostent *hn = gethostbyname (lcase (strcpy (tmp,*host))); + if (!hn) return NIL; /* got a host name? */ + *host = cpystr (hn->h_name); /* set official name */ + /* copy host addresses */ + memcpy (&sin->sin_addr,hn->h_addr,hn->h_length); + return T; +} -- cgit v1.2.3-70-g09d2