Spurious activity on the Seaside/VisualAge Smalltalk server

"David Pennington" <[email protected]> Tue, 10 Oct 2017 21:34:54 +0100

Newsgroups	gmane.comp.lang.smalltalk.squeak.seaside
Message-ID	<[email protected]>

Hi there. I am running a test system at the moment using VAST 8.6.3 and Seaside.
The traffic is infrequent and only when I am testing. I am running a development image on the server which I monitor regularly.
Quite often a debugger window opens as can be seen in the screen shot I have attached. This debugger trace has no connection with the code I am running and I cannot work out what is happening (I am a fairly new user of Seaside but a long, long term user of VAST).
I also attach a stack trace.
I would be grateful if anyone can help me track down what is happening. I have deleted the whole Smalltalk installation Andre-installed everything (twice) but I can't stop this.
Thanks in advance (and if you need any more info please let me know).David

Message sent using Winmail Mail Server

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

Screen Shot 2017-10-10 at 21.26.32.png (image/png, 71.7 KB) - not displayed

stack.txt (text/plain, 15.3 KB)

Debugger Stack Trace Report:
Error String: '(ExCLDTIndexOutOfRange) Index out of range.: 1'
Resumable: false

Process
	Name: Dispatch worker: 31998
	Process State: suspended
	Priority: 3


System Configuration Dump


Copyright:

	VA Smalltalk V8.6.1; Image: 8.6.2 [349]
	VM Timestamp: 4.0,(NC) 7/24/2014 (86)
	(C) Copyright Instantiations 1994, 2014.  All rights reserved.
	(C) Copyright International Business Machines Corp. 1994, 2006.  All rights reserved.

Time:  15:35:44
Date:  10/10/2017

Platform:

	Virtual machine:  ES
	Bytecode version:  4.0
	Manager version:  4.00
	'OS' subsystem:  'WIN32s'
	'CLIM' subsystem:  'ES'
	'CP' subsystem:  'WIN32s'
	'CLDT' subsystem:  'ES'
	'CFS' subsystem:  'WIN32s'
	'SCI' subsystem:  'WIN'
	'CW' subsystem:  'WIN32s'
	'CPM' subsystem:  'ES'
	'CG' subsystem:  'WIN32s'
	'CPIC' subsystem:  'WIN32s'

Current user:  Library Supervisor

Connected Library:

	Pathname:  C:\ProgramData\Instantiations\VA Smalltalk\8.6\manager\mgr86.dat

INFO: Trapped error dumping system configuration.
=============<STACK TRACE BEGINS>============
[] in <optimized block>(ExceptionalEvent class)>>#initializeSystemExceptions
	signal=Signal on Exception: (ExCLDTIndexOutOfRange) Index out of range.
Signal>>#evaluate:
	self=Signal on Exception: (ExCLDTIndexOutOfRange) Index out of range.
	aBlock=[] in ExceptionalEvent class>>#initializeSystemExceptions
Signal>>#evaluateDefaultHandler:
	self=Signal on Exception: (ExCLDTIndexOutOfRange) Index out of range.
	aBlock=[] in ExceptionalEvent class>>#initializeSystemExceptions
ExceptionalEvent>>#applyDefaultHandler:
	self=Exception: (ExCLDTIndexOutOfRange) Index out of range.
	aSignal=Signal on Exception: (ExCLDTIndexOutOfRange) Index out of range.
	exception=Exception: (ExCLDTIndexOutOfRange) Index out of range.
Signal>>#handlesByDefault
	self=Signal on Exception: (ExCLDTIndexOutOfRange) Index out of range.
[] in BlockContextTemplate(Block)>>#when:do:exitWith:retryReturn:
	self=[] in SstHttpInvokerServlet>>#service:
	exception=Exception: (ExSstHttpRequestError) A servlet request error has occurred.
	handlerBlock=[] in SstHttpInvokerServlet>>#service:
	exitBlock=[] in Block>>#when:do:
	knownResult=an Object
	retryBlock=[] in Block>>#when:do:exitWith:retryReturn:
	handler=[] in Block>>#when:do:exitWith:retryReturn:
	oldHandler=nil
	signal=Signal on Exception: (ExCLDTIndexOutOfRange) Index out of range.
