Question about remote admin and vnc

Do people use the VNC server in squeak usually or just set one up for  
the whole box?  Is the squeak one good enough to manage a seaside app  
running on a remote linux server?

Thanks,
-Todd Blanchard
_______________________________________________
Seaside mailing list
[hidden email]
http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/seaside

On Feb 10, 2006, at 10:47 PM, Todd Blanchard wrote:

> Do people use the VNC server in squeak usually or just set one up  
> for the whole box?  Is the squeak one good enough to manage a  
> seaside app running on a remote linux server?

We use the one in Squeak, it works great.  Check out WAVNCController  
as a way to turn it on only as needed (and suspend/resume the UI  
process while you're at it, to reclaim a few CPU cycles).

Avi
_______________________________________________
Seaside mailing list
[hidden email]
http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/seaside

Hi todd

we got some problem with the one in squeak (copy and paste or ctrl-C)  
on PC was breaking the connection.
Nicolas I do not remember what you did after (before switching to an  
external one)?

Else this was quite fun and working well.

Stef

_______________________________________________
Seaside mailing list
[hidden email]
http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/seaside

Oh thank goodness - I was just about to write something that did  
that!  :-)

You don't happen to have a little listener that will let me sync a  
prod image from my dev image by treating prod image as a MC  
repository do you?

I've just rented a server at a hosting facility and am going to begin  
deploying some stuff for real so lots of little operational kinks to  
work out.

On Feb 12, 2006, at 12:03 AM, Avi Bryant wrote:

_______________________________________________
Seaside mailing list
[hidden email]
http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/seaside

I made a small Seaside component to load package from Monticello into
the image. See the attached fileout if you are interested.

Florian

Todd Blanchard wrote:
'From Squeak3.8 of ''5 May 2005'' [latest update: #6665] on 12 February 2006 at 3:44:06 pm'!
WAComponent subclass: #WAMonticello
        instanceVariableNames: 'load mch password user repository version'
        classVariableNames: ''
        poolDictionaries: ''
        category: 'FoilFoil'!

!WAMonticello methodsFor: 'accessors' stamp: 'FM 11/30/2005 18:28'!
load
        load ifNil: [ load _ false].
        ^load! !

!WAMonticello methodsFor: 'accessors' stamp: 'FM 11/30/2005 18:27'!
load: aBool
        load _ aBool! !

!WAMonticello methodsFor: 'accessors' stamp: 'FM 11/30/2005 18:30'!
mch
        ^ mch! !

!WAMonticello methodsFor: 'accessors' stamp: 'FM 11/30/2005 18:30'!
mch: aMch
        mch _ aMch! !

!WAMonticello methodsFor: 'accessors' stamp: 'FM 11/30/2005 18:03'!
password
        ^ password! !

!WAMonticello methodsFor: 'accessors' stamp: 'FM 11/30/2005 18:02'!
password: aPswd
        password := aPswd! !

!WAMonticello methodsFor: 'accessors' stamp: 'FM 2/12/2006 15:43'!
repository
        repository ifNil: [ repository := 'http://kilana.unibe.ch:8888/' ].
        ^ repository! !

!WAMonticello methodsFor: 'accessors' stamp: 'FM 11/30/2005 18:03'!
repository: aRep
        repository _ aRep! !

!WAMonticello methodsFor: 'accessors' stamp: 'FM 11/30/2005 18:52'!
reset
        self load: nil.
        self mch: nil.
        self password: nil.
        self user: nil.
        self repository: nil.
        self version: nil.! !

!WAMonticello methodsFor: 'accessors' stamp: 'FM 11/30/2005 18:02'!
user
        ^user! !

!WAMonticello methodsFor: 'accessors' stamp: 'FM 11/30/2005 18:02'!
user: aUser
        user := aUser! !

!WAMonticello methodsFor: 'accessors' stamp: 'FM 11/30/2005 18:03'!
version
        ^version! !

!WAMonticello methodsFor: 'accessors' stamp: 'FM 11/30/2005 18:03'!
version: aVer
        version _ aVer! !


!WAMonticello methodsFor: 'seaside' stamp: 'FM 12/12/2005 14:05'!
initialize
        self reset! !

!WAMonticello methodsFor: 'seaside' stamp: 'FM 2/12/2006 15:43'!
renderContentOn: html
        | fileNames versionSnap |

        (self repository notNil) & (self user notNil) & (self password notNil)
        ifFalse: [ "ask for repository/user/pass"
                html form: [
                        html text: 'Repository : '.
                        html textInputOn: #repository of: self; br.
                        html text: 'User : '.
                        html textInputOn: #user of: self; br.
                        html text: 'Password : '.
                        html passwordInputWithValue: (self password) callback: [: pass | self password: pass ] ; br.
                        html submitButtonWithText: 'GetVersions'; br; submitButtonWithAction: [ self reset ] text: 'Reset'.
                ]
        ] ifTrue: [
                (self version notNil) & (self mch notNil) & (self load)
                ifFalse: [ "get versions"
                        html form: [
                                [ self mch: ( MCHttpRepository location: (self repository) user: (self user) password: (self password) ).
                                        fileNames := self mch allFileNames.
                                        html text: 'Version : '; selectFromList: fileNames selected: 1 callback: [:v | self version: v]; br.
                                        html submitButtonWithAction: [ self load: true ] text: 'Load!!'.
                                ] on: Error do: [:error | html text: 'ERROR : '; text: error messageText; br ]
                        ]
                ]
                ifTrue: [ "load!!"
                        html form: [
                                [ versionSnap := self mch loadVersionFromFileNamed: self version.
                                        versionSnap load.
                                        html text: 'Version ', self version, ' successfully loaded'.
                                ] on: Error do: [:error | html text: 'ERROR : '; text: error messageText; br ]
                        ]
                ]
        ]! !

"-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- "!

WAMonticello class
        instanceVariableNames: ''!

!WAMonticello class methodsFor: 'as yet unclassified' stamp: 'FM 11/30/2005 17:56'!
canBeRoot
        ^ true! !

!WAMonticello class methodsFor: 'as yet unclassified' stamp: 'FM 11/30/2005 17:57'!
initialize
        self registerAsApplication: 'MonticelloLoad'.! !


WAMonticello initialize!

_______________________________________________
Seaside mailing list
[hidden email]
http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/seaside

Hi,

during my tests, the VNC server in squeak worked very well, except  
the copy and paste problem I had when running under the Linux vm.

This problem disappeared when I upgraded the vm:
I use the debian squeak-vm package from http://
box2.squeakfoundation.org/files/debian/
the version I use now is :
3.8a-1 #1 Sun May  1 19:46:46 EDT 2005 gcc 3.3.5
Squeak3.8gamma of '24 November 2004' [latest update: #6548]

But as I needed to manage more images, I switched to an external VNC  
server, displaying all the running images. Now I consider switching  
to FreeNX (looks really promising !)

Nicolas


On 12 févr. 06, at 10:55, stephane ducasse wrote:

_______________________________________________
Seaside mailing list
[hidden email]
http://lists.squeakfoundation.org/cgi-bin/mailman/listinfo/seaside