[squeak-dev] The Trunk: Collections-pre.961.mcz
Thiede, Christoph
Christoph.Thiede at student.hpi.uni-potsdam.de
Wed Nov 10 15:48:16 UTC 2021
Top recategorizations contributor! 🏆 Thank you for tidying up our codebase ... :-)
Best,
Christoph
________________________________
Von: Squeak-dev <squeak-dev-bounces at lists.squeakfoundation.org> im Auftrag von commits at source.squeak.org <commits at source.squeak.org>
Gesendet: Mittwoch, 10. November 2021 15:22:44
An: squeak-dev at lists.squeakfoundation.org; packages at lists.squeakfoundation.org
Betreff: [squeak-dev] The Trunk: Collections-pre.961.mcz
Patrick Rein uploaded a new version of Collections to project The Trunk:
http://source.squeak.org/trunk/Collections-pre.961.mcz
==================== Summary ====================
Name: Collections-pre.961
Author: pre
Time: 10 November 2021, 3:22:38.585616 pm
UUID: f3d7c967-3623-5f4b-8166-59aeeeee1600
Ancestors: Collections-eem.960
Recategorizes unclassified or misclassified methods.
=============== Diff against Collections-eem.960 ===============
Item was changed:
+ ----- Method: Base64MimeConverter class>>decodeInteger: (in category 'convenience') -----
- ----- Method: Base64MimeConverter class>>decodeInteger: (in category 'as yet unclassified') -----
decodeInteger: mimeString
| bytes sum |
"Decode the MIME string into an integer of any length"
bytes := (Base64MimeConverter mimeDecodeToBytes:
(ReadStream on: mimeString)) contents.
sum := 0.
bytes reverseDo: [:by | sum := sum * 256 + by].
^ sum!
Item was changed:
+ ----- Method: Base64MimeConverter class>>encodeInteger: (in category 'convenience') -----
- ----- Method: Base64MimeConverter class>>encodeInteger: (in category 'as yet unclassified') -----
encodeInteger: int
| strm |
"Encode an integer of any length and return the MIME string"
strm := WriteStream on: (ByteArray new: int digitLength).
1 to: int digitLength do: [:ii | strm nextPut: (int digitAt: ii)].
^ ((self mimeEncode: strm readStream) contents) copyUpTo: $= "remove padding"!
Item was changed:
+ ----- Method: Base64MimeConverter class>>initialize (in category 'class initialization') -----
- ----- Method: Base64MimeConverter class>>initialize (in category 'as yet unclassified') -----
initialize
FromCharTable := Array new: 256. "nils"
ToCharTable := ($A to: $Z) , ($a to: $z) , ($0 to: $9) , '+/'.
ToCharTable keysAndValuesDo: [:ind :char |
FromCharTable at: char asciiValue + 1 put: ind - 1].!
Item was changed:
+ ----- Method: Base64MimeConverter class>>mimeDecodeToBytes: (in category 'convenience') -----
- ----- Method: Base64MimeConverter class>>mimeDecodeToBytes: (in category 'as yet unclassified') -----
mimeDecodeToBytes: aStream
"Return a ReadStream of the original ByteArray. aStream has only 65 innocuous character values. aStream is not binary. (See class comment). 4 bytes in aStream goes to 3 bytes in output."
| me |
aStream position: 0.
me := self new mimeStream: aStream.
me dataStream: (WriteStream on: (ByteArray new: aStream size * 3 // 4)).
me mimeDecodeToByteArray.
^ me dataStream readStream!
Item was changed:
+ ----- Method: Base64MimeConverter class>>mimeDecodeToChars: (in category 'convenience') -----
- ----- Method: Base64MimeConverter class>>mimeDecodeToChars: (in category 'as yet unclassified') -----
mimeDecodeToChars: aStream
"Return a ReadWriteStream of the original String. aStream has only 65 innocuous character values. It is not binary. (See class comment). 4 bytes in aStream goes to 3 bytes in output."
| me |
aStream position: 0.
me := self new mimeStream: aStream.
me dataStream: (WriteStream on: (String new: aStream size * 3 // 4)).
me mimeDecode.
^ me dataStream readStream!
Item was changed:
+ ----- Method: Base64MimeConverter class>>mimeEncode: (in category 'convenience') -----
- ----- Method: Base64MimeConverter class>>mimeEncode: (in category 'as yet unclassified') -----
mimeEncode: aStream
"Return a ReadWriteStream of characters. The data of aStream is encoded as 65 innocuous characters. (See class comment). 3 bytes in aStream goes to 4 bytes in output."
^self mimeEncode: aStream multiLine: true atStart: true!
Item was changed:
+ ----- Method: Base64MimeConverter class>>mimeEncode:multiLine: (in category 'convenience') -----
- ----- Method: Base64MimeConverter class>>mimeEncode:multiLine: (in category 'as yet unclassified') -----
mimeEncode: aStream multiLine: aBool
"Return a ReadWriteStream of characters. The data of aStream is encoded as 65 innocuous characters. (See class comment). 3 bytes in aStream goes to 4 bytes in output."
^self mimeEncode: aStream multiLine: aBool atStart: true!
Item was changed:
+ ----- Method: Base64MimeConverter class>>mimeEncode:multiLine:atStart: (in category 'private - convenience') -----
- ----- Method: Base64MimeConverter class>>mimeEncode:multiLine:atStart: (in category 'as yet unclassified') -----
mimeEncode: aStream multiLine: aBool atStart: resetInput
"Return a ReadStream of characters. The data of aStream is encoded as 65 innocuous characters. (See class comment). 3 bytes in aStream goes to 4 bytes in output."
| me |
resetInput ifTrue:[aStream position: 0].
me := self new dataStream: aStream.
me multiLine: aBool.
me mimeStream: (WriteStream on: (String new: aStream size + 20 * 4 // 3)).
me mimeEncode.
^ me mimeStream readStream!
Item was changed:
+ ----- Method: Base64MimeConverter class>>mimeEncodeContinue: (in category 'private - convenience') -----
- ----- Method: Base64MimeConverter class>>mimeEncodeContinue: (in category 'as yet unclassified') -----
mimeEncodeContinue: aStream
"Return a ReadWriteStream of characters. The data of aStream is encoded as 65 innocuous characters. (See class comment). 3 bytes in aStream goes to 4 bytes in output."
^self mimeEncode: aStream multiLine: true atStart: false!
Item was changed:
+ ----- Method: Bit7MimeConverter>>mimeDecode (in category 'conversion') -----
- ----- Method: Bit7MimeConverter>>mimeDecode (in category 'as yet unclassified') -----
mimeDecode
dataStream nextPutAll: mimeStream upToEnd.
^ dataStream!
Item was changed:
+ ----- Method: Bit7MimeConverter>>mimeEncode (in category 'conversion') -----
- ----- Method: Bit7MimeConverter>>mimeEncode (in category 'as yet unclassified') -----
mimeEncode
| character |
[dataStream atEnd] whileFalse: [
character := dataStream next.
self assert: character asciiValue < 128.
mimeStream nextPut: character].
^ mimeStream!
Item was changed:
+ ----- Method: Generator class>>on: (in category 'instance creation') -----
- ----- Method: Generator class>>on: (in category 'instance-creation') -----
on: aBlock
^ self basicNew initializeOn: aBlock!
Item was changed:
+ ----- Method: NullMimeConverter>>mimeDecode (in category 'conversion') -----
- ----- Method: NullMimeConverter>>mimeDecode (in category 'as yet unclassified') -----
mimeDecode
dataStream nextPutAll: mimeStream upToEnd.
^ dataStream!
Item was changed:
+ ----- Method: NullMimeConverter>>mimeEncode (in category 'conversion') -----
- ----- Method: NullMimeConverter>>mimeEncode (in category 'as yet unclassified') -----
mimeEncode
mimeStream nextPutAll: dataStream upToEnd.
^ mimeStream
!
Item was changed:
+ ----- Method: QuotedPrintableMimeConverter>>encodeChar:to: (in category 'private - encoding') -----
- ----- Method: QuotedPrintableMimeConverter>>encodeChar:to: (in category 'as yet unclassified') -----
encodeChar: aChar to: aStream
(self conversionNeededFor: aChar)
ifFalse: [aStream nextPut: aChar]
ifTrue: [aStream nextPut: $=;
nextPut: (Character digitValue: aChar asciiValue // 16);
nextPut: (Character digitValue: aChar asciiValue \\ 16)].
!
Item was changed:
+ ----- Method: QuotedPrintableMimeConverter>>reservedCharacters (in category 'private - encoding') -----
- ----- Method: QuotedPrintableMimeConverter>>reservedCharacters (in category 'as yet unclassified') -----
reservedCharacters
^ '=' !
Item was changed:
+ ----- Method: Stream>>sleep (in category 'file directory') -----
- ----- Method: Stream>>sleep (in category 'as yet unclassified') -----
sleep
"an FTP-based stream might close the connection here"!
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20211110/f3fa3d18/attachment.html>
More information about the Squeak-dev
mailing list
|