Blame view

RIOT/boards/msba2-common/tools/src/uuencode.c 2.85 KB
fb11e647   vrobic   reseau statique a...
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
  /*
   * LPC 2000 Loader, http://www.pjrc.com/arm/lpc2k_pgm
   * Copyright (c) 2004, PJRC.COM, LLC, <paul@pjrc.com>
   *
   * This program is free software; you can redistribute it and/or modify it
   * under the terms of the GNU General Public License as published by the
   * Free Software Foundation; version 2 of the License.
   *
   * This program is distributed in the hope that it will be useful, but
   * WITHOUT ANY WARRANTY; without even the implied warranty of
   * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General
   * Public License for more details.
   *
   * You should have received a copy of the GNU General Public License along
   * with this program; if not, write to the Free Software Foundation, Inc.,
   * 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
   */
  
  /* If this code fails to build, please provide at least the following
   * information when requesting (free) technical support.
   *
   * 1: Complete copy of all messages during the build.
   * 2: Output of "gtk-config --version"
   * 3: Output of "gtk-config --libs"
   * 4: Output of "gtk-config --cflags"
   * 5: Output of "uname -a"
   * 6: Version of GTK installed... eg, type: ls -l /lib/libgtk*
   * 7: Other info... which linux distribution, version, other software
   */
  
  #include "uuencode.h"
  
  static char uuchar(unsigned int val);
  
  
  void uuencode(char *str, const unsigned char *data, int num)
  {
      int i, n;
  
      *str++ = uuchar(num);
  
      n = (num + 2) / 3;
  
      for (i = 0; i < n; i++) {
          unsigned int val = ((data[0] & 0xFF) << 16)
                           | ((data[1] & 0xFF) << 8)
                           | ((data[2] & 0xFF) << 0);
          *str++ = uuchar(val >> 18);
          *str++ = uuchar(val >> 12);
          *str++ = uuchar(val >>  6);
          *str++ = uuchar(val >>  0);
          data += 3;
      }
  
      *str = '\0';
  }
  
  int uudecode(const char *str, unsigned char *data, int max)
  {
      int num = 0;
      int i, n;
  
      if (*str == '\0') {
          return 0;
      }
  
      num = *str++ - 32;
  
      if (num < 1 || num > 45) {
          return 0;
      }
  
      n = (num + 2) / 3;
  
      for (i = 0; i < n; i++) {
          if (str[0] < 32 || str[0] > 96) {
              return 0;
          }
  
          if (str[1] < 32 || str[1] > 96) {
              return 0;
          }
  
          if (str[2] < 32 || str[2] > 96) {
              return 0;
          }
  
          if (str[3] < 32 || str[3] > 96) {
              return 0;
          }
  
          unsigned int val = (((str[0] - 32) & 0x3F) << 18)
                           | (((str[1] - 32) & 0x3F) << 12)
                           | (((str[2] - 32) & 0x3F) << 6)
                           | (((str[3] - 32) & 0x3F) << 0);
          *data++ = (val >> 16) & 0xFF;
          *data++ = (val >> 8) & 0xFF;
          *data++ = (val >> 0) & 0xFF;
          str += 4;
      }
  
      return num;
  }
  
  
  static char uuchar(unsigned int val)
  {
      val &= 0x3F;
      val += 0x20;
  
      if (val == 0x20) {
          val = 0x60;
      }
  
      return val;
  }