Some bug fixes of the last release
[gnupg.git] / g10 / misc.c
1 /* misc.c -  miscellaneous functions
2  *      Copyright (C) 1998 Free Software Foundation, Inc.
3  *
4  * This file is part of GNUPG.
5  *
6  * GNUPG is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * GNUPG is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
19  */
20
21 #include <config.h>
22 #include <stdio.h>
23 #include <stdlib.h>
24 #include <string.h>
25 #include <errno.h>
26 #if defined(__linux__) && defined(__alpha__)
27   #include <asm/sysinfo.h>
28   #include <asm/unistd.h>
29 #endif
30 #ifdef HAVE_SETRLIMIT
31   #include <sys/time.h>
32   #include <sys/resource.h>
33 #endif
34 #include "util.h"
35 #include "main.h"
36 #include "options.h"
37 #include "i18n.h"
38
39
40 const char *g10m_revision_string(int);
41 const char *g10c_revision_string(int);
42 const char *g10u_revision_string(int);
43
44 volatile void
45 pull_in_libs(void)
46 {
47     g10m_revision_string(0);
48     g10c_revision_string(0);
49     g10u_revision_string(0);
50 }
51
52
53 #if defined(__linux__) && defined(__alpha__)
54 #warning using trap_unaligned
55 static int
56 setsysinfo(unsigned long op, void *buffer, unsigned long size,
57                      int *start, void *arg, unsigned long flag)
58 {
59     return syscall(__NR_osf_setsysinfo, op, buffer, size, start, arg, flag);
60 }
61
62 void
63 trap_unaligned(void)
64 {
65     unsigned int buf[2];
66
67     buf[0] = SSIN_UACPROC;
68     buf[1] = UAC_SIGBUS | UAC_NOPRINT;
69     setsysinfo(SSI_NVPAIRS, buf, 1, 0, 0, 0);
70 }
71 #else
72 void
73 trap_unaligned(void)
74 {  /* dummy */
75 }
76 #endif
77
78
79 void
80 disable_core_dumps()
81 {
82   #ifdef HAVE_SETRLIMIT
83     struct rlimit limit;
84
85     limit.rlim_cur = 0;
86     limit.rlim_max = 0;
87     if( setrlimit( RLIMIT_CORE, &limit ) )
88         log_fatal(_("can't disable core dumps: %s\n"), strerror(errno) );
89   #else
90     log_info(_("WARNING: Program may create a core file!\n"));
91   #endif
92 }
93
94
95
96 u16
97 checksum_u16( unsigned n )
98 {
99     u16 a;
100
101     a  = (n >> 8) & 0xff;
102     if( opt.emulate_bugs & EMUBUG_GPGCHKSUM ) {
103        a |= n & 0xff;
104        log_debug("csum_u16 emulated for n=%u\n", n);
105     }
106     else
107        a += n & 0xff;
108     return a;
109 }
110
111 static u16
112 checksum_u16_nobug( unsigned n )
113 {
114     u16 a;
115
116     a  = (n >> 8) & 0xff;
117     a += n & 0xff;
118     return a;
119 }
120
121 u16
122 checksum( byte *p, unsigned n )
123 {
124     u16 a;
125
126     for(a=0; n; n-- )
127         a += *p++;
128     return a;
129 }
130
131 u16
132 checksum_mpi( MPI a )
133 {
134     u16 csum;
135     byte *buffer;
136     unsigned nbytes;
137     unsigned nbits;
138
139     buffer = mpi_get_buffer( a, &nbytes, NULL );
140     /* some versions of gpg encode wrong values for the length of an mpi
141      * so that mpi_get_nbits() which counts the mpi yields another (shorter)
142      * value than the one store with the mpi.  mpi_get_nbit_info() returns
143      * this stored value if it is still available.
144      */
145
146     if( opt.emulate_bugs & EMUBUG_GPGCHKSUM )
147         nbits = 0;
148     else
149         nbits = mpi_get_nbit_info(a);
150     if( !nbits )
151        nbits = mpi_get_nbits(a);
152     csum = checksum_u16( nbits );
153     csum += checksum( buffer, nbytes );
154     m_free( buffer );
155     return csum;
156 }
157
158 /****************
159  * This is the correct function
160  */
161 u16
162 checksum_mpi_counted_nbits( MPI a )
163 {
164     u16 csum;
165     byte *buffer;
166     unsigned nbytes;
167     unsigned nbits;
168
169     buffer = mpi_get_buffer( a, &nbytes, NULL );
170     nbits = mpi_get_nbits(a);
171     mpi_set_nbit_info(a,nbits);
172     csum = checksum_u16_nobug( nbits );
173     csum += checksum( buffer, nbytes );
174     m_free( buffer );
175     return csum;
176 }
177
178
179 u32
180 buffer_to_u32( const byte *buffer )
181 {
182     unsigned long a;
183     a =  *buffer << 24;
184     a |= buffer[1] << 16;
185     a |= buffer[2] << 8;
186     a |= buffer[3];
187     return a;
188 }
189