D7net
Home
Console
Upload
information
Create File
Create Folder
About
Tools
:
/
usr
/
src
/
debug
/
imap-2007f
/
c-client
/
Filename :
nl_unix.c
back
Copy
/* ======================================================================== * 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: UNIX/VMS newline routines * * 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: 1 August 1988 * Last Edited: 30 August 2006 */ /* Copy string with CRLF newlines * Accepts: destination string * pointer to size of destination string buffer * source string * length of source string * Returns: length of copied string */ unsigned long strcrlfcpy (unsigned char **dst,unsigned long *dstl, unsigned char *src,unsigned long srcl) { long i = srcl * 2,j; unsigned char c,*d = src; if (*dst) { /* candidate destination provided? */ /* count NLs if doesn't fit worst-case */ if (i > *dstl) for (i = j = srcl; j; --j) if (*d++ == '\012') i++; /* still too small, must reset destination */ if (i > *dstl) fs_give ((void **) dst); } /* make a new buffer if needed */ if (!*dst) *dst = (char *) fs_get ((*dstl = i) + 1); d = *dst; /* destination string */ if (srcl) do { /* main copy loop */ if ((c = *src++) < '\016') { /* prepend CR to LF */ if (c == '\012') *d++ = '\015'; /* unlikely CR */ else if ((c == '\015') && (srcl > 1) && (*src == '\012')) { *d++ = c; /* copy the CR */ c = *src++; /* grab the LF */ --srcl; /* adjust the count */ } } *d++ = c; /* copy character */ } while (--srcl); *d = '\0'; /* tie off destination */ return d - *dst; /* return length */ } /* Length of string after strcrlfcpy applied * Accepts: source string * Returns: length of string */ unsigned long strcrlflen (STRING *s) { unsigned long pos = GETPOS (s); unsigned long i = SIZE (s); unsigned long j = i; while (j--) switch (SNX (s)) {/* search for newlines */ case '\015': /* unlikely carriage return */ if (j && (CHR (s) == '\012')) { SNX (s); /* eat the line feed */ j--; } break; case '\012': /* line feed? */ i++; default: /* ordinary chararacter */ break; } SETPOS (s,pos); /* restore old position */ return i; }