Monotone-Parent: 1843555e1b5617636c917fa3dd563118b70c3466

Monotone-Revision: 6eb78390d5d8006fecea14d76f2a9f45279dc2fc Monotone-Author: wsourdeau@inverse.ca Monotone-Date: 2007-05-30T20:12:53 Monotone-Branch: ca.inverse.sogo
2026-08-19 21:53:19 +00:00 · 2007-05-30 20:12:53 +00:00
parent 7293a66a7f
commit aeefd41e66
3 changed files with 438 additions and 385 deletions
@@ -210,4 +210,43 @@
  return response;
 }

+#warning here should be done what should be done: IMAP subscription
+- (WOResponse *) _subscriptionStubAction
+{
+  NSString *mailInvitationParam, *mailInvitationURL;
+  WOResponse *response;
+  SOGoMailFolder *clientObject;
+
+  response = [context response];
+  mailInvitationParam
+    = [[context request] formValueForKey: @"mail-invitation"];
+  if ([mailInvitationParam boolValue])
+    {
+      clientObject = [self clientObject];
+      mailInvitationURL
+	= [[clientObject soURLToBaseContainerForCurrentUser]
+	    absoluteString];
+      [response setStatus: 302];
+      [response setHeader: mailInvitationURL
+		forKey: @"location"];
+    }
+  else
+    {
+      [response setStatus: 403];
+      [response appendContentString: @"How did you end up here?"];
+    }
+
+  return response;
+}
+
+- (WOResponse *) subscribeAction
+{
+  return [self _subscriptionStubAction];
+}
+
+- (WOResponse *) unsubscribeAction
+{
+  return [self _subscriptionStubAction];
+}
+
@end