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

[Pharo-project] Polymorph
by Gary Chambers March 14, 2010

March 14, 2010

All "fun" on squeak-dev... Getting close to abandoning support for Polymorph in Squeak at all now... Only a few apps based on 3.9 left here. Not sure they need any of the ongoing improvements. So, the question is, how would we want future additions/changes/fixes to apply in Pharo. Having Polymorph as an external (mergable, not loadable) package has worked well for us, as much as it can be well. Perhaps changesets are the way to go from here... opinions/advice welcome... Regards, Gary

4 5

[Pharo-project] Mac carbon VM goes to 4.2.3beta1U
by John M McIntosh March 14, 2010

March 14, 2010

In order to wrap up some VM fixes that should be pushed into the Squeak 4.x offering I've compiled up a 4.2.3beta1U VM This will be the last 4.x series of macintosh VMs as the 5.x series gains support. Someone should run the Sunit and smoke test to ensure the VM is sane. Follow the macintosh link from http://www.squeakvm.org/index.html 4.2.3b1 We update to VMMaker 160 Reference Mantis 7405: Array new: SmallInteger maxVal broken. Reference Mantis 7407: BitBlt. Incorrect alpha values for several rules. Reference Mantis 7421: Bug in Interpreter>>primitiveNextPut: (Various 64bit fixes which don't apply to this 32bit VM) Put ObjectiveCPlugin.bundle to 1.1.2 Removed SparklePlugin because of file copy issues on squeak 4.0 build process. bad sym links **** This VM includes some features not in VMMaker yet ***** (a) primitiveAsyncFileOpen: 64bit (b) explicit declare for primitiveShowHostWindow: (c) primitive for microsecond clock (f) statGCTime, statFullGCMSecs,statIGCDeltaTime,statIncrGCMSecs go to 64bit for microscecond clock (e) primitiveVMParameter changes to pull back 64bit values (f) JPEGReaderPlugin, work to make 64bit clean (g) primitiveMIDIGetPortName: 64bit fix NSCursorWrapper.m compiler warning cleanup sqMacMacmain.m compiler warning cleanup sqMacTime.c add microsecond clock sqmacWIndowUniversal.c compiler warning cleanup -- =========================================================================== John M. McIntosh <johnmci(a)smalltalkconsulting.com> Twitter: squeaker68882 Corporate Smalltalk Consulting Ltd. http://www.smalltalkconsulting.com ===========================================================================

2 1

Re: [Pharo-project] [squeak-dev] NetNameResolver/ifconfig/interfaces
by John M McIntosh March 14, 2010

March 14, 2010

