diff options
author | Eduardo Chappa <echappa@gmx.com> | 2013-02-03 00:59:38 -0700 |
---|---|---|
committer | Eduardo Chappa <echappa@gmx.com> | 2013-02-03 00:59:38 -0700 |
commit | 094ca96844842928810f14844413109fc6cdd890 (patch) | |
tree | e60efbb980f38ba9308ccb4fb2b77b87bbc115f3 /imap/src/osdep/unix/nl_unix.c | |
download | alpine-094ca96844842928810f14844413109fc6cdd890.tar.xz |
Initial Alpine Version
Diffstat (limited to 'imap/src/osdep/unix/nl_unix.c')
-rw-r--r-- | imap/src/osdep/unix/nl_unix.c | 92 |
1 files changed, 92 insertions, 0 deletions
diff --git a/imap/src/osdep/unix/nl_unix.c b/imap/src/osdep/unix/nl_unix.c new file mode 100644 index 00000000..b2d5616a --- /dev/null +++ b/imap/src/osdep/unix/nl_unix.c @@ -0,0 +1,92 @@ +/* ======================================================================== + * 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; +} |