Removed special code for RISC OS; we
[gnupg.git] / g10 / textfilter.c
index 5896c3f..a3ea4b1 100644 (file)
@@ -1,5 +1,5 @@
 /* textfilter.c
- *     Copyright (C) 1998,1999 Free Software Foundation, Inc.
+ * Copyright (C) 1998, 1999, 2000, 2001 Free Software Foundation, Inc.
  *
  * This file is part of GnuPG.
  *
 #include <errno.h>
 #include <assert.h>
 
+#include "gpg.h"
 #include "errors.h"
 #include "iobuf.h"
 #include "memory.h"
 #include "util.h"
 #include "filter.h"
 #include "i18n.h"
+#include "options.h"
 
+#ifdef HAVE_DOSISH_SYSTEM
+#define LF "\r\n"
+#else
+#define LF "\n"
+#endif
 
 #define MAX_LINELEN 19995 /* a little bit smaller than in armor.c */
                          /* to make sure that a warning is displayed while */
                          /* creating a message */
 
-unsigned
-len_without_trailing_ws( byte *line, unsigned len )
+static unsigned
+len_without_trailing_chars( byte *line, unsigned len, const char *trimchars )
 {
     byte *p, *mark;
     unsigned n;
 
     for(mark=NULL, p=line, n=0; n < len; n++, p++ ) {
-       if( strchr(" \t\r\n", *p ) ) {
+       if( strchr( trimchars, *p ) ) {
            if( !mark )
                mark = p;
        }
@@ -55,11 +62,17 @@ len_without_trailing_ws( byte *line, unsigned len )
     return mark? (mark - line) : len;
 }
 
+unsigned
+len_without_trailing_ws( byte *line, unsigned len )
+{
+    return len_without_trailing_chars( line, len, " \t\r\n" );
+}
+
 
 
 
 static int
-standard( text_filter_context_t *tfx, IOBUF a,
+standard( text_filter_context_t *tfx, iobuf_t a,
          byte *buf, size_t size, size_t *ret_len)
 {
     int rc=0;
@@ -108,7 +121,7 @@ standard( text_filter_context_t *tfx, IOBUF a,
  */
 int
 text_filter( void *opaque, int control,
-            IOBUF a, byte *buf, size_t *ret_len)
+            iobuf_t a, byte *buf, size_t *ret_len)
 {
     size_t size = *ret_len;
     text_filter_context_t *tfx = opaque;
@@ -121,7 +134,7 @@ text_filter( void *opaque, int control,
        if( tfx->truncated )
            log_error(_("can't handle text lines longer than %d characters\n"),
                        MAX_LINELEN );
-       m_free( tfx->buffer );
+       xfree ( tfx->buffer );
        tfx->buffer = NULL;
     }
     else if( control == IOBUFCTRL_DESC )
@@ -135,8 +148,8 @@ text_filter( void *opaque, int control,
  * md is updated as required by rfc2440
  */
 int
-copy_clearsig_text( IOBUF out, IOBUF inp, MD_HANDLE md,
-                              int escape_dash, int escape_from )
+copy_clearsig_text( iobuf_t out, iobuf_t inp, MD_HANDLE md,
+                   int escape_dash, int escape_from, int pgp2mode )
 {
     unsigned maxlen;
     byte *buffer = NULL;    /* malloced buffer */
@@ -145,6 +158,9 @@ copy_clearsig_text( IOBUF out, IOBUF inp, MD_HANDLE md,
     int truncated = 0;
     int pending_lf = 0;
 
+    if( !opt.pgp2_workarounds )
+       pgp2mode = 0;
+
     if( !escape_dash )
        escape_from = 0;
 
@@ -160,13 +176,15 @@ copy_clearsig_text( IOBUF out, IOBUF inp, MD_HANDLE md,
        /* update the message digest */
        if( escape_dash ) {
            if( pending_lf ) {
-               md_putc( md, '\r' );
-               md_putc( md, '\n' );
+               gcry_md_putc( md, '\r' );
+               gcry_md_putc( md, '\n' );
            }
-           md_write( md, buffer, len_without_trailing_ws( buffer, n ) );
+           gcry_md_write( md, buffer,
+                    len_without_trailing_chars( buffer, n,
+                                                pgp2mode? " \r\n":" \t\r\n"));
        }
        else
-           md_write( md, buffer, n );
+           gcry_md_write( md, buffer, n );
        pending_lf = buffer[n-1] == '\n';
 
        /* write the output */
@@ -175,14 +193,39 @@ copy_clearsig_text( IOBUF out, IOBUF inp, MD_HANDLE md,
            iobuf_put( out, '-' );
            iobuf_put( out, ' ' );
        }
+
+#if  0 /*defined(HAVE_DOSISH_SYSTEM)*/
+       /* We don't use this anymore because my interpretation of rfc2440 7.1
+        * is that there is no conversion needed.  If one decides to
+        * clearsign a unix file on a DOS box he will get a mixed line endings.
+        * If at some point it turns out, that a conversion is a nice feature
+        * we can make an option out of it.
+        */
+       /* make sure the lines do end in CR,LF */
+       if( n > 1 && ( (buffer[n-2] == '\r' && buffer[n-1] == '\n' )
+                           || (buffer[n-2] == '\n' && buffer[n-1] == '\r'))) {
+           iobuf_write( out, buffer, n-2 );
+           iobuf_put( out, '\r');
+           iobuf_put( out, '\n');
+       }
+       else if( n && buffer[n-1] == '\n' ) {
+           iobuf_write( out, buffer, n-1 );
+           iobuf_put( out, '\r');
+           iobuf_put( out, '\n');
+       }
+       else
+           iobuf_write( out, buffer, n );
+
+#else
        iobuf_write( out, buffer, n );
+#endif
     }
 
     /* at eof */
     if( !pending_lf ) { /* make sure that the file ends with a LF */
-       iobuf_put( out, '\n');
+       iobuf_writestr( out, LF );
        if( !escape_dash )
-           md_putc( md, '\n' );
+           gcry_md_putc( md, '\n' );
     }
 
     if( truncated )
@@ -190,4 +233,3 @@ copy_clearsig_text( IOBUF out, IOBUF inp, MD_HANDLE md,
 
     return 0; /* okay */
 }
-