seaside July 2008

seaside@lists.squeakfoundation.org

70 participants
90 discussions

seaside hosting
by SainTiss 21 Jul '08

21 Jul '08

Hi all, I found out about this website which offers free seaside hosting: http://www.seasidehosting.st/ I do wonder though: Do I have to upload my complete squeak image every time I update my website? Also, I noticed that my seaside password can be retrieved from my squeak image by just opening it in a text editor... Can something be done about that? Thanks, Hans -- A liberal is a person whose interests aren't at stake at the moment -- Willis Player Hans Schippers Research Assistant of the Research Foundation - Flanders (FWO - Vlaanderen) http://www.win.ua.ac.be/~hschipp/ Formal Techniques in Software Engineering (FoTS) University of Antwerp Middelheimlaan 1 2020 Antwerpen - Belgium Phone: +32 3 265 37 88 Fax: +32 3 265 37 77

3 20

Re: [Seaside] seaside hosting
by SainTiss 21 Jul '08

21 Jul '08

Ok, I found out the URL stuff didn't work because it hit a login screen :) I used a different (publicly accessible) URL now, and then I get the exact same error I get when using the file dialog, i.e. the following stack trace. I guess that in fact rules out absolute path problems? Seaside Walkback MessageNotUnderstood: UndefinedObject>>binary Debug Proceed Possible Causes the receiver of the message is nil a class extension hasn't been loaded correctly you sent the wrong message Stack Trace thisContext UndefinedObject(Object)>>doesNotUnderstand: #binary self nil aMessage binary thisContext ZipArchive>>writeTo: self a ZipArchive stream nil member nil thisContext MCMczWriter>>flush self a MCMczWriter thisContext MCMczWriter class>>fileOut:on: self MCMczWriter aVersion a MCVersion(Saintiss-Seaside-AntwerpAthletics-HS.3) aStream nil inst a MCMczWriter thisContext MCVersion>>fileOutOn: self a MCVersion(Saintiss-Seaside-AntwerpAthletics-HS.3) aStream nil thisContext [] in MCCacheRepository(MCFileBasedRepository)>>basicStoreVersion: {[:s | aVersion fileOutOn: s]} self a MCCacheRepository(/home/saintiss/source/squeak/package-cache) aVersion a MCVersion(Saintiss-Seaside-AntwerpAthletics-HS.3) s nil thisContext MCCacheRepository(MCDirectoryRepository)>>writeStreamForFileNamed:replace:do: self a MCCacheRepository(/home/saintiss/source/squeak/package-cache) aString 'Saintiss-Seaside-AntwerpAthletics-HS.3.mcz' aBoolean false aBlock [] in MCCacheRepository(MCFileBasedRepository)>>basicStoreVersion: {[:s | aVersion fileOutOn: s]} file nil sel #newFileNamed: thisContext MCCacheRepository(MCFileBasedRepository)>>writeStreamForFileNamed:do: self a MCCacheRepository(/home/saintiss/source/squeak/package-cache) aString 'Saintiss-Seaside-AntwerpAthletics-HS.3.mcz' aBlock [] in MCCacheRepository(MCFileBasedRepository)>>basicStoreVersion: {[:s | aVersion fileOutOn: s]} thisContext MCCacheRepository(MCFileBasedRepository)>>basicStoreVersion: self a MCCacheRepository(/home/saintiss/source/squeak/package-cache) aVersion a MCVersion(Saintiss-Seaside-AntwerpAthletics-HS.3) s nil thisContext MCCacheRepository>>basicStoreVersion: self a MCCacheRepository(/home/saintiss/source/squeak/package-cache) aVersion a MCVersion(Saintiss-Seaside-AntwerpAthletics-HS.3) thisContext MCCacheRepository(MCRepository)>>storeVersion: self a MCCacheRepository(/home/saintiss/source/squeak/package-cache) aVersion a MCVersion(Saintiss-Seaside-AntwerpAthletics-HS.3) thisContext MCVersion>>addToCache self a MCVersion(Saintiss-Seaside-AntwerpAthletics-HS.3) thisContext MCVersion>>initializeWithPackage:info:snapshot:dependencies: self a MCVersion(Saintiss-Seaside-AntwerpAthletics-HS.3) aPackage a MCPackage(Saintiss-Seaside-AntwerpAthletics) aVersionInfo a MCVersionInfo(Saintiss-Seaside-AntwerpAthletics-HS.3) aSnapshot a MCSnapshot aCollection #() thisContext MCVersion class>>package:info:snapshot:dependencies: self MCVersion aPackage a MCPackage(Saintiss-Seaside-AntwerpAthletics) aVersionInfo a MCVersionInfo(Saintiss-Seaside-AntwerpAthletics-HS.3) aSnapshot a MCSnapshot aCollection #() thisContext MCMczReader(MCVersionReader)>>basicVersion self a MCMczReader thisContext MCMczReader(MCVersionReader)>>version self a MCMczReader thisContext MCMczReader class(MCVersionReader class)>>versionFromStream: self MCMczReader aStream a ReadStream a ByteArray(80 75 3 4 20 0 0 0 8 0 119 141 245 56 72 219 127 215 44 0 0 0 42 0 0 0 7 0 ...etc... thisContext STAABodyComponent(WAVersionUploader)>>loadURL self a STAABodyComponent stream a ReadStream a ByteArray(80 75 3 4 20 0 0 0 8 0 119 141 245 56 72 219 127 215 44 0 0 0 42 0 0 0 7 0 ...etc... version nil thisContext [] in STAABodyComponent(WAVersionUploader)>>renderContentOn: {[self loadURL]} self a STAABodyComponent html nil ea nil f nil u nil thisContext WAActionCallback>>evaluateWithArgument: self a WAActionCallback anObject 'Load' thisContext WAActionCallback(WACallback)>>evaluateWithField: self a WAActionCallback anObject 'Load' thisContext WACallbackStream>>processCallbacksWithOwner: self a WACallbackStream anObject a STAABodyComponent callback a WAActionCallback thisContext STAABodyComponent(WAPresenter)>>processCallbackStream: self a STAABodyComponent aCallbackStream a WACallbackStream thisContext [] in STAARootComponent(WAPresenter)>>processChildCallbacks: {[:ea | ea processCallbackStream: aStre...etc... self a STAARootComponent aStream a WACallbackStream ea a STAABodyComponent thisContext STAABodyComponent(WAComponent)>>decorationChainDo: self a STAABodyComponent aBlock [] in STAARootComponent(WAPresenter)>>processChildCallbacks: {[:ea | ea processCallbackStream: aStre...etc... thisContext [] in STAARootComponent(WAComponent)>>nextPresentersDo: {[:ea | ea decorationChainDo: aBlock]} self a STAARootComponent aBlock [] in STAARootComponent(WAPresenter)>>processChildCallbacks: {[:ea | ea processCallbackStream: aStre...etc... ea a STAABodyComponent thisContext [] in STAARootComponent(WAComponent)>>childrenDo: {[:ea | ea ifNotNil: [aBlock value: ea]]} self a STAARootComponent aBlock [] in STAARootComponent(WAComponent)>>nextPresentersDo: {[:ea | ea decorationChainDo: aBlock]} ea a STAABodyComponent thisContext Array(SequenceableCollection)>>do: self an Array(a STAAMenuComponent a STAABodyComponent) aBlock [] in STAARootComponent(WAComponent)>>childrenDo: {[:ea | ea ifNotNil: [aBlock value: ea]]} index 2 indexLimiT 2 thisContext STAARootComponent(WAComponent)>>childrenDo: self a STAARootComponent aBlock [] in STAARootComponent(WAComponent)>>nextPresentersDo: {[:ea | ea decorationChainDo: aBlock]} ea a STAABodyComponent thisContext STAARootComponent(WAComponent)>>nextPresentersDo: self a STAARootComponent aBlock [] in STAARootComponent(WAPresenter)>>processChildCallbacks: {[:ea | ea processCallbackStream: aStre...etc... ea a STAABodyComponent thisContext STAARootComponent(WAPresenter)>>processChildCallbacks: self a STAARootComponent aStream a WACallbackStream ea a STAABodyComponent thisContext STAARootComponent(WAPresenter)>>processCallbackStream: self a STAARootComponent aCallbackStream a WACallbackStream thisContext [] in WARenderContinuation>>processCallbacks: {[:each | each processCallbackStream: callbackStream]}...etc... self a WARenderContinuation aRequest a WARequest POST /seaside/antwerpathletics lastPosition 0 callbackStream a WACallbackStream each a STAARootComponent thisContext STAARootComponent(WAComponent)>>decorationChainDo: self a STAARootComponent aBlock [] in WARenderContinuation>>processCallbacks: {[:each | each processCallbackStream: callbackStream]}...etc... thisContext WARenderContinuation>>processCallbacks: self a WARenderContinuation aRequest a WARequest POST /seaside/antwerpathletics lastPosition 0 callbackStream a WACallbackStream each a STAARootComponent thisContext [] in WARenderContinuation>>handleRequest: {[self processCallbacks: aRequest]} self a WARenderContinuation aRequest a WARequest POST /seaside/antwerpathletics r nil thisContext BlockContext>>on:do: self [] in WARenderContinuation>>handleRequest: {[self processCallbacks: aRequest]} exception an ExceptionSet handlerAction [] in WARenderContinuation>>withNotificationHandler: {[:n | n]} handlerActive true thisContext WARenderContinuation>>withNotificationHandler: self a WARenderContinuation aBlock [] in WARenderContinuation>>handleRequest: {[self processCallbacks: aRequest]} n nil thisContext WARenderContinuation>>handleRequest: self a WARenderContinuation aRequest a WARequest POST /seaside/antwerpathletics r nil thisContext WARenderContinuation(WASessionContinuation)>>value: self a WARenderContinuation aRequest a WARequest POST /seaside/antwerpathletics thisContext WASession>>performRequest: self a WASession aRequest a WARequest POST /seaside/antwerpathletics key '0IiziZze' continuation a WARenderContinuation thisContext [] in WASession>>responseForRequest: {[self performRequest: aRequest]} self a WASession aRequest a WARequest POST /seaside/antwerpathletics thisContext BlockContext>>on:do: self [] in WASession>>responseForRequest: {[self performRequest: aRequest]} exception Error handlerAction [] in WASession>>withErrorHandler: {[:e | self errorHandler handleError: e. WAPageExpired raiseSig...etc... handlerActive false thisContext [] in WASession>>withErrorHandler: {[aBlock on: Error do: [:e | self errorHandler handleErro...etc... self a WASession aBlock [] in WASession>>responseForRequest: {[self performRequest: aRequest]} e MessageNotUnderstood: UndefinedObject>>binary w nil thisContext BlockContext>>on:do: self [] in WASession>>withErrorHandler: {[aBlock on: Error do: [:e | self errorHandler handleErro...etc... exception Warning handlerAction [] in WASession>>withErrorHandler: {[:w | self errorHandler handleWarning: w. WAPageExpired raiseS...etc... handlerActive true thisContext WASession>>withErrorHandler: self a WASession aBlock [] in WASession>>responseForRequest: {[self performRequest: aRequest]} e MessageNotUnderstood: UndefinedObject>>binary w nil thisContext [] in WASession>>responseForRequest: {[self withErrorHandler: [self performRequest: aRequest]]} self a WASession aRequest a WARequest POST /seaside/antwerpathletics thisContext BlockContext>>on:do: self [] in WASession>>responseForRequest: {[self withErrorHandler: [self performRequest: aRequest]]} exception WACurrentSession handlerAction [] in WACurrentSession class(WADynamicVariable class)>>use:during: {[:notification | notification re...etc... handlerActive true thisContext WACurrentSession class(WADynamicVariable class)>>use:during: self WACurrentSession anObject a WASession aBlock [] in WASession>>responseForRequest: {[self withErrorHandler: [self performRequest: aRequest]]} notification WACurrentSession thisContext [] in WASession>>responseForRequest: {[WACurrentSession use: self during: [self withErrorHan...etc... self a WASession aRequest a WARequest POST /seaside/antwerpathletics thisContext [] in WASession>>withEscapeContinuation: {[:cc | escapeContinuation := cc. aBlock value. self pag...etc... self a WASession aBlock [] in WASession>>responseForRequest: {[WACurrentSession use: self during: [self withErrorHan...etc... cc nil thisContext EscapeContinuation class(Continuation class)>>currentDo: self EscapeContinuation aBlock [] in WASession>>withEscapeContinuation: {[:cc | escapeContinuation := cc. aBlock value. self pag...etc... thisContext WASession>>withEscapeContinuation: self a WASession aBlock [] in WASession>>responseForRequest: {[WACurrentSession use: self during: [self withErrorHan...etc... cc nil thisContext WASession>>responseForRequest: self a WASession aRequest a WARequest POST /seaside/antwerpathletics thisContext [] in WASession>>incomingRequest: {[self responseForRequest: aRequest]} self a WASession aRequest a WARequest POST /seaside/antwerpathletics error nil thisContext BlockContext>>on:do: self [] in WASession>>incomingRequest: {[self responseForRequest: aRequest]} exception Error handlerAction [] in WASession>>incomingRequest: {[:error | self errorHandler internalError: error]} handlerActive true thisContext [] in WAProcessMonitor>>critical:ifError: {[value := aBlock on: Error do: anErrorBlock]} self a WAProcessMonitor aBlock [] in WASession>>incomingRequest: {[self responseForRequest: aRequest]} anErrorBlock [] in WASession>>incomingRequest: {[:error | self errorHandler internalError: error]} value a WAResponse 200 thisContext BlockContext>>ensure: self [] in WAProcessMonitor>>critical:ifError: {[value := aBlock on: Error do: anErrorBlock]} aBlock nil returnValue a WAResponse 200 b [] in WAProcessMonitor>>critical:ifError: {[semaphore signal]} thisContext [] in WAProcessMonitor>>critical:ifError: {[[value := aBlock on: Error do: anErrorBlock] ensure: [...etc... self a WAProcessMonitor aBlock [] in WASession>>incomingRequest: {[self responseForRequest: aRequest]} anErrorBlock [] in WASession>>incomingRequest: {[:error | self errorHandler internalError: error]} value a WAResponse 200 thisContext [] in BlockContext>>newProcess {[self value. Processor terminateActive]} self [] in WAProcessMonitor>>critical:ifError: {[[value := aBlock on: Error do: anErrorBlock] ensure: [...etc... On Monday 21 July 2008, you wrote: > > On Monday 21 July 2008, you wrote: > > > > a ReadStream a ByteArray(60 63 120 109 108 32 118 101 114 115 105 > > > > 111 110 61 34 49 46 48 34 32 101 1...etc... > > > > stream > > > > > > This is obviously an xml-file: > > > > > > String withAll: #(60 63 120 109 108 32 118 101 114 115 105 111 110 > > > 61 34 49 46 48 34 32 101 ) asByteArray > > > <?xml version="1.0" e > > > > > > So the URL you are giving is not pointing to the mcz-file. > > > > -- > > > > If we cannot live so as to be happy, let us at least live so as to > > deserve it -- Immanuel Hermann Fichte > > > > A liberal is a person whose interests aren't at stake at the moment > > -- Willis Player > > > > Ark Linux - Linux for the Masses (http://arklinux.org) > > > > Hans Schippers > > Aspirant FWO - Vlaanderen > > Formal Techniques in Software Engineering (FoTS) > > University of Antwerp > > Middelheimlaan 1 > > 2020 Antwerpen - Belgium > > Phone: +32 3 265 38 71 > > Fax: +32 3 265 37 77 -- If we cannot live so as to be happy, let us at least live so as to deserve it -- Immanuel Hermann Fichte A liberal is a person whose interests aren't at stake at the moment -- Willis Player Ark Linux - Linux for the Masses (http://arklinux.org) Hans Schippers Aspirant FWO - Vlaanderen Formal Techniques in Software Engineering (FoTS) University of Antwerp Middelheimlaan 1 2020 Antwerpen - Belgium Phone: +32 3 265 38 71 Fax: +32 3 265 37 77

