Monotone-Parent: e70627145b37fbab2e0e7b1108fd56e5ffcc5c96

Monotone-Revision: 0ca38e156b53ac1d513713a7a641b5b539767332 Monotone-Author: wsourdeau@inverse.ca Monotone-Date: 2007-09-14T22:10:39 Monotone-Branch: ca.inverse.sogo
2026-05-11 22:45:26 +00:00 · 2007-09-14 22:10:39 +00:00
parent 8fb8bcf3d3
commit 806b38d168
3 changed files with 98 additions and 0 deletions
@@ -1,5 +1,11 @@
 2007-09-14  Wolfgang Sourdeau  <wsourdeau@inverse.ca>

+	* UI/Common/UIxParentFolderActions.m ([UIxParentFolderActions
+	-createFolderAction]): new standardized method for requesting
+	folder creations among gcs-based modules.
+
+	* UI/Common/UIxParentFolderActions.[hm]: new action class module.
+
 	* SoObjects/Appointments/SOGoAppointmentFolders.m: new class
 	module, equivalent to the SOGoParentFolder's child
 	SOGoContactFolders, but for calendars.
@@ -0,0 +1,31 @@
+/* UIxParentFolderActions.h - this file is part of SOGo
+ *
+ * Copyright (C) 2007 Inverse groupe conseil
+ *
+ * Author: Wolfgang Sourdeau <wsourdeau@inverse.ca>
+ *
+ * This file is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2, or (at your option)
+ * any later version.
+ *
+ * This file 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 General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; see the file COPYING.  If not, write to
+ * the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ * Boston, MA 02111-1307, USA.
+ */
+
+#ifndef UIXPARENTFOLDERACTIONS_H
+#define UIXPARENTFOLDERACTIONS_H
+
+#import <NGObjWeb/WODirectAction.h>
+
+@interface UIxParentFolderActions : WODirectAction
+@end
+
+#endif /* UIXPARENTFOLDERACTIONS_H */
@@ -0,0 +1,61 @@
+/* UIxParentFolderActions.m - this file is part of SOGo
+ *
+ * Copyright (C) 2007 Inverse groupe conseil
+ *
+ * Author: Wolfgang Sourdeau <wsourdeau@inverse.ca>
+ *
+ * This file is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2, or (at your option)
+ * any later version.
+ *
+ * This file 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 General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; see the file COPYING.  If not, write to
+ * the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ * Boston, MA 02111-1307, USA.
+ */
+
+#import <Foundation/NSString.h>
+
+#import <NGObjWeb/NSException+HTTP.h>
+#import <NGObjWeb/WOResponse.h>
+#import <NGObjWeb/WORequest.h>
+
+#import <UI/Common/WODirectAction+SOGo.h>
+#import <SoObjects/SOGo/SOGoParentFolder.h>
+
+#import "UIxParentFolderActions.h"
+
+@implementation UIxParentFolderActions
+
+- (id <WOActionResults>) createFolderAction
+{
+  WOResponse *response;
+  NSString *name, *nameInContainer;
+
+  name = [[context request] formValueForKey: @"name"];
+  if ([name length] > 0)
+    {
+      response = (WOResponse *) [[self clientObject] newFolderWithName: name
+						     nameInContainer: &nameInContainer];
+      if (!response)
+	{
+	  response = [self responseWithStatus: 201];
+	  [response setHeader: @"text/plain; charset=us-ascii"
+		    forKey: @"content-type"];
+	  [response appendContentString: nameInContainer];
+	}
+    }
+  else
+    response = [NSException exceptionWithHTTPStatus: 400
+                            reason: @"The name is missing"];
+  
+  return response;
+}
+
+@end