I wrote a very small SIP redirect server in perl so friends could call me at sip:firstname.lastname@example.org and have it forwarded to my phone. In the future, I want to add a quick dialplan config file. Maybe support for REGISTER, but I'm honestly not so interested.
To use sipredirect, first edit these two lines at the top of the file:
my $contact = "Billy Biggs <sip:billy\@220.127.116.11>";|
my $localhost = "vektor.ca";
The contact line indicates where the server will redirect INVITE requests. The localhost line must be changed to indicate the name of the server running the script (needed to bind the socket).
There are some compliance issues that I need to fix.
If you have a client that breaks our code let me know, it will give me more reason to clean up my act.