[] in BlockContextTemplate(Block)>>#when:do:exitWith:retryReturn:
	self=[] in WAServerAdaptor>>#handleRequest:
	exception=Exception: (ExWAResponseNotification) A notification has occurred
	handlerBlock=[] in WAServerAdaptor>>#handleRequest:
	exitBlock=[] in Block>>#when:do:
	knownResult=an Object
	retryBlock=[] in Block>>#when:do:exitWith:retryReturn:
	handler=[] in Block>>#when:do:exitWith:retryReturn:
	oldHandler=[] in Block>>#when:do:exitWith:retryReturn:
	signal=Signal on Exception: (ExCLDTIndexOutOfRange) Index out of range.
[] in BlockContextTemplate(Block)>>#when:do:exitWith:retryReturn:
	self=[] in WARequestHandler>>#handle:
	exception=Exception: (ExWACurrentRequestContext) A notification has occurred
	handlerBlock=[] in WADynamicVariable class>>#use:during:
	exitBlock=[] in Block>>#when:do:
	knownResult=an Object
	retryBlock=[] in Block>>#when:do:exitWith:retryReturn:
	handler=[] in Block>>#when:do:exitWith:retryReturn:
	oldHandler=[] in Block>>#when:do:exitWith:retryReturn:
	signal=Signal on Exception: (ExCLDTIndexOutOfRange) Index out of range.
[] in BlockContextTemplate(Block)>>#when:do:exitWith:retryReturn:
	self=[] in WARequestHandler>>#handle:
	exception=Exception: (ExWACurrentRequestContext) A notification has occurred
	handlerBlock=[] in WADynamicVariable class>>#use:during:
	exitBlock=[] in Block>>#when:do:
	knownResult=an Object
	retryBlock=[] in Block>>#when:do:exitWith:retryReturn:
	handler=[] in Block>>#when:do:exitWith:retryReturn:
	oldHandler=[] in Block>>#when:do:exitWith:retryReturn:
	signal=Signal on Exception: (ExCLDTIndexOutOfRange) Index out of range.
ExceptionalEvent>>#signalFor:
	self=Exception: (ExCLDTIndexOutOfRange) Index out of range.
	aSignalOrExceptionSelector=Signal on Exception: (ExCLDTIndexOutOfRange) Index out of range.
	handler=[] in Block>>#when:do:exitWith:retryReturn:
ExceptionalEvent>>#signalWithArguments:
	self=Exception: (ExCLDTIndexOutOfRange) Index out of range.
	arguments=(1)
ExceptionalEvent>>#signalWith:
	self=Exception: (ExCLDTIndexOutOfRange) Index out of range.
	arg1=1
OrderedCollection>>#removeAtIndex:
	self=OrderedCollection()
	anInteger=1
	oldObject=nil
	index=1
OrderedCollection>>#removeFirst
	self=OrderedCollection()
	oldObject=nil
WALegacyRedirectionHandler>>#handleFiltered:
	self=a WALegacyRedirectionHandler
	aRequestContext=a WARequestContext url: '/'
	url=/
[] in WALegacyRedirectionHandler(WARequestHandler)>>#handle:
	self=a WALegacyRedirectionHandler
	aRequestContext=a WARequestContext url: '/'
BlockContextTemplate(Block)>>#valueWithErrorHandler:oldHandler:onReturnDo:
	self=[] in WARequestHandler>>#handle:
	handler=[] in Block>>#when:do:exitWith:retryReturn:
	oldHandler=[] in Block>>#when:do:exitWith:retryReturn:
	completionBlock=[]
BlockContextTemplate(Block)>>#when:do:exitWith:retryReturn:
	self=[] in WARequestHandler>>#handle:
	exception=Exception: (ExWACurrentRequestContext) A notification has occurred
	handlerBlock=[] in WADynamicVariable class>>#use:during:
	exitBlock=[] in Block>>#when:do:
	knownResult=an Object
	retryBlock=[] in Block>>#when:do:exitWith:retryReturn:
	handler=[] in Block>>#when:do:exitWith:retryReturn:
	oldHandler=[] in Block>>#when:do:exitWith:retryReturn:
BlockContextTemplate(Block)>>#when:do:
	self=[] in WARequestHandler>>#handle:
	exception=Exception: (ExWACurrentRequestContext) A notification has occurred
	handlerBlock=[] in WADynamicVariable class>>#use:during:
	knownResult=an Object
	result=nil
