February 2011 - Pharo-dev - lists.pharo.org

[Pharo-project] Issue 3676 in pharo: Remove #example* class messages from HTTPClient

by pharo＠googlecode.com

Status: New Owner: ---- New issue 3676 by patchi...(a)gmail.com: Remove #example* class messages from HTTPClient http://code.google.com/p/pharo/issues/detail?id=3676 Pharo image: Pharo-core Pharo core version: all of them Since we're documenting HTTPClient it would be great to remove class side messages #examplePostArgs and #examplePostMultipart

Feb. 6, 2011

[Pharo-project] Issue 3675 in pharo: ProcessBrowser>>cleanup

by pharo＠googlecode.com

Status: Accepted Owner: stephane...(a)gmail.com CC: laurent....(a)gmail.com Labels: Milestone-1.3 Type-Squeak Difficulty-Easy New issue 3675 by stephane...(a)gmail.com: ProcessBrowser>>cleanup http://code.google.com/p/pharo/issues/detail?id=3675 Name: Tools-mtf.290 Author: mtf Time: 12 January 2011, 7:36:30.491 pm UUID: 4f8986b8-f97f-416f-989f-2b0b686d9c73 Ancestors: Tools-cmm.289 add a cleanUp method to ProcessBrowser as it can sometimes hold on to terminated processes =============== Diff against Tools-cmm.289 =============== Item was added: + ----- Method: ProcessBrowser class>>cleanUp (in category 'class initialization') ----- + cleanUp + "Remove terminated processes from my suspended list" + + self suspendedProcesses keys do: [:ea | + ea isTerminated ifTrue: [self suspendedProcesses removeKey: ea]]!

Feb. 6, 2011

Re: [Pharo-project] [COTDC] 3 - HTTPClient

by Francisco Ortiz PeÃ±aloza

Done, see http://code.google.com/p/pharo/issues/detail?id=3676 On Sun, Feb 6, 2011 at 7:33 PM, StÃ©phane Ducasse <stephane.ducasse(a)inria.fr> wrote: > lol > > On Feb 6, 2011, at 9:42 PM, Philippe Marschall wrote: > >> On 06.02.2011 18:01, laurent laffont wrote: >>> Comment Of The Day Contest - One Day One Comment >>> Rules: Each day a not commented class is elected. Each day the best >>> comment will be integrated with name of the author(s). >>> >>> >>> Today: HTTPClient >> >> <trollmode> >> I'm a good example of how not to write code. Turn around, walk away, >> fast. I'm fully of bugs. >> >> Somebody at some point thought that HTTP is a simple "hacker with >> telnet"-protocol. It's not. >> </trollmode> >> >> Philippe >> >> > > >

Feb. 6, 2011

[Pharo-project] Issue 3674 in pharo: SocketStream no-timeout streams

by pharo＠googlecode.com

Status: FixedWaitingToBePharoed Owner: stephane...(a)gmail.com New issue 3674 by stephane...(a)gmail.com: SocketStream no-timeout streams http://code.google.com/p/pharo/issues/detail?id=3674 One day we will have to fix all the network package... and it may be worth to look at this. Now this should not be integrated as such. We will have to really check carefully Name: Network-mtf.105 Author: mtf Time: 15 January 2011, 8:27:54.184 pm UUID: 1b2c2f95-fc87-4b1f-a034-4dc2cb793c9b Ancestors: Network-cmm.103 the SocketStream refactor broke the semantics of no-timeout streams. no timeout is supposed to mean we wait potentially forever. It was broken to mean timeout silently rather than with a signal. =============== Diff against Network-cmm.103 =============== Item was added: + ----- Method: BrowserUrl>>retrieveContentsForBrowser: (in category 'downloading') ----- + retrieveContentsForBrowser: aBrowser + ^aBrowser browserUrlContents: locator! Item was changed: ----- Method: SocketStream>>receiveData (in category 'private-socket') ----- receiveData + self waitForData. - "Receive data. Signal exceptions and timeouts depending on #shouldSignal and #shouldTimeout. Return the position in the buffer where the new data starts, regardless if anything was read." - - socket - waitForDataFor: self timeout - ifClosed: [self shouldSignal - ifTrue:[ConnectionClosed signal: 'Connection closed while waiting for data.']] - ifTimedOut: [self shouldTimeout - ifTrue:[ConnectionTimedOut signal: 'Data receive timed out.']]. ^self receiveAvailableData! Item was added: + ----- Method: SocketStream>>signalClosed (in category 'private-socket') ----- + signalClosed + self shouldSignal ifFalse: [^ self]. + ConnectionClosed signal: 'Connection closed while waiting for data.'! Item was added: + ----- Method: SocketStream>>signalTimeout (in category 'private-socket') ----- + signalTimeout + self shouldSignal ifFalse: [^ self]. + ConnectionTimedOut signal: 'Data receive timed out.'! Item was added: + ----- Method: SocketStream>>waitForData (in category 'private-socket') ----- + waitForData + "Wait for data. If shouldTimeout, we will time out if nothing arrives, otherwise we wait indefinitely" + + self shouldTimeout + ifTrue: [socket waitForDataFor: self timeout + ifClosed: [self signalClosed] + ifTimedOut: [self signalTimeout]] + ifFalse: [socket waitForDataIfClosed: [self signalClosed]]!

