How to Delete an SMS in Tcl/Tk

The simplest way to delete SMS from Tcl/Tk is to use the built in HTTP/Rest SMS api of Ozeki SMS Gateway. When you use this API, you will send SMS messages by issuing a HTTP Post request to the SMS gateway. The HTTP Post request will contain a message formatted in json format. The SMS gateway will send this SMS to the recipient's phone, and it will return a HTTP 200 OK response to your request.

how to delete an sms in tcl tk
Figure 1 - How to Delete an SMS in Tcl/Tk

Tcl/Tk code to send sms to mobile

The Tcl/Tk sms code sample below demonstrates how you can delete SMS using the http rest sms api of Ozeki SMS Gatway using the Tcl/Tk Ozeki.Libs.Rest library. This library is provided to you free of charge, and you may use it and modify it in any of your projects.

DeleteSms.tcl 
source Ozeki.Libs.Rest.tcl


set configuration [ Configuration new ]
$configuration setUsername "http_user" 
$configuration setPassword "qwe123"
$configuration setApiUrl "http://127.0.0.1:9509/api"

set msg [ Message new ]
$msg setID "fef636bc-b17f-4bb6-911a-087e3dc677fc"

set api [ MessageApi new $configuration ]

set result [ $api delete [ Folder Inbox ] $msg ]

puts $result

How to use the Tcl/Tk sms example:

This Tcl/Tk sms example can be used in any Tcl/Tk application. To use it, you must add the Ozeki.Libs.Rest.tcl file to your project. After the file is added, you must put the source Ozeki.Libs.Rest.tcl directive into the header section of your Tcl/Tk source code. This will allow you to use the classes provided by the Ozeki.Libs.Rest library. You can use the Message class to create the SMS. You can use the MessageApi class to send the SMS to the SMS gateway. The SMS gateway will forward your message to the mobile network either through a wireless connection or through the Internet.

Download DeleteSms.tcl

The source code explained in this article can be downloaded and used and modified free of charge.
Download: DeleteSms.tcl.zip (4.09Kb)

What is in the DeleteSms.tcl.zip file?

The DeleteSms.tcl.zip file contains the Ozeki.Libs.Rest library, which gives you all the tools necessary to send and receive SMS messages. You will also find the DeleteSms project in the zip, which contains the example code to show you how to send an SMS. This example code is listed below.

receive sms tcl directory
Figure 2 - What is inside DeleteSms.tcl.zip

How to send SMS from Tcl/Tk (Simple guidelines)

To send SMS from Tcl/Tk:

  1. Install a HTTP API user
  2. Enable Log communication events on the Advanced tab
  3. Download and install the Tcllib library
  4. Download then extract the DeleteSms.tcl.zip file
  5. Open the DeleteSms.tcl file in a text editor
  6. Launch Ozeki SMS Gateway app
  7. Run DeleteSms.tcl Tcl/Tk code in the terminal
  8. Check the logs to see if the SMS sent

Install Ozeki SMS Gateway and create an HTTP API user

To be able to send SMS from Tcl/Tk, first you need to install Ozeki SMS Gateway. The SMS gateway can be installed on the same computer, where you develop your Tcl/Tk code in Visual studio. After installation, the next step is to connect Ozeki SMS Gateway to the mobile network. You can send a test sms from the Ozeki GUI to verify, that your mobile network connection works. The final step to prepare your environment is to create a HTTP sms api user. Create a user with a username of "http_user", and with a password of "qwe123" to make the example work without modification.

After the environment is setup, you can run your Tcl/Tk code.

HTTP API url to use send sms from Tcl/Tk

To send SMS from Tcl/Tk, your Tcl/Tk will have to issue an HTTP request to the SMS gateway. The API url is shown below. Note that the IP address (127.0.0.1) should be replaced to the IP address of your SMS gateway. If Ozeki SMS Gateway is installed on the same computer where the Tcl/Tk sms application is running, this can be 127.0.0.1. If it is installed on a different computer, it should be the IP address of that computer. 

