fusion/third_party/libhv/examples/kcptun/client/main.cpp

389 lines
11 KiB
C++
Executable File

/*
* kcptun client
*
* @build: ./configure --with-kcp && make clean && make kcptun examples
* @tcp_server: bin/tcp_echo_server 1234
* @kcptun_server: bin/kcptun_server -l :4000 -t 127.0.0.1:1234
* @kcptun_client: bin/kcptun_client -l :8388 -r 127.0.0.1:4000
* @tcp_client: bin/nc 127.0.0.1 8388
* > hello
* < hello
*/
#define WITH_KCP 1
#include "hversion.h"
#include "hmain.h"
#include "hsocket.h"
#include "hloop.h"
#include "hthread.h"
#include "../smux/smux.h"
// config
static const char* localaddr = ":8388";
static const char* remoteaddr = "127.0.0.1:4000";
static const char* mode = "fast";
static int mtu = 1350;
static int sndwnd = 128;
static int rcvwnd = 512;
// long options
static const option_t long_options[] = {
{'h', "help", NO_ARGUMENT, "Print this information"},
{'v', "version", NO_ARGUMENT, "Print version"},
{'d', "daemon", NO_ARGUMENT, "Daemonize"},
{'l', "localaddr", REQUIRED_ARGUMENT, "local listen address (default: \":8388\")"},
{'r', "remoteaddr", REQUIRED_ARGUMENT, "kcp server address (default: \"127.0.0.1:4000\")"},
{'m', "mode", REQUIRED_ARGUMENT, "profiles: fast3, fast2, fast, normal, (default: \"fast\")"},
{ 0, "mtu", REQUIRED_ARGUMENT, "set maxinum transmission unit for UDP packets (default: 1350)"},
{ 0, "sndwnd", REQUIRED_ARGUMENT, "set send window size(num of packets) (default: 128)"},
{ 0, "rcvwnd", REQUIRED_ARGUMENT, "set receive window size(num of packets) (default: 512)"},
};
static void print_version() {
printf("%s version %s\n", g_main_ctx.program_name, hv_compile_version());
}
static void print_help() {
char detail_options[1024] = {0};
dump_opt_long(long_options, ARRAY_SIZE(long_options), detail_options, sizeof(detail_options));
printf("%s\n", detail_options);
}
static char listen_host[64] = "0.0.0.0";
static int listen_port = 8388;
static hio_t* listen_io = NULL;
static kcp_setting_t s_kcp_setting;
static char kcp_host[64] = "127.0.0.1";
static int kcp_port = 4000;
static hio_t* kcp_io = NULL;
static smux_config_t smux_config;
static smux_session_t smux_session;
static smux_stream_t smux_stream0;
static int verbose = 1;
typedef struct kcp_ctx_s {
smux_frame_t frame;
uint16_t want_readbytes;
} kcp_ctx_t;
/* workflow:
*
* hloop_create_tcp_server ->
* on_accept -> smux_session_open_stream ->
* on_recv -> hio_write(kcp_io) ->
* on_close -> smux_session_close_stream
*
* hloop_create_udp_client -> hio_set_kcp ->
* on_recvfrom -> smux_session_get_stream -> hio_write(stream_io)
*
*/
static void send_hearbeat(htimer_t* timer) {
smux_stream_t* smux_stream = (smux_stream_t*)hevent_userdata(timer);
if (smux_stream == NULL) return;
// NOP
int packlen = smux_stream_output(smux_stream, SMUX_CMD_NOP);
if (packlen > 0) {
// printf("NOP %d\n", packlen);
hio_write(kcp_io, smux_stream->wbuf.base, packlen);
}
}
static void on_close(hio_t* io) {
// printf("on_close fd=%d error=%d\n", hio_fd(io), hio_error(io));
if (verbose) {
char localaddrstr[SOCKADDR_STRLEN] = {0};
char peeraddrstr[SOCKADDR_STRLEN] = {0};
printf("disconnected connfd=%d [%s] <= [%s]\n", hio_fd(io),
SOCKADDR_STR(hio_localaddr(io), localaddrstr),
SOCKADDR_STR(hio_peeraddr(io), peeraddrstr));
}
smux_stream_t* smux_stream = (smux_stream_t*)hevent_userdata(io);
if (smux_stream == NULL) return;
// FIN
int packlen = smux_stream_output(smux_stream, SMUX_CMD_FIN);
if (packlen > 0) {
// printf("FIN %d\n", packlen);
hio_write(kcp_io, smux_stream->wbuf.base, packlen);
}
// kill timer
if (smux_stream->timer) {
htimer_del(smux_stream->timer);
smux_stream->timer = NULL;
}
// free buffer
HV_FREE(smux_stream->rbuf.base);
HV_FREE(smux_stream->wbuf.base);
smux_session_close_stream(&smux_session, smux_stream->stream_id);
hevent_set_userdata(io, NULL);
}
static void on_recv(hio_t* io, void* buf, int readbytes) {
// printf("on_recv %.*s \n", readbytes, (char*)buf);
smux_stream_t* smux_stream = (smux_stream_t*)hevent_userdata(io);
if (smux_stream == NULL) return;
// PSH
smux_frame_t frame;
smux_frame_init(&frame);
frame.head.sid = smux_stream->stream_id;
frame.head.cmd = SMUX_CMD_PSH;
frame.head.length = readbytes;
frame.data = (const char*)buf;
int packlen = smux_frame_pack(&frame, smux_stream->wbuf.base, smux_stream->wbuf.len);
if (packlen > 0) {
// printf("PSH %d\n", packlen);
int nwrite = hio_write(kcp_io, smux_stream->wbuf.base, packlen);
// printf("PSH ret=%d\n", nwrite);
}
}
static void on_accept(hio_t* io) {
// printf("on_accept connfd=%d\n", hio_fd(io));
if (verbose) {
char localaddrstr[SOCKADDR_STRLEN] = {0};
char peeraddrstr[SOCKADDR_STRLEN] = {0};
printf("accept connfd=%d [%s] <= [%s]\n", hio_fd(io),
SOCKADDR_STR(hio_localaddr(io), localaddrstr),
SOCKADDR_STR(hio_peeraddr(io), peeraddrstr));
}
hio_setcb_close(io, on_close);
smux_stream_t* smux_stream = smux_session_open_stream(&smux_session, 0, io);
// alloc buffer
smux_stream->rbuf.len = mtu;
smux_stream->wbuf.len = mtu;
HV_ALLOC(smux_stream->rbuf.base, smux_stream->rbuf.len);
HV_ALLOC(smux_stream->wbuf.base, smux_stream->wbuf.len);
hio_set_readbuf(io, smux_stream->rbuf.base, smux_config.max_frame_size);
/*
// set heartbeat timer
if (smux_config.keepalive_interval > 0) {
smux_stream->timer = htimer_add(hevent_loop(io), send_hearbeat, smux_config.keepalive_interval, INFINITE);
hevent_set_userdata(smux_stream->timer, smux_stream);
}
*/
hevent_set_userdata(io, smux_stream);
// SYN
int packlen = smux_stream_output(smux_stream, SMUX_CMD_SYN);
if (packlen > 0) {
// printf("SYN %d\n", packlen);
hio_write(kcp_io, smux_stream->wbuf.base, packlen);
}
hio_setcb_read(io, on_recv);
hio_read(io);
}
static void on_kcp_recvfrom(hio_t* io, void* buf, int readbytes) {
// printf("on_kcp_recvfrom %d\n", readbytes);
kcp_ctx_t* kcp_ctx = (kcp_ctx_t*)hevent_userdata(io);
smux_frame_t* frame = &kcp_ctx->frame;
if (kcp_ctx->want_readbytes > 0) {
frame->data = (const char*)buf;
frame->head.length = readbytes;
kcp_ctx->want_readbytes -= readbytes;
}
else {
smux_frame_init(frame);
int packlen = smux_frame_unpack(frame, buf, readbytes);
if (packlen < 0 ||
frame->head.version > 2 ||
frame->head.cmd > SMUX_CMD_UPD) {
fprintf(stderr, "smux_frame_unpack error: %d\n", packlen);
return;
}
int datalen = packlen - SMUX_HEAD_LENGTH;
if (datalen < frame->head.length) {
kcp_ctx->want_readbytes = frame->head.length - datalen;
frame->head.length = datalen;
}
}
// printf("smux sid=%u cmd=%d length=%d\n", frame->head.sid, (int)frame->head.cmd, (int)frame->head.length);
smux_stream_t* smux_stream = smux_session_get_stream(&smux_session, kcp_ctx->frame.head.sid);
if (smux_stream == NULL) {
if (frame->head.sid != 0 && frame->head.cmd != SMUX_CMD_FIN) {
fprintf(stderr, "recvfrom invalid smux package!\n");
}
return;
}
switch (frame->head.cmd) {
case SMUX_CMD_SYN:
hio_setcb_read(smux_stream->io, on_recv);
hio_read(smux_stream->io);
break;
case SMUX_CMD_FIN:
hio_close(smux_stream->io);
break;
case SMUX_CMD_PSH:
hio_write(smux_stream->io, frame->data, frame->head.length);
break;
case SMUX_CMD_NOP:
break;
default:
break;
}
}
int main(int argc, char** argv) {
if (argc < 2) {
print_help();
exit(0);
}
// g_main_ctx
main_ctx_init(argc, argv);
int ret = parse_opt_long(argc, argv, long_options, ARRAY_SIZE(long_options));
if (ret != 0) {
print_help();
exit(ret);
}
// help
if (get_arg("h")) {
print_help();
exit(0);
}
// version
if (get_arg("v")) {
print_version();
exit(0);
}
#ifdef OS_UNIX
// daemon
if (get_arg("d")) {
// nochdir, noclose
int ret = daemon(1, 1);
if (ret != 0) {
printf("daemon error: %d\n", ret);
exit(-10);
}
}
#endif
const char* arg = get_arg("l");
if (arg) {
localaddr = arg;
}
arg = get_arg("r");
if (arg) {
remoteaddr = arg;
}
arg = get_arg("m");
if (arg) {
mode = arg;
}
arg = get_arg("mtu");
if (arg) {
mtu = atoi(arg);
}
arg = get_arg("sndwnd");
if (arg) {
sndwnd = atoi(arg);
}
arg = get_arg("rcvwnd");
if (arg) {
rcvwnd = atoi(arg);
}
const char* pos = strchr(localaddr, ':');
int len = 0;
if (pos) {
len = pos - localaddr;
if (len > 0) {
memcpy(listen_host, localaddr, len);
listen_host[len] = '\0';
}
listen_port = atoi(pos + 1);
}
pos = strchr(remoteaddr, ':');
if (pos) {
len = pos - remoteaddr;
if (len > 0) {
memcpy(kcp_host, remoteaddr, len);
kcp_host[len] = '\0';
}
kcp_port = atoi(pos + 1);
}
if (strcmp(mode, "normal") == 0) {
kcp_setting_init_with_normal_mode(&s_kcp_setting);
} else if (strcmp(mode, "fast") == 0) {
kcp_setting_init_with_fast_mode(&s_kcp_setting);
} else if (strcmp(mode, "fast2") == 0) {
kcp_setting_init_with_fast2_mode(&s_kcp_setting);
} else if (strcmp(mode, "fast3") == 0) {
kcp_setting_init_with_fast3_mode(&s_kcp_setting);
} else {
fprintf(stderr, "Unknown mode '%s'\n", mode);
exit(-20);
}
s_kcp_setting.conv = hv_getpid();
s_kcp_setting.mtu = mtu;
s_kcp_setting.sndwnd = sndwnd;
s_kcp_setting.rcvwnd = rcvwnd;
printf("smux version: 1\n");
printf("%s:%d => %s:%d\n", listen_host, listen_port, kcp_host, kcp_port);
printf("mode: %s\n", mode);
printf("mtu: %d\n", mtu);
printf("sndwnd: %d rcvwnd: %d\n", sndwnd, rcvwnd);
hloop_t* loop = hloop_new(0);
listen_io = hloop_create_tcp_server(loop, listen_host, listen_port, on_accept);
if (listen_io == NULL) {
fprintf(stderr, "create tcp server error!\n");
return -30;
}
kcp_io = hloop_create_udp_client(loop, kcp_host, kcp_port);
if (kcp_io == NULL) {
fprintf(stderr, "create udp client error!\n");
return -40;
}
hio_set_kcp(kcp_io, &s_kcp_setting);
kcp_ctx_t* kcp_ctx = NULL;
HV_ALLOC_SIZEOF(kcp_ctx);
hevent_set_userdata(kcp_io, kcp_ctx);
hio_setcb_read(kcp_io, on_kcp_recvfrom);
hio_read(kcp_io);
// smux
smux_config.max_frame_size = 1024;
smux_session.next_stream_id = 1;
smux_stream0.stream_id = 0;
// set heartbeat timer
if (smux_config.keepalive_interval > 0) {
htimer_t* timer = htimer_add(loop, send_hearbeat, smux_config.keepalive_interval, INFINITE);
hevent_set_userdata(timer, &smux_stream0);
}
hloop_run(loop);
hloop_free(&loop);
return 0;
}