Feb. 6, 2011

[Pharo-project] can you tell us on the slugginess of pharo for Kinect

by StÃ©phane Ducasse

Hi ricardo you mentioned that pharo is really slow for using kinect and can you tell us more? TX Stef

Feb. 6, 2011

Re: [Pharo-project] [COTDC] 3 - HTTPClient

by StÃ©phane Ducasse

lol On Feb 6, 2011, at 9:42 PM, Philippe Marschall wrote: > On 06.02.2011 18:01, laurent laffont wrote: >> Comment Of The Day Contest - One Day One Comment >> Rules: Each day a not commented class is elected. Each day the best >> comment will be integrated with name of the author(s). >> >> >> Today: HTTPClient > > <trollmode> > I'm a good example of how not to write code. Turn around, walk away, > fast. I'm fully of bugs. > > Somebody at some point thought that HTTP is a simple "hacker with > telnet"-protocol. It's not. > </trollmode> > > Philippe > >

Feb. 6, 2011

Re: [Pharo-project] Issue 3673 in pharo: do not raise an error in String >> #match: if the receiver contains '**' or '*#' as a substring

by pharo＠googlecode.com

Comment #1 on issue 3673 by stephane...(a)gmail.com: do not raise an error in String >> #match: if the receiver contains '**' or '*#' as a substring http://code.google.com/p/pharo/issues/detail?id=3673 - updated StringTest >> #testMatch to reflect the changes of Collections-ul.420 =============== Diff against CollectionsTests-nice.178 =============== Item was changed: ----- Method: StringTest>>testMatch (in category 'test-comparing') ----- testMatch + #('**' 'f**' 'f**o' 'f*' '*f*' 'f#*' 'f##' '*oo' '#oo' '*o*' '#o#' '#o*' '*o#' 'fo*' 'fo#' '*foo*' '###' '*#' 'f*#' 'f*#o') - #('**' '*#' 'f**' 'f*#' 'f**o' 'f*#o') do: [ :each | - self should: [ each match: 'foo' ] raise: Error ]. - #('f*' '*f*' 'f#*' 'f##' '*oo' '#oo' '*o*' '#o#' '#o*' '*o#' 'fo*' 'fo#' '*foo*' '###') do: [ :each | self assert: (each match: 'foo') ]. #('bar' 'foo#' '#foo' '*foo#' '#foo*' '*bar*') do: [ :each | self deny: (each match: 'foo') ]!

Feb. 6, 2011

[Pharo-project] Issue 3673 in pharo: do not raise an error in String >> #match: if the receiver contains '**' or '*#' as a substring

by pharo＠googlecode.com

