authen.public

Parameters

Name	Type	Mode
prop_ids	int4[]	IN
user_name	citext	IN
user_group_id	integer	IN (DEFAULT NULL)
email	text	IN (DEFAULT NULL)
full_name	citext	IN (DEFAULT NULL)
job_position	text	IN (DEFAULT NULL)
mobile	text	IN (DEFAULT NULL)
telephone	text	IN (DEFAULT NULL)
image	bytea	IN (DEFAULT NULL)
image_type	text	IN (DEFAULT NULL)
res_code	smallint	OUT
res_msg	text	OUT
user_id	integer	OUT

Definition

declare
    group_type char(1);
    p_prop_id int;
    p_user_id ALIAS FOR user_id;
    v_user_group text;
    v_prop_names text;
begin

  res_code = 0;

  FOREACH p_prop_id IN ARRAY prop_ids
  LOOP
    if (is_user_exist(p_prop_id, user_name)) then
        res_code = 1;
    elseif exists(select *
             from user_property a left join users u on u.id = a.user_id
             where a.prop_id = p_prop_id and u.email = $4) then
        res_code = 2;
    end if;
    exit when res_code > 0;
  END LOOP;
  
  -- if prop_ids is [-1], assign user to all active properties
  if (array_length(prop_ids,1) = 1) and (prop_ids[1] = -1) then
  	 prop_ids := array(select p.id from property p where p.enabled);
  end if;

--  if (is_user_exist(prop_id, user_name)) then
--     res_code = 1;
--  end if;
--
--  if (res_code = 0 and
--      exists(select *
--             from user_property a left join users u on u.id = a.user_id
--             where a.prop_id = $1 and u.email = $4))
--  then
--     res_code = 2;
--  end if;

  if (res_code = 0) then

    insert into users (user_name, user_group_id, email, full_name, job_position, mobile, telephone, image, image_type)--, "password")
    values (user_name, user_group_id, email, full_name, job_position, mobile, telephone, image, image_type)--, lower(user_name))
    returning id into user_id;

    --insert into user_property (user_id, prop_id) values (user_id, prop_id);
    PERFORM sp_assign_user_property(user_id, prop_ids);

    /* Copy group's permissions to user's permissions */
    if (user_group_id is not null) then
    	select g.group_type, g.name from user_group g where id = $3
        into group_type, v_user_group;
        --if (group_type <> 'S') then
            FOREACH p_prop_id IN ARRAY prop_ids
            LOOP
              insert into user_permission(user_id, prop_id, code)
              select p_user_id, p_prop_id, code from group_permission where group_id = $3;
            END LOOP;
        --end if;
    end if;
  end if;

   -- Send avtivate email
  if res_code = 0 then
     PERFORM msg.create_message('activate-user',
        json_build_object(
            'APP_NAME', 'Fromas Cloud',
            'USER_NAME', user_name,
            'ACTIVATE_URL', fn_gen_activate_url('activate-user', user_id, prop_ids)
        ),
        array[email]
     );
     
	 v_prop_names := (select string_agg(p.code, ', ') from property p where p.id = ANY(prop_ids));
  	 PERFORM sp_system_notify(
        'New User Created',
        format(E'User Name: %s\nUser Group: %s\nEmail: %s\nProperty: %s', user_name, v_user_group, email, v_prop_names)
     );
  end if;

  res_msg = case (res_code)
                   when 0 then 'Success'
                   when 1 then 'User '||upper(user_name)||' already exists'
                   when 2 then 'Email '||email||' already exists'
            end;
END

fn_add_user

Parameters

Definition