Monotone-Parent: 83e7d2455de99bbdf6ca18f2e16478d506a07412

Monotone-Revision: 90a9a165bd97c227034ffe99dc1bcd6de1cd3e2b

Monotone-Author: wsourdeau@inverse.ca
Monotone-Date: 2009-11-30T15:55:04
Monotone-Branch: ca.inverse.sogo

SOPE/GDLContentStore/ChangeLog

@@ -1,3 +1,8 @@
+2009-11-30  Wolfgang Sourdeau  <wsourdeau@inverse.ca>
+
+	* NSURL+GCS.m (-gcsURLId): new method that returns a unique
+	identifier for database connections.
+
 2009-11-19  Wolfgang Sourdeau  <wsourdeau@inverse.ca>
 
 	* GCSChannelManager.m (-releaseChannel:immediately:): new method

SOPE/GDLContentStore/NSURL+GCS.h

@@ -33,8 +33,10 @@
 
 @interface NSURL(GCS)
 
-- (NSString *)gcsDatabaseName;
-- (NSString *)gcsTableName;
+- (NSString *) gcsDatabaseName;
+- (NSString *) gcsTableName;
+
+- (NSString *) gcsURLId;
 
 @end
 

SOPE/GDLContentStore/NSURL+GCS.m

@@ -26,7 +26,8 @@
 
 @implementation NSURL(GCS)
 
-- (NSString *)gcsPathComponent:(unsigned)_idx {
+- (NSString *) gcsPathComponent: (unsigned) _idx
+{
   NSString *p;
   NSArray  *pcs;
   unsigned len;
@@ -43,11 +44,22 @@
   return [pcs objectAtIndex:_idx];
 }
 
-- (NSString *)gcsDatabaseName {
-  return [self gcsPathComponent:1];
+- (NSString *) gcsDatabaseName
+{
+  return [self gcsPathComponent: 1];
 }
-- (NSString *)gcsTableName {
+
+- (NSString *) gcsTableName
+{
   return [[self path] lastPathComponent];
 }
 
+- (NSString *) gcsURLId
+{
+  return [NSString stringWithFormat: @"%@:%@:%@:%@:%@",
+                   [self host], [self port],
+                   [self user], [self password], 
+                   [self gcsDatabaseName]];
+}
+
 @end /* NSURL(GCS) */