Codebase list libcryptx-perl / 5e7056d
fix compiler warnings Karel Miko 7 years ago
10 changed file(s) with 25 addition(s) and 24 deletion(s). Raw diff Collapse all Expand all
175175 } *Crypt__PK__ECC;
176176
177177 int str_add_leading_zero(char *str, int maxlen, int minlen) {
178 int rv, len;
178 int len;
179179 len = strlen(str);
180180 if (len > 0 && len % 2 && len < maxlen-2) {
181181 memmove(str+1, str, len+1); /* incl. NUL byte */
190190 }
191191
192192 int mp_tohex_with_leading_zero(mp_int * a, char *str, int maxlen, int minlen) {
193 int rv, len;
193 int rv;
194194 if (mp_isneg(a) == MP_YES) {
195195 *str = '\0';
196196 return MP_VAL;
215215 {
216216 HV *h;
217217 SV *param, **pref;
218 SV **sv_cofactor, **sv_prime, **sv_A, **sv_B, **sv_order, **sv_Gx, **sv_Gy, **sv_oid;
218 SV **sv_cofactor, **sv_prime, **sv_A, **sv_B, **sv_order, **sv_Gx, **sv_Gy;
219219 int err;
220220 char *ch_name;
221221 STRLEN l_name;
312312 void
313313 _modinv(Class, Math::BigInt::LTM x, Math::BigInt::LTM y)
314314 PREINIT:
315 int rc, sign;
315 int rc;
316316 SV* s;
317317 mp_int* RETVAL;
318318 PPCODE:
609609 SV *cloning = NO_INIT
610610 SV *serialized
611611 PREINIT:
612 SV *target, *tmp;
612 SV *target;
613613 mp_int *mpi;
614 mp_int *mpitmp;
615 PPCODE:
614 PPCODE:
615 PERL_UNUSED_VAR(cloning);
616616 if (SvROK(blank_obj) && sv_isa(blank_obj, "Math::BigInt::LTM")) {
617617 Newz(0, mpi, 1, mp_int);
618618 mp_init(mpi);
634634 unsigned long len;
635635 char *buf;
636636 CODE:
637 PERL_UNUSED_VAR(cloning);
637638 if (mp_iszero(self) == MP_YES) {
638639 RETVAL = newSVpv("0", 0);
639640 }
00 MODULE = CryptX PACKAGE = Crypt::Checksum::Adler32
11
22 Crypt::Checksum::Adler32
3 new(SV *class)
3 new(Class)
44 CODE:
55 Newz(0, RETVAL, 1, adler32_state);
66 if (!RETVAL) croak("FATAL: Newz failed");
00 MODULE = CryptX PACKAGE = Crypt::Checksum::CRC32
11
22 Crypt::Checksum::CRC32
3 new(SV *class)
3 new(Class)
44 CODE:
55 Newz(0, RETVAL, 1, crc32_state);
66 if (!RETVAL) croak("FATAL: Newz failed");
178178 {
179179 int i;
180180 SV *name;
181 unsigned char *name_ptr;
181 char *name_ptr;
182182 STRLEN name_len;
183183
184184 name = newSVpv(self->key.dp->name, strlen(self->key.dp->name));
123123 not_used = hv_store(rv_hash, "d", 1, newSVpv("", 0), 0);
124124 }
125125 /* =====> N */
126 siz = (self->key.N) ? mp_unsigned_bin_size(self->key.N) : 0;
126 siz = (self->key.N) ? nsize : 0;
127127 if (siz>10000) {
128128 croak("FATAL: key2hash failed - 'N' too big number");
129129 }
195195 not_used = hv_store(rv_hash, "dQ", 2, newSVpv("", 0), 0);
196196 }
197197 /* =====> size */
198 not_used = hv_store(rv_hash, "size", 4, newSViv(mp_unsigned_bin_size(self->key.N)), 0);
198 not_used = hv_store(rv_hash, "size", 4, newSViv(nsize), 0);
199199 /* =====> type */
200200 not_used = hv_store(rv_hash, "type", 4, newSViv(self->key.type), 0);
201201 if (not_used) not_used = NULL; /* just silence the warning: variable 'not_used' set but not used */
22
33 /* macros for various libc functions you can change for embedded targets */
44 #ifndef XMALLOC
5 #ifdef malloc
5 #if !defined(LTC_NO_PROTOTYPES) && defined(malloc)
66 #define LTC_NO_PROTOTYPES
77 #endif
88 #define XMALLOC malloc
99 #endif
1010 #ifndef XREALLOC
11 #ifdef realloc
11 #if !defined(LTC_NO_PROTOTYPES) && defined(realloc)
1212 #define LTC_NO_PROTOTYPES
1313 #endif
1414 #define XREALLOC realloc
1515 #endif
1616 #ifndef XCALLOC
17 #ifdef calloc
17 #if !defined(LTC_NO_PROTOTYPES) && defined(calloc)
1818 #define LTC_NO_PROTOTYPES
1919 #endif
2020 #define XCALLOC calloc
2121 #endif
2222 #ifndef XFREE
23 #ifdef free
23 #if !defined(LTC_NO_PROTOTYPES) && defined(free)
2424 #define LTC_NO_PROTOTYPES
2525 #endif
2626 #define XFREE free
2727 #endif
2828
2929 #ifndef XMEMSET
30 #ifdef memset
30 #if !defined(LTC_NO_PROTOTYPES) && defined(memset)
3131 #define LTC_NO_PROTOTYPES
3232 #endif
3333 #define XMEMSET memset
3434 #endif
3535 #ifndef XMEMCPY
36 #ifdef memcpy
36 #if !defined(LTC_NO_PROTOTYPES) && defined(memcpy)
3737 #define LTC_NO_PROTOTYPES
3838 #endif
3939 #define XMEMCPY memcpy
4040 #endif
4141 #ifndef XMEMCMP
42 #ifdef memcmp
42 #if !defined(LTC_NO_PROTOTYPES) && defined(memcmp)
4343 #define LTC_NO_PROTOTYPES
4444 #endif
4545 #define XMEMCMP memcmp
4848 #define XMEM_NEQ mem_neq
4949 #endif
5050 #ifndef XSTRCMP
51 #ifdef strcmp
51 #if !defined(LTC_NO_PROTOTYPES) && defined(strcmp)
5252 #define LTC_NO_PROTOTYPES
5353 #endif
5454 #define XSTRCMP strcmp
6262 #endif
6363
6464 #ifndef XQSORT
65 #ifdef qsort
65 #if !defined(LTC_NO_PROTOTYPES) && defined(qsort)
6666 #define LTC_NO_PROTOTYPES
6767 #endif
6868 #define XQSORT qsort
178178
179179 int dh_make_key_ex_main(prng_state *prng, int wprng, dh_key *key)
180180 {
181 unsigned char *buf;
181 unsigned char *buf = NULL;
182182 int err, keysize;
183183
184184 LTC_ARGCHK(key != NULL);
423423 const unsigned char *hash, unsigned long hashlen,
424424 int *stat, dh_key *key)
425425 {
426 void *a, *b, *p, *g, *m, *tmp;
426 void *a, *b, *m, *tmp;
427427 unsigned long x, y;
428428 int err;
429429
1515 portable way to get secure random bits to feed a PRNG (Tom St Denis)
1616 */
1717
18 #ifdef LTC_DEVRANDOM
18 #if defined(LTC_DEVRANDOM) && !defined(WIN32) && !defined(_WIN32) && !defined(WINCE)
1919 /* on *NIX read /dev/random */
2020 static unsigned long rng_nix(unsigned char *buf, unsigned long len,
2121 void (*callback)(void))