libs-gsweb/GSWeb/GSWActiveImage.m
Sebastian Reitenbach d4cc39b551 * nearly every file
get rid of RCS_ID

as shortly discussed with David and Manuel



git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/gsweb/trunk@37929 72102866-910b-0410-8b05-ffd578937521
2014-05-30 18:28:04 +00:00

683 lines
22 KiB
Objective-C

/** GSWActiveImage.m - <title>GSWeb: Class GSWActiveImage</title>
Copyright (C) 1999-2004 Free Software Foundation, Inc.
Written by: Manuel Guesdon <mguesdon@orange-concept.com>
Date: Jan 1999
$Revision$
$Date$
<abstract></abstract>
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"
#include "GSWeb.h"
#include "GSWPrivate.h"
static NSString * static_sessionIDKey = nil;
static NSString * static_tempQueryKey = nil;
static GSWAssociation * static_defaultBorderAssociation = nil;
@implementation GSWActiveImage
//--------------------------------------------------------------------
+ (void) initialize
{
if (self == [GSWActiveImage class])
{
if (!static_sessionIDKey)
{
ASSIGN(static_sessionIDKey,([GSWApp sessionIdKey]));
ASSIGN(static_tempQueryKey,([@"?" stringByAppendingString:static_sessionIDKey]));
ASSIGN(static_defaultBorderAssociation,([GSWAssociation associationWithValue:@"0"]));
}
}
}
//--------------------------------------------------------------------
-(id)initWithName:(NSString*)aName
associations:(NSDictionary*)associations
template:(GSWElement*)template
{
NSMutableDictionary * tempQueryAssociations = [NSMutableDictionary dictionary];
GSWAssociation * tempAssociation = nil;
if ((self = [super initWithName:@"input"
associations:associations
template: nil]))
{
tempAssociation = [_associations objectForKey:static_tempQueryKey];
if (tempAssociation != nil)
{
[tempQueryAssociations setObject:tempAssociation
forKey:static_sessionIDKey];
[_associations removeObjectForKey: static_tempQueryKey];
}
if ([static_sessionIDKey isEqualToString:GSWKey_SessionID[GSWebNamingConv]] == NO)
{
tempAssociation = [_associations objectForKey:GSWKey_QuestionMarkSessionID[GSWebNamingConv]];
if (tempAssociation != nil)
{
[tempQueryAssociations setObject:tempAssociation
forKey:GSWKey_SessionID[GSWebNamingConv]];
[_associations removeObjectForKey:GSWKey_QuestionMarkSessionID[GSWebNamingConv]];
}
}
if ([tempQueryAssociations count] > 0)
{
_sessionIDQueryAssociations = [tempQueryAssociations retain];
}
else
{
DESTROY(_sessionIDQueryAssociations);
}
GSWAssignAndRemoveAssociation(&_file,_associations,imageMapFileName__Key);
if (!WOStrictFlag)
{
GSWAssignAndRemoveAssociation(&_imageMapString,_associations,imageMapString__Key);
GSWAssignAndRemoveAssociation(&_imageMapRegions,_associations,imageMapRegions__Key);
};
GSWAssignAndRemoveAssociation(&_action,_associations,action__Key);
GSWAssignAndRemoveAssociation(&_href,_associations,href__Key);
GSWAssignAndRemoveAssociation(&_src,_associations,src__Key);
GSWAssignAndRemoveAssociation(&_xAssoc,_associations,x__Key);
GSWAssignAndRemoveAssociation(&_yAssoc,_associations,y__Key);
GSWAssignAndRemoveAssociation(&_target,_associations,target__Key);
GSWAssignAndRemoveAssociation(&_filename,_associations,filename__Key);
GSWAssignAndRemoveAssociation(&_framework,_associations,framework__Key);
GSWAssignAndRemoveAssociation(&_data,_associations,data__Key);
GSWAssignAndRemoveAssociation(&_mimeType,_associations,mimeType__Key);
GSWAssignAndRemoveAssociation(&_key,_associations,key__Key);
GSWAssignAndRemoveAssociation(&_border,_associations,border__Key);
if (_border==nil)
ASSIGN(_border,static_defaultBorderAssociation);
if (_file != nil
&& _imageMapString != nil
&& _imageMapRegions != nil)
{
[NSException raise:NSInvalidArgumentException
format:@"%s: you can't specify %@, %@ and %@",
__PRETTY_FUNCTION__,
imageMapFileName__Key,
imageMapString__Key,
imageMapRegions__Key];
};
if (_action != nil)
{
if (_actionClass != nil
|| _directActionName != nil
|| _href != nil)
{
[NSException raise:NSInvalidArgumentException
format:@"%s: If 'action' is specified, 'directActionName', 'actionClass', and 'href' must be nil.",
__PRETTY_FUNCTION__];
}
if ([_action isValueConstant])
{
[NSException raise:NSInvalidArgumentException
format:@"%s: 'action' must not be a constant.",
__PRETTY_FUNCTION__];
}
}
else if (_href != nil)
{
if (_actionClass != nil
|| _directActionName != nil)
{
[NSException raise:NSInvalidArgumentException
format:@"%s: If 'directActionName' or 'actionClass' is specified, 'action' and 'href' must be nil.",
__PRETTY_FUNCTION__];
}
}
else if (_actionClass == nil
&& _directActionName == nil)
{
[NSException raise:NSInvalidArgumentException
format:@"%s: Either a component action or a direct action or 'href' must be specified.",
__PRETTY_FUNCTION__];
}
if (_filename != nil)
{
if (_src != nil
|| _data != nil
|| _value != nil)
{
[NSException raise:NSInvalidArgumentException
format:@"%s: If 'filename' is specified, 'src', 'data', and 'value' must be nil.",
__PRETTY_FUNCTION__];
}
}
else
{
if (_framework != nil)
{
[NSException raise:NSInvalidArgumentException
format:@"%s: 'framework' should not be specified if 'filename' is nil.",
__PRETTY_FUNCTION__];
}
if (_data != nil)
{
if (_mimeType == nil)
{
[NSException raise:NSInvalidArgumentException
format:@"%s: 'mimeType' must be specified if 'data' is specified.",
__PRETTY_FUNCTION__];
}
if (_src != nil
|| _value != nil)
{
[NSException raise:NSInvalidArgumentException
format:@"%s: If 'data' is specified, 'src', 'filename', and 'value' must be nil.",
__PRETTY_FUNCTION__];
}
}
else if (_value != nil)
{
if ([_value isValueConstant])
{
[NSException raise:NSInvalidArgumentException
format:@"%s: 'value' must not be constant.",
__PRETTY_FUNCTION__];
}
if (_src != nil)
{
[NSException raise:NSInvalidArgumentException
format:@"%s: If 'value' is specified, 'data', 'filename', and 'src' must be nil.",
__PRETTY_FUNCTION__];
}
}
else if (_src == nil)
{
[NSException raise:NSInvalidArgumentException
format:@"%s: One of 'filename', 'src', 'data', or 'value' must be specified.",
__PRETTY_FUNCTION__];
}
}
if (_xAssoc != nil
&& _yAssoc != nil)
{
if (![_xAssoc isValueSettable]
|| ![_yAssoc isValueSettable])
{
[NSException raise:NSInvalidArgumentException
format:@"%s: 'x' and 'y' can not be constants.",
__PRETTY_FUNCTION__];
}
}
else if (_xAssoc != nil
|| _yAssoc != nil)
{
[NSException raise:NSInvalidArgumentException
format:@"%s: 'x' and 'y' must both be specified or both be nil.",
__PRETTY_FUNCTION__];
}
}
return self;
};
//--------------------------------------------------------------------
-(void)dealloc
{
DESTROY(_imageMapString);
DESTROY(_imageMapRegions);
DESTROY(_file);
DESTROY(_action);
DESTROY(_href);
DESTROY(_src);
DESTROY(_xAssoc);
DESTROY(_yAssoc);
DESTROY(_target);
DESTROY(_filename);
DESTROY(_framework);
DESTROY(_data);
DESTROY(_mimeType);
DESTROY(_key);
DESTROY(_width);
DESTROY(_height);
// DESTROY(_secure);
DESTROY(_actionClass);
DESTROY(_directActionName);
DESTROY(_sessionIDQueryAssociations);
DESTROY(_border);
[super dealloc];
}
//--------------------------------------------------------------------
-(NSString*)elementName
{
return nil;//@"ELEMENTCHOSENBYCONTEXT";
};
//--------------------------------------------------------------------
-(NSString*)description
{
return [NSString stringWithFormat:@"<%s %p>",
object_getClassName(self),
(void*)self];
};
//--------------------------------------------------------------------
-(GSWAssociation*)hitTestX:(int)x
y:(int)y
inRegions:(NSArray*)regions
{
GSWAssociation* assoc=nil;
GSWGeometricRegion* region=[GSWGeometricRegion hitTestX:x
y:y
inRegions:regions];
if (region)
assoc=[GSWAssociation associationWithKeyPath:[region userDefinedString]];
else
assoc=_action;
return assoc;
};
//--------------------------------------------------------------------
-(void)takeValuesFromRequest:(GSWRequest*)request
inContext:(GSWContext*)aContext
{
//Does nothing
}
//--------------------------------------------------------------------
-(id <GSWActionResults>)invokeActionForRequest:(GSWRequest*)request
inContext:(GSWContext*)aContext
{
NSObject <GSWActionResults> * results = nil;
GSWComponent* component=GSWContext_component(aContext);
NSString* senderID=nil;
NSString* elementID=nil;
BOOL disabledInContext=NO;
BOOL isInForm=NO;
BOOL XYValues=NO;
BOOL thisOne=NO;
NSInteger x=0;
NSInteger y=0;
GSWContext_appendZeroElementIDComponent(aContext);
senderID=GSWContext_senderID(aContext);
elementID=GSWContext_elementID(aContext);
if ([elementID isEqualToString:senderID])
{
//TODO
};
GSWContext_deleteLastElementIDComponent(aContext);
disabledInContext=[self disabledInComponent:component];
if (!disabledInContext)
{
isInForm=[aContext isInForm];
if (isInForm)
{
BOOL wasFormSubmitted=[aContext _wasFormSubmitted];
if (wasFormSubmitted)
{
NSString* nameInContext=[self nameInContext:aContext];
NSString* formValueX=[request formValueForKey:[nameInContext stringByAppendingString:@".x"]];
NSString* formValueY=[request formValueForKey:[nameInContext stringByAppendingString:@".y"]];
if (formValueX && formValueY)
{
x=[formValueX intValue];
y=[formValueY intValue];
XYValues=YES;
thisOne=YES;
}
else
{
//TODO
};
};
}
else
{
elementID=GSWContext_elementID(aContext);
if ([elementID isEqualToString:senderID])
{
id param=[request formValueForKey:GSWKey_IsmapCoords[GSWebNamingConv]];
if (param)
{
if ([param ismapCoordx:&x
y:&y])
XYValues=YES;
else
{
//TODO
};
};
thisOne=YES;
};
};
if (thisOne)
{
GSWAssociation* actionAssociation=nil;
NSArray* regions=nil;
if (_file)
{
id imageMapFileNameValue=[_file valueInComponent:component];
NSString* imageMapFilePath;
GSWResourceManager* resourceManager=[[GSWApplication application]resourceManager];
NSArray* languages=[aContext languages];
imageMapFilePath=[resourceManager pathForResourceNamed:imageMapFileNameValue
inFramework:nil
languages:languages];
if (imageMapFilePath)
regions=[GSWGeometricRegion geometricRegionsWithFile:imageMapFilePath];
else
{
//NSDebugMLLog0(@"gswdync",@"GSWActiveImage No image Map.");
};
}
else if (!WOStrictFlag && _imageMapString)
{
id imageMapValue=[_imageMapString valueInComponent:component];
regions=[GSWGeometricRegion geometricRegionsWithString:imageMapValue];
}
else if (!WOStrictFlag && _imageMapRegions)
{
regions=[_imageMapRegions valueInComponent:component];
};
if (_xAssoc)
[_xAssoc setValue:GSWIntNumber(x)
inComponent:component];
if (_yAssoc)
[_yAssoc setValue:GSWIntNumber(y)
inComponent:component];
actionAssociation=[self hitTestX:x
y:y
inRegions:regions];
if (actionAssociation)
{
[aContext _setActionInvoked:YES];
results = (NSObject <GSWActionResults> *) [actionAssociation valueInComponent:component];
NSAssert4(!results || [results isKindOfClass:[GSWElement class]],
@"actionAssociation=%@, component=%@ Element is a %@ not a GSWElement: %@",
actionAssociation,
component,
[results class],
results);
}
else
{
if (_href)
{
[aContext _setActionInvoked:YES];
//TODO redirect to href
}
else if (_action)
{
[aContext _setActionInvoked:YES];
results = (NSObject <GSWActionResults> *)[_action valueInComponent:component];
NSAssert4(!results || [results isKindOfClass:[GSWElement class]],
@"_action=%@, component=%@ Element is a %@ not a GSWElement: %@",
_action,
component,
[results class],
results);
}
else
{
//NSDebugMLLog0(@"gswdync",@"GSWActiveImage Couldn't trigger action.");
};
};
if (!results)
{
results=[aContext page];
NSAssert2(!results || [results isKindOfClass:[GSWElement class]],
@"Element is a %@ not a GSWElement: %@",
[results class],
results);
};
}
else
{
results = (NSObject <GSWActionResults> *) [super invokeActionForRequest:request
inContext:aContext];
NSAssert2(!results || [results isKindOfClass:[GSWElement class]],
@"Element is a %@ not a GSWElement: %@",
[results class],
results);
}
}
else
{
results = (NSObject <GSWActionResults> *) [super invokeActionForRequest:request
inContext:aContext];
NSAssert2(!results || [results isKindOfClass:[GSWElement class]],
@"Element is a %@ not a GSWElement: %@",
[results class],
results);
};
return results;
};
//--------------------------------------------------------------------
-(void)appendAttributesToResponse:(GSWResponse*) response
inContext:(GSWContext*) context
{
NSString * srcValue = nil;
id borderValue = nil;
GSWComponent * component = GSWContext_component(context);
borderValue=[_border valueInComponent:component];
if (borderValue != nil)
GSWResponse_appendTagAttributeValueEscapingHTMLAttributeValue(response, @"border", NSStringWithObject(borderValue), NO);
[self appendURLAttributesToResponse:response
inContext:context];
if (![self disabledInComponent:component])
{
if ([context isInForm])
GSWResponse_appendContentAsciiString(response, @" type=image");
else
{
GSWResponse_appendContentAsciiString(response,@" ismap");
}
}
if (_src != nil)
srcValue = [_src valueInComponent:component];
if (_filename == nil)
{
[GSWImage _appendImageSizetoResponse: response
inContext: context
width: _width
height: _height];
}
if (_filename != nil)
{
[GSWImage _appendFilenameToResponse: response
inContext: context
framework: _framework
filename: _filename
width: _width
height: _height];
}
else if (_value != nil)
{
BOOL secure = (_secure != nil ? [_secure boolValueInComponent:component] : NO);
GSWContext_appendZeroElementIDComponent(context);
GSWResponse_appendTagAttributeValueEscapingHTMLAttributeValue(response,
@"src",
[context _componentActionURLIsSecure:secure],
NO);
GSWContext_deleteLastElementIDComponent(context);
}
else if (srcValue != nil)
{
if ([srcValue isRelativeURL]
&& ![srcValue isFragmentURL])
{
NSString * url = [context _urlForResourceNamed: srcValue
inFramework: nil];
if (url != nil)
GSWResponse_appendTagAttributeValueEscapingHTMLAttributeValue(response, @"src", url, NO);
else
{
GSWResponse_appendContentAsciiString(response, @" src=\"");
GSWResponse_appendContentAsciiString(response, [component baseURL]);
GSWResponse_appendContentCharacter(response,'/');
GSWResponse_appendContentString(response, srcValue);
GSWResponse_appendContentCharacter(response, '"');
}
}
else
{
GSWResponse_appendTagAttributeValueEscapingHTMLAttributeValue(response, @"src", srcValue, NO);
}
}
else if (_data != nil && _mimeType != nil)
{
[GSWURLValuedElementData _appendDataURLAttributeToResponse: response
inContext: context
key: _key
data: _data
mimeType: _mimeType
urlAttributeName: @"src"
inComponent: component];
}
else
{
NSLog(@"%s: 'src' or 'data' or 'name' attribute evaluated to nil.", __PRETTY_FUNCTION__);
}
}
//--------------------------------------------------------------------
-(void)appendToResponse:(GSWResponse*)response
inContext:(GSWContext*)context
{
GSWComponent * component = GSWContext_component(context);
BOOL isInForm = NO;
if ([self disabledInComponent:component])
{
GSWResponse_appendContentAsciiString(response, @"<img");
}
else
{
isInForm = [context isInForm];
if (isInForm)
GSWResponse_appendContentAsciiString(response, @"<input");
else
{
GSWResponse_appendContentAsciiString(response, @"<a");
if (_file == nil
&& (_actionClass != nil
|| _directActionName != nil))
{
[self _appendCGIActionURLToResponse: response
inContext: context];
}
else
{
BOOL secure = (_secure != nil ? [_secure boolValueInComponent:component] : NO);
GSWResponse_appendTagAttributeValueEscapingHTMLAttributeValue(response, @"href",
[context _componentActionURLIsSecure:secure],
NO);
}
[self appendConstantAttributesToResponse:response
inContext:context];
[super _appendNameAttributeToResponse:response
inContext:context];
[self appendNonURLAttributesToResponse:response
inContext:context];
if (_target != nil)
{
NSString* targetValue = NSStringWithObject([_target valueInComponent:component]);
if (targetValue != nil)
GSWResponse_appendTagAttributeValueEscapingHTMLAttributeValue(response, @"target", targetValue, YES);
}
GSWResponse_appendContentAsciiString(response, @"><img");
[self appendAttributesToResponse:response
inContext:context];
GSWResponse_appendContentAsciiString(response, @"></a>");
return;
}
}
[self appendConstantAttributesToResponse:response
inContext:context];
[super _appendNameAttributeToResponse:response
inContext:context];
[self appendNonURLAttributesToResponse:response
inContext:context];
[self appendAttributesToResponse:response
inContext:context];
GSWResponse_appendContentCharacter(response,'>');
}
//--------------------------------------------------------------------
-(void) _appendCGIActionURLToResponse:(GSWResponse*) response
inContext:(GSWContext*) context
{
NSDictionary* queryDictionary = nil;
NSString * actionStr = [self computeActionStringWithActionClassAssociation: _actionClass
directActionNameAssociation: _directActionName
inContext: context];
queryDictionary = [self computeQueryDictionaryWithRequestHandlerPath: actionStr
queryDictionaryAssociation: nil
otherQueryAssociations: _sessionIDQueryAssociations
inContext: context];
GSWResponse_appendTagAttributeValueEscapingHTMLAttributeValue(response,
@"href",
[context _directActionURLForActionNamed:actionStr
queryDictionary:queryDictionary
isSecure:[self secureInContext:context]
port:0
escapeQueryDictionary:YES], NO);
}
@end