Merge pull request #1146 from badcrc/master

Random ring groups

app/calls/call_edit.php

@@ -63,7 +63,7 @@ else {
 	$sql = "select * from v_extensions ";
 	$sql .= "where domain_uuid = '$domain_uuid' ";
 	$sql .= "and extension_uuid = '$extension_uuid' ";
-	if (!(if_group("admin") || if_group("superadmin"))) {
+	if (!(permission_exists('follow_me') || permission_exists('call_forward') || permission_exists('do_not_disturb'))) {
 		if (count($_SESSION['user']['extension']) > 0) {
 			$sql .= "and (";
 			$x = 0;

app/devices/app_languages.php

@@ -1690,7 +1690,7 @@ $text['label-blf']['ar-eg'] = "";
 $text['label-blf']['he'] = "";
 
 $text['label-callers']['en-us'] = "Callers";
-$text['label-callers']['es-cl'] = "Llaamadas";
+$text['label-callers']['es-cl'] = "Llamadas";
 $text['label-callers']['pt-pt'] = "";
 $text['label-callers']['fr-fr'] = "";
 $text['label-callers']['pt-br'] = "";

app/ring_groups/app_languages.php

@@ -88,6 +88,17 @@ $text['option-rollover']['uk'] = "";
 $text['option-rollover']['de-at'] = "Überrollen";
 $text['option-rollover']['he'] = "";
 
+$text['option-random']['en-us'] = "Random";
+$text['option-random']['es-cl'] = "Aleatorio";
+$text['option-random']['pt-pt'] = "";
+$text['option-random']['fr-fr'] = "";
+$text['option-random']['pt-br'] = "";
+$text['option-random']['pl'] = "";
+$text['option-random']['sv-se'] = "";
+$text['option-random']['uk'] = "";
+$text['option-random']['de-at'] = "";
+$text['option-random']['he'] = "";
+
 $text['option-ptring']['en-us'] = "pt-ring";
 $text['option-ptring']['es-cl'] = "pt-ring";
 $text['option-ptring']['fr-fr'] = "Portugal";

app/ring_groups/ring_group_edit.php

@@ -499,6 +499,7 @@ else {
 	echo "	<option value='sequence' ".(($ring_group_strategy == "sequence") ? "selected='selected'" : null).">".$text['option-sequence']."</option>\n";
 	echo "	<option value='enterprise' ".(($ring_group_strategy == "enterprise") ? "selected='selected'" : null).">".$text['option-enterprise']."</option>\n";
 	echo "	<option value='rollover' ".(($ring_group_strategy == "rollover") ? "selected='selected'" : null).">".$text['option-rollover']."</option>\n";
+	echo "	<option value='random' ".(($ring_group_strategy == "random") ? "selected='selected'" : null).">".$text['option-random']."</option>\n";
 	echo "	</select>\n";
 	echo "<br />\n";
 	echo $text['description-strategy']."\n";

app/voicemail_greetings/voicemail_greetings.php

@@ -46,7 +46,7 @@ require_once "resources/check_auth.php";
 	}
 
 //deny access if the user extension is not assigned
-	if (!(if_group("superadmin") || if_group("admin"))) {
+	if (!permission_exists('voicemail_greeting_view')) {
 		if (!is_extension_assigned($voicemail_id)) {
 			echo "access denied";
 			return;

resources/install/scripts/app/ring_groups/index.lua

@@ -158,6 +158,31 @@
 		--forward the ring group
 			session:execute("transfer", ring_group_forward_destination.." XML "..context);
 	else
+		--get the strategy of the ring group, if random, we use random() to order the destinations
+			sql = [[
+					SELECT 
+						r.ring_group_strategy
+					FROM 
+						v_ring_groups as r
+					WHERE 
+						ring_group_uuid = ']]..ring_group_uuid..[[' 
+						AND r.domain_uuid = ']]..domain_uuid..[[' 
+						AND r.ring_group_enabled = 'true'  
+					]];
+
+			
+			assert(dbh:query(sql, function(row)
+				if (row.ring_group_strategy == "random") then
+					if (database["type"] == "mysql") then
+						sql_order = 'rand()'
+					else
+						sql_order = 'random()' --both postgresql and sqlite uses random() instead of rand()
+					end
+				else
+					sql_order='d.destination_delay, d.destination_number asc'
+				end		
+			end));
+		
 		--get the ring group destinations
 			sql = [[
 				SELECT 
@@ -172,7 +197,7 @@
 					AND r.domain_uuid = ']]..domain_uuid..[[' 
 					AND r.ring_group_enabled = 'true' 
 				ORDER BY 
-					d.destination_delay, d.destination_number asc 
+					]]..sql_order..[[
 				]];
 			--freeswitch.consoleLog("notice", "SQL:" .. sql .. "\n");
 			destinations = {};
@@ -291,6 +316,9 @@
 					if (ring_group_strategy == "sequence") then
 						delimiter = "|";
 					end
+					if (ring_group_strategy == "random") then
+						delimiter = "|";
+					end
 					if (ring_group_strategy == "simultaneous") then
 						delimiter = ",";
 					end

resources/install/scripts/ring_member.lua

@@ -0,0 +1,145 @@
+--
+--	FusionPBX
+--	Version: MPL 1.1
+--
+--	The contents of this file are subject to the Mozilla Public License Version
+--	1.1 (the "License"); you may not use this file except in compliance with
+--	the License. You may obtain a copy of the License at
+--	http://www.mozilla.org/MPL/
+--
+--	Software distributed under the License is distributed on an "AS IS" basis,
+--	WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
+--	for the specific language governing rights and limitations under the
+--	License.
+--
+--	The Original Code is FusionPBX
+--
+--	The Initial Developer of the Original Code is
+--	Mark J Crane <markjcrane@fusionpbx.com>
+--	Copyright (C) 2010
+--	All Rights Reserved.
+--
+--	Contributor(s):
+--	Koldo A. Marcos <koldo.aingeru@sarenet.es>
+
+
+--include config.lua
+	require "resources.functions.config";
+	
+--connect to the database
+	require "resources.functions.database_handle";
+	dbh = database_handle('system');
+
+sounds_dir = "";
+recordings_dir = "";
+pin_number = "";
+max_tries = "3";
+digit_timeout = "3000";
+
+
+local random = math.random
+local function uuid()
+    local template ='xxxxxxxx-xxxx-4xxx-yxxx-xxxxxxxxxxxx'
+    return string.gsub(template, '[xy]', function (c)
+        local v = (c == 'x') and random(0, 0xf) or random(8, 0xb)
+        return string.format('%x', v)
+    end)
+end
+
+if ( session:ready() ) then
+	session:answer();
+	--session:execute("info", "");
+	destination_number = session:getVariable("user_name");
+	pin_number = session:getVariable("pin_number");
+	sounds_dir = session:getVariable("sounds_dir");
+	ring_group_uuid = session:getVariable("ring_group_uuid");
+	
+	--get info for the ring group
+	sql = "SELECT * FROM v_ring_groups ";
+	sql = sql .. "where ring_group_uuid = '"..ring_group_uuid.."' ";
+	status = dbh:query(sql, function(row)
+		domain_uuid = row["domain_uuid"];
+	end);
+
+	destination_timeout = 15;
+	destination_delay = 0;
+	
+
+
+	ring_group_destination_uuid = uuid();
+
+	--pin number is not required
+
+	--press 1 to login and 2 to logout
+		menu_selection = session:playAndGetDigits(1, 1, max_tries, digit_timeout, "#", "ivr/ivr-enter_destination_telephone_number.wav", "", "\\d+");
+		freeswitch.consoleLog("NOTICE", "menu_selection: "..menu_selection.."\n");
+		if (menu_selection == "1") then
+			--first, check to see if is already in that ring group
+			sql = [[
+					SELECT COUNT(*) AS in_group FROM
+						v_ring_group_destinations
+					WHERE
+						domain_uuid = ']]..domain_uuid..[[' 
+						AND ring_group_uuid = ']]..ring_group_uuid..[['
+						AND destination_number = ']]..destination_number..[['
+			]];
+			
+			--freeswitch.consoleLog("NOTICE", "ring_group_member: SQL "..sql.."\n");
+			
+			assert(dbh:query(sql, function(row)
+				if (row.in_group == "0") then
+					sql = [[
+						INSERT INTO 
+							v_ring_group_destinations 
+								(	ring_group_destination_uuid,
+									domain_uuid, 
+									ring_group_uuid, 
+									destination_number,
+									destination_delay,
+									destination_timeout) 
+						VALUES 
+								(	']]..ring_group_destination_uuid..[[',
+									']]..domain_uuid..[[', 
+									']]..ring_group_uuid..[[', 
+									']]..destination_number..[[', 
+									]]..destination_delay..[[, 
+									]]..destination_timeout..[[)
+			
+					]];
+								
+					--freeswitch.consoleLog("NOTICE", "ring_group_member: SQL "..sql.."\n");
+					dbh:query(sql);
+		
+					freeswitch.consoleLog("NOTICE", "ring_group_member: LOG IN\n");
+					session:streamFile("ivr/ivr-you_are_now_logged_in.wav");
+
+				else
+					freeswitch.consoleLog("NOTICE", "ring_group_member: ALREADY LOGGED IN\n");
+					session:streamFile("ivr/ivr-you_are_now_logged_in.wav");
+				end		
+			end));
+			
+			
+		end
+		if (menu_selection == "2") then
+			sql = [[
+				DELETE FROM 
+					v_ring_group_destinations 
+				WHERE 
+					domain_uuid	=']]..domain_uuid..[[' 
+					AND ring_group_uuid=']]..ring_group_uuid..[['  
+					AND destination_number=']]..destination_number..[['
+				]];
+			freeswitch.consoleLog("NOTICE", "ring_group_member: SQL "..sql.."\n");
+			dbh:query(sql);
+
+			freeswitch.consoleLog("NOTICE", "ring_group_member: LOG OUT\n");
+			session:streamFile("ivr/ivr-you_are_now_logged_out.wav");
+		end
+
+	--wait for the file to be written before proceeding
+		--session:sleep(1000);
+
+	--hangup
+		session:hangup();
+end