Como todos deberíamos saber, hay un código de estado HTTP 418: soy una tetera .

Su misión, si elige aceptarla, es utilizar su creatividad y escribir el servidor más pequeño posible que responda con el código de estado anterior a todas y cada una de las solicitudes HTTP que se le hagan.

Se aplican lagunas estándar , que incluyen

Obteniendo la salida deseada de una fuente externa

Esto incluye hacer una solicitud HTTP para buscar la página con la pregunta y extraer una solución de esa página. Esto fue ligeramente divertido en 2011, pero ahora es derivado y poco interesante.

Lo que significa que no puede simplemente redirigir la solicitud a otro servidor para que devuelva la respuesta.

Abordar cierta confusión sobre la funcionalidad del servidor:
su servidor puede hacer cualquier cosa (o nada) mientras no se realiza una solicitud HTTP, siempre que responda con la respuesta correcta una vez que se realiza una solicitud HTTP.

GNU Awk: 69 caracteres

Un servidor en sí mismo (atiende sin cesar una solicitud a la vez), no se utiliza biblioteca.

Enviar 418 a todos los que se conectan ( 82 69 caracteres):

BEGIN{while(s="/inet/tcp/80/0/0"){print"HTTP/1.1 418\n"|&s
close(s)}}

Enviar 418 a todos los que envían algo ( 93 80 caracteres):

BEGIN{while(s="/inet/tcp/80/0/0"){s|&getline
print"HTTP/1.1 418\n"|&s
close(s)}}

Envíe 418 a todos los que envíen una solicitud HTTP GET válida ( 122 109 caracteres):

BEGIN{while(s="/inet/tcp/80/0/0"){s|&getline
if(/^GET \S+ HTTP\/1\.[01]$/)print"HTTP/1.1 418\n"|&s
close(s)}}

Golpe (33)

nc -lp80 -q1<<<"HTTP/1.1 418
";$0

PHP - 85 bytes