1 0

Problem with Checkboxes
by Felix Dorner 21 Jul '08

21 Jul '08

Hey, first, I am a Squeak/Smalltalk newcomer, so please forgive me if I make an obvious error. I also give as much detail as I can and would greatly appreciate general comments. I am trying to write a small survey application, for that I created a class WASurvey: WAComponent subclass: #WASurvey instanceVariableNames: 'survey questionsPerPage currentPage' classVariableNames: '' poolDictionaries: '' category: 'questionaire' survey is a list of questions, questionsPerPage/currentPage should be obvious. The component is rendered like that: renderContentOn: html | first last | first := currentPage - 1 * questionsPerPage + 1. last := first + questionsPerPage - 1. html heading: survey title. html text: currentPage; text: '/'; text: self pageCount. html form: [ survey questions from:first to:last do: [ :question | question renderContentOn: html ]. html submitButton text: 'Previous Page'; callback: [ currentPage := currentPage - 1 ]; disabled: currentPage = 1. html submitButton text: 'Next Page'; callback: [ currentPage := currentPage + 1 ]; disabled: currentPage = self pageCount. ] Now I created several Question classes that implement renderContentOn: aCanvas MultiChoiceQuestion>>renderContentOn: html super renderContentOn: html. answers doWithIndex: [ :answer :index | | current | current := html checkbox value: (values includes: index). html text: answer. ] SingleChoice>>renderContentOn: html super renderContentOn: html. html radioGroup: [ :group | answers doWithIndex: [ :e :index | | current | current := group radioButton. value = index ifTrue: [ current beChecked ]. html text: e ] ] I currently get a MessageNotUnderstood error that seems to be related to the Checkbox components in MultiChoice questions. My problem is, that the StackTrace is very deep, and only shows Seaside internals. What would now be the general approach to trace down that issue? Thanks for your help, Felix Here is the top of the Stack Trace: 1. thisContext <http://127.0.0.1:8080/seaside/survey?_s=TGzVOKjnplpRtUnu&_k=VXYqwquh&4> UndefinedObject(Object)>>doesNotUnderstand: #value: self <http://127.0.0.1:8080/seaside/survey?_s=TGzVOKjnplpRtUnu&_k=VXYqwquh&5> nil aMessage <http://127.0.0.1:8080/seaside/survey?_s=TGzVOKjnplpRtUnu&_k=VXYqwquh&6> value: nil 2. thisContext <http://127.0.0.1:8080/seaside/survey?_s=TGzVOKjnplpRtUnu&_k=VXYqwquh&7> [] in WACheckboxTag>>after {[callback value: value. value := false]} self <http://127.0.0.1:8080/seaside/survey?_s=TGzVOKjnplpRtUnu&_k=VXYqwquh&8> a WACheckboxTag 3. thisContext <http://127.0.0.1:8080/seaside/survey?_s=TGzVOKjnplpRtUnu&_k=VXYqwquh&9> BlockContext>>valueWithPossibleArgument: self <http://127.0.0.1:8080/seaside/survey?_s=TGzVOKjnplpRtUnu&_k=VXYqwquh&10> [] in WACheckboxTag>>after {[callback value: value. value := false]} anArg <http://127.0.0.1:8080/seaside/survey?_s=TGzVOKjnplpRtUnu&_k=VXYqwquh&11> '' 4. thisContext <http://127.0.0.1:8080/seaside/survey?_s=TGzVOKjnplpRtUnu&_k=VXYqwquh&12> WAValueCallback>>evaluateWithArgument: self <http://127.0.0.1:8080/seaside/survey?_s=TGzVOKjnplpRtUnu&_k=VXYqwquh&13> a WAValueCallback anObject <http://127.0.0.1:8080/seaside/survey?_s=TGzVOKjnplpRtUnu&_k=VXYqwquh&14> '' 5. thisContext <http://127.0.0.1:8080/seaside/survey?_s=TGzVOKjnplpRtUnu&_k=VXYqwquh&15> WAValueCallback(WACallback)>>evaluateWithField: self <http://127.0.0.1:8080/seaside/survey?_s=TGzVOKjnplpRtUnu&_k=VXYqwquh&16> a WAValueCallback anObject <http://127.0.0.1:8080/seaside/survey?_s=TGzVOKjnplpRtUnu&_k=VXYqwquh&17> ''

