From 7992a73307509b356092bbe05e3f51a132e74707 Mon Sep 17 00:00:00 2001 From: Unknown <> Date: Thu, 31 Aug 2006 00:46:49 +0000 Subject: [PATCH] add files for 2006-08-31T00:46:49Z --- src/osdep/dos/os_dwa.c | 72 ++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 72 insertions(+) create mode 100644 src/osdep/dos/os_dwa.c diff --git a/src/osdep/dos/os_dwa.c b/src/osdep/dos/os_dwa.c new file mode 100644 index 0000000..36e5b14 --- /dev/null +++ b/src/osdep/dos/os_dwa.c @@ -0,0 +1,72 @@ +/* ======================================================================== + * 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 -- DOS (Waterloo) 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 + */ + +#include /* must be before TCPSTREAM definition */ +#include "tcp_dwa.h" /* must be before osdep include our tcp.h */ +#include "mail.h" +#include "osdep.h" +#include +#include +#include +#include +#include +#include "misc.h" + +/* Undo compatibility definition */ + +#undef tcp_open + +#include "fs_dos.c" +#include "ftl_dos.c" +#include "nl_dos.c" +#include "env_dos.c" +#include "tcp_dwa.c" + + +/* Return my local host name + * Returns: my local host name + */ + +char *mylocalhost (void) +{ + if (!myLocalHost) { + char *s,hname[32],tmp[MAILTMPLEN]; + long myip; + + if (!sock_initted++) sock_init(); + tcp_cbrk (0x01); /* turn off ctrl-break catching */ + /* + * haven't discovered a way to find out the local host's + * name with wattcp yet. + */ + if (myip = gethostid ()) sprintf (s = tmp,"[%s]",inet_ntoa (hname,myip)); + else s = "random-pc"; + myLocalHost = cpystr (s); + } + return myLocalHost; +} -- 2.40.0