drupal_mobile_redirect/mobile_redirect.module at master · venkatd/drupal_mobile_redirect · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
<?php

/**
 * Implements hook_menu()
 */
function mobile_redirect_menu() {

    $items['mobile-redirect/disable'] = array(
      'title' => 'Disable Mobile Redirect',
      'page callback' => 'mobile_redirect_disable',
      'type' => MENU_CALLBACK,
      'access callback' => TRUE,
    );

    $items['admin/config/mobile-redirect'] = array(
      'title' => 'Mobile redirect',
      'description' => 'Mobile redirect',
      'page callback' => 'drupal_get_form',
      'page arguments' => array('mobile_redirect_form'),
      'access arguments' => array('administer site configuration'),
      'file' => 'mobile_redirect.admin.inc',
    );

    return $items;
}

function mobile_redirect_disable() {
    $_SESSION['mobile_redirect_disabled'] = TRUE;
    drupal_goto('');
}

function mobile_redirect_init() {
    if (mobile_redirect_is_disabled())
        return;

    if (mobile_redirect_is_mobile_website())
        drupal_goto(mobile_redirect_destination());
}

function mobile_redirect_current_path_is_destination() {
  if ($_GET['q'] == drupal_lookup_path('source', mobile_redirect_destination()))
    return TRUE;

  if ($_GET['q'] == drupal_lookup_path('alias', mobile_redirect_destination()))
    return TRUE;

  return FALSE;
}

function mobile_redirect_is_disabled() {
  global $user;

  if (mobile_redirect_destination() == '')
    return TRUE;

  if (mobile_redirect_current_path_is_destination())
    return TRUE;

  if (mobile_redirect_current_path_is_admin())
    return TRUE;

  if (mobile_redirect_matches(array('mobile-redirect', 'mobile-redirect/*')))
    return TRUE;

  if (mobile_redirect_matches_excluded_page())
    return TRUE;

  if (in_array('administrator', array_values($user->roles))) {
      return TRUE;
  }

  return isset($_SESSION['mobile_redirect_disabled'])
    && $_SESSION['mobile_redirect_disabled'] == TRUE;
}


function mobile_redirect_current_path_is_admin() {
  return mobile_redirect_matches(array('admin', 'admin/*'));
}

function mobile_redirect_matches_excluded_page() {
  return mobile_redirect_matches(variable_get('mobile_redirect_exclude'));
}

function mobile_redirect_matches($patterns, $cur_path = NULL) {
  if (is_array($patterns))
    $patterns = implode("\n", $patterns);

  if (!$cur_path)
    $cur_path = $_GET['q'];

  // Convert the Drupal path to lowercase
  $path = drupal_strtolower(drupal_get_path_alias($cur_path));
  // Compare the lowercase internal and lowercase path alias (if any).
  $matches = drupal_match_path($path, $patterns);

  if ($path != $cur_path)
    $matches = $matches || drupal_match_path($cur_path, $patterns);

  return $matches;
}

function mobile_redirect_destination() {
    return variable_get('mobile_redirect_path', '');
}

function mobile_redirect_get_user_agent() {
  return $_SERVER['HTTP_USER_AGENT'];
}

function mobile_redirect_is_mobile_website() {
    $user_agent = mobile_redirect_get_user_agent();
    if(preg_match('/android.+mobile|avantgo|bada\/|blackberry|blazer|compal|elaine|fennec|hiptop|iemobile|ip(hone|od)|iris|kindle|lge |maemo|midp|mmp|netfront|opera m(ob|in)i|palm( os)?|phone|p(ixi|re)\/|plucker|pocket|psp|symbian|treo|up\.(browser|link)|vodafone|wap|windows (ce|phone)|xda|xiino/i',$user_agent)||preg_match('/1207|6310|6590|3gso|4thp|50[1-6]i|770s|802s|a wa|abac|ac(er|oo|s\-)|ai(ko|rn)|al(av|ca|co)|amoi|an(ex|ny|yw)|aptu|ar(ch|go)|as(te|us)|attw|au(di|\-m|r |s )|avan|be(ck|ll|nq)|bi(lb|rd)|bl(ac|az)|br(e|v)w|bumb|bw\-(n|u)|c55\/|capi|ccwa|cdm\-|cell|chtm|cldc|cmd\-|co(mp|nd)|craw|da(it|ll|ng)|dbte|dc\-s|devi|dica|dmob|do(c|p)o|ds(12|\-d)|el(49|ai)|em(l2|ul)|er(ic|k0)|esl8|ez([4-7]0|os|wa|ze)|fetc|fly(\-|_)|g1 u|g560|gene|gf\-5|g\-mo|go(\.w|od)|gr(ad|un)|haie|hcit|hd\-(m|p|t)|hei\-|hi(pt|ta)|hp( i|ip)|hs\-c|ht(c(\-| |_|a|g|p|s|t)|tp)|hu(aw|tc)|i\-(20|go|ma)|i230|iac( |\-|\/)|ibro|idea|ig01|ikom|im1k|inno|ipaq|iris|ja(t|v)a|jbro|jemu|jigs|kddi|keji|kgt( |\/)|klon|kpt |kwc\-|kyo(c|k)|le(no|xi)|lg( g|\/(k|l|u)|50|54|e\-|e\/|\-[a-w])|libw|lynx|m1\-w|m3ga|m50\/|ma(te|ui|xo)|mc(01|21|ca)|m\-cr|me(di|rc|ri)|mi(o8|oa|ts)|mmef|mo(01|02|bi|de|do|t(\-| |o|v)|zz)|mt(50|p1|v )|mwbp|mywa|n10[0-2]|n20[2-3]|n30(0|2)|n50(0|2|5)|n7(0(0|1)|10)|ne((c|m)\-|on|tf|wf|wg|wt)|nok(6|i)|nzph|o2im|op(ti|wv)|oran|owg1|p800|pan(a|d|t)|pdxg|pg(13|\-([1-8]|c))|phil|pire|pl(ay|uc)|pn\-2|po(ck|rt|se)|prox|psio|pt\-g|qa\-a|qc(07|12|21|32|60|\-[2-7]|i\-)|qtek|r380|r600|raks|rim9|ro(ve|zo)|s55\/|sa(ge|ma|mm|ms|ny|va)|sc(01|h\-|oo|p\-)|sdk\/|se(c(\-|0|1)|47|mc|nd|ri)|sgh\-|shar|sie(\-|m)|sk\-0|sl(45|id)|sm(al|ar|b3|it|t5)|so(ft|ny)|sp(01|h\-|v\-|v )|sy(01|mb)|t2(18|50)|t6(00|10|18)|ta(gt|lk)|tcl\-|tdg\-|tel(i|m)|tim\-|t\-mo|to(pl|sh)|ts(70|m\-|m3|m5)|tx\-9|up(\.b|g1|si)|utst|v400|v750|veri|vi(rg|te)|vk(40|5[0-3]|\-v)|vm40|voda|vulc|vx(52|53|60|61|70|80|81|83|85|98)|w3c(\-| )|webc|whit|wi(g |nc|nw)|wmlb|wonu|x700|xda(\-|2|g)|yas\-|your|zeto|zte\-/i',substr($user_agent,0,4)))
        return TRUE;
    else
        return FALSE;
}