mirror of
https://github.com/gnustep/libs-gsweb.git
synced 2025-02-21 02:41:04 +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
343 lines
11 KiB
Objective-C
343 lines
11 KiB
Objective-C
/** GSWMailDelivery.m - <title>GSWeb: Class GSWMailDelivery</title>
|
|
|
|
Copyright (C) 1999-2003 Free Software Foundation, Inc.
|
|
|
|
Written by: Manuel Guesdon <mguesdon@orange-concept.com>
|
|
Date: Feb 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 GSWMailDelivery
|
|
|
|
static GSWMailDelivery *sharedInstance;
|
|
|
|
|
|
+ (void)initialize
|
|
{
|
|
sharedInstance = [GSWMailDelivery new];
|
|
}
|
|
|
|
+(GSWMailDelivery*)sharedInstance
|
|
{
|
|
return sharedInstance;
|
|
};
|
|
|
|
-(NSString*)composeEmailFrom:(NSString*)sender
|
|
to:(NSArray*)to
|
|
cc:(NSArray*)cc
|
|
subject:(NSString*)subject
|
|
plainText:(NSString*)plainTextMessage
|
|
send:(BOOL)sendNow
|
|
{
|
|
NSString* emailString=nil;
|
|
LOGObjectFnStart();
|
|
NSDebugMLog(@"sender=%@",sender);
|
|
NSDebugMLog(@"to=%@",to);
|
|
NSDebugMLog(@"cc=%@",cc);
|
|
NSDebugMLog(@"subject=%@",subject);
|
|
NSDebugMLog(@"plainTextMessage=%@",plainTextMessage);
|
|
NSDebugMLog(@"sendNow=%d",(int)sendNow);
|
|
emailString=[self composeEmailFrom:sender
|
|
to:to
|
|
cc:cc
|
|
bcc:nil
|
|
subject:subject
|
|
plainText:plainTextMessage
|
|
send:sendNow];
|
|
NSDebugMLog(@"emailString=%@",emailString);
|
|
LOGObjectFnStop();
|
|
return emailString;
|
|
};
|
|
|
|
-(NSString*)composeEmailFrom:(NSString*)sender
|
|
to:(NSArray*)to
|
|
cc:(NSArray*)cc
|
|
subject:(NSString*)subject
|
|
component:(GSWComponent*)component
|
|
send:(BOOL)sendNow
|
|
{
|
|
NSString* emailString=nil;
|
|
LOGObjectFnStart();
|
|
NSDebugMLog(@"sender=%@",sender);
|
|
NSDebugMLog(@"to=%@",to);
|
|
NSDebugMLog(@"cc=%@",cc);
|
|
NSDebugMLog(@"subject=%@",subject);
|
|
NSDebugMLog(@"component=%@",component);
|
|
NSDebugMLog(@"sendNow=%d",(int)sendNow);
|
|
emailString=[self composeEmailFrom:sender
|
|
to:to
|
|
cc:cc
|
|
bcc:nil
|
|
subject:subject
|
|
component:component
|
|
send:sendNow];
|
|
NSDebugMLog(@"emailString=%@",emailString);
|
|
LOGObjectFnStop();
|
|
return emailString;
|
|
};
|
|
|
|
|
|
//NDFN
|
|
-(NSString*)composeEmailFrom:(NSString*)sender
|
|
to:(NSArray*)to
|
|
cc:(NSArray*)cc
|
|
bcc:(NSArray*)bcc
|
|
subject:(NSString*)subject
|
|
plainText:(NSString*)plainTextMessage
|
|
send:(BOOL)sendNow
|
|
{
|
|
NSString* messageString=nil;
|
|
NSMutableString* toString=nil;
|
|
int i=0;
|
|
int count=0;
|
|
LOGObjectFnStart();
|
|
NSAssert1(!to || [to isKindOfClass:[NSArray class]],@"to is a %@, not a NSArray",[to class]);
|
|
NSAssert1(!cc || [cc isKindOfClass:[NSArray class]],@"cc is a %@, not a NSArray",[cc class]);
|
|
NSAssert1(!bcc || [bcc isKindOfClass:[NSArray class]],@"bcc is a %@, not a NSArray",[bcc class]);
|
|
count=[to count];
|
|
NSDebugMLog(@"sender=%@",sender);
|
|
NSDebugMLog(@"to=%@",to);
|
|
NSDebugMLog(@"cc=%@",cc);
|
|
NSDebugMLog(@"bcc=%@",bcc);
|
|
NSDebugMLog(@"subject=%@",subject);
|
|
NSDebugMLog(@"plainTextMessage=%@",plainTextMessage);
|
|
NSDebugMLog(@"sendNow=%d",(int)sendNow);
|
|
|
|
for(i=0;i<count;i++)
|
|
{
|
|
if (!toString)
|
|
toString=(NSMutableString*)[NSMutableString stringWithFormat:@"%@",[to objectAtIndex:i]];
|
|
else
|
|
[toString appendFormat:@", %@",[to objectAtIndex:i]];
|
|
};
|
|
NSDebugMLog(@"toString=%@",toString);
|
|
messageString=[NSString stringWithFormat:@"From: %@\nTo: %@\n",sender,toString];
|
|
NSDebugMLog(@"messageString=%@",messageString);
|
|
count=[cc count];
|
|
if (count)
|
|
{
|
|
NSMutableString* ccString=nil;
|
|
for(i=0;i<count;i++)
|
|
{
|
|
if (!ccString)
|
|
ccString=(NSMutableString*)[NSMutableString stringWithFormat:@"%@",[cc objectAtIndex:i]];
|
|
else
|
|
[ccString appendFormat:@", %@",[cc objectAtIndex:i]];
|
|
};
|
|
NSDebugMLog(@"ccString=%@",ccString);
|
|
messageString=[messageString stringByAppendingFormat:@"Cc: %@\n",ccString];
|
|
NSDebugMLog(@"messageString=%@",messageString);
|
|
};
|
|
count=[bcc count];
|
|
if (count)
|
|
{
|
|
NSMutableString* bccString=nil;
|
|
for(i=0;i<count;i++)
|
|
{
|
|
if (!bccString)
|
|
bccString=(NSMutableString*)[NSMutableString stringWithFormat:@"%@",[bcc objectAtIndex:i]];
|
|
else
|
|
[bccString appendFormat:@", %@",[bcc objectAtIndex:i]];
|
|
};
|
|
NSDebugMLog(@"bccString=%@",bccString);
|
|
messageString=[messageString stringByAppendingFormat:@"Bcc: %@\n",bccString];
|
|
NSDebugMLog(@"messageString=%@",messageString);
|
|
};
|
|
messageString=[messageString stringByAppendingFormat:@"Subject: %@\n\n%@",subject,plainTextMessage];
|
|
NSDebugMLog(@"messageString=%@",messageString);
|
|
if (sendNow)
|
|
[self sendEmail:messageString];
|
|
LOGObjectFnStop();
|
|
return messageString;
|
|
};
|
|
|
|
//NDFN
|
|
// Be carefull: this call [context _generateCompleteURLs]
|
|
-(NSString*)composeEmailFrom:(NSString*)sender
|
|
to:(NSArray*)to
|
|
cc:(NSArray*)cc
|
|
bcc:(NSArray*)bcc
|
|
subject:(NSString*)subject
|
|
component:(GSWComponent*)component
|
|
send:(BOOL)sendNow
|
|
{
|
|
//TODO setting the content type of the email as Content-type: text/html.
|
|
GSWContext* context=nil;
|
|
NSString* plainTextMessage=nil;
|
|
NSString* messageString=nil;
|
|
GSWResponse* response=nil;
|
|
LOGObjectFnStart();
|
|
NSDebugMLog(@"component=%@",component);
|
|
context=[component context];
|
|
NSDebugMLog(@"context=%@",context);
|
|
[context _generateCompleteURLs];
|
|
response=[component generateResponse];
|
|
NSDebugMLog(@"response=%@",response);
|
|
plainTextMessage=[[[NSString alloc]initWithData:[response content]
|
|
encoding:[response contentEncoding]] autorelease];
|
|
NSDebugMLog(@"plainTextMessage=%@",plainTextMessage);
|
|
messageString=[self composeEmailFrom:sender
|
|
to:to
|
|
cc:cc
|
|
bcc:bcc
|
|
subject:subject
|
|
plainText:plainTextMessage
|
|
send:sendNow];
|
|
messageString=[[response content]description];
|
|
NSDebugMLog(@"messageString=%@",messageString);
|
|
LOGObjectFnStop();
|
|
return messageString;
|
|
};
|
|
|
|
|
|
-(void)sendEmail:(NSString *)emailString
|
|
{
|
|
FILE* sendmailFile=NULL;
|
|
NSString* sendmailPath=nil;
|
|
NSString* sendmailCommand=nil;
|
|
NSFileManager* fileManager=nil;
|
|
LOGObjectFnStart();
|
|
//TODO: here we should contact smtp server,... instead au using sendmail
|
|
NSDebugMLog(@"emailString=%@",emailString);
|
|
fileManager=[NSFileManager defaultManager];
|
|
NSAssert(fileManager,@"No fileManager");
|
|
sendmailPath=@"/usr/bin/sendmail";
|
|
if (![fileManager isExecutableFileAtPath:sendmailPath])
|
|
{
|
|
sendmailPath=@"/usr/lib/sendmail";
|
|
if (![fileManager isExecutableFileAtPath:sendmailPath])
|
|
{
|
|
sendmailPath=@"/usr/sbin/sendmail";
|
|
if (![fileManager isExecutableFileAtPath:sendmailPath])
|
|
{
|
|
sendmailPath=@"/bin/sendmail";
|
|
if (![fileManager isExecutableFileAtPath:sendmailPath])
|
|
{
|
|
sendmailPath=@"/sbin/sendmail";
|
|
if (![fileManager isExecutableFileAtPath:sendmailPath])
|
|
{
|
|
sendmailPath=@"/usr/local/bin/sendmail";
|
|
if (![fileManager isExecutableFileAtPath:sendmailPath])
|
|
{
|
|
sendmailPath=@"/usr/local/lib/sendmail";
|
|
if (![fileManager isExecutableFileAtPath:sendmailPath])
|
|
{
|
|
sendmailPath=@"/usr/local/sbin/sendmail";
|
|
if (![fileManager isExecutableFileAtPath:sendmailPath])
|
|
{
|
|
sendmailPath=@"sendmail"; //try without absolute path
|
|
};
|
|
};
|
|
};
|
|
};
|
|
};
|
|
};
|
|
};
|
|
};
|
|
NSDebugMLog(@"sendmailPath=%@",sendmailPath);
|
|
// -i When reading a message from standard input, don't treat a line with only a . character as the end of input.
|
|
// -t Extract recipients from message headers. This requires that no recipients be specified on the command line.
|
|
sendmailCommand=[NSString stringWithFormat:@"%@ -i -t",sendmailPath];
|
|
NSDebugMLog(@"sendmailCommand=%@",sendmailCommand);
|
|
sendmailFile=popen([sendmailCommand lossyCString],"w");
|
|
if (sendmailFile)
|
|
{
|
|
const char* cString=[emailString lossyCString];
|
|
size_t len=strlen(cString);
|
|
size_t written=fwrite(cString, sizeof(char),len,sendmailFile);
|
|
if (written!=len)
|
|
{
|
|
NSDebugMLog(@"Error writing to sendmail (written %d / %d",written,len);
|
|
};
|
|
fclose(sendmailFile);
|
|
}
|
|
else
|
|
{
|
|
NSDebugMLog(@"Can't run sendmail (%@)",sendmailCommand);
|
|
};
|
|
LOGObjectFnStop();
|
|
|
|
/* int files[2];
|
|
pid_t pid;
|
|
LOGObjectFnStart();
|
|
|
|
NSDebugMLog(@"emailString=%@",emailString);
|
|
|
|
if(pipe(files))
|
|
[NSException raise:NSInternalInconsistencyException format:@"%@ -- %@ 0x%x: cannot create pipe",
|
|
NSStringFromSelector(_cmd),
|
|
NSStringFromClass([self class]),
|
|
self];
|
|
|
|
switch(pid = fork())
|
|
{
|
|
case 0:
|
|
NSDebugMLog(@"FORK0");
|
|
close(0);
|
|
dup(files[0]);
|
|
close(files[0]);
|
|
close(files[1]);
|
|
|
|
execlp("sendmail", "sendmail", "-i", "-t", NULL);
|
|
|
|
break;
|
|
|
|
case -1:
|
|
NSDebugMLog(@"FORK-1");
|
|
close(files[0]);
|
|
close(files[1]);
|
|
[NSException raise:NSInternalInconsistencyException format:@"%@ -- %@ 0x%x: cannot fork process",
|
|
NSStringFromSelector(_cmd),
|
|
NSStringFromClass([self class]),
|
|
self];
|
|
break;
|
|
|
|
default:
|
|
NSDebugMLog(@"FORKDEF");
|
|
write(files[1], [emailString cString], strlen([emailString cString]));
|
|
close(files[0]);
|
|
close(files[1]);
|
|
|
|
waitpid(pid, NULL, 0);
|
|
break;
|
|
}
|
|
LOGObjectFnStop();
|
|
*/
|
|
};
|
|
|
|
-(void)_invokeGSWSendMailAt:(id)at
|
|
withEmail:(id)email
|
|
{
|
|
LOGObjectFnNotImplemented(); //TODOFN
|
|
};
|
|
|
|
@end
|
|
|
|
|