TEXT 12
Geoip.inc Guest on 19th September 2020 09:00:26 AM
  1. <?php
  2.  
  3. /* -*- Mode: C; indent-tabs-mode: t; c-basic-offset: 2; tab-width: 2 -*- */
  4. /* geoip.inc
  5.  *
  6.  * Copyright (C) 2007 MaxMind LLC
  7.  *
  8.  * This library is free software; you can redistribute it and/or
  9.  * modify it under the terms of the GNU Lesser General Public
  10.  * License as published by the Free Software Foundation; either
  11.  * version 2.1 of the License, or (at your option) any later version.
  12.  *
  13.  * This library is distributed in the hope that it will be useful,
  14.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  16.  * Lesser General Public License for more details.
  17.  *
  18.  * You should have received a copy of the GNU Lesser General Public
  19.  * License along with this library; if not, write to the Free Software
  20.  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  21.  */
  22.  
  23. define("GEOIP_COUNTRY_BEGIN", 16776960);
  24. define("GEOIP_STATE_BEGIN_REV0", 16700000);
  25. define("GEOIP_STATE_BEGIN_REV1", 16000000);
  26. define("GEOIP_STANDARD", 0);
  27. define("GEOIP_MEMORY_CACHE", 1);
  28. define("GEOIP_SHARED_MEMORY", 2);
  29. define("STRUCTURE_INFO_MAX_SIZE", 20);
  30. define("DATABASE_INFO_MAX_SIZE", 100);
  31. define("GEOIP_COUNTRY_EDITION", 106);
  32. define("GEOIP_PROXY_EDITION", 8);
  33. define("GEOIP_ASNUM_EDITION", 9);
  34. define("GEOIP_NETSPEED_EDITION", 10);
  35. define("GEOIP_REGION_EDITION_REV0", 112);
  36. define("GEOIP_REGION_EDITION_REV1", 3);
  37. define("GEOIP_CITY_EDITION_REV0", 111);
  38. define("GEOIP_CITY_EDITION_REV1", 2);
  39. define("GEOIP_ORG_EDITION", 110);
  40. define("GEOIP_ISP_EDITION", 4);
  41. define("SEGMENT_RECORD_LENGTH", 3);
  42. define("STANDARD_RECORD_LENGTH", 3);
  43. define("ORG_RECORD_LENGTH", 4);
  44. define("MAX_RECORD_LENGTH", 4);
  45. define("MAX_ORG_RECORD_LENGTH", 300);
  46. define("GEOIP_SHM_KEY", 0x4f415401);
  47. define("US_OFFSET", 1);
  48. define("CANADA_OFFSET", 677);
  49. define("WORLD_OFFSET", 1353);
  50. define("FIPS_RANGE", 360);
  51. define("GEOIP_UNKNOWN_SPEED", 0);
  52. define("GEOIP_DIALUP_SPEED", 1);
  53. define("GEOIP_CABLEDSL_SPEED", 2);
  54. define("GEOIP_CORPORATE_SPEED", 3);
  55. define("GEOIP_DOMAIN_EDITION", 11);
  56. define("GEOIP_COUNTRY_EDITION_V6", 12);
  57. define("GEOIP_LOCATIONA_EDITION", 13);
  58. define("GEOIP_ACCURACYRADIUS_EDITION", 14);
  59. define("GEOIP_CITYCOMBINED_EDITION", 15);
  60. define("GEOIP_CITY_EDITION_REV1_V6", 30);
  61. define("GEOIP_CITY_EDITION_REV0_V6",31);
  62. define("GEOIP_NETSPEED_EDITION_REV1",32);
  63. define("GEOIP_NETSPEED_EDITION_REV1_V6",33);
  64. define("GEOIP_USERTYPE_EDITION",28);
  65. define("GEOIP_USERTYPE_EDITION_V6",29);
  66. define("GEOIP_ASNUM_EDITION_V6",21);
  67. define("GEOIP_ISP_EDITION_V6",22);
  68. define("GEOIP_ORG_EDITION_V6",23);
  69. define("GEOIP_DOMAIN_EDITION_V6",24);
  70.  
  71. define("CITYCOMBINED_FIXED_RECORD", 7 );
  72.  
  73. if( !class_exists('GeoIP', false) ) {
  74. class GeoIP {
  75.     var $flags;
  76.     var $filehandle;
  77.     var $memory_buffer;
  78.     var $databaseType;
  79.     var $databaseSegments;
  80.     var $record_length;
  81.     var $shmid;
  82.     var $GEOIP_COUNTRY_CODE_TO_NUMBER = array(
  83. "" => 0, "AP" => 1, "EU" => 2, "AD" => 3, "AE" => 4, "AF" => 5,
  84. "AG" => 6, "AI" => 7, "AL" => 8, "AM" => 9, "CW" => 10, "AO" => 11,
  85. "AQ" => 12, "AR" => 13, "AS" => 14, "AT" => 15, "AU" => 16, "AW" => 17,
  86. "AZ" => 18, "BA" => 19, "BB" => 20, "BD" => 21, "BE" => 22, "BF" => 23,
  87. "BG" => 24, "BH" => 25, "BI" => 26, "BJ" => 27, "BM" => 28, "BN" => 29,
  88. "BO" => 30, "BR" => 31, "BS" => 32, "BT" => 33, "BV" => 34, "BW" => 35,
  89. "BY" => 36, "BZ" => 37, "CA" => 38, "CC" => 39, "CD" => 40, "CF" => 41,
  90. "CG" => 42, "CH" => 43, "CI" => 44, "CK" => 45, "CL" => 46, "CM" => 47,
  91. "CN" => 48, "CO" => 49, "CR" => 50, "CU" => 51, "CV" => 52, "CX" => 53,
  92. "CY" => 54, "CZ" => 55, "DE" => 56, "DJ" => 57, "DK" => 58, "DM" => 59,
  93. "DO" => 60, "DZ" => 61, "EC" => 62, "EE" => 63, "EG" => 64, "EH" => 65,
  94. "ER" => 66, "ES" => 67, "ET" => 68, "FI" => 69, "FJ" => 70, "FK" => 71,
  95. "FM" => 72, "FO" => 73, "FR" => 74, "SX" => 75, "GA" => 76, "GB" => 77,
  96. "GD" => 78, "GE" => 79, "GF" => 80, "GH" => 81, "GI" => 82, "GL" => 83,
  97. "GM" => 84, "GN" => 85, "GP" => 86, "GQ" => 87, "GR" => 88, "GS" => 89,
  98. "GT" => 90, "GU" => 91, "GW" => 92, "GY" => 93, "HK" => 94, "HM" => 95,
  99. "HN" => 96, "HR" => 97, "HT" => 98, "HU" => 99, "ID" => 100, "IE" => 101,
  100. "IL" => 102, "IN" => 103, "IO" => 104, "IQ" => 105, "IR" => 106, "IS" => 107,
  101. "IT" => 108, "JM" => 109, "JO" => 110, "JP" => 111, "KE" => 112, "KG" => 113,
  102. "KH" => 114, "KI" => 115, "KM" => 116, "KN" => 117, "KP" => 118, "KR" => 119,
  103. "KW" => 120, "KY" => 121, "KZ" => 122, "LA" => 123, "LB" => 124, "LC" => 125,
  104. "LI" => 126, "LK" => 127, "LR" => 128, "LS" => 129, "LT" => 130, "LU" => 131,
  105. "LV" => 132, "LY" => 133, "MA" => 134, "MC" => 135, "MD" => 136, "MG" => 137,
  106. "MH" => 138, "MK" => 139, "ML" => 140, "MM" => 141, "MN" => 142, "MO" => 143,
  107. "MP" => 144, "MQ" => 145, "MR" => 146, "MS" => 147, "MT" => 148, "MU" => 149,
  108. "MV" => 150, "MW" => 151, "MX" => 152, "MY" => 153, "MZ" => 154, "NA" => 155,
  109. "NC" => 156, "NE" => 157, "NF" => 158, "NG" => 159, "NI" => 160, "NL" => 161,
  110. "NO" => 162, "NP" => 163, "NR" => 164, "NU" => 165, "NZ" => 166, "OM" => 167,
  111. "PA" => 168, "PE" => 169, "PF" => 170, "PG" => 171, "PH" => 172, "PK" => 173,
  112. "PL" => 174, "PM" => 175, "PN" => 176, "PR" => 177, "PS" => 178, "PT" => 179,
  113. "PW" => 180, "PY" => 181, "QA" => 182, "RE" => 183, "RO" => 184, "RU" => 185,
  114. "RW" => 186, "SA" => 187, "SB" => 188, "SC" => 189, "SD" => 190, "SE" => 191,
  115. "SG" => 192, "SH" => 193, "SI" => 194, "SJ" => 195, "SK" => 196, "SL" => 197,
  116. "SM" => 198, "SN" => 199, "SO" => 200, "SR" => 201, "ST" => 202, "SV" => 203,
  117. "SY" => 204, "SZ" => 205, "TC" => 206, "TD" => 207, "TF" => 208, "TG" => 209,
  118. "TH" => 210, "TJ" => 211, "TK" => 212, "TM" => 213, "TN" => 214, "TO" => 215,
  119. "TL" => 216, "TR" => 217, "TT" => 218, "TV" => 219, "TW" => 220, "TZ" => 221,
  120. "UA" => 222, "UG" => 223, "UM" => 224, "US" => 225, "UY" => 226, "UZ" => 227,
  121. "VA" => 228, "VC" => 229, "VE" => 230, "VG" => 231, "VI" => 232, "VN" => 233,
  122. "VU" => 234, "WF" => 235, "WS" => 236, "YE" => 237, "YT" => 238, "RS" => 239,
  123. "ZA" => 240, "ZM" => 241, "ME" => 242, "ZW" => 243, "A1" => 244, "A2" => 245,
  124. "O1" => 246, "AX" => 247, "GG" => 248, "IM" => 249, "JE" => 250, "BL" => 251,
  125. "MF" => 252, "BQ" => 253, "SS" => 254
  126. );
  127.     var $GEOIP_COUNTRY_CODES = array(
  128.      "","AP","EU","AD","AE","AF","AG","AI","AL","AM","CW",
  129.         "AO","AQ","AR","AS","AT","AU","AW","AZ","BA","BB",
  130.         "BD","BE","BF","BG","BH","BI","BJ","BM","BN","BO",
  131.         "BR","BS","BT","BV","BW","BY","BZ","CA","CC","CD",
  132.         "CF","CG","CH","CI","CK","CL","CM","CN","CO","CR",
  133.         "CU","CV","CX","CY","CZ","DE","DJ","DK","DM","DO",
  134.         "DZ","EC","EE","EG","EH","ER","ES","ET","FI","FJ",
  135.         "FK","FM","FO","FR","SX","GA","GB","GD","GE","GF",
  136.         "GH","GI","GL","GM","GN","GP","GQ","GR","GS","GT",
  137.         "GU","GW","GY","HK","HM","HN","HR","HT","HU","ID",
  138.         "IE","IL","IN","IO","IQ","IR","IS","IT","JM","JO",
  139.         "JP","KE","KG","KH","KI","KM","KN","KP","KR","KW",
  140.         "KY","KZ","LA","LB","LC","LI","LK","LR","LS","LT",
  141.         "LU","LV","LY","MA","MC","MD","MG","MH","MK","ML",
  142.         "MM","MN","MO","MP","MQ","MR","MS","MT","MU","MV",
  143.         "MW","MX","MY","MZ","NA","NC","NE","NF","NG","NI",
  144.         "NL","NO","NP","NR","NU","NZ","OM","PA","PE","PF",
  145.         "PG","PH","PK","PL","PM","PN","PR","PS","PT","PW",
  146.         "PY","QA","RE","RO","RU","RW","SA","SB","SC","SD",
  147.         "SE","SG","SH","SI","SJ","SK","SL","SM","SN","SO",
  148.         "SR","ST","SV","SY","SZ","TC","TD","TF","TG","TH",
  149.         "TJ","TK","TM","TN","TO","TL","TR","TT","TV","TW",
  150.         "TZ","UA","UG","UM","US","UY","UZ","VA","VC","VE",
  151.         "VG","VI","VN","VU","WF","WS","YE","YT","RS","ZA",
  152.         "ZM","ME","ZW","A1","A2","O1","AX","GG","IM","JE",
  153.   "BL","MF", "BQ", "SS", "O1" );
  154.     var $GEOIP_COUNTRY_CODES3 = array(
  155.       "","AP","EU","AND","ARE","AFG","ATG","AIA","ALB","ARM","CUW",
  156.         "AGO","ATA","ARG","ASM","AUT","AUS","ABW","AZE","BIH","BRB",
  157.         "BGD","BEL","BFA","BGR","BHR","BDI","BEN","BMU","BRN","BOL",
  158.         "BRA","BHS","BTN","BVT","BWA","BLR","BLZ","CAN","CCK","COD",
  159.         "CAF","COG","CHE","CIV","COK","CHL","CMR","CHN","COL","CRI",
  160.         "CUB","CPV","CXR","CYP","CZE","DEU","DJI","DNK","DMA","DOM",
  161.         "DZA","ECU","EST","EGY","ESH","ERI","ESP","ETH","FIN","FJI",
  162.         "FLK","FSM","FRO","FRA","SXM","GAB","GBR","GRD","GEO","GUF",
  163.         "GHA","GIB","GRL","GMB","GIN","GLP","GNQ","GRC","SGS","GTM",
  164.         "GUM","GNB","GUY","HKG","HMD","HND","HRV","HTI","HUN","IDN",
  165.         "IRL","ISR","IND","IOT","IRQ","IRN","ISL","ITA","JAM","JOR",
  166.         "JPN","KEN","KGZ","KHM","KIR","COM","KNA","PRK","KOR","KWT",
  167.         "CYM","KAZ","LAO","LBN","LCA","LIE","LKA","LBR","LSO","LTU",
  168.         "LUX","LVA","LBY","MAR","MCO","MDA","MDG","MHL","MKD","MLI",
  169.         "MMR","MNG","MAC","MNP","MTQ","MRT","MSR","MLT","MUS","MDV",
  170.         "MWI","MEX","MYS","MOZ","NAM","NCL","NER","NFK","NGA","NIC",
  171.         "NLD","NOR","NPL","NRU","NIU","NZL","OMN","PAN","PER","PYF",
  172.         "PNG","PHL","PAK","POL","SPM","PCN","PRI","PSE","PRT","PLW",
  173.         "PRY","QAT","REU","ROU","RUS","RWA","SAU","SLB","SYC","SDN",
  174.         "SWE","SGP","SHN","SVN","SJM","SVK","SLE","SMR","SEN","SOM",
  175.         "SUR","STP","SLV","SYR","SWZ","TCA","TCD","ATF","TGO","THA",
  176.         "TJK","TKL","TKM","TUN","TON","TLS","TUR","TTO","TUV","TWN",
  177.         "TZA","UKR","UGA","UMI","USA","URY","UZB","VAT","VCT","VEN",
  178.         "VGB","VIR","VNM","VUT","WLF","WSM","YEM","MYT","SRB","ZAF",
  179.         "ZMB","MNE","ZWE","A1","A2","O1","ALA","GGY","IMN","JEY",
  180.   "BLM","MAF", "BES", "SSD", "O1"
  181.   );
  182.     var $GEOIP_COUNTRY_NAMES = array(
  183.     "","Asia/Pacific Region","Europe","Andorra","United Arab Emirates","Afghanistan","Antigua and Barbuda","Anguilla","Albania","Armenia","Curacao",
  184.         "Angola","Antarctica","Argentina","American Samoa","Austria","Australia","Aruba","Azerbaijan","Bosnia and Herzegovina","Barbados",
  185.         "Bangladesh","Belgium","Burkina Faso","Bulgaria","Bahrain","Burundi","Benin","Bermuda","Brunei Darussalam","Bolivia",
  186.         "Brazil","Bahamas","Bhutan","Bouvet Island","Botswana","Belarus","Belize","Canada","Cocos (Keeling) Islands","Congo, The Democratic Republic of the",
  187.         "Central African Republic","Congo","Switzerland","Cote D'Ivoire","Cook Islands","Chile","Cameroon","China","Colombia","Costa Rica",
  188.         "Cuba","Cape Verde","Christmas Island","Cyprus","Czech Republic","Germany","Djibouti","Denmark","Dominica","Dominican Republic",
  189.         "Algeria","Ecuador","Estonia","Egypt","Western Sahara","Eritrea","Spain","Ethiopia","Finland","Fiji",
  190.         "Falkland Islands (Malvinas)","Micronesia, Federated States of","Faroe Islands","France","Sint Maarten (Dutch part)","Gabon","United Kingdom","Grenada","Georgia","French Guiana",
  191.         "Ghana","Gibraltar","Greenland","Gambia","Guinea","Guadeloupe","Equatorial Guinea","Greece","South Georgia and the South Sandwich Islands","Guatemala",
  192.         "Guam","Guinea-Bissau","Guyana","Hong Kong","Heard Island and McDonald Islands","Honduras","Croatia","Haiti","Hungary","Indonesia",
  193.         "Ireland","Israel","India","British Indian Ocean Territory","Iraq","Iran, Islamic Republic of","Iceland","Italy","Jamaica","Jordan",
  194.         "Japan","Kenya","Kyrgyzstan","Cambodia","Kiribati","Comoros","Saint Kitts and Nevis","Korea, Democratic People's Republic of","Korea, Republic of","Kuwait",
  195.         "Cayman Islands","Kazakhstan","Lao People's Democratic Republic","Lebanon","Saint Lucia","Liechtenstein","Sri Lanka","Liberia","Lesotho","Lithuania",
  196.         "Luxembourg","Latvia","Libya","Morocco","Monaco","Moldova, Republic of","Madagascar","Marshall Islands","Macedonia","Mali",
  197.         "Myanmar","Mongolia","Macau","Northern Mariana Islands","Martinique","Mauritania","Montserrat","Malta","Mauritius","Maldives",
  198.         "Malawi","Mexico","Malaysia","Mozambique","Namibia","New Caledonia","Niger","Norfolk Island","Nigeria","Nicaragua",
  199.         "Netherlands","Norway","Nepal","Nauru","Niue","New Zealand","Oman","Panama","Peru","French Polynesia",
  200.         "Papua New Guinea","Philippines","Pakistan","Poland","Saint Pierre and Miquelon","Pitcairn Islands","Puerto Rico","Palestinian Territory","Portugal","Palau",
  201.         "Paraguay","Qatar","Reunion","Romania","Russian Federation","Rwanda","Saudi Arabia","Solomon Islands","Seychelles","Sudan",
  202.         "Sweden","Singapore","Saint Helena","Slovenia","Svalbard and Jan Mayen","Slovakia","Sierra Leone","San Marino","Senegal","Somalia","Suriname",
  203.         "Sao Tome and Principe","El Salvador","Syrian Arab Republic","Swaziland","Turks and Caicos Islands","Chad","French Southern Territories","Togo","Thailand",
  204.         "Tajikistan","Tokelau","Turkmenistan","Tunisia","Tonga","Timor-Leste","Turkey","Trinidad and Tobago","Tuvalu","Taiwan",
  205.         "Tanzania, United Republic of","Ukraine","Uganda","United States Minor Outlying Islands","United States","Uruguay","Uzbekistan","Holy See (Vatican City State)","Saint Vincent and the Grenadines","Venezuela",
  206.         "Virgin Islands, British","Virgin Islands, U.S.","Vietnam","Vanuatu","Wallis and Futuna","Samoa","Yemen","Mayotte","Serbia","South Africa",
  207.         "Zambia","Montenegro","Zimbabwe","Anonymous Proxy","Satellite Provider","Other","Aland Islands","Guernsey","Isle of Man","Jersey",
  208.         "Saint Barthelemy","Saint Martin", "Bonaire, Saint Eustatius and Saba",
  209.         "South Sudan", "Other"
  210. );
  211.  
  212.     var $GEOIP_CONTINENT_CODES = array(
  213.   "--", "AS","EU","EU","AS","AS","NA","NA","EU","AS","NA",
  214.         "AF","AN","SA","OC","EU","OC","NA","AS","EU","NA",
  215.         "AS","EU","AF","EU","AS","AF","AF","NA","AS","SA",
  216.         "SA","NA","AS","AN","AF","EU","NA","NA","AS","AF",
  217.         "AF","AF","EU","AF","OC","SA","AF","AS","SA","NA",
  218.         "NA","AF","AS","AS","EU","EU","AF","EU","NA","NA",
  219.         "AF","SA","EU","AF","AF","AF","EU","AF","EU","OC",
  220.         "SA","OC","EU","EU","NA","AF","EU","NA","AS","SA",
  221.         "AF","EU","NA","AF","AF","NA","AF","EU","AN","NA",
  222.         "OC","AF","SA","AS","AN","NA","EU","NA","EU","AS",
  223.         "EU","AS","AS","AS","AS","AS","EU","EU","NA","AS",
  224.         "AS","AF","AS","AS","OC","AF","NA","AS","AS","AS",
  225.         "NA","AS","AS","AS","NA","EU","AS","AF","AF","EU",
  226.         "EU","EU","AF","AF","EU","EU","AF","OC","EU","AF",
  227.         "AS","AS","AS","OC","NA","AF","NA","EU","AF","AS",
  228.         "AF","NA","AS","AF","AF","OC","AF","OC","AF","NA",
  229.         "EU","EU","AS","OC","OC","OC","AS","NA","SA","OC",
  230.         "OC","AS","AS","EU","NA","OC","NA","AS","EU","OC",
  231.         "SA","AS","AF","EU","EU","AF","AS","OC","AF","AF",
  232.         "EU","AS","AF","EU","EU","EU","AF","EU","AF","AF",
  233.         "SA","AF","NA","AS","AF","NA","AF","AN","AF","AS",
  234.         "AS","OC","AS","AF","OC","AS","EU","NA","OC","AS",
  235.         "AF","EU","AF","OC","NA","SA","AS","EU","NA","SA",
  236.         "NA","NA","AS","OC","OC","OC","AS","AF","EU","AF",
  237.         "AF","EU","AF","--","--","--","EU","EU","EU","EU",
  238.         "NA","NA","NA", "AF", "--"
  239. );
  240. }
  241. } // class_exists
  242.  
  243. if( !function_exists('geoip_load_shared_mem') ) {
  244. function geoip_load_shared_mem ($file) {
  245.  
  246.   $fp = fopen($file, "rb");
  247.   if (!$fp) {
  248.     print "error opening $file: $php_errormsg\n";
  249.     exit;
  250.   }
  251.   $s_array = fstat($fp);
  252.   $size = $s_array['size'];
  253.   if ($shmid = @shmop_open (GEOIP_SHM_KEY, "w", 0, 0)) {
  254.     shmop_delete ($shmid);
  255.     shmop_close ($shmid);
  256.   }
  257.   $shmid = shmop_open (GEOIP_SHM_KEY, "c", 0644, $size);
  258.   shmop_write ($shmid, fread($fp, $size), 0);
  259.   shmop_close ($shmid);
  260. }
  261. } // function_exists
  262.  
  263. if( !function_exists('_setup_segments') ) {
  264. function _setup_segments($gi){
  265.   $gi->databaseType = GEOIP_COUNTRY_EDITION;
  266.   $gi->record_length = STANDARD_RECORD_LENGTH;
  267.   if ($gi->flags & GEOIP_SHARED_MEMORY) {
  268.     $offset = @shmop_size ($gi->shmid) - 3;
  269.     for ($i = 0; $i < STRUCTURE_INFO_MAX_SIZE; $i++) {
  270.         $delim = @shmop_read ($gi->shmid, $offset, 3);
  271.         $offset += 3;
  272.         if ($delim == (chr(255).chr(255).chr(255))) {
  273.             $gi->databaseType = ord(@shmop_read ($gi->shmid, $offset, 1));
  274.             $offset++;
  275.  
  276.             if ($gi->databaseType == GEOIP_REGION_EDITION_REV0){
  277.                 $gi->databaseSegments = GEOIP_STATE_BEGIN_REV0;
  278.             } else if ($gi->databaseType == GEOIP_REGION_EDITION_REV1){
  279.                 $gi->databaseSegments = GEOIP_STATE_BEGIN_REV1;
  280.             } else if (($gi->databaseType == GEOIP_CITY_EDITION_REV0)||
  281.                      ($gi->databaseType == GEOIP_CITY_EDITION_REV1)
  282.                     || ($gi->databaseType == GEOIP_ORG_EDITION)
  283.                     || ($gi->databaseType == GEOIP_ORG_EDITION_V6)
  284.                     || ($gi->databaseType == GEOIP_DOMAIN_EDITION)
  285.                     || ($gi->databaseType == GEOIP_DOMAIN_EDITION_V6)
  286.                     || ($gi->databaseType == GEOIP_ISP_EDITION)
  287.                     || ($gi->databaseType == GEOIP_ISP_EDITION_V6)
  288.                     || ($gi->databaseType == GEOIP_USERTYPE_EDITION)
  289.                     || ($gi->databaseType == GEOIP_USERTYPE_EDITION_V6)
  290.                     || ($gi->databaseType == GEOIP_LOCATIONA_EDITION)
  291.                     || ($gi->databaseType == GEOIP_ACCURACYRADIUS_EDITION)
  292.                     || ($gi->databaseType == GEOIP_CITY_EDITION_REV0_V6)
  293.                     || ($gi->databaseType == GEOIP_CITY_EDITION_REV1_V6)
  294.                     || ($gi->databaseType == GEOIP_NETSPEED_EDITION_REV1)                    
  295.                     || ($gi->databaseType == GEOIP_NETSPEED_EDITION_REV1_V6)                    
  296.                     || ($gi->databaseType == GEOIP_ASNUM_EDITION)
  297.                     || ($gi->databaseType == GEOIP_ASNUM_EDITION_V6)){
  298.                 $gi->databaseSegments = 0;
  299.                 $buf = @shmop_read ($gi->shmid, $offset, SEGMENT_RECORD_LENGTH);
  300.                 for ($j = 0;$j < SEGMENT_RECORD_LENGTH;$j++){
  301.                     $gi->databaseSegments += (ord($buf[$j]) << ($j * 8));
  302.                 }
  303.                     if (($gi->databaseType == GEOIP_ORG_EDITION)
  304.                         || ($gi->databaseType == GEOIP_ORG_EDITION_V6)
  305.                         || ($gi->databaseType == GEOIP_DOMAIN_EDITION)
  306.                         || ($gi->databaseType == GEOIP_DOMAIN_EDITION_V6)
  307.                         || ($gi->databaseType == GEOIP_ISP_EDITION)
  308.                         || ($gi->databaseType == GEOIP_ISP_EDITION_V6)) {
  309.                         $gi->record_length = ORG_RECORD_LENGTH;
  310.                 }
  311.             }
  312.             break;
  313.         } else {
  314.             $offset -= 4;
  315.         }
  316.     }
  317.     if (($gi->databaseType == GEOIP_COUNTRY_EDITION)||
  318.         ($gi->databaseType == GEOIP_COUNTRY_EDITION_V6)||
  319.         ($gi->databaseType == GEOIP_PROXY_EDITION)||
  320.         ($gi->databaseType == GEOIP_NETSPEED_EDITION)){
  321.         $gi->databaseSegments = GEOIP_COUNTRY_BEGIN;
  322.     }
  323.   } else {
  324.     $filepos = ftell($gi->filehandle);
  325.     fseek($gi->filehandle, -3, SEEK_END);
  326.     for ($i = 0; $i < STRUCTURE_INFO_MAX_SIZE; $i++) {
  327.         $delim = fread($gi->filehandle,3);
  328.         if ($delim == (chr(255).chr(255).chr(255))){
  329.         $gi->databaseType = ord(fread($gi->filehandle,1));
  330.         if ($gi->databaseType == GEOIP_REGION_EDITION_REV0){
  331.             $gi->databaseSegments = GEOIP_STATE_BEGIN_REV0;
  332.         }
  333.         else if ($gi->databaseType == GEOIP_REGION_EDITION_REV1){
  334.             $gi->databaseSegments = GEOIP_STATE_BEGIN_REV1;
  335.                 }  else if (($gi->databaseType == GEOIP_CITY_EDITION_REV0)
  336.                     || ($gi->databaseType == GEOIP_CITY_EDITION_REV1)
  337.                     || ($gi->databaseType == GEOIP_CITY_EDITION_REV0_V6)
  338.                     || ($gi->databaseType == GEOIP_CITY_EDITION_REV1_V6)
  339.                     || ($gi->databaseType == GEOIP_ORG_EDITION)
  340.                     || ($gi->databaseType == GEOIP_DOMAIN_EDITION)
  341.                     || ($gi->databaseType == GEOIP_ISP_EDITION)
  342.                     || ($gi->databaseType == GEOIP_ORG_EDITION_V6)
  343.                     || ($gi->databaseType == GEOIP_DOMAIN_EDITION_V6)
  344.                     || ($gi->databaseType == GEOIP_ISP_EDITION_V6)
  345.                     || ($gi->databaseType == GEOIP_LOCATIONA_EDITION)
  346.                     || ($gi->databaseType == GEOIP_ACCURACYRADIUS_EDITION)
  347.                     || ($gi->databaseType == GEOIP_CITY_EDITION_REV0_V6)
  348.                     || ($gi->databaseType == GEOIP_CITY_EDITION_REV1_V6)
  349.                     || ($gi->databaseType == GEOIP_NETSPEED_EDITION_REV1)                    
  350.                     || ($gi->databaseType == GEOIP_NETSPEED_EDITION_REV1_V6)                    
  351.                     || ($gi->databaseType == GEOIP_USERTYPE_EDITION)
  352.                     || ($gi->databaseType == GEOIP_USERTYPE_EDITION_V6)
  353.                     || ($gi->databaseType == GEOIP_ASNUM_EDITION)
  354.                     || ($gi->databaseType == GEOIP_ASNUM_EDITION_V6)){
  355.             $gi->databaseSegments = 0;
  356.             $buf = fread($gi->filehandle,SEGMENT_RECORD_LENGTH);
  357.             for ($j = 0;$j < SEGMENT_RECORD_LENGTH;$j++){
  358.             $gi->databaseSegments += (ord($buf[$j]) << ($j * 8));
  359.             }
  360.             if (   ( $gi->databaseType == GEOIP_ORG_EDITION )
  361.                 || ( $gi->databaseType == GEOIP_DOMAIN_EDITION )
  362.                 || ( $gi->databaseType == GEOIP_ISP_EDITION )
  363.                 || ( $gi->databaseType == GEOIP_ORG_EDITION_V6 )
  364.                 || ( $gi->databaseType == GEOIP_DOMAIN_EDITION_V6 )
  365.                 || ( $gi->databaseType == GEOIP_ISP_EDITION_V6 )) {
  366.             $gi->record_length = ORG_RECORD_LENGTH;
  367.             }
  368.         }
  369.         break;
  370.         } else {
  371.         fseek($gi->filehandle, -4, SEEK_CUR);
  372.         }
  373.     }
  374.     if (($gi->databaseType == GEOIP_COUNTRY_EDITION)||
  375.         ($gi->databaseType == GEOIP_COUNTRY_EDITION_V6)||
  376.         ($gi->databaseType == GEOIP_PROXY_EDITION)||
  377.         ($gi->databaseType == GEOIP_NETSPEED_EDITION)){
  378.          $gi->databaseSegments = GEOIP_COUNTRY_BEGIN;
  379.     }
  380.     fseek($gi->filehandle,$filepos,SEEK_SET);
  381.   }
  382.   return $gi;
  383. }
  384. } // function_exists
  385.  
  386. if( !function_exists( 'geoip_open' ) ) {
  387. function geoip_open($filename, $flags) {
  388.   $gi = new GeoIP;
  389.   $gi->flags = $flags;
  390.   if ($gi->flags & GEOIP_SHARED_MEMORY) {
  391.     $gi->shmid = @shmop_open (GEOIP_SHM_KEY, "a", 0, 0);
  392.     } else {
  393.     $gi->filehandle = fopen($filename,"rb") or die( "Can not open $filename\n" );
  394.     if ($gi->flags & GEOIP_MEMORY_CACHE) {
  395.         $s_array = fstat($gi->filehandle);
  396.         $gi->memory_buffer = fread($gi->filehandle, $s_array['size']);
  397.     }
  398.   }
  399.  
  400.   $gi = _setup_segments($gi);
  401.   return $gi;
  402. }
  403. } // function_exists
  404.  
  405. if( !function_exists( 'geoip_close' ) ) {
  406. function geoip_close($gi) {
  407.   if ($gi->flags & GEOIP_SHARED_MEMORY) {
  408.     return true;
  409.   }
  410.  
  411.   return fclose($gi->filehandle);
  412. }
  413. } // function_exists
  414.  
  415. if( !function_exists( 'geoip_country_id_by_name_v6' ) ) {
  416. function geoip_country_id_by_name_v6($gi, $name) {
  417.   $rec = dns_get_record($name, DNS_AAAA);
  418.   if ( !$rec ) {
  419.     return false;
  420.   }
  421.   $addr = $rec[0]["ipv6"];
  422.   if (!$addr || $addr == $name) {
  423.     return false;
  424.   }
  425.   return geoip_country_id_by_addr_v6($gi, $addr);
  426. }
  427. } // function_exists
  428.  
  429. if( !function_exists( 'geoip_country_id_by_name' ) ) {
  430. function geoip_country_id_by_name($gi, $name) {
  431.   $addr = gethostbyname($name);
  432.   if (!$addr || $addr == $name) {
  433.     return false;
  434.   }
  435.   return geoip_country_id_by_addr($gi, $addr);
  436. }
  437. } // function_exists
  438.  
  439. if( !function_exists( 'geoip_country_code_by_name_v6' ) ) {
  440. function geoip_country_code_by_name_v6($gi, $name) {
  441.   $country_id = geoip_country_id_by_name_v6($gi,$name);
  442.   if ($country_id !== false) {
  443.         return $gi->GEOIP_COUNTRY_CODES[$country_id];
  444.   }
  445.   return false;
  446. }
  447. } // function_exists
  448.  
  449. if( !function_exists( 'geoip_country_code_by_name' ) ) {
  450. function geoip_country_code_by_name($gi, $name) {
  451.   $country_id = geoip_country_id_by_name($gi,$name);
  452.   if ($country_id !== false) {
  453.         return $gi->GEOIP_COUNTRY_CODES[$country_id];
  454.   }
  455.   return false;
  456. }
  457. } // function_exists
  458.  
  459. if( !function_exists( 'geoip_country_name_by_name_v6' ) ) {
  460. function geoip_country_name_by_name_v6($gi, $name) {
  461.   $country_id = geoip_country_id_by_name_v6($gi,$name);
  462.   if ($country_id !== false) {
  463.         return $gi->GEOIP_COUNTRY_NAMES[$country_id];
  464.   }
  465.   return false;
  466. }
  467. } // function_exists
  468.  
  469. if( !function_exists( 'geoip_country_name_by_name' ) ) {
  470. function geoip_country_name_by_name($gi, $name) {
  471.   $country_id = geoip_country_id_by_name($gi,$name);
  472.   if ($country_id !== false) {
  473.         return $gi->GEOIP_COUNTRY_NAMES[$country_id];
  474.   }
  475.   return false;
  476. }
  477. } // function_exists
  478.  
  479. if( !function_exists( 'geoip_country_id_by_addr_v6' ) ) {
  480. function geoip_country_id_by_addr_v6($gi, $addr) {
  481.   $ipnum = inet_pton($addr);
  482.   return _geoip_seek_country_v6($gi, $ipnum) - GEOIP_COUNTRY_BEGIN;
  483. }
  484. } // function_exists
  485.  
  486. if( !function_exists( 'geoip_country_id_by_addr' ) ) {
  487. function geoip_country_id_by_addr($gi, $addr) {
  488.   $ipnum = ip2long($addr);
  489.   return _geoip_seek_country($gi, $ipnum) - GEOIP_COUNTRY_BEGIN;
  490. }
  491. } // function_exists
  492.  
  493. if( !function_exists( 'geoip_country_code_by_addr_v6' ) ) {
  494. function geoip_country_code_by_addr_v6($gi, $addr) {
  495.     $country_id = geoip_country_id_by_addr_v6($gi,$addr);
  496.     if ($country_id !== false) {
  497.       return $gi->GEOIP_COUNTRY_CODES[$country_id];
  498.     }
  499.   return false;
  500. }
  501. } // function_exists
  502.  
  503. if( !function_exists( 'geoip_country_code_by_addr' ) ) {
  504. function geoip_country_code_by_addr($gi, $addr) {
  505.   if ($gi->databaseType == GEOIP_CITY_EDITION_REV1) {
  506.     $record = geoip_record_by_addr($gi,$addr);
  507.     if ( $record !== false ) {
  508.       return $record->country_code;
  509.     }
  510.   } else {
  511.     $country_id = geoip_country_id_by_addr($gi,$addr);
  512.     if ($country_id !== false) {
  513.       return $gi->GEOIP_COUNTRY_CODES[$country_id];
  514.     }
  515.   }
  516.   return false;
  517. }
  518. } // function_exists
  519.  
  520. if( !function_exists( 'geoip_country_name_by_addr_v6' ) ) {
  521. function geoip_country_name_by_addr_v6($gi, $addr) {
  522.     $country_id = geoip_country_id_by_addr_v6($gi,$addr);
  523.     if ($country_id !== false) {
  524.       return $gi->GEOIP_COUNTRY_NAMES[$country_id];
  525.     }
  526.   return false;
  527. }
  528. } // function_exists
  529.  
  530. if( !function_exists( 'geoip_country_name_by_addr' ) ) {
  531. function geoip_country_name_by_addr($gi, $addr) {
  532.   if ($gi->databaseType == GEOIP_CITY_EDITION_REV1) {
  533.     $record = geoip_record_by_addr($gi,$addr);
  534.     return $record->country_name;
  535.   } else {
  536.     $country_id = geoip_country_id_by_addr($gi,$addr);
  537.     if ($country_id !== false) {
  538.       return $gi->GEOIP_COUNTRY_NAMES[$country_id];
  539.     }
  540.   }
  541.   return false;
  542. }
  543. } // function_exists
  544.  
  545. if( !function_exists( '_geoip_seek_country_v6' ) ) {
  546. function _geoip_seek_country_v6($gi, $ipnum) {
  547.  
  548.   # arrays from unpack start with offset 1
  549.   # yet another php mystery. array_merge work around
  550.   # this broken behaviour
  551.   $v6vec = array_merge(unpack( "C16", $ipnum));
  552.  
  553.   $offset = 0;
  554.   for ($depth = 127; $depth >= 0; --$depth) {
  555.     if ($gi->flags & GEOIP_MEMORY_CACHE) {
  556.       // workaround php's broken substr, strpos, etc handling with
  557.       // mbstring.func_overload and mbstring.internal_encoding
  558.       $enc = mb_internal_encoding();
  559.        mb_internal_encoding('ISO-8859-1');
  560.  
  561.       $buf = substr($gi->memory_buffer,
  562.                             2 * $gi->record_length * $offset,
  563.                             2 * $gi->record_length);
  564.  
  565.       mb_internal_encoding($enc);
  566.     } elseif ($gi->flags & GEOIP_SHARED_MEMORY) {
  567.       $buf = @shmop_read ($gi->shmid,
  568.                             2 * $gi->record_length * $offset,
  569.                             2 * $gi->record_length );
  570.         } else {
  571.       fseek($gi->filehandle, 2 * $gi->record_length * $offset, SEEK_SET) == 0
  572.         or die("fseek failed");
  573.       $buf = fread($gi->filehandle, 2 * $gi->record_length);
  574.     }
  575.     $x = array(0,0);
  576.     for ($i = 0; $i < 2; ++$i) {
  577.       for ($j = 0; $j < $gi->record_length; ++$j) {
  578.         $x[$i] += ord($buf[$gi->record_length * $i + $j]) << ($j * 8);
  579.       }
  580.     }
  581.  
  582.     $bnum = 127 - $depth;
  583.     $idx = $bnum >> 3;
  584.     $b_mask = 1 << ( $bnum & 7 ^ 7 );
  585.     if (($v6vec[$idx] & $b_mask) > 0) {
  586.       if ($x[1] >= $gi->databaseSegments) {
  587.         return $x[1];
  588.       }
  589.       $offset = $x[1];
  590.     } else {
  591.       if ($x[0] >= $gi->databaseSegments) {
  592.         return $x[0];
  593.       }
  594.       $offset = $x[0];
  595.     }
  596.   }
  597.   trigger_error("error traversing database - perhaps it is corrupt?", E_USER_ERROR);
  598.   return false;
  599. }
  600. } // function_exists
  601.  
  602. if( !function_exists( '_geoip_seek_country' ) ) {
  603. function _geoip_seek_country($gi, $ipnum) {
  604.   $offset = 0;
  605.   for ($depth = 31; $depth >= 0; --$depth) {
  606.     if ($gi->flags & GEOIP_MEMORY_CACHE) {
  607.       // workaround php's broken substr, strpos, etc handling with
  608.       // mbstring.func_overload and mbstring.internal_encoding
  609.       $enc = mb_internal_encoding();
  610.        mb_internal_encoding('ISO-8859-1');
  611.  
  612.       $buf = substr($gi->memory_buffer,
  613.                             2 * $gi->record_length * $offset,
  614.                             2 * $gi->record_length);
  615.  
  616.       mb_internal_encoding($enc);
  617.     } elseif ($gi->flags & GEOIP_SHARED_MEMORY) {
  618.       $buf = @shmop_read ($gi->shmid,
  619.                             2 * $gi->record_length * $offset,
  620.                             2 * $gi->record_length );
  621.         } else {
  622.       fseek($gi->filehandle, 2 * $gi->record_length * $offset, SEEK_SET) == 0
  623.         or die("fseek failed");
  624.       $buf = fread($gi->filehandle, 2 * $gi->record_length);
  625.     }
  626.     $x = array(0,0);
  627.     for ($i = 0; $i < 2; ++$i) {
  628.       for ($j = 0; $j < $gi->record_length; ++$j) {
  629.         $x[$i] += ord($buf[$gi->record_length * $i + $j]) << ($j * 8);
  630.       }
  631.     }
  632.     if ($ipnum & (1 << $depth)) {
  633.       if ($x[1] >= $gi->databaseSegments) {
  634.         return $x[1];
  635.       }
  636.       $offset = $x[1];
  637.         } else {
  638.       if ($x[0] >= $gi->databaseSegments) {
  639.         return $x[0];
  640.       }
  641.       $offset = $x[0];
  642.     }
  643.   }
  644.   trigger_error("error traversing database - perhaps it is corrupt?", E_USER_ERROR);
  645.   return false;
  646. }
  647. } // function_exists
  648.  
  649. if( !function_exists( '_common_get_org' ) ) {
  650. function _common_get_org($gi, $seek_org){
  651.   $record_pointer = $seek_org + (2 * $gi->record_length - 1) * $gi->databaseSegments;
  652.   if ($gi->flags & GEOIP_SHARED_MEMORY) {
  653.     $org_buf = @shmop_read ($gi->shmid, $record_pointer, MAX_ORG_RECORD_LENGTH);
  654.     } else {
  655.     fseek($gi->filehandle, $record_pointer, SEEK_SET);
  656.     $org_buf = fread($gi->filehandle,MAX_ORG_RECORD_LENGTH);
  657.   }
  658.   // workaround php's broken substr, strpos, etc handling with
  659.   // mbstring.func_overload and mbstring.internal_encoding
  660.   $enc = mb_internal_encoding();
  661.   mb_internal_encoding('ISO-8859-1');
  662.   $org_buf = substr($org_buf, 0, strpos($org_buf, "\0"));
  663.   mb_internal_encoding($enc);
  664.   return $org_buf;
  665. }
  666. } // function_exists
  667.  
  668. if( !function_exists( '_get_org_v6' ) ) {
  669. function _get_org_v6($gi,$ipnum){
  670.   $seek_org = _geoip_seek_country_v6($gi,$ipnum);
  671.   if ($seek_org == $gi->databaseSegments) {
  672.     return NULL;
  673.   }
  674.   return _common_get_org($gi, $seek_org);
  675. }
  676. } // function_exists
  677.  
  678. if( !function_exists( '_get_org' ) ) {
  679. function _get_org($gi,$ipnum){
  680.   $seek_org = _geoip_seek_country($gi,$ipnum);
  681.   if ($seek_org == $gi->databaseSegments) {
  682.     return NULL;
  683.   }
  684.   return _common_get_org($gi, $seek_org);
  685. }
  686. } // function_exists
  687.  
  688.  
  689.  
  690. if( !function_exists( 'geoip_name_by_addr_v6' ) ) {
  691. function geoip_name_by_addr_v6 ($gi,$addr) {
  692.   if ($addr == NULL) {
  693.     return 0;
  694.   }
  695.   $ipnum = inet_pton($addr);
  696.   return _get_org_v6($gi, $ipnum);
  697. }
  698. } // function_exists
  699.  
  700. if( !function_exists( 'geoip_name_by_addr' ) ) {
  701. function geoip_name_by_addr ($gi,$addr) {
  702.   if ($addr == NULL) {
  703.     return 0;
  704.   }
  705.   $ipnum = ip2long($addr);
  706.   return _get_org($gi, $ipnum);
  707. }
  708. } // function_exists
  709.  
  710. if( !function_exists( 'geoip_org_by_addr' ) ) {
  711. function geoip_org_by_addr ($gi,$addr) {
  712.   return geoip_name_by_addr($gi, $addr);
  713. }
  714. } // function_exists
  715.  
  716. if( !function_exists( '_get_region' ) ) {
  717. function _get_region($gi,$ipnum){
  718.   if ($gi->databaseType == GEOIP_REGION_EDITION_REV0){
  719.     $seek_region = _geoip_seek_country($gi,$ipnum) - GEOIP_STATE_BEGIN_REV0;
  720.     if ($seek_region >= 1000){
  721.       $country_code = "US";
  722.       $region = chr(($seek_region - 1000)/26 + 65) . chr(($seek_region - 1000)%26 + 65);
  723.     } else {
  724.             $country_code = $gi->GEOIP_COUNTRY_CODES[$seek_region];
  725.       $region = "";
  726.     }
  727.   return array ($country_code,$region);
  728.     }  else if ($gi->databaseType == GEOIP_REGION_EDITION_REV1) {
  729.     $seek_region = _geoip_seek_country($gi,$ipnum) - GEOIP_STATE_BEGIN_REV1;
  730.     //print $seek_region;
  731.     if ($seek_region < US_OFFSET){
  732.       $country_code = "";
  733.       $region = "";  
  734.         } else if ($seek_region < CANADA_OFFSET) {
  735.       $country_code = "US";
  736.       $region = chr(($seek_region - US_OFFSET)/26 + 65) . chr(($seek_region - US_OFFSET)%26 + 65);
  737.         } else if ($seek_region < WORLD_OFFSET) {
  738.       $country_code = "CA";
  739.       $region = chr(($seek_region - CANADA_OFFSET)/26 + 65) . chr(($seek_region - CANADA_OFFSET)%26 + 65);
  740.     } else {
  741.             $country_code = $gi->GEOIP_COUNTRY_CODES[($seek_region - WORLD_OFFSET) / FIPS_RANGE];
  742.       $region = "";
  743.     }
  744.   return array ($country_code,$region);
  745.   }
  746. }
  747. } // function_exists
  748.  
  749. if( !function_exists( 'geoip_region_by_addr' ) ) {
  750. function geoip_region_by_addr ($gi,$addr) {
  751.   if ($addr == NULL) {
  752.     return 0;
  753.   }
  754.   $ipnum = ip2long($addr);
  755.   return _get_region($gi, $ipnum);
  756. }
  757. } // function_exists
  758.  
  759. if( !function_exists( 'getdnsattributes' ) ) {
  760. function getdnsattributes ($l,$ip){
  761.   $r = new Net_DNS_Resolver();
  762.   $r->nameservers = array("ws1.maxmind.com");
  763.   $p = $r->search($l."." . $ip .".s.maxmind.com","TXT","IN");
  764.   $str = is_object($p->answer[0])?$p->answer[0]->string():'';
  765.   $str = substr( $str, 1, -1 );
  766.   return $str;
  767. }
  768. } // function_exists

Paste is for source code and general debugging text.

Login or Register to edit, delete and keep track of your pastes and more.

Raw Paste

Login or Register to edit or fork this paste. It's free.