mirror of
https://github.com/inverse-inc/sogo.git
synced 2026-07-07 01:15:09 +00:00
see ChangeLog
Monotone-Revision: 9054022ef1ca8aeba6e34842d27d9b94ce002b89 Monotone-Author: dev-unix.inverse.qc.ca Monotone-Date: 2006-06-15T19:34:10 Monotone-Branch: ca.inverse.sogo
This commit is contained in:
dev-unix.inverse.qc.ca
@@ -0,0 +1,583 @@
|
||||
/*
|
||||
Copyright (C) 2004-2005 SKYRIX Software AG
|
||||
|
||||
This file is part of OpenGroupware.org.
|
||||
|
||||
OGo is free software; you can redistribute it and/or modify it under
|
||||
the terms of the GNU Lesser General Public License as published by the
|
||||
Free Software Foundation; either version 2, or (at your option) any
|
||||
later version.
|
||||
|
||||
OGo 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 Lesser General Public
|
||||
License for more details.
|
||||
|
||||
You should have received a copy of the GNU Lesser General Public
|
||||
License along with OGo; see the file COPYING. If not, write to the
|
||||
Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
|
||||
02111-1307, USA.
|
||||
*/
|
||||
|
||||
#include <SOGoUI/UIxComponent.h>
|
||||
|
||||
/*
|
||||
UIxMailListView
|
||||
|
||||
This component represent a list of mails and is attached to an SOGoMailFolder
|
||||
object.
|
||||
*/
|
||||
|
||||
@class EOQualifier;
|
||||
|
||||
@interface UIxMailListView : UIxComponent
|
||||
{
|
||||
NSArray *sortedUIDs; /* we always need to retrieve all anyway! */
|
||||
NSArray *messages;
|
||||
unsigned firstMessageNumber;
|
||||
id message;
|
||||
EOQualifier *qualifier;
|
||||
}
|
||||
|
||||
- (NSString *)defaultSortKey;
|
||||
- (NSString *)imap4SortKey;
|
||||
- (NSString *)imap4SortOrdering;
|
||||
|
||||
- (BOOL)isSortedDescending;
|
||||
|
||||
@end
|
||||
|
||||
#include "common.h"
|
||||
#include <SoObjects/Mailer/SOGoMailFolder.h>
|
||||
#include <SoObjects/Mailer/SOGoMailObject.h>
|
||||
#include <NGObjWeb/SoObject+SoDAV.h>
|
||||
|
||||
@implementation UIxMailListView
|
||||
|
||||
static int attachmentFlagSize = 8096;
|
||||
|
||||
- (void)dealloc {
|
||||
[self->qualifier release];
|
||||
[self->sortedUIDs release];
|
||||
[self->messages release];
|
||||
[self->message release];
|
||||
[super dealloc];
|
||||
}
|
||||
|
||||
/* frame */
|
||||
|
||||
- (BOOL)hideFrame {
|
||||
return [[[[self context] request] formValueForKey:@"noframe"] boolValue];
|
||||
}
|
||||
|
||||
/* notifications */
|
||||
|
||||
- (void)sleep {
|
||||
[self->qualifier release]; self->qualifier = nil;
|
||||
[self->sortedUIDs release]; self->sortedUIDs = nil;
|
||||
[self->messages release]; self->messages = nil;
|
||||
[self->message release]; self->message = nil;
|
||||
[super sleep];
|
||||
}
|
||||
|
||||
/* accessors */
|
||||
|
||||
- (void)setMessage:(id)_msg {
|
||||
ASSIGN(self->message, _msg);
|
||||
}
|
||||
- (id)message {
|
||||
return self->message;
|
||||
}
|
||||
|
||||
- (void)setQualifier:(EOQualifier *)_msg {
|
||||
ASSIGN(self->qualifier, _msg);
|
||||
}
|
||||
- (EOQualifier *)qualifier {
|
||||
return self->qualifier;
|
||||
}
|
||||
|
||||
- (BOOL)showToAddress {
|
||||
NSString *ftype;
|
||||
|
||||
ftype = [[self clientObject] valueForKey:@"outlookFolderClass"];
|
||||
return [ftype isEqual:@"IPF.Sent"];
|
||||
}
|
||||
|
||||
/* title */
|
||||
|
||||
- (NSString *)objectTitle {
|
||||
return [[self clientObject] nameInContainer];
|
||||
}
|
||||
- (NSString *)panelTitle {
|
||||
NSString *s;
|
||||
|
||||
s = [self labelForKey:@"View Mail Folder"];
|
||||
s = [s stringByAppendingString:@": "];
|
||||
s = [s stringByAppendingString:[self objectTitle]];
|
||||
return s;
|
||||
}
|
||||
|
||||
/* derived accessors */
|
||||
|
||||
- (BOOL)isMessageDeleted {
|
||||
NSArray *flags;
|
||||
|
||||
flags = [[self message] valueForKey:@"flags"];
|
||||
return [flags containsObject:@"deleted"];
|
||||
}
|
||||
|
||||
- (BOOL)isMessageRead {
|
||||
NSArray *flags;
|
||||
|
||||
flags = [[self message] valueForKey:@"flags"];
|
||||
return [flags containsObject:@"seen"];
|
||||
}
|
||||
- (NSString *)messageUidString {
|
||||
return [[[self message] valueForKey:@"uid"] stringValue];
|
||||
}
|
||||
|
||||
- (NSString *)messageSubjectStyleClass {
|
||||
return [self isMessageRead]
|
||||
? @"mailer_readmailsubject"
|
||||
: @"mailer_unreadmailsubject";
|
||||
}
|
||||
- (NSString *)messageCellStyleClass {
|
||||
return [self isMessageDeleted]
|
||||
? @"mailer_listcell_deleted"
|
||||
: @"mailer_listcell_regular";
|
||||
}
|
||||
|
||||
- (BOOL)hasMessageAttachment {
|
||||
/* we detect attachments by size ... */
|
||||
unsigned size;
|
||||
|
||||
size = [[[self message] valueForKey:@"size"] intValue];
|
||||
return size > attachmentFlagSize;
|
||||
}
|
||||
|
||||
/* fetching messages */
|
||||
|
||||
- (NSArray *)fetchKeys {
|
||||
/* Note: see SOGoMailManager.m for allowed IMAP4 keys */
|
||||
static NSArray *keys = nil;
|
||||
if (keys == nil) {
|
||||
keys = [[NSArray alloc] initWithObjects:
|
||||
@"FLAGS", @"ENVELOPE", @"RFC822.SIZE", nil];
|
||||
}
|
||||
return keys;
|
||||
}
|
||||
|
||||
- (NSString *)defaultSortKey {
|
||||
return @"DATE";
|
||||
}
|
||||
- (NSString *)imap4SortKey {
|
||||
NSString *sort;
|
||||
|
||||
sort = [[[self context] request] formValueForKey:@"sort"];
|
||||
|
||||
if ([sort length] == 0)
|
||||
sort = [self defaultSortKey];
|
||||
return [sort uppercaseString];
|
||||
}
|
||||
|
||||
- (BOOL)isSortedDescending {
|
||||
NSString *desc;
|
||||
|
||||
desc = [[[self context] request] formValueForKey:@"desc"];
|
||||
if(!desc)
|
||||
return NO;
|
||||
return [desc boolValue] ? YES : NO;
|
||||
}
|
||||
|
||||
- (NSString *)imap4SortOrdering {
|
||||
NSString *sort;
|
||||
|
||||
sort = [self imap4SortKey];
|
||||
if(![self isSortedDescending])
|
||||
return sort;
|
||||
return [@"REVERSE " stringByAppendingString:sort];
|
||||
}
|
||||
|
||||
- (NSRange)fetchRange {
|
||||
if (self->firstMessageNumber == 0)
|
||||
return NSMakeRange(0, 50);
|
||||
return NSMakeRange(self->firstMessageNumber - 1, 50);
|
||||
}
|
||||
|
||||
- (NSArray *)sortedUIDs {
|
||||
if (self->sortedUIDs != nil)
|
||||
return self->sortedUIDs;
|
||||
|
||||
self->sortedUIDs
|
||||
= [[[self clientObject] fetchUIDsMatchingQualifier:[self qualifier]
|
||||
sortOrdering:[self imap4SortOrdering]] retain];
|
||||
return self->sortedUIDs;
|
||||
}
|
||||
- (unsigned int)totalMessageCount {
|
||||
return [self->sortedUIDs count];
|
||||
}
|
||||
- (BOOL)showsAllMessages {
|
||||
return ([[self sortedUIDs] count] <= [self fetchRange].length) ? YES : NO;
|
||||
}
|
||||
|
||||
- (NSRange)fetchBlock {
|
||||
NSRange r;
|
||||
unsigned len;
|
||||
NSArray *uids;
|
||||
|
||||
r = [self fetchRange];
|
||||
uids = [self sortedUIDs];
|
||||
|
||||
/* only need to restrict if we have a lot */
|
||||
if ((len = [uids count]) <= r.length) {
|
||||
r.location = 0;
|
||||
r.length = len;
|
||||
return r;
|
||||
}
|
||||
|
||||
if (len < r.location) {
|
||||
// TODO: CHECK CONDITION (< vs <=)
|
||||
/* out of range, recover at first block */
|
||||
r.location = 0;
|
||||
return r;
|
||||
}
|
||||
|
||||
if (r.location + r.length > len)
|
||||
r.length = len - r.location;
|
||||
return r;
|
||||
}
|
||||
- (unsigned int)firstMessageNumber {
|
||||
return [self fetchBlock].location + 1;
|
||||
}
|
||||
- (unsigned int)lastMessageNumber {
|
||||
NSRange r;
|
||||
|
||||
r = [self fetchBlock];
|
||||
return r.location + r.length;
|
||||
}
|
||||
- (BOOL)hasPrevious {
|
||||
return [self fetchBlock].location == 0 ? NO : YES;
|
||||
}
|
||||
- (BOOL)hasNext {
|
||||
NSRange r = [self fetchBlock];
|
||||
return r.location + r.length >= [[self sortedUIDs] count] ? NO : YES;
|
||||
}
|
||||
|
||||
- (unsigned int)nextFirstMessageNumber {
|
||||
return [self firstMessageNumber] + [self fetchRange].length;
|
||||
}
|
||||
- (unsigned int)prevFirstMessageNumber {
|
||||
NSRange r;
|
||||
unsigned idx;
|
||||
|
||||
idx = [self firstMessageNumber];
|
||||
r = [self fetchRange];
|
||||
if (idx > r.length)
|
||||
return (idx - r.length);
|
||||
return 1;
|
||||
}
|
||||
|
||||
- (NSArray *)messages {
|
||||
NSArray *uids;
|
||||
NSArray *msgs;
|
||||
NSRange r;
|
||||
unsigned len;
|
||||
|
||||
if (self->messages != nil)
|
||||
return self->messages;
|
||||
|
||||
r = [self fetchBlock];
|
||||
uids = [self sortedUIDs];
|
||||
if ((len = [uids count]) > r.length)
|
||||
/* only need to restrict if we have a lot */
|
||||
uids = [uids subarrayWithRange:r];
|
||||
|
||||
msgs = [[self clientObject] fetchUIDs:uids parts:[self fetchKeys]];
|
||||
self->messages = [[msgs valueForKey:@"fetch"] retain];
|
||||
return self->messages;
|
||||
}
|
||||
|
||||
/* URL processing */
|
||||
|
||||
- (NSString *)messageViewTarget {
|
||||
return [@"SOGo_msg_" stringByAppendingString:[self messageUidString]];
|
||||
}
|
||||
- (NSString *)messageViewURL {
|
||||
// TODO: noframe only when view-target is empty
|
||||
// TODO: markread only if the message is unread
|
||||
NSString *s;
|
||||
|
||||
s = [[self messageUidString] stringByAppendingString:@"/view?noframe=1"];
|
||||
if (![self isMessageRead]) s = [s stringByAppendingString:@"&markread=1"];
|
||||
return s;
|
||||
}
|
||||
- (NSString *)markReadURL {
|
||||
return [@"markMessageRead?uid=" stringByAppendingString:
|
||||
[self messageUidString]];
|
||||
}
|
||||
- (NSString *)markUnreadURL {
|
||||
return [@"markMessageUnread?uid=" stringByAppendingString:
|
||||
[self messageUidString]];
|
||||
}
|
||||
|
||||
/* JavaScript */
|
||||
|
||||
- (NSString *)msgRowID {
|
||||
return [@"row_" stringByAppendingString:[self messageUidString]];
|
||||
}
|
||||
- (NSString *)msgDivID {
|
||||
return [@"div_" stringByAppendingString:[self messageUidString]];
|
||||
}
|
||||
|
||||
- (NSString *)msgIconReadDivID {
|
||||
return [@"readdiv_" stringByAppendingString:[self messageUidString]];
|
||||
}
|
||||
- (NSString *)msgIconUnreadDivID {
|
||||
return [@"unreaddiv_" stringByAppendingString:[self messageUidString]];
|
||||
}
|
||||
- (NSString *)msgIconReadVisibility {
|
||||
return [self isMessageRead] ? nil : @"display: none;";
|
||||
}
|
||||
- (NSString *)msgIconUnreadVisibility {
|
||||
return [self isMessageRead] ? @"display: none;" : nil;
|
||||
}
|
||||
|
||||
- (NSString *)clickedMsgJS {
|
||||
/* return 'false' aborts processing */
|
||||
return [NSString stringWithFormat:@"clickedUid(this, '%@'); return false",
|
||||
[self messageUidString]];
|
||||
}
|
||||
|
||||
// the following are unused?
|
||||
- (NSString *)dblClickedMsgJS {
|
||||
return [NSString stringWithFormat:@"doubleClickedUid(this, '%@')",
|
||||
[self messageUidString]];
|
||||
}
|
||||
|
||||
// the following are unused?
|
||||
- (NSString *)highlightRowJS {
|
||||
return [NSString stringWithFormat:@"highlightUid(this, '%@')",
|
||||
[self messageUidString]];
|
||||
}
|
||||
- (NSString *)lowlightRowJS {
|
||||
return [NSString stringWithFormat:@"lowlightUid(this, '%@')",
|
||||
[self messageUidString]];
|
||||
}
|
||||
|
||||
- (NSString *)markUnreadJS {
|
||||
return [NSString stringWithFormat:
|
||||
@"mailListMarkMessage(this, 'markMessageUnread', "
|
||||
@"'%@', false)",
|
||||
[self messageUidString]];
|
||||
}
|
||||
- (NSString *)markReadJS {
|
||||
return [NSString stringWithFormat:
|
||||
@"mailListMarkMessage(this, 'markMessageRead', "
|
||||
@"'%@', true)",
|
||||
[self messageUidString]];
|
||||
}
|
||||
|
||||
/* error redirects */
|
||||
|
||||
- (id)redirectToViewWithError:(id)_error {
|
||||
// TODO: DUP in UIxMailAccountView
|
||||
// TODO: improve, localize
|
||||
// TODO: there is a bug in the treeview which preserves the current URL for
|
||||
// the active object (displaying the error again)
|
||||
id url;
|
||||
|
||||
if (![_error isNotNull])
|
||||
return [self redirectToLocation:@"view"];
|
||||
|
||||
if ([_error isKindOfClass:[NSException class]])
|
||||
_error = [_error reason];
|
||||
else if ([_error isKindOfClass:[NSString class]])
|
||||
_error = [_error stringValue];
|
||||
|
||||
url = [_error stringByEscapingURL];
|
||||
url = [@"view?error=" stringByAppendingString:url];
|
||||
return [self redirectToLocation:url];
|
||||
}
|
||||
|
||||
/* active message */
|
||||
|
||||
- (SOGoMailObject *)lookupActiveMessage {
|
||||
NSString *uid;
|
||||
|
||||
if ((uid = [[[self context] request] formValueForKey:@"uid"]) == nil)
|
||||
return nil;
|
||||
|
||||
return [[self clientObject] lookupName:uid inContext:[self context]
|
||||
acquire:NO];
|
||||
}
|
||||
|
||||
/* actions */
|
||||
|
||||
- (id)defaultAction {
|
||||
self->firstMessageNumber =
|
||||
[[[[self context] request] formValueForKey:@"idx"] intValue];
|
||||
return self;
|
||||
}
|
||||
|
||||
- (BOOL)isJavaScriptRequest {
|
||||
return [[[[self context] request] formValueForKey:@"jsonly"] boolValue];
|
||||
}
|
||||
- (id)javaScriptOK {
|
||||
WOResponse *r;
|
||||
|
||||
r = [[self context] response];
|
||||
[r setStatus:200 /* OK */];
|
||||
return r;
|
||||
}
|
||||
|
||||
- (id)markMessageUnreadAction {
|
||||
NSException *error;
|
||||
|
||||
if ((error = [[self lookupActiveMessage] removeFlags:@"seen"]) != nil)
|
||||
// TODO: improve error handling
|
||||
return error;
|
||||
|
||||
if ([self isJavaScriptRequest])
|
||||
return [self javaScriptOK];
|
||||
|
||||
return [self redirectToLocation:@"view"];
|
||||
}
|
||||
- (id)markMessageReadAction {
|
||||
NSException *error;
|
||||
|
||||
if ((error = [[self lookupActiveMessage] addFlags:@"seen"]) != nil)
|
||||
// TODO: improve error handling
|
||||
return error;
|
||||
|
||||
if ([self isJavaScriptRequest])
|
||||
return [self javaScriptOK];
|
||||
|
||||
return [self redirectToLocation:@"view"];
|
||||
}
|
||||
|
||||
- (id)getMailAction {
|
||||
// TODO: we might want to flush the caches?
|
||||
id client;
|
||||
|
||||
if ((client = [self clientObject]) == nil) {
|
||||
return [NSException exceptionWithHTTPStatus:404 /* Not Found */
|
||||
reason:@"did not find mail folder"];
|
||||
}
|
||||
|
||||
if (![client respondsToSelector:@selector(flushMailCaches)]) {
|
||||
return [NSException exceptionWithHTTPStatus:500 /* Server Error */
|
||||
reason:
|
||||
@"invalid client object (does not support flush)"];
|
||||
}
|
||||
|
||||
[client flushMailCaches];
|
||||
return [self redirectToLocation:@"view"];
|
||||
}
|
||||
|
||||
- (id)expungeAction {
|
||||
// TODO: we might want to flush the caches?
|
||||
NSException *error;
|
||||
id client;
|
||||
|
||||
if ((client = [self clientObject]) == nil) {
|
||||
return [NSException exceptionWithHTTPStatus:404 /* Not Found */
|
||||
reason:@"did not find mail folder"];
|
||||
}
|
||||
|
||||
if ((error = [[self clientObject] expunge]) != nil)
|
||||
return error;
|
||||
|
||||
if ([client respondsToSelector:@selector(flushMailCaches)])
|
||||
[client flushMailCaches];
|
||||
return [self redirectToLocation:@"view"];
|
||||
}
|
||||
|
||||
- (id)emptyTrashAction {
|
||||
// TODO: we might want to flush the caches?
|
||||
NSException *error;
|
||||
id client;
|
||||
|
||||
if ((client = [self clientObject]) == nil) {
|
||||
error = [NSException exceptionWithHTTPStatus:404 /* Not Found */
|
||||
reason:@"did not find mail folder"];
|
||||
return [self redirectToViewWithError:error];
|
||||
}
|
||||
|
||||
if (![client isKindOfClass:NSClassFromString(@"SOGoTrashFolder")]) {
|
||||
/* would be better to move the method to an own class, but well .. */
|
||||
error = [NSException exceptionWithHTTPStatus:400 /* Bad Request */
|
||||
reason:@"method cannot be invoked on "
|
||||
@"the specified object"];
|
||||
return [self redirectToViewWithError:error];
|
||||
}
|
||||
|
||||
/* mark all as deleted */
|
||||
|
||||
[self logWithFormat:@"TODO: must mark all as deleted for empty-trash"];
|
||||
|
||||
error = [[self clientObject] addFlagsToAllMessages:@"deleted"];
|
||||
if (error != nil)
|
||||
// TODO: improve error
|
||||
return [self redirectToViewWithError:error];
|
||||
|
||||
/* expunge */
|
||||
|
||||
if ((error = [[self clientObject] expunge]) != nil)
|
||||
// TODO: improve error
|
||||
return [self redirectToViewWithError:error];
|
||||
|
||||
if ([client respondsToSelector:@selector(flushMailCaches)])
|
||||
[client flushMailCaches];
|
||||
return [self redirectToLocation:@"view"];
|
||||
}
|
||||
|
||||
/* folder operations */
|
||||
|
||||
- (id)createFolderAction {
|
||||
NSException *error;
|
||||
NSString *folderName;
|
||||
id client;
|
||||
|
||||
folderName = [[[self context] request] formValueForKey:@"name"];
|
||||
if ([folderName length] == 0) {
|
||||
error = [NSException exceptionWithHTTPStatus:400 /* Bad Request */
|
||||
reason:@"missing 'name' query parameter!"];
|
||||
return [self redirectToViewWithError:error];
|
||||
}
|
||||
|
||||
if ((client = [self clientObject]) == nil) {
|
||||
error = [NSException exceptionWithHTTPStatus:404 /* Not Found */
|
||||
reason:@"did not find mail folder"];
|
||||
return [self redirectToViewWithError:error];
|
||||
}
|
||||
|
||||
if ((error = [[self clientObject] davCreateCollection:folderName
|
||||
inContext:[self context]]) != nil) {
|
||||
return [self redirectToViewWithError:error];
|
||||
}
|
||||
|
||||
return [self redirectToLocation:[folderName stringByAppendingString:@"/"]];
|
||||
}
|
||||
|
||||
- (id)deleteFolderAction {
|
||||
NSException *error;
|
||||
NSString *url;
|
||||
id client;
|
||||
|
||||
if ((client = [self clientObject]) == nil) {
|
||||
error = [NSException exceptionWithHTTPStatus:404 /* Not Found */
|
||||
reason:@"did not find mail folder"];
|
||||
return [self redirectToViewWithError:error];
|
||||
}
|
||||
|
||||
/* jump to parent folder afterwards */
|
||||
url = [[client container] baseURLInContext:[self context]];
|
||||
if (![url hasSuffix:@"/"]) url = [url stringByAppendingString:@"/"];
|
||||
|
||||
if ((error = [[self clientObject] delete]) != nil)
|
||||
return [self redirectToViewWithError:error];
|
||||
|
||||
return [self redirectToLocation:url];
|
||||
}
|
||||
|
||||
@end /* UIxMailListView */
|
||||
Reference in New Issue
Block a user