cleaned up RISC OS code and removed lots of unnecessary stuff
authorStefan Bellon <sbellon@sbellon.de>
Sun, 28 Dec 2003 14:12:16 +0000 (14:12 +0000)
committerStefan Bellon <sbellon@sbellon.de>
Sun, 28 Dec 2003 14:12:16 +0000 (14:12 +0000)
23 files changed:
cipher/ChangeLog
cipher/blowfish.c
cipher/rndriscos.c
cipher/twofish.c
g10/ChangeLog
g10/g10.c
g10/gpgv.c
g10/plaintext.c
include/ChangeLog
include/util.h
keyserver/ChangeLog
keyserver/gpgkeys_hkp.c
keyserver/gpgkeys_ldap.c
scripts/ChangeLog
scripts/build-riscos
scripts/conf-riscos/Makefile
scripts/conf-riscos/include/config.h
scripts/conf-riscos/include/g10defs.h
tools/ChangeLog
tools/gpgsplit.c
util/ChangeLog
util/memory.c
util/riscos.c

index a829662..beda877 100644 (file)
@@ -1,3 +1,11 @@
+2003-12-28  Stefan Bellon  <sbellon@sbellon.de>
+
+       * rndriscos.c (rndriscos_gather_random) [__riscos__]: Declare
+       variable outside loop.
+
+       * blowfish.c, twofish.c [__riscos__]: Removal of unnecessary
+       #ifdef __riscos__ sections.
+
 2003-12-17  David Shaw  <dshaw@localhost.localdomain>
 
        * dsa.h, dsa.c (dsa_verify), elgamal.h, elgamal.c (elg_verify),
index 409194c..063fbc9 100644 (file)
@@ -502,10 +502,6 @@ selftest(void)
     return NULL;
 }
 
-#ifdef __riscos__
-/* need to switch off CSE optimisation for Norcroft C (Acorn/Pace) */
-#pragma no_optimise_cse
-#endif /* __riscos__ */
 
 static int
 do_bf_setkey( BLOWFISH_context *c, byte *key, unsigned keylen )
@@ -590,10 +586,6 @@ do_bf_setkey( BLOWFISH_context *c, byte *key, unsigned keylen )
     return 0;
 }
 
