mirror of
https://github.com/gnustep/libs-gsweb.git
synced 2025-02-23 11:41:20 +00:00
4f18e087c5
fix generateRelativeURLs/generateRelativeURLs rename variables to make code easier to understand respect GNUstep coding standard (curly brackets placement) * GSWeb/GSWApplication.m set _isMultiThreaded when adaptor dispatchesRequestsConcurrently remove -lockRequestHandling remove -lockedDecrementActiveSessionCount remove -lockedIncrementActiveSessionCount * GSWeb/GSWApplication.h remove -lockRequestHandling remove _globalLockn remove _globalLock_thread_id remove -dealloc remove -init remove duplicate declarations remove -lockedDecrementActiveSessionCount remove -lockedIncrementActiveSessionCount * GSWeb/GSWActionRequestHandler.m copy lock code from GSWComponentRequestHandler * GSWeb/GSWSessionTimeOutManager.m use -requestHandlingLock instead of -lockRequestHandling git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/gsweb/trunk@37796 72102866-910b-0410-8b05-ffd578937521
469 lines
16 KiB
Objective-C
469 lines
16 KiB
Objective-C
/** GSWHyperlink.m - <title>GSWeb: Class GSWHyperlink</title>
|
|
|
|
Copyright (C) 2005-2006 Free Software Foundation, Inc.
|
|
|
|
Written by: David Wetzel <dave@turbocat.de> http://www.turbocat.de/
|
|
Date: Jan 2006
|
|
|
|
$Revision$
|
|
$Date$
|
|
|
|
$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>
|
|
**/
|
|
|
|
// todo disabledInContext ??
|
|
|
|
#include "config.h"
|
|
|
|
RCS_ID("$Id$")
|
|
|
|
#include "GSWeb.h"
|
|
|
|
static GSWIMP_BOOL standardEvaluateConditionInContextIMP = NULL;
|
|
|
|
static Class standardClass = Nil;
|
|
static Class NSStringClass = Nil;
|
|
|
|
//====================================================================
|
|
@implementation GSWHyperlink
|
|
|
|
//--------------------------------------------------------------------
|
|
+ (void) initialize
|
|
{
|
|
if (self == [GSWHyperlink class])
|
|
{
|
|
standardClass=[GSWHyperlink class];
|
|
NSStringClass = [NSString class];
|
|
|
|
standardEvaluateConditionInContextIMP =
|
|
(GSWIMP_BOOL)[self instanceMethodForSelector:evaluateConditionInContextSEL];
|
|
};
|
|
};
|
|
|
|
-(void) dealloc
|
|
{
|
|
DESTROY(_action);
|
|
DESTROY(_string);
|
|
DESTROY(_pageName);
|
|
DESTROY(_href);
|
|
DESTROY(_disabled);
|
|
DESTROY(_fragmentIdentifier);
|
|
// DESTROY(_secure);
|
|
DESTROY(_queryDictionary);
|
|
DESTROY(_actionClass);
|
|
DESTROY(_directActionName);
|
|
DESTROY(_otherQueryAssociations);
|
|
|
|
[super dealloc];
|
|
}
|
|
|
|
-(id)initWithName:(NSString*)name
|
|
associations:(NSDictionary*)associations
|
|
template:(GSWElement*)template
|
|
{
|
|
self = [super initWithName:@"a" associations:associations template:template];
|
|
if (!self) {
|
|
return nil;
|
|
}
|
|
|
|
DESTROY(_otherQueryAssociations);
|
|
_otherQueryAssociations = RETAIN([_associations extractObjectsForKeysWithPrefix:@"?" removePrefix: YES]);
|
|
|
|
// _otherQueryAssociations = (((_otherQueryAssociations == nil) ||
|
|
// ([_otherQueryAssociations count] <= 0)) ? nil : _otherQueryAssociations);
|
|
|
|
if ((_otherQueryAssociations != nil) && ([_otherQueryAssociations count] == 0)) {
|
|
DESTROY(_otherQueryAssociations);
|
|
}
|
|
ASSIGN(_action, [_associations objectForKey: action__Key]);
|
|
if (_action != nil) {
|
|
[_associations removeObjectForKey: action__Key];
|
|
}
|
|
ASSIGN(_href, [_associations objectForKey: href__Key]);
|
|
if (_href != nil) {
|
|
[_associations removeObjectForKey: href__Key];
|
|
}
|
|
ASSIGN(_string, [_associations objectForKey: string__Key]);
|
|
if (_string != nil) {
|
|
[_associations removeObjectForKey: string__Key];
|
|
}
|
|
ASSIGN(_disabled, [_associations objectForKey: disabled__Key]);
|
|
if (_disabled != nil) {
|
|
[_associations removeObjectForKey: disabled__Key];
|
|
}
|
|
ASSIGN(_queryDictionary, [_associations objectForKey: queryDictionary__Key]);
|
|
if (_queryDictionary != nil) {
|
|
[_associations removeObjectForKey: queryDictionary__Key];
|
|
}
|
|
ASSIGN(_actionClass, [_associations objectForKey: actionClass__Key]);
|
|
if (_actionClass != nil) {
|
|
[_associations removeObjectForKey: actionClass__Key];
|
|
}
|
|
ASSIGN(_directActionName, [_associations objectForKey: directActionName__Key]);
|
|
if (_directActionName != nil) {
|
|
[_associations removeObjectForKey: directActionName__Key];
|
|
}
|
|
ASSIGN(_pageName, [_associations objectForKey: pageName__Key]);
|
|
if (_pageName != nil) {
|
|
[_associations removeObjectForKey: pageName__Key];
|
|
}
|
|
ASSIGN(_secure, [_associations objectForKey: secure__Key]);
|
|
if (_secure != nil) {
|
|
[_associations removeObjectForKey: secure__Key];
|
|
}
|
|
ASSIGN(_fragmentIdentifier, [_associations objectForKey: fragmentIdentifier__Key]);
|
|
if (_fragmentIdentifier != nil) {
|
|
[_associations removeObjectForKey: fragmentIdentifier__Key];
|
|
}
|
|
|
|
if ((_action == nil) && (_href == nil) && (_pageName == nil) &&
|
|
(_directActionName == nil) && (_actionClass == nil)) {
|
|
|
|
[NSException raise:NSInvalidArgumentException
|
|
format:@"%s: Missing required attribute: 'action' or 'href' or 'pageName' or 'directActionName' or 'actionClass'",
|
|
__PRETTY_FUNCTION__];
|
|
}
|
|
if (((_action != nil) && (_href != nil)) || ((_action != nil) && (_pageName != nil)) ||
|
|
((_href != nil) && (_pageName != nil)) || ((_action != nil) &&
|
|
(_directActionName != nil)) || ((_href != nil) && (_directActionName != nil)) || ((_pageName != nil) &&
|
|
(_directActionName != nil)) || ((_action != nil) && (_actionClass != nil))) {
|
|
|
|
[NSException raise:NSInvalidArgumentException
|
|
format:@"%s: At least two of these conflicting attributes are present: 'action', 'href', 'pageName', 'directActionName', 'actionClass'.",
|
|
__PRETTY_FUNCTION__];
|
|
}
|
|
if ((_action != nil) && ([_action isValueConstant])) {
|
|
[NSException raise:NSInvalidArgumentException
|
|
format:@"%s: 'action' is a constant.",
|
|
__PRETTY_FUNCTION__];
|
|
|
|
}
|
|
return self;
|
|
}
|
|
|
|
-(id) description
|
|
{
|
|
return [NSString stringWithFormat:@"<%s %p action: %@ actionClass: %@ directActionName: %@ href:%@ string:%@ queryDictionary: %@ otherQueryAssociations: %@ pageName: %@ fragmentIdentifier:%@ disabled:%@ secure:%@ >",
|
|
object_getClassName(self),
|
|
(void*)self, _action, _actionClass, _directActionName, _href,
|
|
_string,
|
|
_queryDictionary, _otherQueryAssociations, _pageName,
|
|
_fragmentIdentifier, _disabled, _secure];
|
|
};
|
|
|
|
// isDisabled in wo5
|
|
- (BOOL) isDisabledInContext:(GSWContext *) context
|
|
{
|
|
return ((_disabled != nil) && ([_disabled boolValueInComponent: GSWContext_component(context)]));
|
|
}
|
|
|
|
-(GSWElement*)invokeActionForRequest:(GSWRequest*) request
|
|
inContext:(GSWContext*) context
|
|
{
|
|
NSString * str = nil;
|
|
id obj = nil;
|
|
id value = nil;
|
|
GSWComponent * component = GSWContext_component(context);
|
|
|
|
if ([[context elementID] isEqual:[context senderID]]) {
|
|
if ((_disabled == nil) || (![_disabled boolValueInComponent:component])) {
|
|
if (_pageName != nil) {
|
|
value = [_pageName valueInComponent:component];
|
|
if (value != nil) {
|
|
str = value; //stringValue;
|
|
}
|
|
}
|
|
if (_action != nil) {
|
|
obj = [_action valueInComponent:component];
|
|
} else {
|
|
if (_pageName == nil) {
|
|
[NSException raise:NSInternalInconsistencyException
|
|
format:@"%s: Missing page name.", __PRETTY_FUNCTION__];
|
|
}
|
|
if (str != nil) {
|
|
obj = [GSWApp pageWithName:str inContext:context];
|
|
} else {
|
|
// CHECKME: log page name? dave@turbocat.de
|
|
[NSException raise:NSInternalInconsistencyException
|
|
format:@"%s: cannot find page.", __PRETTY_FUNCTION__];
|
|
|
|
}
|
|
}
|
|
} else {
|
|
//TODO GSWNoContentElement
|
|
obj = nil;
|
|
}
|
|
if (obj == nil) {
|
|
obj = [context page];
|
|
}
|
|
}
|
|
return obj;
|
|
}
|
|
|
|
-(void) _appendOpenTagToResponse:(GSWResponse *) response
|
|
inContext:(GSWContext*) context
|
|
{
|
|
if (! [self isDisabledInContext:context]) {
|
|
[super _appendOpenTagToResponse:response
|
|
inContext:context];
|
|
}
|
|
}
|
|
|
|
-(void) _appendCloseTagToResponse:(GSWResponse *) response
|
|
inContext:(GSWContext*) context
|
|
{
|
|
if (! [self isDisabledInContext:context]) {
|
|
[super _appendCloseTagToResponse:response
|
|
inContext:context];
|
|
}
|
|
}
|
|
|
|
-(void) _appendQueryStringToResponse:(GSWResponse*) response
|
|
inContext:(GSWContext*) context
|
|
{
|
|
NSString * str = nil;
|
|
|
|
GSOnceMLog(@"%s is deprecated, use _appendQueryStringToResponse: inContext: requestHandlerPath: htmlEscapeURL:", __PRETTY_FUNCTION__);
|
|
|
|
NSDictionary * queryDict = [self computeQueryDictionaryWithActionClassAssociation: _actionClass
|
|
directActionNameAssociation: _directActionName
|
|
queryDictionaryAssociation: _queryDictionary
|
|
otherQueryAssociations: _otherQueryAssociations
|
|
inContext: context];
|
|
|
|
if (queryDict != nil
|
|
&& [queryDict count] > 0)
|
|
{
|
|
str = [queryDict encodeAsCGIFormValues];
|
|
GSWResponse_appendContentCharacter(response,'?');
|
|
GSWResponse_appendContentHTMLAttributeValue(response, str);
|
|
}
|
|
}
|
|
|
|
-(void) _appendQueryStringToResponse:(GSWResponse*) response
|
|
inContext:(GSWContext*) context
|
|
requestHandlerPath: (NSString*) aRequestHandlerPath
|
|
htmlEscapeURL: (BOOL) htmlEscapeURL
|
|
{
|
|
NSString * str = nil;
|
|
NSString * path = (aRequestHandlerPath == nil ? @"" : aRequestHandlerPath);
|
|
|
|
NSDictionary * queryDict = [self computeQueryDictionaryWithRequestHandlerPath: path
|
|
queryDictionaryAssociation: _queryDictionary
|
|
otherQueryAssociations: _otherQueryAssociations
|
|
inContext: context];
|
|
|
|
if (queryDict != nil && [queryDict count] > 0)
|
|
{
|
|
str = [queryDict encodeAsCGIFormValuesEscapeAmpersand:htmlEscapeURL];
|
|
GSWResponse_appendContentCharacter(response,'?');
|
|
GSWResponse_appendContentHTMLAttributeValue(response, str);
|
|
}
|
|
}
|
|
|
|
|
|
-(void) _appendFragmentToResponse:(GSWResponse*) response
|
|
inContext:(GSWContext*) context
|
|
|
|
{
|
|
if (_fragmentIdentifier != nil) {
|
|
id obj = [_fragmentIdentifier valueInComponent:GSWContext_component(context)];
|
|
if (obj != nil) {
|
|
GSWResponse_appendContentCharacter(response,'#');
|
|
GSWResponse_appendContentString(response, obj); // [obj stringValue] ??
|
|
}
|
|
}
|
|
}
|
|
|
|
-(void)_appendCGIActionURLToResponse:(GSWResponse*) response
|
|
inContext:(GSWContext*) context
|
|
{
|
|
BOOL completeURLsOriginalState=NO;
|
|
GSWComponent * component = GSWContext_component(context);
|
|
BOOL securestuff = (_secure != nil ? [_secure boolValueInComponent:component] : NO);
|
|
|
|
NSString * actionStr = [self computeActionStringWithActionClassAssociation: _actionClass
|
|
directActionNameAssociation: _directActionName
|
|
inContext: context];
|
|
|
|
NSDictionary * queryDict = [self computeQueryDictionaryWithActionClassAssociation: _actionClass
|
|
directActionNameAssociation: _directActionName
|
|
queryDictionaryAssociation: _queryDictionary
|
|
otherQueryAssociations: _otherQueryAssociations
|
|
inContext: context];
|
|
NSString * urlString = nil;
|
|
|
|
if (securestuff)
|
|
completeURLsOriginalState=[context _generateCompleteURLs];
|
|
|
|
urlString = [context directActionURLForActionNamed: actionStr
|
|
queryDictionary: queryDict];
|
|
|
|
if (securestuff
|
|
&& !completeURLsOriginalState)
|
|
[context _generateRelativeURLs];
|
|
|
|
GSWResponse_appendContentString(response,urlString);
|
|
|
|
[self _appendFragmentToResponse: response
|
|
inContext:context];
|
|
}
|
|
|
|
-(void) appendAttributesToResponse:(GSWResponse *) response
|
|
inContext:(GSWContext*) context
|
|
{
|
|
[super appendAttributesToResponse: response
|
|
inContext: context];
|
|
|
|
if (_actionClass != nil || _directActionName != nil)
|
|
{
|
|
GSWResponse_appendContentCharacter(response,' ');
|
|
GSWResponse_appendContentAsciiString(response, href__Key);
|
|
GSWResponse_appendContentCharacter(response,'=');
|
|
GSWResponse_appendContentCharacter(response,'"');
|
|
|
|
[self _appendCGIActionURLToResponse:response
|
|
inContext:context];
|
|
|
|
GSWResponse_appendContentCharacter(response,'"');
|
|
}
|
|
else if (_action != nil || _pageName != nil)
|
|
{
|
|
GSWComponent * component = GSWContext_component(context);
|
|
BOOL securestuff = (_secure != nil ? [_secure boolValueInComponent:component] : NO);
|
|
BOOL completeURLsOriginalState=NO;
|
|
|
|
GSWResponse_appendContentCharacter(response,' ');
|
|
GSWResponse_appendContentAsciiString(response, href__Key);
|
|
GSWResponse_appendContentCharacter(response,'=');
|
|
GSWResponse_appendContentCharacter(response,'"');
|
|
|
|
if (securestuff)
|
|
completeURLsOriginalState=[context _generateCompleteURLs];
|
|
|
|
GSWResponse_appendContentString(response,
|
|
[context _componentActionURL]);
|
|
|
|
if (securestuff
|
|
&& !completeURLsOriginalState)
|
|
[context _generateRelativeURLs];
|
|
|
|
[self _appendQueryStringToResponse:response
|
|
inContext:context
|
|
requestHandlerPath:nil
|
|
htmlEscapeURL:YES];
|
|
|
|
[self _appendFragmentToResponse: response
|
|
inContext:context];
|
|
|
|
GSWResponse_appendContentCharacter(response,'"');
|
|
}
|
|
else if (_href != nil)
|
|
{
|
|
GSWComponent * component = GSWContext_component(context);
|
|
NSString* hrefValue = [_href valueInComponent:component];
|
|
|
|
if (hrefValue==nil)
|
|
hrefValue=@"";
|
|
else
|
|
hrefValue=NSStringWithObject(hrefValue);
|
|
|
|
GSWResponse_appendContentCharacter(response,' ');
|
|
GSWResponse_appendContentAsciiString(response,href__Key);
|
|
GSWResponse_appendContentCharacter(response,'=');
|
|
GSWResponse_appendContentCharacter(response,'"');
|
|
|
|
if ([hrefValue isRelativeURL] && ![hrefValue isFragmentURL])
|
|
{
|
|
NSString * url = [context _urlForResourceNamed:hrefValue
|
|
inFramework:nil];
|
|
if (url != nil)
|
|
GSWResponse_appendContentString(response,url);
|
|
else
|
|
{
|
|
GSWResponse_appendContentAsciiString(response,[component baseURL]);
|
|
GSWResponse_appendContentCharacter(response,'/');
|
|
GSWResponse_appendContentString(response,hrefValue);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
GSWResponse_appendContentString(response,hrefValue);
|
|
}
|
|
|
|
[self _appendQueryStringToResponse:response
|
|
inContext:context
|
|
requestHandlerPath:nil
|
|
htmlEscapeURL:YES];
|
|
|
|
[self _appendFragmentToResponse: response
|
|
inContext:context];
|
|
|
|
GSWResponse_appendContentCharacter(response,'"');
|
|
}
|
|
else if (_fragmentIdentifier != nil)
|
|
{
|
|
GSWComponent * component = GSWContext_component(context);
|
|
id fragmentIdentifierValue = [_fragmentIdentifier valueInComponent:component];
|
|
if (fragmentIdentifierValue != nil)
|
|
{
|
|
GSWResponse_appendContentCharacter(response,' ');
|
|
GSWResponse_appendContentAsciiString(response,href__Key);
|
|
GSWResponse_appendContentCharacter(response,'=');
|
|
GSWResponse_appendContentCharacter(response,'"');
|
|
|
|
[self _appendQueryStringToResponse:response
|
|
inContext:context
|
|
requestHandlerPath:nil
|
|
htmlEscapeURL:YES];
|
|
|
|
GSWResponse_appendContentCharacter(response,'#');
|
|
GSWResponse_appendContentString(response,NSStringWithObject(fragmentIdentifierValue));
|
|
GSWResponse_appendContentCharacter(response,'"');
|
|
}
|
|
}
|
|
}
|
|
|
|
-(void) appendContentStringToResponse:(GSWResponse *) response
|
|
inContext:(GSWContext*) context
|
|
{
|
|
if (_string != nil)
|
|
{
|
|
id stringValue = [_string valueInComponent:GSWContext_component(context)];
|
|
if (stringValue != nil)
|
|
GSWResponse_appendContentString(response,NSStringWithObject(stringValue));
|
|
}
|
|
}
|
|
|
|
-(void) appendChildrenToResponse:(GSWResponse *) response
|
|
inContext:(GSWContext*) context
|
|
{
|
|
[super appendChildrenToResponse:response
|
|
inContext:context];
|
|
|
|
[self appendContentStringToResponse:response
|
|
inContext:context];
|
|
}
|
|
|
|
|
|
@end
|