Ok, well I spent the evening looking into this. It's unclear if reverting the new/old socket stuff in Pharo is a good idea, or if we just adjust things a bit in the name lookup that would solve things. There are two questions to resolve (1) Do we want to return an IPV4 address from the network lookup? or an IPV6 address? (2) What do we do when we have 2 or more active IP interfaces on the machine, prompt for which one to use? Pick one at random, use the first or last one? If the community can decide what to do, then we can propose a solution. So how it works. NetNameResolver localHostAddress fe80::21c:42ff:fe00:9%en5(otter-2.local),0(0) Gah... what's that? Well the interface is: en5: flags=8963<UP,BROADCAST,SMART,RUNNING,PROMISC,SIMPLEX,MULTICAST> mtu 1500 inet6 fe80::21c:42ff:fe00:9%en5 prefixlen 64 scopeid 0x8 inet 10.37.129.2 netmask 0xffffff00 broadcast 10.37.129.255 ether 00:1c:42:00:00:09 media: autoselect status: active supported media: autoselect Thus it's giving me an IPV6 address. The chore is more complicated that one would care to see. I see Microsoft had a hand in defining the spec. So it first asks the gethostname for the name of the host. As an example my macbook pro has Otter-2.local which is what [otter-2:~] johnmci% hostname Otter-2.local That's a bonjour assigned name since if I do [otter-2:~] johnmci% nslookup Otter-2.local Server: 192.168.1.7 Address: 192.168.1.7#53 ** server can't find Otter-2.local: NXDOMAIN Then we are off to: getnameinfo which returns a chain of IPV4 and IPV6 address that Otter-2.local would resolve to. In this case there are six address, broken in to IPV6 and IPV4 fe80::21c:42ff:fe00:8%en4(otter-2.local),0(0)-inet6-stream-tcp fe80::21c:42ff:fe00:9%en5(otter-2.local),0(0)-inet6-stream-tcp fe80::21b:63ff:fe02:d2db%en1(otter-2.local),0(0)-inet6-stream-tcp 10.211.55.2(10.211.55.2),0(0)-inet4-stream-tcp 10.37.129.2(10.37.129.2),0(0)-inet4-stream-tcp 192.168.1.141(192.168.1.141),0(0)-inet4-stream-tcp So looks kinda random, but it's not. It's defined by Microsoft & committee etc. in http://www.faqs.org/rfcs/rfc3484.html The objective is to sort the list into some order. I must say you can't actually tell from reading the docs, and things over the past decade have changed. So I refer to some cheat sheets that *might* be correct. Now the macbook pro in this case uses 192.168.1.141 as the assigned tcp/ip address from our internal DHCP server. The 10.211.55.2 is a parallels shared network adaptor and 10.37.129.2 is the parallels host-only network adaptor. All three interfaces show as active, and if you consider the 'ifconfig -a' below you would be hard pressed to determine which interface is the one facing the company intranet. [otter-2:~] johnmci% ifconfig -a lo0: flags=8049<UP,LOOPBACK,RUNNING,MULTICAST> mtu 16384 inet6 ::1 prefixlen 128 inet6 fe80::1%lo0 prefixlen 64 scopeid 0x1 inet 127.0.0.1 netmask 0xff000000 gif0: flags=8010<POINTOPOINT,MULTICAST> mtu 1280 stf0: flags=0<> mtu 1280 en0: flags=8863<UP,BROADCAST,SMART,RUNNING,SIMPLEX,MULTICAST> mtu 1500 ether 00:17:f2:d9:57:35 media: autoselect status: inactive supported media: autoselect 10baseT/UTP <half-duplex> 10baseT/UTP <full-duplex> 10baseT/UTP <full-duplex,hw-loopback> 10baseT/UTP <full-duplex,flow-control> 100baseTX <half-duplex> 100baseTX <full-duplex> 100baseTX <full-duplex,hw-loopback> 100baseTX <full-duplex,flow-control> 1000baseT <full-duplex> 1000baseT <full-duplex,hw-loopback> 1000baseT <full-duplex,flow-control> none fw0: flags=8863<UP,BROADCAST,SMART,RUNNING,SIMPLEX,MULTICAST> mtu 2030 lladdr 00:19:e3:ff:fe:93:92:7c media: autoselect <full-duplex> status: inactive supported media: autoselect <full-duplex> en1: flags=8863<UP,BROADCAST,SMART,RUNNING,SIMPLEX,MULTICAST> mtu 1500 inet6 fe80::21b:63ff:fe02:d2db%en1 prefixlen 64 scopeid 0x6 inet 192.168.1.141 netmask 0xffffff00 broadcast 192.168.1.255 ether 00:1b:63:02:d2:db media: autoselect status: active supported media: autoselect en4: flags=8963<UP,BROADCAST,SMART,RUNNING,PROMISC,SIMPLEX,MULTICAST> mtu 1500 inet6 fe80::21c:42ff:fe00:8%en4 prefixlen 64 scopeid 0x7 inet 10.211.55.2 netmask 0xffffff00 broadcast 10.211.55.255 ether 00:1c:42:00:00:08 media: autoselect status: active supported media: autoselect en5: flags=8963<UP,BROADCAST,SMART,RUNNING,PROMISC,SIMPLEX,MULTICAST> mtu 1500 inet6 fe80::21c:42ff:fe00:9%en5 prefixlen 64 scopeid 0x8 inet 10.37.129.2 netmask 0xffffff00 broadcast 10.37.129.255 ether 00:1c:42:00:00:09 media: autoselect status: active supported media: autoselect Where en0 is ethernet jack, fw0 is firewire, en1 is wireless, en4 & en5 are virtual. Now the bias from the committee is precedence ::1/128 50 precedence ::/0 40 precedence 2002::/16 30 precedence ::/96 20 precedence ::ffff:0:0/96 10 scopev4 ::ffff:169.254.0.0/112 2 scopev4 ::ffff:127.0.0.0/104 2 scopev4 ::ffff:10.0.0.0/104 5 scopev4 ::ffff:172.16.0.0/108 5 scopev4 ::ffff:192.168.0.0/112 5 scopev4 ::ffff:0.0.0.0/96 14 This means of course the 10.0.0.0 address sorts before the 192.168.0.0 address. How helpful. So how do we know *which* is the proper address to use? Well no idea! However let's see what the API does. NetNameResolver class>> addressesForName: hostName | adresses | adresses := SocketAddressInformation forHost: hostName service: '' flags: 0 addressFamily: 0 socketType: SocketAddressInformation socketTypeStream protocol: SocketAddressInformation protocolTCP. ^adresses Now I can make it return just IPV4 address by doing: NetNameResolver class>> addressesForName: hostName | adresses | adresses := SocketAddressInformation forHost: hostName service: '' flags: 0 addressFamily: SocketAddressInformation addressFamilyINET4 socketType: SocketAddressInformation socketTypeStream protocol: SocketAddressInformation protocolTCP. ^adresses which then NetNameResolver localHostAddress gives: 10.37.129.2(10.37.129.2),0(0) I can also supply a service number string say SSH '22' that give back 10.37.129.2(10.37.129.2),22(ssh) since ssh is binding on all interfaces that's valid. Technically the getnameinfo gives back three address but again the code below grabs the first one which according to the rfc3484 is more likely to be the correct answer. addressForName: hostName "NetNameResolver addressForName: 'impara.de' " "NetNameResolver addressForName: 'localhost' " "NetNameResolver addressForName: '127.0.0.1' " | addresses | self useOldNetwork ifTrue: [^self oldAddressForName: hostName]. addresses := self addressesForName: hostName. ^addresses ifEmpty: [nil] ifNotEmpty: [addresses first socketAddress] But grabbing the first one doesn't meet people's expectations of correctness, however we just don't have enough information to decide *what* is correct. Now some people say OH let's return the en0 one because that is correct? Really how do you know? On my computer en0 is ethernet, but since I'm using wireless then en1 is the correct one. Obviously I could look in the list of IPV6 address find the LOWEST en# value, then grab the IPV4 entry. This would assume I check for the fact that the IPV6 interface has an IPV4 address and the sort order for the IPV6 is the same as for the IPV4. Gee that sounds ok? Well it's not, when for example I tether my MacBook Pro to my iPhone and abuse my privilege to move data over the cellular carrier, ah sorry you USA ATT folks, then the interface is: en6: flags=8863<UP,BROADCAST,SMART,RUNNING,SIMPLEX,MULTICAST> mtu 1500 inet6 fe80::226:8ff:fe72:5aa%en6 prefixlen 64 scopeid 0x9 inet 192.168.20.2 netmask 0xffffff00 broadcast 192.168.20.255 ether 00:26:08:72:05:aa media: 10baseT/UTP status: active supported media: 10baseT/UTP which fails the test that the lowest active en# is the one we want to use. 10.37.129.2(10.37.129.2),0(0)-inet4-stream-tcp 10.211.55.2(10.211.55.2),0(0)-inet4-stream-tcp 192.168.20.2(192.168.20.2),0(0)-inet4-stream-tcp) So the question is what would the community like to see happen. Well other than hide under a rock and see if the problem goes away... On 2010-03-12, at 8:41 AM, Chris Cunnington wrote: > How is NetNameResolver choosing the interface to return an IP address from? > > In Cobalt this is a problem. You need the right address to connect to other spaces. Cobalt won't let you enter it by hand, so you are at the mercy of its guessing the correct interface. > > NetNameResolver localAddressString > > executed in Workspace produces the IP from my fw0 interface, which is useless. I need it to look at ppp0. > > Can it be told which interface to look at? > How does it choose? > > Chris > -- =========================================================================== John M. McIntosh <johnmci(a)smalltalkconsulting.com> Twitter: squeaker68882 Corporate Smalltalk Consulting Ltd. http://www.smalltalkconsulting.com ===========================================================================