Status: Accepted Owner: stephane...(a)gmail.com Labels: Milestone-1.3 New issue 3673 by stephane...(a)gmail.com: do not raise an error in String >> #match: if the receiver contains '**' or '*#' as a substring http://code.google.com/p/pharo/issues/detail?id=3673 Do we want this behavior? Name: Collections-ul.420 Author: ul Time: 15 January 2011, 1:57:14.662 pm UUID: aadc4c69-dd68-4f46-8370-dda4404f0153 Ancestors: Collections-mtf.419 - do not raise an error in String >> #match: if the receiver contains '**' or '*#' as a substring. - fixed the comment in String >> #match: =============== Diff against Collections-mtf.419 =============== Item was changed: ----- Method: String>>match: (in category 'comparing') ----- match: text "Answer whether text matches the pattern in this string. Matching ignores upper/lower case differences. Where this string contains #, text may contain any character. Where this string contains *, text may contain any sequence of characters." ^ self startingAt: 1 match: text startingAt: 1 " '*' match: 'zort' true '*baz' match: 'mobaz' true '*baz' match: 'mobazo' false '*baz*' match: 'mobazo' true '*baz*' match: 'mozo' false 'foo*' match: 'foozo' true 'foo*' match: 'bozo' false 'foo*baz' match: 'foo23baz' true 'foo*baz' match: 'foobaz' true 'foo*baz' match: 'foo23bazo' false 'foo' match: 'Foo' true 'foo*baz*zort' match: 'foobazort' false + 'foo*baz*zort' match: 'foobazzort' true - 'foo*baz*zort' match: 'foobazzort' false '*foo#zort' match: 'afoo3zortthenfoo3zort' true '*foo*zort' match: 'afoodezortorfoo3zort' true "! Item was changed: ----- Method: String>>startingAt:match:startingAt: (in category 'comparing') ----- startingAt: keyStart match: text startingAt: textStart "Answer whether text matches the pattern in this string. Matching ignores upper/lower case differences. Where this string contains #, text may contain any character. Where this string contains *, text may contain any sequence of characters." + | anyMatch matchStart matchEnd i matchStr j ii jj | i := keyStart. j := textStart. + + "Process consecutive *s and #s at the beginning." + anyMatch := false. + [ i <= self size and: [ + (self at: i) + caseOf: { + [ $* ] -> [ + anyMatch := true. + i := i + 1. + true ]. + [ $# ] -> [ + i := i + 1. + j := j + 1. + true ] } + otherwise: [ false ] ] ] whileTrue. + i > self size ifTrue: [ + ^j - 1 = text size or: [ "We reached the end by matching the character with a #." + anyMatch and: [ j <= text size ] "Or there was a * before the end." ] ]. + matchStart := i. - "Check for any #'s" - [i > self size ifTrue: [^ j > text size "Empty key matches only empty string"]. - (self at: i) = $#] whileTrue: - ["# consumes one char of key and one char of text" - j > text size ifTrue: [^ false "no more text"]. - i := i+1. j := j+1]. - - "Then check for *" - (self at: i) = $* - ifTrue: [i = self size ifTrue: - [^ true "Terminal * matches all"]. - "* means next match string can occur anywhere" - anyMatch := true. - matchStart := i + 1] - ifFalse: ["Otherwise match string must occur immediately" - anyMatch := false. - matchStart := i]. - "Now determine the match string" matchEnd := self size. + (ii := self indexOf: $* startingAt: matchStart) > 0 ifTrue: [ matchEnd := ii-1 ]. + (ii := self indexOf: $# startingAt: matchStart) > 0 ifTrue: [ matchEnd := matchEnd min: ii-1 ]. - (ii := self indexOf: $* startingAt: matchStart) > 0 ifTrue: - [ii = matchStart ifTrue: [self error: '** not valid -- use * instead']. - matchEnd := ii-1]. - (ii := self indexOf: $# startingAt: matchStart) > 0 ifTrue: - [ii = matchStart ifTrue: [self error: '*# not valid -- use #* instead']. - matchEnd := matchEnd min: ii-1]. matchStr := self copyFrom: matchStart to: matchEnd. "Now look for the match string" [jj := text findString: matchStr startingAt: j caseSensitive: false. anyMatch ifTrue: [jj > 0] ifFalse: [jj = j]] whileTrue: ["Found matchStr at jj. See if the rest matches..." (self startingAt: matchEnd+1 match: text startingAt: jj + matchStr size) ifTrue: [^ true "the rest matches -- success"]. "The rest did not match." anyMatch ifFalse: [^ false]. "Preceded by * -- try for a later match" j := j+1]. ^ false "Failed to find the match string"!

Feb. 6, 2011

Re: [Pharo-project] [COTDC] 3 - HTTPClient

by laurent laffont

On Sun, Feb 6, 2011 at 9:44 PM, Philippe Marschall <kustos(a)gmx.net> wrote: > On 06.02.2011 21:42, Philippe Marschall wrote: > > On 06.02.2011 18:01, laurent laffont wrote: > >> Comment Of The Day Contest - One Day One Comment > >> Rules: Each day a not commented class is elected. Each day the best > >> comment will be integrated with name of the author(s). > >> > >> > >> Today: HTTPClient > > > > <trollmode> > > I'm a good example of how not to write code. Turn around, walk away, > > fast. I'm fully of bugs. > > > > Somebody at some point thought that HTTP is a simple "hacker with > > telnet"-protocol. It's not. > > </trollmode> > > That's actually HTTPSocket, not HTTPClient. > Arf, can someone manage the "One Day One Refactoring Contest" ? :D Laurent > > Cheers > Philippe > > >

Feb. 6, 2011

Re: [Pharo-project] Issue 3672 in pharo: terminate suspended compiler process on window close

by pharo＠googlecode.com

Updates: Status: Closed Comment #2 on issue 3672 by stephane...(a)gmail.com: terminate suspended compiler process on window close http://code.google.com/p/pharo/issues/detail?id=3672 in 13041

Feb. 6, 2011