Skip to content

Commit

Permalink
Merge pull request #14 from GsDevKit/dev
Browse files Browse the repository at this point in the history 
1.0.1 release
  • Loading branch information
@dalehenrich
dalehenrich committed Jan 8, 2015
2 parents c3e5292 + 6ec9233 commit a04be13
Show file tree
Hide file tree
Showing 106 changed files with 374 additions and 293 deletions.
185 changes: 105 additions & 80 deletions docs/gettingStarted.md
View file

Large diffs are not rendered by default.

3 changes: 3 additions & 0 deletions ...ApplicationTools-ExampleV31.package/GemServerRemoteAbstractExample.class/instance/port.st
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
server compat
port
^ self defaultPortOrResourceNameList first
2 changes: 1 addition & 1 deletion ...pplicationTools-ExampleV31.package/GemServerRemoteAbstractExample.class/instance/start.st
View file
Original file line number Diff line number Diff line change
@@ -1,3 +1,3 @@
server compat
start
self interactiveStartServiceOn: nil transactionMode: #'manualBegin'
self interactiveStartServiceOn: 'instance' transactionMode: #'manualBegin'
3 changes: 2 additions & 1 deletion ...cationTools-ExampleV31.package/GemServerRemoteAbstractExample.class/methodProperties.json
View file
Original file line number Diff line number Diff line change
Expand Up @@ -7,8 +7,9 @@
"initErrorLog" : "dkh 01/02/2015 15:39",
"initialize" : "dkh 01/02/2015 17:18",
"logStack:titled:inTransactionDo:" : "dkh 01/02/2015 15:42",
"port" : "dkh 01/06/2015 16:05",
"queue" : "dkh 12/22/2014 19:48",
"queueCounterValue" : "dkh 12/22/2014 19:48",
"restart" : "dkh 12/24/2014 16:25",
"start" : "dkh 12/27/2014 08:56",
"start" : "dkh 01/06/2015 15:51",
"stop" : "dkh 01/02/2015 17:16" } }
2 changes: 1 addition & 1 deletion ...GemServerRemoteServerExample.class/instance/gemServerHandleAlmostOutOfMemoryException..st
View file
Original file line number Diff line number Diff line change
Expand Up @@ -23,4 +23,4 @@ gemServerHandleAlmostOutOfMemoryException: exception
self
logStack: exception
titled:
self name , ' ' , exception class name asString , ' exception encountered: ' "out of transaction or commit did not free up enough memory, unwind stack"
self name , ' ' , exception class name asString , ' exception encountered:' "out of transaction or commit did not free up enough memory, unwind stack"
4 changes: 2 additions & 2 deletions ...ols-ExampleV31.package/GemServerRemoteServerExample.class/instance/startBasicServerOn..st
View file
Original file line number Diff line number Diff line change
@@ -1,9 +1,9 @@
service instance-server
startBasicServerOn: ignored
startBasicServerOn: portOrResourceName
"start server in current vm. expected to return."

