1 | /* |
1 | /* |
2 | CrossFire, A Multiplayer game for X-windows |
2 | * This file is part of Deliantra, the Roguelike Realtime MMORPG. |
3 | |
3 | * |
4 | Copyright (C) 2001 Mark Wedel |
4 | * Copyright (©) 2005,2006,2007,2008,2009,2010,2011,2012 Marc Alexander Lehmann / Robin Redeker / the Deliantra team |
5 | Copyright (C) 1992 Frank Tore Johansen |
5 | * |
6 | |
6 | * Deliantra is free software: you can redistribute it and/or modify it under |
7 | This program is free software; you can redistribute it and/or modify |
|
|
8 | it under the terms of the GNU General Public License as published by |
7 | * the terms of the Affero GNU General Public License as published by the |
9 | the Free Software Foundation; either version 2 of the License, or |
8 | * Free Software Foundation, either version 3 of the License, or (at your |
10 | (at your option) any later version. |
9 | * option) any later version. |
11 | |
10 | * |
12 | This program is distributed in the hope that it will be useful, |
11 | * This program is distributed in the hope that it will be useful, |
13 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
12 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
14 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
13 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
15 | GNU General Public License for more details. |
14 | * GNU General Public License for more details. |
16 | |
15 | * |
17 | You should have received a copy of the GNU General Public License |
16 | * You should have received a copy of the Affero GNU General Public License |
18 | along with this program; if not, write to the Free Software |
17 | * and the GNU General Public License along with this program. If not, see |
19 | Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. |
18 | * <http://www.gnu.org/licenses/>. |
20 | |
19 | * |
21 | The author can be reached via e-mail to <crossfire@schmorp.de> |
20 | * The authors can be reached via e-mail to <support@deliantra.net> |
22 | */ |
21 | */ |
23 | |
22 | |
24 | /** |
23 | /* |
25 | * \file |
|
|
26 | * Socket general functions |
24 | * Socket general functions |
27 | * |
|
|
28 | * \date 2003-12-02 |
|
|
29 | * |
|
|
30 | * Mainly deals with initialization and higher level socket |
|
|
31 | * maintenance (checking for lost connections and if data has arrived.) |
|
|
32 | * The reading of data is handled in ericserver.c |
|
|
33 | */ |
25 | */ |
34 | |
|
|
35 | |
26 | |
36 | #include <global.h> |
27 | #include <global.h> |
37 | #include <sproto.h> |
28 | #include <sproto.h> |
38 | #include <sys/types.h> |
29 | #include <sys/types.h> |
39 | #include <sys/time.h> |
30 | #include <sys/time.h> |
40 | #include <sys/socket.h> |
31 | #include <sys/socket.h> |
41 | #include <netinet/in.h> |
32 | #include <netinet/in.h> |
|
|
33 | #include <netinet/tcp.h> |
|
|
34 | #include <netinet/ip.h> |
42 | #include <netdb.h> |
35 | #include <netdb.h> |
43 | |
36 | |
44 | #ifdef HAVE_UNISTD_H |
|
|
45 | # include <unistd.h> |
37 | #include <unistd.h> |
46 | #endif |
|
|
47 | |
|
|
48 | #ifdef HAVE_ARPA_INET_H |
|
|
49 | # include <arpa/inet.h> |
38 | #include <arpa/inet.h> |
50 | #endif |
|
|
51 | #include <newserver.h> |
|
|
52 | |
39 | |
53 | Socket_Info socket_info; |
40 | #include <algorithm> |
54 | NewSocket *init_sockets; |
41 | |
|
|
42 | // use relatively small values, as we do not expect to receive much, |
|
|
43 | // and we do userspace write buffering |
|
|
44 | // 8kb limits throughput to roughly 66kb/s |
|
|
45 | #define SOCKET_RCVBUF 8192 |
|
|
46 | #define SOCKET_SNDBUF 16384 |
|
|
47 | |
|
|
48 | sockvec clients; |
55 | |
49 | |
56 | /** |
50 | /** |
57 | * Initializes a connection. Really, it just sets up the data structure, |
51 | * Initializes a connection. Really, it just sets up the data structure, |
58 | * socket setup is handled elsewhere. We do send a version to the |
52 | * socket setup is handled elsewhere. We do send a version to the |
59 | * client. |
53 | * client. |
60 | */ |
54 | */ |
|
|
55 | client::client (int fd, const char *peername) |
|
|
56 | : fd (fd), host (strdup (peername)), |
|
|
57 | socket_ev (this, &client::socket_cb) |
|
|
58 | { |
|
|
59 | refcnt_inc (); // the socket is an external reference |
|
|
60 | |
|
|
61 | mss = 1500 - 52; // 1500 typical ethernet frame, 66 typical tcp header overhead |
|
|
62 | |
|
|
63 | socket_timeout = 16.; |
|
|
64 | |
|
|
65 | { |
|
|
66 | struct linger linger_opt; |
|
|
67 | |
|
|
68 | linger_opt.l_onoff = 0; |
|
|
69 | linger_opt.l_linger = 0; |
|
|
70 | |
|
|
71 | if (setsockopt (fd, SOL_SOCKET, SO_LINGER, &linger_opt, sizeof (struct linger))) |
|
|
72 | LOG (llevError, "SO_LINGER: %s\n", strerror (errno)); |
|
|
73 | } |
|
|
74 | |
|
|
75 | { |
|
|
76 | int val; |
|
|
77 | |
|
|
78 | #ifdef SO_RCVBUF |
|
|
79 | val = SOCKET_RCVBUF; |
|
|
80 | if (setsockopt (fd, SOL_SOCKET, SO_RCVBUF, &val, sizeof (val))) |
|
|
81 | LOG (llevError, "SO_RCVBUF: %s\n", strerror (errno)); |
|
|
82 | #endif |
|
|
83 | |
|
|
84 | #ifdef SO_SNDBUF |
|
|
85 | val = SOCKET_SNDBUF; |
|
|
86 | if (setsockopt (fd, SOL_SOCKET, SO_SNDBUF, &val, sizeof (val))) |
|
|
87 | LOG (llevError, "SO_SNDBUF: %s\n", strerror (errno)); |
|
|
88 | #endif |
|
|
89 | |
|
|
90 | #ifdef IP_TOS |
|
|
91 | val = IPTOS_LOWDELAY; |
|
|
92 | if (setsockopt (fd, IPPROTO_IP, IP_TOS, &val, sizeof (val))) |
|
|
93 | LOG (llevError, "IP_TOS: %s\n", strerror (errno)); |
|
|
94 | #endif |
|
|
95 | |
|
|
96 | #ifdef TCP_NODELAY |
|
|
97 | val = 1; |
|
|
98 | if (setsockopt (fd, IPPROTO_TCP, TCP_NODELAY, &val, sizeof (val))) |
|
|
99 | LOG (llevError, "TCP_NODELAY: %s\n", strerror (errno)); |
|
|
100 | #endif |
|
|
101 | |
|
|
102 | // set some very aggressive keepalive parameters |
|
|
103 | #ifdef TCP_KEEPIDLE |
|
|
104 | val = 1; |
|
|
105 | if (setsockopt (fd, IPPROTO_TCP, TCP_KEEPIDLE, &val, sizeof (val))) |
|
|
106 | LOG (llevError, "TCP_KEEPIDLE: %s\n", strerror (errno)); |
|
|
107 | #endif |
|
|
108 | |
|
|
109 | #ifdef TCP_KEEPCNT |
|
|
110 | val = 3; |
|
|
111 | if (setsockopt (fd, IPPROTO_TCP, TCP_KEEPCNT, &val, sizeof (val))) |
|
|
112 | LOG (llevError, "TCP_KEEPCNT: %s\n", strerror (errno)); |
|
|
113 | #endif |
|
|
114 | |
|
|
115 | #ifdef TCP_KEEPINTVL |
|
|
116 | val = 1; |
|
|
117 | if (setsockopt (fd, IPPROTO_TCP, TCP_KEEPINTVL, &val, sizeof (val))) |
|
|
118 | LOG (llevError, "TCP_KEEPINTVL: %s\n", strerror (errno)); |
|
|
119 | #endif |
|
|
120 | |
|
|
121 | // try to find the mss value in use |
|
|
122 | #ifdef TCP_MAXSEG |
|
|
123 | socklen_t sl = sizeof (val); |
|
|
124 | if (!getsockopt (fd, IPPROTO_TCP, TCP_MAXSEG, &val, &sl) && sl == sizeof (val)) |
|
|
125 | mss = val; |
|
|
126 | #endif |
|
|
127 | } |
|
|
128 | |
|
|
129 | if (fcntl (fd, F_SETFL, O_NONBLOCK) == -1) |
|
|
130 | LOG (llevError, "InitConnection: Error on fcntl.\n"); |
|
|
131 | |
|
|
132 | state = ST_SETUP; |
|
|
133 | mapx = 11; |
|
|
134 | mapy = 11; |
|
|
135 | itemcmd = 1; /* Default is version item1 command */ |
|
|
136 | max_rate = 100000 / (1000000 / MAX_TIME); // ~1mbit is assumed per default |
|
|
137 | |
|
|
138 | /* Do this so we don't send a face command for the client for |
|
|
139 | * this face. Face 0 is sent to the client to set meta data |
|
|
140 | * for following faces in fx. |
|
|
141 | */ |
|
|
142 | faces_sent[0] = true; |
|
|
143 | fx_want [FT_FACE] = true; // all clients must support image faces |
|
|
144 | |
|
|
145 | socket_ev.set (fd, EV_READ); |
|
|
146 | socket_ev.prio (2); // one higher than the ticker priority |
|
|
147 | socket_ev.start (); |
|
|
148 | |
|
|
149 | reset_stats (); |
|
|
150 | |
|
|
151 | clients.insert (this); |
|
|
152 | } |
|
|
153 | |
|
|
154 | client::~client () |
|
|
155 | { |
|
|
156 | clients.erase (this); |
|
|
157 | |
|
|
158 | while (!ixface.empty ()) |
|
|
159 | ix_pop (); |
|
|
160 | |
|
|
161 | mapinfo_queue_clear (); |
|
|
162 | free (stats.range); |
|
|
163 | free (stats.title); |
|
|
164 | free (host); |
|
|
165 | free (ws_inbuf); |
|
|
166 | } |
|
|
167 | |
61 | void |
168 | void |
62 | InitConnection (NewSocket *ns, const char *from_ip) |
169 | client::run () |
63 | { |
170 | { |
64 | SockList sl; |
171 | // initialisation done, kick it! |
65 | char buf[256]; |
172 | INVOKE_CLIENT (CONNECT, this); |
66 | int bufsize = 65535; /*Supposed absolute upper limit */ |
|
|
67 | int oldbufsize; |
|
|
68 | int buflen = sizeof (int); |
|
|
69 | |
173 | |
70 | if (fcntl (ns->fd, F_SETFL, O_NONBLOCK) == -1) |
174 | flush (); |
71 | LOG (llevError, "InitConnection: Error on fcntl.\n"); |
175 | } |
72 | |
176 | |
73 | if (getsockopt (ns->fd, SOL_SOCKET, SO_SNDBUF, (char *) &oldbufsize, (socklen_t *) & buflen) == -1) |
177 | void |
74 | oldbufsize = 0; |
178 | client::do_destroy () |
|
|
179 | { |
|
|
180 | INVOKE_CLIENT (CLIENT_DESTROY, this); |
|
|
181 | attachable::do_destroy (); |
75 | |
182 | |
76 | if (oldbufsize < bufsize) |
183 | if (pl) |
77 | if (setsockopt (ns->fd, SOL_SOCKET, SO_SNDBUF, (char *) &bufsize, sizeof (&bufsize))) |
184 | pl->disconnect (); |
78 | LOG (llevError, "InitConnection: setsockopt unable to set output buf size to %d\n", bufsize); |
|
|
79 | |
185 | |
80 | buflen = sizeof (oldbufsize); |
186 | if (fd >= 0) |
81 | getsockopt (ns->fd, SOL_SOCKET, SO_SNDBUF, (char *) &oldbufsize, (socklen_t *) & buflen); |
187 | { |
82 | #ifdef ESRV_DEBUG |
188 | send_packet ("goodbye"); |
83 | LOG (llevDebug, "Socket buffer size now %d bytes\n", oldbufsize); |
189 | flush (); |
84 | #endif |
|
|
85 | |
190 | |
86 | ns->faceset = 0; |
191 | close (fd); |
87 | ns->facecache = 0; |
192 | } |
88 | ns->image2 = 0; |
|
|
89 | ns->sound = 0; |
|
|
90 | ns->exp64 = 0; |
|
|
91 | ns->monitor_spells = 0; |
|
|
92 | ns->mapmode = Map0Cmd; |
|
|
93 | ns->darkness = 1; |
|
|
94 | ns->status = Ns_Add; |
|
|
95 | ns->mapx = 11; |
|
|
96 | ns->mapy = 11; |
|
|
97 | ns->newmapcmd = 0; |
|
|
98 | ns->itemcmd = 1; /* Default is version item1 command */ |
|
|
99 | ns->ext_mapinfos = 0; /*extendedmapinfo datas */ |
|
|
100 | ns->EMI_smooth = 0; |
|
|
101 | ns->look_position = 0; |
|
|
102 | ns->update_look = 0; |
|
|
103 | ns->has_readable_type = 0; |
|
|
104 | ns->supported_readables = 0; |
|
|
105 | ns->monitor_spells = 0; |
|
|
106 | ns->mapinfocmd = 0; |
|
|
107 | ns->extcmd = 0; |
|
|
108 | ns->extmap = 0; |
|
|
109 | |
193 | |
110 | /* we should really do some checking here - if total clients overflows |
194 | state = ST_DEAD; |
111 | * we need to do something more intelligent, because client id's will start |
195 | |
112 | * duplicating (not likely in normal cases, but malicous attacks that |
196 | socket_ev.stop (); |
113 | * just open and close connections could get this total up. |
197 | |
|
|
198 | refcnt_dec (); // socket no longer open |
|
|
199 | } |
|
|
200 | |
|
|
201 | void |
|
|
202 | client::reset_stats () |
|
|
203 | { |
|
|
204 | /* we need to clear these to -1 and not zero - otherwise, |
|
|
205 | * if a player quits and starts a new character, we wont |
|
|
206 | * send new values to the client, as things like exp start |
|
|
207 | * at zero. |
114 | */ |
208 | */ |
115 | ns->inbuf.len = 0; |
209 | for (int i = 0; i < array_length (last_skill_exp); i++) |
116 | ns->inbuf.buf = (unsigned char *) malloc (sizeof (unsigned char) * MAXSOCKBUF); |
210 | last_skill_exp[i] = -1; |
117 | /* Basic initialization. Needed because we do a check in |
|
|
118 | * HandleClient for oldsocketmode without checking the |
|
|
119 | * length of data. |
|
|
120 | */ |
|
|
121 | memset (ns->inbuf.buf, 0, sizeof (unsigned char) * MAXSOCKBUF); |
|
|
122 | memset (&ns->lastmap, 0, sizeof (struct Map)); |
|
|
123 | memset (ns->faces_sent, 0, ns->faces_sent_len * sizeof (*ns->faces_sent)); |
|
|
124 | memset (&ns->anims_sent, 0, sizeof (ns->anims_sent)); |
|
|
125 | memset (&ns->stats, 0, sizeof (struct statsinfo)); |
|
|
126 | /* Do this so we don't send a face command for the client for |
|
|
127 | * this face. Face 0 is sent to the client to say clear |
|
|
128 | * face information. |
|
|
129 | */ |
|
|
130 | ns->faces_sent[0] = NS_FACESENT_FACE; |
|
|
131 | |
211 | |
132 | ns->outputbuffer.start = 0; |
212 | for (int i = 0; i < array_length (last_resist); i++) |
133 | ns->outputbuffer.len = 0; |
213 | last_resist[i] = -1; |
134 | ns->can_write = 1; |
|
|
135 | ns->password_fails = 0; |
|
|
136 | |
214 | |
137 | ns->current_map = 0; |
215 | last_weapon_sp = -1; |
138 | ns->current_x = 0; |
216 | last_level = -1; |
139 | ns->current_y = 0; |
217 | last_stats.exp = -1; |
140 | ns->client[0] = 0; |
218 | last_flags = 0; |
141 | ns->buggy_mapscroll = 0; |
219 | last_weight = -1; |
|
|
220 | last_weight_limit = 0; |
|
|
221 | last_path_attuned = 0; |
|
|
222 | last_path_repelled = 0; |
|
|
223 | last_path_denied = 0; |
|
|
224 | last_speed = 0; |
|
|
225 | last_flags = 0; |
142 | |
226 | |
143 | ns->sent_scroll = 0; |
227 | static living zero_living; |
144 | ns->host = strdup_local (from_ip); |
228 | last_stats = zero_living; |
145 | sprintf ((char *) buf, "version %d %d %s\n", VERSION_CS, VERSION_SC, VERSION_INFO); |
|
|
146 | sl.buf = (unsigned char *) buf; |
|
|
147 | sl.len = strlen ((char *) buf); |
|
|
148 | Send_With_Handling (ns, &sl); |
|
|
149 | #ifdef CS_LOGSTATS |
|
|
150 | if (socket_info.nconns > cst_tot.max_conn) |
|
|
151 | cst_tot.max_conn = socket_info.nconns; |
|
|
152 | if (socket_info.nconns > cst_lst.max_conn) |
|
|
153 | cst_lst.max_conn = socket_info.nconns; |
|
|
154 | #endif |
|
|
155 | } |
229 | } |
156 | |
230 | |
157 | |
231 | client * |
158 | /** This sets up the socket and reads all the image information into memory. */ |
232 | client::create (int fd, const char *peername) |
159 | void |
|
|
160 | init_ericserver (void) |
|
|
161 | { |
233 | { |
162 | struct sockaddr_in insock; |
234 | client *ns = new client (dup (fd), peername); |
163 | struct protoent *protox; |
|
|
164 | struct linger linger_opt; |
|
|
165 | |
235 | |
166 | socket_info.max_filedescriptor = sysconf (_SC_OPEN_MAX); |
236 | ns->instantiate (); // effectively a nop right now |
167 | |
237 | |
168 | socket_info.timeout.tv_sec = 0; |
238 | return ns; |
169 | socket_info.timeout.tv_usec = 0; |
|
|
170 | socket_info.nconns = 0; |
|
|
171 | |
|
|
172 | #ifdef CS_LOGSTATS |
|
|
173 | memset (&cst_tot, 0, sizeof (CS_Stats)); |
|
|
174 | memset (&cst_lst, 0, sizeof (CS_Stats)); |
|
|
175 | cst_tot.time_start = time (NULL); |
|
|
176 | cst_lst.time_start = time (NULL); |
|
|
177 | #endif |
|
|
178 | |
|
|
179 | LOG (llevDebug, "Initialize new client/server data\n"); |
|
|
180 | socket_info.nconns = 1; |
|
|
181 | init_sockets = (NewSocket *) malloc (sizeof (NewSocket)); |
|
|
182 | init_sockets[0].faces_sent = NULL; /* unused */ |
|
|
183 | socket_info.allocated_sockets = 1; |
|
|
184 | |
|
|
185 | protox = getprotobyname ("tcp"); |
|
|
186 | if (protox == NULL) |
|
|
187 | { |
|
|
188 | LOG (llevError, "init_ericserver: Error getting protox\n"); |
|
|
189 | return; |
|
|
190 | } |
|
|
191 | |
|
|
192 | init_sockets[0].fd = socket (PF_INET, SOCK_STREAM, protox->p_proto); |
|
|
193 | if (init_sockets[0].fd == -1) |
|
|
194 | { |
|
|
195 | LOG (llevError, "Cannot create socket: %s\n", strerror (errno)); |
|
|
196 | exit (-1); |
|
|
197 | } |
|
|
198 | |
|
|
199 | insock.sin_family = AF_INET; |
|
|
200 | insock.sin_port = htons (settings.csport); |
|
|
201 | insock.sin_addr.s_addr = htonl (INADDR_ANY); |
|
|
202 | |
|
|
203 | linger_opt.l_onoff = 0; |
|
|
204 | linger_opt.l_linger = 0; |
|
|
205 | if (setsockopt (init_sockets[0].fd, SOL_SOCKET, SO_LINGER, (char *) &linger_opt, sizeof (struct linger))) |
|
|
206 | LOG (llevError, "Cannot setsockopt(SO_LINGER): %s\n", strerror (errno)); |
|
|
207 | |
|
|
208 | { |
|
|
209 | int tmp = 1; |
|
|
210 | |
|
|
211 | if (setsockopt (init_sockets[0].fd, SOL_SOCKET, SO_REUSEADDR, &tmp, sizeof (tmp))) |
|
|
212 | LOG (llevError, "Cannot setsockopt(SO_REUSEADDR): %s\n", strerror (errno)); |
|
|
213 | } |
|
|
214 | |
|
|
215 | if (bind (init_sockets[0].fd, (struct sockaddr *) &insock, sizeof (insock)) == (-1)) |
|
|
216 | { |
|
|
217 | LOG (llevError, "Cannot bind socket to port %d: %s\n", ntohs (insock.sin_port), strerror (errno)); |
|
|
218 | close (init_sockets[0].fd); |
|
|
219 | exit (-1); |
|
|
220 | } |
|
|
221 | |
|
|
222 | if (listen (init_sockets[0].fd, 5) == (-1)) |
|
|
223 | { |
|
|
224 | LOG (llevError, "Cannot listen on socket: %s\n", strerror (errno)); |
|
|
225 | close (init_sockets[0].fd); |
|
|
226 | exit (-1); |
|
|
227 | } |
|
|
228 | |
|
|
229 | init_sockets[0].status = Ns_Add; |
|
|
230 | read_client_images (); |
|
|
231 | } |
239 | } |
232 | |
240 | |
233 | |
|
|
234 | /******************************************************************************* |
|
|
235 | * |
|
|
236 | * Start of functions dealing with freeing of the data. |
|
|
237 | * |
|
|
238 | ******************************************************************************/ |
|
|
239 | |
|
|
240 | /** Free's all the memory that ericserver allocates. */ |
|
|
241 | void |
|
|
242 | free_all_newserver (void) |
|
|
243 | { |
|
|
244 | LOG (llevDebug, "Freeing all new client/server information.\n"); |
|
|
245 | free_socket_images (); |
|
|
246 | free (init_sockets); |
|
|
247 | } |
|
|
248 | |
|
|
249 | /** |
|
|
250 | * Frees a socket. |
|
|
251 | * Basically, all we need to do here is free all data structures that |
|
|
252 | * might be associated with the socket. It is up to the caller to |
|
|
253 | * update the list |
|
|
254 | */ |
|
|
255 | |
|
|
256 | void |
|
|
257 | free_newsocket (NewSocket *ns) |
|
|
258 | { |
|
|
259 | close (ns->fd); |
|
|
260 | |
|
|
261 | if (ns->stats.range) |
|
|
262 | free (ns->stats.range); |
|
|
263 | |
|
|
264 | if (ns->stats.title) |
|
|
265 | free (ns->stats.title); |
|
|
266 | |
|
|
267 | free (ns->host); |
|
|
268 | free (ns->inbuf.buf); |
|
|
269 | } |
|
|
270 | |
|
|
271 | /** Sends the 'goodbye' command to the player, and closes connection. */ |
|
|
272 | void |
|
|
273 | final_free_player (player *pl) |
|
|
274 | { |
|
|
275 | cs_write_string (&pl->socket, "goodbye", 8); |
|
|
276 | free_newsocket (&pl->socket); |
|
|
277 | free_player (pl); |
|
|
278 | } |
|
|