[Cryptography Team] Fix to RandomPool

[Ron Teitelbaum]

I removed it.

Ron

> -----Original Message-----
> From: cryptography-bounces at lists.squeakfoundation.org
> [mailto:cryptography-bounces at lists.squeakfoundation.org] On Behalf Of
> Robert Withers
> Sent: Monday, December 18, 2006 11:15 AM
> To: Ron at USMedRec.com; Cryptography Team Development List
> Subject: Re: [Cryptography Team] Fix to RandomPool
> 
> Ron,
> 
> Would it be possible to remove the Transcript show statement?  It
> gets annoying under heavy use and doesn't help debugability, I don't
> believe.
> 
> thanks,
> Robert
> 
> 
> On Dec 18, 2006, at 7:21 AM, Ron Teitelbaum wrote:
> 
> > I made the following change
> >
> > RandomPool >> stir
> > 	| cipher block |
> > 	Transcript cr; show: 'stir'.
> > 	cipher _ (TripleDES key: key) cbc.
> > 	cipher initialVector: (pool copyFrom: pool size - TripleDES
> > blockSize + 1 to: pool size).
> > 	1 to: pool size - TripleDES blockSize + 1 by: TripleDES blockSize
> > do: [ :startIndex |
> > 		block _ pool copyFrom: startIndex to: startIndex + TripleDES
> > blockSize - 1.
> > 		cipher encryptBlock: block.
> > 		pool replaceFrom: startIndex to: startIndex + TripleDES
> > blockSize - 1 with: block]
> >
> >
> > I had to add the + 1 for setting the initalVector, I was getting 9
> > bytes.
> >
> > Ron Teitelbaum
> >
> > _______________________________________________
> > Cryptography mailing list
> > Cryptography at lists.squeakfoundation.org
> > http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/
> > cryptography
> 
> _______________________________________________
> Cryptography mailing list
> Cryptography at lists.squeakfoundation.org
> http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/cryptography