Lines 1-5
Link Here
|
1 |
#!/usr/bin/perl |
1 |
#!/usr/bin/perl |
2 |
|
2 |
|
|
|
3 |
=head1 NAME |
4 |
C4::SIP::SIPServer |
5 |
=cut |
6 |
|
3 |
package C4::SIP::SIPServer; |
7 |
package C4::SIP::SIPServer; |
4 |
|
8 |
|
5 |
use strict; |
9 |
use strict; |
Lines 93-99
__PACKAGE__->run(@parms);
Link Here
|
93 |
# Server |
97 |
# Server |
94 |
# |
98 |
# |
95 |
|
99 |
|
96 |
=head3 options |
100 |
=head2 options |
97 |
|
101 |
|
98 |
As per Net::Server documentation, override "options" to provide your own |
102 |
As per Net::Server documentation, override "options" to provide your own |
99 |
custom options to the Net::Server* object. This allows us to use the Net::Server |
103 |
custom options to the Net::Server* object. This allows us to use the Net::Server |
Lines 120-126
sub options {
Link Here
|
120 |
$template->{'custom_tcp_keepalive_intvl'} = \$prop->{'custom_tcp_keepalive_intvl'}; |
124 |
$template->{'custom_tcp_keepalive_intvl'} = \$prop->{'custom_tcp_keepalive_intvl'}; |
121 |
} |
125 |
} |
122 |
|
126 |
|
123 |
=head3 post_configure_hook |
127 |
=head2 post_configure_hook |
124 |
|
128 |
|
125 |
As per Net::Server documentation, this method validates our custom configuration. |
129 |
As per Net::Server documentation, this method validates our custom configuration. |
126 |
|
130 |
|
Lines 148-154
sub post_configure_hook {
Link Here
|
148 |
} |
152 |
} |
149 |
} |
153 |
} |
150 |
|
154 |
|
151 |
=head3 post_accept_hook |
155 |
=head2 post_accept_hook |
152 |
|
156 |
|
153 |
This hook occurs after the client connection socket is created, which gives |
157 |
This hook occurs after the client connection socket is created, which gives |
154 |
us an opportunity to enable support for TCP keepalives using the SO_KEEPALIVE |
158 |
us an opportunity to enable support for TCP keepalives using the SO_KEEPALIVE |