-#ifdef __riscos__
-#pragma optimise_cse
-#endif /* __riscos__ */
-
 static int
 bf_setkey( BLOWFISH_context *c, byte *key, unsigned keylen )
 {
index ee35bea..a0fbbc2 100644 (file)
@@ -27,7 +27,6 @@
 #include <swis.h>
 #include "util.h"
 
-#define CryptRandom_Byte 0x51980
 
 static const char * const cryptrandom_path[] = {
     "GnuPG:CryptRandom",
@@ -47,7 +46,7 @@ rndriscos_gather_random(void (*add)(const void*, size_t, int), int requester,
                        size_t length, int level)
 {
     static int rndriscos_initialized = 0;
-    int n;
+    int n, nbytes;
     byte buffer[768];
 
     if (!rndriscos_initialized)
@@ -55,7 +54,7 @@ rndriscos_gather_random(void (*add)(const void*, size_t, int), int requester,
                                                    cryptrandom_path, 1);
 
     while (length) {
-        int nbytes = length < sizeof(buffer) ? length : sizeof(buffer);
+        nbytes = length < sizeof(buffer) ? length : sizeof(buffer);
 
         for (n = 0; n < nbytes; ++n)
             if (_swix(CryptRandom_Byte, _OUT(0), &buffer[n]))
index a6a571f..554b4aa 100644 (file)
@@ -561,11 +561,6 @@ burn_stack (int bytes)
 /* Perform the key setup.  Note that this works only with 128- and 256-bit
  * keys, despite the API that looks like it might support other sizes. */
 
-#ifdef __riscos__
-/* need to switch off CSE optimisation for Norcroft C (Acorn/Pace) */
-#pragma no_optimise_cse
-#endif /* __riscos__ */
-
 static int
 do_twofish_setkey (TWOFISH_context *ctx, const byte *key, unsigned int keylen)
 {
@@ -701,10 +696,6 @@ do_twofish_setkey (TWOFISH_context *ctx, const byte *key, unsigned int keylen)
     return 0;
 }
 
-#ifdef __riscos__
-#pragma optimise_cse
-#endif /* __riscos__ */
-
 static int
 twofish_setkey (TWOFISH_context *ctx, const byte *key, unsigned int keylen)
 {
@@ -775,11 +766,6 @@ twofish_setkey (TWOFISH_context *ctx, const byte *key, unsigned int keylen)
 \f
 /* Encrypt one block.  in and out may be the same. */
 
-#ifdef __riscos__
-/* need to switch off CSE optimisation for Norcroft C (Acorn/Pace) */
-#pragma no_optimise_cse
-#endif /* __riscos__ */
-
 static void
 do_twofish_encrypt (const TWOFISH_context *ctx, byte *out, const byte *in)
 {
@@ -812,10 +798,6 @@ do_twofish_encrypt (const TWOFISH_context *ctx, byte *out, const byte *in)
    OUTUNPACK (3, b, 7);
 }
 
-#ifdef __riscos__
-#pragma optimise_cse
-#endif /* __riscos__ */
-
 static void
 twofish_encrypt (const TWOFISH_context *ctx, byte *out, const byte *in)
 {
@@ -825,11 +807,6 @@ twofish_encrypt (const TWOFISH_context *ctx, byte *out, const byte *in)
 \f
 /* Decrypt one block.  in and out may be the same. */
 
-#ifdef __riscos__
-/* need to switch off CSE optimisation for Norcroft C (Acorn/Pace) - bug */
-#pragma no_optimise_cse
-#endif /* __riscos__ */
-
 static void
 do_twofish_decrypt (const TWOFISH_context *ctx, byte *out, const byte *in)
 {
@@ -862,10 +839,6 @@ do_twofish_decrypt (const TWOFISH_context *ctx, byte *out, const byte *in)
    OUTUNPACK (3, d, 3);
 }
 
-#ifdef __riscos__
-#pragma optimise_cse
-#endif /* __riscos__ */
-
 static void
 twofish_decrypt (const TWOFISH_context *ctx, byte *out, const byte *in)
 {
index f2a5d23..76e72b0 100644 (file)
@@ -1,3 +1,11 @@
+2003-12-28  Stefan Bellon  <sbellon@sbellon.de>
+
+       * plaintext.c (handle_plaintext) [__riscos__]: Don't mangle
+       filename if the user specified it.
+
+       * g10.c, gpgv.c [__riscos__]: Removal of unnecessary #ifdef
+       __riscos__ sections.
+
 2003-12-27  David Shaw  <dshaw@jabberwocky.com>
 
        * keyserver.c (strip_leading_space, get_arg): New.
index 2486af3..5315062 100644 (file)
--- a/g10/g10.c
+++ b/g10/g10.c
@@ -675,10 +675,6 @@ static void add_notation_data( const char *string, int which );
 static void add_policy_url( const char *string, int which );
 static void add_keyserver_url( const char *string, int which );
 
-#ifdef __riscos__
-RISCOS_GLOBAL_STATICS("GnuPG Heap")
-#endif /* __riscos__ */
-
 const char *
 strusage( int level )
 {
@@ -1191,7 +1187,6 @@ main( int argc, char **argv )
 #endif
 
 #ifdef __riscos__
-    riscos_global_defaults();
     opt.lock_once = 1;
 #endif /* __riscos__ */
 
index c01263f..e5d4876 100644 (file)
@@ -78,10 +78,6 @@ static ARGPARSE_OPTS opts[] = {
 
 int g10_errors_seen = 0;
 
-#ifdef __riscos__
-RISCOS_GLOBAL_STATICS("GnuPG (gpgv) Heap")
-#endif /* __riscos__ */
-
 const char *
 strusage( int level )
 {
@@ -140,10 +136,6 @@ main( int argc, char **argv )
     STRLIST nrings=NULL;
     unsigned configlineno;
 
-#ifdef __riscos__
-    riscos_global_defaults();
-#endif /* __riscos__ */
-
     log_set_name("gpgv");
     init_signals();
     i18n_init();
index 8904302..6aad0ef 100644 (file)
@@ -114,10 +114,13 @@ handle_plaintext( PKT_plaintext *pt, md_filter_context_t *mfx,
        goto leave;
     }
 #else /* __riscos__ */
-    /* Convert all '.' in fname to '/' -- we don't create directories! */
-    for( c=0; fname[c]; ++c )
-        if( fname[c] == '.' )
-            fname[c] = '/';
+    /* If no output filename was given, i.e. we constructed it,
+       convert all '.' in fname to '/' but not vice versa as
+       we don't create directories! */
+    if( !opt.outfile )
+        for( c=0; fname[c]; ++c )
+            if( fname[c] == '.' )
+                fname[c] = '/';
 
     if( fp || nooutput )
        ;
index dad9a79..d75207f 100644 (file)
@@ -1,3 +1,7 @@
+2003-12-28  Stefan Bellon  <sbellon@sbellon.de>
+
+       * util.h [__riscos__]: Removal of unnecessary RISC OS stuff.
+
 2003-12-17  David Shaw  <dshaw@localhost.localdomain>
 
        * mpi.h (gcry_mpi, mpi_get_opaque, mpi_set_opaque): Make nbits and
index 6492b01..da55530 100644 (file)
@@ -287,14 +287,6 @@ int asprintf (char **buf, const char *fmt, ...);
 
 /******* RISC OS stuff ***********/
 #ifdef __riscos__
-/* needed for strcasecmp() */
-#include <strings.h>
-/* needed for filename munging */
-#include <unixlib/local.h>
-/* needed for image file system feature */
-#include <unixlib/features.h>
-void riscos_global_defaults(void);
-#define RISCOS_GLOBAL_STATICS(a) const char *__dynamic_da_name = (a);
 int riscos_load_module(const char *name, const char * const path[], int fatal);
 int riscos_get_filetype_from_string(const char *string, int len);
 int riscos_get_filetype(const char *filename);
index d58e505..f4e2387 100644 (file)
@@ -1,3 +1,8 @@
+2003-12-28  Stefan Bellon  <sbellon@sbellon.de>
+
+       * gpgkeys_hkp.c, gpgkeys_ldap.c [__riscos__]: Removal of
+       unnecessary #ifdef __riscos__ sections.
+
 2003-11-27  Werner Koch  <wk@gnupg.org>
 
        * gpgkeys_hkp.c (get_key): Fixed invalid use of fprintf without
index 9e91757..f8e9bc5 100644 (file)
@@ -55,10 +55,6 @@ struct keylist
   struct keylist *next;
 };
 
-#ifdef __riscos__
-RISCOS_GLOBAL_STATICS("HKP Keyfetcher Heap")
-#endif /* __riscos__ */
-
 int
 urlencode_filter( void *opaque, int control,
                  IOBUF a, byte *buf, size_t *ret_len)
@@ -748,10 +744,6 @@ main(int argc,char *argv[])
   int failed=0;
   struct keylist *keylist=NULL,*keyptr=NULL;
 
-#ifdef __riscos__
-  riscos_global_defaults();
-#endif
-
   console=stderr;
 
   while((arg=getopt(argc,argv,"hVo:"))!=-1)
index ff42eff..7847292 100644 (file)
@@ -60,10 +60,6 @@ struct keylist
   struct keylist *next;
 };
 
-#ifdef __riscos__
-RISCOS_GLOBAL_STATICS("LDAP Keyfetcher Heap")
-#endif /* __riscos__ */
-
 int
 ldap_err_to_gpg_err(int err)
 {
@@ -808,10 +804,6 @@ main(int argc,char *argv[])
   LDAPMessage *res;
   struct keylist *keylist=NULL,*keyptr=NULL;
 
-#ifdef __riscos__
-  riscos_global_defaults();
-#endif
-
   console=stderr;
 
   while((arg=getopt(argc,argv,"hVo:"))!=-1)
index 07fd87f..64d0789 100644 (file)
@@ -1,3 +1,7 @@
+2003-12-28  Stefan Bellon  <sbellon@sbellon.de>
+
+       * build-riscos, conf-riscos/*: Updated to reflect latest changes.
+
 2003-10-25  Werner Koch  <wk@gnupg.org>
 
        * autogen.sh: Updated required versions and add -I m4 to aclocal.
index c255a78..47b38bd 100644 (file)
@@ -2,8 +2,6 @@
 | for the RISC OS version into the correct places.
 | It won't run on anything other than RISC OS -- I think ;-)
 
-copy <obey$dir>.conf-riscos.cipher.c.construct <obey$dir>.^.cipher.c.construct ~cf~v
-copy <obey$dir>.conf-riscos.cipher.c.constructv <obey$dir>.^.cipher.c.constructv ~cf~v
 copy <obey$dir>.conf-riscos.include.h.config <obey$dir>.^.include.h.config ~cf~v
 copy <obey$dir>.conf-riscos.include.h.g10defs <obey$dir>.^.include.h.g10defs ~cf~v
 copy <obey$dir>.conf-riscos.Makefile <obey$dir>.^.Makefile ~cf~v
index 8fdaff8..2a20e08 100644 (file)
@@ -1,26 +1,21 @@
-# Makefile for the RISC OS version of GnuPG
+# Makefile for the RISC OS development version of GnuPG
+BRANCH=devel
+
 CC=cc
 LINK=link
 AR=libfile
 AS=objasm
 MAKE=amu
 DEPEND=-depend !Depend
-LIBLDAP=^.^.openldap-2/0/18
+LIBLDAP=^.^.openldap-2/0/27
+ZLIB=zlib.zlib
 
-# 26-bit configuration
-CC_FLAGS=-Wpc -zo -fw -apcs 3/26bit/fpe2 -throwback -Otime -IUnix:,include,mpi,intl,util,zlib,$(LIBLDAP).include,^.^.regex-0/12 -JUnix: -D__riscos__ -DHAVE_CONFIG_H -DNO_ASM -UIS_MODULE -DVERSION="\"$(GnuPG$Version)\"" $(GnuPG$DevDefine)
+CC_FLAGS=-Wdp -throwback -Otime -Iinclude,mpi,intl,util,zlib,$(LIBLDAP).include,^.^.regex-0/12,Unix: -JUnix: -D__riscos__ -DHAVE_CONFIG_H -DNO_ASM -UIS_MODULE -DVERSION="\"$(GnuPG$Version)\"" -DSAFE_VERSION="\"$(GnuPG$SafeVersion)\"" -DIS_DEVELOPMENT_VERSION
 AR_FLAGS=
-AS_FLAGS=-apcs 3/26bit -throwback -predefine "ARMv4 SETA 0"
+AS_FLAGS=-throwback -predefine "ARMv4 SETA 0"
 LD_FLAGS=
 UNIXLIB=Unix:o.UnixLib
 
-# 32-bit configuration (not yet fully working!)
-#CC_FLAGS=-Wpc -zo -fw -apcs 3/32bit/fpe3 -throwback -Otime -IUnix:,include,mpi,intl,util,zlib,$(LIBLDAP).include,^.^.regex-0/12 -JUnix: -D__riscos__ -DHAVE_CONFIG_H -DNO_ASM -UIS_MODULE -DVERSION="\"$(GnuPG$Version)\"" $(GnuPG$DevDefine)
-#AR_FLAGS=
-#AS_FLAGS=-apcs 3/32bit -throwback -predefine "ARMv4 SETA 0"
-#LD_FLAGS=
-#UNIXLIB=Unix:o.UnixLib32
-
 CIPHER_OBJS=cipher.o.blowfish \
        cipher.o.cast5 \
        cipher.o.cipher \
@@ -39,8 +34,9 @@ CIPHER_OBJS=cipher.o.blowfish \
        cipher.o.rndriscos \
        cipher.o.rsa \
        cipher.o.sha1 \
+       cipher.o.sha256 \
+       cipher.o.sha512 \
        cipher.o.smallprime \
-       cipher.o.tiger32 \
        cipher.o.twofish
 GETTEXT_OBJS=intl.o.bindtextdom \
        intl.o.dcgettext \
@@ -86,9 +82,23 @@ UTIL_OBJS=util.o.argparse \
        util.o.memory \
        util.o.miscutil \
        util.o.secmem \
+       util.o.srv \
        util.o.strgutil \
        util.o.ttyio \
        util.o.riscos
+ZLIB_OBJS=zlib.o.adler32 \
+       zlib.o.compress \
+       zlib.o.crc32 \
+       zlib.o.deflate \
+       zlib.o.infblock \
+       zlib.o.infcodes \
+       zlib.o.inffast \
+       zlib.o.inflate \
+       zlib.o.inftrees \
+       zlib.o.infutil \
+       zlib.o.trees \
+       zlib.o.uncompr \
+       zlib.o.zutil
 G10_OBJS=g10.o.armor \
        g10.o.build-packet \
        g10.o.cipher \
@@ -124,6 +134,7 @@ G10_OBJS=g10.o.armor \
        g10.o.pipemode \
        g10.o.pkclist \
        g10.o.plaintext \
+       g10.o.progress \
        g10.o.pubkey-enc \
        g10.o.revoke \
        g10.o.seckey-cert \
@@ -155,6 +166,7 @@ GPGV_OBJS=g10.o.armor \
        g10.o.openfile \
        g10.o.parse-packet \
        g10.o.plaintext \
+       g10.o.progress \
        g10.o.seskey \
        g10.o.sig-check \
        g10.o.signal \
@@ -182,7 +194,8 @@ GPGV_OBJS=g10.o.armor \
        cipher.o.rmd160 \
        cipher.o.rsa \
        cipher.o.sha1 \
-       cipher.o.tiger32 \
+       cipher.o.sha256 \
+       cipher.o.sha512 \
        mpi.mpi
 GPGKEYS_OBJS=util.util \
        intl.gettext
@@ -214,20 +227,20 @@ intl.gettext: $(GETTEXT_OBJS)
 mpi.mpi: $(MPI_OBJS)
        $(AR) $(AR_FLAGS) -c -o mpi.mpi $(MPI_OBJS)
 
-tools.gpgsplit: tools.o.gpgsplit util.util intl.gettext
-       $(LINK) $(LD_FLAGS) -o tools.gpgsplit tools.o.gpgsplit util.util intl.gettext $(UNIXLIB)
+tools.gpgsplit: tools.o.gpgsplit util.util intl.gettext $(ZLIB)
+       $(LINK) $(LD_FLAGS) -o tools.gpgsplit tools.o.gpgsplit util.util intl.gettext $(ZLIB) $(UNIXLIB)
        -squeeze tools.gpgsplit
-       -copy tools.gpgsplit ADFS::A5.$.tmp.!GnuPG.gpgsplit ~CF~V
+       -copy tools.gpgsplit ADFS::A4.$.tmp.!GnuPG.gpgsplit ~CF~V
 
 keyserver.gpgkeys_ldap: keyserver.o.gpgkeys_ldap $(GPGKEYS_OBJS) $(LIBLDAP).libraries.libldap.libldap
        $(LINK) $(LD_FLAGS) -o keyserver.gpgkeys_ldap keyserver.o.gpgkeys_ldap $(GPGKEYS_OBJS) $(LIBLDAP).libraries.libldap.libldap $(UNIXLIB)
        -squeeze keyserver.gpgkeys_ldap
-       -copy keyserver.gpgkeys_ldap ADFS::A5.$.tmp.!GnuPG.gpgkeys_ldap ~CF~V
+       -copy keyserver.gpgkeys_ldap ADFS::A4.$.tmp.!GnuPG.gpgkeys_ldap ~CF~V
 
 keyserver.gpgkeys_hkp: keyserver.o.gpgkeys_hkp $(GPGKEYS_OBJS)
        $(LINK) $(LD_FLAGS) -o keyserver.gpgkeys_hkp keyserver.o.gpgkeys_hkp $(GPGKEYS_OBJS) $(UNIXLIB)
        -squeeze keyserver.gpgkeys_hkp
-       -copy keyserver.gpgkeys_hkp ADFS::A5.$.tmp.!GnuPG.gpgkeys_hkp ~CF~V
+       -copy keyserver.gpgkeys_hkp ADFS::A4.$.tmp.!GnuPG.gpgkeys_hkp ~CF~V
 
 riscos.jpegview.jpegview:
        -dir riscos.jpegview
@@ -237,13 +250,16 @@ riscos.jpegview.jpegview:
 util.util: $(UTIL_OBJS)
        $(AR) $(AR_FLAGS) -c -o util.util $(UTIL_OBJS)
 
-g10.gpg: g10.o.g10 $(G10_OBJS) cipher.o.idea cipher.cipher intl.gettext mpi.mpi util.util BUILD
-       $(LINK) $(LD_FLAGS) -o g10.gpg g10.o.g10 $(G10_OBJS) cipher.o.idea cipher.cipher intl.gettext mpi.mpi util.util $(UNIXLIB)
-       -copy g10.gpg ADFS::A5.$.tmp.!GnuPG.gpg ~CFR~V
+zlib.zlib: $(ZLIB_OBJS)
+       $(AR) $(AR_FLAGS) -c -o zlib.zlib $(ZLIB_OBJS)
 
-g10.gpgv: $(GPGV_OBJS) intl.gettext BUILD
-       $(LINK) $(LD_FLAGS) -o g10.gpgv $(GPGV_OBJS) intl.gettext $(UNIXLIB)
-       -copy g10.gpgv ADFS::A5.$.tmp.!GnuPG.gpgv ~CFR~V
+g10.gpg: g10.o.g10 $(G10_OBJS) cipher.o.idea cipher.cipher intl.gettext mpi.mpi util.util $(ZLIB) BUILD
+       $(LINK) $(LD_FLAGS) -o g10.gpg g10.o.g10 $(G10_OBJS) cipher.o.idea cipher.cipher intl.gettext mpi.mpi util.util $(ZLIB) $(UNIXLIB)
+       -copy g10.gpg ADFS::A4.$.tmp.!GnuPG.gpg ~CFR~V
+
+g10.gpgv: $(GPGV_OBJS) intl.gettext $(ZLIB) BUILD
+       $(LINK) $(LD_FLAGS) -o g10.gpgv $(GPGV_OBJS) intl.gettext $(ZLIB) $(UNIXLIB)
+       -copy g10.gpgv ADFS::A4.$.tmp.!GnuPG.gpgv ~CFR~V
 
 g10.gpgpart: $(G10_OBJS) BUILD
        copy $(UNIXLIB) g10.gpgpart ~CF~V
@@ -251,6 +267,9 @@ g10.gpgpart: $(G10_OBJS) BUILD
        $(AR) $(AR_FLAGS) -i g10.gpgpart $(GETTEXT_OBJS)
        $(AR) $(AR_FLAGS) -i g10.gpgpart $(MPI_OBJS)
        $(AR) $(AR_FLAGS) -i g10.gpgpart $(UTIL_OBJS)
+ifdef ZLIB
+       $(AR) $(AR_FLAGS) -i g10.gpgpart $(ZLIB_OBJS)
+endif
        $(AR) $(AR_FLAGS) -i g10.gpgpart $(G10_OBJS)
 
 select-idea-src:
@@ -264,13 +283,12 @@ select-gpl-src:
 distrib.gnupgsrc/zip: select-gpl-src
        -zip -9@ distrib.gnupgsrc/zip < distrib.resources.distfiles
 
-distrib.gnupg/zip: distrib.gpl-bin.!GnuPG.JPEGview distrib.gpl-bin.!GnuPG.gpgsplit distrib.private.!GnuPG.gpgkeys_hkp distrib.gpl-bin.!GnuPG.gpg distrib.gpl-bin.!GnuPG.gpgv select-gpl-src
+distrib.gnupg/zip: distrib.gpl-bin.!GnuPG.JPEGview distrib.gpl-bin.!GnuPG.gpgsplit distrib.gpl-bin.!GnuPG.gpgkeys_hkp distrib.gpl-bin.!GnuPG.gpg distrib.gpl-bin.!GnuPG.gpgv select-gpl-src
        -copy distrib.resources.History distrib.gpl-bin.History ~CFR~V
        -copy distrib.resources.Upgrading distrib.gpl-bin.Upgrading ~CFR~V
        -copy distrib.resources.ReadMe_bin distrib.gpl-bin.!ReadMe1st ~CFR~V
        -copy distrib.resources.!GnuPG distrib.gpl-bin.!GnuPG ~CFR~V
        -copy distrib.resources.!GnuPGUser distrib.gpl-bin.!GnuPGUser ~CFR~V
-       -copy distrib.resources.!System distrib.gpl-bin.!System ~CFR~V
        -copy distrib.resources.orig_docs distrib.gpl-bin.orig_docs ~CFR~V
        -dir distrib.gpl-bin
        -zip -r9 ^.gnupg/zip *
@@ -284,7 +302,6 @@ distrib.gnupgdev/zip: distrib.private.!GnuPG.JPEGview distrib.private.!GnuPG.gpg
        -copy distrib.resources.ReadMe_bin distrib.private.!ReadMe1st ~CFR~V
        -copy distrib.resources.!GnuPG distrib.private.!GnuPG ~CFR~V
        -copy distrib.resources.!GnuPGUser distrib.private.!GnuPGUser ~CFR~V
-       -copy distrib.resources.!System distrib.private.!System ~CFR~V
        -copy distrib.resources.orig_docs distrib.private.orig_docs ~CFR~V
        -dir distrib.private
        -zip -r9 ^.gnupgdev/zip *
@@ -376,6 +393,10 @@ clean-util:
        -ifthere util.o.* then wipe util.o.* ~CFR~V
        -ifthere util.util then wipe util.util ~CFR~V
 
+clean-zlib:
+       -ifthere zlib.o.* then wipe zlib.o.* ~CFR~V
+       -ifthere zlib.zlib then wipe zlib.zlib ~CFR~V
+
 clean-dist:
        -ifthere distrib.*/zip then wipe distrib.*/zip ~CFR~V
 
@@ -408,7 +429,7 @@ clean-version:
        -ifthere g10.gpgv then wipe g10.gpgv ~CFR~V
        -ifthere g10.gpgpart then wipe g10.gpgpart ~CFR~V
 
-clean: clean-dist clean-cipher clean-intl clean-mpi clean-util clean-g10 clean-keyserver clean-tools clean-riscos
+clean: clean-dist clean-cipher clean-intl clean-mpi clean-util clean-zlib clean-g10 clean-keyserver clean-tools clean-riscos
 
 g10.o.armor: BUILD
        $(CC) $(CC_FLAGS) $(DEPEND) -c -o g10.o.armor g10.c.armor
@@ -432,6 +453,11 @@ dev: clean-version
        $(MAKE) fast-dev
 
 fast-dev: BUILD
+ifdef USE_ZLIBRISCOS
+       zlib-riscos-use
+else
+       zlib-riscos-nouse
+endif
        setver configure/ac AC_INIT(gnupg, , dev
        wipe distrib.private.!GnuPG.gpg* ~CFR~V
        -$(MAKE) keyserver.gpgkeys_ldap
@@ -441,6 +467,11 @@ fast-dev: BUILD
        rename distrib.gnupgdev/zip <WebServe$ServeRoot>.private.gnupgdev/zip
 
 dist: BUILD clean-version tools.gpgsplit
+ifdef USE_ZLIBRISCOS
+       zlib-riscos-use
+else
+       zlib-riscos-nouse
+endif
        setver configure/ac AC_INIT(gnupg, , dist
        wipe distrib.gpl-bin.!GnuPG.gpg* ~CFR~V
        $(MAKE) distrib.gnupg/zip
@@ -452,26 +483,27 @@ dist: BUILD clean-version tools.gpgsplit
        $(MAKE) distrib.gnupgintl/zip
        $(MAKE) distrib.gnupgldap/zip
        $(MAKE) select-idea-src
-       ifthere <WebServe$ServeRoot>.archives.gnupg/zip then wipe <WebServe$ServeRoot>.archives.gnupg/zip ~CFR~V
+       ifthere <WebServe$ServeRoot>.archives.gnupg-$(BRANCH).gnupg/zip then wipe <WebServe$ServeRoot>.archives.gnupg-$(BRANCH).gnupg/zip ~CFR~V
        ifthere <WebServe$ServeRoot>.private.gnupgdev/zip then wipe <WebServe$ServeRoot>.private.gnupgdev/zip ~CFR~V
-       ifthere <WebServe$ServeRoot>.archives.gnupgidea/zip then wipe <WebServe$ServeRoot>.archives.gnupgidea/zip ~CFR~V
-       ifthere <WebServe$ServeRoot>.archives.gnupgpart/zip then wipe <WebServe$ServeRoot>.archives.gnupgpart/zip ~CFR~V
-       ifthere <WebServe$ServeRoot>.archives.gnupgsrc/zip then wipe <WebServe$ServeRoot>.archives.gnupgsrc/zip ~CFR~V
-       ifthere <WebServe$ServeRoot>.archives.gnupgintl/zip then wipe <WebServe$ServeRoot>.archives.gnupgintl/zip ~CFR~V
-       ifthere <WebServe$ServeRoot>.archives.gnupgldap/zip then wipe <WebServe$ServeRoot>.archives.gnupgldap/zip ~CFR~V
-       ifthere <WebServe$ServeRoot>.gnupg_history/txt then wipe <WebServe$ServeRoot>.gnupg_history/txt ~CFR~V
-       ifthere <WebServe$ServeRoot>.gnupg_news/txt then wipe <WebServe$ServeRoot>.gnupg_news/txt ~CFR~V
+       ifthere <WebServe$ServeRoot>.archives.gnupg-$(BRANCH).gnupgidea/zip then wipe <WebServe$ServeRoot>.archives.gnupg-$(BRANCH).gnupgidea/zip ~CFR~V
+       ifthere <WebServe$ServeRoot>.archives.gnupg-$(BRANCH).gnupgpart/zip then wipe <WebServe$ServeRoot>.archives.gnupg-$(BRANCH).gnupgpart/zip ~CFR~V
+       ifthere <WebServe$ServeRoot>.archives.gnupg-$(BRANCH).gnupgsrc/zip then wipe <WebServe$ServeRoot>.archives.gnupg-$(BRANCH).gnupgsrc/zip ~CFR~V
+       ifthere <WebServe$ServeRoot>.archives.gnupg-$(BRANCH).gnupgintl/zip then wipe <WebServe$ServeRoot>.archives.gnupg-$(BRANCH).gnupgintl/zip ~CFR~V
+       ifthere <WebServe$ServeRoot>.archives.gnupg-$(BRANCH).gnupgldap/zip then wipe <WebServe$ServeRoot>.archives.gnupg-$(BRANCH).gnupgldap/zip ~CFR~V
+       ifthere <WebServe$ServeRoot>.archives.gnupg-$(BRANCH).gnupg_history/txt then wipe <WebServe$ServeRoot>.archives.gnupg-$(BRANCH).gnupg_history/txt ~CFR~V
+       ifthere <WebServe$ServeRoot>.archives.gnupg-$(BRANCH).gnupg_news/txt then wipe <WebServe$ServeRoot>.archives.gnupg-$(BRANCH).gnupg_news/txt ~CFR~V
        rename distrib.gnupgdev/zip <WebServe$ServeRoot>.private.gnupgdev/zip
-       rename distrib.gnupg/zip <WebServe$ServeRoot>.archives.gnupg/zip
-       rename distrib.gnupgidea/zip <WebServe$ServeRoot>.archives.gnupgidea/zip
-       rename distrib.gnupgpart/zip <WebServe$ServeRoot>.archives.gnupgpart/zip
-       rename distrib.gnupgsrc/zip <WebServe$ServeRoot>.archives.gnupgsrc/zip
-       rename distrib.gnupgintl/zip <WebServe$ServeRoot>.archives.gnupgintl/zip
-       rename distrib.gnupgldap/zip <WebServe$ServeRoot>.archives.gnupgldap/zip
-       copy distrib.resources.History <WebServe$ServeRoot>.gnupg_history/txt ~CFR~V
-       copy distrib.resources.orig_docs.NEWS <WebServe$ServeRoot>.gnupg_news/txt ~CFR~V
+       rename distrib.gnupg/zip <WebServe$ServeRoot>.archives.gnupg-$(BRANCH).gnupg/zip
+       rename distrib.gnupgidea/zip <WebServe$ServeRoot>.archives.gnupg-$(BRANCH).gnupgidea/zip
+       rename distrib.gnupgpart/zip <WebServe$ServeRoot>.archives.gnupg-$(BRANCH).gnupgpart/zip
+       rename distrib.gnupgsrc/zip <WebServe$ServeRoot>.archives.gnupg-$(BRANCH).gnupgsrc/zip
+       rename distrib.gnupgintl/zip <WebServe$ServeRoot>.archives.gnupg-$(BRANCH).gnupgintl/zip
+       rename distrib.gnupgldap/zip <WebServe$ServeRoot>.archives.gnupg-$(BRANCH).gnupgldap/zip
+       copy distrib.resources.History <WebServe$ServeRoot>.archives.gnupg-$(BRANCH).gnupg_history/txt ~CFR~V
+       copy distrib.resources.orig_docs.NEWS <WebServe$ServeRoot>.archives.gnupg-$(BRANCH).gnupg_news/txt ~CFR~V
        unset GnuPG$DevDefine
        unset GnuPG$Version
-       updatesigs <WebServe$ServeRoot>.archives --secring adfs::ap.$.secring/gpg
+       unset GnuPG$SafeVersion
+       updatesigs <WebServe$ServeRoot>.archives.gnupg-$(BRANCH) --secring adfs::pgp.$.secring/gpg
 
 # Dynamic dependencies:
index de5609b..5b4b6ed 100644 (file)
 /* Define if you have the strtoul function.  */
 #define HAVE_STRTOUL 1
 
+/* Define if you have the strsep function.  */
+#define HAVE_STRSEP 1
+
 /* Define if you have the tcgetattr function.  */
 #undef HAVE_TCGETATTR
 
 /* define if compiled symbols have a leading underscore */
 #define WITH_SYMBOL_UNDERSCORE 1
 
+#define HAVE_BUILTIN_EXPECT 1
+#define HAVE_ULONG_TYPEDEF 1
+#define HAVE_USHORT_TYPEDEF 1
+#define HAVE_TIMES 1
+#define HAVE_INTTYPES_H 1
+#define HAVE_FSEEKO 1
+#define HAVE_GETOPT_H 1
+#define HAVE_SIGSET_T 1
+#define HAVE_STRUCT_SIGACTION 1
+#define HAVE_ICONV 0
+
+#ifndef __set_errno
+#define __set_errno(val) (errno = (val), -1)
+#endif
+
 /* RISC OS specifica */
 #if (__CC_NORCROFT == 1) /* Norcroft */
 # undef __GNUC__
 # define __GNUC_MINOR__ 0
 # define __GLIBC__ 0
-# define __attribute__(x) 
-# define SIZEOF_UNSIGNED_LONG_LONG 0
+
 # if (__CC_NORCROFT_VERSION < 544) /* old version of Norcroft */
 #  define inline __inline
 #  define STR(a) #a
 #  define __func__ "[" __FILE__ ":" STR(__LINE__) "]"
+#  define SIZEOF_UNSIGNED_LONG_LONG 0
+# else
+#  define SIZEOF_UNSIGNED_LONG_LONG 8
 # endif
 #else /* gcc */
 # define SIZEOF_UNSIGNED_LONG_LONG 8
 #endif
 
-#define USE_RNDRISCOS 1
 #define HAVE_LDAP_GET_OPTION 1
+#undef  USE_ZLIBRISCOS
+#define USE_DNS_SRV 1
+#define USE_RNDRISCOS 1
+#define USE_RSA 1
+#define USE_CAST5 1
+#define USE_BLOWFISH 1
+#define USE_AES 1
+#define USE_TWOFISH 1
+#define USE_SHA256 1
+#if SIZEOF_UNSIGNED_LONG_LONG == 8
+# define USE_SHA512
+#endif
 
 #ifdef IS_DEVELOPMENT_VERSION
-#  define DEBUG 1
-/*#  define M_DEBUG */
-#  define M_GUARD 1
+# define DEBUG 1
+/*# define M_DEBUG */
+# define M_GUARD 1
+# define USE_IDEA 1
 #endif
 
 #include "g10defs.h"
index 6b47a6b..08f4a7a 100644 (file)
@@ -30,6 +30,8 @@
 #define EXTSEP_C            '/'
 #define DIRSEP_S            "."
 #define EXTSEP_S            "/"
+#define SAFE_VERSION_DOT    '/'
+#define SAFE_VERSION_DASH   '-'
 
 /* This file defines some basic constants for the MPI machinery.  We
  * need to define the types on a per-CPU basis, so it is done with
index d34913d..466a715 100644 (file)
@@ -1,3 +1,8 @@
+2003-12-28  Stefan Bellon  <sbellon@sbellon.de>
+
+       * gpgsplit.c [__riscos__]: Removal of unnecessary #ifdef
+       __riscos__ sections.
+
 2003-12-06  David Shaw  <dshaw@jabberwocky.com>
 
        * gpgsplit.c (write_part): Split off decompression code.
index 8d3349e..856e9aa 100644 (file)
 #ifdef HAVE_BZIP2
 #include <bzlib.h>
 #endif /* HAVE_BZIP2 */
-#ifdef __riscos__
+#if defined(__riscos__) && defined(USE_ZLIBRISCOS)
 # include "zlib-riscos.h"
-# include <unixlib/local.h>
-#endif /* __riscos__ */
+#endif
 
 #define INCLUDED_BY_MAIN_MODULE 1
 #include "../g10/packet.h"
@@ -114,10 +113,6 @@ main( int argc, char **argv )
 {
   ARGPARSE_ARGS pargs;
 
-#ifdef __riscos__
-  /* set global RISC OS specific properties */
-  __riscosify_control = __RISCOSIFY_NO_PROCESS;
-#endif /* __riscos__ */
 #ifdef HAVE_DOSISH_SYSTEM
   setmode( fileno(stdin), O_BINARY );
   setmode( fileno(stdout), O_BINARY );
@@ -533,7 +528,7 @@ write_part ( const char *fname, FILE *fpin, unsigned long pktlen,
   unsigned char *p;
   const char *outname = create_filename (pkttype);
   
-#ifdef __riscos__
+#if defined(__riscos__) && defined(USE_ZLIBRISCOS)
   static int initialized = 0;
 
   if (!initialized)
index 301b9e5..e65b81a 100644 (file)
@@ -1,3 +1,11 @@
+2003-12-28  Stefan Bellon  <sbellon@sbellon.de>
+
+       * riscos.c [__riscos__]: Better filetype handling (use a
+       different SWI) and removal of unnecessary function.
+
+       * memory.c (out_of_core) [__riscos__]: Produce stack backtrace on
+       RISC OS if out_of_core() is called and M_GUARD is compiled in.
+
 2003-12-06  David Shaw  <dshaw@jabberwocky.com>
 
        * http.c (send_request): Add a Host: header for virtual hosts.
index cb8a3b3..c062bdd 100644 (file)
@@ -406,6 +406,9 @@ out_of_core(size_t n, int secure)
         log_info ("(this may be caused by too many secret keys used "
                   "simultaneously or due to excessive large key sizes)\n");
     }
+#if defined(M_GUARD) && defined(__riscos__)
+    abort();
+#endif
     exit (2);
 }
 
index 70ec98f..256f3f6 100644 (file)
@@ -23,6 +23,7 @@
 
 #include <config.h>
 #include <stdlib.h>
+#include <string.h>
 #include <signal.h>
 #include <fcntl.h>
 #include <unistd.h>
 #include "util.h"
 #include "memory.h"
 
+#include <unixlib/local.h>     /* needed for RISCOSIFY_NO_PROCESS */
 #define __UNIXLIB_INTERNALS
 #include <unixlib/swiparams.h> /* needed for MMM_TYPE_* definitions */
 #undef __UNIXLIB_INTERNALS
 
 
+/* static symbols that trigger UnixLib behaviour */
+
+int __riscosify_control = __RISCOSIFY_NO_PROCESS;
+int __feature_imagefs_is_file = 1;
+
+
 /* RISC OS file open descriptor control list */
 
 struct fds_item {
@@ -69,13 +77,6 @@ is_read_only(const char *filename)
 
 /* exported RISC OS functions */
 
-void
-riscos_global_defaults(void)
-{
-    __riscosify_control = __RISCOSIFY_NO_PROCESS;
-    __feature_imagefs_is_file = 1;
-}
-
 int
 riscos_load_module(const char *name, const char * const path[], int fatal)
 {
@@ -118,10 +119,13 @@ riscos_get_filetype(const char *filename)
 {
     int result;
 
-    if (_swix(OS_File, _INR(0,1) | _OUT(6), 23, filename, &result))
+    if (_swix(OS_File, _INR(0,1) | _OUT(2), 17, filename, &result))
         log_fatal("Can't get filetype for file \"%s\"!\n", filename);
 
-    return result;
+    if ((result & 0xfff00000) == 0xfff00000)
+        return (result & 0xfff00) >> 8;
+    else
+        return 0;
 }        
 
 void
@@ -307,18 +311,21 @@ riscos_gstrans(const char *old)
 char *
 riscos_make_basename(const char *filepath, const char *realfname)
 {
-    char *result, *p = (char*)filepath-1;
+    char *result, *p;
     int i, filetype;
 
-    if ( !(p=strrchr(filepath, DIRSEP_C)) )
-        if ( !(p=strrchr(filepath, ':')) )
-            ;
+    if ( (p = strrchr(filepath, DIRSEP_C)) )
+        p++;
+    else if ( (p = strrchr(filepath, ':')) )
+        p++;
+    else
+        p = (char*) filepath;
 
-    i = strlen(p+1);
+    i = strlen(p);
     result = m_alloc(i + 5);
     if (!result)
         log_fatal("Can't claim memory for riscos_make_basename() buffer!\n");
-    strcpy(result, p+1);
+    strcpy(result, p);
     
     filetype = riscos_get_filetype( realfname );
     result[i++] = ',';