How to send multiple sms from R

The simplest way to send multiple SMS from R 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 send multiple sms from r
Figure 1 - How to send multiple sms from R

R code to send multiple sms messages to mobile

The R sms code sample below demonstrates how you can send SMS using the http rest sms api of Ozeki SMS Gateway using the R 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.

SendMultipleSms.R 
library(Ozeki.Libs.Rest)


configuration <- Ozeki.Libs.Rest::Configuration$new(
  username = "http_user",
  password = "qwe123",
  api_url = "http://127.0.0.1:9509/api"
)

msg1 <- Ozeki.Libs.Rest::Message$new()
msg1$to_address <- "+36201111111"
msg1$text <- "Hello world 1"

msg2 <- Ozeki.Libs.Rest::Message$new()
msg2$to_address <- "+36202222222"
msg2$text <- "Hello world 2"

msg3 <- Ozeki.Libs.Rest::Message$new()
msg3$to_address <- "+36203333333"
msg3$text <- "Hello world 3"

api <- Ozeki.Libs.Rest::MessageApi$new(configuration)

result <- api$send(list(msg1, msg2, msg3))

print(result$to_string())

Code 1 - SendMultipleSms.R

How to use the R sms example:

This R sms example can be used in any R application. To use it, you must download the Ozeki.Libs.Rest library. After the library is downloaded, you need to add a reference to it in your R 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 SendMultipleSms.R

The source code explained in this article can be downloaded and used and modified free of charge.
Download: SendMultipleSms.R.zip (407B)

What is in the SendMultipleSms.R.zip file?

In the SendMultipleSms.R.zip you will find the SendMultipleSms.R file, which contains the example code to show you how to send an SMS. This example code is listed below.

Figure 2 - What is inside SendMultipleSms.R.zip

How to send SMS from R (Simple guidelines)

To send SMS from R:

  1. Install a HTTP API user
  2. Enable Log communication events on the Advanced tab
  3. Setup Visual Studio
  4. Download then extract the SendMultipleSms.R.zip file
  5. Launch Ozeki SMS Gateway app
  6. Run SendMultipleSms.R R code using the command prompt
  7. 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 R, first you need to install Ozeki SMS Gateway. The SMS gateway can be installed on the same computer, where you develop your R code in any text editor, such as windows notepad. 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 R code.

HTTP API url to use send sms from R

To send SMS from R, your R 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 R 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 R

To authenticate the R 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 R you can use the following code to do this encoding: 

username_password <- paste(username, ":", password, sep="")
username_password_encoded <- base64enc::base64encode(charToRaw(username_password))
return (paste("Basic", username_password_encoded, sep=" "))

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 R

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 R

To submit the SMS, your R application will send an HTTP request similar to the one below. Note, that this request contains a HTTP header part and a http body part. The HTTP body is a JSON encoded data string. It contains the recipient numbers and the texts for the message's we sent. 

POST /api?action=sendmsg HTTP/1.1
Content-Length: 962
Content-Type: application/json
Accept: application/json
Accept-Encoding: deflate, gzip
Authorization: Basic aHR0cF91c2VyOnF3ZTEyMw==
Host: 127.0.0.1:9509
User-Agent: libcurl/7.64.1 r-curl/4.3.2 httr/1.4.2

{
	"messages":
	[
		{
			"message_id": "fcb65595-06bd-41fe-84e5-f3f8912ff0a1",
			"to_address": "+36201111111",
			"text": "Hello world 1",
			"create_date": "2021-07-13T12:46:23",
			"valid_until": "2021-07-20T12:46:23",
			"time_to_send": "2021-07-13T12:46:23",
			"is_submit_report_requested": true,
			"is_delivery_report_requested": true,
			"is_view_report_requested": true
		},
		{
			"message_id": "e14c1980-ca12-4d83-92f3-b25ebf6e1b97",
			"to_address": "+36202222222",
			"text":"Hello world 2",
			"create_date": "2021-07-13T12:46:23",
			"valid_until": "2021-07-20T12:46:23",
			"time_to_send": "2021-07-13T12:46:23",
			"is_submit_report_requested": true,
			"is_delivery_report_requested": true,
			"is_view_report_requested": true
		},
		{
			"message_id": "5f7f0290-172a-446e-a9fe-cf6b22c84fe6",
			"to_address": "+36203333333",
			"text": "Hello world 3",
			"create_date": "2021-07-13T12:46:23",
			"valid_until": "2021-07-20T12:46:23",
			"time_to_send": "2021-07-13T12:46:23",
			"is_submit_report_requested": true,
			"is_delivery_report_requested": true,
			"is_view_report_requested": true
		}
	]
}