self
doTransaction: [
"prime the pump"
currentQueueCounter := 0 ].
super startBasicServerOn: ignored
super startBasicServerOn: portOrResourceName
4 changes: 2 additions & 2 deletions ...licationTools-ExampleV31.package/GemServerRemoteServerExample.class/methodProperties.json
View file
Original file line number Diff line number Diff line change
Expand Up @@ -8,12 +8,12 @@
"currentQueueCounter" : "dkh 12/22/2014 19:49",
"doTraceTransaction:" : "dkh 12/26/2014 17:56",
"exeConfPath" : "dkh 01/01/2015 18:11",
"gemServerHandleAlmostOutOfMemoryException:" : "dkh 01/01/2015 18:03",
"gemServerHandleAlmostOutOfMemoryException:" : "dkh 01/06/2015 16:50",
"gemServerHandleRemoteInternalServerTriggerException:" : "dkh 12/24/2014 13:02",
"initialize" : "dkh 12/24/2014 16:39",
"processTasksOnQueue" : "dkh 12/30/2014 07:26",
"serviceLoop" : "dkh 12/30/2014 07:27",
"startBasicServerOn:" : "dkh 01/02/2015 17:46",
"startBasicServerOn:" : "dkh 01/06/2015 16:06",
"status" : "dkh 12/24/2014 17:35",
"stop" : "dkh 12/24/2014 17:01",
"taskServiceThreadBlock:" : "dkh 12/26/2014 16:29",
Expand Down
2 changes: 1 addition & 1 deletion ...tionTools-ExampleV31.package/GemServerRemoteServerExampleTests.class/instance/tearDown.st
View file
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
running
tearDown
| gemServer |
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
gemServer := GemServer gemServerNamed: self gemServerName.
super tearDown.
(ObjectLogEntry trace: 'tearDown: stopGems') addToLog.
gemServer
Expand Down
2 changes: 1 addition & 1 deletion ...Tools-ExampleV31.package/GemServerRemoteServerExampleTests.class/instance/test100Tasks.st
View file
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
tests
test100Tasks
| gemServer taskList client |
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
gemServer := GemServer gemServerNamed: self gemServerName.
gemServer
enableCreateContinuations: true;
tracing: true.
Expand Down
2 changes: 1 addition & 1 deletion ...ols-ExampleV31.package/GemServerRemoteServerExampleTests.class/instance/testBreakpoint.st
View file
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
tests
testBreakpoint
| gemServer client |
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
gemServer := GemServer gemServerNamed: self gemServerName.
gemServer
enableCreateContinuations: true;
tracing: true.
Expand Down
2 changes: 1 addition & 1 deletion ...ionTools-ExampleV31.package/GemServerRemoteServerExampleTests.class/instance/testError.st
View file
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
tests
testError
| gemServer client |
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
gemServer := GemServer gemServerNamed: self gemServerName.
gemServer
enableCreateContinuations: true;
tracing: true.
Expand Down
2 changes: 1 addition & 1 deletion ...ls-ExampleV31.package/GemServerRemoteServerExampleTests.class/instance/testExampleHttp.st
View file
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
tests
testExampleHttp
| gemServer taskList client completed |
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
gemServer := GemServer gemServerNamed: self gemServerName.
gemServer
enableCreateContinuations: true;
tracing: true.
Expand Down
2 changes: 1 addition & 1 deletion ...tionTools-ExampleV31.package/GemServerRemoteServerExampleTests.class/instance/testHalt.st
View file
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
tests
testHalt
| gemServer client |
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
gemServer := GemServer gemServerNamed: self gemServerName.
gemServer
enableCreateContinuations: true;
tracing: true.
Expand Down
2 changes: 1 addition & 1 deletion ...V31.package/GemServerRemoteServerExampleTests.class/instance/testOutOfMemoryPersistent.st
View file
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
tests
testOutOfMemoryPersistent
| gemServer client |
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
gemServer := GemServer gemServerNamed: self gemServerName.
gemServer
enableCreateContinuations: true;
tracing: true.
Expand Down
2 changes: 1 addition & 1 deletion ...xampleV31.package/GemServerRemoteServerExampleTests.class/instance/testOutOfMemoryTemp.st
View file
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
tests
testOutOfMemoryTemp
| gemServer client |
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
gemServer := GemServer gemServerNamed: self gemServerName.
gemServer
enableCreateContinuations: true;
tracing: true.
Expand Down
2 changes: 1 addition & 1 deletion ...onTools-ExampleV31.package/GemServerRemoteServerExampleTests.class/instance/testSimple.st
View file
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
tests
testSimple
| gemServer client |
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
gemServer := GemServer gemServerNamed: self gemServerName.
gemServer
enableCreateContinuations: true;
tracing: true.
Expand Down
2 changes: 1 addition & 1 deletion ...-ExampleV31.package/GemServerRemoteServerExampleTests.class/instance/testStackOverflow.st
View file
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
tests
testStackOverflow
| gemServer client |
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
gemServer := GemServer gemServerNamed: self gemServerName.
gemServer
enableCreateContinuations: true;
tracing: true.
Expand Down
2 changes: 1 addition & 1 deletion ...onTools-ExampleV31.package/GemServerRemoteServerExampleTests.class/instance/testStatus.st
View file
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
tests
testStatus
| gemServer client |
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
gemServer := GemServer gemServerNamed: self gemServerName.
gemServer
enableCreateContinuations: true;
tracing: true.
Expand Down
2 changes: 1 addition & 1 deletion ...s-ExampleV31.package/GemServerRemoteServerExampleTests.class/instance/testTimeInLondon.st
View file
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
tests
testTimeInLondon
| gemServer taskList client |
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
gemServer := GemServer gemServerNamed: self gemServerName.
gemServer
enableCreateContinuations: true;
tracing: true.
Expand Down
2 changes: 1 addition & 1 deletion ...nTools-ExampleV31.package/GemServerRemoteServerExampleTests.class/instance/testWarning.st
View file
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
tests
testWarning
| gemServer client |
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
gemServer := GemServer gemServerNamed: self gemServerName.
gemServer
enableCreateContinuations: true;
tracing: true.
Expand Down
26 changes: 13 additions & 13 deletions ...ionTools-ExampleV31.package/GemServerRemoteServerExampleTests.class/methodProperties.json
View file
Original file line number Diff line number Diff line change
Expand Up @@ -11,17 +11,17 @@
"startGems:" : "dkh 12/23/2014 13:04",
"stopGems:" : "dkh 12/23/2014 15:53",
"taskList100" : "dkh 01/02/2015 09:20",
"tearDown" : "dkh 12/23/2014 18:41",
"test100Tasks" : "dkh 01/02/2015 10:38",
"testBreakpoint" : "dkh 01/01/2015 11:15",
"testError" : "dkh 01/01/2015 11:15",
"testExampleHttp" : "dkh 01/01/2015 11:17",
"testHalt" : "dkh 01/01/2015 11:15",
"testOutOfMemoryPersistent" : "dkh 01/01/2015 11:16",
"testOutOfMemoryTemp" : "dkh 01/01/2015 11:16",
"testSimple" : "dkh 01/01/2015 11:16",
"testStackOverflow" : "dkh 01/01/2015 11:16",
"testStatus" : "dkh 01/01/2015 11:16",
"testTimeInLondon" : "dkh 01/01/2015 11:18",
"testWarning" : "dkh 01/01/2015 11:16",
"tearDown" : "dkh 01/06/2015 13:41",
"test100Tasks" : "dkh 01/06/2015 13:41",
"testBreakpoint" : "dkh 01/06/2015 13:41",
"testError" : "dkh 01/06/2015 13:41",
"testExampleHttp" : "dkh 01/06/2015 13:41",
"testHalt" : "dkh 01/06/2015 13:41",
"testOutOfMemoryPersistent" : "dkh 01/06/2015 13:42",
"testOutOfMemoryTemp" : "dkh 01/06/2015 13:42",
"testSimple" : "dkh 01/06/2015 13:42",
"testStackOverflow" : "dkh 01/06/2015 13:42",
"testStatus" : "dkh 01/06/2015 13:42",
"testTimeInLondon" : "dkh 01/06/2015 13:42",
"testWarning" : "dkh 01/06/2015 13:42",
"waitForTasks:gemServer:client:" : "dkh 01/01/2015 11:19" } }
2 changes: 1 addition & 1 deletion ...erverRemoteServerParallelProcessingExampleTests.class/instance/testInternalServerError.st
View file
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
tests
testInternalServerError
| gemServer client |
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
gemServer := GemServer gemServerNamed: self gemServerName.
gemServer
enableCreateContinuations: true;
tracing: true.
Expand Down
2 changes: 1 addition & 1 deletion ...1.package/GemServerRemoteServerParallelProcessingExampleTests.class/methodProperties.json
View file
Original file line number Diff line number Diff line change
Expand Up @@ -6,4 +6,4 @@
"gemServerClass" : "dkh 12/30/2014 12:46",
"scheduledTaskList" : "dkh 12/30/2014 12:46",
"taskList100" : "dkh 01/02/2015 09:18",
"testInternalServerError" : "dkh 01/01/2015 11:17" } }
"testInternalServerError" : "dkh 01/06/2015 13:42" } }
2 changes: 1 addition & 1 deletion ...tionTools-ExampleV31.package/GemServerSeasideStyleExampleTests.class/instance/tearDown.st
View file
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
running
tearDown
| gemServer |
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
gemServer := GemServer gemServerNamed: self gemServerName.
super tearDown.
gemServer
doCommitTransaction;
Expand Down
2 changes: 1 addition & 1 deletion ...mpleV31.package/GemServerSeasideStyleExampleTests.class/instance/testSeasideStyleError.st
View file
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
tests
testSeasideStyleError
| gemServer client |
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
gemServer := GemServer gemServerNamed: self gemServerName.
gemServer enableCreateContinuations: true.
gemServer scriptLogEvent: '---->testSeasideStyleError' object: gemServer.
gemServer
Expand Down
2 changes: 1 addition & 1 deletion ...ampleV31.package/GemServerSeasideStyleExampleTests.class/instance/testSeasideStyleHalt.st
View file
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
tests
testSeasideStyleHalt
| gemServer client |
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
gemServer := GemServer gemServerNamed: self gemServerName.
gemServer enableCreateContinuations: true.
gemServer scriptLogEvent: '---->testSeasideStyleHalt' object: gemServer.
gemServer
Expand Down
2 changes: 1 addition & 1 deletion ...GemServerSeasideStyleExampleTests.class/instance/testSeasideStyleOutOfMemoryPersistent.st
View file
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
tests
testSeasideStyleOutOfMemoryPersistent
| gemServer client |
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
gemServer := GemServer gemServerNamed: self gemServerName.
gemServer enableCreateContinuations: true.
gemServer
scriptLogEvent: '---->testSeasideStyleOutOfMemoryPersistent'
Expand Down
2 changes: 1 addition & 1 deletion ...ckage/GemServerSeasideStyleExampleTests.class/instance/testSeasideStyleOutOfMemoryTemp.st
View file
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
tests
testSeasideStyleOutOfMemoryTemp
| gemServer client |
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
gemServer := GemServer gemServerNamed: self gemServerName.
gemServer enableCreateContinuations: true.
gemServer
scriptLogEvent: '---->testSeasideStyleOutOfMemoryTemp'
Expand Down
2 changes: 1 addition & 1 deletion ...pleV31.package/GemServerSeasideStyleExampleTests.class/instance/testSeasideStyleSimple.st
View file
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
tests
testSeasideStyleSimple
| gemServer client |
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
gemServer := GemServer gemServerNamed: self gemServerName.
gemServer enableCreateContinuations: true.
gemServer scriptLogEvent: '---->testSeasideStyleSimple' object: gemServer.
gemServer
Expand Down
2 changes: 1 addition & 1 deletion ...package/GemServerSeasideStyleExampleTests.class/instance/testSeasideStyleStackOverflow.st
View file
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
tests
testSeasideStyleStackOverflow
| gemServer client |
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
gemServer := GemServer gemServerNamed: self gemServerName.
gemServer enableCreateContinuations: true.
gemServer
scriptLogEvent: '---->testSeasideStyleStackOverflow'
Expand Down
2 changes: 1 addition & 1 deletion ...leV31.package/GemServerSeasideStyleExampleTests.class/instance/testSeasideStyleWarning.st
View file
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
tests
testSeasideStyleWarning
| gemServer client |
gemServer := GemServerRegistry gemServerNamed: self gemServerName.
gemServer := GemServer gemServerNamed: self gemServerName.
gemServer enableCreateContinuations: true.
gemServer scriptLogEvent: '---->testSeasideStyleWarning' object: gemServer.
gemServer
Expand Down
16 changes: 8 additions & 8 deletions ...ionTools-ExampleV31.package/GemServerSeasideStyleExampleTests.class/methodProperties.json
View file
Original file line number Diff line number Diff line change
Expand Up @@ -7,12 +7,12 @@
"setUp" : "dkh 01/02/2015 14:45",
"startGems:" : "dkh 01/02/2015 11:11",
"stopGems:" : "dkh 01/02/2015 11:11",
"tearDown" : "dkh 01/02/2015 14:50",
"testSeasideStyleError" : "dkh 01/02/2015 16:05",
"testSeasideStyleHalt" : "dkh 01/02/2015 16:04",
"testSeasideStyleOutOfMemoryPersistent" : "dkh 01/02/2015 16:34",
"testSeasideStyleOutOfMemoryTemp" : "dkh 01/02/2015 16:38",
"testSeasideStyleSimple" : "dkh 01/02/2015 12:33",
"testSeasideStyleStackOverflow" : "dkh 01/02/2015 16:30",
"testSeasideStyleWarning" : "dkh 01/02/2015 16:06",
"tearDown" : "dkh 01/06/2015 13:42",
"testSeasideStyleError" : "dkh 01/06/2015 13:42",
"testSeasideStyleHalt" : "dkh 01/06/2015 13:42",
"testSeasideStyleOutOfMemoryPersistent" : "dkh 01/06/2015 13:42",
"testSeasideStyleOutOfMemoryTemp" : "dkh 01/06/2015 13:42",
"testSeasideStyleSimple" : "dkh 01/06/2015 13:43",
"testSeasideStyleStackOverflow" : "dkh 01/06/2015 13:43",
"testSeasideStyleWarning" : "dkh 01/06/2015 13:43",
"waitAndValidateResponse:" : "dkh 01/02/2015 12:05" } }
2 changes: 1 addition & 1 deletion repository/GsApplicationTools-ExampleV31.package/monticello.meta/version
View file

