sogo/Misc/db/tests/znek/lmail.m
dev-unix.inverse.qc.ca f18c764ffa see ChangeLog
Monotone-Revision: 9054022ef1ca8aeba6e34842d27d9b94ce002b89

Monotone-Author: dev-unix.inverse.qc.ca
Monotone-Date: 2006-06-15T19:34:10
Monotone-Branch: ca.inverse.sogo
2006-06-15 19:34:10 +00:00

62 lines
1.7 KiB
Objective-C

/*
@DISCLAIMER@
*/
// $Id$
#import <Foundation/Foundation.h>
#define DEBUG 0
#define ALL_RECORDS @"/home/znek/all-BALI.plist"
#ifndef MAX
#define MAX(a,b) (((a)>(b))?(a):(b))
#endif
int main(int argc, char **argv, char **env) {
NSAutoreleasePool *pool;
NSArray *records;
unsigned int i, count, maxMailtoLength, maxDNLength, maxCNLength;
NSString *longestMailto, *longestCN, *longestDN;
pool = [[NSAutoreleasePool alloc] init];
#if LIB_FOUNDATION_LIBRARY
[NSProcessInfo initializeWithArguments:argv count:argc environment:env];
#endif
records = [NSArray arrayWithContentsOfFile:ALL_RECORDS];
count = [records count];
maxMailtoLength = 0;
maxDNLength = maxCNLength = 0;
for(i = 0; i < count; i++) {
NSDictionary *d;
NSString *value;
unsigned length;
d = [records objectAtIndex:i];
value = [d objectForKey:@"mailto"];
length = [value length];
maxMailtoLength = MAX(maxMailtoLength, length);
if(length == maxMailtoLength)
longestMailto = value;
value = [d objectForKey:@"DIR"];
length = [value length];
maxDNLength = MAX(maxDNLength, length);
if(length == maxDNLength)
longestDN = value;
value = [d objectForKey:@"CN"];
length = [value length];
maxCNLength = MAX(maxCNLength, length);
if(length == maxCNLength)
longestCN = value;
}
printf("\nTotal: %d\nMaxMailtoLength: %d\nlongest: %s\nmaxDN: %d\nlongest: %s\nmaxCN: %d\nlongest: %s\n", count, maxMailtoLength, [longestMailto cString], maxDNLength, [longestDN cString], maxCNLength, [longestCN cString]);
[pool release];
exit(0);
return 0;
}