OBTW
    gopherd.lol -- a minimal Gopher server written in LOLCODE
    example:
        ./lci gopherd.lol
        point your favorite gopher client to gopher://localhost:13337/
        ????
        profit!
    by Robert Miles, 2018
    based on httpd.lol (by Justin J. Meza, 2014)
TLDR
HAI 1.4
    CAN HAS STDIO?
    CAN HAS SOCKS?
    CAN HAS STRING?

    HOW IZ I parse YR header
	I HAS A len ITZ I IZ STRING'Z LEN YR header MKAY
	BOTH SAEM len AN 2, O RLY?
	YA RLY
		I HAS A char ITZ I IZ STRING'Z AT YR header AN YR 0 MKAY
		BOTH SAEM char AN "/", O RLY?
		YA RLY
			FOUND YR "gophermap"
		OIC
	OIC
	I HAS A file ITZ ""
	IM IN YR loop UPPIN YR index TIL BOTH SAEM index AN len
		BOTH SAEM index AN 0, O RLY?, YA RLY, NO WAI
			I HAS A char ITZ I IZ STRING'Z AT YR header AN YR index MKAY
			file R SMOOSH file AN char MKAY
		OIC
	IM OUTTA YR loop
	FOUND YR file
    IF U SAY SO

    BTW bind to a local port
    I HAS A sock
    sock R I IZ SOCKS'Z BIND YR "127.0.0.1" AN YR 13337 MKAY

    IM IN YR loop
        BTW receive a connection
        I HAS A conn
        conn R I IZ SOCKS'Z LISTN YR sock MKAY

        BTW get a command
        I HAS A cmd
        cmd R I IZ SOCKS'Z GET YR sock AN YR conn AN YR 1024 MKAY
        VISIBLE "CMD IZ " AN cmd

        BTW parse the file name
        I HAS A name ITZ I IZ parse YR cmd MKAY
        VISIBLE "FIEL IZ " AN name

        I HAS A reply ITZ ""

        BTW get the file contents
        I HAS A file ITZ I IZ STDIO'Z OPEN YR name AN YR "r" MKAY
        I IZ STDIO'Z DIAF YR file MKAY, O RLY?
        YA RLY
            VISIBLE "FIEL NOT FOUND"
            reply R "3Cannot find file:3:)"
        NO WAI
            VISIBLE "FIEL FOUND!"
            I HAS A data ITZ I IZ STDIO'Z LUK YR file AN YR 1024 MKAY
            I HAS A len ITZ I IZ STRING'Z LEN YR data MKAY
            I IZ STDIO'Z CLOSE YR file MKAY
            VISIBLE "LEN IZ " AN len
            VISIBLE "DATA IZ " AN data
OBTW
            reply R SMOOSH "HTTP/1.1 200 OK:3:)"...
                    AN "Server: httpd.lol/0.1 (lci):3:)"...
                    AN "Context-Type: text/html:3:)"...
                    AN "Content-Length: :{len}:3:):3:)"...
                    AN ":{data}:3:)" MKAY
TLDR
            reply R data
        OIC

	BTW serve it up
	VISIBLE "REPLY IZ " AN reply
	I IZ SOCKS'Z PUT YR sock AND YR conn AN YR reply MKAY

        BTW buh-bye
        I IZ SOCKS'Z CLOSE YR conn MKAY
    IM OUTTA YR loop
KTHXBYE