libs-gsweb/GSWeb.framework/GSWTextField.m
Manuel Guesdon 6549dee6e7 2002-11-18 Manuel Guesdon <mguesdon@orange-concept.com>
I've rewritten AutoValue handling in GSWBrowser,GSWCheckBoxList,
		GSWRadioButtonList, GSWPopUpButton to make it coherent
		and working like specifications.

	* GSWeb/GSWSwitchComponent.m:
		o add more information when componentName is null
	* GSWRepetition.h/.m:
		o added startIndex, stopIndex
	* GSWeb/GSWConstants.h/.m:
		o added startIndex__Key,stopIndex__Key
	* GSWeb/GSWComponent.h/.m:
		o replace _isSynchronized by _isParentToComponentSynchronized and
			_isComponentToParentSynchronized;
		o added -synchronizesParentToComponentVariablesWithBindings and
		        -synchronizesComponentToParentVariablesWithBindings
	* GSWeb/GSWApplication.m:
		o doc/comments
		o Exception when no session class found
	* GSWeb/GSWComponentDefinition.m
		o doc/comments
	* GSWeb/GSWComponentRequestHandler.m
		o doc/comments
		o response message changed when request handling failed
	* GSWeb/GSWMailDelivery.m
		o implemented composeEmail...component: methods
		o change mail sending code
	* GSWeb/GSWContext.h/.m:
		o replace ASSIGNCOPY by ASSIGN in -copy for _awakePageComponents);
	* GSWeb/GSWHyperlink.m:
		o replaced otherAssociations by otherQueryAssociations in -computeQueryDictionaryInContext
		o hanldle queryDictionary association
		o GSWPopUpButton.m:
	* GSWExtensionsGSW.framework/GSWValidationFailureComponent.gswc/GSWValidationFailureComponent.html:
		o replaced <br> by <br/>
	* GSWeb/GSWInput.h
		o removed autoValue variable  (static var may cause multithread problems and there were different autoValue implementation).
		o remove name key to avoid duplicate name in html produced code
		o some rewrite for auto value
		o doc/comments
	* GSWeb/GSWPopUpButton.h/.m:
		o use super appendToResponse:inContext: (no more name problem)
		o rewriten auto value handling (see Testing/DynamicElements for test)
		o doc/comments
	* GSWeb/GSWBrowser.h/.m:
		o use super appendToResponse:inContext: (no more name problem)
		o rewriten auto value handling (see Testing/DynamicElements for test)
		o doc/comments
	* GSWeb/GSWCheckBoxList.h/.m:
		o rewriten auto value handling (see Testing/DynamicElements for test)
		o handling disabled binding
		o doc/comments
	* GSWeb/GSWRadioButtonList.h/.m:
		o rewriten auto value handling (see Testing/DynamicElements for test)
		o handling disabled binding
		o doc/comments
	* GSWeb/GSWTextField.h/.m:
		o output value in appendValueToResponse:inContext: instead of
			appendGSWebObjectsAssociationsToResponse:inContext:
	* GSWExtensions.framework/GSWLongResponsePage.h/.m
		o added


git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/gsweb/trunk@15008 72102866-910b-0410-8b05-ffd578937521
2002-11-18 11:14:55 +00:00

301 lines
11 KiB
Objective-C

