Hello Monks,

A restrictive firewall at work forces me to run the ssh server on my home box on port 443. Unfortunately I would really prefer to be running my https server on that port instead.

I was thinking that I might write a perl listener that accepts connections on port 443. If something resembling an http request ("GET / ...") is received from the client within the first couple of seconds after a connection, then it would open a socket to localhost:444 (where the real https server would be running) and basically proxy between the two.

However, if nothing is received from the client in the first couple of seconds, then open a connection to localhost:22 and again act as a proxy. The ssh server would then send its own banner to the client.

The questions at hand are:

• Has anybody already implemented this, or something like this that might save me a bucket of time? :-)
• Failing the above, can someone point me to some sample code for this sort of thing that would illustrate how I'd do it in a non-blocking way? Am I going to have to fork on each client connect or stuff? How do I listen for data on each socket and forward it on to the other simultaneously?
• Are there any pitfalls that aren't obvious?

Thank you kindly Monks.

---

---

Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!

Titles consisting of a single word are discouraged, and in most cases are disallowed outright.

Read Where should I post X? if you're not absolutely sure you're posting in the right place.

Please read these before you post! —

• How do I compose an effective node title?
• How do I post a question effectively?
• Markup in the Monastery

Posts may use any of the Perl Monks Approved HTML tags:

a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr

You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)

	For:		Use:
	&		&
	<		&lt;
	>		&gt;
	[		&#91;
	]		&#93;

Link using PerlMonks shortcuts! What shortcuts can I use for linking?

See Writeup Formatting Tips and other pages linked from there for more info.