http://127.0.0.1:9509/api?action=rest

HTTP authentication to use send sms from Tcl/Tk

To authenticate the Tcl/Tk sms client, you need to send the username and password in a base64 encoded string to the server in a HTTP request. The format used is: base64(username+":"+password). In Tcl/Tk you can use the following code to do this encoding: 

set usernamePassword "$username:$password"
set usernamePasswordEncoded [ binary encode base64 $usernamePassword ]
return "Basic $usernamePasswordEncoded"

For example, if you encode the username 'http_user' and the password 'qwe123', you will get the following base64 encoded string: aHR0cF91c2VyOnF3ZTEyMw==. To send

HTTP request header to send SMS from Tcl/Tk

To send the SMS messages, you need to include the following lines as headers in the HTTP request. Note that we include a content type and an Authorization header. 

Content-Type: application/json
Authorization: Basic QWxhZGRpbjpvcGVuIHNlc2FtZQ==

HTTP request to send SMS from Tcl/Tk

To submit the SMS, your Tcl/Tk application will send an HTTP request similar to the one below. Note, that this request contains a header part and a body part. In the body part you can find the folder we want to delete the message from, and the ids of the messages. 

POST /api?action=deletemsg HTTP/1.1
Host: 127.0.0.1:9509
User-Agent: Mozilla/5.0 (Windows; U; Windows NT 10.0) http/2.9.0 Tcl/8.6.9
Connection: close
Authorization: Basic aHR0cF91c2VyOnF3ZTEyMw==
Accept: */*
Accept-Encoding: gzip,deflate,compress
Content-Type: application/json
Content-Length: 73

{
	"folder": "inbox",
	"message_ids": [
		"836701c7-3c59-4678-8b79-7896eae777fc"
	]
}

HTTP response received by the Tcl/Tk sms example

Once the SMS gateway receives this request, it will generate a HTTP response. The HTTP response will contain a status code, to indicate whether the SMS submit request was successful or not. It will also return a JSON encoded structure to provide you useful details about the message's submission. 

HTTP/1.1 200 OK
Transfer-Encoding: chunked
Content-Type: application/json; charset=utf8
Last-Modified: Wed, 04 Aug 2021 08:44:43 GMT
Server: 10/10.3.124 Microsoft-HTTPAPI/2.0
User-Agent: OZEKI 10.3.124 (www.myozeki.com)
Access-Control-Allow-Origin: *
Date: Wed, 04 Aug 2021 10:39:30 GMT
Connection: close

{
  "http_code": 200,
  "response_code": "SUCCESS",
  "response_msg": "",
  "data": {
    "folder": "inbox",
    "message_ids": [
      "836701c7-3c59-4678-8b79-7896eae777fc"
    ]
  }
}

How to send SMS from Tcl/Tk using the Tcl/Tk sms api (Video tutorial)

This video shows you how to download the DeleteSms.tcl.zip file from this page, and how to download its contents in a text editor. If watch the video, you will notice, that the contents of the DeleteSms.tcl zip are placed into the Desktop. You will also see that we double click on the DeleteSms.tcl file to open the tcl script.

Video 1 - How to download and run the example project (Video tutorial)

Tcl/Tk sms example: DeleteSms.tcl

The example code below is part of the DeleteSms.tcl.zip file. In the zip you can find two files: DeleteSms.tcl and the Ozeki.Libs.Rest.tcl.

how to delete sms using tcl
Figure 3 - DeleteSms.tcl

How to check that the SMS has been accepted by the HTTP user (Video tutorial)

After the SMS has been submitted, it is a good idea to check your SMS gateway, to see what it has received. You can check the log by opening the HTTP user's details from the Ozeki SMS Gateway management console. The following video shows you what to look for. The video will start with the opened code and will end with the details of the sent message. You will learn how to launch the project, what the project looks like during running and how the log file looks after it. The video is only 66 seconds long and easy to understand. You will have no problem following it.

Video 2 - How to check that the SMS has been accepted by the HTTP user (Video tutorial)

More information