quicktel_sms.module

<?php

define('QUICKTEL_SMS_GATE_HTTP', 'http://service.qtelecom.ru/public/http/');
define('QUICKTEL_SMS_GATE_HTTPS', 'https://go.qtelecom.ru/public/http/');

/**
 * hook_menu() implementation
 */
function quicktel_sms_menu() {
  $items = array();

  //config page
  $items['admin/config/services/quicktel-sms'] = array(
    'title' => 'Quick Telecom SMS',
    'page callback' => 'drupal_get_form',
    'page arguments' => array('_quicktel_sms_admin_page'),
    'access arguments' => array('administer quicktel sms'),
    'type' => MENU_NORMAL_ITEM,
  );

  //test send form
  $items['admin/config/services/quicktel-sms/test'] = array(
    'title' => 'Test send',
    'page callback' => 'drupal_get_form',
    'page arguments' => array('_quicktel_sms_test_send_form'),
    'access arguments' => array('administer quicktel sms'),
    'type' => MENU_LOCAL_ACTION,
  );

  return $items;
} //quicktel_sms_menu


/**
 *
 * hook_permission() implementation
 *
 * @return array
 */
function quicktel_sms_permission() {
  return array(
    'administer quicktel sms' => array(
      'title' => t('Administer Quicktel'),
      'description' => t('Administer Quick Telecom SMS gateway'),
    ),
  );
} //quicktel_sms_permission


/**
 *
 * Generates admin form for module
 *
 * @param $form
 * @param $form_state
 *
 * @return array
 */
function _quicktel_sms_admin_page($form, &$form_state) {
  //get balance
  $request = array('action' => 'balance');
  $response = _quicktel_sms_send_request($request);

  if (isset($response->balance)) {
    //show balance
    $balance = (string)$response->balance->AGT_BALANCE;
    $overdraft = (string)$response->balance->OVERDRAFT;
    $form['quicktel_sms_balance'] = array(
      '#type' => 'markup',
      '#markup' => "<p>Balance: $balance, Overdraft: $overdraft </p>",
    );
  } else if (isset($response->errors)) {
    //we have an error getting balance, display it
    drupal_set_message((string)$response->errors->error, 'error');
  }

  //get settings
  $form['quicktel_sms_user'] = array(
    '#type' => 'textfield',
    '#title' => t('Quicktel Login'),
    '#default_value' => variable_get('quicktel_sms_user', ''),
    '#required' => TRUE,
    '#description' => t('Login to Quick Telecom service (as provided by the service)'),
  );

  $form['quicktel_sms_password'] = array(
    '#type' => 'textfield',
    '#title' => t('Quicktel password'),
    '#default_value' => variable_get('quicktel_sms_password', ''),
    '#required' => TRUE,
    '#description' => t('Password to Quick Telecom service (as provided by the service)'),
  );

  $form['quicktel_sms_https'] = array(
    '#type' => 'checkbox',
    '#title' => 'HTTPS',
    '#default_value' => variable_get('quicktel_sms_https', 1),
  );

  $form['quicktel_sms_sender_name'] = array(
    '#type' => 'textfield',
    '#title' => t('Sender name'),
    '#default_value' => variable_get('quicktel_sms_sender_name', ''),
    '#description' => t('Sender name to send messages from, as registered in the service'),
  );

  $form['quicktel_sms_send_time_period'] = array(
    '#type' => 'textfield',
    '#title' => t('Time period'),
    '#default_value' => variable_get('quicktel_sms_send_time_period', ''),
    '#description' => t('Set, for example, to 10:00-19:00, to limit SMS sending to this period only.'),
  );

  return system_settings_form($form);
} //_quicktel_sms_admin_page


/**
 *
 * Generates test form to send SMS
 *
 * @param $form
 * @param $form_state
 * @return array
 */
function _quicktel_sms_test_send_form($form, &$form_state) {
  $form = array();

  $form['phones'] = array(
    '#type' => 'textfield',
    '#title' => t('Phones'),
    '#description' => t('Type in one or more phone numbers separated by commas. E.g. "+79031321232, 88007899878". Note that phones won\'t be validated and will be passed to sending function as is.'),
    '#default_value' => '',
    '#required' => TRUE,
  );

  $form['message'] = array(
    '#type' => 'textarea',
    '#title' => t('Message'),
    '#description' => t('Type in the message to send'),
    '#default_value' => '',
    '#required' => TRUE,
  );

  $form['send'] = array(
    '#type' => 'submit',
    '#value' => t('Send'),
  );

  return $form;
} //_quicktel_sms_test_send_form


/**
 *
 * Test send form submission
 *
 * @param $form
 * @param $form_state
 */
function _quicktel_sms_test_send_form_submit($form, &$form_state) {
  $phones = array();
  foreach (explode(',', $form_state['values']['phones']) as $phone) {
    $phones[] = trim($phone);
  }

  $response = quicktel_sms_send($phones, $form_state['values']['message']);
  if ($response) {
    drupal_set_message(t('Successfully sent message to phones given'));
  } else {
    drupal_set_message(t('Error sending message, check watchdog'), 'error');
  }
} //_quicktel_sms_test_send_form_submit


/**
 *
 * Sends $message to $phones given
 *
 * @param array $phones - array of phone strings
 * @param $message - text message to be sent
 * @return \SimpleXMLElement - response data
 */
function quicktel_sms_send($phones, $message) {
  $request = array();
  $request['action'] = 'post_sms';
  $request['message'] = trim($message);
  $request['target'] = implode(', ', $phones);

  $sender = variable_get('quicktel_sms_sender_name', '');
  if ($sender) {
    $request['sender'] = $sender;
  }
  $time_period = variable_get('quicktel_sms_send_time_period', '');
  if ($time_period) {
    $request['time_period'] = $time_period;
  }

  $response = _quicktel_sms_send_request($request);

  if (isset($response->errors)) {
    //if errors, log and return FALSE
    watchdog('quicktel_sms', (string) $response->errors->error);
    return NULL;
  }

  return $response;
} //quicktel_sms_send


/**
 *
 * Sends a request with type given
 *
 * @param array $request array of request to be sent (with at least 'action' set to action type)
 * @return \SimpleXMLElement or FALSE if error parsing XML
 */
function _quicktel_sms_send_request(&$request) {
  _quicktel_sms_add_authorization($request);

  $headers = array(
    'Content-Type' => 'application/x-www-form-urlencoded',
  );
  $options = array(
    'headers' => $headers,
    'method' => 'POST',
    'data' => http_build_query($request),
  );

  //check which url to use
  $request_url = (variable_get('quicktel_sms_https', 1)) ? QUICKTEL_SMS_GATE_HTTPS : QUICKTEL_SMS_GATE_HTTP;

  $response = drupal_http_request($request_url, $options);
  $response->data = gzdecode($response->data);

  return simplexml_load_string($response->data);
} //_quicktel_sms_send_request


/**
 *
 * Add authorization data (login, password) to the request
 *
 * @param $request
 */
function _quicktel_sms_add_authorization(&$request) {
  $user = variable_get('quicktel_sms_user', '');
  $password = variable_get('quicktel_sms_password', '');

  if ($user && $password) {
    $request['user'] = $user;
    $request['pass'] = $password;
  }
} //_quicktel_sms_add_authorization