added

git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/gsweb/trunk@18156 72102866-910b-0410-8b05-ffd578937521

GSWeb.framework/GSWActionRequestHandler.h

@@ -0,0 +1,83 @@
+/** GSWActionRequestHandler.h - <title>GSWeb: Class GSWActionRequestHandler</title>
+
+   Copyright (C) 1999-2003 Free Software Foundation, Inc.
+   
+   Written by:	Manuel Guesdon <mguesdon@orange-concept.com>
+   Date: 	Feb 1999
+   
+   $Revision$
+   $Date$
+
+   This file is part of the GNUstep Web Library.
+   
+   <license>
+   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.
+   </license>
+**/
+
+// $Id$
+
+#ifndef _GSWActionRequestHandler_h__
+	#define _GSWActionRequestHandler_h__
+
+
+@interface GSWActionRequestHandler: GSWRequestHandler
+{
+  NSString* _actionClassName;
+  NSString* _defaultActionName;
+  Class _actionClassClass;
+  BOOL _shouldAddToStatistics;  
+};
+
+-(NSString*)defaultActionClassName;
+-(NSString*)defaultDefaultActionName;
+-(BOOL)defaultShouldAddToStatistics;
+
+-(id)initWithDefaultActionClassName:(NSString*)defaultActionClassName
+                  defaultActionName:(NSString*)defaultActionName
+              shouldAddToStatistics:(BOOL)shouldAddToStatistics;
+
+-(void)registerWillHandleActionRequest;
+-(void)registerDidHandleActionRequestWithActionNamed:(NSString*)actionName;
+
+-(GSWResponse*)handleRequest:(GSWRequest*)aRequest;
+-(NSArray*)getRequestHandlerPathForRequest:(GSWRequest*)aRequest;
++(Class)_actionClassForName:(NSString*)name;
+-(void)getRequestActionClassNameInto:(NSString**)actionClassNamePtr
+                           classInto:(Class*)actionClassPtr
+                            nameInto:(NSString**)actionNamePtr
+                             forPath:(NSArray*)path;
+-(GSWResponse*)_handleRequest:(GSWRequest*)aRequest;
+
+
+-(GSWResponse*)generateNullResponse;
+-(GSWResponse*)generateRequestRefusalResponseForRequest:(GSWRequest*)aRequest;
+-(GSWResponse*)generateErrorResponseWithException:(NSException*)error
+                                        inContext:(GSWContext*)aContext;
+
+@end
+
+//====================================================================
+@interface GSWActionRequestHandler (GSWRequestHandlerClassA)
++(id)handler;
++(GSWActionRequestHandler*)handlerWithDefaultActionClassName:(NSString*)defaultActionClassName
+                                           defaultActionName:(NSString*)defaultActionName
+                                       shouldAddToStatistics:(BOOL)shouldAddToStatistics;
+@end
+
+
+
+
+#endif //GSWActionRequestHandler

GSWeb.framework/GSWActionRequestHandler.m

