778658c75a
Monotone-Parent: 4ebf80607b2a71f3b2192bd3ba8c310f15bd37f5 Monotone-Revision: 8b8f40b39b92d25a5eb1161d5efe0bd91fd3e207 Monotone-Author: ludovic@Sophos.ca Monotone-Date: 2007-10-10T18:44:26 Monotone-Branch: ca.inverse.sogo
444 lines
12 KiB
Objective-C
444 lines
12 KiB
Objective-C
/*
|
|
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.
|
|
*/
|
|
|
|
#import <Foundation/NSArray.h>
|
|
#import <Foundation/NSString.h>
|
|
|
|
#import <NGObjWeb/NSException+HTTP.h>
|
|
#import <NGObjWeb/SoObject+SoDAV.h>
|
|
#import <NGObjWeb/WOContext.h>
|
|
#import <NGObjWeb/WORequest.h>
|
|
#import <NGExtensions/NSObject+Logs.h>
|
|
#import <EOControl/EOQualifier.h>
|
|
#import <EOControl/EOSortOrdering.h>
|
|
#import <GDLContentStore/GCSFolder.h>
|
|
#import <DOM/DOMProtocols.h>
|
|
#import <SaxObjC/SaxObjC.h>
|
|
#import <SaxObjC/XMLNamespaces.h>
|
|
|
|
#import <SoObjects/SOGo/NSDictionary+Utilities.h>
|
|
#import "SOGoContactGCSEntry.h"
|
|
#import "SOGoContactGCSFolder.h"
|
|
|
|
#define folderListingFields [NSArray arrayWithObjects: @"c_name", @"c_cn", \
|
|
@"c_givenname", @"c_sn", @"c_screenname", \
|
|
@"c_o", @"c_mail", @"c_telephonenumber", \
|
|
nil]
|
|
|
|
@implementation SOGoContactGCSFolder
|
|
|
|
/* name lookup */
|
|
|
|
- (id <SOGoContactObject>) lookupContactWithId: (NSString *) recordId
|
|
{
|
|
SOGoContactGCSEntry *contact;
|
|
|
|
if ([recordId length] > 0)
|
|
contact = [SOGoContactGCSEntry objectWithName: recordId
|
|
inContainer: self];
|
|
else
|
|
contact = nil;
|
|
|
|
return contact;
|
|
}
|
|
|
|
- (id) lookupName: (NSString *) _key
|
|
inContext: (WOContext *) _ctx
|
|
acquire: (BOOL) _flag
|
|
{
|
|
id obj;
|
|
BOOL isPut;
|
|
|
|
isPut = NO;
|
|
obj = [super lookupName:_key inContext:_ctx acquire:NO];
|
|
if (!obj)
|
|
{
|
|
if ([[[_ctx request] method] isEqualToString: @"PUT"])
|
|
{
|
|
if ([_key isEqualToString: @"PUT"])
|
|
isPut = YES;
|
|
else
|
|
obj = [SOGoContactGCSEntry objectWithName: _key
|
|
inContainer: self];
|
|
}
|
|
else
|
|
obj = [self lookupContactWithId: _key];
|
|
}
|
|
// if (!(obj || isPut))
|
|
// obj = [NSException exceptionWithHTTPStatus:404 /* Not Found */];
|
|
|
|
// #if 0
|
|
// if ([[self ocsFolder] versionOfContentWithName:_key])
|
|
// #endif
|
|
// return [self contactWithName:_key inContext:_ctx];
|
|
// }
|
|
|
|
/* return 404 to stop acquisition */
|
|
return obj;
|
|
}
|
|
|
|
/* fetching */
|
|
- (EOQualifier *) _qualifierForFilter: (NSString *) filter
|
|
{
|
|
NSString *qs;
|
|
EOQualifier *qualifier;
|
|
|
|
if (filter && [filter length] > 0)
|
|
{
|
|
#warning why we do not use %%%@%% everywhere?
|
|
qs = [NSString stringWithFormat:
|
|
@"(c_sn isCaseInsensitiveLike: '%@%%') OR "
|
|
@"(c_givenname isCaseInsensitiveLike: '%@%%') OR "
|
|
@"(c_mail isCaseInsensitiveLike: '%@%%') OR "
|
|
@"(c_telephonenumber isCaseInsensitiveLike: '%%%@%%')",
|
|
filter, filter, filter, filter];
|
|
qualifier = [EOQualifier qualifierWithQualifierFormat: qs];
|
|
}
|
|
else
|
|
qualifier = nil;
|
|
|
|
return qualifier;
|
|
}
|
|
|
|
- (NSArray *) _flattenedRecords: (NSArray *) records
|
|
{
|
|
NSMutableArray *newRecords;
|
|
NSEnumerator *oldRecords;
|
|
NSDictionary *oldRecord;
|
|
NSMutableDictionary *newRecord;
|
|
NSString *data;
|
|
|
|
newRecords = [NSMutableArray arrayWithCapacity: [records count]];
|
|
|
|
oldRecords = [records objectEnumerator];
|
|
oldRecord = [oldRecords nextObject];
|
|
while (oldRecord)
|
|
{
|
|
newRecord = [NSMutableDictionary new];
|
|
[newRecord autorelease];
|
|
|
|
[newRecord setObject: [oldRecord objectForKey: @"c_name"]
|
|
forKey: @"c_uid"];
|
|
[newRecord setObject: [oldRecord objectForKey: @"c_name"]
|
|
forKey: @"c_name"];
|
|
|
|
data = [oldRecord objectForKey: @"c_cn"];
|
|
if (![data length])
|
|
data = [oldRecord keysWithFormat: @"%{c_givenname} %{c_sn}"];
|
|
[newRecord setObject: data
|
|
forKey: @"displayName"];
|
|
|
|
data = [oldRecord objectForKey: @"c_mail"];
|
|
if (!data)
|
|
data = @"";
|
|
[newRecord setObject: data forKey: @"mail"];
|
|
|
|
data = [oldRecord objectForKey: @"c_screenname"];
|
|
if (!data)
|
|
data = @"";
|
|
[newRecord setObject: data forKey: @"screenName"];
|
|
|
|
data = [oldRecord objectForKey: @"c_o"];
|
|
if (!data)
|
|
data = @"";
|
|
[newRecord setObject: data forKey: @"org"];
|
|
|
|
data = [oldRecord objectForKey: @"c_telephonenumber"];
|
|
if (![data length])
|
|
data = @"";
|
|
[newRecord setObject: data forKey: @"phone"];
|
|
|
|
[newRecords addObject: newRecord];
|
|
oldRecord = [oldRecords nextObject];
|
|
}
|
|
|
|
return newRecords;
|
|
}
|
|
|
|
- (BOOL) _isValidFilter: (NSString *) theString
|
|
{
|
|
if ([theString caseInsensitiveCompare: @"sn"] == NSOrderedSame)
|
|
return YES;
|
|
|
|
if ([theString caseInsensitiveCompare: @"givenname"] == NSOrderedSame)
|
|
return YES;
|
|
|
|
if ([theString caseInsensitiveCompare: @"mail"] == NSOrderedSame)
|
|
return YES;
|
|
|
|
if ([theString caseInsensitiveCompare: @"telephonenumber"] == NSOrderedSame)
|
|
return YES;
|
|
|
|
return NO;
|
|
}
|
|
|
|
- (NSDictionary *) _parseContactFilter: (id <DOMElement>) filterElement
|
|
{
|
|
NSMutableDictionary *filterData;
|
|
id <DOMNode> parentNode;
|
|
id <DOMNodeList> ranges;
|
|
NSString *componentName;
|
|
|
|
parentNode = [filterElement parentNode];
|
|
|
|
if ([[parentNode tagName] isEqualToString: @"filter"] &&
|
|
[self _isValidFilter: [filterElement attribute: @"name"]])
|
|
{
|
|
ranges = [filterElement getElementsByTagName: @"text-match"];
|
|
|
|
if ([ranges count] && [[[ranges objectAtIndex: 0] childNodes] count])
|
|
{
|
|
filterData = [NSMutableDictionary new];
|
|
[filterData autorelease];
|
|
[filterData setObject: [[[[ranges objectAtIndex: 0] childNodes] lastObject] data]
|
|
forKey: [filterElement attribute: @"name"]];
|
|
}
|
|
}
|
|
else
|
|
filterData = nil;
|
|
|
|
return filterData;
|
|
}
|
|
|
|
#warning filters is leaked here
|
|
- (NSArray *) _parseContactFilters: (id <DOMElement>) parentNode
|
|
{
|
|
NSEnumerator *children;
|
|
id<DOMElement> node;
|
|
NSMutableArray *filters;
|
|
NSDictionary *filter;
|
|
|
|
filters = [NSMutableArray new];
|
|
|
|
children = [[parentNode getElementsByTagName: @"prop-filter"]
|
|
objectEnumerator];
|
|
|
|
node = [children nextObject];
|
|
|
|
while (node)
|
|
{
|
|
filter = [self _parseContactFilter: node];
|
|
if (filter)
|
|
[filters addObject: filter];
|
|
node = [children nextObject];
|
|
}
|
|
|
|
return filters;
|
|
}
|
|
|
|
- (void) _appendComponentsMatchingFilters: (NSArray *) filters
|
|
toResponse: (WOResponse *) response
|
|
{
|
|
unsigned int count, max;
|
|
NSDictionary *currentFilter, *contact;
|
|
NSEnumerator *contacts;
|
|
NSString *baseURL;
|
|
|
|
baseURL = [self baseURLInContext: context];
|
|
|
|
max = [filters count];
|
|
for (count = 0; count < max; count++)
|
|
{
|
|
currentFilter = [filters objectAtIndex: count];
|
|
contacts = [[self lookupContactsWithFilter: [[currentFilter allValues] lastObject]
|
|
sortBy: @"c_givenname"
|
|
ordering: NSOrderedDescending]
|
|
objectEnumerator];
|
|
|
|
while ((contact = [contacts nextObject]))
|
|
{
|
|
[self appendObject: contact
|
|
withBaseURL: baseURL
|
|
toREPORTResponse: response];
|
|
}
|
|
}
|
|
}
|
|
|
|
- (void) appendObject: (NSDictionary *) object
|
|
withBaseURL: (NSString *) baseURL
|
|
toREPORTResponse: (WOResponse *) r
|
|
{
|
|
SOGoContactGCSEntry *component;
|
|
Class componentClass;
|
|
NSString *name, *etagLine, *contactString;
|
|
|
|
name = [object objectForKey: @"c_name"];
|
|
componentClass = [SOGoContactGCSEntry class];
|
|
|
|
component = [componentClass objectWithName: name inContainer: self];
|
|
|
|
[r appendContentString: @" <D:response>\r\n"];
|
|
[r appendContentString: @" <D:href>"];
|
|
[r appendContentString: baseURL];
|
|
if (![baseURL hasSuffix: @"/"])
|
|
[r appendContentString: @"/"];
|
|
[r appendContentString: name];
|
|
[r appendContentString: @"</D:href>\r\n"];
|
|
|
|
[r appendContentString: @" <D:propstat>\r\n"];
|
|
[r appendContentString: @" <D:prop>\r\n"];
|
|
etagLine = [NSString stringWithFormat: @" <D:getetag>%@</D:getetag>\r\n",
|
|
[component davEntityTag]];
|
|
[r appendContentString: etagLine];
|
|
[r appendContentString: @" </D:prop>\r\n"];
|
|
[r appendContentString: @" <D:status>HTTP/1.1 200 OK</D:status>\r\n"];
|
|
[r appendContentString: @" </D:propstat>\r\n"];
|
|
[r appendContentString: @" <C:addressbook-data>"];
|
|
contactString = [[component contentAsString] stringByEscapingXMLString];
|
|
[r appendContentString: contactString];
|
|
[r appendContentString: @"</C:addressbook-data>\r\n"];
|
|
[r appendContentString: @" </D:response>\r\n"];
|
|
}
|
|
|
|
- (NSArray *) lookupContactsWithFilter: (NSString *) filter
|
|
sortBy: (NSString *) sortKey
|
|
ordering: (NSComparisonResult) sortOrdering
|
|
{
|
|
NSArray *fields, *dbRecords, *records;
|
|
EOQualifier *qualifier;
|
|
EOSortOrdering *ordering;
|
|
|
|
fields = folderListingFields;
|
|
qualifier = [self _qualifierForFilter: filter];
|
|
dbRecords = [[self ocsFolder] fetchFields: fields
|
|
matchingQualifier: qualifier];
|
|
|
|
if ([dbRecords count] > 0)
|
|
{
|
|
records = [self _flattenedRecords: dbRecords];
|
|
ordering
|
|
= [EOSortOrdering sortOrderingWithKey: sortKey
|
|
selector: ((sortOrdering == NSOrderedDescending)
|
|
? EOCompareCaseInsensitiveDescending
|
|
: EOCompareCaseInsensitiveAscending)];
|
|
records
|
|
= [records sortedArrayUsingKeyOrderArray:
|
|
[NSArray arrayWithObject: ordering]];
|
|
}
|
|
else
|
|
records = nil;
|
|
// else
|
|
// [self errorWithFormat:@"(%s): fetch failed!", __PRETTY_FUNCTION__];
|
|
|
|
[self debugWithFormat:@"fetched %i records.", [records count]];
|
|
return records;
|
|
}
|
|
|
|
- (NSArray *) davNamespaces
|
|
{
|
|
return [NSArray arrayWithObject: @"urn:ietf:params:xml:ns:carddav"];
|
|
}
|
|
|
|
- (id) davAddressbookQuery: (id) queryContext
|
|
{
|
|
WOResponse *r;
|
|
NSArray *filters;
|
|
id <DOMDocument> document;
|
|
|
|
r = [context response];
|
|
[r setStatus: 207];
|
|
[r setContentEncoding: NSUTF8StringEncoding];
|
|
[r setHeader: @"text/xml; charset=\"utf-8\"" forKey: @"content-type"];
|
|
[r setHeader: @"no-cache" forKey: @"pragma"];
|
|
[r setHeader: @"no-cache" forKey: @"cache-control"];
|
|
[r appendContentString:@"<?xml version=\"1.0\" encoding=\"utf-8\"?>\r\n"];
|
|
[r appendContentString: @"<D:multistatus xmlns:D=\"DAV:\""
|
|
@" xmlns:C=\"urn:ietf:params:xml:ns:carddav\">\r\n"];
|
|
|
|
document = [[context request] contentAsDOMDocument];
|
|
filters = [self _parseContactFilters: [document documentElement]];
|
|
|
|
[self _appendComponentsMatchingFilters: filters
|
|
toResponse: r];
|
|
[r appendContentString:@"</D:multistatus>\r\n"];
|
|
|
|
return r;
|
|
}
|
|
|
|
- (NSArray *) davComplianceClassesInContext: (id)_ctx
|
|
{
|
|
NSMutableArray *classes;
|
|
NSArray *primaryClasses;
|
|
|
|
classes = [NSMutableArray new];
|
|
[classes autorelease];
|
|
|
|
primaryClasses = [super davComplianceClassesInContext: _ctx];
|
|
if (primaryClasses)
|
|
[classes addObjectsFromArray: primaryClasses];
|
|
[classes addObject: @"access-control"];
|
|
[classes addObject: @"addressbook-access"];
|
|
|
|
return classes;
|
|
}
|
|
|
|
- (NSString *) groupDavResourceType
|
|
{
|
|
return @"vcard-collection";
|
|
}
|
|
|
|
// /* GET */
|
|
|
|
// - (id) GETAction: (id)_ctx
|
|
// {
|
|
// // TODO: I guess this should really be done by SOPE (redirect to
|
|
// // default method)
|
|
// WOResponse *r;
|
|
// NSString *uri;
|
|
|
|
// uri = [[_ctx request] uri];
|
|
// if (![uri hasSuffix:@"/"]) uri = [uri stringByAppendingString:@"/"];
|
|
// uri = [uri stringByAppendingString:@"view"];
|
|
|
|
// r = [_ctx response];
|
|
// [r setStatus:302 /* moved */];
|
|
// [r setHeader:uri forKey:@"location"];
|
|
// return r;
|
|
// }
|
|
|
|
/* sorting */
|
|
- (NSComparisonResult) compare: (id) otherFolder
|
|
{
|
|
NSComparisonResult comparison;
|
|
|
|
if ([NSStringFromClass([otherFolder class])
|
|
isEqualToString: @"SOGoContactLDAPFolder"])
|
|
comparison = NSOrderedAscending;
|
|
else
|
|
comparison = [super compare: otherFolder];
|
|
|
|
return comparison;
|
|
}
|
|
|
|
/* folder type */
|
|
|
|
- (NSString *) folderType
|
|
{
|
|
return @"Contact";
|
|
}
|
|
|
|
- (NSString *) outlookFolderClass
|
|
{
|
|
return @"IPF.Contact";
|
|
}
|
|
|
|
@end /* SOGoContactGCSFolder */
|