Large diffs are not rendered by default.

3 changes: 3 additions & 0 deletions repository/GsApplicationTools-Server.package/GemServer.class/class/addGemServer..st
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
registry accessing
addGemServer: aServer
^ GemServerRegistry addGemServer: aServer
12 changes: 6 additions & 6 deletions ...ApplicationTools-Server.package/GemServer.class/class/createServerOfClass.withName.on..st
View file
Original file line number Diff line number Diff line change
@@ -1,7 +1,7 @@
instance creation
createServerOfClass: aServerClass withName: aName on: anArrayOfPortNumbers
^self new
serverClass: aServerClass;
name: aName;
ports: anArrayOfPortNumbers;
yourself.
createServerOfClass: aServerClass withName: aName on: anArrayOfPortNumbersOrResourceNames
^ self new
serverClass: aServerClass;
name: aName;
portOrResourceNameList: anArrayOfPortNumbersOrResourceNames;
yourself
3 changes: 0 additions & 3 deletions repository/GsApplicationTools-Server.package/GemServer.class/class/defaultPortList.st
View file

This file was deleted.

3 changes: 3 additions & 0 deletions .../GsApplicationTools-Server.package/GemServer.class/class/defaultPortOrResourceNameList.st
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
accessing
defaultPortOrResourceNameList
^ #(8383)
3 changes: 3 additions & 0 deletions repository/GsApplicationTools-Server.package/GemServer.class/class/gemServerNamed..st
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
registry accessing
gemServerNamed: aString
^ GemServerRegistry gemServerNamed: aString
3 changes: 3 additions & 0 deletions repository/GsApplicationTools-Server.package/GemServer.class/class/gemServerNames.st
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
registry accessing
gemServerNames
^ GemServerRegistry gemServerNames
7 changes: 5 additions & 2 deletions repository/GsApplicationTools-Server.package/GemServer.class/class/register..st
View file
Original file line number Diff line number Diff line change
@@ -1,3 +1,6 @@
registration
gem server registration
register: aName
^ self register: aName for: self serverClass on: self defaultPortList
^ self
register: aName
for: self serverClass
on: self defaultPortOrResourceNameList
6 changes: 3 additions & 3 deletions repository/GsApplicationTools-Server.package/GemServer.class/class/register.for.on..st
View file
Original file line number Diff line number Diff line change
@@ -1,8 +1,8 @@
registration
register: aName for: aServerClass on: anArrayOfPortNumbers
gem server registration
register: aName for: aServerClass on: anArrayOfPortNumbersOrResourceNames
^ (self
createServerOfClass: aServerClass
withName: aName
on: anArrayOfPortNumbers)
on: anArrayOfPortNumbersOrResourceNames)
register;
yourself
9 changes: 6 additions & 3 deletions repository/GsApplicationTools-Server.package/GemServer.class/class/register.on..st
View file
Original file line number Diff line number Diff line change
@@ -1,3 +1,6 @@
registration
register: aName on: anArrayOfPortNumbers
^ self register: aName for: self serverClass on: anArrayOfPortNumbers
gem server registration
register: aName on: anArrayOfPortNumbersOrResourceIds
^ self
register: aName
for: self serverClass
on: anArrayOfPortNumbersOrResourceIds
3 changes: 3 additions & 0 deletions repository/GsApplicationTools-Server.package/GemServer.class/class/removeGemServer..st
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
registry accessing
removeGemServer: aServer
^ GemServerRegistry removeGemServer: aServer
Loading

0 comments on commit a04be13

Please sign in to comment.