Napisz program, który w zależności od tego, czy skrypt ma dostęp do Internetu, tworzy wyjście „Truthy / Falsey” . Możesz próbować połączyć się z dowolną istniejącą witryną, według własnego uznania (nie używaj podejrzanej witryny, która ma tylko 10% czasu działania - staraj się utrzymywać ponad 80% rocznego czasu pracy). Jeśli witryna nie działa, Twój program nie musi działać.

Musi to być samodzielny program lub funkcja . Aby to osiągnąć, możesz użyć bibliotek spoza standardowej biblioteki. Standardowe luki są zabronione. To jest kod golfowy, więc wygrywa kod z najkrótszą liczbą bajtów.

Przykład pseudokodu:

function a:
    try:
        connect to internet 
        return 1
    catch error:
        return 0

To jest mój pierwszy post na temat kodu golfa, więc jeśli to w jakikolwiek sposób narusza jakiekolwiek zasady lub jest duplikatem, powiadom mnie.

EDYCJA: Z powodu licznych sugestii usunąłem ograniczenie liczby bajtów UTF-8

Bash (z dnsutils ), 3 bajty

Wysyła żądanie DNS dla „.” (DNS root), kod wyjścia to 0 dla sukcesu i> 0 w przeciwnym razie.

Grał w golfa

dig

Test

% dig >/dev/null; echo $?;        
0

% nmcli nm wifi off
% dig >/dev/null; echo $?;
9

Zrzeczenie się

Działa to oczywiście tylko wtedy, gdy serwer DNS znajduje się w sieci dostawcy, tj. W „Internecie” (ponieważ sieć dostawcy jest zwykle jego częścią), lub jeśli system korzysta z publicznego serwera DNS (takiego jak 8.8.8.8 od Google, z których korzystają systemy oparte na Androidzie), w przeciwnym razie możesz uzyskać kopię z pamięci podręcznej z lokalnego serwera LAN (lub localhost).

Ale zakładam, że nie jest to sprzeczne z zasadami golfa kodowego , ponieważ istnieje oczywiście więcej niż jeden system, w którym działa to zgodnie z przeznaczeniem.

Metody Pure-HTTP mogą również dawać fałszywie pozytywne wyniki z powodu pośredniego buforowania proxy i nie gwarantuje się, że będą działać wszędzie, więc nie jest to coś unikalnego dla tej metody.

Nieco bardziej niezawodna wersja, 8 bajtów

dig +tra

(mały hołd dla @ Dig ital Tra uma!)

