err.no Git - scalable-opengroupware.org/blob - UI/Common/UIxObjectActions.m

   1 /* UIxObjectActions.m - this file is part of SOGo
   2  *
   3  * Copyright (C) 2007 Inverse groupe conseil
   4  *
   5  * Author: Wolfgang Sourdeau <wsourdeau@inverse.ca>
   6  *
   7  * This file is free software; you can redistribute it and/or modify
   8  * it under the terms of the GNU General Public License as published by
   9  * the Free Software Foundation; either version 2, or (at your option)
  10  * any later version.
  11  *
  12  * This file is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  * GNU General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU General Public License
  18  * along with this program; see the file COPYING.  If not, write to
  19  * the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  20  * Boston, MA 02111-1307, USA.
  21  */
  22
  23 #import <Foundation/NSString.h>
  24 #import <Foundation/NSArray.h>
  25 #import <NGObjWeb/WOContext+SoObjects.h>
  26 #import <NGObjWeb/WORequest.h>
  27 #import <NGObjWeb/WOResponse.h>
  28 #import <SoObjects/SOGo/AgenorUserManager.h>
  29 #import <SoObjects/SOGo/SOGoObject.h>
  30
  31 #import "UIxObjectActions.h"
  32
  33 @implementation UIxObjectActions
  34
  35 - (WOResponse *) addUserInAclsAction
  36 {
  37   WOResponse *response;
  38   WORequest *request;
  39   NSString *uid, *email;
  40   unsigned int code;
  41   AgenorUserManager *um;
  42   SOGoObject *clientObject;
  43
  44   code = 403;
  45   request = [context request];
  46   uid = [request formValueForKey: @"uid"];
  47   if ([uid length] > 0)
  48     {
  49       um = [AgenorUserManager sharedUserManager];
  50       email = [um getEmailForUID: uid];
  51       if ([email length] > 0)
  52         {
  53           clientObject = [self clientObject];
  54           [clientObject setRoles: [clientObject defaultAclRoles]
  55                         forUser: uid];
  56           code = 204;
  57         }
  58     }
  59
  60   response = [context response];
  61   [response setStatus: code];
  62
  63   return response;
  64 }
  65
  66 @end