WACurrentRequestContext class(Exception class)>>#handle:do:
	self=WACurrentRequestContext
	protectedBlock=[] in WARequestHandler>>#handle:
	handlerBlock=[] in WADynamicVariable class>>#use:during:
BlockContextTemplate(Block)>>#on:do:
	self=[] in WARequestHandler>>#handle:
	selector=WACurrentRequestContext
	action=[] in WADynamicVariable class>>#use:during:
WACurrentRequestContext class(WADynamicVariable class)>>#use:during:
	self=WACurrentRequestContext
	anObject=a WARequestContext url: '/'
	aBlock=[] in WARequestHandler>>#handle:
[] in WARequestContext>>#push:during:
	self=a WARequestContext url: '/'
	aRequestHandler=a WALegacyRedirectionHandler
	aBlock=[] in WARequestHandler>>#handle:
WARequestContext>>#push:during:
	self=a WARequestContext url: '/'
	aRequestHandler=a WALegacyRedirectionHandler
	aBlock=[] in WARequestHandler>>#handle:
WALegacyRedirectionHandler(WARequestHandler)>>#handle:
	self=a WALegacyRedirectionHandler
	aRequestContext=a WARequestContext url: '/'
WADispatcher>>#handleFiltered:named:
	self=a WADispatcher
	aRequestContext=a WARequestContext url: '/'
	aString='seaside'
WADispatcher>>#handleDefault:
	self=a WADispatcher
	aRequestContext=a WARequestContext url: '/'
WADispatcher>>#handleFiltered:
	self=a WADispatcher
	aRequestContext=a WARequestContext url: '/'
	consumer=a WAPathConsumer
[] in WADispatcher(WARequestHandler)>>#handle:
	self=a WADispatcher
	aRequestContext=a WARequestContext url: '/'
BlockContextTemplate(Block)>>#valueWithErrorHandler:oldHandler:onReturnDo:
	self=[] in WARequestHandler>>#handle:
	handler=[] in Block>>#when:do:exitWith:retryReturn:
	oldHandler=[] in Block>>#when:do:exitWith:retryReturn:
	completionBlock=[]
BlockContextTemplate(Block)>>#when:do:exitWith:retryReturn:
	self=[] in WARequestHandler>>#handle:
	exception=Exception: (ExWACurrentRequestContext) A notification has occurred
	handlerBlock=[] in WADynamicVariable class>>#use:during:
	exitBlock=[] in Block>>#when:do:
	knownResult=an Object
	retryBlock=[] in Block>>#when:do:exitWith:retryReturn:
	handler=[] in Block>>#when:do:exitWith:retryReturn:
	oldHandler=[] in Block>>#when:do:exitWith:retryReturn:
BlockContextTemplate(Block)>>#when:do:
	self=[] in WARequestHandler>>#handle:
	exception=Exception: (ExWACurrentRequestContext) A notification has occurred
	handlerBlock=[] in WADynamicVariable class>>#use:during:
	knownResult=an Object
	result=nil
WACurrentRequestContext class(Exception class)>>#handle:do:
	self=WACurrentRequestContext
	protectedBlock=[] in WARequestHandler>>#handle:
	handlerBlock=[] in WADynamicVariable class>>#use:during:
BlockContextTemplate(Block)>>#on:do:
	self=[] in WARequestHandler>>#handle:
	selector=WACurrentRequestContext
	action=[] in WADynamicVariable class>>#use:during:
WACurrentRequestContext class(WADynamicVariable class)>>#use:during:
	self=WACurrentRequestContext
	anObject=a WARequestContext url: '/'
	aBlock=[] in WARequestHandler>>#handle:
[] in WARequestContext>>#push:during:
	self=a WARequestContext url: '/'
	aRequestHandler=a WADispatcher
	aBlock=[] in WARequestHandler>>#handle:
WARequestContext>>#push:during:
	self=a WARequestContext url: '/'
	aRequestHandler=a WADispatcher
	aBlock=[] in WARequestHandler>>#handle:
WADispatcher(WARequestHandler)>>#handle:
	self=a WADispatcher
	aRequestContext=a WARequestContext url: '/'
