<?php
  /**************************************************************************\
  * phpGroupWare - administration                                            *
  * http://www.phpgroupware.org                                              *
  * --------------------------------------------                             *
  *  This program 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 of the License, or (at your  *
  *  option) any later version.                                              *
  \**************************************************************************/

  /* $Id$ */

  $phpgw_info = array();
  if ($submit) {
     $phpgw_info['flags'] = array('noheader' => True, 'nonavbar' => True);
  }

  $phpgw_info['flags']['currentapp'] = 'admin';
  include('../header.inc.php');

  function is_odd($n)
  {
     $ln = substr($n,-1);
     if ($ln == 1 || $ln == 3 || $ln == 5 || $ln == 7 || $ln == 9) {
        return True;
     } else {
        return False;
     }
  }

  if ($submit) {
  
     if (! $n_group) {
        $error = '<br>' . lang('You must enter a group name.');
     } else {     
        $phpgw->db->query("select count(*) from phpgw_accounts where account_lid='" . $n_group . "'");
        $phpgw->db->next_record();

        if ($phpgw->db->f(0) != 0) {
          $error = '<br>' . lang('Sorry, that group name has already been taken.');
        }
     }

     if (! $error) {
        $phpgw->db->lock(array('phpgw_accounts','phpgw_preferences','phpgw_config','phpgw_applications','phpgw_hooks','phpgw_sessions','phpgw_acl'));
        while(1) {
          $group_id = mt_rand (1000, 60000);
          $phpgw->db->query("SELECT account_id FROM phpgw_accounts WHERE account_id=$group_id",__LINE__,__FILE__);
          if(!$phpgw->db->num_rows()) { break; }
        }

        $phpgw->db->query("INSERT INTO phpgw_accounts(account_id,account_lid,account_type) "
                         ."VALUES($group_id,'$n_group','g')");

        $apps = CreateObject('phpgwapi.applications',intval($group_id));
        $apps->update_data(Array());
        @reset($n_group_permissions);

			if (count($n_group_permissions))
			{
				while($app = each($n_group_permissions))
				{
					if ($app[1])
					{
						$apps->add($app[0]);
						$new_apps[] = $app[0];
					}
				}
				$apps->save_repository();
			}

        $acl = CreateObject('phpgwapi.acl',$group_id);
        $acl->read_repository();
        for ($i=0; $i<count($n_users);$i++) {
          $acl->add_repository('phpgw_group',$group_id,$n_users[$i],1);

          // If the user is logged in, it will force a refresh of the session_info
#          $phpgw->db->query("update phpgw_sessions set session_info='' "
#                            ."where session_lid='" . $phpgw->accounts->id2name(intval($n_users[$i])) . "@" . $phpgw_info["user"]["domain"] . "'",__LINE__,__FILE__);

          $pref = CreateObject('phpgwapi.preferences',intval($n_users[$i]));
          $t = $pref->read_repository();

          $docommit = False;
          for ($j=0;$j<count($new_apps);$j++) {
            if($new_apps[$j]=="admin") {
              $check = "common";
            } else {
              $check = $new_apps[$j];
            }
            if (!$t["$check"]) {
              $phpgw->common->hook_single("add_def_pref", $new_apps[$j]);
              $docommit = True;
            }
          }
          if ($docommit) {
            $pref->save_repository();
          }
        }

        $basedir = $phpgw_info["server"]["files_dir"] . SEP . "groups" . SEP;

        $cd = 31;

        umask(000);
        if (! @mkdir ($basedir . $n_group, 0707)) $cd = 37;

        $phpgw->db->unlock();

        Header("Location: " . $phpgw->link("groups.php","cd=$cd"));
        $phpgw->common->phpgw_exit();
     }
  }

  $p = CreateObject('phpgwapi.Template',$phpgw->common->get_tpl_dir('admin'));

  $p->set_file(array("form"	=> "groups_form.tpl"));

  if ($error) {
     $phpgw->common->phpgw_header();
     echo parse_navbar();
     $p->set_var("error","<p><center>$error</center>");
  } else {
     $p->set_var("error","");
  }

  $p->set_var("form_action",$phpgw->link("newgroup.php"));
  $p->set_var("hidden_vars","");
  $p->set_var("lang_group_name",lang("New group name"));
  $p->set_var("group_name_value","");

  $phpgw->db->query("select count(*) from phpgw_accounts where account_status !='L' AND account_type='u'");
  $phpgw->db->next_record();

  if ($phpgw->db->f(0) < 5) {
     $p->set_var("select_size",$phpgw->db->f(0));
  } else {
     $p->set_var("select_size","5");
  }

  $p->set_var("lang_include_user",lang("Select users for inclusion"));
  for ($i=0; $i<count($n_users); $i++) {
     $selected_users[$n_users[$i]] = " selected";
  }

  $phpgw->db->query("SELECT account_id,account_firstname,account_lastname,account_lid FROM phpgw_accounts WHERE "
	  	        . "account_status != 'L' AND account_type='u' ORDER BY account_lastname,account_firstname,account_lid asc");
  while ($phpgw->db->next_record()) {
     $user_list .= '<option value="' . $phpgw->db->f('account_id') . '"'
    	        . $selected_users[$phpgw->db->f('account_id')] . '>'
	            . $phpgw->common->display_fullname($phpgw->db->f('account_lid'),
						       $phpgw->db->f('account_firstname'),
						       $phpgw->db->f('account_lastname')) . '</option>';
  }
  $p->set_var("user_list",$user_list);

  $p->set_var("lang_permissions",lang("Permissions this group has"));

  $i = 0;
  $sorted_apps = $phpgw_info["apps"];
  @asort($sorted_apps);
  @reset($sorted_apps);
  while ($permission = each($sorted_apps)) {
     if ($permission[1]["enabled"]) {
        $perm_display[$i][0] = $permission[0];
        $perm_display[$i][1] = $permission[1]["title"];
        $i++;
     }
  }

  $perm_html = "";
  for ($i=0;$i<200;) {     // The $i<200 is only used for a brake
     if (! $perm_display[$i][1]) break;
     $perm_html .= '<tr bgcolor="'.$phpgw_info["theme"]["row_on"].'"><td>' . lang($perm_display[$i][1]) . '</td>'
                 . '<td><input type="checkbox" name="n_group_permissions['
                 . $perm_display[$i][0] . ']" value="True"';
     if ($n_group_permissions[$perm_display[$i][0]]) {
        $perm_html .= " checked";
     }
     $perm_html .= "></td>";
     $i++;

     if ($i == count($perm_display) && is_odd(count($perm_display))) {
        $perm_html .= '<td colspan="2">&nbsp;</td></tr>';
     }

     if (! $perm_display[$i][1]) break;
     $perm_html .= '<td>' . lang($perm_display[$i][1]) . '</td>'
                 . '<td><input type="checkbox" name="n_group_permissions['
                 . $perm_display[$i][0] . ']" value="True"';
     if ($n_group_permissions[$perm_display[$i][0]]) {
        $perm_html .= " checked";
     }
     $perm_html .= "></td></tr>\n";
     $i++;
  }

  $p->set_var("permissions_list",$perm_html);	
  $p->set_var("lang_submit_button",lang("Create Group"));

  $p->pparse("out","form");

  $phpgw->common->phpgw_footer();
?>