2002-08-04 18:00:11 +00:00
/ * * GSWDirectActionRequestHandler . m - < title > GSWeb : Class GSWDirectActionRequestHandler < / title >
Copyright ( C ) 1999 -2002 Free Software Foundation , Inc .
2000-01-22 12:49:49 +00:00
2002-08-04 18:00:11 +00:00
Written by : Manuel Guesdon < mguesdon @ orange - concept . com >
Date : Feb 1999
2000-01-22 12:49:49 +00:00
2002-08-04 18:00:11 +00:00
$ Revision $
$ Date $
2000-01-22 12:49:49 +00:00
This file is part of the GNUstep Web Library .
2002-08-04 18:00:11 +00:00
< license >
2000-01-22 12:49:49 +00:00
This library is free software ; you can redistribute it and / or
modify it under the terms of the GNU Library General Public
License as published by the Free Software Foundation ; either
version 2 of the License , or ( at your option ) any later version .
This library is distributed in the hope that it will be useful ,
but WITHOUT ANY WARRANTY ; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE . See the GNU
Library General Public License for more details .
You should have received a copy of the GNU Library General Public
License along with this library ; if not , write to the Free
Software Foundation , Inc . , 675 Mass Ave , Cambridge , MA 02139 , USA .
2002-08-04 18:00:11 +00:00
< / license >
* * /
2000-01-22 12:49:49 +00:00
static char rcsId [ ] = "$Id$" ;
2000-10-30 15:36:50 +00:00
# include < GSWeb / GSWeb . h >
2000-01-22 12:49:49 +00:00
// === === === === === === === === === === === === === === === === === === === === === === = =
@ implementation GSWDirectActionRequestHandler
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
2002-08-04 18:00:11 +00:00
- ( GSWResponse * ) handleRequest : ( GSWRequest * ) aRequest
2000-01-22 12:49:49 +00:00
{
// OK
2002-08-04 18:00:11 +00:00
GSWResponse * response = nil ;
GSWStatisticsStore * statisticsStore = nil ;
GSWApplication * application = nil ;
2000-01-22 12:49:49 +00:00
LOGObjectFnStart ( ) ;
2002-08-04 18:00:11 +00:00
application = [ GSWApplication application ] ;
if ( 0 / * [ application isRefusingNewSessions ] * / )
{
// TODO
}
2000-01-22 12:49:49 +00:00
else
2002-08-04 18:00:11 +00:00
{
id submitButtonsActionPathFromRequest = nil ;
NSArray * requestHandlerPathArray = nil ;
NSString * actionName = nil ;
NSString * className = nil ;
GSWContext * context = nil ;
[ application lockRequestHandling ] ;
NS_DURING
{
NS_DURING
2001-10-28 10:29:17 +00:00
{
2002-08-04 18:00:11 +00:00
statisticsStore = [ [ GSWApplication application ] statisticsStore ] ;
[ statisticsStore _applicationWillHandleDirectActionRequest ] ;
submitButtonsActionPathFromRequest = [ self submitButtonsActionPathFromRequest : aRequest ] ; // So what ?
NSDebugMLLog ( @ "requests" , @ "submitButtonsActionPathFromRequest=%@" ,
submitButtonsActionPathFromRequest ) ;
requestHandlerPathArray = [ aRequest requestHandlerPathArray ] ;
NSDebugMLLog ( @ "requests" , @ "requestHandlerPathArray=%@" ,
requestHandlerPathArray ) ;
switch ( [ requestHandlerPathArray count ] )
2001-10-28 10:29:17 +00:00
{
2002-08-04 18:00:11 +00:00
case 0 :
actionName = @ "default" ;
className = @ "DirectAction" ;
break ;
case 1 :
{
NSString * tmpActionName = [ NSString stringWithFormat : @ "%@Action" ,
[ requestHandlerPathArray objectAtIndex : 0 ] ] ;
SEL tmpActionSel = NSSelectorFromString ( tmpActionName ) ;
Class aClass = NSClassFromString ( @ "DirectAction" ) ;
NSDebugMLLog ( @ "requests" , @ "tmpActionName=%@" ,
tmpActionName ) ;
if ( tmpActionSel && aClass )
2001-10-28 10:29:17 +00:00
{
2002-08-04 18:00:11 +00:00
if ( [ aClass instancesRespondToSelector : tmpActionSel ] )
2001-10-28 10:29:17 +00:00
{
2002-08-04 18:00:11 +00:00
actionName = [ requestHandlerPathArray objectAtIndex : 0 ] ;
className = @ "DirectAction" ;
2001-10-28 10:29:17 +00:00
} ;
} ;
2002-08-04 18:00:11 +00:00
if ( ! actionName )
{
className = [ requestHandlerPathArray objectAtIndex : 0 ] ;
actionName = @ "default" ;
} ;
} ;
break ;
case 2 :
className = [ requestHandlerPathArray objectAtIndex : 0 ] ;
actionName = [ NSString stringWithFormat : @ "%@" ,
[ requestHandlerPathArray objectAtIndex : 1 ] ] ;
break ;
default :
ExceptionRaise0 ( @ "GSWDirectActionRequestHandler" , @ "bad parameters count" ) ;
break ;
} ;
NSDebugMLLog ( @ "requests" , @ "className=%@" , className ) ;
NSDebugMLLog ( @ "requests" , @ "actionName=%@" , actionName ) ;
if ( [ application isCachingEnabled ] )
{
// TODO
} ;
{
GSWResourceManager * resourceManager = nil ;
GSWDeployedBundle * appBundle = nil ;
GSWDirectAction * directAction = nil ;
id < GSWActionResults > actionResult = nil ;
Class aClass = nil ;
resourceManager = [ application resourceManager ] ;
appBundle = [ resourceManager _appProjectBundle ] ;
[ resourceManager _allFrameworkProjectBundles ] ; // So what ?
[ application awake ] ;
aClass = NSClassFromString ( className ) ;
NSAssert1 ( aClass , @ "No direct action class named %@" ,
className ) ;
directAction = [ [ aClass alloc ] initWithRequest : aRequest ] ;
NSAssert1 ( directAction , @ "Direct action of class named %@ can't be created" ,
className ) ;
context = [ directAction _context ] ;
actionResult = [ directAction performActionNamed : actionName ] ;
response = [ actionResult generateResponse ] ;
// Finir ?
} ;
}
2000-01-22 12:49:49 +00:00
NS_HANDLER
2002-08-04 18:00:11 +00:00
{
LOGException ( @ "%@ (%@)" , localException , [ localException reason ] ) ;
if ( ! context )
context = [ GSWApp _context ] ;
response = [ application handleException : localException
inContext : context ] ;
// TODO
} ;
2000-01-22 12:49:49 +00:00
NS_ENDHANDLER ;
2002-08-04 18:00:11 +00:00
NSDebugMLLog ( @ "requests" , @ "response=%@" , response ) ;
RETAIN ( response ) ;
if ( ! context )
context = [ GSWApp _context ] ;
[ context _putAwakeComponentsToSleep ] ;
[ application saveSessionForContext : context ] ;
NSDebugMLLog ( @ "requests" , @ "response=%@" , response ) ;
AUTORELEASE ( response ) ;
2000-01-22 12:49:49 +00:00
// Here ? ? ?
2002-08-04 18:00:11 +00:00
[ application sleep ] ;
2000-01-22 12:49:49 +00:00
// TODO do not fnalize if already done ( in handleException for exemple )
2002-08-04 18:00:11 +00:00
[ response _finalizeInContext : context ] ;
[ application _setContext : nil ] ;
statisticsStore = [ [ GSWApplication application ] statisticsStore ] ;
[ statisticsStore _applicationDidHandleDirectActionRequestWithActionNamed : actionName ] ;
}
NS_HANDLER
{
LOGException ( @ "%@ (%@)" , localException , [ localException reason ] ) ;
[ application unlockRequestHandling ] ;
[ localException raise ] ; // TODO
} ;
NS_ENDHANDLER ;
[ application unlockRequestHandling ] ;
} ;
2000-01-22 12:49:49 +00:00
LOGObjectFnNotImplemented ( ) ; // TODOFN
LOGObjectFnStop ( ) ;
2002-08-04 18:00:11 +00:00
return response ;
2000-01-22 12:49:49 +00:00
} ;
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
- ( GSWResponse * ) _nilResponse
{
// OK
2002-08-04 18:00:11 +00:00
GSWResponse * response = nil ;
2000-01-22 12:49:49 +00:00
LOGObjectFnStart ( ) ;
2002-08-04 18:00:11 +00:00
response = [ [ GSWResponse new ] autorelease ] ;
[ response appendContentString : @ "<HTML><HEAD><TITLE>DirectAction Error</TITLE></HEAD><BODY>The result of a direct action returned nothing.</BODY></HTML>" ] ;
2000-01-22 12:49:49 +00:00
LOGObjectFnStop ( ) ;
2002-08-04 18:00:11 +00:00
return response ;
2000-01-22 12:49:49 +00:00
} ;
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
2002-08-04 18:00:11 +00:00
- ( void ) _initializeRequestSessionIDInContext : ( GSWContext * ) aContext
2000-01-22 12:49:49 +00:00
{
LOGObjectFnNotImplemented ( ) ; // TODOFN
} ;
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
2002-08-04 18:00:11 +00:00
- ( id ) submitButtonsActionPathFromRequest : ( GSWRequest * ) aRequest
2000-01-22 12:49:49 +00:00
{
// OK
2002-08-04 18:00:11 +00:00
NSArray * submitActions = nil ;
2000-01-22 12:49:49 +00:00
LOGObjectFnStart ( ) ;
2002-08-04 18:00:11 +00:00
submitActions = [ aRequest formValuesForKey : GSWKey_SubmitAction [ GSWebNamingConv ] ] ;
if ( submitActions )
{
// TODO
} ;
2000-01-22 12:49:49 +00:00
LOGObjectFnNotImplemented ( ) ; // TODOFN
LOGObjectFnStop ( ) ;
return nil ;
} ;
@ end
// === === === === === === === === === === === === === === === === === === === === === === = =
@ implementation GSWDirectActionRequestHandler ( GSWRequestHandlerClassA )
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
+ ( id ) handler
{
return [ [ GSWDirectActionRequestHandler new ] autorelease ] ;
} ;
@ end