March 2016 - Pharo-dev - lists.pharo.org

Re: [Pharo-dev] [Ann] New version of Ghost

by Mariano Martinez Peck

On Thu, Mar 24, 2016 at 4:02 PM, Denis Kudriashov <dionisiydk(a)gmail.com> wrote: > Hi. > Thank's for kind words. > > 2016-03-24 19:22 GMT+01:00 Mariano Martinez Peck <marianopeck(a)gmail.com>: > >> >>> - GHClassGhost able to replace class of real objects. It implements >>> cannotInterpret: trick to intercept all instance messages. Subclasses >>> should define two behaviours: #ghostBehaviour (as any other ghost) and >>> #instancesBehaviour which will process instance messages. In previous >>> version it was different message to same #ghostBehaviour. >>> >>> > In your original version you implemented #cannotInterpert: for instance > messages such way: > proxy proxyHandler *handleInterceptionToInstance:* interception. > And proxy handler was responsible for two messages: #handleInterceptionToInstance: > and #handleInterception:. > In my version I ask proxy for different kind of handler (ghostBehaviour): > > GHObjectGhost>>doesNotUnderstand: aMessage > > self *ghostBehaviour* intercept: aMessage to: self > > > GHInstanceMessagesInterceptor>>cannotInterpret: aMessage > > "some logic to find ghostClass" > > ghostClass *instancesBehaviour* intercept: aMessage to: self > > > OK, that's good. I like it. > >>> - New kind of proxies: >>> - GHObjectVirus. It is special kind of GHClassProxy. It infects real >>> object to intercept it messages. From meta level infected object looks like >>> healthy object which means that meta messages are executed by infected >>> object itself. As class virus looks like real victim class. So in case when >>> virus is created with standard meta level tools will not differ him from >>> health object. There are special messages which allow ask object about >>> viruses: >>> - infectedObject isInfectedByVirus >>> - infectedObject virus >>> - infectedObject recoverFromVirus >>> >>> >> Sorry I did not get this one. >> > > Good example where I use viruses is stubbing real objects in Mocketry. I > will announce it soon. You can do this: > > rect := 0@0 corner: 2@3 > rect stub area willReturn: 1000. > > rect area "=> 1000". > rect origin "=> 0@0". > > > OK..I should take a look to the code...but...it looks to me that stub the only thing it does is to create the proxy and then the #become: ?? -- Mariano http://marianopeck.wordpress.com

March 25, 2016

Fwd: Squeak 5 on Raspberry Pi

by Sean P. DeNigris

> [Squeak 5 is] so *fast* (I have it running next to > Pharo, which is unusable slow as a GUI. Whereas Squeak 5 is zipping > along at Windows desktop speeds on the Pi (Model B). ----- Cheers, Sean -- View this message in context: http://forum.world.st/Fwd-Squeak-5-on-Raspberry-Pi-tp4886416.html Sent from the Pharo Smalltalk Developers mailing list archive at Nabble.com.

March 25, 2016

[ANN] Simple FogBugz Search tool in Pharo

by Torsten Bergmann

Hi, played with the JSON API of Pharo FogBugz issue tracker with the outcome of another little Pharo tool that lets you: - login to FogBugz from Pharo - enter a string and search for according issues - open a browser on a selected issue in the result list (works on Linux and Win so far) The project repo is at: http://www.smalltalkhub.com/#!/~TorstenBergmann/FogBugz One can use the client also directly: |client| client := FogBugzClient loginUser: 'abc(a)def.com' password: 'secret'. (client query: 'UFFI') inspect. client logout You can download the tool in latest Pharo 5 (50660 or later) from catalog or by opening the Spotter and entering "FogBugz", wait and hitting ENTER. Attached is a screenshot. Enjoy T.

March 25, 2016

Re: [Pharo-dev] [squeak-dev] Re: [Vm-dev] I would be extremely grateful for a reproducible case for the following Socket issue

by Eliot Miranda

Hi Levente, On Thu, Mar 24, 2016 at 2:16 AM, Levente Uzonyi <leves(a)caesar.elte.hu> wrote: > Hi Eliot, > > The snippet below, evaluated from a workspace, triggered the issue in less > than a minute for me, three times in a row. > Both processes will halt if #sloppyWaitForDataIfClosed: doesn't return > within a second. If you send #dataAvailable to the socket, you'll find that > it has data ready to be read, but its readSemaphore has no signal. > > Levente > > > Socket compile: 'sloppyWaitForDataIfClosed: closedBlock > > [(socketHandle ~~ nil > and: [self primSocketReceiveDataAvailable: socketHandle]) ifTrue: > [^self]. > self isConnected ifFalse: > [^closedBlock value]. > self readSemaphore wait] repeat' > classified: 'waiting'. > > [ > listenerSocket := Socket newTCP. > listenerSocket listenOn: 0 backlogSize: 4 interface: #[127 0 0 1]. > clientSocket := Socket newTCP. > clientSocket connectTo: #[127 0 0 1] port: listenerSocket > localPort. > clientSocket waitForConnectionFor: 1. > self assert: clientSocket isConnected. > serverSocket := listenerSocket waitForAcceptFor: 1. > self assert: serverSocket isConnected ] > ensure: [ listenerSocket destroy ]. > > serverProcess := [ > | shouldRun buffer bytesReceived waitDuration | > shouldRun := true. > buffer := ByteString new: 10. > waitDuration := 1 second. > [ > [ serverSocket sloppyWaitForDataIfClosed: [ shouldRun := > false ] ] > valueWithin: waitDuration > onTimeout: [ self halt ]. > buffer atAllPut: (Character value: 0). > bytesReceived := serverSocket receiveDataInto: buffer. > self assert: bytesReceived = 4. > self assert: (buffer first: 4) = 'PING'. > serverSocket sendData: 'PONG' ] repeat ] newProcess. > clientProcess := [ > | shouldRun buffer bytesReceived waitDuration | > shouldRun := true. > buffer := ByteString new: 10. > waitDuration := 1 second. > [ > clientSocket sendData: 'PING'. > [ clientSocket sloppyWaitForDataIfClosed: [ shouldRun := > false ] ] > valueWithin: waitDuration > onTimeout: [ self halt ]. > buffer atAllPut: (Character value: 0). > bytesReceived := clientSocket receiveDataInto: buffer. > self assert: bytesReceived = 4. > self assert: (buffer first: 4) = 'PONG' ] repeat ] > newProcess. > clientProcess priority: 39; resume. > serverProcess priority: 39; resume. > > "Evaluate these after debugging: > clientSocket destroy. > serverSocket destroy." Fabulous, thank you! replace the self halts with e.g. self assert: (clientSocket dataAvailable = (clientSocket readSemaphore excessSignals > 0)), and we even have a test. I have work to do tomorrow but hope I should be able to debug this soon. I'll add kqueue and epoll support when I fix it. (Stephan, interesting suggestion to throw hardware at the problem, thank you). On Wed, 23 Mar 2016, Eliot Miranda wrote: > > Hi Levente, >> On Wed, Mar 23, 2016 at 11:31 AM, Levente Uzonyi <leves(a)caesar.elte.hu> >> wrote: >> Hi Eliot, >> >> What sort of reproducibility are you looking for? Is it enough if >> it happens once every few hours or do you need something that you can >> trigger on demand? >> >> >> I'll take every few hours, but I'd prefer "in under 30 minutes". Getting >> warm and fuzzy feelings when trying to prove a negative with something that >> takes hours to run is very difficult. Let's say you have >> a case which reproduces in 8 hours 50% of the time. To reach 99% >> confidence level in a fix I'd have to run it for 8 * (50 log: 2) hours >> without seeing it reproduce, right? That's nearly 2 days; it could >> take weeks to fix :-( >> >> Levente >> >> >> >> _,,,^..^,,,_ >> best, Eliot >> >> > > > -- _,,,^..^,,,_ best, Eliot

March 24, 2016

Re: [Pharo-dev] [Ann] New version of Ghost

by Denis Kudriashov

2016-03-24 23:26 GMT+01:00 Damien Pollet <damien.pollet(a)gmail.com>: > Standard with a D is correct; only version found in my copy of the Oxford > English Dictionary. > > Standart with a T is a proper name, according to wikipedia > https://en.wikipedia.org/wiki/Standart > Interesting. I will rename it

March 24, 2016

Re: [Pharo-dev] [Ann] New version of Ghost

by Damien Pollet

On 24 March 2016 at 20:38, Denis Kudriashov <dionisiydk(a)gmail.com> wrote: > > 2016-03-24 20:27 GMT+01:00 stepharo <stepharo(a)free.fr>: > >> Pay attention Standard and no Standart > > > So what the right word? Standart exists in my english dictionary > Standard with a D is correct; only version found in my copy of the Oxford English Dictionary. Standart with a T is a proper name, according to wikipedia https://en.wikipedia.org/wiki/Standart -- Damien Pollet type less, do more [ | ] http://people.untyped.org/damien.pollet

March 24, 2016

Re: [Pharo-dev] [Ann] New version of Ghost

by Denis Kudriashov

2016-03-24 19:22 GMT+01:00 Mariano Martinez Peck <marianopeck(a)gmail.com>: > Good idea as well. Just as yet another useful example of this, I recommend > watching the proxies I defined for Marea as you will have interesting > proxies for classes and metaclasses. Basically, I defined quite some > methods in those proxies so that to avoid intercepting and faulting my > objects. See Marea code and watch for it's proxies! Let me know if you > found the methods I am talking about. And where is code? Of course I want to look

March 24, 2016

Re: [Pharo-dev] [Ann] New version of Ghost

by Denis Kudriashov

2016-03-24 20:27 GMT+01:00 stepharo <stepharo(a)free.fr>: > Do you mean that you use subclasses to register selectors that will not be > trapped? > Why is is better than a collection on the object? > I not understand your question. For example you want to make message #asString meta. You can implement it directly in class GHStandartMetaMessages: GHStandartMetaMessages>>asString "here there is instance variable *ghost *which you can use for implementation" ^'string presentation for ghost' Now if you will define your proxy with standart meta level #asString will be not intercepted and instead GHStandartMetaMessages>>asString will be executed with ghost. In previous version you would add #asString to special map: initializeMetaLevel "many many other mappings here and new one" notInterceptedMessages at: #asString put: #handleAsStringFor:

March 24, 2016

Re: [Pharo-dev] [Ann] New version of Ghost

by Denis Kudriashov

2016-03-24 20:27 GMT+01:00 stepharo <stepharo(a)free.fr>: > Pay attention Standard and no Standart So what the right word? Standart exists in my english dictionary

March 24, 2016

Re: [Pharo-dev] [Ann] New version of Ghost

by Denis Kudriashov

2016-03-24 20:18 GMT+01:00 stepharo <stepharo(a)free.fr>: > Does it mean that we cannot proxy classes? For this purpose there is GHClassGhost. I wrote about it in response to Mariano

March 24, 2016