3 5

Processing callbacks on scriptaculous forms
by John Thornborrow 18 Jul '08

18 Jul '08

Hello, I'm getting the "Component not found whilst processing callbacks" error for a form that is rendered via scriptaculous. Am I missing something? Root>>initialize super initialize. editor := Editor new "Editor just renders a form" Root>>children ^Array with: editor Root>>renderContentOn: html html unorderedList: [ self items do: [:each | html listItem: [ html anchor onClick: (html updater id: #editor; callback: [:ren | ren render: (editor item: each)]); with: 'Edit ', item description]]]. html div id: #editor Thanks, John. ****************************************************************************************************************************************** This email is from Pinesoft Limited. Its contents are confidential to the intended recipient(s) at the email address(es) to which it has been addressed. It may not be disclosed to or used by anyone other than the addressee(s), nor may it be copied in anyway. If received in error, please contact the sender, then delete it from your system. Although this email and attachments are believed to be free of virus, or any other defect which might affect any computer or IT system into which they are received and opened, it is the responsibility of the recipient to ensure that they are virus free and no responsibility is accepted by Pinesoft for any loss or damage arising in any way from receipt or use thereof. ******************************************************************************************************************************************* Pinesoft Limited are registered in England, Registered number: 2914825. Registered office: 266-268 High Street, Waltham Cross, Herts, EN8 7EA

