From: Adam Back <aba@dcs.ex.ac.uk>
Date: Sun, 31 Aug 1997 05:58:23 +0800
To: junger@samsara.LAW.CWRU.Edu
Subject: Re: Developments in the _Junger_ suit
In-Reply-To: <199708302035.QAA15015@samsara.LAW.CWRU.Edu>
Message-ID: <199708302149.WAA08462@server.test.net>
MIME-Version: 1.0
Content-Type: text/plain




Peter Junger <junger@samsara.law.cwru.edu> writes:
> [...]
> The Bureau did, however, classify several programs that we submitted,
> including one written by me in C that implements several different
> encryption algorithms and Adam Back's RSA program in three lines of
> Perl (which is available at <http:/www.dcs.ex.ac.uk>), as being
> encryption programs that are subject to the export restriction of the
> EAR.

Yay!  It's officially non-exportable.  It would be kind of fun to
observe a lawsuit built around someone in the US using this as a .sig:

: Have *you* exported RSA today? --> http://www.dcs.ex.ac.uk/~aba/rsa/
: 
: print pack"C*",split/\D+/,`echo "16iII*o\U@{$/=$z;[(pop,pop,unpack"H*",<>
: )]}\EsMsKsN0[lN*1lK[d2%Sa2/d0<X+d*lMLa^*lN%0]dsXx++lMlN/dsM0<J]dsJxp"|dc`
 
Perhaps they should round up all those who have used it in the past as
a .sig and lock them up.

> BXA are quoted as writing:
> : While the use of html links by a person might, in some applications,
> : involve an export . . .

I must admit to being very curious as to how html links can be an
export.

Is this an export?

	RSA .sig

Is this?

	PGP 5.0i

(guessing URL).

This one might be fun also, but still I can't see that it's an export:

	<IMG SRC="http://www.dcs.ex.ac.uk/~aba/shirt/rsa.gif">

(it's an inline image of the RSA .sig).

> The most significant part of the Bureau's response, however, was their
> professed inability to classify one way or the other all programs
> implementing certain specified encryption algorithms such as, for
> example, OTP programs that XOR the bytes comprising the message with
> the bytes in a one-time pad.  

Weird so this is exportable (otp.c):

main(i,c)int*c;{for(c=fopen(c[1],"r");i=~getchar();putchar(getc(c)^~i));}

Here's a perl one too btw:

open P,shift;read(P,$p,length),print $_^$p while<>

Adam
-- 
Have *you* exported RSA today? --> http://www.dcs.ex.ac.uk/~aba/rsa/

print pack"C*",split/\D+/,`echo "16iII*o\U@{$/=$z;[(pop,pop,unpack"H*",<>
)]}\EsMsKsN0[lN*1lK[d2%Sa2/d0<X+d*lMLa^*lN%0]dsXx++lMlN/dsM0<J]dsJxp"|dc`