mirror of
https://github.com/gnustep/libs-gsweb.git
synced 2025-02-21 02:41:04 +00:00
* GSWDatabase/WODisplayGroup.m remove local NSAutoreleasePool adjust makefiles git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/gsweb/trunk@30698 72102866-910b-0410-8b05-ffd578937521
198 lines
6.1 KiB
Objective-C
198 lines
6.1 KiB
Objective-C
/** GSWCheckBox.m - <title>GSWeb: Class GSWCheckBox</title>
|
|
|
|
Copyright (C) 1999-2002 Free Software Foundation, Inc.
|
|
|
|
Written by: Manuel Guesdon <mguesdon@orange-concept.com>
|
|
Date: Jan 1999
|
|
|
|
$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>
|
|
**/
|
|
|
|
#include "GSWeb.h"
|
|
|
|
/**
|
|
Bindings
|
|
|
|
value Value for "valing" tag of the element. If none, GNUstepWeb generate one
|
|
|
|
selection During appendTo... if it's evaluation equal value evalutaion, the check box is checked.
|
|
During takeValue..., it takes value evaluated value (or contextID if no value)
|
|
|
|
checked During appendTo... if it's evaluated to YES, the check box is checked.
|
|
During takeValue..., it takes YES if checkbox is checked, NO otherwise.
|
|
|
|
name Name of the element in the form (should be unique). If not specified, GSWeb assign one.
|
|
|
|
disabled If evaluated to yes, the check box appear inactivated.
|
|
**/
|
|
|
|
static GSWIMP_BOOL standardEvaluateConditionInContextIMP = NULL;
|
|
|
|
static Class standardClass = Nil;
|
|
|
|
//====================================================================
|
|
@implementation GSWCheckBox
|
|
|
|
//--------------------------------------------------------------------
|
|
+ (void) initialize
|
|
{
|
|
if (self == [GSWCheckBox class])
|
|
{
|
|
standardClass=[GSWCheckBox class];
|
|
|
|
standardEvaluateConditionInContextIMP =
|
|
(GSWIMP_BOOL)[self instanceMethodForSelector:evaluateConditionInContextSEL];
|
|
};
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(id)initWithName:(NSString*)aName
|
|
associations:(NSDictionary*)associations
|
|
template:(GSWElement*)template
|
|
{
|
|
self = [super initWithName:@"input" associations:associations template: nil];
|
|
if (!self) {
|
|
return nil;
|
|
}
|
|
|
|
ASSIGN(_checked, [_associations objectForKey: checked__Key]);
|
|
if (_checked != nil) {
|
|
[_associations removeObjectForKey: checked__Key];
|
|
}
|
|
|
|
ASSIGN(_selection, [_associations objectForKey: selection__Key]);
|
|
if (_selection != nil) {
|
|
[_associations removeObjectForKey: selection__Key];
|
|
}
|
|
|
|
if (((_checked == nil) && (_value == nil)) ||
|
|
(((_checked != nil) && (_value != nil)) || ((_checked != nil) && (! [_checked isValueSettable])) ||
|
|
(((_value != nil) && (_selection != nil)) && (![_selection isValueSettable])))) {
|
|
[NSException raise:NSInvalidArgumentException
|
|
format:@"%s: Bad attribute list.",
|
|
__PRETTY_FUNCTION__];
|
|
}
|
|
|
|
return self;
|
|
};
|
|
|
|
- (NSString *) type
|
|
{
|
|
return @"checkbox";
|
|
}
|
|
|
|
//--------------------------------------------------------------------
|
|
-(void)dealloc
|
|
{
|
|
DESTROY(_checked);
|
|
DESTROY(_selection);
|
|
[super dealloc];
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(NSString*)description
|
|
{
|
|
return [NSString stringWithFormat:@"<%s %p>",
|
|
object_getClassName(self),
|
|
(void*)self];
|
|
};
|
|
|
|
-(void)takeValuesFromRequest:(GSWRequest*) request
|
|
inContext:(GSWContext*) context
|
|
{
|
|
GSWComponent * component = GSWContext_component(context);
|
|
id valueValue = nil;
|
|
id selectionValue = nil;
|
|
BOOL isChecked = NO;
|
|
|
|
if ((![self disabledInComponent: component]) && ([context _wasFormSubmitted])) {
|
|
NSString * nameCtx = [self nameInContext:context];
|
|
if (nameCtx != nil) {
|
|
NSArray* formValues = [request formValuesForKey: nameCtx];
|
|
|
|
if (_value != nil) {
|
|
valueValue = [_value valueInComponent:component];
|
|
} else {
|
|
valueValue = [context elementID];
|
|
}
|
|
isChecked = [formValues containsObject: NSStringWithObject(valueValue)];
|
|
|
|
if ((_value != nil) && (_selection != nil)) {
|
|
if (isChecked) {
|
|
[_selection setValue: valueValue
|
|
inComponent: component];
|
|
} else {
|
|
selectionValue = [_selection valueInComponent:component];
|
|
if (selectionValue != nil) {
|
|
[_selection setValue: nil
|
|
inComponent: component];;
|
|
}
|
|
}
|
|
}
|
|
if (_checked != nil) {
|
|
[_checked setValue: (isChecked ? GSWNumberYes : GSWNumberNo)
|
|
inComponent: component];
|
|
|
|
}
|
|
}
|
|
}
|
|
};
|
|
|
|
|
|
-(void) _appendCloseTagToResponse:(GSWResponse *) response
|
|
inContext:(GSWContext*) context
|
|
{
|
|
// nothing!
|
|
}
|
|
|
|
- (void) appendAttributesToResponse:(GSWResponse*)response
|
|
inContext:(GSWContext*)context
|
|
{
|
|
GSWComponent * component = GSWContext_component(context);
|
|
id valueValue = nil;
|
|
id selectionValue = nil;
|
|
|
|
[super appendAttributesToResponse:response inContext:context];
|
|
|
|
if (_value != nil) {
|
|
valueValue = [_value valueInComponent:component];
|
|
if (valueValue != nil && _selection != nil) {
|
|
selectionValue = [_selection valueInComponent:component];
|
|
if ((selectionValue != nil) && [selectionValue isEqual: valueValue]) {
|
|
GSWResponse_appendContentCharacter(response,' ');
|
|
GSWResponse_appendContentAsciiString(response,@"checked");
|
|
}
|
|
}
|
|
} else { // _value == nil
|
|
GSWResponse_appendTagAttributeValueEscapingHTMLAttributeValue(response, value__Key, [context elementID], NO);
|
|
}
|
|
if ((_checked != nil) && [_checked boolValueInComponent:component]) {
|
|
GSWResponse_appendContentCharacter(response,' ');
|
|
GSWResponse_appendContentAsciiString(response,@"checked");
|
|
}
|
|
}
|
|
|
|
|
|
@end
|
|
|
|
|