3 5

Draggables and triggerPassenger:
by Karsten 18 Jul '08

18 Jul '08

Hi list, I just tried to use triggerPassenger: in an onDrag event. The problem is that Firebug sais that argument[0].id is undefined and thus stops executing the script. Is that a bug or did I miss something? The code that I tried is: (html div) passenger:5; script: (html draggable onDrag: (html evaluator triggerPassenger:[:obj | obj halt])); style:'width:50px;height:50px;background-color:red'. Kind Regards Karsten -- Karsten Kusche - Dipl.Inf. - karsten(a)heeg.de Tel: +49 3496 21 43 29 Georg Heeg eK - Köthen Handelsregister: Amtsgericht Dortmund A 12812

2 2

Help wanted with a small Seaside e-commerce application
by Matthias Berth 18 Jul '08

18 Jul '08

Hello, I am looking for a consultant (or a student wanting a nice summer job) to help me get a small e-commerce application from the current prototype stage to launch. The application is based on Seaside and Pier, major missing features are: - credit card processing (should be done via an external provider) - customer billing information - persistence (something like SandstoneDB should be enough) - invitations (users inviting other users) - recording of transactions (sending an email and putting an entry into a log when someone buys something) - various deployment issues (squeak on linux), like backup at regular intervals, communicating via http with another process. The system currently has around 60 classes of which 16 are unit tests or Albatross tests. The system will be launched in stages, e.g. invitations won't be there initially. I am willing to let you publish non-proprietary parts of this as open source. For example, a good packaged solution for credit card processing (maybe based on code from Ramon's image) would be nice to have for Seaside newcomers. If you have proven Seaside skills and an attitude to produce well-tested and refactored code, please apply with a sample of your work. If you cannot show code, please apply anyway, but be prepared to complete a (paid) trial task. You should work remotely, preferably in a European timezone. Payment will be by the hour, rates to be negotiated based on your skills. You should have at least 10 hours per week. Cheers Matthias PS: I have also posted this job on ODesk, http://www.odesk.com/jobs/Help-wanted-with-small-Seaside-commerce-applicati… How do I get it on http://jobs.squeak.org/ or http://smalltalkjobs.dabbledb.com/ ?

