This script enables the macOS Contact-Application to dial a phone-number via a SNOM hardware phone by clicking on the phone label

Snom.scpt

--  This script enables the macOS Contact-Application to dial a phone-number
--  via a SNOM hardware phone by clicking on the phone label.
--
--  (C) 2008 David Kreitschmann, K3com Kommunikationstechnik http://www.k3com.de
--  (C) 2017 Modification for SNOM 715 by Stefan Husch, https://qutic.com
--
--  Copy this script to ~/Library/Application\ Scripts/com.apple.AddressBook 
--  on your macOS 10.11+ and change the phoneURL to your needs.
--  
--  A chmod 0600 ~/Library/Application\ Scripts/com.apple.AddressBook/Snom.scpt
--  ensures the privacy of your SNOM user and account!
--
--  If you have a valid certificate ensure to remove the '-k' flag from curl!
--
--  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 3 of the License, or
--  (at your option) any later version.
--
--  This program is distributed in the hope that it will be useful,
--  but WITHOUT ANY WARRANTY; without even the implied warranty of
--  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
--  GNU General Public License for more details.
--
--  You should have received a copy of the GNU General Public License
--  along with this program.  If not, see <http://www.gnu.org/licenses/>.


property phoneURL : "https://user:password@10.10.10.10"
property titleText : "Dial (Snom) "

using terms from application "Contacts"
	on «event az00az57»
		return "phone"
	end «event az00az57»
	
	on «event az00az58» given «class az61»:this_person, «class az62»:this_entry
		return titleText & «class az17» of this_entry
	end «event az00az58»
	
	on «event az00az59» given «class az61»:this_person, «class az62»:this_entry
		return true
	end «event az00az59»
	
	on «event az00az60» given «class az61»:this_person, «class az62»:this_entry
		set theNumber to filter(«class az17» of this_entry)
		do shell script "/usr/bin/curl -k -m 3 " & phoneURL & "/adr.htm?adrnumber=" & theNumber
		
	end «event az00az60»
end using terms from

on filter(theNumber)
	set newNumber to ""
	repeat with c in every character of theNumber
		if "+01234567890" contains c then
			set newNumber to newNumber & c
			-- display dialog newNumber
		end if
	end repeat
	if newNumber contains "+49" then
		set newNumber to "0" & text 4 through -1 of newNumber
	end if
	if character 1 of newNumber is equal to "+" then set newNumber to "00" & text 2 through -1 of newNumber
	
	return newNumber
end filter