/** GSWTextField.m - <title>GSWeb: Class GSWTextField</title>
Copyright (C) 1999-2002 Free Software Foundation, Inc.
Written by: Manuel Guesdon <mguesdon@orange-concept.com>
Date: Jan 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>
**/
static char rcsId[] = "$Id$";
#include <GSWeb/GSWeb.h>
//====================================================================
@implementation GSWTextField
//--------------------------------------------------------------------
-(id)initWithName:(NSString*)aName
associations:(NSDictionary*)associations
contentElements:(NSArray*)elements
{
NSMutableDictionary* tmpAssociations=[NSMutableDictionary dictionaryWithDictionary:associations];
LOGObjectFnStartC("GSWTextField");
NSDebugMLLog(@"gswdync",@"aName=%@ associations:%@ elements=%@",aName,associations,elements);
[tmpAssociations setObject:[GSWAssociation associationWithValue:@"text"]
forKey:@"type"];
[tmpAssociations removeObjectForKey:dateFormat__Key];
[tmpAssociations removeObjectForKey:numberFormat__Key];
[tmpAssociations removeObjectForKey:useDecimalNumber__Key];
[tmpAssociations removeObjectForKey:formatter__Key];
if ((self=[super initWithName:aName
associations:tmpAssociations
contentElements:nil])) //No Childs!
{
_dateFormat = [[associations objectForKey:dateFormat__Key
withDefaultObject:[_dateFormat autorelease]] retain];
NSDebugMLLog(@"gswdync",@"GSWTextField: dateFormat=%@",_dateFormat);
_numberFormat = [[associations objectForKey:numberFormat__Key
withDefaultObject:[_numberFormat autorelease]] retain];
NSDebugMLLog(@"gswdync",@"GSWTextField: numberFormat=%@",_numberFormat);
_useDecimalNumber = [[associations objectForKey:useDecimalNumber__Key
withDefaultObject:[_useDecimalNumber autorelease]] retain];
NSDebugMLLog(@"gswdync",@"GSWTextField: useDecimalNumber=%@",_useDecimalNumber);
_formatter = [[associations objectForKey:formatter__Key
withDefaultObject:[_formatter autorelease]] retain];
NSDebugMLLog(@"gswdync",@"GSWTextField: formatter=%@",_formatter);
};
LOGObjectFnStopC("GSWTextField");
return self;
};
//--------------------------------------------------------------------
-(void)dealloc
{
DESTROY(_dateFormat);
DESTROY(_numberFormat);
DESTROY(_useDecimalNumber);
DESTROY(_formatter);
[super dealloc];
};
//--------------------------------------------------------------------
-(void)takeValuesFromRequest:(GSWRequest*)request
inContext:(GSWContext*)context
{
//OK
BOOL disabledValue=NO;
LOGObjectFnStartC("GSWTextField");
GSWStartElement(context);
GSWAssertCorrectElementID(context);
disabledValue=[self disabledInContext:context];
if (!disabledValue)
{
BOOL wasFormSubmitted=[context _wasFormSubmitted];
if (wasFormSubmitted)
{
GSWComponent* component=[context component];
NSString* nameInContext=[self nameInContext:context];
NSString* value=[request formValueForKey:nameInContext];
id resultValue=nil;
NSDebugMLLog(@"gswdync",@"nameInContext=%@",nameInContext);
NSDebugMLLog(@"gswdync",@"value=%@",value);
if (value)
{
NSFormatter* formatter=[self formatterForComponent:component];
NSDebugMLLog(@"gswdync",@"formatter=%@",formatter);
if (formatter)
{
NSString* errorDscr=nil;
if ([formatter getObjectValue:&resultValue
forString:value
errorDescription:&errorDscr])
{
if (value && !resultValue)
{
NSWarnLog(@"There's a value (%@ of class %@) but no formattedValue with formater %@",
value,
[value class],
formatter);
};
}
else
{
NSException* exception=nil;
NSString* valueKeyPath=[_value keyPath];
LOGException(@"EOValidationException resultValue=%@ valueKeyPath=%@",
resultValue,valueKeyPath);
exception=[NSException exceptionWithName:@"EOValidationException"
reason:errorDscr /*_exceptionDscr*/
userInfo:[NSDictionary
dictionaryWithObjectsAndKeys:
(resultValue ? resultValue : @"nil"),@"EOValidatedObjectUserInfoKey",
valueKeyPath,@"EOValidatedPropertyUserInfoKey",
nil,nil]];
[component validationFailedWithException:exception
value:resultValue
keyPath:valueKeyPath];
};
}
else
resultValue=value;
};
NSDebugMLLog(@"gswdync",@"resultValue=%@",resultValue);
// Turbocat
if (NO)//([self _isFormattedValueInComponent:component
// equalToFormattedValue:value])
{
// does nothing, old formatted values are equal
}
else
{
NS_DURING
{
[_value setValue:resultValue
inComponent:component];
}
NS_HANDLER
{
LOGException(@"GSWTextField _value=%@ resultValue=%@ exception=%@",
_value,resultValue,localException);
if (WOStrictFlag)
{
[localException raise];
}
else
{
[self handleValidationException:localException
inContext:context];
};
}
NS_ENDHANDLER;
};
};
};
GSWStopElement(context);
LOGObjectFnStopC("GSWTextField");
};
//--------------------------------------------------------------------
-(void)appendGSWebObjectsAssociationsToResponse:(GSWResponse*)response
inContext:(GSWContext*)context
{
//OK
LOGObjectFnStartC("GSWTextField");
//Does nothing special
[super appendGSWebObjectsAssociationsToResponse:response
inContext:context];
LOGObjectFnStopC("GSWTextField");
};
//--------------------------------------------------------------------
-(void)appendValueToResponse:(GSWResponse*)response
inContext:(GSWContext*)context
{
id valueValue=nil;
id formattedValue=nil;
NSFormatter* formatter=nil;
GSWComponent* component=nil;
LOGObjectFnStartC("GSWTextField");
component=[context component];
valueValue=[_value valueInComponent:component];
formatter=[self formatterForComponent:component];
if (!formatter)
{
NSDebugMLog0(@"No Formatter");
formattedValue=valueValue;
}
else
{
formattedValue=[formatter stringForObjectValue:valueValue];
};
[response appendContentCharacter:' '];
[response _appendContentAsciiString:@"value"];
[response appendContentCharacter:'='];
[response appendContentCharacter:'"'];
[response appendContentHTMLAttributeValue:formattedValue];
[response appendContentCharacter:'"'];
LOGObjectFnStopC("GSWTextField");
};
//--------------------------------------------------------------------
-(NSFormatter*)formatterForComponent:(GSWComponent*)component
{
//OK
id formatValue = nil;
id formatter = nil;
LOGObjectFnStartC("GSWTextField");
if (_dateFormat)
{
NSDebugMLog0(@"DateFormat");
formatValue=[_dateFormat valueInComponent:component];
if (formatValue)
formatter=[[[NSDateFormatter alloc]initWithDateFormat:formatValue
allowNaturalLanguage:YES]autorelease];
}
else if (_numberFormat)
{
NSDebugMLog0(@"NumberFormat");
formatValue=[_numberFormat valueInComponent:component];
if (formatValue)
{
//TODO
/*
formatter=[[NSNumberFormatter new]autorelease];
[formatter setFormat:formatValue];
*/
};
}
else
{
NSDebugMLog0(@"Formatter");
formatter=[_formatter valueInComponent:component];
};
LOGObjectFnStopC("GSWTextField");
return formatter;
};
@end
//====================================================================
@implementation GSWTextField (TurbocatAdditions)
//--------------------------------------------------------------------
- (BOOL)_isFormattedValueInComponent:(GSWComponent *)component
equalToFormattedValue:(NSString *)newFormattedValue
{
BOOL isFormattedValue=NO;
if (newFormattedValue)
{
id valueValue=nil;
id formattedValue=nil;
NSFormatter* formatter=nil;
// get own value
valueValue=[_value valueInComponent:component];
formatter=[self formatterForComponent:component];
if (!formatter)
formattedValue=valueValue;
else
{
formattedValue=[formatter stringForObjectValue:valueValue];
if (valueValue && !formattedValue)
{
NSWarnLog(@"There's a value (%@ of class %@) but no formattedValue with formater %@",
valueValue,
[valueValue class],
formatter);
};
};
if (formattedValue && [newFormattedValue isEqualToString:formattedValue])
{
NSLog(@"### GSWTextField : are EQUAL ###");
isFormattedValue=YES;
}
};
return isFormattedValue;
}
@end