ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/socket/item.C
(Generate patch)

Comparing deliantra/server/socket/item.C (file contents):
Revision 1.4 by root, Sun Sep 3 00:18:43 2006 UTC vs.
Revision 1.27 by root, Wed Dec 20 01:19:11 2006 UTC

1
2/*
3 * static char *rcsid_item_c =
4 * "$Id: item.C,v 1.4 2006/09/03 00:18:43 root Exp $";
5 */
6
7/* 1/*
8 CrossFire, A Multiplayer game for X-windows 2 CrossFire, A Multiplayer game for X-windows
9 3
10 Copyright (C) 2002 Mark Wedel & Crossfire Development Team 4 Copyright (C) 2002 Mark Wedel & Crossfire Development Team
11 Copyright (C) 1992 Frank Tore Johansen 5 Copyright (C) 1992 Frank Tore Johansen
… …
22 16
23 You should have received a copy of the GNU General Public License 17 You should have received a copy of the GNU General Public License
24 along with this program; if not, write to the Free Software 18 along with this program; if not, write to the Free Software
25 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 19 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
26 20
27 The author can be reached via e-mail to crossfire-devel@real-time.com 21 The author can be reached via e-mail to <crossfire@schmorp.de>
28*/ 22*/
29 23
30/** 24/**
31 * \file 25 * \file
32 * Client/server logic. 26 * Client/server logic.
… …
36 * This containes item logic for client/server. It doesn't contain 30 * This containes item logic for client/server. It doesn't contain
37 * the actual commands that send the data, but does contain 31 * the actual commands that send the data, but does contain
38 * the logic for what items should be sent. 32 * the logic for what items should be sent.
39 */ 33 */
40 34
41
42#include <global.h> 35#include <global.h>
43#include <object.h> /* LOOK_OBJ */ 36#include <object.h> /* LOOK_OBJ */
44#include <newclient.h>
45#include <newserver.h>
46#include <sproto.h> 37#include <sproto.h>
47 38
48/** This is the maximum number of bytes we expect any one item to take up */ 39/** This is the maximum number of bytes we expect any one item to take up */
49#define MAXITEMLEN 300 40#define MAXITEMLEN 300
50 41
… …
53 * Functions related to sending object data to the client. 44 * Functions related to sending object data to the client.
54 * 45 *
55 ******************************************************************************/ 46 ******************************************************************************/
56 47
57/** 48/**
58 * Adds string to socklist.
59 *
60 * This is a simple function that we use a lot here. It basically
61 * adds the specified buffer into the socklist, but prepends a
62 * single byte in length. If the data is longer than that byte, it is
63 * truncated approprately.
64 */
65inline void add_stringlen_to_sockbuf(const char *buf, SockList *sl)
66{
67 int len;
68
69 len=strlen(buf);
70 if (len>255) len=255;
71 SockList_AddChar(sl, (char) len);
72 strncpy((char*)sl->buf+sl->len, buf,len);
73 sl->len += len;
74}
75
76/**
77 * This is a similar to query_name, but returns flags 49 * This is a similar to query_name, but returns flags
78 * to be sended to client. 50 * to be sent to client.
79 */ 51 */
52unsigned int
80unsigned int query_flags (object *op) 53query_flags (object *op)
81{ 54{
82 unsigned int flags = 0; 55 unsigned int flags = 0;
83 56
84 if(QUERY_FLAG(op,FLAG_APPLIED)) { 57 if (QUERY_FLAG (op, FLAG_APPLIED))
58 {
85 switch(op->type) { 59 switch (op->type)
60 {
86 case BOW: 61 case BOW:
87 case WAND: 62 case WAND:
88 case ROD: 63 case ROD:
89 case HORN: 64 case HORN:
90 flags = a_readied; 65 flags = a_readied;
… …
111 default: 86 default:
112 flags = a_applied; 87 flags = a_applied;
113 break; 88 break;
114 } 89 }
115 } 90 }
91
116 if (op->type == CONTAINER && ((op->env && op->env->container == op) || 92 if (op->type == CONTAINER && ((op->env && op->env->container == op) || (!op->env && QUERY_FLAG (op, FLAG_APPLIED))))
117 (!op->env && QUERY_FLAG(op,FLAG_APPLIED))))
118 flags |= F_OPEN; 93 flags |= F_OPEN;
119 94
120 if (QUERY_FLAG(op,FLAG_KNOWN_CURSED)) { 95 if (QUERY_FLAG (op, FLAG_KNOWN_CURSED))
96 {
121 if(QUERY_FLAG(op,FLAG_DAMNED)) 97 if (QUERY_FLAG (op, FLAG_DAMNED))
122 flags |= F_DAMNED; 98 flags |= F_DAMNED;
123 else if(QUERY_FLAG(op,FLAG_CURSED)) 99 else if (QUERY_FLAG (op, FLAG_CURSED))
124 flags |= F_CURSED; 100 flags |= F_CURSED;
125 } 101 }
102
126 if (QUERY_FLAG(op,FLAG_KNOWN_MAGICAL) && !QUERY_FLAG(op,FLAG_IDENTIFIED)) 103 if (QUERY_FLAG (op, FLAG_KNOWN_MAGICAL) && !QUERY_FLAG (op, FLAG_IDENTIFIED))
127 flags |= F_MAGIC; 104 flags |= F_MAGIC;
128 if (QUERY_FLAG(op,FLAG_UNPAID)) 105 if (QUERY_FLAG (op, FLAG_UNPAID))
129 flags |= F_UNPAID; 106 flags |= F_UNPAID;
130 if (QUERY_FLAG(op,FLAG_INV_LOCKED)) 107 if (QUERY_FLAG (op, FLAG_INV_LOCKED))
131 flags |= F_LOCKED; 108 flags |= F_LOCKED;
132 109
133 return flags; 110 return flags;
134} 111}
135 112
136/* Used in the send_look to put object head into SockList 113/* Used in the send_look to put object head into packet
137 * sl for socket ns. Need socket to know if we need to send 114 * sl for socket ns. Need socket to know if we need to send
138 * animation of face to the client. 115 * animation of face to the client.
139 */ 116 */
140static void add_object_to_socklist(NewSocket *ns, SockList *sl, object *head) 117static void
118add_object_to_socklist (client &ns, packet &sl, object *head)
141{ 119{
142 int flags, len, anim_speed; 120 int flags, len, anim_speed;
143 char item_n[MAX_BUF]; 121 char item_n[MAX_BUF];
144 const char *item_p; 122 const char *item_p;
145 123
146 flags = query_flags (head); 124 flags = query_flags (head);
147 if (QUERY_FLAG(head, FLAG_NO_PICK)) 125 if (QUERY_FLAG (head, FLAG_NO_PICK))
148 flags |= F_NOPICK; 126 flags |= F_NOPICK;
149 127
150 if (!(ns->faces_sent[head->face->number] & NS_FACESENT_FACE)) 128 if (!(ns.faces_sent[head->face->number] & NS_FACESENT_FACE))
151 esrv_send_face(ns, head->face->number,0); 129 esrv_send_face (&ns, head->face->number, 0);
152 130
153 if (QUERY_FLAG(head,FLAG_ANIMATE) && !ns->anims_sent[head->animation_id]) 131 if (QUERY_FLAG (head, FLAG_ANIMATE) && !ns.anims_sent[head->animation_id])
154 esrv_send_animation(ns, head->animation_id); 132 esrv_send_animation (&ns, head->animation_id);
155 133
156 SockList_AddInt(sl, head->count); 134 sl << uint32 (head->count)
157 SockList_AddInt(sl, flags); 135 << uint32 (flags)
158 SockList_AddInt(sl, QUERY_FLAG(head, FLAG_NO_PICK) ? -1 : WEIGHT(head)); 136 << uint32 (QUERY_FLAG (head, FLAG_NO_PICK) ? -1 : WEIGHT (head))
159 SockList_AddInt(sl, head->face->number); 137 << uint32 (head->face->number);
160 138
161 if (!head->custom_name) { 139 if (!head->custom_name)
140 {
162 strncpy(item_n,query_base_name(head, 0),127); 141 strncpy (item_n, query_base_name (head, 0), 127);
163 item_n[127]=0; 142 item_n[127] = 0;
164 len=strlen(item_n); 143 len = strlen (item_n);
165 item_p=query_base_name(head, 1); 144 item_p = query_base_name (head, 1);
166 } else { 145 }
146 else
147 {
167 strncpy(item_n,head->custom_name,127); 148 strncpy (item_n, head->custom_name, 127);
168 item_n[127]=0; 149 item_n[127] = 0;
169 len=strlen(item_n); 150 len = strlen (item_n);
170 item_p=head->custom_name; 151 item_p = head->custom_name;
171 } 152 }
153
172 strncpy(item_n+len+1, item_p, 127); 154 strncpy (item_n + len + 1, item_p, 127);
173 item_n[254]=0; 155 item_n[254] = 0;
174 len += strlen(item_n+1+len) + 1; 156 len += strlen (item_n + 1 + len) + 1;
175 SockList_AddChar(sl, (char ) len);
176 memcpy(sl->buf+sl->len, item_n, len);
177 sl->len += len;
178 157
179 SockList_AddShort(sl,head->animation_id); 158 sl << data8 (item_n, len)
159 << uint16 (head->animation_id);
160
180 anim_speed=0; 161 anim_speed = 0;
181 if (QUERY_FLAG(head,FLAG_ANIMATE)) { 162 if (QUERY_FLAG (head, FLAG_ANIMATE))
163 {
164 if (head->anim_speed)
182 if (head->anim_speed) anim_speed=head->anim_speed; 165 anim_speed = head->anim_speed;
166 else
167 {
168 if (FABS (head->speed) < 0.001)
169 anim_speed = 255;
170 else if (FABS (head->speed) >= 1.0)
171 anim_speed = 1;
183 else { 172 else
184 if (FABS(head->speed)<0.001) anim_speed=255;
185 else if (FABS(head->speed)>=1.0) anim_speed=1;
186 else anim_speed = (int) (1.0/FABS(head->speed)); 173 anim_speed = (int) (1.0 / FABS (head->speed));
187 } 174 }
188 if (anim_speed>255) anim_speed=255;
189 }
190 SockList_AddChar(sl, (char) anim_speed);
191 SockList_AddInt(sl, head->nrof);
192 175
176 if (anim_speed > 255)
177 anim_speed = 255;
178 }
179
180 sl << uint8 (anim_speed)
181 << uint32 (head->nrof);
182
193 if (ns->itemcmd == 2) 183 if (ns.itemcmd == 2)
194 SockList_AddShort(sl, head->client_type); 184 sl << uint16 (head->client_type);
195 185
196 SET_FLAG(head, FLAG_CLIENT_SENT); 186 SET_FLAG (head, FLAG_CLIENT_SENT);
197} 187}
198 188
199 189
200/** 190/**
201 * Send the look window. Don't need to do animations here 191 * Send the look window. Don't need to do animations here
202 * This sends all the faces to the client, not just updates. This is 192 * This sends all the faces to the client, not just updates. This is
203 * because object ordering would otherwise be inconsistent 193 * because object ordering would otherwise be inconsistent.
204 */ 194 */
205 195void
206void esrv_draw_look(object *pl) 196esrv_draw_look (object *pl)
207{ 197{
208 object *tmp, *last; 198 object *tmp, *last;
209 int got_one=0,start_look=0, end_look=0; 199 int got_one = 0, start_look = 0, end_look = 0;
210 SockList sl;
211 char buf[MAX_BUF]; 200 char buf[MAX_BUF];
212 201
213 if (!pl->contr->socket.update_look) { 202 if (!pl->contr->socket->update_look)
203 {
214 LOG(llevDebug,"esrv_draw_look called when update_look was not set\n"); 204 LOG (llevDebug, "esrv_draw_look called when update_look was not set\n");
215 return; 205 return;
216 } else { 206 }
207 else
217 pl->contr->socket.update_look=0; 208 pl->contr->socket->update_look = 0;
218 }
219 209
220 if(QUERY_FLAG(pl, FLAG_REMOVED) || pl->map == NULL || 210 if (QUERY_FLAG (pl, FLAG_REMOVED)
221 pl->map->in_memory != MAP_IN_MEMORY || out_of_map(pl->map,pl->x,pl->y)) 211 || !pl->map
222 return; 212 || pl->map->in_memory != MAP_IN_MEMORY
213 || out_of_map (pl->map, pl->x, pl->y))
214 return;
223 215
224 for (tmp=get_map_ob(pl->map,pl->x,pl->y); tmp && tmp->above;tmp=tmp->above) ; 216 for (tmp = get_map_ob (pl->map, pl->x, pl->y); tmp && tmp->above; tmp = tmp->above)
217 ;
225 218
226 sl.buf= (unsigned char *) malloc(MAXSOCKBUF); 219 pl->contr->socket->send_packet ("delinv 0");
227 220
228 Write_String_To_Socket(&pl->contr->socket, "delinv 0", strlen("delinv 0")); 221 packet sl;
229 sprintf((char*)sl.buf,"item%d ", pl->contr->socket.itemcmd); 222 sl.printf ("item%d ", pl->contr->socket->itemcmd);
230 sl.len=strlen((char*)sl.buf);
231 223
232 SockList_AddInt(&sl, 0); 224 sl << uint32 (0);
233 225
234 if (!(pl->contr->socket.faces_sent[empty_face->number]&NS_FACESENT_FACE)) 226 if (!(pl->contr->socket->faces_sent[empty_face->number] & NS_FACESENT_FACE))
235 esrv_send_face(&pl->contr->socket, empty_face->number,0); 227 esrv_send_face (pl->contr->socket, empty_face->number, 0);
236 228
237 if (pl->contr->socket.look_position) { 229 if (pl->contr->socket->look_position)
238 SockList_AddInt(&sl, 0x80000000 | (pl->contr->socket.look_position- NUM_LOOK_OBJECTS)); 230 {
239 SockList_AddInt(&sl, 0); 231 char buf[80];
240 SockList_AddInt(&sl, (uint32) -1); 232 snprintf (buf, 80, "Apply this to see %d previous items", FLOORBOX_PAGESIZE);
241 SockList_AddInt(&sl, empty_face->number); 233
242 sprintf(buf,"Click here to see %d previous items", NUM_LOOK_OBJECTS); 234 sl << uint32 (0x80000000 | (pl->contr->socket->look_position - FLOORBOX_PAGESIZE))
243 add_stringlen_to_sockbuf(buf, &sl); 235 << uint32 (0)
244 SockList_AddShort(&sl,0); 236 << sint32 (-1)
245 SockList_AddChar(&sl, 0); 237 << uint32 (empty_face->number)
246 SockList_AddInt(&sl, 0); 238 << data8 (buf)
239 << uint16 (0)
240 << uint8 (0)
241 << uint32 (0);
242
247 if (pl->contr->socket.itemcmd == 2) 243 if (pl->contr->socket->itemcmd == 2)
248 SockList_AddShort(&sl, 0); 244 sl << uint16 (0);
249 } 245 }
250 246
251 for (last=NULL; tmp!=last; tmp=tmp->below) { 247 for (last = NULL; tmp != last; tmp = tmp->below)
248 {
252 object *head; 249 object *head;
253 250
254 if (QUERY_FLAG(tmp, FLAG_IS_FLOOR) && !last) { 251 if (QUERY_FLAG (tmp, FLAG_IS_FLOOR) && !last)
252 {
255 last = tmp->below; /* assumes double floor mode */ 253 last = tmp->below; /* assumes double floor mode */
256 if (last && QUERY_FLAG(last, FLAG_IS_FLOOR)) 254 if (last && QUERY_FLAG (last, FLAG_IS_FLOOR))
257 last = last->below; 255 last = last->below;
258 } 256 }
257
259 if (LOOK_OBJ(tmp)) { 258 if (LOOK_OBJ (tmp))
259 {
260 if (++start_look < pl->contr->socket.look_position) continue; 260 if (++start_look < pl->contr->socket->look_position)
261 continue;
262
261 end_look++; 263 end_look++;
262 if (end_look > NUM_LOOK_OBJECTS) { 264
265 if (end_look > FLOORBOX_PAGESIZE)
266 {
263 /* What we basically do is make a 'fake' object - when the user applies it, 267 /* What we basically do is make a 'fake' object - when the user applies it,
264 * we notice the special tag the object has, and act accordingly. 268 * we notice the special tag the object has, and act accordingly.
265 */ 269 */
266 SockList_AddInt(&sl, 0x80000000 | (pl->contr->socket.look_position+ NUM_LOOK_OBJECTS)); 270 sl << uint32 (0x80000000 | (pl->contr->socket->look_position + FLOORBOX_PAGESIZE))
267 SockList_AddInt(&sl, 0); 271 << uint32 (0)
268 SockList_AddInt(&sl, (uint32) -1); 272 << uint32 ((uint32) - 1)
269 SockList_AddInt(&sl, empty_face->number); 273 << uint32 (empty_face->number)
270 sprintf(buf,"Click here to see next group of items"); 274 << data8 ("Apply this to see next group of items")
271 add_stringlen_to_sockbuf(buf, &sl); 275 << uint16 (0)
272 SockList_AddShort(&sl,0); 276 << uint8 (0)
273 SockList_AddChar(&sl, 0); 277 << uint32 (0);
274 SockList_AddInt(&sl, 0); 278
275 if (pl->contr->socket.itemcmd == 2) 279 if (pl->contr->socket->itemcmd == 2)
276 SockList_AddShort(&sl, 0); 280 sl << uint16 (0);
281
277 break; 282 break;
278 } 283 }
284
285 if (tmp->head)
279 if (tmp->head) head = tmp->head; 286 head = tmp->head;
287 else
280 else head = tmp; 288 head = tmp;
281 289
282 add_object_to_socklist(&pl->contr->socket, &sl, head); 290 add_object_to_socklist (*pl->contr->socket, sl, head);
283 got_one++; 291 got_one++;
284 292
285 if (sl.len >= (MAXSOCKBUF-MAXITEMLEN)) { 293 if (sl.length () >= (MAXSOCKBUF - MAXITEMLEN))
286 Send_With_Handling(&pl->contr->socket, &sl); 294 {
295 pl->contr->socket->send_packet (sl);
296
297 sl.reset ();
287 sprintf((char*)sl.buf,"item%d ", pl->contr->socket.itemcmd); 298 sl.printf ("item%d ", pl->contr->socket->itemcmd);
288 sl.len=strlen((char*)sl.buf); 299 sl << uint32 (0);
289 SockList_AddInt(&sl, 0);
290 got_one=0; 300 got_one = 0;
291 } 301 }
292 } /* If LOOK_OBJ() */ 302 }
293 } 303 }
304
294 if (got_one) 305 if (got_one)
295 Send_With_Handling(&pl->contr->socket, &sl); 306 pl->contr->socket->send_packet (sl);
296 307
297 free(sl.buf);
298} 308}
299 309
300/** 310/**
301 * Sends whole inventory. 311 * Sends whole inventory.
302 */ 312 */
313void
303void esrv_send_inventory(object *pl, object *op) 314esrv_send_inventory (object *pl, object *op)
304{ 315{
305 object *tmp; 316 object *tmp;
306 int got_one=0; 317 int got_one = 0;
307 SockList sl;
308
309 sl.buf= (unsigned char *) malloc(MAXSOCKBUF);
310 318
311 sprintf((char*)sl.buf,"delinv %d", op->count);
312 sl.len=strlen((char*)sl.buf);
313 Send_With_Handling(&pl->contr->socket, &sl);
314 319
320 pl->contr->socket->send_packet_printf ("delinv %d", op->count);
321
322 packet sl;
315 sprintf((char*)sl.buf,"item%d ", pl->contr->socket.itemcmd); 323 sl.printf ("item%d ", pl->contr->socket->itemcmd);
316 sl.len=strlen((char*)sl.buf);
317 324
318 SockList_AddInt(&sl, op->count); 325 sl << uint32 (op->count);
319 326
320 for (tmp=op->inv; tmp; tmp=tmp->below) { 327 for (tmp = op->inv; tmp; tmp = tmp->below)
328 {
321 object *head; 329 object *head;
322 330
331 if (tmp->head)
323 if (tmp->head) head = tmp->head; 332 head = tmp->head;
333 else
324 else head = tmp; 334 head = tmp;
325 335
326 if (LOOK_OBJ(head)) { 336 if (LOOK_OBJ (head))
337 {
327 add_object_to_socklist(&pl->contr->socket, &sl, head); 338 add_object_to_socklist (*pl->contr->socket, sl, head);
328 339
329 got_one++; 340 got_one++;
330 341
331 /* IT is possible for players to accumulate a huge amount of 342 /* IT is possible for players to accumulate a huge amount of
332 * items (especially with some of the bags out there) to 343 * items (especially with some of the bags out there) to
333 * overflow the buffer. IF so, send multiple item commands. 344 * overflow the buffer. IF so, send multiple item commands.
334 */ 345 */
335 if (sl.len >= (MAXSOCKBUF-MAXITEMLEN)) { 346 if (sl.length () >= (MAXSOCKBUF - MAXITEMLEN))
336 Send_With_Handling(&pl->contr->socket, &sl); 347 {
348 pl->contr->socket->send_packet (sl);
349
350 sl.reset ();
337 sprintf((char*)sl.buf,"item%d ", pl->contr->socket.itemcmd); 351 sl.printf ("item%d ", pl->contr->socket->itemcmd);
338 sl.len=strlen((char*)sl.buf); 352 sl << uint32 (op->count);
339 SockList_AddInt(&sl, op->count);
340 got_one=0; 353 got_one = 0;
341 } 354 }
342 } /* If LOOK_OBJ() */ 355 } /* If LOOK_OBJ() */
343 } 356 }
357
344 if (got_one) 358 if (got_one)
345 Send_With_Handling(&pl->contr->socket, &sl); 359 pl->contr->socket->send_packet (sl);
346 free(sl.buf);
347} 360}
348 361
349/** 362/**
350 * Updates object *op for player *pl. 363 * Updates object *op for player *pl.
351 * 364 *
352 * flags is a list of values to update 365 * flags is a list of values to update
353 * to the client (as defined in newclient.h - might as well use the 366 * to the client (as defined in newclient.h - might as well use the
354 * same value both places. 367 * same value both places.
355 */ 368 */
356 369
370void
357void esrv_update_item(int flags, object *pl, object *op) 371esrv_update_item (int flags, object *pl, object *op)
358{ 372{
359 SockList sl;
360
361 /* If we have a request to send the player item, skip a few checks. */ 373 /* If we have a request to send the player item, skip a few checks. */
362 if (op!=pl) { 374 if (op != pl)
375 {
363 if (! LOOK_OBJ(op)) 376 if (!LOOK_OBJ (op))
364 return; 377 return;
365 /* we remove the check for op->env, because in theory, the object 378 /* we remove the check for op->env, because in theory, the object
366 * is hopefully in the same place, so the client should preserve 379 * is hopefully in the same place, so the client should preserve
367 * order. 380 * order.
368 */ 381 */
369 } 382 }
383
370 if (!QUERY_FLAG(op, FLAG_CLIENT_SENT)) { 384 if (!QUERY_FLAG (op, FLAG_CLIENT_SENT))
385 {
371 /* FLAG_CLIENT_SENT is debug only. We are using it to see where 386 /* FLAG_CLIENT_SENT is debug only. We are using it to see where
372 * this is happening - we can set a breakpoint here in the debugger 387 * this is happening - we can set a breakpoint here in the debugger
373 * and track back the call. 388 * and track back the call.
374 */ 389 */
375 LOG(llevDebug,"We have not sent item %s (%d)\n", &op->name, op->count); 390 LOG (llevDebug, "We have not sent item %s (%d)\n", &op->name, op->count);
376 } 391 }
377 sl.buf= (unsigned char *) malloc(MAXSOCKBUF);
378 392
379 strcpy((char*)sl.buf,"upditem "); 393 packet sl ("upditem");
380 sl.len=strlen((char*)sl.buf);
381 394
382 SockList_AddChar(&sl, (char) flags); 395 sl << uint8 (flags);
383 396
384 if (op->head) op=op->head; 397 if (op->head)
398 op = op->head;
385 399
386 SockList_AddInt(&sl, op->count); 400 sl << uint32 (op->count);
387 401
388 if (flags & UPD_LOCATION) 402 if (flags & UPD_LOCATION)
389 SockList_AddInt(&sl, op->env? op->env->count:0); 403 sl << uint32 (op->env ? op->env->count : 0);
390 404
391 if (flags & UPD_FLAGS) 405 if (flags & UPD_FLAGS)
392 SockList_AddInt(&sl, query_flags(op)); 406 sl << uint32 (query_flags (op));
393 407
394 if (flags & UPD_WEIGHT) { 408 if (flags & UPD_WEIGHT)
409 {
395 sint32 weight = WEIGHT(op); 410 sint32 weight = WEIGHT (op);
396 411
397 SockList_AddInt(&sl, QUERY_FLAG(op, FLAG_NO_PICK) ? -1 : weight); 412 sl << uint32 (QUERY_FLAG (op, FLAG_NO_PICK) ? -1 : weight);
413
398 if (pl == op) { 414 if (pl == op)
399 op->contr->last_weight = weight; 415 op->contr->last_weight = weight;
400 }
401 } 416 }
402 417
403 if (flags & UPD_FACE) { 418 if (flags & UPD_FACE)
419 {
404 if (!(pl->contr->socket.faces_sent[op->face->number] & NS_FACESENT_FACE)) 420 if (!(pl->contr->socket->faces_sent[op->face->number] & NS_FACESENT_FACE))
405 esrv_send_face(&pl->contr->socket, op->face->number,0); 421 esrv_send_face (pl->contr->socket, op->face->number, 0);
406 SockList_AddInt(&sl, op->face->number); 422
423 sl << uint32 (op->face->number);
407 } 424 }
425
408 if (flags & UPD_NAME) { 426 if (flags & UPD_NAME)
427 {
409 int len; 428 int len;
410 const char *item_p; 429 const char *item_p;
411 char item_n[MAX_BUF]; 430 char item_n[MAX_BUF];
412 431
413 if (!op->custom_name) { 432 if (!op->custom_name)
433 {
414 strncpy(item_n,query_base_name(op, 0),127); 434 strncpy (item_n, query_base_name (op, 0), 127);
415 item_n[127]=0; 435 item_n[127] = 0;
416 len=strlen(item_n); 436 len = strlen (item_n);
417 item_p=query_base_name(op, 1); 437 item_p = query_base_name (op, 1);
438 }
439 else
418 } 440 {
419 else {
420 strncpy(item_n,op->custom_name,127); 441 strncpy (item_n, op->custom_name, 127);
421 item_n[127]=0; 442 item_n[127] = 0;
422 len=strlen(item_n); 443 len = strlen (item_n);
423 item_p=op->custom_name; 444 item_p = op->custom_name;
424 } 445 }
425 446
426 strncpy(item_n+len+1, item_p, 127); 447 strncpy (item_n + len + 1, item_p, 127);
427 item_n[254]=0; 448 item_n[254] = 0;
428 len += strlen(item_n+1+len) + 1; 449 len += strlen (item_n + 1 + len) + 1;
429 SockList_AddChar(&sl, (char)len); 450
430 memcpy(sl.buf+sl.len, item_n, len); 451 sl << data8 (item_n, len);
431 sl.len += len;
432 } 452 }
453
433 if (flags & UPD_ANIM) 454 if (flags & UPD_ANIM)
434 SockList_AddShort(&sl,op->animation_id); 455 sl << uint16 (op->animation_id);
435 456
436 if (flags & UPD_ANIMSPEED) { 457 if (flags & UPD_ANIMSPEED)
458 {
437 int anim_speed=0; 459 int anim_speed = 0;
460
438 if (QUERY_FLAG(op,FLAG_ANIMATE)) { 461 if (QUERY_FLAG (op, FLAG_ANIMATE))
462 {
463 if (op->anim_speed)
439 if (op->anim_speed) anim_speed=op->anim_speed; 464 anim_speed = op->anim_speed;
465 else
466 {
467 if (FABS (op->speed) < 0.001)
468 anim_speed = 255;
469 else if (FABS (op->speed) >= 1.0)
470 anim_speed = 1;
440 else { 471 else
441 if (FABS(op->speed)<0.001) anim_speed=255;
442 else if (FABS(op->speed)>=1.0) anim_speed=1;
443 else anim_speed = (int) (1.0/FABS(op->speed)); 472 anim_speed = (int) (1.0 / FABS (op->speed));
444 } 473 }
445 if (anim_speed>255) anim_speed=255; 474
475 if (anim_speed > 255)
476 anim_speed = 255;
446 } 477 }
447 SockList_AddChar(&sl, (char)anim_speed); 478
479 sl << uint8 (anim_speed);
448 } 480 }
481
449 if (flags & UPD_NROF) 482 if (flags & UPD_NROF)
450 SockList_AddInt(&sl, op->nrof); 483 sl << uint32 (op->nrof);
451 484
452 Send_With_Handling(&pl->contr->socket, &sl); 485 pl->contr->socket->send_packet (sl);
453 free(sl.buf);
454} 486}
455 487
456/** 488/**
457 * Sends item's info to player. 489 * Sends item's info to player.
458 */ 490 */
491void
459void esrv_send_item(object *pl, object*op) 492esrv_send_item (object *pl, object *op)
460{ 493{
461 SockList sl;
462
463 /* If this is not the player object, do some more checks */ 494 /* If this is not the player object, do some more checks */
464 if (op!=pl) { 495 if (op != pl)
496 {
465 /* We only send 'visibile' objects to the client */ 497 /* We only send 'visibile' objects to the client */
466 if (! LOOK_OBJ(op)) 498 if (!LOOK_OBJ (op))
467 return; 499 return;
468 /* if the item is on the ground, mark that the look needs to 500 /* if the item is on the ground, mark that the look needs to
469 * be updated. 501 * be updated.
470 */ 502 */
471 if (!op->env) { 503 if (!op->env)
472 pl->contr->socket.update_look=1; 504 {
505 pl->contr->socket->floorbox_update ();
473 return; 506 return;
474 } 507 }
475 } 508 }
476 509
477 sl.buf= (unsigned char *) malloc(MAXSOCKBUF); 510 packet sl;
478 511
479 sprintf((char*)sl.buf,"item%d ", pl->contr->socket.itemcmd); 512 sl.printf ("item%d ", pl->contr->socket->itemcmd);
480 sl.len=strlen((char*)sl.buf);
481 513
482 if (op->head) op=op->head; 514 if (op->head)
515 op = op->head;
483 516
484 SockList_AddInt(&sl, op->env? op->env->count:0); 517 sl << uint32 (op->env ? op->env->count : 0);
485 518
486 add_object_to_socklist(&pl->contr->socket, &sl, op); 519 add_object_to_socklist (*pl->contr->socket, sl, op);
487 520
488 Send_With_Handling(&pl->contr->socket, &sl); 521 pl->contr->socket->send_packet (sl);
489 SET_FLAG(op, FLAG_CLIENT_SENT); 522 SET_FLAG (op, FLAG_CLIENT_SENT);
490 free(sl.buf);
491} 523}
492 524
493/** 525/**
494 * Tells the client to delete an item. Uses the item 526 * Tells the client to delete an item. Uses the item
495 * command with a -1 location. 527 * command with a -1 location.
496 */ 528 */
497 529
530void
498void esrv_del_item(player *pl, int tag) 531esrv_del_item (player *pl, int tag)
499{ 532{
500 SockList sl; 533 packet sl ("delitem");
501 534
502 sl.buf= (unsigned char *) malloc(MAXSOCKBUF); 535 sl << uint32 (tag);
503 536
504 strcpy((char*)sl.buf,"delitem "); 537 pl->socket->send_packet (sl);
505 sl.len=strlen((char*)sl.buf);
506 SockList_AddInt(&sl, tag);
507
508 Send_With_Handling(&pl->socket, &sl);
509 free(sl.buf);
510} 538}
511 539
512 540
513/******************************************************************************* 541/*******************************************************************************
514 * 542 *
… …
519/** 547/**
520 * Takes a player and object count (tag) and returns the actual object 548 * Takes a player and object count (tag) and returns the actual object
521 * pointer, or null if it can't be found. 549 * pointer, or null if it can't be found.
522 */ 550 */
523 551
552object *
524object *esrv_get_ob_from_count(object *pl, tag_t count) 553esrv_get_ob_from_count (object *pl, tag_t count)
525{ 554{
526 object *op, *tmp; 555 object *op, *tmp;
527 556
528 if (pl->count == count) 557 if (pl->count == count)
529 return pl; 558 return pl;
530 559
531 for(op = pl->inv; op; op = op->below) 560 for (op = pl->inv; op; op = op->below)
532 if (op->count == count) 561 if (op->count == count)
533 return op; 562 return op;
534 else if (op->type == CONTAINER && pl->container == op) 563 else if (op->type == CONTAINER && pl->container == op)
535 for(tmp = op->inv; tmp; tmp = tmp->below) 564 for (tmp = op->inv; tmp; tmp = tmp->below)
536 if (tmp->count == count) 565 if (tmp->count == count)
537 return tmp; 566 return tmp;
538 567
539 for(op = get_map_ob (pl->map, pl->x, pl->y); op; op = op->above) 568 for (op = get_map_ob (pl->map, pl->x, pl->y); op; op = op->above)
540 if (op->head != NULL && op->head->count == count) 569 if (op->head && op->head->count == count)
541 return op; 570 return op;
542 else if (op->count == count) 571 else if (op->count == count)
543 return op; 572 return op;
544 else if (op->type == CONTAINER && pl->container == op) 573 else if (op->type == CONTAINER && pl->container == op)
545 for(tmp = op->inv; tmp; tmp = tmp->below) 574 for (tmp = op->inv; tmp; tmp = tmp->below)
546 if (tmp->count == count) 575 if (tmp->count == count)
547 return tmp; 576 return tmp;
548 577
549 return NULL; 578 return 0;
550} 579}
551 580
552 581
553/** Client wants to examine some object. So lets do so. */ 582/** Client wants to examine some object. So lets do so. */
583void
554void ExamineCmd(char *buf, int len,player *pl) 584ExamineCmd (char *buf, int len, player *pl)
555{ 585{
556 long tag = atoi(buf); 586 tag_t tag = atoi (buf);
587
588 /* If the high bit is set, player examined a pseudo object. */
589 if (tag & 0x80000000)
590 return;
591
557 object *op = esrv_get_ob_from_count(pl->ob, tag); 592 object *op = esrv_get_ob_from_count (pl->ob, tag);
558 593
559 if (!op) { 594 if (!op)
595 {
560 LOG(llevDebug, "Player '%s' tried to examine the unknown object (%ld)\n", &pl->ob->name, tag); 596 LOG (llevDebug, "Player '%s' tried to examine the unknown object (%ld)\n", &pl->ob->name, tag);
561 return; 597 return;
562 } 598 }
599
563 examine (pl->ob, op); 600 examine (pl->ob, op);
564} 601}
565 602
566/** Client wants to apply some object. Lets do so. */ 603/** Client wants to apply some object. Lets do so. */
604void
567void ApplyCmd(char *buf, int len,player *pl) 605ApplyCmd (char *buf, int len, player *pl)
568{ 606{
569 uint32 tag = atoi(buf); 607 tag_t tag = atoi (buf);
570 object *op = esrv_get_ob_from_count(pl->ob, tag);
571 608
572 /* sort of a hack, but if the player saves and the player then manually 609 /* sort of a hack, but if the player saves and the player then manually
573 * applies a savebed (or otherwise tries to do stuff), we run into trouble. 610 * applies a savebed (or otherwise tries to do stuff), we run into trouble.
574 */ 611 */
575 if (QUERY_FLAG(pl->ob, FLAG_REMOVED)) return; 612 if (QUERY_FLAG (pl->ob, FLAG_REMOVED))
613 return;
576 614
577 /* If the high bit is set, player applied a pseudo object. */ 615 /* If the high bit is set, player applied a pseudo object. */
578 if (tag & 0x80000000) { 616 if (tag & 0x80000000)
617 {
579 pl->socket.look_position = tag & 0x7fffffff; 618 pl->socket->look_position = tag & 0x7fffffff;
580 pl->socket.update_look = 1; 619 pl->socket->floorbox_update ();
581 return; 620 return;
582 } 621 }
583 622
623 object *op = esrv_get_ob_from_count (pl->ob, tag);
624
584 if (!op) { 625 if (!op)
626 {
585 LOG(llevDebug, "Player '%s' tried to apply the unknown object (%d)\n", &pl->ob->name, tag); 627 LOG (llevDebug, "Player '%s' tried to apply the unknown object (%d)\n", &pl->ob->name, tag);
586 return; 628 return;
587 } 629 }
630
588 player_apply (pl->ob, op, 0, 0); 631 player_apply (pl->ob, op, 0, 0);
589} 632}
590 633
591/** Client wants to apply some object. Lets do so. */ 634/** Client wants to lock some object. Lets do so. */
635void
592void LockItem(uint8 *data, int len,player *pl) 636LockItem (char *data, int len, player *pl)
593{ 637{
594 int flag, tag;
595 object *op;
596
597 flag = data[0]; 638 int flag = data[0];
598 tag = GetInt_String(data+1); 639 tag_t tag = net_uint32 ((uint8 *)data + 1);
599 op = esrv_get_ob_from_count(pl->ob, tag); 640 object *op = esrv_get_ob_from_count (pl->ob, tag);
600 641
601 if (!op) { 642 if (!op)
643 {
602 new_draw_info(NDI_UNIQUE, 0, pl->ob,"Could not find object to lock/unlock"); 644 new_draw_info (NDI_UNIQUE, 0, pl->ob, "Could not find object to lock/unlock");
603 return; 645 return;
604 } 646 }
647
605 if (!flag) 648 if (!flag)
606 CLEAR_FLAG(op,FLAG_INV_LOCKED); 649 CLEAR_FLAG (op, FLAG_INV_LOCKED);
607 else 650 else
608 SET_FLAG(op,FLAG_INV_LOCKED); 651 SET_FLAG (op, FLAG_INV_LOCKED);
652
609 esrv_update_item(UPD_FLAGS, pl->ob, op); 653 esrv_update_item (UPD_FLAGS, pl->ob, op);
610} 654}
611 655
612/** Client wants to apply some object. Lets do so. */ 656/** Client wants to mark some object. Lets do so. */
657void
613void MarkItem(uint8 *data, int len,player *pl) 658MarkItem (char *data, int len, player *pl)
614{ 659{
615 int tag; 660 tag_t tag = net_uint32 ((uint8 *)data);
616 object *op;
617
618 tag = GetInt_String(data);
619 op = esrv_get_ob_from_count(pl->ob, tag); 661 object *op = esrv_get_ob_from_count (pl->ob, tag);
662
620 if (!op) { 663 if (!op)
664 {
621 new_draw_info(NDI_UNIQUE, 0, pl->ob,"Could not find object to mark"); 665 new_draw_info (NDI_UNIQUE, 0, pl->ob, "Could not find object to mark");
622 return; 666 return;
623 } 667 }
668
624 pl->mark = op; 669 pl->mark = op;
625 pl->mark_count = op->count;
626 new_draw_info_format(NDI_UNIQUE, 0, pl->ob, "Marked item %s", query_name(op)); 670 new_draw_info_format (NDI_UNIQUE, 0, pl->ob, "Marked item %s", query_name (op));
627} 671}
628
629 672
630/** 673/**
631 * look_at prints items on the specified square. 674 * look_at prints items on the specified square.
632 * 675 *
633 * [ removed EARTHWALL check and added check for containers inventory. 676 * [ removed EARTHWALL check and added check for containers inventory.
634 * Tero.Haatanen@lut.fi ] 677 * Tero.Haatanen@lut.fi ]
635 */ 678 */
679void
636void look_at(object *op,int dx,int dy) { 680look_at (object *op, int dx, int dy)
681{
637 object *tmp; 682 object *tmp;
638 int flag=0; 683 int flag = 0;
639 sint16 x,y; 684 sint16 x, y;
640 mapstruct *m; 685 maptile *m;
641 686
642 x = op->x + dx; 687 x = op->x + dx;
643 y = op->y + dy; 688 y = op->y + dy;
644 689
645 if (out_of_map(op->map, x, y)) return; 690 if (out_of_map (op->map, x, y))
691 return;
646 692
647 m = get_map_from_coord(op->map, &x, &y); 693 m = get_map_from_coord (op->map, &x, &y);
648 if (!m) return; 694 if (!m)
695 return;
649 696
650 for(tmp=get_map_ob(m, x ,y);tmp!=NULL&&tmp->above!=NULL; 697 for (tmp = get_map_ob (m, x, y); tmp != NULL && tmp->above != NULL; tmp = tmp->above);
651 tmp=tmp->above);
652 698
653 for ( ; tmp != NULL; tmp=tmp->below ) { 699 for (; tmp != NULL; tmp = tmp->below)
700 {
654 if (tmp->invisible && !QUERY_FLAG(op, FLAG_WIZ)) continue; 701 if (tmp->invisible && !QUERY_FLAG (op, FLAG_WIZ))
702 continue;
655 703
656 if(!flag) { 704 if (!flag)
705 {
657 if(dx||dy) 706 if (dx || dy)
658 new_draw_info(NDI_UNIQUE, 0,op,"There you see:"); 707 new_draw_info (NDI_UNIQUE, 0, op, "There you see:");
659 else { 708 else
709 {
660 clear_win_info(op); 710 clear_win_info (op);
661 new_draw_info(NDI_UNIQUE, 0,op,"You see:"); 711 new_draw_info (NDI_UNIQUE, 0, op, "You see:");
662 } 712 }
663 flag=1; 713 flag = 1;
664 } 714 }
665 715
666 if (QUERY_FLAG(op, FLAG_WIZ)) 716 if (QUERY_FLAG (op, FLAG_WIZ))
667 new_draw_info_format(NDI_UNIQUE,0, op, "- %s (%d).",query_name(tmp),tmp->count); 717 new_draw_info_format (NDI_UNIQUE, 0, op, "- %s (%d).", query_name (tmp), tmp->count);
668 else 718 else
669 new_draw_info_format(NDI_UNIQUE,0, op, "- %s.",query_name(tmp)); 719 new_draw_info_format (NDI_UNIQUE, 0, op, "- %s.", query_name (tmp));
670 720
671 if (((tmp->inv!=NULL || (tmp->head && tmp->head->inv)) && 721 if (((tmp->inv != NULL || (tmp->head && tmp->head->inv)) &&
672 (tmp->type != CONTAINER && tmp->type!=FLESH)) || QUERY_FLAG(op, FLAG_WIZ)) 722 (tmp->type != CONTAINER && tmp->type != FLESH)) || QUERY_FLAG (op, FLAG_WIZ))
673 inventory(op,tmp->head==NULL?tmp:tmp->head); 723 inventory (op, tmp->head == NULL ? tmp : tmp->head);
674 724
675 if(QUERY_FLAG(tmp, FLAG_IS_FLOOR)&&!QUERY_FLAG(op, FLAG_WIZ)) /* don't continue under the floor */ 725 if (QUERY_FLAG (tmp, FLAG_IS_FLOOR) && !QUERY_FLAG (op, FLAG_WIZ)) /* don't continue under the floor */
676 break; 726 break;
677 } 727 }
678 728
679 if(!flag) { 729 if (!flag)
730 {
680 if(dx||dy) 731 if (dx || dy)
681 new_draw_info(NDI_UNIQUE, 0,op,"You see nothing there."); 732 new_draw_info (NDI_UNIQUE, 0, op, "You see nothing there.");
682 else 733 else
683 new_draw_info(NDI_UNIQUE, 0,op,"You see nothing."); 734 new_draw_info (NDI_UNIQUE, 0, op, "You see nothing.");
684 } 735 }
685} 736}
686 737
687 738
688 739
689/** Client wants to look at some object. Lets do so. */ 740/** Client wants to look at some object. Lets do so. */
741void
690void LookAt(char *buf, int len,player *pl) 742LookAt (char *buf, int len, player *pl)
691{ 743{
692 int dx, dy; 744 int dx, dy;
693 char *cp; 745 char *cp;
694 746
695 dx=atoi(buf); 747 dx = atoi (buf);
696 if (!(cp=strchr(buf,' '))) { 748 if (!(cp = strchr (buf, ' ')))
749 {
750 return;
751 }
752 dy = atoi (cp);
753
754 if (FABS (dx) > pl->socket->mapx / 2 || FABS (dy) > pl->socket->mapy / 2)
755 return;
756
757 if (pl->blocked_los[dx + pl->socket->mapx / 2][dy + pl->socket->mapy / 2])
758 return;
759
760 look_at (pl->ob, dx, dy);
761}
762
763/** Move an object to a new location */
764void
765esrv_move_object (object *pl, tag_t to, tag_t tag, long nrof)
766{
767 object *op, *env;
768
769 op = esrv_get_ob_from_count (pl, tag);
770 if (!op)
771 {
772 LOG (llevDebug, "Player '%s' tried to move an unknown object (%ld)\n", &pl->name, tag);
773 return;
774 }
775
776 if (!to)
777 { /* drop it to the ground */
778 if (op->map && !op->env)
697 return; 779 return;
698 }
699 dy=atoi(cp);
700 780
701 if (FABS(dx) > pl->socket.mapx / 2 || FABS(dy) > pl->socket.mapy / 2) 781 /* If it is an active container, then we should drop all objects
782 * in the container and not the container itself.
783 */
784 if (op->inv && QUERY_FLAG (op, FLAG_APPLIED))
785 {
786 object *current, *next;
787
788 for (current = op->inv; current != NULL; current = next)
789 {
790 next = current->below;
791 drop_object (pl, current, 0);
792 }
793
794 esrv_update_item (UPD_WEIGHT, pl, op);
795 }
796 else
797 drop_object (pl, op, nrof);
798
702 return; 799 return;
703 800 }
704 if(pl->blocked_los[dx + pl->socket.mapx / 2][dy + pl->socket.mapy / 2]) 801 else if (to == pl->count)
705 return; 802 { /* pick it up to the inventory */
706 803 /* return if player has already picked it up */
707 look_at(pl->ob, dx, dy); 804 if (op->env == pl)
708}
709
710/** Move an object to a new location */
711void esrv_move_object (object *pl, tag_t to, tag_t tag, long nrof)
712{
713 object *op, *env;
714
715 op = esrv_get_ob_from_count(pl, tag);
716 if (!op) {
717 LOG(llevDebug, "Player '%s' tried to move an unknown object (%ld)\n", &pl->name, tag);
718 return; 805 return;
719 }
720 806
721 if (!to) { /* drop it to the ground */
722/* LOG(llevDebug, "Drop it on the ground.\n");*/
723
724 if (op->map && !op->env) {
725/* LOG(llevDebug,"Dropping object to ground that is already on ground\n");*/
726 return;
727 }
728 /* If it is an active container, then we should drop all objects
729 * in the container and not the container itself.
730 */
731 if (op->inv && QUERY_FLAG(op, FLAG_APPLIED)) {
732 object *current, *next;
733 for (current=op->inv; current!=NULL; current=next) {
734 next=current->below;
735 drop_object(pl, current, 0);
736 }
737 esrv_update_item(UPD_WEIGHT, pl, op);
738 }
739 else {
740 drop_object (pl, op, nrof);
741 }
742 return;
743 } else if (to == pl->count) { /* pick it up to the inventory */
744 /* return if player has already picked it up */
745 if (op->env == pl) return;
746
747 pl->contr->count = nrof; 807 pl->contr->count = nrof;
748 pick_up(pl, op); 808 pick_up (pl, op);
749 return ; 809 return;
750 } 810 }
811
751 env = esrv_get_ob_from_count(pl, to); 812 env = esrv_get_ob_from_count (pl, to);
752 if (!env) { 813 if (!env)
753 LOG(llevDebug, 814 {
754 "Player '%s' tried to move object to the unknown location (%d)\n", &pl->name, to); 815 LOG (llevDebug, "Player '%s' tried to move object to the unknown location (%d)\n", &pl->name, to);
755 return; 816 return;
756 } 817 }
818
757 /* put_object_in_sack presumes that necessary sanity checking 819 /* put_object_in_sack presumes that necessary sanity checking
758 * has already been done (eg, it can be picked up and fits in 820 * has already been done (eg, it can be picked up and fits in
759 * in a sack, so check for those things. We should also check 821 * in a sack, so check for those things. We should also check
760 * an make sure env is in fact a container for that matter. 822 * an make sure env is in fact a container for that matter.
761 */ 823 */
762 if (env->type == CONTAINER
763 && can_pick(pl, op) && sack_can_hold(pl, env, op, nrof)) { 824 if (env->type == CONTAINER && can_pick (pl, op) && sack_can_hold (pl, env, op, nrof))
764 put_object_in_sack (pl, env, op, nrof); 825 put_object_in_sack (pl, env, op, nrof);
765 }
766} 826}
767 827
768

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines