Twoja-Strona.Net - Biblioteka

Chcesz dowiedzieć się z jakiego kraju pochodzi dany użytkownik? Skorzystaj z poniższego skryptu, który pobierze hosta danego usera, a następnie sprawdzi w jakiej domenie jest owy host zarejestrowany i wyświetli stosowny komunikat tz. (Nazwę kraju). Można też dodać zamiast nazw państw odpowiednie flagi :)
001 <?php

002 

003 # Ekipa TS (http://Twoja-Strona.Net)

004 

005 $host = gethostbyaddr(getenv('REMOTE_ADDR'));

006 $array = explode(".", $host); 

007 $top_domain = $array[sizeof($array)-1]; 

008  

009 switch($top_domain) {

010 

011 case 'biz':$country="Business";break;

012 case 'info':$country="Info";break;

013 case 'com':$country="Commercial";break;

014 case 'arpa':$country="ARPANet/USA";break;

015 case 'edu':$country="Education";break; 

016 case 'gov':$country="Government/USA";break;

017 case 'int':$country="Oganization established by an Iinternational Teaty";break;

018 case 'mil':$country="Military/USA";break; 

019 case 'net':$country="Network";break; 

020 case 'org':$country="Organization/USA";break; 

021 case 'ad':$country="Andorra";break; 

022 case 'ae':$country="United Arab Emirates";break; 

023 case 'af':$country="Afghanistan";break; 

024 case 'ag':$country="Antigua & Barbuda";break; 

025 case 'ai':$country="Anguilla";break; 

026 case 'al':$country="Albania";break; 

027 case 'am':$country="Armenia";break; 

028 case 'an':$country="Neterland Antilles";break; 

029 case 'ao':$country="Angola";break; 

030 case 'aq':$country="Antarctica";break; 

031 case 'ar':$country="Argentina";break; 

032 case 'as':$country="American Samoa";break; 

033 case 'at':$country="Austria";break; 

034 case 'au':$country="Australia";break; 

035 case 'aw':$country="Aruba";break; 

036 case 'az':$country="Azerbaijan";break; 

037 case 'ba':$country="Bosnia-Herzegovina";break; 

038 case 'bb':$country="Barbados";break; 

039 case 'bd':$country="Bangladesh";break; 

040 case 'be':$country="Belgium";break; 

041 case 'bf':$country="Burkina Faso";break; 

042 case 'bg':$country="Bulgaria";break; 

043 case 'bh':$country="Bahrain";break; 

044 case 'bi':$country="Burundi";break; 

045 case 'bj':$country="Benin";break; 

046 case 'bm':$country="Bermuda";break; 

047 case 'bn':$country="Brunei Darussalam";break; 

048 case 'bo':$country="Bolivia";break; 

049 case 'br':$country="Brasil";break; 

050 case 'bs':$country="Bahamas";break; 

051 case 'bt':$country="Bhutan";break; 

052 case 'bv':$country="Bouvet Island";break; 

053 case 'bw':$country="Botswana";break; 

054 case 'by':$country="Belarus";break; 

055 case 'bz':$country="Belize";break; 

056 case 'ca':$country="Canada";break; 

057 case 'cc':$country="Cocos (Keeling) Islands";break; 

058 case 'cf':$country="Central African Republic";break; 

059 case 'cg':$country="Congo";break; 

060 case 'ch':$country="Switzerland";break; 

061 case 'ci':$country="Ivory Coast";break; 

062 case 'ck':$country="Cook Islands";break; 

063 case 'cl':$country="Chile";break; 

064 case 'cm':$country="Cameroon";break; 

065 case 'cn':$country="China";break; 

066 case 'co':$country="Colombia";break; 

067 case 'cr':$country="Costa Rica";break; 

068 case 'cs':$country="Czechoslovakia";break; 

069 case 'cu':$country="Cuba";break; 

070 case 'cv':$country="Cape Verde";break; 

071 case 'cx':$country="Christmas Island";break; 

072 case 'cy':$country="Cyprus";break; 

073 case 'cz':$country="Czech Republic";break; 

074 case 'de':$country="Germany";break; 

075 case 'dj':$country="Djibouti";break; 

076 case 'dk':$country="Denmark";break; 

077 case 'dm':$country="Dominica";break; 

078 case 'do':$country="Dominican Republic";break; 

079 case 'dz':$country="Algeria";break; 

080 case 'ec':$country="Ecuador";break; 

081 case 'ee':$country="Estonia";break; 

082 case 'eg':$country="Egypt";break; 

083 case 'eh':$country="Western Sahara";break; 

084 case 'er':$country="Eritrea";break; 

085 case 'es':$country="Spain";break; 

086 case 'et':$country="Ethiopia";break; 

087 case 'fi':$country="Finland";break; 

088 case 'fj':$country="Fiji";break; 

089 

090 # Pełna wersja wszystkich końcówek domen w skrypcie do pobrania poniżej...

091 

092 default: 

093 if (is_numeric($host)) 

094 $country = "Brak domeny."; /* host is an ip-address */ 

095 else 

096 $country = "Nieznana domena."; /* domain not listed above */ 

097 }

098 

099 echo $country;

100 

101 ?>

102