4 3

[Pharo-project] Use of #asMorph
by Igor Stasenko March 14, 2010

March 14, 2010

Hello, lists i'd like to ask an intricate question. Suppose that your morph acts as a container, which needs to hold an items, retrieved from a model object. A model's elements could be any object, and may choose to represent them in a way they like it. So, for instance, if we taking a list, the list elements is represented by a morphs not simple strings. Now, a question: is it fine to use #asMorph as a message to 'convert' a model's item to a morph, which then can be used to reflect given item in list? I.e. something like: model itemsDo: [:item | self addMorph: item asMorph ] In this way, a list is built from morphs, and each list item choosing by itself, what morph should be used to represent itself in a list. But by saying A, we usually need to say B: an object could choose different representation depending on container's properties: model itemsDo: [:item | self addMorph: (item asMorphIn: self) ] So, for example, a compiled method, could choose to represent itself in a list as a simple string with own selector, while in text editor it could choose to display own source code. What you would do in such case? -- Best regards, Igor Stasenko AKA sig.

1 0

Re: [Pharo-project] [squeak-dev] NetNameResolver/ifconfig/interfaces
by John M McIntosh March 13, 2010

March 13, 2010

On 2010-03-13, at 3:14 PM, Levente Uzonyi wrote: > On Sat, 13 Mar 2010, Alexander LazareviÄ wrote: > >> Isn't http://bugs.squeak.org/view.php?id=7392 just about this? > > It seems to be. There seem to be no way to get the list of interfaces or the interface of a local ip address. Yes, but that is not the question, the question is: >>> NetNameResolver localHostAddress what does LOCAL HOST ADDRESS mean to you? for use in like sock2 connectTo: NetNameResolver localHostAddress port: 54321. or 'http://localhost:8080/seaside' asUrl retrieveContents. Offering a "NetNameResolver networkInterfaceThings" has different meaning? > Levente -- =========================================================================== John M. McIntosh <johnmci(a)smalltalkconsulting.com> Twitter: squeaker68882 Corporate Smalltalk Consulting Ltd. http://www.smalltalkconsulting.com ===========================================================================

