crypto/external/bsd/openssh/dist/uuencode.c

   1 /*      $NetBSD: uuencode.c,v 1.1.1.2 2009/12/27 01:07:18 christos Exp $        */
   2 /* $OpenBSD: uuencode.c,v 1.25 2009/03/05 11:30:50 djm Exp $ */
   3 /*
   4  * Copyright (c) 2000 Markus Friedl.  All rights reserved.
   5  *
   6  * Redistribution and use in source and binary forms, with or without
   7  * modification, are permitted provided that the following conditions
   8  * are met:
   9  * 1. Redistributions of source code must retain the above copyright
  10  *    notice, this list of conditions and the following disclaimer.
  11  * 2. Redistributions in binary form must reproduce the above copyright
  12  *    notice, this list of conditions and the following disclaimer in the
  13  *    documentation and/or other materials provided with the distribution.
  14  *
  15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  16  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  17  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  18  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  19  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  20  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  21  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  22  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  23  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  24  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  25  */
  26
  27 #include "includes.h"
  28 __RCSID("$NetBSD: uuencode.c,v 1.2 2009/06/07 22:38:48 christos Exp $");
  29 #include <sys/types.h>
  30 #include <netinet/in.h>
  31 #include <resolv.h>
  32 #include <stdio.h>
  33
  34 #include "xmalloc.h"
  35 #include "uuencode.h"
  36
  37 /*
  38  * Encode binary 'src' of length 'srclength', writing base64-encoded text
  39  * to 'target' of size 'targsize'. Will always nul-terminate 'target'.
  40  * Returns the number of bytes stored in 'target' or -1 on error (inc.
  41  * 'targsize' too small).
  42  */
  43 int
  44 uuencode(const u_char *src, u_int srclength,
  45     char *target, size_t targsize)
  46 {
  47         return __b64_ntop(src, srclength, target, targsize);
  48 }
  49
  50 /*
  51  * Decode base64-encoded 'src' into buffer 'target' of 'targsize' bytes.
  52  * Will skip leading and trailing whitespace. Returns the number of bytes
  53  * stored in 'target' or -1 on error (inc. targsize too small).
  54  */
  55 int
  56 uudecode(const char *src, u_char *target, size_t targsize)
  57 {
  58         int len;
  59         char *encoded, *p;
  60
  61         /* copy the 'readonly' source */
  62         encoded = xstrdup(src);
  63         /* skip whitespace and data */
  64         for (p = encoded; *p == ' ' || *p == '\t'; p++)
  65                 ;
  66         for (; *p != '\0' && *p != ' ' && *p != '\t'; p++)
  67                 ;
  68         /* and remove trailing whitespace because __b64_pton needs this */
  69         *p = '\0';
  70         len = __b64_pton(encoded, target, targsize);
  71         xfree(encoded);
  72         return len;
  73 }
  74
  75 void
  76 dump_base64(FILE *fp, u_char *data, u_int len)
  77 {
  78         char *buf;
  79         int i, n;
  80
  81         if (len > 65536) {
  82                 fprintf(fp, "dump_base64: len > 65536\n");
  83                 return;
  84         }
  85         buf = xmalloc(2*len);
  86         n = uuencode(data, len, buf, 2*len);
  87         for (i = 0; i < n; i++) {
  88                 fprintf(fp, "%c", buf[i]);
  89                 if (i % 70 == 69)
  90                         fprintf(fp, "\n");
  91         }
  92         if (i % 70 != 69)
  93                 fprintf(fp, "\n");
  94         xfree(buf);
  95 }