[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

PGP On shared machines (was Re: Keyed-MD5, ITAR, and HTTP-NG)

One important thing to note in an academic environment is that if you 
have foreign students who are on non-green card visas, you may need to 
get an export licence if they can access the server. I expect you'll 
probably get the licence without too much hassle, and you're unlikely to 
be indicted for this, but it's something to be aware of.

(defun modexpt (x y n)  "computes (x^y) mod n"
  (cond ((= y 0) 1) 
	((= y 1) (mod x n))
	((evenp y) (mod (expt (modexpt x (/ y 2) n) 2) n))
	(t (mod (* x (modexpt x (1- y) n)) n))))