1 0

rebuild children - when to do it
by Squeaker 18 Jul '08

18 Jul '08

Greetings, In my renderContentOn: method I am making a call to my method rebuildChildren which reconstructs my children on the fly. This is done as the first thing in renderContentOn: The code appears to work. My question: Is it ok to rebuild my children at rendering time? Thanks, Frank

6 6

WAButtonTest
by Freeman Mayberry 18 Jul '08

18 Jul '08

I was going through the Functional Seaside Test Suite (package name: Seaside-Tests-Functional) and I came across the Button test. At first everything seemed fine but apparently the reset button is not supposed to do anything. Or maybe it is, and mine is just not working for some reason. I was wondering if there was a simple way to make the reset button do what it is supposed to do. I looked up the beReset method and it just sets the type to reset, but then I got lost in the code. renderResetOn: html html heading level2 with: 'Reset'. html paragraph: 'Clicking the button should not submit the form reset the value in "Input"'. (confusedly worded) html button beReset; with: 'Reset' Please note that I am an extreme newbie to Seaside and I guess I am new to programming in general. -- Freeman

2 1

WAButtonTest
by Freeman Mayberry 17 Jul '08

17 Jul '08

1 0

Seaside/Squeak/Linux: service with GUI as needed
by Bill Schwab 16 Jul '08

