how to create new seaside entry point for webapp in topaz (WAS scriptaculous in updateRoot?)

Chris Dawson wrote:

I did not, and that fixed it.  Thanks!

Now I'm trying to figure out how I can add this programmatically rather
than in the configuration editor.  It looks like the method #addLibrary:
in WAApplication is what I want, but how do I get access to the
WAApplication object in my session?  I want to do this from topaz under
GemStone, so I suppose I need to first find the WAKom object, then get
the first instance, then...

Chris


On Wed, Jun 11, 2008 at 2:59 AM, John Thornborrow < [hidden email]

<mailto:[hidden email]> > wrote:


Hi,

In your /seaside/config for your application, have you still got the
file library SULibrary loaded? (sample screen shot:
http://img71.imageshack.us/img71/7861/screenshotyr5.png
<http://img71.imageshack.us/img71/7861/screenshotyr5.png> )

HTH,
John.
 

Chris,

There is no WAKom in GemStone.

For programmatic access you can get to an application by starting with 'WADispatcher default' and follow the 'entryPoints' to your target application.

If you do happen to have access to your WASession, then sending #application to the session should do the trick.

Dale

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

Chris Dawson wrote:

Dale,

Thanks for the response.  So, being new to GemStone and Seaside, what is
the correct way to install a new application within topaz?  I've done
this within the Seaside config webgui plenty of times and am a little
lost as to where and what I should do within topaz.  I ran printit on
WADispatcher default and see this:

topaz 1> printit
WADispatcher default
%
a WADispatcher
 parent          nil
 name            seaside
 entryPoints     a Dictionary
 defaultName     browse
 lastUpdate      a TimeStamp
 version         55

I'm now browsing the methods available within WADispatcher and see
#register:.  This only takes a name, however, so do I instantiate an
instance of my webapp, and then what?

Chris   

Chris,

I think you should follow the approaches suggested by John and Philippe. Following John and Philippes suggestion, you would add the #addLibrary: call to your application registration code (where the #register: method is used).

Since you are already running your component, you had to have registered the component somewhere using #registerAsApplication: and as John suggests, you can change that statement to include the #addLibrary: call.

Regarding using topaz for inspecting objects - here's a topaz pattern that I used. After the initial expression follow the 'obj @' expressions:

topaz 1> display oops
topaz 1> level 2
topaz 1> run
WADispatcher default
%
[43744513 sz:6 cls: 51895041 WADispatcher] a WADispatcher
 parent          [20 sz:0 cls: 76289 UndefinedObject] nil
 name            [44546561 sz:7 cls: 74753 String] seaside
 entryPoints     [43802369 sz:26 cls: 101377 Dictionary] a Dictionary
  count           [66 sz:0 cls: 74241 SmallInteger] 8
  tableSize       [58 sz:0 cls: 74241 SmallInteger] 7
  emptySlotHint   [146 sz:0 cls: 74241 SmallInteger] 18
  numEmptySlots   [18 sz:0 cls: 74241 SmallInteger] 2
  unused          [20 sz:0 cls: 76289 UndefinedObject] nil
  #1 [82 sz:0 cls: 74241 SmallInteger] 10
  #2 [20 sz:0 cls: 76289 UndefinedObject] nil
  #3 [84601857 sz:2 cls: 67073 Association] an Association
  #4 [84601601 sz:2 cls: 67073 Association] an Association
  #5 [121945857 sz:2 cls: 67073 Association] an Association
  #6 [130 sz:0 cls: 74241 SmallInteger] 16
  #7 [20 sz:0 cls: 76289 UndefinedObject] nil
  #8 [84601089 sz:2 cls: 67073 Association] an Association
  #9 [20 sz:0 cls: 76289 UndefinedObject] nil
  #10 [84600833 sz:2 cls: 67073 Association] an Association
  #11 [66 sz:0 cls: 74241 SmallInteger] 8
  #12 [84601345 sz:2 cls: 67073 Association] an Association
  #13 [20 sz:0 cls: 76289 UndefinedObject] nil
  #14 [109039873 sz:2 cls: 67073 Association] an Association
  #15 [98 sz:0 cls: 74241 SmallInteger] 12
  #16 [121945601 sz:2 cls: 67073 Association] an Association
  #17 [114 sz:0 cls: 74241 SmallInteger] 14
  #18 [20 sz:0 cls: 76289 UndefinedObject] nil
  #19 [20 sz:0 cls: 76289 UndefinedObject] nil
  #20 [20 sz:0 cls: 76289 UndefinedObject] nil
  #21 [20 sz:0 cls: 76289 UndefinedObject] nil

 defaultName     [51892737 sz:6 cls: 74753 String] browse
 lastUpdate      [121945345 sz:2 cls: 16989185 TimeStamp] a TimeStamp
  seconds         [11150921504588421894 sz:0 cls: 121345 SmallDouble]  2.3489746597678900E+08
  offset          [18446744073709350018 sz:0 cls: 74241 SmallInteger] -25200

 version         [442 sz:0 cls: 74241 SmallInteger] 55

topaz 1> obj @43802369
[43802369 sz:26 cls: 101377 Dictionary] a Dictionary
 count           [66 sz:0 cls: 74241 SmallInteger] 8
 tableSize       [58 sz:0 cls: 74241 SmallInteger] 7
 emptySlotHint   [146 sz:0 cls: 74241 SmallInteger] 18
 numEmptySlots   [18 sz:0 cls: 74241 SmallInteger] 2
 unused          [20 sz:0 cls: 76289 UndefinedObject] nil
 #1 [82 sz:0 cls: 74241 SmallInteger] 10
 #2 [20 sz:0 cls: 76289 UndefinedObject] nil
 #3 [84601857 sz:2 cls: 67073 Association] an Association
  key             [84590593 sz:8 cls: 74753 String] examples
  value           [84590337 sz:6 cls: 51895041 WADispatcher] a WADispatcher

 #4 [84601601 sz:2 cls: 67073 Association] an Association
  key             [84590081 sz:6 cls: 74753 String] browse
  value           [84589825 sz:7 cls: 50808833 WAApplication] a WAApplication

 #5 [121945857 sz:2 cls: 67073 Association] an Association
  key             [121944321 sz:7 cls: 74753 String] wizzard
  value           [121944065 sz:7 cls: 50808833 WAApplication] a WAApplication

 #6 [130 sz:0 cls: 74241 SmallInteger] 16
 #7 [20 sz:0 cls: 76289 UndefinedObject] nil
 #8 [84601089 sz:2 cls: 67073 Association] an Association
  key             [84589057 sz:5 cls: 74753 String] tests
  value           [84588801 sz:6 cls: 51895041 WADispatcher] a WADispatcher

 #9 [20 sz:0 cls: 76289 UndefinedObject] nil
 #10 [84600833 sz:2 cls: 67073 Association] an Association
  key             [84588545 sz:6 cls: 74753 String] config
  value           [84588289 sz:7 cls: 50808833 WAApplication] a WAApplication

 #11 [66 sz:0 cls: 74241 SmallInteger] 8
 #12 [84601345 sz:2 cls: 67073 Association] an Association
  key             [84589569 sz:5 cls: 74753 String] tools
  value           [84589313 sz:6 cls: 51895041 WADispatcher] a WADispatcher

 #13 [20 sz:0 cls: 76289 UndefinedObject] nil
 #14 [109039873 sz:2 cls: 67073 Association] an Association
  key             [109021697 sz:4 cls: 74753 String] pier
  value           [109021441 sz:7 cls: 50808833 WAApplication] a WAApplication

 #15 [98 sz:0 cls: 74241 SmallInteger] 12
 #16 [121945601 sz:2 cls: 67073 Association] an Association
  key             [121943809 sz:9 cls: 74753 String] installer
  value           [121943553 sz:7 cls: 50808833 WAApplication] a WAApplication

 #17 [114 sz:0 cls: 74241 SmallInteger] 14
 #18 [20 sz:0 cls: 76289 UndefinedObject] nil
 #19 [20 sz:0 cls: 76289 UndefinedObject] nil
 #20 [20 sz:0 cls: 76289 UndefinedObject] nil
 #21 [20 sz:0 cls: 76289 UndefinedObject] nil


topaz 1> obj @84590337
[84590337 sz:6 cls: 51895041 WADispatcher] a WADispatcher
 parent          [43744513 sz:6 cls: 51895041 WADispatcher] a WADispatcher
  parent          [20 sz:0 cls: 76289 UndefinedObject] nil
  name            [44546561 sz:7 cls: 74753 String] seaside
  entryPoints     [43802369 sz:26 cls: 101377 Dictionary] a Dictionary
  defaultName     [51892737 sz:6 cls: 74753 String] browse
  lastUpdate      [121945345 sz:2 cls: 16989185 TimeStamp] a TimeStamp
  version         [442 sz:0 cls: 74241 SmallInteger] 55

 name            [84590593 sz:8 cls: 74753 String] examples
 entryPoints     [84581377 sz:40 cls: 101377 Dictionary] a Dictionary
  count           [90 sz:0 cls: 74241 SmallInteger] 11
  tableSize       [58 sz:0 cls: 74241 SmallInteger] 7
  emptySlotHint   [210 sz:0 cls: 74241 SmallInteger] 26
  numEmptySlots   [42 sz:0 cls: 74241 SmallInteger] 5
  unused          [20 sz:0 cls: 76289 UndefinedObject] nil
  #1 [92514305 sz:2 cls: 67073 Association] an Association
  #2 [82 sz:0 cls: 74241 SmallInteger] 10
  #3 [20 sz:0 cls: 76289 UndefinedObject] nil
  #4 [93512961 sz:2 cls: 67073 Association] an Association
  #5 [178 sz:0 cls: 74241 SmallInteger] 22
  #6 [194 sz:0 cls: 74241 SmallInteger] 24
  #7 [114 sz:0 cls: 74241 SmallInteger] 14
  #8 [85320193 sz:2 cls: 67073 Association] an Association
  #9 [20 sz:0 cls: 76289 UndefinedObject] nil
  #10 [85319937 sz:2 cls: 67073 Association] an Association
  #11 [66 sz:0 cls: 74241 SmallInteger] 8
  #12 [89705473 sz:2 cls: 67073 Association] an Association
  #13 [20 sz:0 cls: 76289 UndefinedObject] nil
  #14 [90860289 sz:2 cls: 67073 Association] an Association
  #15 [98 sz:0 cls: 74241 SmallInteger] 12
  #16 [85320449 sz:2 cls: 67073 Association] an Association
  #17 [20 sz:0 cls: 76289 UndefinedObject] nil
  #18 [87043073 sz:2 cls: 67073 Association] an Association
  #19 [130 sz:0 cls: 74241 SmallInteger] 16
  #20 [86753793 sz:2 cls: 67073 Association] an Association
  #21 [20 sz:0 cls: 76289 UndefinedObject] nil
  #22 [89921793 sz:2 cls: 67073 Association] an Association
  #23 [162 sz:0 cls: 74241 SmallInteger] 20
  #24 [89933313 sz:2 cls: 67073 Association] an Association
  #25 [146 sz:0 cls: 74241 SmallInteger] 18
  #26 [20 sz:0 cls: 76289 UndefinedObject] nil
  #27 [20 sz:0 cls: 76289 UndefinedObject] nil
  #28 [20 sz:0 cls: 76289 UndefinedObject] nil
  #29 [20 sz:0 cls: 76289 UndefinedObject] nil
  #30 [20 sz:0 cls: 76289 UndefinedObject] nil
  #31 [20 sz:0 cls: 76289 UndefinedObject] nil
  #32 [20 sz:0 cls: 76289 UndefinedObject] nil
  #33 [20 sz:0 cls: 76289 UndefinedObject] nil
  #34 [20 sz:0 cls: 76289 UndefinedObject] nil
  #35 [20 sz:0 cls: 76289 UndefinedObject] nil

 defaultName     [20 sz:0 cls: 76289 UndefinedObject] nil
 lastUpdate      [20 sz:0 cls: 76289 UndefinedObject] nil
 version         [2 sz:0 cls: 74241 SmallInteger] 0

topaz 1> obj @84581377
[84581377 sz:40 cls: 101377 Dictionary] a Dictionary
 count           [90 sz:0 cls: 74241 SmallInteger] 11
 tableSize       [58 sz:0 cls: 74241 SmallInteger] 7
 emptySlotHint   [210 sz:0 cls: 74241 SmallInteger] 26
 numEmptySlots   [42 sz:0 cls: 74241 SmallInteger] 5
 unused          [20 sz:0 cls: 76289 UndefinedObject] nil
 #1 [92514305 sz:2 cls: 67073 Association] an Association
  key             [92500993 sz:11 cls: 74753 String] persistence
  value           [92500737 sz:6 cls: 51895041 WADispatcher] a WADispatcher

 #2 [82 sz:0 cls: 74241 SmallInteger] 10
 #3 [20 sz:0 cls: 76289 UndefinedObject] nil
 #4 [93512961 sz:2 cls: 67073 Association] an Association
  key             [93507585 sz:8 cls: 74753 String] GemStone
  value           [93507329 sz:6 cls: 51895041 WADispatcher] a WADispatcher

 #5 [178 sz:0 cls: 74241 SmallInteger] 22
 #6 [194 sz:0 cls: 74241 SmallInteger] 24
 #7 [114 sz:0 cls: 74241 SmallInteger] 14
 #8 [85320193 sz:2 cls: 67073 Association] an Association
  key             [85722369 sz:14 cls: 74753 String] examplebrowser
  value           [86754817 sz:7 cls: 50808833 WAApplication] a WAApplication

 #9 [20 sz:0 cls: 76289 UndefinedObject] nil
 #10 [85319937 sz:2 cls: 67073 Association] an Association
  key             [85721857 sz:12 cls: 74753 String] multicounter
  value           [85721601 sz:7 cls: 50808833 WAApplication] a WAApplication

 #11 [66 sz:0 cls: 74241 SmallInteger] 8
 #12 [89705473 sz:2 cls: 67073 Association] an Association
  key             [89696001 sz:7 cls: 74753 String] cssdock
  value           [89695745 sz:7 cls: 50808833 WAApplication] a WAApplication

 #13 [20 sz:0 cls: 76289 UndefinedObject] nil
 #14 [90860289 sz:2 cls: 67073 Association] an Association
  key             [91317761 sz:7 cls: 74753 String] marquee
  value           [91282945 sz:7 cls: 50808833 WAApplication] a WAApplication

 #15 [98 sz:0 cls: 74241 SmallInteger] 12
 #16 [85320449 sz:2 cls: 67073 Association] an Association
  key             [85722881 sz:7 cls: 74753 String] counter
  value           [85722625 sz:7 cls: 50808833 WAApplication] a WAApplication

 #17 [20 sz:0 cls: 76289 UndefinedObject] nil
 #18 [87043073 sz:2 cls: 67073 Association] an Association
  key             [87011329 sz:8 cls: 74753 String] MenuDemo
  value           [87011073 sz:7 cls: 50808833 WAApplication] a WAApplication

 #19 [130 sz:0 cls: 74241 SmallInteger] 16
 #20 [86753793 sz:2 cls: 67073 Association] an Association
  key             [86646529 sz:10 cls: 74753 String] treereport
  value           [86646017 sz:7 cls: 50808833 WAApplication] a WAApplication

 #21 [20 sz:0 cls: 76289 UndefinedObject] nil
 #22 [89921793 sz:2 cls: 67073 Association] an Association
  key             [89916929 sz:16 cls: 74753 String] screenresolution
  value           [89916673 sz:7 cls: 50808833 WAApplication] a WAApplication

 #23 [162 sz:0 cls: 74241 SmallInteger] 20
 #24 [89933313 sz:2 cls: 67073 Association] an Association
  key             [89925377 sz:5 cls: 74753 String] store
  value           [89925121 sz:7 cls: 50808833 WAApplication] a WAApplication

 #25 [146 sz:0 cls: 74241 SmallInteger] 18
 #26 [20 sz:0 cls: 76289 UndefinedObject] nil
 #27 [20 sz:0 cls: 76289 UndefinedObject] nil
 #28 [20 sz:0 cls: 76289 UndefinedObject] nil
 #29 [20 sz:0 cls: 76289 UndefinedObject] nil
 #30 [20 sz:0 cls: 76289 UndefinedObject] nil
 #31 [20 sz:0 cls: 76289 UndefinedObject] nil
 #32 [20 sz:0 cls: 76289 UndefinedObject] nil
 #33 [20 sz:0 cls: 76289 UndefinedObject] nil
 #34 [20 sz:0 cls: 76289 UndefinedObject] nil
 #35 [20 sz:0 cls: 76289 UndefinedObject] nil

topaz 1> level 1
topaz 1> obj @85722625
[85722625 sz:7 cls: 50808833 WAApplication] a WAApplication
 parent          [84590337 sz:6 cls: 51895041 WADispatcher] a WADispatcher
 name            [85722881 sz:7 cls: 74753 String] counter
 keysByHandler   [85690113 sz:55 cls: 87297 RcKeyValueDictionary] a RcKeyValueDictionary
 handlersByKey   [85689857 sz:55 cls: 87297 RcKeyValueDictionary] a RcKeyValueDictionary
 mutex           [85689601 sz:1 cls: 17807105 TransientMutex] a TransientMutex
 configuration   [85689345 sz:2 cls: 46347777 WAUserConfiguration] a WAUserConfiguration
 libraries       [20 sz:0 cls: 76289 UndefinedObject] nil

Chris Dawson wrote:

Actually, the scriptaculous issue was on an application running on a
Squeak VM.  I'm now trying to move everything over to run on GemStone,
so as of yet, I don't have it running on the GemStone VM.  I'll keep
reviewing the documentation and will read the multiple emails to see if
the answer is in there somewhere.  I don't believe seaside is up and
running yet.  I tried to run startSeaside_Hyper and got a lot of errors,
so I'll need to review that script and the invocation documentation.

At a quick glance, it looks like this snippet from the startSeaside
script might be worthwhile to play with.  I am not sure how relevant the
previous code is or whether this is enough for me for now.  I'll let you
know.

server := SwazooServer singleton.
server initialize.

site := (SeasideSite new)
 name: 'Seaside';
 initialize;
 host: GsSocket getLocalHostName
  ip: (GsSocket getHostAddressByName: GsSocket getLocalHostName)
  port: $1;
 initializeResourceFromUriPattern: '/', 'seaside'.

server addSite: site.

 

Chris,

The trouble you are seeing with starting hyper is likely caused by a configuration issue ... the most important being that there are a handful of environment variables that need to be set correctly for things to run ... if you send some email with the topaz errors (start with the first error, since there is often a 'cascade' effect) we should be able to figure out what's wrong ...

Dale