netmsg.c
上传用户:ycwykj01
上传日期:2007-01-04
资源大小:1819k
文件大小:3k
源码类别:

网络编程

开发平台:

Unix_Linux

  1. /*
  2.  * Program: Network message (SMTP/NNTP/POP2/POP3) routines
  3.  *
  4.  * Author: Mark Crispin
  5.  * Networks and Distributed Computing
  6.  * Computing & Communications
  7.  * University of Washington
  8.  * Administration Building, AG-44
  9.  * Seattle, WA  98195
  10.  * Internet: MRC@CAC.Washington.EDU
  11.  *
  12.  * Date: 8 June 1995
  13.  * Last Edited: 4 September 1999
  14.  *
  15.  * Copyright 1999 by the University of Washington
  16.  *
  17.  *  Permission to use, copy, modify, and distribute this software and its
  18.  * documentation for any purpose and without fee is hereby granted, provided
  19.  * that the above copyright notice appears in all copies and that both the
  20.  * above copyright notice and this permission notice appear in supporting
  21.  * documentation, and that the name of the University of Washington not be
  22.  * used in advertising or publicity pertaining to distribution of the software
  23.  * without specific, written prior permission.  This software is made
  24.  * available "as is", and
  25.  * THE UNIVERSITY OF WASHINGTON DISCLAIMS ALL WARRANTIES, EXPRESS OR IMPLIED,
  26.  * WITH REGARD TO THIS SOFTWARE, INCLUDING WITHOUT LIMITATION ALL IMPLIED
  27.  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE, AND IN
  28.  * NO EVENT SHALL THE UNIVERSITY OF WASHINGTON BE LIABLE FOR ANY SPECIAL,
  29.  * INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
  30.  * LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, TORT
  31.  * (INCLUDING NEGLIGENCE) OR STRICT LIABILITY, ARISING OUT OF OR IN CONNECTION
  32.  * WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  33.  *
  34.  */
  35. #include <stdio.h>
  36. #include <errno.h>
  37. extern int errno; /* just in case */
  38. #include "mail.h"
  39. #include "osdep.h"
  40. #include "misc.h"
  41. #include "netmsg.h"
  42. #include "flstring.h"
  43. /* Network message read
  44.  * Accepts: file
  45.  *     number of bytes to read
  46.  *     buffer address
  47.  * Returns: T if success, NIL otherwise
  48.  */
  49. long netmsg_read (void *stream,unsigned long count,char *buffer)
  50. {
  51.   return (fread (buffer,(size_t) 1,(size_t) count,(FILE *) stream) == count) ?
  52.     T : NIL;
  53. }
  54. /* Slurp dot-terminated text from NET
  55.  * Accepts: NET stream
  56.  *     place to return size
  57.  *     place to return header size
  58.  * Returns: file descriptor
  59.  */
  60. FILE *netmsg_slurp (NETSTREAM *stream,unsigned long *size,unsigned long *hsiz)
  61. {
  62.   unsigned long i;
  63.   char *s,*t,tmp[MAILTMPLEN];
  64.   FILE *f = tmpfile ();
  65.   if (!f) {
  66.     sprintf (tmp,"Unable to create scratch file: %.80s",strerror (errno));
  67.     mm_log (tmp,ERROR);
  68.   }
  69.   *size = 0; /* initially emtpy */
  70.   if (hsiz) *hsiz = 0;
  71.   while (s = net_getline (stream)) {
  72.     if (*s == '.') { /* possible end of text? */
  73.       if (s[1]) t = s + 1; /* pointer to true start of line */
  74.       else {
  75. fs_give ((void **) &s); /* free the line */
  76. break; /* end of data */
  77.       }
  78.     }
  79.     else t = s; /* want the entire line */
  80.     if (f) { /* copy it to the file */
  81.       i = strlen (t); /* size of line */
  82.       if ((fwrite (t,(size_t) 1,(size_t) i,f) == i) &&
  83.   (fwrite ("1512",(size_t) 1,(size_t) 2,f) == 2)) {
  84. *size += i + 2; /* tally up size of data */
  85. /* note header position */
  86. if (!i && hsiz && !*hsiz) *hsiz = *size;
  87.       }
  88.       else {
  89. sprintf (tmp,"Error writing scratch file at byte %lu",*size);
  90. mm_log (tmp,ERROR);
  91. fclose (f); /* forget it */
  92. f = NIL; /* failure now */
  93.       }
  94.     }
  95.     fs_give ((void **) &s); /* free the line */
  96.   }
  97. /* if making a file, rewind to start of file */
  98.   if (f) fseek (f,(unsigned long) 0,L_SET);
  99. /* header consumes entire message */
  100.   if (hsiz && !*hsiz) *hsiz = *size;
  101.   return f; /* return the file descriptor */
  102. }