16 Jul '08

Lukas, With respect to "plug it in and throw the switch," you mention that it is possible. Are there any tricks to it, other than setting up the Squeak/Pharo image as a service? Are the following links worthy of attention? http://onsmalltalk.com/programming/smalltalk/seaside/my-journey-to-linux/ http://onsmalltalk.com/programming/smalltalk/scaling-seaside-redux-enter-th… Re configuration, most of it would be things that I would do through Seaside. The exact details (Seaside served from "the" image doing the work, or a Seaside image along side of other images doing the real work) will depend on my experience with reliability. I have read widely differing reports on what to expect, and need to try it. My BibTeX gizmo looks like it will be the sentinel. OmniBrowser is prominent in your reply. What feature(s) of it earn that position? RemoteFrameBuffer looks like it could be very useful, though it appears to encrypt only for password exchange. Do you have any concerns about its security? Assuming I am seriously paranoid about such things (gotta be with medical records), should *I* be concerned about its security? I reserve the right to be concerned regardless of your reply, but I am curious about your take on it. Thanks! Bill ========================== Lukas Renggli renggli at gmail.com Sat Jul 12 19:52:46 UTC 2008 > (1) Pharo image(s) run as service(s); the computer is (ab)used pretty > much as an appliance; technicians are told to plug in the network cable, > then turn on the box, and if all is well, it "just works". That's already possible. > (2) most (Smalltalk) configuration tasks happen via a Seaside interface. What configuration tasks? If these are not yet available an interface could certainly be built. OmniBrowser and the XUL integration is also a possibility here. > (3) I realize that I can edit code through Seaside's halos, but I will > sometimes want to interact graphically with the Squeak image; it will be > doing other things beyond serving Seaside pages. I envision (please > tell me if there are better ways) making a remote desktop (or similar) > connection to the server, stopping the offending service, and restarting > it as a desktop user to debug, save the changed image, exit, restart the > service, and log out. OmniBrowser. > Is this a SSH/VNC task, or is there a better way. Some things I have > read appear to suggest that one can simply use VNC to attach to the > running Squeak service and a GUI instantly appears??? That seems too > slick to expect it to work. RemoteFrameBuffer is perfect to do that. Like this you start you image headless on the server, and use a VNC client to connect to the screen from anywhere. I use that on all my servers. > Do things change if one replaces Linux with Windows? I am trying to > escape, but it will take some time to complete the transfer. Linux is great for deployment. A long time ago I did some deployment on Windows servers. What's inside the image (e.g. RemoteFrameBuffer) works equally well. The host OS is not so cool ... Cheers, Lukas Wilhelm K. Schwab, Ph.D. University of Florida Department of Anesthesiology PO Box 100254 Gainesville, FL 32610-0254 Email: bschwab(a)anest.ufl.edu Tel: (352) 846-1285 FAX: (352) 392-7029

6 6

← Newer
1
2
3
4
5
6
7
8
9
Older →

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

2003

2002

seaside July 2008