@@ -0,0 +1,475 @@
+/** GSWActionRequestHandler.m - <title>GSWeb: Class GSWActionRequestHandler</title>
+
+   Copyright (C) 1999-2003 Free Software Foundation, Inc.
+   
+   Written by:	Manuel Guesdon <mguesdon@orange-concept.com>
+   Date: 	Feb 1999
+   
+   $Revision$
+   $Date$
+   $Id$
+
+   This file is part of the GNUstep Web Library.
+   
+   <license>
+   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.
+   </license>
+**/
+
+#include "config.h"
+
+RCS_ID("$Id$")
+
+#include "GSWeb.h"
+
+//====================================================================
+@implementation GSWActionRequestHandler
+
+-(NSString*)defaultActionClassName
+{
+  [self subclassResponsibility: _cmd];
+  return nil;
+};
+
+-(NSString*)defaultDefaultActionName
+{
+  return @"default";
+};
+
+-(BOOL)defaultShouldAddToStatistics
+{
+  return YES;
+};
+
+-(id)init
+{
+  if ((self=[super init]))
+    {
+      ASSIGN(_actionClassName,[self defaultActionClassName]);
+      ASSIGN(_defaultActionName,[self defaultDefaultActionName]);
+      _shouldAddToStatistics=[self defaultShouldAddToStatistics];
+    };
+  return self;
+};
+
+-(id)initWithDefaultActionClassName:(NSString*)defaultActionClassName
+                  defaultActionName:(NSString*)defaultActionName
+              shouldAddToStatistics:(BOOL)shouldAddToStatistics
+{
+  if ((self=[self init]))
+    {
+      ASSIGN(_actionClassName,defaultActionClassName);
+      ASSIGN(_defaultActionName,defaultActionName);
+      _shouldAddToStatistics=shouldAddToStatistics;
+    };
+  return self;
+};
+
+-(void)dealloc
+{
+  DESTROY(_actionClassName);
+  DESTROY(_defaultActionName);
+  [super dealloc];
+};
+
+//--------------------------------------------------------------------
+-(BOOL)isSessionIDInRequest:(GSWRequest*)aRequest
+{
+  return [aRequest _isSessionIDInRequest];
+}
+
+//--------------------------------------------------------------------
+-(void)registerWillHandleActionRequest
+{
+  [self subclassResponsibility: _cmd];
+};
+
+//--------------------------------------------------------------------
+-(void)registerDidHandleActionRequestWithActionNamed:(NSString*)actionName
+{
+  [self subclassResponsibility: _cmd];
+};
+
+//--------------------------------------------------------------------
+-(GSWResponse*)handleRequest:(GSWRequest*)aRequest
+{
+  //OK
+  GSWResponse* response=nil;
+  GSWApplication* application=nil;
+  LOGObjectFnStart();
+  application=[GSWApplication application];
+
+  // Test if we should accept request
+  if ([application isRefusingNewSessions]
+      && ![self isSessionIDInRequest:aRequest]
+      && [aRequest _isUsingWebServer])
+    {
+      // Reject it
+      response=[self generateRequestRefusalResponseForRequest:aRequest];
+    }
+  else
+    {
+      // Accept it 
+      [application lockRequestHandling];
+      NS_DURING
+        {
+          response=[self _handleRequest:aRequest];
+        }
+      NS_HANDLER
+        {
+          LOGException(@"%@ (%@)",localException,[localException reason]);
+          [application unlockRequestHandling];
+          [localException raise];//TODO
+        };
+      NS_ENDHANDLER;
+      [application unlockRequestHandling];
+    };
+  if (!response)
+    {
+      response=[self generateNullResponse];
+      [response _finalizeInContext:nil];
+    };
+  LOGObjectFnStop();
+  return response;
+};
+
+//--------------------------------------------------------------------
+-(void)_setRecordingHeadersToResponse:(GSWResponse*)aResponse
+                           forRequest:(GSWRequest*)request
+                            inContext:(GSWContext*)context
+{
+  [[GSWApplication application] _setRecordingHeadersToResponse:aResponse
+                                forRequest:request
+                                inContext:context];
+};
+
+//--------------------------------------------------------------------
+-(NSArray*)getRequestHandlerPathForRequest:(GSWRequest*)aRequest
+{
+  return [self subclassResponsibility: _cmd];
+};
+
+//--------------------------------------------------------------------
++(Class)_actionClassForName:(NSString*)name
+{
+  Class class=Nil;
+  LOGObjectFnStart();
+  class=NSClassFromString(name);
+  NSDebugMLog(@"name=%@",name);
+  NSDebugMLog(@"class=%@",class);
+  NSDebugMLog(@"[GSWAction class]=%@",[GSWAction class]);
+  if (class)
+    {
+      NSLog(@"Z6-  class=%@",class);//TODO: does this to force class init. Check this later
+      if (!GSObjCIsKindOf(class,[GSWAction class]))
+        class=Nil;
+    };
+  NSDebugMLog(@"class=%@",class);
+  LOGObjectFnStop();
+  return class;
+}
+
+//--------------------------------------------------------------------
+-(void)getRequestActionClassNameInto:(NSString**)actionClassNamePtr
+                           classInto:(Class*)actionClassPtr
+                            nameInto:(NSString**)actionNamePtr
+                            forPath:(NSArray*)path
+{
+  int pathCount=0;
+  int i=0;
+
+  LOGObjectFnStart();
+
+  pathCount=[path count];
+  NSDebugMLog(@"path=%@",path);
+  NSDebugMLog(@"pathCount=%d",pathCount);
+
+  // remove empty last parts
+  for(i=pathCount-1;i>=0 && [[path objectAtIndex:i]length]==0;i--)
+    pathCount--;
+  if (pathCount<[path count])
+    {
+      path=[path subarrayWithRange:NSMakeRange(0,pathCount)];
+    };
+  NSDebugMLog(@"path=%@",path);
+  NSDebugMLog(@"pathCount=%d",pathCount);
+  switch(pathCount)
+    {
+    case 0:
+      NSDebugMLog(@"_actionClassName=%@",_actionClassName);
+      NSDebugMLog(@"_actionClassClass=%@",_actionClassClass);
+      NSDebugMLog(@"_defaultActionName=%@",_defaultActionName);      
+      *actionClassNamePtr = _actionClassName;
+      *actionClassPtr = _actionClassClass;
+      *actionNamePtr = _defaultActionName;
+      break;
+    case 1:
+      {
+        NSString* testActionName=[path objectAtIndex:0];
+        NSDebugMLog(@"testActionName=%@",testActionName);
+        if ([GSWAction _isActionNamed:testActionName
+                       actionOfClass:*actionClassPtr])
+          {
+            NSDebugMLog(@"_actionClassName=%@",_actionClassName);
+            NSDebugMLog(@"_actionClassClass=%@",_actionClassClass);
+            NSDebugMLog(@"testActionName=%@",testActionName);      
+            *actionClassNamePtr = _actionClassName;
+            *actionClassPtr = _actionClassClass;
+            *actionNamePtr = testActionName;
+          } 
+        else
+          {
+            *actionClassPtr = [[self class]_actionClassForName:testActionName]; // is it a class ?
+            NSDebugMLog(@"*actionClassPtr=%@",*actionClassPtr);
+            if (*actionClassPtr)
+              {
+                *actionClassNamePtr = NSStringFromClass(*actionClassPtr);
+                *actionNamePtr = _defaultActionName;
+                NSDebugMLog(@"*actionClassNamePtr=%@",*actionClassNamePtr);
+                NSDebugMLog(@"*actionNamePtr=%@",*actionNamePtr);      
+              } 
+            else
+              {
+                *actionClassNamePtr = _actionClassName;
+                *actionClassPtr = _actionClassClass;
+                *actionNamePtr = testActionName;
+                NSDebugMLog(@"_actionClassName=%@",_actionClassName);
+                NSDebugMLog(@"_actionClassClass=%@",_actionClassClass);
+                NSDebugMLog(@"testActionName=%@",testActionName);      
+              }
+          }
+        /*
+        NSString* tmpActionName=[NSString stringWithFormat:@"%@Action",
+                                          ];
+        SEL tmpActionSel=NSSelectorFromString(tmpActionName);
+        Class aClass = NSClassFromString(@"DirectAction");
+        NSDebugMLLog(@"requests",@"tmpActionName=%@",
+                     tmpActionName);
+        if (tmpActionSel && aClass)
+          {
+                if ([aClass instancesRespondToSelector:tmpActionSel])
+                  {
+                    actionName=[requestHandlerPathArray objectAtIndex:0];
+                    className=@"DirectAction";
+                  };
+              };
+            if (!actionName)
+              {
+                className=[requestHandlerPathArray objectAtIndex:0];
+                actionName=@"default";
+              };
+          };
+*/
+      };
+      break;
+    case 2:
+    default:
+      {
+        *actionClassNamePtr=[path objectAtIndex:0];
+        *actionNamePtr=[NSString stringWithFormat:@"%@",
+                                 [path objectAtIndex:1]];
+        NSDebugMLog(@"*actionClassNamePtr=%@",*actionClassNamePtr);
+        NSDebugMLog(@"*actionNamePtr=%@",*actionNamePtr);
+        if ([*actionNamePtr isEqual:*actionClassNamePtr])
+          {
+            *actionClassNamePtr = _actionClassName;
+            *actionClassPtr = _actionClassClass;
+            NSDebugMLog(@"*actionClassNamePtr=%@",*actionClassNamePtr);
+            NSDebugMLog(@"*actionClassPtr=%@",*actionClassPtr);
+          }
+        else
+          {
+            *actionClassPtr = [[self class]_actionClassForName:*actionClassNamePtr];
+            NSDebugMLog(@"*actionClassNamePtr=%@",*actionClassNamePtr);
+            NSDebugMLog(@"*actionClassPtr=%@",*actionClassPtr);
+          };
+        };
+      break;
+    };
+  LOGObjectFnStop();
+};
+
+-(GSWAction*)getActionInstanceOfClass:(Class)actionClass
+                          withRequest:(GSWRequest*)aRequest
+{
+  GSWAction* action=(GSWAction*)[[actionClass alloc]initWithRequest:aRequest];
+  return action;
+}
+
+
+//--------------------------------------------------------------------
+// Application lockRequestHandling is set
+-(GSWResponse*)_handleRequest:(GSWRequest*)aRequest
+{
+  GSWResponse* response=nil;
+  GSWStatisticsStore* statisticsStore=nil;
+  GSWApplication* application=nil;
+  NSArray* requestHandlerPathArray=nil;
+  Class actionClass=Nil;
+  NSString* actionName=nil;
+  NSString* actionClassName=nil;
+  GSWContext* context=nil;
+  LOGObjectFnStart();
+  application=[GSWApplication application];
+
+  NS_DURING
+    {
+      statisticsStore=[application statisticsStore];
+      if (_shouldAddToStatistics)
+        [self registerWillHandleActionRequest];
+
+      requestHandlerPathArray=[self getRequestHandlerPathForRequest:aRequest];
+      NSDebugMLLog(@"requests",@"requestHandlerPathArray=%@",
+                   requestHandlerPathArray);
+
+      [self getRequestActionClassNameInto:&actionClassName
+            classInto:&actionClass
+            nameInto:&actionName
+            forPath:requestHandlerPathArray];
+
+      NSDebugMLLog(@"requests",@"className=%@",actionClassName);
+      NSDebugMLLog(@"requests",@"actionClass=%@",actionClass);
+      NSDebugMLLog(@"requests",@"actionName=%@",actionName);
+
+      if (actionClass)
+        {
+          GSWResourceManager* resourceManager=nil;
+          GSWDeployedBundle* appBundle=nil;
+          id<GSWActionResults> actionResult=nil;
+          resourceManager=[application resourceManager];
+          appBundle=[resourceManager _appProjectBundle];
+          [resourceManager _allFrameworkProjectBundles];//So what ?
+          [application awake];
+          
+          GSWAction* action=[self getActionInstanceOfClass:actionClass
+                                  withRequest:aRequest];
+
+
+          NSAssert1(action,@"Direct action of class named %@ can't be created",
+                    actionClassName);
+          
+          actionResult=[action performActionNamed:actionName];
+          
+          response=[actionResult generateResponse];
+          
+          context=[action _context];
+          
+          [[NSNotificationCenter defaultCenter]postNotificationName:@"DidHandleRequestNotification"
+                                               object:context];
+          [self _setRecordingHeadersToResponse:response
+                forRequest:aRequest
+                inContext:context];
+          
+        }
+      else
+        {
+          NSException* exception=nil;
+          if ([actionClassName length]>0)
+            {
+              exception=[NSException exceptionWithName:NSInvalidArgumentException//TODO better name
+                                     reason:[NSString stringWithFormat:@"Can't find action class named '%@'",actionClassName]
+                                     userInfo:nil];
+            }
+          else
+            exception=[NSException exceptionWithName:NSInvalidArgumentException//TODO better name
+                                   reason:[NSString stringWithFormat:@"Can't execute action with path: '%@'",requestHandlerPathArray]
+                                   userInfo:nil];
+          [exception raise];
+        };
+      if ([application isCachingEnabled])
+        {
+          //TODO
+        };
+      {
+        
+        //Finir ?
+      };
+    }
+  NS_HANDLER
+    {
+      LOGException(@"%@ (%@)",localException,[localException reason]);
+      if (!context)
+        context=[GSWApp _context];
+      response=[application handleException:localException
+                            inContext:context];
+      //TODO
+    };
+  NS_ENDHANDLER;
+  NSDebugMLLog(@"requests",@"response=%@",response);
+  RETAIN(response);
+  if (!context)
+    context=[GSWApp _context];
+  if (context)
+    {
+      [context _putAwakeComponentsToSleep];
+      [application saveSessionForContext:context];
+    };
+
+  NSDebugMLLog(@"requests",@"response=%@",response);
+  AUTORELEASE(response);
+	  
+  [application sleep];
+
+  [self registerDidHandleActionRequestWithActionNamed:actionName];
+
+  //TODO do not fnalize if already done (in handleException for exemple)
+  if (response)
+    [response _finalizeInContext:context];
+  [application _setContext:nil];
+
+  LOGObjectFnStop();
+  return response;
+};
+
+//--------------------------------------------------------------------
+-(GSWResponse*)generateNullResponse
+{
+  return [self subclassResponsibility: _cmd];
+};
+
+//--------------------------------------------------------------------
+-(GSWResponse*)generateRequestRefusalResponseForRequest:(GSWRequest*)aRequest
+{
+  return [self subclassResponsibility: _cmd];
+};
+
+//--------------------------------------------------------------------
+-(GSWResponse*)generateErrorResponseWithException:(NSException*)error
+                                        inContext:(GSWContext*)aContext
+{
+  return [self subclassResponsibility: _cmd];
+};
+
+@end
+
+//====================================================================
+@implementation GSWActionRequestHandler (GSWRequestHandlerClassA)
+
+//--------------------------------------------------------------------
++(id)handler
+{
+  return [[GSWActionRequestHandler new] autorelease];
+};
+
++(GSWActionRequestHandler*)handlerWithDefaultActionClassName:(NSString*)defaultActionClassName
+                                           defaultActionName:(NSString*)defaultActionName
+                                       shouldAddToStatistics:(BOOL)shouldAddToStatistics
+{
+  return [[[self alloc]initWithDefaultActionClassName:defaultActionClassName
+                       defaultActionName:defaultActionName
+                       shouldAddToStatistics:shouldAddToStatistics]autorelease];
+};
+@end
+