<?for($s=socket_create_listen(80);socket_write(socket_accept($s),"HTTP/1.1 418
"););

Guardado con terminaciones de línea estilo Windows (CR-LF), requiere php_socketshabilitado.

De hecho, usé esto como mi código de error para Hard Code Golf: crear un desafío de sala de chat , pero nadie se dio cuenta.

Versión amigable para el navegador

<?for(socket_getsockname($s=socket_create_listen(80),$n);$t="I'm a teapot";socket_write($c=socket_accept($s),"HTTP/1.0 418 $t
Content-Length: $l

<title>418 $t</title><h1>$t</h1>The requested resource is not suitable for brewing coffee.<hr><i>$n:80</i>"))$l=124+strlen($n);

Inicie el script en la CLI y apunte su navegador a http://localhost.

Node.js (LiveScript)

http módulo - 66

require(\http)createServer (->&1.writeHead 418;&1.end!) .listen 80

Inspirado por la respuesta de Qwertiy .

net módulo - 76

require(\net)createServer (->it.write 'HTTP/1.1 418\r\n';it.end!) .listen 80

Ruby + Rack, 19 bytes

run->e{[418,{},[]]}

Debe guardarse como config.ruy ejecutarse con el rackupcomando.

O si prefieres Ruby "puro":

Rack::Handler::WEBrick.run->e{[418,{},[]]}

42 bytes + -rrackbandera = 48 bytes

Comandos generales de Bash + BSD, 29

Recurriendo un poco a otras respuestas:

nc -lp80<<<"HTTP/1.1 418
";$0

Funciona para mí con wget.

Primera respuesta al uso nc, 38

for((;;)){
nc -l 80 <<<HTTP/1.1\ 418
}

Asumo privilegios de root: ejecute lo siguiente:

sudo bash ./418.sh

Ruby (comando del sistema nc) - 35

loop{`nc -l 80 <<<"HTTP/1.1 418"`}

DigitalTrauma debería obtener el crédito por la idea de usar nc, sin embargo, Ruby puede hacer un ciclo infinito con menos caracteres que Bash :)

Rubí (TCPServer) - 75

require'socket'
s=TCPServer.new 80
loop{(s.accept<<'HTTP/1.1 418
').close}

Esa nueva línea es intencional: el carácter de nueva línea real es un carácter más corto que "\ n".

Rubí (WEBrick HTTPServer) - 87

require'webrick'
(s=WEBrick::HTTPServer.new).mount_proc(?/){|_,r|r.status=418}
s.start

Node.js, 80

require('http').createServer(function(q,s){s.writeHead(418);s.end()}).listen(80)

La respuesta es

HTTP/1.1 418 I'm a teapot
Date: Wed, 19 Nov 2014 21:08:27 GMT
Connection: keep-alive
Transfer-Encoding: chunked

0

Python 3 106

s=__import__('socket').socket(2,1) 
s.bind(('',80))
s.listen(9)
while 1:s.accept()[0].send('HTTP/1.1 418\n')

Haskell - 142 bytes

import Network
import System.IO
main=listenOn(PortNumber 8888)>>=f
f s=do{(h,_,_)<-accept s;hPutStr h"HTTP/1.1 418\r\n";hFlush h;hClose h;f s}

Tcl (> = 8.5), 78 bytes

Editar: agregado en una nueva línea adicional (un total de 2 nuevas líneas) en aras del cumplimiento.

socket -server {apply {{c - -} {puts $c "HTTP/1.1 418
";close $c}}} 80
vwait f

Julia: 86 73 caracteres

s=listen(80)
while 1<2
c=accept(s)
write(c,"HTTP/1.1 418

")
close(c)
end

Powershell, 398

$Listener = New-Object System.Net.Sockets.TcpListener([System.Net.IPAddress]::Parse("10.10.10.10"), 80)
$Listener.Start()
while($true)
{
    $RemoteClient = $Listener.AcceptTcpClient()
    $Stream = $RemoteClient.GetStream()
    $Writer = New-Object System.IO.StreamWriter $Stream
    $Writer.Write("HTTP/1.1 418 I'm a Teapot`nConnection: Close`n`n")
    $Writer.Flush()
    $RemoteClient.Close()
}

258

$l=New-Object System.Net.Sockets.TcpListener([System.Net.IPAddress]::Parse("10.10.10.10"),80);$l.Start();while($true){$r = $l.AcceptTcpClient();$s = $r.GetStream();$w = New-Object System.IO.StreamWriter $s;$w.Write("HTTP/1.1 418`n`n");$w.Flush();$r.Close()}

R, 80 caracteres

Nunca hice programación de sockets con R antes, pero lo intentaré:

repeat{s=socketConnection(,80,T,open="r+");cat("HTTP/1.1 418\n",file=s);close(s)}

Aquí se socketConnectionabre un socket: el primer argumento debe ser el host, el valor predeterminado es localhostque podemos omitirlo aquí; el segundo argumento es el puerto que no tiene valor predeterminado, luego el argumento servercuando se especifica TRUEcrea el socket, si FALSEsolo se conecta a uno existente. Tes, por defecto, igual a TRUE, en R.

Editar: como se sugiere en una edición sugerida por @AlexBrown, esto podría acortarse en 69 caracteres :

repeat cat("HTTP/1.1 418\n",file=s<-socketConnection(,80,T))+close(s)

Node.js koa , 61 Bytes

require('koa')().use(function*(){this.status=418}).listen(80)

Respuesta:

HTTP/1.1 418 I'm a teapot
X-Powered-By: koa
Content-Type: text/plain; charset=utf-8
Content-Length: 12
Date: Thu, 20 Nov 2014 07:20:36 GMT
Connection: close

I'm a teapot

Requiere el nodo v0.11.12 +

Correr como:

node --harmony app.js

Shell + socat, 60

socat tcp-l:80,fork exec:'printf HTTP/1.1\\ 418\\ T\r\n\r\n'

MATLAB, 97 86 bytes

No es realmente un contendiente serio en términos de conteo absoluto de bytes, pero me gustaría publicarlo porque no pensé que fuera posible escribir un servidor web completamente funcional usando una herramienta matemática. Tenga en cuenta el uso del acortamiento de propiedades : se 'Ne','s'expande internamente a 'NetworkRole', 'server'.

t=tcpip('0.0.0.0','Ne','s');while 1
fopen(t)
fprintf(t,'HTTP/1.1 418\n')
fclose(t)
end

Puede hacer esto con un mínimo esfuerzo utilizando un .htaccessarchivo y php.

Todos los accesos a su servidor devolverán el estado 418.

Debajo está el código:

.htaccess (28 bytes)

RewriteRule .* index.php [L]

PHP ( 38 19 bytes)

<<?header(TE,1,418);

¡Gracias a @primo por salvarme un montón de bytes!

¡He probado esto y confirmo que devuelve el resultado deseado!

Por cierto, "Pedido" significa "Solicitud" y "Resposta" significa "Respuesta".

node.js con CoffeeScript (76)

require("connect")().use((q,s,n)->s.writeHead 418;s.end();return;).listen 80

Simplemente compílelo en JavaScript, luego debe ejecutarlo npm install connect. Después de eso comienza connode server.js

nginx - 35

events{}http{server{return 418;}}

Tíralo en nginx.conf, inicia nginx.

No estoy seguro si esto usa lagunas estándar "Usar funciones integradas para hacer el trabajo" o "Interpretar el desafío demasiado literalmente". Vaya, parece que a OP no le gustará esta respuesta.

Perl, 78

use Web::Simple;sub dispatch_request{sub{[418,[],[]]}}__PACKAGE__->to_psgi_app

correr como plackup whatever.pl.

Python 2.7 / Django, 94 bytes

(agregado de la plantilla predeterminada de django-admin.py startproject) En urls.py:

import django.http.HttpResponse as r;urlpatterns=patterns(url(r'^*$',lambda q:r(status=418)))

C # + OWIN 251 240

Realmente esperaba que fuera más corto, pero los largos espacios de nombres arruinaron ese plan. Requiere el Microsoft.Owin.SelfHostpaquete disponible en NuGet.

using Owin;class P{static void Main(){Microsoft.Owin.Hosting.WebApp.Start<P>("http://localhost");while(0<1);}public void Configuration(IAppBuilder a){a.Run(c=>{c.Response.StatusCode=418;return System.Threading.Tasks.Task.FromResult(0);});}}

node.js con connect (78)

require('connect')().use(function(q,s,n){s.writeHead(418);s.end()}).listen(80)

Necesitas correr npm install connectprimero. Entonces comience connode server.js

Go, 162 bytes

package main
import "net/http"
func main(){http.HandleFunc("/",func(w http.ResponseWriter,r *http.Request){w.WriteHeader(418)})
http.ListenAndServe(":80", nil)
}

Factor, 101 141 bytes

[ utf8 <threaded-server> readln 10 base> >>insecure [ "HTTP/1.1 418\r" print flush ] >>handler [ start-server ] in-thread start-server drop ]

Regrese 418 a todos los que se conectan.

Java 7, 208 bytes

import java.net.*;class R{public static void main(String[]a)throws Exception{for(ServerSocket s=new ServerSocket(80);;){Socket p=s.accept();p.getOutputStream().write("HTTP/1.0 418\n".getBytes());p.close();}}}

Esta pregunta necesitaba una respuesta de Java.

poke@server ~
$ curl -i localhost:80
HTTP/1.0 418