Object subclass: #TrivialServer
instanceVariableNames: 'counter'
category: 'TrivialServer'!
!TrivialServer methodsFor: 'initializing'!
initialize
counter := 0
! !
!TrivialServer methodsFor: 'processing'!
process: aRequest
| hostname httpVersion stream |
counter := counter + 1.
"Calling a method in a js module"
hostname := {'os.hostname()'}.
"Accessing a property of js HTTP request object"
httpVersion := {'aRequest.httpVersion'}.
stream := String new writeStream.
stream
nextPutAll: 'Request HTTP version: ', httpVersion, '
';
nextPutAll: 'OS hostname: ', hostname, '
';
nextPutAll: 'Number of requests: ', counter asString, '
'.
^stream contents
! !
!TrivialServer class methodsFor: 'initialization'!
initialize
{'os = require(''os'');'}
! !