libs-gsweb/GSWeb.framework/GSWRadioButtonList.m
Mirko Viviani d5c4cec539 * GSWExtensions.framework/GNUmakefile: rewrite using framework.make
* GSWExtensions.framework/*.(h|m): changed gsweb include dir from
gsweb/GSWeb.framework/ to GSWeb/

* GSWeb.framework/GNUmakefile: rewrite using framework.make
* GSWeb.framework/*.(h|m): changed gsweb include dir from
gsweb/GSWeb.framework/ to GSWeb/
* GSWeb.framework/GSWConstants.m: removed the frameworkd suffix.
* GSWeb.framework/GSWUtils.m ([NSBundle +tmpAllFrameworks]): removed.


git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/gsweb/trunk@7931 72102866-910b-0410-8b05-ffd578937521
2000-10-30 15:36:50 +00:00

321 lines
9.8 KiB
Objective-C

/* GSWRadioButtonList.m - GSWeb: Class GSWRadioButtonList
Copyright (C) 1999 Free Software Foundation, Inc.
Written by: Manuel Guesdon <mguesdon@sbuilders.com>
Date: Jan 1999
This file is part of the GNUstep Web Library.
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.
*/
static char rcsId[] = "$Id$";
#include <GSWeb/GSWeb.h>
//====================================================================
@implementation GSWRadioButtonList
//--------------------------------------------------------------------
-(id)initWithName:(NSString*)name_
associations:(NSDictionary*)associations_
contentElements:(NSArray*)elements_
{
//OK
NSMutableDictionary* _associations=[NSMutableDictionary dictionaryWithDictionary:associations_];
LOGObjectFnStart();
NSDebugMLLog(@"gswdync",@"name_=%@ associations_:%@ elements_=%@",name_,associations_,elements_);
defaultEscapeHTML=1;
[_associations removeObjectForKey:list__Key];
[_associations removeObjectForKey:item__Key];
[_associations removeObjectForKey:index__Key];
[_associations removeObjectForKey:selection__Key];
[_associations removeObjectForKey:prefix__Key];
[_associations removeObjectForKey:suffix__Key];
[_associations removeObjectForKey:displayString__Key];
[_associations removeObjectForKey:escapeHTML__Key];
if ((self=[super initWithName:name_
associations:_associations
contentElements:nil]))
{
list=[[associations_ objectForKey:list__Key
withDefaultObject:[list autorelease]] retain];
item=[[associations_ objectForKey:item__Key
withDefaultObject:[item autorelease]] retain];
if (item && ![item isValueSettable])
{
ExceptionRaise0(@"GSWCheckBox",@"'item' parameter must be settable");
};
index=[[associations_ objectForKey:index__Key
withDefaultObject:[index autorelease]] retain];
if (index && ![index isValueSettable])
{
ExceptionRaise0(@"GSWCheckBox",@"'index' parameter must be settable");
};
selection=[[associations_ objectForKey:selection__Key
withDefaultObject:[selection autorelease]] retain];
if (![selection isValueSettable])
{
ExceptionRaise0(@"GSWCheckBox",@"'selection' parameter must be settable");
};
prefix=[[associations_ objectForKey:prefix__Key
withDefaultObject:[prefix autorelease]] retain];
suffix=[[associations_ objectForKey:suffix__Key
withDefaultObject:[suffix autorelease]] retain];
displayString=[[associations_ objectForKey:displayString__Key
withDefaultObject:[displayString autorelease]] retain];
escapeHTML=[[associations_ objectForKey:escapeHTML__Key
withDefaultObject:[escapeHTML autorelease]] retain];
};
return self;
};
//-----------------------------------------------------------------------------------
-(void)dealloc
{
DESTROY(list);
DESTROY(item);
DESTROY(index);
DESTROY(selection);
DESTROY(prefix);
DESTROY(suffix);
DESTROY(displayString);
DESTROY(escapeHTML);
[super dealloc];
}
//--------------------------------------------------------------------
-(NSString*)description
{
return [NSString stringWithFormat:@"<%s %p>",
object_get_class_name(self),
(void*)self];
};
//--------------------------------------------------------------------
-(NSString*)elementName
{
return @"INPUT";
};
@end
//====================================================================
@implementation GSWRadioButtonList (GSWRadioButtonListA)
//-----------------------------------------------------------------------------------
-(void)takeValuesFromRequest:(GSWRequest*)request_
inContext:(GSWContext*)context_
{
//OK
LOGObjectFnStart();
[self _slowTakeValuesFromRequest:request_
inContext:context_];
LOGObjectFnStop();
};
//-----------------------------------------------------------------------------------
-(void)_slowTakeValuesFromRequest:(GSWRequest*)request_
inContext:(GSWContext*)context_
{
//OK
BOOL _disabledInContext=NO;
LOGObjectFnStart();
[self resetAutoValue];
_disabledInContext=[self disabledInContext:context_];
if (!_disabledInContext)
{
if ([context_ _wasFormSubmitted])
{
GSWComponent* _component=[context_ component];
NSArray* _listValue=nil;
NSString* _name=nil;
int _foundIndex=-1;
id _formValue=nil;
id _valueValue=nil;
id _valueToSet=nil;
int i=0;
_name=[self nameInContext:context_];
NSDebugMLLog(@"gswdync",@"_name=%@",_name);
_formValue=[request_ formValueForKey:_name];
NSDebugMLLog(@"gswdync",@"_formValue=%@",_formValue);
_listValue=[list valueInComponent:_component];
NSAssert3(!_listValue || [_listValue respondsToSelector:@selector(count)],
@"The list (%@) (%@ of class:%@) doesn't respond to 'count'",
list,
_listValue,
[_listValue class]);
NSDebugMLLog(@"gswdync",@"_listValue=%@",_listValue);
for(i=0;i<[_listValue count] && _foundIndex<0;i++)
{
NSDebugMLLog(@"gswdync",@"item=%@",item);
NSDebugMLLog(@"gswdync",@"index=%@",index);
if (item)
[item setValue:[_listValue objectAtIndex:i]
inComponent:_component];
else if (index)
[index setValue:[NSNumber numberWithShort:i]
inComponent:_component];
NSDebugMLLog(@"gswdync",@"value=%@",value);
//TODOV
_valueValue=[self valueInContext:context_];
NSDebugMLLog(@"gswdync",@"_valueValue=%@",_valueValue);
if (_valueValue)
{
BOOL _isEqual=SBIsValueEqual(_valueValue,_formValue);
NSDebugMLLog(@"gswdync",@"_isEqual=%s",(_isEqual ? "YES" : "NO"));
if (_isEqual)
{
if(autoValue == NO)
_valueToSet=_valueValue;
else
_valueToSet=[_listValue objectAtIndex:i];
_foundIndex=i;
};
};
};
NSDebugMLLog(@"gswdync",@"_component=%@",_component);
NSDebugMLLog(@"gswdync",@"_foundIndex=%d",_foundIndex);
NSDebugMLLog(@"gswdync",@"selection=%@",selection);
GSWLogAssertGood(_component);
#if !GSWEB_STRICT
NS_DURING
{
if (_foundIndex>=0)
[selection setValue:_valueToSet
inComponent:_component];
else
[selection setValue:nil
inComponent:_component];
};
NS_HANDLER
{
[self handleValidationException:localException
inContext:context_];
}
NS_ENDHANDLER;
#else
if (_foundIndex>=0)
[selection setValue:_valueToSet
inComponent:_component];
else
[selection setValue:nil
inComponent:_component];
#endif
};
};
LOGObjectFnStop();
};
//-----------------------------------------------------------------------------------
-(void)_fastTakeValuesFromRequest:(GSWRequest*)request_
inContext:(GSWContext*)context_
{
LOGObjectFnStart();
LOGObjectFnNotImplemented(); //TODOFN
LOGObjectFnStop();
};
//-----------------------------------------------------------------------------------
-(void)appendToResponse:(GSWResponse*)response_
inContext:(GSWContext*)context_
{
//OK
GSWRequest* _request=nil;
BOOL _isFromClientComponent=NO;
NSString* _name=nil;
GSWComponent* _component=nil;
NSArray* _listValue=nil;
id _selectionValue=nil;
int i=0;
id _displayStringValue=nil;
id _prefixValue=nil;
id _suffixValue=nil;
id _valueValue=nil;
BOOL _isEqual=NO;
LOGObjectFnStart();
[self resetAutoValue];
autoValue = NO;
_request=[context_ request];
_isFromClientComponent=[_request isFromClientComponent];
_name=[self nameInContext:context_];
_component=[context_ component];
_selectionValue=[selection valueInComponent:_component];
_listValue=[list valueInComponent:_component];
NSAssert3(!_listValue || [_listValue respondsToSelector:@selector(count)],
@"The list (%@) (%@ of class:%@) doesn't respond to 'count'",
list,
_listValue,
[_listValue class]);
for(i=0;i<[_listValue count];i++)
{
[item setValue:[_listValue objectAtIndex:i]
inComponent:_component];
_prefixValue=[prefix valueInComponent:_component];
_suffixValue=[suffix valueInComponent:_component];
[index setValue:[NSNumber numberWithShort:i]
inComponent:_component];
_displayStringValue=[displayString valueInComponent:_component];
[response_ appendContentString:@"<INPUT NAME=\""];
[response_ appendContentString:_name];
[response_ appendContentString:@"\" TYPE=radio VALUE=\""];
_valueValue=[self valueInContext:context_];
[response_ appendContentHTMLAttributeValue:_valueValue];
[response_ appendContentCharacter:'"'];
//TODOV
if(value)
_isEqual=SBIsValueEqual(_valueValue,_selectionValue);
else
{
_isEqual=SBIsValueEqual([_listValue objectAtIndex:i],_selectionValue);
autoValue = YES;
}
if (_isEqual)
[response_ appendContentString:@"\" CHECKED"];
[response_ appendContentCharacter:'>'];
[response_ appendContentString:_prefixValue];
[response_ appendContentHTMLString:_displayStringValue];
[response_ appendContentString:_suffixValue];
};
LOGObjectFnStop();
};
@end
//====================================================================
@implementation GSWRadioButtonList (GSWRadioButtonListB)
-(BOOL)appendStringAtRight:(id)_unkwnon
withMapping:(char*)_mapping
{
LOGObjectFnNotImplemented(); //TODOFN
return NO;
};
-(BOOL)appendStringAtLeft:(id)_unkwnon
withMapping:(char*)_mapping
{
LOGObjectFnNotImplemented(); //TODOFN
return NO;
};
-(BOOL)compactHTMLTags
{
return NO;
};
@end