2 1

[Pharo-project] Startup description of the problem
by StÃ©phane Ducasse March 13, 2010

March 13, 2010

Here is the reason why Clipboard was not well initialized and the general problem with the startup list if we execute Smalltalk initialize :) in the startup list not complete (and cannot really because other classes may dynamically register themselves) SmalltalkImage>>initializeStartUpList "SmalltalkImage initializeStartUpList" | oldList | oldList := StartUpList. StartUpList := OrderedCollection new. "These get processed from the top down..." #( Delay DisplayScreen Cursor InputEventFetcher ProcessorScheduler "Starts low space watcher and bkground." LanguageEnvironment FileDirectory "Enables file stack dump and opens sources." NaturalLanguageTranslator ShortIntegerArray ShortRunArray CrLfFileStream ) do:[:clsName| Smalltalk at: clsName ifPresent:[:cls| Smalltalk addToStartUpList: cls]. ]. oldList ifNotNil: [oldList do: [:className | Smalltalk at: className ifPresent: [:theClass | Smalltalk addToStartUpList: theClass]]]. #( PasteUpMorph "ControlManager" ) do:[:clsName| Smalltalk at: clsName ifPresent:[:cls| Smalltalk addToStartUpList: cls]. ]. Now if we check the classes that have a addToStartUpList: call and that are not in the previous list. We see that we missed a lot of them. classes := ((SystemNavigation default allCallsOn: #addToStartUpList:) collect: [ :e | e methodClass ]), ((SystemNavigation default allCallsOn: #addToStartUpList:after:) collect: [ :e | e methodClass ]). classNames := classes collect: [ :n | n instanceSide name ]. (Smalltalk class classVarNamed: 'StartUpList') do: [ :s | classNames remove: s ifAbsent: [] ]. classNames asSortedCollection a SortedCollection(#AutoStart #CPUWatcher #Clipboard #CommandHistory #ExternalSettings #FreeTypeFontProvider #FreeTypeSettings #HostSystemMenus #HostWindowProxy #InputEventSensor #InternetConfiguration #Locale #MenuIcons #MultiByteFileStream #OSPlatform #ProcessBrowser #SecurityManager #SmalltalkImage #SmalltalkImage #SystemDictionary #SystemDictionary #UITheme #UUIDGenerator #WeakArray). InputEventSensor has startup and shutdown but no initialize Stef

