mirror of
https://github.com/gnustep/libs-gsweb.git
synced 2025-02-24 04:01:16 +00:00
* GSWeb.framework/GSWWOCompatibility.h/.m: added * GSWeb.framework/GNUmakefile: added GSWWOCompatibility.h/.m * GSWeb.framework/GSWApplication.h/m: added WOApplicationMain, handle WO/GSWeb names * GSWeb.framework/GSWContext.m: handle WO/GSWeb names, added traces * GSWeb.framework/GSWConstants.h/.m: handle WO/GSWeb names * GSWeb.framework/GSWDynamicURLString.m: handle WO/GSWeb names * GSWeb.framework/GSWProjectBundle.m/.h: handle WO/GSWeb names, suppress warnings * GSWeb.framework/GSWSession.m: handle WO/GSWeb names * GSWeb.framework/GSWRequest.m: handle WO/GSWeb names * GSWeb.framework/GSWTemplateParser.m: handle WO/GSWeb names, added tag counts to help errors hunt * GSWeb.framework/GSWBundle.m: handle WO/GSWeb names, added traces * GSWeb.framework/GSWResourceManager.m: handle WO/GSWeb names * GSWeb.framework/GSWURLValuedElementData.m: handle WO/GSWeb names * GSWeb.framework/GSWComponentRequestHandler.m: handle WO/GSWeb names * GSWeb.framework/GSWDirectAction.m: handle WO/GSWeb names * GSWeb.framework/GSWForm.m/.h: handle WO/GSWeb names * GSWeb.framework/GSWHyperlink.m/.h: handle WO/GSWeb names * GSWeb.framework/GSWResourceRequestHandler.m: handle WO/GSWeb names * GSWeb.framework/GSWDirectActionRequestHandler.m: handle WO/GSWeb names * GSWeb.framework/GSWActiveImage.m/.h: handle WO/GSWeb names * GSWeb.framework/GSWBindingNameAssociation.h/.m: handle WO/GSWeb names * GSWeb.framework/GSWBrowser.h/.m: handle WO/GSWeb names * GSWeb.framework/GSWComponent.h/.m: handle WO/GSWeb names * GSWeb.framework/GSWHTMLURLValuedElement.h/.m: handle WO/GSWeb names * GSWeb.framework/GSWImageButton.h/.m: handle WO/GSWeb names * GSWeb.framework/GSWInput.h/.m: handle WO/GSWeb names * GSWeb.framework/GSWPopUpButton.h/.m: handle WO/GSWeb names * GSWeb.framework/GSWString.h/.m: handle WO/GSWeb names * GSWeb.framework/GSWAssociation.m: handle WO/GSWeb names * GSWeb.framework/GSWCheckBox.m: handle WO/GSWeb names * GSWeb.framework/GSWCheckBoxList.m: handle WO/GSWeb names * GSWeb.framework/GSWComponentDefinition.m: handle WO/GSWeb names * GSWeb.framework/GSWRadioButton.m: handle WO/GSWeb names * GSWeb.framework/GSWRadioButtonList.m: handle WO/GSWeb names * GSWeb.framework/GSWText.m: handle WO/GSWeb names * GSWeb.framework/GSWTextField.m: handle WO/GSWeb names * GSWeb.framework/GSWDeployedBundle.m: warnings * GSWeb.framework/GSWeb.h: added include GSWeb/GSWSessionTimeOut.h, GSWWOCompatibility.h * GSWeb.framework/GSWAdaptor.m: traces * GSWeb.framework/GSWDefaultAdaptor.m: handle WO/GSWeb names, added traces * GSWeb.framework/GSWDefaultAdaptorThread.m/.h: handle WO/GSWeb names * GSWeb.framework/NSNonBlockingFileHandle.m: added traces * GSWeb.framework/GSWTemplateParserANTLR.m: handle WO/GSWeb names * GSWeb.framework/GSWTemplateParserXML.m: handle WO/GSWeb names added tag count to help errors hunt remove "Tag gsweb invalid" message handle unicode strings in node content traces remove html and body tags if they are not present in the template * GSWeb.framework/GSWTemplateParseXML.h: added ivar _isHTMLTag, _isBodyTag * GSWeb.framework/GSWSessionTimeOutManager.m: dealloc sessionOrderedTimeOuts instead of deallocating 2 times sessionTimeOuts * GSWExtensions.framework/French.lproj/GSWSessionRestorationErrorPage.gswc/GSWSessionRestorationErrorPage.html: tag mismatch, Encode french characters * GSWExtensions.framework/GSWSessionRestorationErrorPage.gswc/GSWSessionRestorationErrorPage.html: tag mismatch * GSWHTMLBareString.m: handle unicode strings in description * GSWExtensions.framework/French.lproj/GSWExceptionPage.gswc/GSWExceptionPage.html: Encode french characters, Tag Mismatch * GSWExtensions.framework/French.lproj/GSWPageRestorationErrorPage.gswc/GSWPageRestorationErrorPage.html: Encode french characters * GSWExtensions.framework/French.lproj/GSWSessionCreationErrorPage.gswc/GSWSessionCreationErrorPage.html: Encode french characters * GSWExtensions.framework/GSWExceptionPage.gswc/GSWExceptionPage.html: Tag Mismatch * GSWExtensions.framework/GSWExceptionPage.gswc/GSWExceptionPage.gswd: added convertHTMLEntities for strings * GSWeb.framework/GSWRepetition.m: added traces, fix "count" property bug, standardize ivars * GSWeb.framework/NSObject+IVarAccess+PerformSel.m: added traces, handle underscored ivars search git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/libs/gsweb/trunk@9332 72102866-910b-0410-8b05-ffd578937521
250 lines
7.7 KiB
Objective-C
250 lines
7.7 KiB
Objective-C
/* GSWString.m - GSWeb: Class GSWString
|
|
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 GSWString
|
|
|
|
//--------------------------------------------------------------------
|
|
-(id)initWithName:(NSString*)name_
|
|
associations:(NSDictionary*)associations_
|
|
contentElements:(NSArray*)_elements
|
|
{
|
|
//OK
|
|
LOGObjectFnStartC("GSWString");
|
|
NSDebugMLLog(@"gswdync",@"name_=%@ associations_:%@ _elements=%@",name_,associations_,_elements);
|
|
if ((self=[super initWithName:nil
|
|
associations:nil
|
|
contentElements:nil]))
|
|
{
|
|
value = [[associations_ objectForKey:value__Key
|
|
withDefaultObject:[value autorelease]] retain];
|
|
NSDebugMLLog(@"gswdync",@"GSWString: value=%@",value);
|
|
|
|
dateFormat = [[associations_ objectForKey:dateFormat__Key
|
|
withDefaultObject:[dateFormat autorelease]] retain];
|
|
|
|
NSDebugMLLog(@"gswdync",@"GSWString: dateFormat=%@",dateFormat);
|
|
|
|
numberFormat = [[associations_ objectForKey:numberFormat__Key
|
|
withDefaultObject:[numberFormat autorelease]] retain];
|
|
NSDebugMLLog(@"gswdync",@"GSWString: numberFormat=%@",numberFormat);
|
|
|
|
escapeHTML = [[associations_ objectForKey:escapeHTML__Key
|
|
withDefaultObject:[escapeHTML autorelease]] retain];
|
|
NSDebugMLLog(@"gswdync",@"GSWString: escapeHTML=%@",escapeHTML);
|
|
|
|
if (!WOStrictFlag)
|
|
{
|
|
convertHTML = [[associations_ objectForKey:convertHTML__Key
|
|
withDefaultObject:[convertHTML autorelease]] retain];
|
|
NSDebugMLLog(@"gswdync",@"GSWString: convertHTML=%@",convertHTML);
|
|
|
|
convertHTMLEntities = [[associations_ objectForKey:convertHTMLEntities__Key
|
|
withDefaultObject:[convertHTMLEntities autorelease]] retain];
|
|
NSDebugMLLog(@"gswdync",@"GSWString: convertHTMLEntities=%@",convertHTMLEntities);
|
|
};
|
|
|
|
formatter = [[associations_ objectForKey:formatter__Key
|
|
withDefaultObject:[formatter autorelease]] retain];
|
|
NSDebugMLLog(@"gswdync",@"GSWString: formatter=%@",formatter);
|
|
|
|
};
|
|
LOGObjectFnStopC("GSWString");
|
|
return self;
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(void)dealloc
|
|
{
|
|
DESTROY(value);
|
|
DESTROY(dateFormat);
|
|
DESTROY(numberFormat);
|
|
DESTROY(escapeHTML);
|
|
DESTROY(convertHTML); //GSWeb Only
|
|
DESTROY(convertHTMLEntities); //GSWeb Only
|
|
DESTROY(formatter);
|
|
[super dealloc];
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(NSString*)description
|
|
{
|
|
return [NSString stringWithFormat:@"<%s %p - value=%@ dateFormat=%@ numberFormat=%@ escapeHTML=%@ formatter=%@>",
|
|
object_get_class_name(self),
|
|
(void*)self,
|
|
value,
|
|
dateFormat,
|
|
numberFormat,
|
|
escapeHTML,
|
|
formatter];
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(void)appendToResponse:(GSWResponse*)response_
|
|
inContext:(GSWContext*)context_
|
|
{
|
|
//OK
|
|
NSString* _formattedValue=nil;
|
|
GSWRequest* _request=nil;
|
|
BOOL _isFromClientComponent=NO;
|
|
GSWComponent* _component=nil;
|
|
id _valueValue = nil;
|
|
LOGObjectFnStartC("GSWString");
|
|
NSDebugMLLog(@"gswdync",@"ET=%@ id=%@",[self class],[context_ elementID]);
|
|
_request=[context_ request];
|
|
_isFromClientComponent=[_request isFromClientComponent];
|
|
_component=[context_ component];
|
|
NSDebugMLLog(@"gswdync",@"GSWString: _component=%@",_component);
|
|
NSDebugMLLog(@"gswdync",@"GSWString: value=%@",value);
|
|
_valueValue = [value valueInComponent:_component];
|
|
NSDebugMLLog(@"gswdync",@"GSWString: _valueValue=%@",_valueValue);
|
|
if (_valueValue)
|
|
{
|
|
BOOL _escapeHTMLValue=YES;
|
|
BOOL _convertHTMLValue=NO;
|
|
BOOL _convertHTMLEntitiesValue=NO;
|
|
NSFormatter* _formatter=[self formatterForComponent:_component
|
|
value:_valueValue];
|
|
if (!_formatter)
|
|
{
|
|
_formattedValue=_valueValue;
|
|
}
|
|
else
|
|
{
|
|
_formattedValue=[_formatter stringForObjectValue:_valueValue];
|
|
};
|
|
|
|
if (!WOStrictFlag && convertHTML)
|
|
_convertHTMLValue=[self evaluateCondition:convertHTML
|
|
inContext:context_];
|
|
if (!WOStrictFlag)
|
|
{
|
|
if (!_convertHTMLValue)
|
|
{
|
|
if (convertHTMLEntities)
|
|
_convertHTMLEntitiesValue=[self evaluateCondition:convertHTMLEntities
|
|
inContext:context_];
|
|
if (!_convertHTMLEntitiesValue)
|
|
{
|
|
if (escapeHTML)
|
|
_escapeHTMLValue=[self evaluateCondition:escapeHTML
|
|
inContext:context_];
|
|
};
|
|
};
|
|
}
|
|
else if (escapeHTML)
|
|
_escapeHTMLValue=[self evaluateCondition:escapeHTML
|
|
inContext:context_];
|
|
|
|
if (!WOStrictFlag && _convertHTMLValue)
|
|
[response_ appendContentHTMLConvertString:_formattedValue];
|
|
else if (!WOStrictFlag && _convertHTMLEntitiesValue)
|
|
[response_ appendContentHTMLEntitiesConvertString:_formattedValue];
|
|
else if (_escapeHTMLValue)
|
|
[response_ appendContentHTMLString:_formattedValue];
|
|
else
|
|
[response_ appendContentString:_formattedValue];
|
|
};
|
|
NSDebugMLLog(@"gswdync",@"END ET=%@ id=%@",[self class],[context_ elementID]);
|
|
LOGObjectFnStopC("GSWString");
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(BOOL)appendStringAtRight:(id)_unkwnon
|
|
withMapping:(char*)_mapping
|
|
{
|
|
LOGObjectFnNotImplemented(); //TODOFN
|
|
return NO;
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(BOOL)appendStringAtLeft:(id)_unkwnon
|
|
withMapping:(char*)_mapping
|
|
{
|
|
LOGObjectFnNotImplemented(); //TODOFN
|
|
return NO;
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(NSFormatter*)formatterForComponent:(GSWComponent*)_component
|
|
value:(id)value_
|
|
{
|
|
//OK
|
|
id _formatValue = nil;
|
|
NSFormatter* _formatter = nil;
|
|
LOGObjectFnStartC("GSWString");
|
|
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("GSWString");
|
|
return _formatter;
|
|
};
|
|
|
|
//--------------------------------------------------------------------
|
|
-(NSString*)elementName
|
|
{
|
|
LOGObjectFnNotImplemented(); //TODOFN
|
|
return nil;
|
|
};
|
|
|
|
|
|
@end
|
|
|
|
//====================================================================
|
|
|
|
@implementation GSWString (GSWStringA)
|
|
|
|
//--------------------------------------------------------------------
|
|
+(BOOL)hasGSWebObjectsAssociations
|
|
{
|
|
return YES;
|
|
};
|
|
|
|
@end
|