HTTP response received by the R 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 messages submission. 

HTTP/1.1 200 OK
User-Agent: OZEKI 10.3.123 (www.myozeki.com)
Content-Type: application/json; charset=utf8
Last-Modified: Tue, 13 Jul 2021 14:08:09 GMT
Server: 10/10.3.123
Transfer-Encoding: chunked
  
{
	"http_code": 200,
	"response_code": "SUCCESS",
	"response_msg": "Messages queued for delivery.",
	"data": {
	  "total_count": 3,
	  "success_count": 3,
	  "failed_count": 0,
	  "messages": [
	    {
	      "message_id": "fcb65595-06bd-41fe-84e5-f3f8912ff0a1",
	      "from_station": "%",
	      "to_address": "+36201111111",
	      "to_station": "%",
	      "text": "Hello world 1",
	      "create_date": "2021-07-13 12:46:23",
	      "valid_until": "2021-07-20 12:46:23",
	      "time_to_send": "2021-07-13 12:46:23",
	      "submit_report_requested": true,
	      "delivery_report_requested": false,
	      "view_report_requested": false,
	      "tags": [
	        {
	          "name": "Type",
	          "value": "SMS:TEXT"
	        }
	      ],
	      "status": "SUCCESS"
	    },
	    {
	      "message_id": "e14c1980-ca12-4d83-92f3-b25ebf6e1b97",
	      "from_station": "%",
	      "to_address": "+36202222222",
	      "to_station": "%",
	      "text": "Hello world 2",
	      "create_date": "2021-07-13 12:46:23",
	      "valid_until": "2021-07-20 12:46:23",
	      "time_to_send": "2021-07-13 12:46:23",
	      "submit_report_requested": true,
	      "delivery_report_requested": false,
	      "view_report_requested": false,
	      "tags": [
	        {
	          "name": "Type",
	          "value": "SMS:TEXT"
	        }
	      ],
	      "status": "SUCCESS"
	    },
	    {
	      "message_id": "5f7f0290-172a-446e-a9fe-cf6b22c84fe6",
	      "from_station": "%",
	      "to_address": "+36203333333",
	      "to_station": "%",
	      "text": "Hello world 3",
	      "create_date": "2021-07-13 12:46:23",
	      "valid_until": "2021-07-20 12:46:23",
	      "time_to_send": "2021-07-13 12:46:23",
	      "submit_report_requested": true,
	      "delivery_report_requested": false,
	      "view_report_requested": false,
	      "tags": [
	        {
	          "name": "Type",
	          "value": "SMS:TEXT"
	        }
	      ],
	      "status": "SUCCESS"
	    }
	  ]
	}
}

How to send SMS from R using the R sms api (Video tutorial)

This video shows you how to download the SendMultipleSms.R.zip file from this page. If you watch the video, you will notice, that the contents of the SendMultipleSms.R.zip are placed into the Windows desktop. You will also see that we run the command prompt in order to send the SMS.

R sms example: SendMultipleSms.R

The example code below is part of the SendMultipleSms.R.

r source code to send multiple sms messages
Figure 3 - SendMultipleSms.R file

How to check that the SMS has been accepted by the HTTP user

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.

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

Conclusion

This article was meant to explain the steps of multiple SMS sending in R with the help of Ozeki SMS Gateway. This solution is perfect for reaching multiple clients with a single R code. It is advised to use this knowledge in order to reach high performance in information sharing. Ozeki SMS Gateway allows you to log SMS messages into a database and offers several reporting capabilities to provide information about the messaging.

Continue the reading on Ozeki's tutorial page, where more information can be found about subjects like SMS scheduling and SMS deleting in R.

The only thing to do now is to download Ozeki SMS Gateway and start working!

More information