[] in WASstServerAdaptor(WAServerAdaptor)>>#handleRequest:
	self=a WASstServerAdaptor
	aRequestContext=a WARequestContext url: '/'
BlockContextTemplate(Block)>>#valueWithErrorHandler:oldHandler:onReturnDo:
	self=[] in WAServerAdaptor>>#handleRequest:
	handler=[] in Block>>#when:do:exitWith:retryReturn:
	oldHandler=[] in Block>>#when:do:exitWith:retryReturn:
	completionBlock=[]
BlockContextTemplate(Block)>>#when:do:exitWith:retryReturn:
	self=[] in WAServerAdaptor>>#handleRequest:
	exception=Exception: (ExWAResponseNotification) A notification has occurred
	handlerBlock=[] in WAServerAdaptor>>#handleRequest:
	exitBlock=[] in Block>>#when:do:
	knownResult=an Object
	retryBlock=[] in Block>>#when:do:exitWith:retryReturn:
	handler=[] in Block>>#when:do:exitWith:retryReturn:
	oldHandler=[] in Block>>#when:do:exitWith:retryReturn:
BlockContextTemplate(Block)>>#when:do:
	self=[] in WAServerAdaptor>>#handleRequest:
	exception=Exception: (ExWAResponseNotification) A notification has occurred
	handlerBlock=[] in WAServerAdaptor>>#handleRequest:
	knownResult=an Object
	result=nil
WAResponseNotification class(Exception class)>>#handle:do:
	self=WAResponseNotification
	protectedBlock=[] in WAServerAdaptor>>#handleRequest:
	handlerBlock=[] in WAServerAdaptor>>#handleRequest:
BlockContextTemplate(Block)>>#on:do:
	self=[] in WAServerAdaptor>>#handleRequest:
	selector=WAResponseNotification
	action=[] in WAServerAdaptor>>#handleRequest:
WASstServerAdaptor(WAServerAdaptor)>>#handleRequest:
	self=a WASstServerAdaptor
	aRequestContext=a WARequestContext url: '/'
WASstServerAdaptor(WAServerAdaptor)>>#handle:
	self=a WASstServerAdaptor
	aRequestContext=a WARequestContext url: '/'
[] in WASstServerAdaptor(WAServerAdaptor)>>#process:
	self=a WASstServerAdaptor
	aNativeRequest=a SstHttpServletRequest
	context=a WARequestContext url: '/'
WASstServerAdaptor(WAServerAdaptor)>>#process:
	self=a WASstServerAdaptor
	aNativeRequest=a SstHttpServletRequest
	context=a WARequestContext url: '/'
[] in WASstServerAdaptor>>#process:
	self=a WASstServerAdaptor
	aNativeRequest=a SstHttpServletRequest
	response=nil
WASstServerAdaptor>>#process:
	self=a WASstServerAdaptor
	aNativeRequest=a SstHttpServletRequest
	response=nil
WASstHttpServlet>>#doGet:
	self=a WASstHttpServlet
	servletRequest=a SstHttpServletRequest
	response=nil
[] in WASstHttpServlet(SstHttpServlet)>>#service:
	self=a WASstHttpServlet
	message=a SstHttpServletRequest
	selector=#doGet:
LookupTable>>#at:ifPresent:
	self=LookupTable(#doOptions: #doHead: #doDelete: #doGet: #doPost: #doPut: #doTrace: )
	aKey='GET'
	aBlock=[] in SstHttpServlet>>#service:
	hashIndex=14
	element='GET'
	elementsSize=22
	index=14
WASstHttpServlet(SstHttpServlet)>>#service:
	self=a WASstHttpServlet
	message=a SstHttpServletRequest
SstHttpInvokerServlet>>#basicService:
	self=a SstHttpInvokerServlet
	request=a SstHttpServletRequest
	servlet=a WASstHttpServlet
[] in SstHttpInvokerServlet>>#service:
	self=a SstHttpInvokerServlet
	request=a SstHttpServletRequest
BlockContextTemplate(Block)>>#valueWithErrorHandler:oldHandler:onReturnDo:
	self=[] in SstHttpInvokerServlet>>#service:
	handler=[] in Block>>#when:do:exitWith:retryReturn:
	oldHandler=nil
	completionBlock=[]
BlockContextTemplate(Block)>>#when:do:exitWith:retryReturn:
	self=[] in SstHttpInvokerServlet>>#service:
	exception=Exception: (ExSstHttpRequestError) A servlet request error has occurred.
	handlerBlock=[] in SstHttpInvokerServlet>>#service:
	exitBlock=[] in Block>>#when:do:
	knownResult=an Object
	retryBlock=[] in Block>>#when:do:exitWith:retryReturn:
	handler=[] in Block>>#when:do:exitWith:retryReturn:
	oldHandler=nil
BlockContextTemplate(Block)>>#when:do:
	self=[] in SstHttpInvokerServlet>>#service:
	exception=Exception: (ExSstHttpRequestError) A servlet request error has occurred.
	handlerBlock=[] in SstHttpInvokerServlet>>#service:
	knownResult=an Object
	result=nil
SstHttpInvokerServlet>>#service:
	self=a SstHttpInvokerServlet
	request=a SstHttpServletRequest
WASstHttpServletEngine(SstHttpServletEngine)>>#basicProcessRequest:
	self=a WASstHttpServletEngine
	servletRequest=a SstHttpServletRequest
	responseContent=nil
	responseMessage=false
WASstHttpServletEngine(SstBasicServer)>>#processClientRequest:
	self=a WASstHttpServletEngine
	request=a SstHttpServletRequest
	context=a SstServletContext
	sessionManager=a SstHttpSessionManager
	result=nil
WASstHttpServletEngine(SstHttpServer)>>#processClientRequest:
	self=a WASstHttpServletEngine
	request=a SstHttpServletRequest
	response=nil
WASstHttpServletEngine(SstHttpServletEngine)>>#processClientRequest:
	self=a WASstHttpServletEngine
	request=a SstByteMessage
WASstHttpServletEngine(SstBasicServer)>>#processRequest:
	self=a WASstHttpServletEngine
	request=a SstByteMessage
SstRequest(DirectedMessage)>>#send
	self=SstRequest (a WASstHttpServletEngine, #processRequest:, (a SstByteMessage))
[] in SstPooledDispatcher(SstDispatcher)>>#basicExecuteRequest:
	self=a SstPooledDispatcher
	request=SstRequest (a WASstHttpServletEngine, #processRequest:, (a SstByteMessage))
	sstTag=#SstTag:Execute
	savedRequest=nil
	oldErrorHandler=nil
SstPooledDispatcher(SstDispatcher)>>#basicExecuteRequest:
	self=a SstPooledDispatcher
	request=SstRequest (a WASstHttpServletEngine, #processRequest:, (a SstByteMessage))
	sstTag=#SstTag:Execute
	savedRequest=nil
	oldErrorHandler=nil
SstPooledDispatcher(SstDispatcher)>>#dispatchRequest:
	self=a SstPooledDispatcher
	request=SstRequest (a WASstHttpServletEngine, #processRequest:, (a SstByteMessage))
	result=SstInvocationHandler(http://:8080/)
[] in SstPooledDispatcher>>#dispatchRequest:
	self=a SstPooledDispatcher
	request=SstRequest (a WASstHttpServletEngine, #processRequest:, (a SstByteMessage))
[] in SstWorkerManager>>#blockFor:forWorker:
	self=a SstWorkerManager
	workBlock=[] in SstPooledDispatcher>>#dispatchRequest:
	worker=SstWorker(Dispatch worker: 31998; occupied)
[] in SstWorker>>#workBlock
	self=SstWorker(Dispatch worker: 31998; occupied)
	current=[] in SstWorkerManager>>#blockFor:forWorker:
[] in Process>>#executeBlock:withArguments:
	self=Process:Dispatch worker: 31998{suspended,3}
	aBlock=[] in SstWorker>>#workBlock
	args=()
Process>>#executeBlock:withArguments:
	self=Process:Dispatch worker: 31998{suspended,3}
	aBlock=[] in SstWorker>>#workBlock
	args=()
Process>>#newProcessOn:stackSize:withArguments:named:
	self=Process:Dispatch worker: 31998{suspended,3}
	aBlock=[] in SstWorker>>#workBlock
	stackSize=1024
	args=()
	procName='31998'
==============<STACK TRACE ENDS>=============