Włącza „tryb śledzenia”, który wymusi kopanie, aby samodzielnie przeprowadzało wyszukiwanie rekurencyjne (patrz https://serverfault.com/a/778830 ), unikając problemów z pamięcią podręczną.

Narzędzia Bash + GNU, 8

• 5 bajtów zapisanych dzięki @Muzer.

wget to.

Inne odpowiedzi powłoki sprawdzają kod powrotu i odpowiednio odbijają niektóre dane wyjściowe statusu. To jest niepotrzebne. Kod powrotu powłoki jest już użytecznym kodem Truthy / Falsey i jest dostępny w $?parametrze idiomatycznym dla bash. Kod powrotu 0 oznacza Prawda. Kod powrotu> 0 oznacza False.

W użyciu:

ubuntu@ubuntu:~$ wget to.
--2017-01-13 09:10:51--  http://to./
Resolving to. (to.)... 216.74.32.107, 216.74.32.107
Connecting to to. (to.)|216.74.32.107|:80... connected.
HTTP request sent, awaiting response... 200 OK
Length: 11510 (11K) [text/html]
Saving to: ‘index.html.6’

index.html.6        100%[===================>]  11.24K  --.-KB/s    in 0.04s   

2017-01-13 09:10:51 (285 KB/s) - ‘index.html.6’ saved [11510/11510]

ubuntu@ubuntu:~$ echo $?
0
ubuntu@ubuntu:~$ sudo ifconfig ens33 down
ubuntu@ubuntu:~$ wget to.
--2017-01-13 09:11:00--  http://to./
Resolving to. (to.)... failed: Temporary failure in name resolution.
wget: unable to resolve host address ‘to.’
ubuntu@ubuntu:~$ echo $?
4
ubuntu@ubuntu:~$ sudo ifconfig ens33 up
ubuntu@ubuntu:~$ # Local network up, upstream link down
ubuntu@ubuntu:~$ wget to.
--2017-01-13 09:11:34--  http://to./
Resolving to. (to.)... failed: Name or service not known.
wget: unable to resolve host address ‘to.’
ubuntu@ubuntu:~$ echo $?
4
ubuntu@ubuntu:~$ 

Partia, 8 bajtów

ping to.

pingustawi ERRORLEVELsię 1jeśli adres nie może zostać rozwiązany lub osiągnięty.

05AB1E , 11 9 bajtów

Zapisano 2 bajty na „do”. dzięki uprzejmości ev3commander

…to..wgX›

Sprawdza, czy długość treści w http: // to . jest większy niż 1.
.wzwraca 0 w przypadku błędu.

MATL , 15 14 bajtów

Jeden bajt zapisany dzięki Kevin Cruijssen sugestia „s

'http://to.'Xi

Wyjście odbywa się poprzez STDOUT. Wyświetla niepusty ciąg zawierający niezerowe znaki (co jest prawdą), jeśli istnieje połączenie z Internetem; i nic nie wyświetla (co jest fałszem), jeśli nie ma połączenia.

Nie można tego przetestować online, ponieważ Xijest to niedozwolone w tłumaczach internetowych.

Wyjaśnienie

'http://to.'  % Push this string
Xi            % Return contents of that URL as a string. If there is no Internet
              % connection this gives an error, with no output on STDOUT

Bash 66 62 21 bajtów

ping -c1 g.gl echo $?

Dzięki @Alex L. za wskazówkę dotyczącą skrócenia adresu URL.

Wersja bez golfa:

r=$(ping -c1 g.gl)
if [ $? -ne 0 ];
 then echo "0"
else echo "1"
fi

To jest moja pierwsza odpowiedź w Bash, nie jestem pewien, czy wystarczająco skróciłem skrypt.

R, 20 bajtów

curl::has_internet()

W curlpakiecie znajduje się funkcja umożliwiająca wykonanie dokładnie tego zadania .

Java, 72 bajty

a->new java.net.InetSocketAddress("to.",80).getAddress().isReachable(9);

Perl, 15 bajtów

print`curl to.`

Biegnij z:

perl -e 'print`curl to.`' 2> /dev/null

curlwypuszcza STDERRrzeczy, nie przejmuj się nimi. Jeśli komputer ma dostęp do Internetu, wydrukuje kilka wierszy HTML (prawda), w przeciwnym razie nic nie wydrukuje (fałsz).

Zaoszczędziłem 1 bajt, używając to.(zamiast mojego poprzedniego b.io) dzięki @Kevin Cruijssen.

C #, 87 bajtów

_=>{try{new System.Net.WebClient().OpenRead("http://g.gl");return 1;}catch{return 0;}};

Jeśli wyjątek jest uważany za falsey, co nie wydaje mi się, że tak, to jest to 65 bajtów:

_=>new System.Net.WebClient().OpenRead("http://g.gl").ReadByte();

Próbowałem także użyć linku http://to.podanego przez @KevinCruijssen, ale nie działało.

8 , 23 21 bajtów

Dwa bajty zapisane dzięki sugestii Kevina Cruijssena i mojemu odkryciu:http: // to wydaje się również działaćhttp: // do . (zapisywanie kolejnego bajtu)

"http://to" net:get .

Jeśli strona http: // jest dostępna, zostanie wydrukowana true. W przeciwnym razie drukuje się false. Pozostawia pobrane dane na stosie.

MATLAB, 32 22 bajtów

urlread('http://g.gl')

Wyjaśnienie:

Jeśli połączenie internetowe jest uruchomione, spowoduje to, że ans(zmienna domyślna) będzie ciągiem z całym kodem HTML w postaci zwykłego tekstu (co jest prawdą w MATLAB).

Jeśli połączenie internetowe nie działa, spowoduje to zapisanie komunikatu o błędzie do STDERR i pozostawienie obszaru roboczego pustego (co w MATLAB jest fałszywe ).

Niestety urlreadwymaga pełnego adresu URL , więc g.glnie wystarczy. 11 z 22 bajtów jest zatem tylko adresem url.

Alternatywne podejście:

Rozwiązanie, które wychwytuje błąd i pozostawia 0 (również fałsz ) w obszarze roboczym, jeśli połączenie jest nieczynne:

0;try urlread('http://g.gl'),end

0;inicjuje domyślny zmiennej ansdo 0, co jest falsew programie MATLAB. Następnie powinniśmy tryprzeczytać adres URL. To spowoduje błąd, jeśli połączenie internetowe jest wyłączone, lub tablicę znaków, jeśli nie (która jest truew MATLAB).

Nie musimy niczego łapać, więc po prostu kończymy. Jeśli połączenie urlread zakończyło się powodzeniem, ansbędzie długi ciąg z treścią strony internetowej, w przeciwnym razie ans=0.

Bash, 39 bajtów

exec 4<>/dev/tcp/to./80&&echo 1||echo 0

JavaScript ES6, 71 43 bajtów

fetch``.then(a=>alert(1)).catch(a=>alert``)

Alerty 1 w trybie online, alarmuje pusty ciąg w trybie offline. Dzięki Patrick Roberts za pomoc w goleniu niektórych bajtów

Stara wersja

_=>fetch('http://enable-cors.org').then(a=>alert(a)).catch(a=>alert(0))

Alerty w [object Reponse]trybie online, alerty w 0trybie offline

Usunięto fragment kodu, nie działa, ponieważ ładuje się z innej domeny bez CORS, ale działa w konsoli przeglądarki

JavaScript ES6, 90 81 bajtów

f=a=>{i=new Image();i.src="//placehold.it/1x1";i.onload=b=>a(1);i.onerror=c=>a()}

JavaScript ES6, 22 21 bajtów (nieprawidłowy)

Niektóre przeglądarki nie obsługują w pełni lub nie dają oczekiwanych rezultatów podczas korzystania z navigator.onLine.

f=a=>navigator.onLine

Scala, 54 bajty

x=>(Runtime.getRuntime exec "ping -c 1 ai."waitFor)<1

Dość proste; wykonuje polecenie ping do http://ai./i zwraca true, jeśli zakończy się na 0, lub false w przeciwnym razie.

Brainfuck (niekonkurujące) 21 bajtów

++++++[>++++++++<-]>.

Brainfuck nie może połączyć się z Internetem (o ile mi wiadomo), więc ponieważ program nie może się połączyć, odpowiedź jest zawsze 0

Nie konkuruje, ponieważ wydaje się, że mieści się w standardowej luce w zapisie wyjściowym , mimo że program ten technicznie jest odpowiedni do wyzwania.

PowerShell, 64 26 23 bajtów

Zaoszczędzono 38 bajtów dzięki Shawnowi Estermanowi

Zaoszczędzono 3 bajty i naprawiono skrypt, dzięki briantist

Test-Connection -q g.gl

PHP, 23 PHP + Curl, 14

Korzystanie z operatora wstecznego PHP:

<?=`curl to.`;

Oryginalna odpowiedź:

Spróbuję zacząć:

<?=file('http://x.gl');

Nie wyprowadza nic, jeśli x.gl nie może zostać osiągnięte i Arrayjeśli tak jest.

Kolejna wersja, w której nie jestem pewien, czy pasują:

<?=getmxrr('x.gl',$a);  // 22 chars

Żądania w języku Python 3 +, 59 55 53 bajtów

Musi być prośba o odpowiedź, prawda?

from requests import*
try:get("http://to.")
except:Z

Status wyjścia to 0 dla Internetu, 1 dla braku internetu. Przykład:

$ python inet.py 
$ echo $?
0
$ # Remove ethernet cable
$ python inet.py 
$ echo $?
1

Dziennik zmian:

• -4 bajty (dzięki Mego)

Eliksir, 33 bajty

{:ok,_}=:inet.getaddr('to',:inet)

0 jeśli podłączony, 1 w przeciwnym razie.

PowerShell , 12 bajtów

!!(irm g.gl)

Mathematica 10 bajtów

Zakładając, że masz prawidłową kopię Mathematica i dane logowania na user.wolfram.com

CloudPut@1

zapisze wartość 1 w chmurze. Truthy: CloudObject [""] Falsey: $ Failed

CloudGet@%

Zwróci wartość 1, która została przesłana do chmury.

Python 2.7, 70 77 bajtów

from urllib import*
a=1
try:urlopen('http://to.')
except:a=0
print a

import urllib as l
try: 
 l.urlopen('http://a.uk')
 print 1
except:
 print 0

Używa 1 dla prawdy, 0 dla fałszu. a.uk przekierowuje do firmy odzieżowej dla motocykli. Zaoszczędzono 3 bajty, przypisując zmienną i drukując ją. I kolejny dla „do”. trick (potwierdzony do pracy z urllib), dwa do pozbycia się nieznośnych wcięć.

Julia + Bash (z dnsutils), 10 bajtów

run(`dig`)

`command`w Julii tworzy cmdobiekt, który można uruchomić run.

Clojure, 49 bajtów

#(try(slurp"http://to.")1(catch Exception _ nil))

Zwraca, 1jeśli można się połączyć, i w nilinny sposób.

Po prostu próbuje przejść slurpdo strony; zgłaszanie NoRouteToHostExceptionwyjątku w przypadku awarii, która jest przechwytywana.

Niestety protokół i kropka wydają się obowiązkowe.

JavaScript (Nashorn), 61 bajtów

print(new java.net.InetSocketAddress("to.",80).getAddress())

Na podstawie odpowiedzi Java Huntro.