HEAD + keepalive

Hi!  next is to support HEAD + keepallive.

Nikola

...
      buffer_puts(buffer_1,"\r\n");
      if (method==GET || method==POST) {
	switch (serve_static_data(fd)) {
        case 1: goto error500; /* file read error */
        case -1: return 0;     /* write output error */
	}
      } else 
	if (buffer_flush(buffer_1)) return 0;
#ifdef KEEPALIVE
#ifdef TCP_CORK
      if (corked) {
	int zero=0;
	setsockopt(1,IPPROTO_TCP,TCP_CORK,&zero,sizeof(zero));
      }
#endif
      if (keepalive>0) {
	close(fd);
	fchdir(rootdir); close(rootdir);
	goto handlenext;
      }
#endif
      exit(0);
error500:
      retcode=500;
    }
  }