2 2

Re: [Pharo-project] Collection
by Stephan Eggermont March 13, 2010

March 13, 2010

Levente wrote: >Trees are rarely useful in Smalltalk, so there's no >default tree implementation. Note that trees consume >a lot more memory (>=5x) than a single array. Huh? You mean binary trees? Or Red-Black or so? On current procesors they are not very useful, and not usable at all for large data structures because of the large overhead. But n-ary trees or two-level stuctures are. Stephan

2 1

Re: [Pharo-project] Collection
by Stephan Eggermont March 13, 2010

March 13, 2010

Igor wrote: >What you talking about is an edge case in currently existing systems. >And its easy to prove: That's not convincing. I'd say you have cause and effect reversed. I'd not expect there to be large OrderedCollections as long as they don't behave well. Stephan

1 0

Re: [Pharo-project] CairoGraphics: Which Version of Alien do I need?
by Ken Treis March 13, 2010

March 13, 2010

Another thing I just remembered -- the Squeak VM only looks in a few specific locations when searching for dylibs, and it doesn't seem to pay attention to absolute paths. On my system, I chose to create a "Plugins" folder in the same folder where I keep Squeak VMs, and then I created symlinks for the dylibs. John, any chance we could get support for absolute paths in an upcoming VM? Ken On Mar 13, 2010, at 10:51 AM, Richard Durr wrote: > Ah okay, that's correct! I'll try that, thank you! :) > > On Sat, Mar 13, 2010 at 7:44 PM, Ken Treis <ken(a)miriamtech.com> wrote: >> Are you on Snow Leopard? If so, I'm guessing your Cairo library is built for 64-bit, and you'll need a 32-bit library to work with the Squeak VM. The best option is to build Cairo with the +universal variant. >> >> >> Ken >> >> On Mar 13, 2010, at 8:49 AM, Richard Durr wrote: >> >>> Thank you very much. But it did not work. I set the path using the command >>> CRLibrary libraryPath: '/opt/local/lib/libcairo.dylib' >>> >>> and have loaded Alien through ConfigurationOfAlien poject latestVersion load >>> >>> v_v >>> >>> On Sat, Mar 13, 2010 at 5:45 PM, Ken Treis <ken(a)miriamtech.com> wrote: >>>> Hi Richard, >>>> >>>> You'll need to use the .dylib instead of the la file (e.g. /opt/local/lib/libcairo.dylib). Any recent version of Alien should work. >>>> >>>> Also, the class names are a little different vs. VisualWorks. For the most part, they're all just prefixed with CR (e.g. CRImageSurface vs. ImageSurface). >>>> >>>> Hope that helps, >>>> >>>> >>>> Ken >>>> >>>> On Mar 13, 2010, at 4:43 AM, Richard Durr wrote: >>>> >>>>> Hello Ken, >>>>> >>>>> I tried to install your Package of Cairo in the newest version of >>>>> Pharo to try recreating what you did in [1] with VisualWorks but was >>>>> unable to load the Library. >>>>> I set libraryPath to ''/opt/local/lib/libcairo.la' using the >>>>> Cairo-Package of MacPorts, I get a primitive has failed error in >>>>> primLoadLibrary. >>>>> >>>>> Maybe I am not using the right version of Alien. Which one did you >>>>> use? Any help would be appreciated :) >>>>> >>>>> RD >>>>> >>>>> >>>>> [1] http://kentreis.wordpress.com/2009/01/27/button-graphic-generator-in-visual… >>>> >>>> -- >>>> Ken Treis >>>> Miriam Technologies, Inc. >>>> >>>> >> >> -- >> Ken Treis >> Miriam Technologies, Inc. >> >> -- Ken Treis Miriam Technologies, Inc.

1 0

March 13, 2010

11268 ----- - Issue 2009: MessageTally simplification - Issue 1484: "MessageTally new" creates an invalid instance - Issue 2030: Shadowing of traits issue 2030 fixed. - When the shadowing is validated in the bindTemp: of the Encoder if the message was defined by a Trait then the validation is not executed.

1 0