]> err.no Git - scalable-opengroupware.org/commitdiff
git-svn-id: http://svn.opengroupware.org/SOGo/trunk@106 d1b88da0-ebda-0310-925b-ed51d...
authorhelge <helge@d1b88da0-ebda-0310-925b-ed51d893ca5b>
Wed, 30 Jun 2004 09:44:35 +0000 (09:44 +0000)
committerhelge <helge@d1b88da0-ebda-0310-925b-ed51d893ca5b>
Wed, 30 Jun 2004 09:44:35 +0000 (09:44 +0000)
SOGo/Main/GNUmakefile
SOGo/Main/SOGoRootPage.m
SOGo/Main/SOGoUserHomePage.m [new file with mode: 0644]
SOGo/Main/SOGoUserHomePage.wox [new file with mode: 0644]
SOGo/Main/product.plist

index b47ba64eada6d800369053535fab5df0a0e1460c..d55e93b7f3ee5e036a8ad7606cdd43a2f74e59f1 100644 (file)
@@ -10,12 +10,14 @@ sogod_OBJC_FILES += \
        SOGoAuthenticator.m     \
        \
        SOGoRootPage.m          \
+       SOGoUserHomePage.m      \
 
 sogod_RESOURCE_FILES +=        \
        Version                 \
        product.plist           \
        \
        SOGoRootPage.wox        \
+       SOGoUserHomePage.wox    \
 
 sogod_WEBSERVER_RESOURCE_FILES += 
 
index 80d25ac05a77098ac0e3db1873d3b7a9fa70ec90..506856d2afd3bc22014020a6fa46b533a1d0e32d 100644 (file)
@@ -56,6 +56,9 @@
 
 - (void)appendToResponse:(WOResponse *)_response inContext:(WOContext *)_ctx {
   NSString *rhk;
+
+  // TODO: we might also want to look into the HTTP basic-auth to redirect to
+  //       the login URL!
   
   rhk = [[_ctx request] requestHandlerKey];
   if ([rhk length]==0 || [[self application] requestHandlerForKey:rhk]==nil) {
diff --git a/SOGo/Main/SOGoUserHomePage.m b/SOGo/Main/SOGoUserHomePage.m
new file mode 100644 (file)
index 0000000..1161735
--- /dev/null
@@ -0,0 +1,38 @@
+// $Id$
+
+#include <NGObjWeb/SoComponent.h>
+
+@interface SOGoUserHomePage : SoComponent
+{
+}
+
+@end
+
+#include "common.h"
+
+@implementation SOGoUserHomePage
+
+- (id)initWithContext:(id)_ctx {
+  if ((self = [super initWithContext:_ctx])) {
+  }
+  return self;
+}
+
+- (void)dealloc {
+  [super dealloc];
+}
+
+/* lookup */
+
+- (id)lookupName:(NSString *)_key inContext:(id)_ctx acquire:(BOOL)_flag {
+  // Note: we do no acquisition
+  id obj;
+  
+  /* first check attributes directly bound to the object */
+  if ((obj = [super lookupName:_key inContext:_ctx acquire:NO]))
+    return obj;
+  
+  return nil;
+}
+
+@end /* SOGoUserHomePage */
diff --git a/SOGo/Main/SOGoUserHomePage.wox b/SOGo/Main/SOGoUserHomePage.wox
new file mode 100644 (file)
index 0000000..027fbae
--- /dev/null
@@ -0,0 +1,18 @@
+<?xml version='1.0' standalone='yes'?>
+<html
+  xmlns="http://www.w3.org/1999/xhtml"
+  xmlns:var="http://www.skyrix.com/od/binding"
+  xmlns:const="http://www.skyrix.com/od/constant"
+>
+  <head>
+    <title>Scalable OGo User Homepage</title>
+  </head>
+
+  <body>
+    <h3>OpenGroupware.org: <var:string value="clientObject.login" /></h3>
+
+    <ul>
+      <li><a href="Calendar/">Calendar</a></li>
+    </ul>
+  </body>
+</html>
index 0f27d86ebb218649787c17aac9bff8ce7febb073..d017ef2427cf60bdba0c527c259942ec36b74ca9 100644 (file)
 
     SOGoUserFolder = {
       superclass    = "SOGoFolder";
+      methods = {
+        index = { 
+          protectedBy = "View";
+          pageName    = "SOGoUserHomePage"; 
+        };
+        GET = { // more or less a hack, see README of dbd
+          protectedBy = "View";
+          pageName    = "SOGoUserHomePage"; 
+        };
+      };
     };
   };
 }