imapext-2007
diff src/osdep/dos/os_dbw.c @ 0:ada5e610ab86
imap-2007e
author | yuuji@gentei.org |
---|---|
date | Mon, 14 Sep 2009 15:17:45 +0900 |
parents | |
children |
line diff
1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000 1.2 +++ b/src/osdep/dos/os_dbw.c Mon Sep 14 15:17:45 2009 +0900 1.3 @@ -0,0 +1,91 @@ 1.4 +/* ======================================================================== 1.5 + * Copyright 1988-2006 University of Washington 1.6 + * 1.7 + * Licensed under the Apache License, Version 2.0 (the "License"); 1.8 + * you may not use this file except in compliance with the License. 1.9 + * You may obtain a copy of the License at 1.10 + * 1.11 + * http://www.apache.org/licenses/LICENSE-2.0 1.12 + * 1.13 + * 1.14 + * ======================================================================== 1.15 + */ 1.16 + 1.17 +/* 1.18 + * Program: Operating-system dependent routines -- MS-DOS (B&W) version 1.19 + * 1.20 + * Author: Mark Crispin 1.21 + * Networks and Distributed Computing 1.22 + * Computing & Communications 1.23 + * University of Washington 1.24 + * Administration Building, AG-44 1.25 + * Seattle, WA 98195 1.26 + * Internet: MRC@CAC.Washington.EDU 1.27 + * 1.28 + * Date: 11 April 1989 1.29 + * Last Edited: 30 August 2006 1.30 + */ 1.31 + 1.32 +/* Private function prototypes */ 1.33 + 1.34 +#include "tcp_dos.h" /* must be before osdep includes tcp.h */ 1.35 +#include "mail.h" 1.36 +#include "osdep.h" 1.37 +#include <time.h> 1.38 +#include <errno.h> 1.39 +#include <fcntl.h> 1.40 +#include <sys\stat.h> 1.41 +#include <sys\timeb.h> 1.42 +#include "misc.h" 1.43 +#include "stdlib.h" 1.44 +#include "bwtcp.h" 1.45 + 1.46 + 1.47 +#include "fs_dos.c" 1.48 +#include "ftl_dos.c" 1.49 +#include "nl_dos.c" 1.50 +#include "env_dos.c" 1.51 +#undef write 1.52 +#define read soread 1.53 +#define write sowrite 1.54 +#define close soclose 1.55 +#include "tcp_dos.c" 1.56 + 1.57 + 1.58 +/* Return my local host name 1.59 + * Returns: my local host name 1.60 + */ 1.61 + 1.62 +char *mylocalhost (void) 1.63 +{ 1.64 + char *s; 1.65 + if (!myLocalHost) { /* known yet? */ 1.66 + /* get local host name from DISPLAY env var */ 1.67 + if (!((s = getenv ("DISPLAY")) || (s = getenv ("display")))) { 1.68 + mm_log ("Environment variable 'DISPLAY' is not set", ERROR); 1.69 + s = "random-pc"; 1.70 + } 1.71 + myLocalHost = cpystr (s); 1.72 + } 1.73 + return myLocalHost; 1.74 +} 1.75 + 1.76 + 1.77 +/* Look up host address 1.78 + * Accepts: pointer to pointer to host name 1.79 + * socket address block 1.80 + * Returns: non-zero with host address in socket, official host name in host; 1.81 + * else NIL 1.82 + */ 1.83 + 1.84 +long lookuphost (char **host,struct sockaddr_in *sin) 1.85 +{ 1.86 + char *s = *host; /* in case of error */ 1.87 + sin->sin_addr.s_addr = rhost (host); 1.88 + if (sin->sin_addr.s_addr == -1) { 1.89 + *host = s; /* error, restore old host name */ 1.90 + return NIL; 1.91 + } 1.92 + *host = cpystr (*host); /* make permanent copy of name */ 1.93 + return T; /* success */ 1.94 +}