mirror of
https://github.com/gnustep/libs-gsweb.git
synced 2025-02-23 11:41:20 +00:00
* GSWDisplayGroup.m/.h: implemented (-setSelectedObject) to support KeyValueCoding mechanism (-selectObject:) now search object into allObjects array * GSWPopUpButton.m: removed dashes (--) in the label. * GSWActiveImage.m: if image is disabled whitin a FORM it displays its image as a passive element * GSWComponent.m: displays start/stop comments if gswcomponents debug is enabled git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/gsweb/trunk@7104 72102866-910b-0410-8b05-ffd578937521
505 lines
15 KiB
Objective-C
505 lines
15 KiB
Objective-C
/* GSWPopUpButton.m - GSWeb: Class GSWPopUpButton
|
|
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.framework/GSWeb.h>
|
|
|
|
//====================================================================
|
|
@implementation GSWPopUpButton
|
|
|
|
//--------------------------------------------------------------------
|
|
-(id)initWithName:(NSString*)name_
|
|
associations:(NSDictionary*)associations_
|
|
contentElements:(NSArray*)_elements
|
|
{
|
|
//OK
|
|
NSMutableDictionary* _associations=nil;
|
|
LOGObjectFnStartC("GSWPopUpButton");
|
|
NSDebugMLLog(@"gswdync",@"name_=%@ associations_:%@ _elements=%@",name_,associations_,_elements);
|
|
_associations=[NSMutableDictionary dictionaryWithDictionary:associations_];
|
|
[_associations removeObjectForKey:list__Key];
|
|
[_associations removeObjectForKey:item__Key];
|
|
[_associations removeObjectForKey:displayString__Key];
|
|
[_associations removeObjectForKey:selection__Key];
|
|
#if !GSWEB_STRICT
|
|
[_associations removeObjectForKey:selectionValue__Key];
|
|
#endif
|
|
[_associations removeObjectForKey:selectedValue__Key];
|
|
[_associations removeObjectForKey:noSelectionString__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];
|
|
displayString=[[associations_ objectForKey:displayString__Key
|
|
withDefaultObject:[displayString autorelease]] retain];
|
|
selection=[[associations_ objectForKey:selection__Key
|
|
withDefaultObject:[selection autorelease]] retain];
|
|
if (selection && ![selection isValueSettable])
|
|
{
|
|
//TODO
|
|
};
|
|
|
|
#if !GSWEB_STRICT
|
|
selectionValue=[[associations_ objectForKey:selectionValue__Key
|
|
withDefaultObject:[selectionValue autorelease]] retain];
|
|
if (selectionValue && ![selectionValue isValueSettable])
|
|
{
|
|
//TODO
|
|
};
|
|
#endif
|
|
|
|
selectedValue=[[associations_ objectForKey:selectedValue__Key
|
|
withDefaultObject:[selectedValue autorelease]] retain];
|
|
noSelectionString=[[associations_ objectForKey:noSelectionString__Key
|
|
withDefaultObject:[noSelectionString autorelease]] retain];
|
|
escapeHTML=[[associations_ objectForKey:escapeHTML__Key
|
|
withDefaultObject:[escapeHTML autorelease]] retain];
|
|
};
|
|
LOGObjectFnStopC("GSWPopUpButton");
|
|
return self;
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(void)dealloc
|
|
{
|
|
DESTROY(list);
|
|
DESTROY(item);
|
|
DESTROY(displayString);
|
|
DESTROY(selection);
|
|
#if !GSWEB_STRICT
|
|
DESTROY(selectionValue);
|
|
#endif
|
|
DESTROY(selectedValue);
|
|
DESTROY(noSelectionString);
|
|
DESTROY(escapeHTML);
|
|
[super dealloc];
|
|
};
|
|
|
|
|
|
//--------------------------------------------------------------------
|
|
-(NSString*)elementName
|
|
{
|
|
return @"SELECT";
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(NSString*)description
|
|
{
|
|
return [NSString stringWithFormat:@"<%s %p>",
|
|
object_get_class_name(self),
|
|
(void*)self];
|
|
};
|
|
|
|
//====================================================================
|
|
@implementation GSWPopUpButton (GSWPopUpButtonA)
|
|
|
|
//#define ENABLE_OPTGROUP
|
|
//--------------------------------------------------------------------
|
|
-(void)appendToResponse:(GSWResponse*)response_
|
|
inContext:(GSWContext*)context_
|
|
{
|
|
//OK
|
|
GSWRequest* _request=nil;
|
|
BOOL _isFromClientComponent=NO;
|
|
GSWComponent* _component=nil;
|
|
NSArray* _listValue=nil;
|
|
id _selectionValue=nil;
|
|
id _selectedValueValue=nil;
|
|
id _valueValue=nil;
|
|
id _itemValue=nil;
|
|
id _displayStringValue=nil;
|
|
BOOL _escapeHTML=YES;
|
|
id _escapeHTMLValue=nil;
|
|
int i=0;
|
|
BOOL _inOptGroup=NO;
|
|
#ifndef ENABLE_OPTGROUP
|
|
BOOL _optGroupLabel=NO;
|
|
#endif
|
|
LOGObjectFnStartC("GSWPopUpButton");
|
|
[self resetAutoValue];
|
|
autoValue = NO;
|
|
_request=[context_ request];
|
|
_isFromClientComponent=[_request isFromClientComponent];
|
|
_component=[context_ component];
|
|
[super appendToResponse:response_
|
|
inContext:context_];
|
|
_listValue=[list valueInComponent:_component];
|
|
NSDebugMLLog(@"gswdync",@"_listValue=%@",_listValue);
|
|
NSAssert3(!_listValue || [_listValue respondsToSelector:@selector(count)],
|
|
@"The list (%@) (%@ of class:%@) doesn't respond to 'count'",
|
|
list,
|
|
_listValue,
|
|
[_listValue class]);
|
|
_selectionValue=[selection valueInComponent:_component];
|
|
NSDebugMLLog(@"gswdync",@"selection=%@",selection);
|
|
NSDebugMLLog(@"gswdync",@"_selectionValue=%@",_selectionValue);
|
|
_selectedValueValue=[selectedValue valueInComponent:_component];
|
|
NSDebugMLLog(@"gswdync",@"selectedValue=%@",selectedValue);
|
|
NSDebugMLLog(@"gswdync",@"_selectedValueValue=%@",_selectedValueValue);
|
|
if (escapeHTML)
|
|
{
|
|
_escapeHTMLValue=[escapeHTML valueInComponent:_component];
|
|
_escapeHTML=boolValueFor(_escapeHTMLValue);
|
|
};
|
|
if (noSelectionString)
|
|
{
|
|
id _noSelectionStringValue=nil;
|
|
[response_ _appendContentAsciiString:@"\n<OPTION"];
|
|
if (selectedValue && !_selectedValueValue)
|
|
{
|
|
[response_ appendContentCharacter:' '];
|
|
[response_ _appendContentAsciiString:@"selected"];//TODO
|
|
};
|
|
[response_ appendContentCharacter:'>'];
|
|
_noSelectionStringValue=[noSelectionString valueInComponent:_component];
|
|
if (_escapeHTML)
|
|
_noSelectionStringValue=[GSWResponse stringByEscapingHTMLString:_noSelectionStringValue];
|
|
[response_ appendContentHTMLString:_noSelectionStringValue];
|
|
// There is no close tag on OPTION
|
|
//[response_ _appendContentAsciiString:@"</OPTION>"];
|
|
};
|
|
for(i=0;i<[_listValue count];i++)
|
|
{
|
|
NSDebugMLLog(@"gswdync",@"_inOptGroup=%s",(_inOptGroup ? "YES" : "NO"));
|
|
_itemValue=[_listValue objectAtIndex:i];
|
|
if (item)
|
|
[item setValue:_itemValue
|
|
inComponent:_component];
|
|
NSDebugMLLog(@"gswdync",@"_itemValue=%@",_itemValue);
|
|
if (_itemValue)
|
|
{
|
|
NSDebugMLLog(@"gswdync",@"value=%@",value);
|
|
_valueValue=[self valueInContext:context_];
|
|
NSDebugMLLog(@"gswdync",@"_valueValue=%@",_valueValue);
|
|
if (_valueValue)
|
|
{
|
|
BOOL _isEqual;
|
|
|
|
NSDebugMLLog0(@"gswdync",@"Adding OPTION");
|
|
[response_ _appendContentAsciiString:@"\n<OPTION"];
|
|
if (selection)
|
|
{
|
|
if(value)
|
|
_isEqual=SBIsValueEqual(_valueValue,_selectionValue);
|
|
else
|
|
_isEqual=SBIsValueEqual(_itemValue,_selectionValue);
|
|
|
|
if (_isEqual)
|
|
{
|
|
[response_ appendContentCharacter:' '];
|
|
[response_ _appendContentAsciiString:@"selected"];
|
|
};
|
|
};
|
|
if (_isEqual == NO && selectedValue)
|
|
{
|
|
if(value)
|
|
_isEqual=SBIsValueEqual(_valueValue,_selectedValueValue);
|
|
else
|
|
_isEqual=SBIsValueEqual(_itemValue,_selectedValueValue);
|
|
|
|
if (_isEqual)
|
|
{
|
|
[response_ appendContentCharacter:' '];
|
|
[response_ _appendContentAsciiString:@"selected"];
|
|
};
|
|
};
|
|
if (value == nil)
|
|
autoValue = YES;
|
|
if (_valueValue)
|
|
{
|
|
[response_ _appendContentAsciiString:@" value=\""];
|
|
[response_ _appendContentAsciiString:_valueValue];
|
|
[response_ appendContentCharacter:'"'];
|
|
};
|
|
[response_ appendContentCharacter:'>'];
|
|
};
|
|
_displayStringValue=nil;
|
|
if (displayString)
|
|
{
|
|
NSDebugMLLog(@"gswdync",@"displayString=%@",displayString);
|
|
_displayStringValue=[displayString valueInComponent:_component];
|
|
NSDebugMLLog(@"gswdync",@"_displayStringValue=%@",_displayStringValue);
|
|
};
|
|
|
|
if (_displayStringValue)
|
|
{
|
|
if (!_valueValue)
|
|
{
|
|
if (_inOptGroup)
|
|
{
|
|
NSDebugMLLog0(@"gswdync",@"Adding /OPTGROUP");
|
|
#ifdef ENABLE_OPTGROUP
|
|
[response_ _appendContentAsciiString:@"\n</OPTGROUP>"];
|
|
#endif
|
|
_inOptGroup=NO;
|
|
};
|
|
NSDebugMLLog0(@"gswdync",@"Adding OPTGROUP");
|
|
#ifdef ENABLE_OPTGROUP
|
|
[response_ _appendContentAsciiString:@"\n<OPTGROUP label=\""];
|
|
#else
|
|
#if 0
|
|
[response_ _appendContentAsciiString:@"\n<OPTION>-- "];
|
|
_optGroupLabel=YES;
|
|
#else
|
|
[response_ _appendContentAsciiString:@"\n<OPTION>"];
|
|
#endif
|
|
_optGroupLabel=YES;
|
|
#endif
|
|
_inOptGroup=YES;
|
|
};
|
|
//<OPTGROUP label="PortMaster 3">
|
|
|
|
if (_escapeHTML)
|
|
_displayStringValue=[GSWResponse stringByEscapingHTMLString:_displayStringValue];
|
|
NSDebugMLLog(@"gswdync",@"_displayStringValue=%@",_displayStringValue);
|
|
#ifndef ENABLE_OPTGROUP
|
|
if (_optGroupLabel)
|
|
{
|
|
_displayStringValue=[NSString stringWithFormat:@"%@ --",_displayStringValue];
|
|
};
|
|
#endif
|
|
[response_ appendContentHTMLString:_displayStringValue];
|
|
};
|
|
if (_valueValue)
|
|
{
|
|
//NSDebugMLLog0(@"gswdync",@"Adding /OPTION");
|
|
// K2- No /OPTION TAG
|
|
//[response_ _appendContentAsciiString:@"</OPTION>"];
|
|
}
|
|
else
|
|
{
|
|
NSDebugMLLog0(@"gswdync",@"Adding > or </OPTION>");
|
|
#ifdef ENABLE_OPTGROUP
|
|
[response_ _appendContentAsciiString:@"\">"];
|
|
#else
|
|
if (_optGroupLabel)
|
|
{
|
|
//[response_ _appendContentAsciiString:@"</OPTION>"];
|
|
_optGroupLabel=NO;
|
|
};
|
|
#endif
|
|
};
|
|
};
|
|
};
|
|
if (_inOptGroup)
|
|
{
|
|
#ifdef ENABLE_OPTGROUP
|
|
NSDebugMLLog0(@"gswdync",@"Adding /OPTGROUP");
|
|
[response_ _appendContentAsciiString:@"\n</OPTGROUP>"];
|
|
#endif
|
|
_inOptGroup=NO;
|
|
};
|
|
[response_ _appendContentAsciiString:@"</SELECT>"];
|
|
LOGObjectFnStopC("GSWPopUpButton");
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(void)appendValueToResponse:(GSWResponse*)response_
|
|
inContext:(GSWContext*)context_
|
|
{
|
|
//OK
|
|
//Does nothing !
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(void)takeValuesFromRequest:(GSWRequest*)request_
|
|
inContext:(GSWContext*)context_
|
|
{
|
|
//OK
|
|
LOGObjectFnStartC("GSWPopUpButton");
|
|
[self _slowTakeValuesFromRequest:request_
|
|
inContext:context_];
|
|
LOGObjectFnStopC("GSWPopUpButton");
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(void)_fastTakeValuesFromRequest:(GSWRequest*)request_
|
|
inContext:(GSWContext*)context_
|
|
{
|
|
LOGObjectFnNotImplemented(); //TODOFN
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(void)_slowTakeValuesFromRequest:(GSWRequest*)request_
|
|
inContext:(GSWContext*)context_
|
|
{
|
|
//OK
|
|
BOOL _disabled=NO;
|
|
BOOL _wasFormSubmitted=NO;
|
|
LOGObjectFnStartC("GSWPopUpButton");
|
|
[self resetAutoValue];
|
|
_disabled=[self disabledInContext:context_];
|
|
if (!_disabled)
|
|
{
|
|
_wasFormSubmitted=[context_ _wasFormSubmitted];
|
|
if (_wasFormSubmitted)
|
|
{
|
|
GSWComponent* _component=nil;
|
|
NSArray* _listValue=nil;
|
|
id _valueValue=nil;
|
|
id _itemValue=nil;
|
|
NSString* _name=nil;
|
|
NSArray* _formValues=nil;
|
|
id _formValue=nil;
|
|
BOOL _found=NO;
|
|
int i=0;
|
|
_component=[context_ component];
|
|
_name=[self nameInContext:context_];
|
|
NSDebugMLLog(@"gswdync",@"_name=%@",_name);
|
|
_formValues=[request_ formValuesForKey:_name];
|
|
NSDebugMLLog(@"gswdync",@"_formValues=%@",_formValues);
|
|
if (_formValues && [_formValues count])
|
|
{
|
|
BOOL _isEqual=NO;
|
|
_formValue=[_formValues objectAtIndex:0];
|
|
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]);
|
|
for(i=0;!_found && i<[_listValue count];i++)
|
|
{
|
|
_itemValue=[_listValue objectAtIndex:i];
|
|
NSDebugMLLog(@"gswdync",@"_itemValue=%@",_itemValue);
|
|
NSDebugMLLog(@"gswdync",@"item=%@",item);
|
|
if (item)
|
|
[item setValue:_itemValue
|
|
inComponent:_component];
|
|
NSDebugMLLog(@"gswdync",@"value=%@",value);
|
|
_valueValue=[self valueInContext:context_];
|
|
NSDebugMLLog(@"gswdync",@"_valueValue=%@ [class=%@] _formValue=%@ [class=%@]",
|
|
_valueValue,[_valueValue class],
|
|
_formValue,[_formValue class]);
|
|
_isEqual=SBIsValueEqual(_valueValue,_formValue);
|
|
if (_isEqual)
|
|
{
|
|
if(autoValue == NO)
|
|
_itemValue = _valueValue;
|
|
|
|
NSDebugMLLog(@"gswdync",@"selection=%@",selection);
|
|
if (selection)
|
|
{
|
|
#if !GSWEB_STRICT
|
|
NS_DURING
|
|
{
|
|
[selection setValue:_itemValue
|
|
inComponent:_component];
|
|
};
|
|
NS_HANDLER
|
|
{
|
|
[self handleValidationException:localException
|
|
inContext:context_];
|
|
}
|
|
NS_ENDHANDLER;
|
|
#else
|
|
[selection setValue:_itemValue
|
|
inComponent:_component];
|
|
#endif
|
|
};
|
|
#if !GSWEB_STRICT
|
|
NSDebugMLLog(@"gswdync",@"selectionValue=%@",selectionValue);
|
|
if (selectionValue)
|
|
{
|
|
NS_DURING
|
|
{
|
|
[selectionValue setValue:_valueValue
|
|
inComponent:_component];
|
|
};
|
|
NS_HANDLER
|
|
{
|
|
[self handleValidationException:localException
|
|
inContext:context_];
|
|
}
|
|
NS_ENDHANDLER;
|
|
};
|
|
#endif
|
|
_found=YES;
|
|
};
|
|
};
|
|
};
|
|
NSDebugMLLog(@"gswdync",@"_found=%s",(_found ? "YES" : "NO"));
|
|
if (!_found)
|
|
{
|
|
if (selection)
|
|
{
|
|
#if !GSWEB_STRICT
|
|
NS_DURING
|
|
{
|
|
[selection setValue:nil
|
|
inComponent:_component];
|
|
};
|
|
NS_HANDLER
|
|
{
|
|
[self handleValidationException:localException
|
|
inContext:context_];
|
|
}
|
|
NS_ENDHANDLER;
|
|
#else
|
|
[selection setValue:nil
|
|
inComponent:_component];
|
|
#endif
|
|
};
|
|
#if !GSWEB_STRICT
|
|
if (selectionValue)
|
|
{
|
|
NS_DURING
|
|
{
|
|
[selectionValue setValue:nil
|
|
inComponent:_component];
|
|
};
|
|
NS_HANDLER
|
|
{
|
|
[self handleValidationException:localException
|
|
inContext:context_];
|
|
}
|
|
NS_ENDHANDLER;
|
|
};
|
|
#endif
|
|
};
|
|
};
|
|
};
|
|
LOGObjectFnStopC("GSWPopUpButton");
|
|
};
|
|
|
|
|
|
@end
|
|
|
|
//====================================================================
|
|
@implementation GSWPopUpButton (GSWPopUpButtonB)
|
|
-(BOOL)appendStringAtRight:(id)_unkwnon
|
|
withMapping:(char*)_mapping
|
|
{
|
|
LOGObjectFnNotImplemented(); //TODOFN
|
|
return NO;
|
|
};
|
|
@end
|
|
|