mirror of
https://github.com/gnustep/libs-gsweb.git
synced 2025-02-23 11:41:20 +00:00
* GSWeb.framework/GSWGNUmakefile: o removed NSObject+IVarAccess+PerformSel.* * GSWeb.framework/GSWConstants.m: o fix GSWHTTPHeader_Response_HeaderLineEnd: remove space at the begining o use RCS_ID * GSWeb.framework/Adaptors/common/GSWHTTPResponse.c: o fix status in GSWHTTPResponse_New() * GSWAdaptors/Apache/mod_gsweb.c: o fixes bad returned status o traces * GSWeb.framework/GSWTemplateParserANTLR.m: o removed logs o fixes for warnings o use RCS_ID * GSWeb.framework/GSWApplication.m: o use RCS_ID o added logs o new method to begin rewrite exception handling * GSWeb.framework/GSWRequest.m: o logs o fix in -_getFormValuesFromMultipartFormData to handle more than one value per name o use RCS_ID o -fix bad types in uriElementForKey: * GSWeb.framework/GSWConditional.m: o added asserts o use RCS_ID * GSWeb.framework/GSWHTMLStaticElement.m: o added asserts o clean warnings o use RCS_ID * GSWeb.framework/GSWComponentReference.m: o added asserts o use RCS_ID * GSWeb.framework/GSWActiveImage.m: o added asserts * GSWeb.framework/GSWComponentContent.m: o added asserts o use RCS_ID * GSWeb.framework/GSWForm.m: o added asserts o use RCS_ID * GSWeb.framework/GSWHTMLDynamicElement.m: o added asserts o use RCS_ID * GSWeb.framework/GSWHTMLURLValuedElement.m: o use RCS_ID o added asserts * GSWeb.framework/GSWRepetition.m: o added asserts o use RCS_ID * GSWeb.framework/GSWExtensions.framework/GNUmakefile: o added GSWPageRestorationErrorPage.gswc * GSWeb.framework/GSWFileUploadComponent.m: o use RCS_ID * GSWeb.framework/GSWImage.m: o Don't output nil height/width o fix: get component before using ! o use RCS_ID * GSWeb.framework/GSWElementIDString.m: o in -initWithCoder: retain _string o use RCS_ID * GSWeb.framework/GSWElementIDString.h: o cleaned * config.h.in: o define RCS_ID like in GDL2 * GSWeb.framework/GSWDirectActionRequestHandler.[hm]: o added +additionalRequestPathArrayFromRequest: o enable directAction with additional path components o use RCS_ID * GSWeb.framework/GSWDirectAction.[hm]: o added -additionalRequestPathArray o use RCS_ID * GSWeb.framework/GSWeb.h: o include GSCategories.h * GSWeb.framework/GSWDebug.m: o use RCS_ID * GSWeb.framework/GSWPageDefParserExt.m: o use RCS_ID * GSWeb.framework/GSWPageDefElement.m: o use RCS_ID * GSWeb.framework/GSWDeployedBundle.m: o use RCS_ID * GSWeb.framework/GSWProjectBundle.m: o use RCS_ID * GSWeb.framework/GSWStats.m: o use RCS_ID * GSWeb.framework/GSWBundle.m: o clean warnings o use RCS_ID * GSWeb.framework/GSWTemplateParser.m:: o clean warnings o use RCS_ID * GSWeb.framework/GSWTemplateParserXML.m: o clean warnings o use RCS_ID * GSWeb.framework/GSWComponent.m: o clean warnings o use RCS_ID * GSWeb.framework/GSWDisplayGroup.m: o clean warnings o fix -validateValue:forKey: call o use RCS_ID * GSWeb.framework/GSWHTMLParserExt.m: o use RCS_ID * GSWeb.framework/GSWAssociation.m: o clean warnings o use RCS_ID * GSWeb.framework/GSWResourceManager.m: o clean warnings o use RCS_ID * GSWeb.framework/GSWSession.m: o clean warnings o use RCS_ID * GSWeb.framework/GSWMultiKeyDictionary.m: o use RCS_ID * GSWeb.framework/GSWResponse.m: o clean warnings o use RCS_ID * GSWeb.framework/GSWStatisticsStore.m: o clean warnings * GSWeb.framework/GSWAdaptor.m: o use RCS_ID * GSWeb.framework/GSWGeometricRegion.[hm]: o types change o use RCS_ID * GSWeb.framework/GSWActiveImage.m: o clean warnings o use RCS_ID * GSWeb.framework/GSWBody.m: o use RCS_ID * GSWeb.framework/GSWTextField.m: o use RCS_ID * GSWeb.framework/GSWSubmitButton.m: o clean warnings o use RCS_ID * GSWeb.framework/GSWHTMLBareString.m: o use RCS_ID * GSWeb.framework/GSWHTMLComment.m: o use RCS_ID * GSWeb.framework/GSWApplet.m: o use RCS_ID * GSWeb.framework/GSWBrowser.m: o use RCS_ID * GSWeb.framework/GSWCheckBoxList.m: o use RCS_ID * GSWeb.framework/GSWEmbeddedObject.m: o use RCS_ID * GSWeb.framework/GSWFrame.m: o use RCS_ID * GSWeb.framework/GSWGenericContainer.m: o use RCS_ID * GSWeb.framework/GSWGenericElement.m: o use RCS_ID * GSWeb.framework/GSWHyperlink.m: o use RCS_ID o clean warnings * GSWeb.framework/GSWImageButton.m: o use RCS_ID o clean warnings * GSWeb.framework/GSWJavaScript.m: o use RCS_ID * GSWeb.framework/GSWNestedList.m: o use RCS_ID * GSWeb.framework/GSWParam.m: o use RCS_ID * GSWeb.framework/GSWPasswordField.m: o use RCS_ID * GSWeb.framework/GSWPopUpButton.m: o use RCS_ID * GSWeb.framework/GSWRadioButtonList.m: o use RCS_ID * GSWeb.framework/GSWResetButton.m: o use RCS_ID * GSWeb.framework/GSWSwitchComponent.m: o use RCS_ID * GSWeb.framework/GSWVBScript.m: o use RCS_ID * GSWeb.framework/GSWString.m: o use RCS_ID * GSWeb.framework/GSWText.m: o use RCS_ID * GSWeb.framework/GSWCookie.m: o use RCS_ID * GSWeb.framework/GSWRequestHandler.m: o use RCS_ID * GSWeb.framework/GSWMailDelivery.m: o use RCS_ID * GSWeb.framework/GSWComponentRequestHandler.m: o use RCS_ID o clean warnings * GSWeb.framework/GSWKeyValueAssociation.m: o use RCS_ID * GSWeb.framework/GSWHTMLStaticGroup.m: o use RCS_ID * GSWeb.framework/GSWConstantValueAssociation.m: o use RCS_ID * GSWeb.framework/GSWDynamicURLString.m: o use RCS_ID * GSWeb.framework/GSWBindingNameAssociation.m: o use RCS_ID * GSWeb.framework/GSWBindingNameAssociation.[hm] o clean warnings o use RCS_ID * GSWeb.framework/GSWURLValuedElementData.m: o clean warnings o use RCS_ID * GSWeb.framework/GSWToggle.m: o use RCS_ID * GSWeb.framework/GSWFileUpload.m: o use RCS_ID * GSWeb.framework/GSWResourceURL.m: o use RCS_ID * GSWeb.framework/GSWProcFS.m: o use RCS_ID * GSWeb.framework/GSWActionURL.m: o use RCS_ID * GSWeb.framework/GSWContext.m: o use RCS_ID * GSWeb.framework/GSWDefaultAdaptorThread.m: o use RCS_ID * GSWeb.framework/GSWDynamicElement.m: o use RCS_ID * GSWeb.framework/GSWeb.m: o use RCS_ID * GSWeb.framework/GSWElement.m: o use RCS_ID * GSWeb.framework/GSWResourceRequestHandler.m: o use RCS_ID * GSWeb.framework/GSWServerSessionStore.m: o use RCS_ID * GSWeb.framework/GSWSessionStore.m: o use RCS_ID * GSWeb.framework/GSWSessionTimeOut.m: o use RCS_ID * GSWeb.framework/GSWSessionTimeOutManager.m: o use RCS_ID * GSWeb.framework/GSWTransactionRecord.m: o use RCS_ID * GSWeb.framework/GSWUtils.m: o use RCS_ID * GSWeb.framework/GSWWOCompatibility.m: o use RCS_ID * GSWeb.framework/NSString+HTML.m: o use RCS_ID * GSWeb.framework/NSString+Trimming.m: o use RCS_ID git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/gsweb/trunk@16216 72102866-910b-0410-8b05-ffd578937521
303 lines
11 KiB
Objective-C
303 lines
11 KiB
Objective-C
/** GSWTextField.m - <title>GSWeb: Class GSWTextField</title>
|
|
|
|
Copyright (C) 1999-2003 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>
|
|
**/
|
|
|
|
#include "config.h"
|
|
|
|
RCS_ID("$Id$")
|
|
|
|
#include "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
|