]> git.lizzy.rs Git - dragonfireclient.git/blob - src/server.cpp
96e64b3142aa8a5cbcb7c3f7e41fc732712d783d
[dragonfireclient.git] / src / server.cpp
1 /*
2 Minetest-c55
3 Copyright (C) 2010-2011 celeron55, Perttu Ahola <celeron55@gmail.com>
4
5 This program is free software; you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 2 of the License, or
8 (at your option) any later version.
9
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13 GNU General Public License for more details.
14
15 You should have received a copy of the GNU General Public License along
16 with this program; if not, write to the Free Software Foundation, Inc.,
17 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
18 */
19
20 #include "server.h"
21 #include "utility.h"
22 #include <iostream>
23 #include "clientserver.h"
24 #include "map.h"
25 #include "jmutexautolock.h"
26 #include "main.h"
27 #include "constants.h"
28 #include "voxel.h"
29 #include "materials.h"
30 #include "mineral.h"
31 #include "config.h"
32 #include "servercommand.h"
33 #include "filesys.h"
34 #include "content_mapnode.h"
35 #include "content_craft.h"
36 #include "content_nodemeta.h"
37 #include "mapblock.h"
38 #include "serverobject.h"
39
40 #define BLOCK_EMERGE_FLAG_FROMDISK (1<<0)
41
42 class MapEditEventIgnorer
43 {
44 public:
45         MapEditEventIgnorer(bool *flag):
46                 m_flag(flag)
47         {
48                 if(*m_flag == false)
49                         *m_flag = true;
50                 else
51                         m_flag = NULL;
52         }
53
54         ~MapEditEventIgnorer()
55         {
56                 if(m_flag)
57                 {
58                         assert(*m_flag);
59                         *m_flag = false;
60                 }
61         }
62         
63 private:
64         bool *m_flag;
65 };
66
67 void * ServerThread::Thread()
68 {
69         ThreadStarted();
70
71         DSTACK(__FUNCTION_NAME);
72
73         BEGIN_DEBUG_EXCEPTION_HANDLER
74
75         while(getRun())
76         {
77                 try{
78                         //TimeTaker timer("AsyncRunStep() + Receive()");
79
80                         {
81                                 //TimeTaker timer("AsyncRunStep()");
82                                 m_server->AsyncRunStep();
83                         }
84                 
85                         //dout_server<<"Running m_server->Receive()"<<std::endl;
86                         m_server->Receive();
87                 }
88                 catch(con::NoIncomingDataException &e)
89                 {
90                 }
91                 catch(con::PeerNotFoundException &e)
92                 {
93                         dout_server<<"Server: PeerNotFoundException"<<std::endl;
94                 }
95         }
96         
97         END_DEBUG_EXCEPTION_HANDLER
98
99         return NULL;
100 }
101
102 void * EmergeThread::Thread()
103 {
104         ThreadStarted();
105
106         DSTACK(__FUNCTION_NAME);
107
108         BEGIN_DEBUG_EXCEPTION_HANDLER
109
110         bool enable_mapgen_debug_info = g_settings.getBool("enable_mapgen_debug_info");
111         
112         /*
113                 Get block info from queue, emerge them and send them
114                 to clients.
115
116                 After queue is empty, exit.
117         */
118         while(getRun())
119         {
120                 QueuedBlockEmerge *qptr = m_server->m_emerge_queue.pop();
121                 if(qptr == NULL)
122                         break;
123                 
124                 SharedPtr<QueuedBlockEmerge> q(qptr);
125
126                 v3s16 &p = q->pos;
127                 v2s16 p2d(p.X,p.Z);
128
129                 /*
130                         Do not generate over-limit
131                 */
132                 if(p.X < -MAP_GENERATION_LIMIT / MAP_BLOCKSIZE
133                 || p.X > MAP_GENERATION_LIMIT / MAP_BLOCKSIZE
134                 || p.Y < -MAP_GENERATION_LIMIT / MAP_BLOCKSIZE
135                 || p.Y > MAP_GENERATION_LIMIT / MAP_BLOCKSIZE
136                 || p.Z < -MAP_GENERATION_LIMIT / MAP_BLOCKSIZE
137                 || p.Z > MAP_GENERATION_LIMIT / MAP_BLOCKSIZE)
138                         continue;
139                         
140                 //derr_server<<"EmergeThread::Thread(): running"<<std::endl;
141
142                 //TimeTaker timer("block emerge");
143                 
144                 /*
145                         Try to emerge it from somewhere.
146
147                         If it is only wanted as optional, only loading from disk
148                         will be allowed.
149                 */
150                 
151                 /*
152                         Check if any peer wants it as non-optional. In that case it
153                         will be generated.
154
155                         Also decrement the emerge queue count in clients.
156                 */
157
158                 bool only_from_disk = true;
159
160                 {
161                         core::map<u16, u8>::Iterator i;
162                         for(i=q->peer_ids.getIterator(); i.atEnd()==false; i++)
163                         {
164                                 //u16 peer_id = i.getNode()->getKey();
165
166                                 // Check flags
167                                 u8 flags = i.getNode()->getValue();
168                                 if((flags & BLOCK_EMERGE_FLAG_FROMDISK) == false)
169                                         only_from_disk = false;
170                                 
171                         }
172                 }
173                 
174                 if(enable_mapgen_debug_info)
175                         dstream<<"EmergeThread: p="
176                                         <<"("<<p.X<<","<<p.Y<<","<<p.Z<<") "
177                                         <<"only_from_disk="<<only_from_disk<<std::endl;
178                 
179                 ServerMap &map = ((ServerMap&)m_server->m_env.getMap());
180                         
181                 //core::map<v3s16, MapBlock*> changed_blocks;
182                 //core::map<v3s16, MapBlock*> lighting_invalidated_blocks;
183
184                 MapBlock *block = NULL;
185                 bool got_block = true;
186                 core::map<v3s16, MapBlock*> modified_blocks;
187                 
188                 /*
189                         Fetch block from map or generate a single block
190                 */
191                 {
192                         JMutexAutoLock envlock(m_server->m_env_mutex);
193                         
194                         // Load sector if it isn't loaded
195                         if(map.getSectorNoGenerateNoEx(p2d) == NULL)
196                                 //map.loadSectorFull(p2d);
197                                 map.loadSectorMeta(p2d);
198
199                         block = map.getBlockNoCreateNoEx(p);
200                         if(!block || block->isDummy() || !block->isGenerated())
201                         {
202                                 if(enable_mapgen_debug_info)
203                                         dstream<<"EmergeThread: not in memory, loading"<<std::endl;
204
205                                 // Get, load or create sector
206                                 /*ServerMapSector *sector =
207                                                 (ServerMapSector*)map.createSector(p2d);*/
208
209                                 // Load/generate block
210
211                                 /*block = map.emergeBlock(p, sector, changed_blocks,
212                                                 lighting_invalidated_blocks);*/
213
214                                 block = map.loadBlock(p);
215                                 
216                                 if(only_from_disk == false)
217                                 {
218                                         if(block == NULL || block->isGenerated() == false)
219                                         {
220                                                 if(enable_mapgen_debug_info)
221                                                         dstream<<"EmergeThread: generating"<<std::endl;
222                                                 block = map.generateBlock(p, modified_blocks);
223                                         }
224                                 }
225
226                                 if(enable_mapgen_debug_info)
227                                         dstream<<"EmergeThread: ended up with: "
228                                                         <<analyze_block(block)<<std::endl;
229
230                                 if(block == NULL)
231                                 {
232                                         got_block = false;
233                                 }
234                                 else
235                                 {
236                                         /*
237                                                 Ignore map edit events, they will not need to be
238                                                 sent to anybody because the block hasn't been sent
239                                                 to anybody
240                                         */
241                                         MapEditEventIgnorer ign(&m_server->m_ignore_map_edit_events);
242                                         
243                                         // Activate objects and stuff
244                                         m_server->m_env.activateBlock(block, 3600);
245                                 }
246                         }
247                         else
248                         {
249                                 /*if(block->getLightingExpired()){
250                                         lighting_invalidated_blocks[block->getPos()] = block;
251                                 }*/
252                         }
253
254                         // TODO: Some additional checking and lighting updating,
255                         //       see emergeBlock
256                 }
257
258                 {//envlock
259                 JMutexAutoLock envlock(m_server->m_env_mutex);
260                 
261                 if(got_block)
262                 {
263                         /*
264                                 Collect a list of blocks that have been modified in
265                                 addition to the fetched one.
266                         */
267
268 #if 0
269                         if(lighting_invalidated_blocks.size() > 0)
270                         {
271                                 /*dstream<<"lighting "<<lighting_invalidated_blocks.size()
272                                                 <<" blocks"<<std::endl;*/
273                         
274                                 // 50-100ms for single block generation
275                                 //TimeTaker timer("** EmergeThread updateLighting");
276                                 
277                                 // Update lighting without locking the environment mutex,
278                                 // add modified blocks to changed blocks
279                                 map.updateLighting(lighting_invalidated_blocks, modified_blocks);
280                         }
281                                 
282                         // Add all from changed_blocks to modified_blocks
283                         for(core::map<v3s16, MapBlock*>::Iterator i = changed_blocks.getIterator();
284                                         i.atEnd() == false; i++)
285                         {
286                                 MapBlock *block = i.getNode()->getValue();
287                                 modified_blocks.insert(block->getPos(), block);
288                         }
289 #endif
290                 }
291                 // If we got no block, there should be no invalidated blocks
292                 else
293                 {
294                         //assert(lighting_invalidated_blocks.size() == 0);
295                 }
296
297                 }//envlock
298
299                 /*
300                         Set sent status of modified blocks on clients
301                 */
302         
303                 // NOTE: Server's clients are also behind the connection mutex
304                 JMutexAutoLock lock(m_server->m_con_mutex);
305
306                 /*
307                         Add the originally fetched block to the modified list
308                 */
309                 if(got_block)
310                 {
311                         modified_blocks.insert(p, block);
312                 }
313                 
314                 /*
315                         Set the modified blocks unsent for all the clients
316                 */
317                 
318                 for(core::map<u16, RemoteClient*>::Iterator
319                                 i = m_server->m_clients.getIterator();
320                                 i.atEnd() == false; i++)
321                 {
322                         RemoteClient *client = i.getNode()->getValue();
323                         
324                         if(modified_blocks.size() > 0)
325                         {
326                                 // Remove block from sent history
327                                 client->SetBlocksNotSent(modified_blocks);
328                         }
329                 }
330                 
331         }
332
333         END_DEBUG_EXCEPTION_HANDLER
334
335         return NULL;
336 }
337
338 void RemoteClient::GetNextBlocks(Server *server, float dtime,
339                 core::array<PrioritySortedBlockTransfer> &dest)
340 {
341         DSTACK(__FUNCTION_NAME);
342         
343         /*u32 timer_result;
344         TimeTaker timer("RemoteClient::GetNextBlocks", &timer_result);*/
345         
346         // Increment timers
347         m_nothing_to_send_pause_timer -= dtime;
348         
349         if(m_nothing_to_send_pause_timer >= 0)
350         {
351                 // Keep this reset
352                 m_nearest_unsent_reset_timer = 0;
353                 return;
354         }
355
356         // Won't send anything if already sending
357         if(m_blocks_sending.size() >= g_settings.getU16
358                         ("max_simultaneous_block_sends_per_client"))
359         {
360                 //dstream<<"Not sending any blocks, Queue full."<<std::endl;
361                 return;
362         }
363
364         //TimeTaker timer("RemoteClient::GetNextBlocks");
365         
366         Player *player = server->m_env.getPlayer(peer_id);
367
368         assert(player != NULL);
369
370         v3f playerpos = player->getPosition();
371         v3f playerspeed = player->getSpeed();
372         v3f playerspeeddir(0,0,0);
373         if(playerspeed.getLength() > 1.0*BS)
374                 playerspeeddir = playerspeed / playerspeed.getLength();
375         // Predict to next block
376         v3f playerpos_predicted = playerpos + playerspeeddir*MAP_BLOCKSIZE*BS;
377
378         v3s16 center_nodepos = floatToInt(playerpos_predicted, BS);
379
380         v3s16 center = getNodeBlockPos(center_nodepos);
381         
382         // Camera position and direction
383         v3f camera_pos =
384                         playerpos + v3f(0, BS+BS/2, 0);
385         v3f camera_dir = v3f(0,0,1);
386         camera_dir.rotateYZBy(player->getPitch());
387         camera_dir.rotateXZBy(player->getYaw());
388
389         /*dstream<<"camera_dir=("<<camera_dir.X<<","<<camera_dir.Y<<","
390                         <<camera_dir.Z<<")"<<std::endl;*/
391
392         /*
393                 Get the starting value of the block finder radius.
394         */
395                 
396         if(m_last_center != center)
397         {
398                 m_nearest_unsent_d = 0;
399                 m_last_center = center;
400         }
401
402         /*dstream<<"m_nearest_unsent_reset_timer="
403                         <<m_nearest_unsent_reset_timer<<std::endl;*/
404                         
405         // This has to be incremented only when the nothing to send pause
406         // is not active
407         m_nearest_unsent_reset_timer += dtime;
408         
409         // Reset periodically to avoid possible bugs or other mishaps
410         if(m_nearest_unsent_reset_timer > 10.0)
411         {
412                 m_nearest_unsent_reset_timer = 0;
413                 m_nearest_unsent_d = 0;
414                 /*dstream<<"Resetting m_nearest_unsent_d for "
415                                 <<server->getPlayerName(peer_id)<<std::endl;*/
416         }
417
418         //s16 last_nearest_unsent_d = m_nearest_unsent_d;
419         s16 d_start = m_nearest_unsent_d;
420
421         //dstream<<"d_start="<<d_start<<std::endl;
422
423         u16 max_simul_sends_setting = g_settings.getU16
424                         ("max_simultaneous_block_sends_per_client");
425         u16 max_simul_sends_usually = max_simul_sends_setting;
426
427         /*
428                 Check the time from last addNode/removeNode.
429                 
430                 Decrease send rate if player is building stuff.
431         */
432         m_time_from_building += dtime;
433         if(m_time_from_building < g_settings.getFloat(
434                                 "full_block_send_enable_min_time_from_building"))
435         {
436                 max_simul_sends_usually
437                         = LIMITED_MAX_SIMULTANEOUS_BLOCK_SENDS;
438         }
439         
440         /*
441                 Number of blocks sending + number of blocks selected for sending
442         */
443         u32 num_blocks_selected = m_blocks_sending.size();
444         
445         /*
446                 next time d will be continued from the d from which the nearest
447                 unsent block was found this time.
448
449                 This is because not necessarily any of the blocks found this
450                 time are actually sent.
451         */
452         s32 new_nearest_unsent_d = -1;
453
454         s16 d_max = g_settings.getS16("max_block_send_distance");
455         s16 d_max_gen = g_settings.getS16("max_block_generate_distance");
456         
457         // Don't loop very much at a time
458         if(d_max > d_start+1)
459                 d_max = d_start+1;
460         /*if(d_max_gen > d_start+2)
461                 d_max_gen = d_start+2;*/
462         
463         //dstream<<"Starting from "<<d_start<<std::endl;
464
465         bool sending_something = false;
466
467         bool no_blocks_found_for_sending = true;
468
469         bool queue_is_full = false;
470         
471         s16 d;
472         for(d = d_start; d <= d_max; d++)
473         {
474                 //dstream<<"RemoteClient::SendBlocks(): d="<<d<<std::endl;
475                 
476                 /*
477                         If m_nearest_unsent_d was changed by the EmergeThread
478                         (it can change it to 0 through SetBlockNotSent),
479                         update our d to it.
480                         Else update m_nearest_unsent_d
481                 */
482                 /*if(m_nearest_unsent_d != last_nearest_unsent_d)
483                 {
484                         d = m_nearest_unsent_d;
485                         last_nearest_unsent_d = m_nearest_unsent_d;
486                 }*/
487
488                 /*
489                         Get the border/face dot coordinates of a "d-radiused"
490                         box
491                 */
492                 core::list<v3s16> list;
493                 getFacePositions(list, d);
494                 
495                 core::list<v3s16>::Iterator li;
496                 for(li=list.begin(); li!=list.end(); li++)
497                 {
498                         v3s16 p = *li + center;
499                         
500                         /*
501                                 Send throttling
502                                 - Don't allow too many simultaneous transfers
503                                 - EXCEPT when the blocks are very close
504
505                                 Also, don't send blocks that are already flying.
506                         */
507                         
508                         // Start with the usual maximum
509                         u16 max_simul_dynamic = max_simul_sends_usually;
510                         
511                         // If block is very close, allow full maximum
512                         if(d <= BLOCK_SEND_DISABLE_LIMITS_MAX_D)
513                                 max_simul_dynamic = max_simul_sends_setting;
514
515                         // Don't select too many blocks for sending
516                         if(num_blocks_selected >= max_simul_dynamic)
517                         {
518                                 queue_is_full = true;
519                                 goto queue_full_break;
520                         }
521                         
522                         // Don't send blocks that are currently being transferred
523                         if(m_blocks_sending.find(p) != NULL)
524                                 continue;
525                 
526                         /*
527                                 Do not go over-limit
528                         */
529                         if(p.X < -MAP_GENERATION_LIMIT / MAP_BLOCKSIZE
530                         || p.X > MAP_GENERATION_LIMIT / MAP_BLOCKSIZE
531                         || p.Y < -MAP_GENERATION_LIMIT / MAP_BLOCKSIZE
532                         || p.Y > MAP_GENERATION_LIMIT / MAP_BLOCKSIZE
533                         || p.Z < -MAP_GENERATION_LIMIT / MAP_BLOCKSIZE
534                         || p.Z > MAP_GENERATION_LIMIT / MAP_BLOCKSIZE)
535                                 continue;
536                 
537                         // If this is true, inexistent block will be made from scratch
538                         bool generate = d <= d_max_gen;
539                         
540                         {
541                                 /*// Limit the generating area vertically to 2/3
542                                 if(abs(p.Y - center.Y) > d_max_gen - d_max_gen / 3)
543                                         generate = false;*/
544
545                                 // Limit the send area vertically to 2/3
546                                 if(abs(p.Y - center.Y) > d_max_gen - d_max_gen / 3)
547                                         continue;
548                         }
549
550 #if 1
551                         /*
552                                 If block is far away, don't generate it unless it is
553                                 near ground level.
554                         */
555                         if(d >= 4)
556                         {
557         #if 1
558                                 // Block center y in nodes
559                                 f32 y = (f32)(p.Y * MAP_BLOCKSIZE + MAP_BLOCKSIZE/2);
560                                 // Don't generate if it's very high or very low
561                                 if(y < -64 || y > 64)
562                                         generate = false;
563         #endif
564         #if 0
565                                 v2s16 p2d_nodes_center(
566                                         MAP_BLOCKSIZE*p.X,
567                                         MAP_BLOCKSIZE*p.Z);
568                                 
569                                 // Get ground height in nodes
570                                 s16 gh = server->m_env.getServerMap().findGroundLevel(
571                                                 p2d_nodes_center);
572
573                                 // If differs a lot, don't generate
574                                 if(fabs(gh - y) > MAP_BLOCKSIZE*2)
575                                         generate = false;
576                                         // Actually, don't even send it
577                                         //continue;
578         #endif
579                         }
580 #endif
581
582                         //dstream<<"d="<<d<<std::endl;
583                         
584                         /*
585                                 Don't generate or send if not in sight
586                         */
587
588                         if(isBlockInSight(p, camera_pos, camera_dir, 10000*BS) == false)
589                         {
590                                 continue;
591                         }
592                         
593                         /*
594                                 Don't send already sent blocks
595                         */
596                         {
597                                 if(m_blocks_sent.find(p) != NULL)
598                                 {
599                                         continue;
600                                 }
601                         }
602
603                         /*
604                                 Check if map has this block
605                         */
606                         MapBlock *block = server->m_env.getMap().getBlockNoCreateNoEx(p);
607                         
608                         bool surely_not_found_on_disk = false;
609                         bool block_is_invalid = false;
610                         if(block != NULL)
611                         {
612                                 // Reset usage timer, this block will be of use in the future.
613                                 block->resetUsageTimer();
614
615                                 // Block is dummy if data doesn't exist.
616                                 // It means it has been not found from disk and not generated
617                                 if(block->isDummy())
618                                 {
619                                         surely_not_found_on_disk = true;
620                                 }
621                                 
622                                 // Block is valid if lighting is up-to-date and data exists
623                                 if(block->isValid() == false)
624                                 {
625                                         block_is_invalid = true;
626                                 }
627                                 
628                                 /*if(block->isFullyGenerated() == false)
629                                 {
630                                         block_is_invalid = true;
631                                 }*/
632
633 #if 0
634                                 v2s16 p2d(p.X, p.Z);
635                                 ServerMap *map = (ServerMap*)(&server->m_env.getMap());
636                                 v2s16 chunkpos = map->sector_to_chunk(p2d);
637                                 if(map->chunkNonVolatile(chunkpos) == false)
638                                         block_is_invalid = true;
639 #endif
640                                 if(block->isGenerated() == false)
641                                         block_is_invalid = true;
642 #if 1
643                                 /*
644                                         If block is not close, don't send it unless it is near
645                                         ground level.
646
647                                         Block is near ground level if night-time mesh
648                                         differs from day-time mesh.
649                                 */
650                                 if(d > 3)
651                                 {
652                                         if(block->dayNightDiffed() == false)
653                                                 continue;
654                                 }
655 #endif
656                         }
657
658                         /*
659                                 If block has been marked to not exist on disk (dummy)
660                                 and generating new ones is not wanted, skip block.
661                         */
662                         if(generate == false && surely_not_found_on_disk == true)
663                         {
664                                 // get next one.
665                                 continue;
666                         }
667
668                         /*
669                                 Record the lowest d from which a block has been
670                                 found being not sent and possibly to exist
671                         */
672                         if(no_blocks_found_for_sending)
673                         {
674                                 if(generate == true)
675                                         new_nearest_unsent_d = d;
676                         }
677
678                         no_blocks_found_for_sending = false;
679                                         
680                         /*
681                                 Add inexistent block to emerge queue.
682                         */
683                         if(block == NULL || surely_not_found_on_disk || block_is_invalid)
684                         {
685                                 //TODO: Get value from somewhere
686                                 // Allow only one block in emerge queue
687                                 //if(server->m_emerge_queue.peerItemCount(peer_id) < 1)
688                                 // Allow two blocks in queue per client
689                                 if(server->m_emerge_queue.peerItemCount(peer_id) < 2)
690                                 {
691                                         //dstream<<"Adding block to emerge queue"<<std::endl;
692                                         
693                                         // Add it to the emerge queue and trigger the thread
694                                         
695                                         u8 flags = 0;
696                                         if(generate == false)
697                                                 flags |= BLOCK_EMERGE_FLAG_FROMDISK;
698                                         
699                                         server->m_emerge_queue.addBlock(peer_id, p, flags);
700                                         server->m_emergethread.trigger();
701                                 }
702                                 
703                                 // get next one.
704                                 continue;
705                         }
706
707                         /*
708                                 Add block to send queue
709                         */
710
711                         PrioritySortedBlockTransfer q((float)d, p, peer_id);
712
713                         dest.push_back(q);
714
715                         num_blocks_selected += 1;
716                         sending_something = true;
717                 }
718         }
719 queue_full_break:
720
721         //dstream<<"Stopped at "<<d<<std::endl;
722         
723         if(no_blocks_found_for_sending)
724         {
725                 if(queue_is_full == false)
726                         new_nearest_unsent_d = d;
727         }
728
729         if(new_nearest_unsent_d != -1)
730                 m_nearest_unsent_d = new_nearest_unsent_d;
731
732         if(sending_something == false)
733         {
734                 m_nothing_to_send_counter++;
735                 if((s16)m_nothing_to_send_counter >=
736                                 g_settings.getS16("max_block_send_distance"))
737                 {
738                         // Pause time in seconds
739                         m_nothing_to_send_pause_timer = 1.0;
740                         /*dstream<<"nothing to send to "
741                                         <<server->getPlayerName(peer_id)
742                                         <<" (d="<<d<<")"<<std::endl;*/
743                 }
744         }
745         else
746         {
747                 m_nothing_to_send_counter = 0;
748         }
749
750         /*timer_result = timer.stop(true);
751         if(timer_result != 0)
752                 dstream<<"GetNextBlocks duration: "<<timer_result<<" (!=0)"<<std::endl;*/
753 }
754
755 void RemoteClient::SendObjectData(
756                 Server *server,
757                 float dtime,
758                 core::map<v3s16, bool> &stepped_blocks
759         )
760 {
761         DSTACK(__FUNCTION_NAME);
762
763         // Can't send anything without knowing version
764         if(serialization_version == SER_FMT_VER_INVALID)
765         {
766                 dstream<<"RemoteClient::SendObjectData(): Not sending, no version."
767                                 <<std::endl;
768                 return;
769         }
770
771         /*
772                 Send a TOCLIENT_OBJECTDATA packet.
773                 Sent as unreliable.
774
775                 u16 command
776                 u16 number of player positions
777                 for each player:
778                         v3s32 position*100
779                         v3s32 speed*100
780                         s32 pitch*100
781                         s32 yaw*100
782                 u16 count of blocks
783                 for each block:
784                         block objects
785         */
786
787         std::ostringstream os(std::ios_base::binary);
788         u8 buf[12];
789         
790         // Write command
791         writeU16(buf, TOCLIENT_OBJECTDATA);
792         os.write((char*)buf, 2);
793         
794         /*
795                 Get and write player data
796         */
797         
798         // Get connected players
799         core::list<Player*> players = server->m_env.getPlayers(true);
800
801         // Write player count
802         u16 playercount = players.size();
803         writeU16(buf, playercount);
804         os.write((char*)buf, 2);
805
806         core::list<Player*>::Iterator i;
807         for(i = players.begin();
808                         i != players.end(); i++)
809         {
810                 Player *player = *i;
811
812                 v3f pf = player->getPosition();
813                 v3f sf = player->getSpeed();
814
815                 v3s32 position_i(pf.X*100, pf.Y*100, pf.Z*100);
816                 v3s32 speed_i   (sf.X*100, sf.Y*100, sf.Z*100);
817                 s32   pitch_i   (player->getPitch() * 100);
818                 s32   yaw_i     (player->getYaw() * 100);
819                 
820                 writeU16(buf, player->peer_id);
821                 os.write((char*)buf, 2);
822                 writeV3S32(buf, position_i);
823                 os.write((char*)buf, 12);
824                 writeV3S32(buf, speed_i);
825                 os.write((char*)buf, 12);
826                 writeS32(buf, pitch_i);
827                 os.write((char*)buf, 4);
828                 writeS32(buf, yaw_i);
829                 os.write((char*)buf, 4);
830         }
831         
832         /*
833                 Get and write object data
834         */
835
836         /*
837                 Get nearby blocks.
838                 
839                 For making players to be able to build to their nearby
840                 environment (building is not possible on blocks that are not
841                 in memory):
842                 - Set blocks changed
843                 - Add blocks to emerge queue if they are not found
844
845                 SUGGESTION: These could be ignored from the backside of the player
846         */
847
848         Player *player = server->m_env.getPlayer(peer_id);
849
850         assert(player);
851
852         v3f playerpos = player->getPosition();
853         v3f playerspeed = player->getSpeed();
854
855         v3s16 center_nodepos = floatToInt(playerpos, BS);
856         v3s16 center = getNodeBlockPos(center_nodepos);
857
858         s16 d_max = g_settings.getS16("active_object_range");
859         
860         // Number of blocks whose objects were written to bos
861         u16 blockcount = 0;
862
863         std::ostringstream bos(std::ios_base::binary);
864
865         for(s16 d = 0; d <= d_max; d++)
866         {
867                 core::list<v3s16> list;
868                 getFacePositions(list, d);
869                 
870                 core::list<v3s16>::Iterator li;
871                 for(li=list.begin(); li!=list.end(); li++)
872                 {
873                         v3s16 p = *li + center;
874
875                         /*
876                                 Ignore blocks that haven't been sent to the client
877                         */
878                         {
879                                 if(m_blocks_sent.find(p) == NULL)
880                                         continue;
881                         }
882                         
883                         // Try stepping block and add it to a send queue
884                         try
885                         {
886
887                         // Get block
888                         MapBlock *block = server->m_env.getMap().getBlockNoCreate(p);
889
890                         /*
891                                 Step block if not in stepped_blocks and add to stepped_blocks.
892                         */
893                         if(stepped_blocks.find(p) == NULL)
894                         {
895                                 block->stepObjects(dtime, true, server->m_env.getDayNightRatio());
896                                 stepped_blocks.insert(p, true);
897                                 block->setChangedFlag();
898                         }
899
900                         // Skip block if there are no objects
901                         if(block->getObjectCount() == 0)
902                                 continue;
903                         
904                         /*
905                                 Write objects
906                         */
907
908                         // Write blockpos
909                         writeV3S16(buf, p);
910                         bos.write((char*)buf, 6);
911
912                         // Write objects
913                         //block->serializeObjects(bos, serialization_version); // DEPRECATED
914                         // count=0
915                         writeU16(bos, 0);
916
917                         blockcount++;
918
919                         /*
920                                 Stop collecting objects if data is already too big
921                         */
922                         // Sum of player and object data sizes
923                         s32 sum = (s32)os.tellp() + 2 + (s32)bos.tellp();
924                         // break out if data too big
925                         if(sum > MAX_OBJECTDATA_SIZE)
926                         {
927                                 goto skip_subsequent;
928                         }
929                         
930                         } //try
931                         catch(InvalidPositionException &e)
932                         {
933                                 // Not in memory
934                                 // Add it to the emerge queue and trigger the thread.
935                                 // Fetch the block only if it is on disk.
936                                 
937                                 // Grab and increment counter
938                                 /*SharedPtr<JMutexAutoLock> lock
939                                                 (m_num_blocks_in_emerge_queue.getLock());
940                                 m_num_blocks_in_emerge_queue.m_value++;*/
941                                 
942                                 // Add to queue as an anonymous fetch from disk
943                                 u8 flags = BLOCK_EMERGE_FLAG_FROMDISK;
944                                 server->m_emerge_queue.addBlock(0, p, flags);
945                                 server->m_emergethread.trigger();
946                         }
947                 }
948         }
949
950 skip_subsequent:
951
952         // Write block count
953         writeU16(buf, blockcount);
954         os.write((char*)buf, 2);
955
956         // Write block objects
957         os<<bos.str();
958
959         /*
960                 Send data
961         */
962         
963         //dstream<<"Server: Sending object data to "<<peer_id<<std::endl;
964
965         // Make data buffer
966         std::string s = os.str();
967         SharedBuffer<u8> data((u8*)s.c_str(), s.size());
968         // Send as unreliable
969         server->m_con.Send(peer_id, 0, data, false);
970 }
971
972 void RemoteClient::GotBlock(v3s16 p)
973 {
974         if(m_blocks_sending.find(p) != NULL)
975                 m_blocks_sending.remove(p);
976         else
977         {
978                 /*dstream<<"RemoteClient::GotBlock(): Didn't find in"
979                                 " m_blocks_sending"<<std::endl;*/
980                 m_excess_gotblocks++;
981         }
982         m_blocks_sent.insert(p, true);
983 }
984
985 void RemoteClient::SentBlock(v3s16 p)
986 {
987         if(m_blocks_sending.find(p) == NULL)
988                 m_blocks_sending.insert(p, 0.0);
989         else
990                 dstream<<"RemoteClient::SentBlock(): Sent block"
991                                 " already in m_blocks_sending"<<std::endl;
992 }
993
994 void RemoteClient::SetBlockNotSent(v3s16 p)
995 {
996         m_nearest_unsent_d = 0;
997         
998         if(m_blocks_sending.find(p) != NULL)
999                 m_blocks_sending.remove(p);
1000         if(m_blocks_sent.find(p) != NULL)
1001                 m_blocks_sent.remove(p);
1002 }
1003
1004 void RemoteClient::SetBlocksNotSent(core::map<v3s16, MapBlock*> &blocks)
1005 {
1006         m_nearest_unsent_d = 0;
1007         
1008         for(core::map<v3s16, MapBlock*>::Iterator
1009                         i = blocks.getIterator();
1010                         i.atEnd()==false; i++)
1011         {
1012                 v3s16 p = i.getNode()->getKey();
1013
1014                 if(m_blocks_sending.find(p) != NULL)
1015                         m_blocks_sending.remove(p);
1016                 if(m_blocks_sent.find(p) != NULL)
1017                         m_blocks_sent.remove(p);
1018         }
1019 }
1020
1021 /*
1022         PlayerInfo
1023 */
1024
1025 PlayerInfo::PlayerInfo()
1026 {
1027         name[0] = 0;
1028         avg_rtt = 0;
1029 }
1030
1031 void PlayerInfo::PrintLine(std::ostream *s)
1032 {
1033         (*s)<<id<<": ";
1034         (*s)<<"\""<<name<<"\" ("
1035                         <<(position.X/10)<<","<<(position.Y/10)
1036                         <<","<<(position.Z/10)<<") ";
1037         address.print(s);
1038         (*s)<<" avg_rtt="<<avg_rtt;
1039         (*s)<<std::endl;
1040 }
1041
1042 u32 PIChecksum(core::list<PlayerInfo> &l)
1043 {
1044         core::list<PlayerInfo>::Iterator i;
1045         u32 checksum = 1;
1046         u32 a = 10;
1047         for(i=l.begin(); i!=l.end(); i++)
1048         {
1049                 checksum += a * (i->id+1);
1050                 checksum ^= 0x435aafcd;
1051                 a *= 10;
1052         }
1053         return checksum;
1054 }
1055
1056 /*
1057         Server
1058 */
1059
1060 Server::Server(
1061                 std::string mapsavedir,
1062                 std::string configpath
1063         ):
1064         m_env(new ServerMap(mapsavedir), this),
1065         m_con(PROTOCOL_ID, 512, CONNECTION_TIMEOUT, this),
1066         m_authmanager(mapsavedir+"/auth.txt"),
1067         m_thread(this),
1068         m_emergethread(this),
1069         m_time_counter(0),
1070         m_time_of_day_send_timer(0),
1071         m_uptime(0),
1072         m_mapsavedir(mapsavedir),
1073         m_configpath(configpath),
1074         m_shutdown_requested(false),
1075         m_ignore_map_edit_events(false),
1076         m_ignore_map_edit_events_peer_id(0)
1077 {
1078         m_liquid_transform_timer = 0.0;
1079         m_print_info_timer = 0.0;
1080         m_objectdata_timer = 0.0;
1081         m_emergethread_trigger_timer = 0.0;
1082         m_savemap_timer = 0.0;
1083         
1084         m_env_mutex.Init();
1085         m_con_mutex.Init();
1086         m_step_dtime_mutex.Init();
1087         m_step_dtime = 0.0;
1088         
1089         // Register us to receive map edit events
1090         m_env.getMap().addEventReceiver(this);
1091
1092         // If file exists, load environment metadata
1093         if(fs::PathExists(m_mapsavedir+"/env_meta.txt"))
1094         {
1095                 dstream<<"Server: Loading environment metadata"<<std::endl;
1096                 m_env.loadMeta(m_mapsavedir);
1097         }
1098
1099         // Load players
1100         dstream<<"Server: Loading players"<<std::endl;
1101         m_env.deSerializePlayers(m_mapsavedir);
1102 }
1103
1104 Server::~Server()
1105 {
1106         dstream<<"Server::~Server()"<<std::endl;
1107
1108         /*
1109                 Send shutdown message
1110         */
1111         {
1112                 JMutexAutoLock conlock(m_con_mutex);
1113                 
1114                 std::wstring line = L"*** Server shutting down";
1115
1116                 /*
1117                         Send the message to clients
1118                 */
1119                 for(core::map<u16, RemoteClient*>::Iterator
1120                         i = m_clients.getIterator();
1121                         i.atEnd() == false; i++)
1122                 {
1123                         // Get client and check that it is valid
1124                         RemoteClient *client = i.getNode()->getValue();
1125                         assert(client->peer_id == i.getNode()->getKey());
1126                         if(client->serialization_version == SER_FMT_VER_INVALID)
1127                                 continue;
1128
1129                         try{
1130                                 SendChatMessage(client->peer_id, line);
1131                         }
1132                         catch(con::PeerNotFoundException &e)
1133                         {}
1134                 }
1135         }
1136
1137         /*
1138                 Save players
1139         */
1140         dstream<<"Server: Saving players"<<std::endl;
1141         m_env.serializePlayers(m_mapsavedir);
1142
1143         /*
1144                 Save environment metadata
1145         */
1146         dstream<<"Server: Saving environment metadata"<<std::endl;
1147         m_env.saveMeta(m_mapsavedir);
1148         
1149         /*
1150                 Stop threads
1151         */
1152         stop();
1153         
1154         /*
1155                 Delete clients
1156         */
1157         {
1158                 JMutexAutoLock clientslock(m_con_mutex);
1159
1160                 for(core::map<u16, RemoteClient*>::Iterator
1161                         i = m_clients.getIterator();
1162                         i.atEnd() == false; i++)
1163                 {
1164                         /*// Delete player
1165                         // NOTE: These are removed by env destructor
1166                         {
1167                                 u16 peer_id = i.getNode()->getKey();
1168                                 JMutexAutoLock envlock(m_env_mutex);
1169                                 m_env.removePlayer(peer_id);
1170                         }*/
1171                         
1172                         // Delete client
1173                         delete i.getNode()->getValue();
1174                 }
1175         }
1176 }
1177
1178 void Server::start(unsigned short port)
1179 {
1180         DSTACK(__FUNCTION_NAME);
1181         // Stop thread if already running
1182         m_thread.stop();
1183         
1184         // Initialize connection
1185         m_con.setTimeoutMs(30);
1186         m_con.Serve(port);
1187
1188         // Start thread
1189         m_thread.setRun(true);
1190         m_thread.Start();
1191         
1192         dout_server<<"Server: Started on port "<<port<<std::endl;
1193 }
1194
1195 void Server::stop()
1196 {
1197         DSTACK(__FUNCTION_NAME);
1198
1199         // Stop threads (set run=false first so both start stopping)
1200         m_thread.setRun(false);
1201         m_emergethread.setRun(false);
1202         m_thread.stop();
1203         m_emergethread.stop();
1204         
1205         dout_server<<"Server: Threads stopped"<<std::endl;
1206 }
1207
1208 void Server::step(float dtime)
1209 {
1210         DSTACK(__FUNCTION_NAME);
1211         // Limit a bit
1212         if(dtime > 2.0)
1213                 dtime = 2.0;
1214         {
1215                 JMutexAutoLock lock(m_step_dtime_mutex);
1216                 m_step_dtime += dtime;
1217         }
1218 }
1219
1220 void Server::AsyncRunStep()
1221 {
1222         DSTACK(__FUNCTION_NAME);
1223         
1224         float dtime;
1225         {
1226                 JMutexAutoLock lock1(m_step_dtime_mutex);
1227                 dtime = m_step_dtime;
1228         }
1229         
1230         {
1231                 ScopeProfiler sp(&g_profiler, "Server: selecting and sending "
1232                                 "blocks to clients");
1233                 // Send blocks to clients
1234                 SendBlocks(dtime);
1235         }
1236         
1237         if(dtime < 0.001)
1238                 return;
1239
1240         //dstream<<"Server steps "<<dtime<<std::endl;
1241         //dstream<<"Server::AsyncRunStep(): dtime="<<dtime<<std::endl;
1242         
1243         {
1244                 JMutexAutoLock lock1(m_step_dtime_mutex);
1245                 m_step_dtime -= dtime;
1246         }
1247
1248         /*
1249                 Update uptime
1250         */
1251         {
1252                 m_uptime.set(m_uptime.get() + dtime);
1253         }
1254         
1255         /*
1256                 Update m_time_of_day and overall game time
1257         */
1258         {
1259                 JMutexAutoLock envlock(m_env_mutex);
1260
1261                 m_time_counter += dtime;
1262                 f32 speed = g_settings.getFloat("time_speed") * 24000./(24.*3600);
1263                 u32 units = (u32)(m_time_counter*speed);
1264                 m_time_counter -= (f32)units / speed;
1265                 
1266                 m_env.setTimeOfDay((m_env.getTimeOfDay() + units) % 24000);
1267                 
1268                 //dstream<<"Server: m_time_of_day = "<<m_time_of_day.get()<<std::endl;
1269
1270                 /*
1271                         Send to clients at constant intervals
1272                 */
1273
1274                 m_time_of_day_send_timer -= dtime;
1275                 if(m_time_of_day_send_timer < 0.0)
1276                 {
1277                         m_time_of_day_send_timer = g_settings.getFloat("time_send_interval");
1278
1279                         //JMutexAutoLock envlock(m_env_mutex);
1280                         JMutexAutoLock conlock(m_con_mutex);
1281
1282                         for(core::map<u16, RemoteClient*>::Iterator
1283                                 i = m_clients.getIterator();
1284                                 i.atEnd() == false; i++)
1285                         {
1286                                 RemoteClient *client = i.getNode()->getValue();
1287                                 //Player *player = m_env.getPlayer(client->peer_id);
1288                                 
1289                                 SharedBuffer<u8> data = makePacket_TOCLIENT_TIME_OF_DAY(
1290                                                 m_env.getTimeOfDay());
1291                                 // Send as reliable
1292                                 m_con.Send(client->peer_id, 0, data, true);
1293                         }
1294                 }
1295         }
1296
1297         {
1298                 // Process connection's timeouts
1299                 JMutexAutoLock lock2(m_con_mutex);
1300                 ScopeProfiler sp(&g_profiler, "Server: connection timeout processing");
1301                 m_con.RunTimeouts(dtime);
1302         }
1303         
1304         {
1305                 // This has to be called so that the client list gets synced
1306                 // with the peer list of the connection
1307                 ScopeProfiler sp(&g_profiler, "Server: peer change handling");
1308                 handlePeerChanges();
1309         }
1310
1311         {
1312                 JMutexAutoLock lock(m_env_mutex);
1313                 // Step environment
1314                 ScopeProfiler sp(&g_profiler, "Server: environment step");
1315                 m_env.step(dtime);
1316         }
1317                 
1318         const float map_timer_and_unload_dtime = 5.15;
1319         if(m_map_timer_and_unload_interval.step(dtime, map_timer_and_unload_dtime))
1320         {
1321                 JMutexAutoLock lock(m_env_mutex);
1322                 // Run Map's timers and unload unused data
1323                 ScopeProfiler sp(&g_profiler, "Server: map timer and unload");
1324                 m_env.getMap().timerUpdate(map_timer_and_unload_dtime,
1325                                 g_settings.getFloat("server_unload_unused_data_timeout"));
1326         }
1327         
1328         /*
1329                 Do background stuff
1330         */
1331         
1332         /*
1333                 Transform liquids
1334         */
1335         m_liquid_transform_timer += dtime;
1336         if(m_liquid_transform_timer >= 1.00)
1337         {
1338                 m_liquid_transform_timer -= 1.00;
1339                 
1340                 JMutexAutoLock lock(m_env_mutex);
1341
1342                 ScopeProfiler sp(&g_profiler, "Server: liquid transform");
1343
1344                 core::map<v3s16, MapBlock*> modified_blocks;
1345                 m_env.getMap().transformLiquids(modified_blocks);
1346 #if 0           
1347                 /*
1348                         Update lighting
1349                 */
1350                 core::map<v3s16, MapBlock*> lighting_modified_blocks;
1351                 ServerMap &map = ((ServerMap&)m_env.getMap());
1352                 map.updateLighting(modified_blocks, lighting_modified_blocks);
1353                 
1354                 // Add blocks modified by lighting to modified_blocks
1355                 for(core::map<v3s16, MapBlock*>::Iterator
1356                                 i = lighting_modified_blocks.getIterator();
1357                                 i.atEnd() == false; i++)
1358                 {
1359                         MapBlock *block = i.getNode()->getValue();
1360                         modified_blocks.insert(block->getPos(), block);
1361                 }
1362 #endif
1363                 /*
1364                         Set the modified blocks unsent for all the clients
1365                 */
1366                 
1367                 JMutexAutoLock lock2(m_con_mutex);
1368
1369                 for(core::map<u16, RemoteClient*>::Iterator
1370                                 i = m_clients.getIterator();
1371                                 i.atEnd() == false; i++)
1372                 {
1373                         RemoteClient *client = i.getNode()->getValue();
1374                         
1375                         if(modified_blocks.size() > 0)
1376                         {
1377                                 // Remove block from sent history
1378                                 client->SetBlocksNotSent(modified_blocks);
1379                         }
1380                 }
1381         }
1382
1383         // Periodically print some info
1384         {
1385                 float &counter = m_print_info_timer;
1386                 counter += dtime;
1387                 if(counter >= 30.0)
1388                 {
1389                         counter = 0.0;
1390
1391                         JMutexAutoLock lock2(m_con_mutex);
1392
1393                         for(core::map<u16, RemoteClient*>::Iterator
1394                                 i = m_clients.getIterator();
1395                                 i.atEnd() == false; i++)
1396                         {
1397                                 //u16 peer_id = i.getNode()->getKey();
1398                                 RemoteClient *client = i.getNode()->getValue();
1399                                 Player *player = m_env.getPlayer(client->peer_id);
1400                                 if(player==NULL)
1401                                         continue;
1402                                 std::cout<<player->getName()<<"\t";
1403                                 client->PrintInfo(std::cout);
1404                         }
1405                 }
1406         }
1407
1408         //if(g_settings.getBool("enable_experimental"))
1409         {
1410
1411         /*
1412                 Check added and deleted active objects
1413         */
1414         {
1415                 //dstream<<"Server: Checking added and deleted active objects"<<std::endl;
1416                 JMutexAutoLock envlock(m_env_mutex);
1417                 JMutexAutoLock conlock(m_con_mutex);
1418
1419                 ScopeProfiler sp(&g_profiler, "Server: checking added and deleted objects");
1420
1421                 // Radius inside which objects are active
1422                 s16 radius = 32;
1423
1424                 for(core::map<u16, RemoteClient*>::Iterator
1425                         i = m_clients.getIterator();
1426                         i.atEnd() == false; i++)
1427                 {
1428                         RemoteClient *client = i.getNode()->getValue();
1429                         Player *player = m_env.getPlayer(client->peer_id);
1430                         if(player==NULL)
1431                         {
1432                                 // This can happen if the client timeouts somehow
1433                                 /*dstream<<"WARNING: "<<__FUNCTION_NAME<<": Client "
1434                                                 <<client->peer_id
1435                                                 <<" has no associated player"<<std::endl;*/
1436                                 continue;
1437                         }
1438                         v3s16 pos = floatToInt(player->getPosition(), BS);
1439
1440                         core::map<u16, bool> removed_objects;
1441                         core::map<u16, bool> added_objects;
1442                         m_env.getRemovedActiveObjects(pos, radius,
1443                                         client->m_known_objects, removed_objects);
1444                         m_env.getAddedActiveObjects(pos, radius,
1445                                         client->m_known_objects, added_objects);
1446                         
1447                         // Ignore if nothing happened
1448                         if(removed_objects.size() == 0 && added_objects.size() == 0)
1449                         {
1450                                 //dstream<<"INFO: active objects: none changed"<<std::endl;
1451                                 continue;
1452                         }
1453                         
1454                         std::string data_buffer;
1455
1456                         char buf[4];
1457                         
1458                         // Handle removed objects
1459                         writeU16((u8*)buf, removed_objects.size());
1460                         data_buffer.append(buf, 2);
1461                         for(core::map<u16, bool>::Iterator
1462                                         i = removed_objects.getIterator();
1463                                         i.atEnd()==false; i++)
1464                         {
1465                                 // Get object
1466                                 u16 id = i.getNode()->getKey();
1467                                 ServerActiveObject* obj = m_env.getActiveObject(id);
1468
1469                                 // Add to data buffer for sending
1470                                 writeU16((u8*)buf, i.getNode()->getKey());
1471                                 data_buffer.append(buf, 2);
1472                                 
1473                                 // Remove from known objects
1474                                 client->m_known_objects.remove(i.getNode()->getKey());
1475
1476                                 if(obj && obj->m_known_by_count > 0)
1477                                         obj->m_known_by_count--;
1478                         }
1479
1480                         // Handle added objects
1481                         writeU16((u8*)buf, added_objects.size());
1482                         data_buffer.append(buf, 2);
1483                         for(core::map<u16, bool>::Iterator
1484                                         i = added_objects.getIterator();
1485                                         i.atEnd()==false; i++)
1486                         {
1487                                 // Get object
1488                                 u16 id = i.getNode()->getKey();
1489                                 ServerActiveObject* obj = m_env.getActiveObject(id);
1490                                 
1491                                 // Get object type
1492                                 u8 type = ACTIVEOBJECT_TYPE_INVALID;
1493                                 if(obj == NULL)
1494                                         dstream<<"WARNING: "<<__FUNCTION_NAME
1495                                                         <<": NULL object"<<std::endl;
1496                                 else
1497                                         type = obj->getType();
1498
1499                                 // Add to data buffer for sending
1500                                 writeU16((u8*)buf, id);
1501                                 data_buffer.append(buf, 2);
1502                                 writeU8((u8*)buf, type);
1503                                 data_buffer.append(buf, 1);
1504                                 
1505                                 if(obj)
1506                                         data_buffer.append(serializeLongString(
1507                                                         obj->getClientInitializationData()));
1508                                 else
1509                                         data_buffer.append(serializeLongString(""));
1510
1511                                 // Add to known objects
1512                                 client->m_known_objects.insert(i.getNode()->getKey(), false);
1513
1514                                 if(obj)
1515                                         obj->m_known_by_count++;
1516                         }
1517
1518                         // Send packet
1519                         SharedBuffer<u8> reply(2 + data_buffer.size());
1520                         writeU16(&reply[0], TOCLIENT_ACTIVE_OBJECT_REMOVE_ADD);
1521                         memcpy((char*)&reply[2], data_buffer.c_str(),
1522                                         data_buffer.size());
1523                         // Send as reliable
1524                         m_con.Send(client->peer_id, 0, reply, true);
1525
1526                         dstream<<"INFO: Server: Sent object remove/add: "
1527                                         <<removed_objects.size()<<" removed, "
1528                                         <<added_objects.size()<<" added, "
1529                                         <<"packet size is "<<reply.getSize()<<std::endl;
1530                 }
1531
1532 #if 0
1533                 /*
1534                         Collect a list of all the objects known by the clients
1535                         and report it back to the environment.
1536                 */
1537
1538                 core::map<u16, bool> all_known_objects;
1539
1540                 for(core::map<u16, RemoteClient*>::Iterator
1541                         i = m_clients.getIterator();
1542                         i.atEnd() == false; i++)
1543                 {
1544                         RemoteClient *client = i.getNode()->getValue();
1545                         // Go through all known objects of client
1546                         for(core::map<u16, bool>::Iterator
1547                                         i = client->m_known_objects.getIterator();
1548                                         i.atEnd()==false; i++)
1549                         {
1550                                 u16 id = i.getNode()->getKey();
1551                                 all_known_objects[id] = true;
1552                         }
1553                 }
1554                 
1555                 m_env.setKnownActiveObjects(whatever);
1556 #endif
1557
1558         }
1559
1560         /*
1561                 Send object messages
1562         */
1563         {
1564                 JMutexAutoLock envlock(m_env_mutex);
1565                 JMutexAutoLock conlock(m_con_mutex);
1566
1567                 ScopeProfiler sp(&g_profiler, "Server: sending object messages");
1568
1569                 // Key = object id
1570                 // Value = data sent by object
1571                 core::map<u16, core::list<ActiveObjectMessage>* > buffered_messages;
1572
1573                 // Get active object messages from environment
1574                 for(;;)
1575                 {
1576                         ActiveObjectMessage aom = m_env.getActiveObjectMessage();
1577                         if(aom.id == 0)
1578                                 break;
1579                         
1580                         core::list<ActiveObjectMessage>* message_list = NULL;
1581                         core::map<u16, core::list<ActiveObjectMessage>* >::Node *n;
1582                         n = buffered_messages.find(aom.id);
1583                         if(n == NULL)
1584                         {
1585                                 message_list = new core::list<ActiveObjectMessage>;
1586                                 buffered_messages.insert(aom.id, message_list);
1587                         }
1588                         else
1589                         {
1590                                 message_list = n->getValue();
1591                         }
1592                         message_list->push_back(aom);
1593                 }
1594                 
1595                 // Route data to every client
1596                 for(core::map<u16, RemoteClient*>::Iterator
1597                         i = m_clients.getIterator();
1598                         i.atEnd()==false; i++)
1599                 {
1600                         RemoteClient *client = i.getNode()->getValue();
1601                         std::string reliable_data;
1602                         std::string unreliable_data;
1603                         // Go through all objects in message buffer
1604                         for(core::map<u16, core::list<ActiveObjectMessage>* >::Iterator
1605                                         j = buffered_messages.getIterator();
1606                                         j.atEnd()==false; j++)
1607                         {
1608                                 // If object is not known by client, skip it
1609                                 u16 id = j.getNode()->getKey();
1610                                 if(client->m_known_objects.find(id) == NULL)
1611                                         continue;
1612                                 // Get message list of object
1613                                 core::list<ActiveObjectMessage>* list = j.getNode()->getValue();
1614                                 // Go through every message
1615                                 for(core::list<ActiveObjectMessage>::Iterator
1616                                                 k = list->begin(); k != list->end(); k++)
1617                                 {
1618                                         // Compose the full new data with header
1619                                         ActiveObjectMessage aom = *k;
1620                                         std::string new_data;
1621                                         // Add object id
1622                                         char buf[2];
1623                                         writeU16((u8*)&buf[0], aom.id);
1624                                         new_data.append(buf, 2);
1625                                         // Add data
1626                                         new_data += serializeString(aom.datastring);
1627                                         // Add data to buffer
1628                                         if(aom.reliable)
1629                                                 reliable_data += new_data;
1630                                         else
1631                                                 unreliable_data += new_data;
1632                                 }
1633                         }
1634                         /*
1635                                 reliable_data and unreliable_data are now ready.
1636                                 Send them.
1637                         */
1638                         if(reliable_data.size() > 0)
1639                         {
1640                                 SharedBuffer<u8> reply(2 + reliable_data.size());
1641                                 writeU16(&reply[0], TOCLIENT_ACTIVE_OBJECT_MESSAGES);
1642                                 memcpy((char*)&reply[2], reliable_data.c_str(),
1643                                                 reliable_data.size());
1644                                 // Send as reliable
1645                                 m_con.Send(client->peer_id, 0, reply, true);
1646                         }
1647                         if(unreliable_data.size() > 0)
1648                         {
1649                                 SharedBuffer<u8> reply(2 + unreliable_data.size());
1650                                 writeU16(&reply[0], TOCLIENT_ACTIVE_OBJECT_MESSAGES);
1651                                 memcpy((char*)&reply[2], unreliable_data.c_str(),
1652                                                 unreliable_data.size());
1653                                 // Send as unreliable
1654                                 m_con.Send(client->peer_id, 0, reply, false);
1655                         }
1656
1657                         /*if(reliable_data.size() > 0 || unreliable_data.size() > 0)
1658                         {
1659                                 dstream<<"INFO: Server: Size of object message data: "
1660                                                 <<"reliable: "<<reliable_data.size()
1661                                                 <<", unreliable: "<<unreliable_data.size()
1662                                                 <<std::endl;
1663                         }*/
1664                 }
1665
1666                 // Clear buffered_messages
1667                 for(core::map<u16, core::list<ActiveObjectMessage>* >::Iterator
1668                                 i = buffered_messages.getIterator();
1669                                 i.atEnd()==false; i++)
1670                 {
1671                         delete i.getNode()->getValue();
1672                 }
1673         }
1674
1675         } // enable_experimental
1676
1677         /*
1678                 Send queued-for-sending map edit events.
1679         */
1680         {
1681                 // Don't send too many at a time
1682                 //u32 count = 0;
1683
1684                 // Single change sending is disabled if queue size is not small
1685                 bool disable_single_change_sending = false;
1686                 if(m_unsent_map_edit_queue.size() >= 4)
1687                         disable_single_change_sending = true;
1688
1689                 bool got_any_events = false;
1690
1691                 // We'll log the amount of each
1692                 Profiler prof;
1693
1694                 while(m_unsent_map_edit_queue.size() != 0)
1695                 {
1696                         got_any_events = true;
1697
1698                         MapEditEvent* event = m_unsent_map_edit_queue.pop_front();
1699                         
1700                         // Players far away from the change are stored here.
1701                         // Instead of sending the changes, MapBlocks are set not sent
1702                         // for them.
1703                         core::list<u16> far_players;
1704
1705                         if(event->type == MEET_ADDNODE)
1706                         {
1707                                 //dstream<<"Server: MEET_ADDNODE"<<std::endl;
1708                                 prof.add("MEET_ADDNODE", 1);
1709                                 if(disable_single_change_sending)
1710                                         sendAddNode(event->p, event->n, event->already_known_by_peer,
1711                                                         &far_players, 5);
1712                                 else
1713                                         sendAddNode(event->p, event->n, event->already_known_by_peer,
1714                                                         &far_players, 30);
1715                         }
1716                         else if(event->type == MEET_REMOVENODE)
1717                         {
1718                                 //dstream<<"Server: MEET_REMOVENODE"<<std::endl;
1719                                 prof.add("MEET_REMOVENODE", 1);
1720                                 if(disable_single_change_sending)
1721                                         sendRemoveNode(event->p, event->already_known_by_peer,
1722                                                         &far_players, 5);
1723                                 else
1724                                         sendRemoveNode(event->p, event->already_known_by_peer,
1725                                                         &far_players, 30);
1726                         }
1727                         else if(event->type == MEET_BLOCK_NODE_METADATA_CHANGED)
1728                         {
1729                                 dstream<<"Server: MEET_BLOCK_NODE_METADATA_CHANGED"<<std::endl;
1730                                 prof.add("MEET_BLOCK_NODE_METADATA_CHANGED", 1);
1731                                 setBlockNotSent(event->p);
1732                         }
1733                         else if(event->type == MEET_OTHER)
1734                         {
1735                                 prof.add("MEET_OTHER", 1);
1736                                 dstream<<"WARNING: Server: MEET_OTHER not implemented"
1737                                                 <<std::endl;
1738                         }
1739                         else
1740                         {
1741                                 prof.add("unknown", 1);
1742                                 dstream<<"WARNING: Server: Unknown MapEditEvent "
1743                                                 <<((u32)event->type)<<std::endl;
1744                         }
1745                         
1746                         /*
1747                                 Set blocks not sent to far players
1748                         */
1749                         if(far_players.size() > 0)
1750                         {
1751                                 // Convert list format to that wanted by SetBlocksNotSent
1752                                 core::map<v3s16, MapBlock*> modified_blocks2;
1753                                 for(core::map<v3s16, bool>::Iterator
1754                                                 i = event->modified_blocks.getIterator();
1755                                                 i.atEnd()==false; i++)
1756                                 {
1757                                         v3s16 p = i.getNode()->getKey();
1758                                         modified_blocks2.insert(p,
1759                                                         m_env.getMap().getBlockNoCreateNoEx(p));
1760                                 }
1761                                 // Set blocks not sent
1762                                 for(core::list<u16>::Iterator
1763                                                 i = far_players.begin();
1764                                                 i != far_players.end(); i++)
1765                                 {
1766                                         u16 peer_id = *i;
1767                                         RemoteClient *client = getClient(peer_id);
1768                                         if(client==NULL)
1769                                                 continue;
1770                                         client->SetBlocksNotSent(modified_blocks2);
1771                                 }
1772                         }
1773
1774                         delete event;
1775
1776                         /*// Don't send too many at a time
1777                         count++;
1778                         if(count >= 1 && m_unsent_map_edit_queue.size() < 100)
1779                                 break;*/
1780                 }
1781
1782                 if(got_any_events)
1783                 {
1784                         dstream<<"Server: MapEditEvents:"<<std::endl;
1785                         prof.print(dstream);
1786                 }
1787                 
1788         }
1789
1790         /*
1791                 Send object positions
1792                 TODO: Get rid of MapBlockObjects
1793         */
1794         {
1795                 float &counter = m_objectdata_timer;
1796                 counter += dtime;
1797                 if(counter >= g_settings.getFloat("objectdata_interval"))
1798                 {
1799                         JMutexAutoLock lock1(m_env_mutex);
1800                         JMutexAutoLock lock2(m_con_mutex);
1801
1802                         ScopeProfiler sp(&g_profiler, "Server: sending mbo positions");
1803
1804                         SendObjectData(counter);
1805
1806                         counter = 0.0;
1807                 }
1808         }
1809         
1810         /*
1811                 Trigger emergethread (it somehow gets to a non-triggered but
1812                 bysy state sometimes)
1813         */
1814         {
1815                 float &counter = m_emergethread_trigger_timer;
1816                 counter += dtime;
1817                 if(counter >= 2.0)
1818                 {
1819                         counter = 0.0;
1820                         
1821                         m_emergethread.trigger();
1822                 }
1823         }
1824
1825         // Save map, players and auth stuff
1826         {
1827                 float &counter = m_savemap_timer;
1828                 counter += dtime;
1829                 if(counter >= g_settings.getFloat("server_map_save_interval"))
1830                 {
1831                         counter = 0.0;
1832
1833                         ScopeProfiler sp(&g_profiler, "Server: saving stuff");
1834
1835                         // Auth stuff
1836                         if(m_authmanager.isModified())
1837                                 m_authmanager.save();
1838                         
1839                         // Map
1840                         JMutexAutoLock lock(m_env_mutex);
1841
1842                         /*// Unload unused data (delete from memory)
1843                         m_env.getMap().unloadUnusedData(
1844                                         g_settings.getFloat("server_unload_unused_sectors_timeout"));
1845                                         */
1846                         /*u32 deleted_count = m_env.getMap().unloadUnusedData(
1847                                         g_settings.getFloat("server_unload_unused_sectors_timeout"));
1848                                         */
1849
1850                         // Save only changed parts
1851                         m_env.getMap().save(true);
1852
1853                         /*if(deleted_count > 0)
1854                         {
1855                                 dout_server<<"Server: Unloaded "<<deleted_count
1856                                                 <<" blocks from memory"<<std::endl;
1857                         }*/
1858
1859                         // Save players
1860                         m_env.serializePlayers(m_mapsavedir);
1861                         
1862                         // Save environment metadata
1863                         m_env.saveMeta(m_mapsavedir);
1864                 }
1865         }
1866 }
1867
1868 void Server::Receive()
1869 {
1870         DSTACK(__FUNCTION_NAME);
1871         u32 data_maxsize = 10000;
1872         Buffer<u8> data(data_maxsize);
1873         u16 peer_id;
1874         u32 datasize;
1875         try{
1876                 {
1877                         JMutexAutoLock conlock(m_con_mutex);
1878                         datasize = m_con.Receive(peer_id, *data, data_maxsize);
1879                 }
1880
1881                 // This has to be called so that the client list gets synced
1882                 // with the peer list of the connection
1883                 handlePeerChanges();
1884
1885                 ProcessData(*data, datasize, peer_id);
1886         }
1887         catch(con::InvalidIncomingDataException &e)
1888         {
1889                 derr_server<<"Server::Receive(): "
1890                                 "InvalidIncomingDataException: what()="
1891                                 <<e.what()<<std::endl;
1892         }
1893         catch(con::PeerNotFoundException &e)
1894         {
1895                 //NOTE: This is not needed anymore
1896                 
1897                 // The peer has been disconnected.
1898                 // Find the associated player and remove it.
1899
1900                 /*JMutexAutoLock envlock(m_env_mutex);
1901
1902                 dout_server<<"ServerThread: peer_id="<<peer_id
1903                                 <<" has apparently closed connection. "
1904                                 <<"Removing player."<<std::endl;
1905
1906                 m_env.removePlayer(peer_id);*/
1907         }
1908 }
1909
1910 void Server::ProcessData(u8 *data, u32 datasize, u16 peer_id)
1911 {
1912         DSTACK(__FUNCTION_NAME);
1913         // Environment is locked first.
1914         JMutexAutoLock envlock(m_env_mutex);
1915         JMutexAutoLock conlock(m_con_mutex);
1916         
1917         con::Peer *peer;
1918         try{
1919                 peer = m_con.GetPeer(peer_id);
1920         }
1921         catch(con::PeerNotFoundException &e)
1922         {
1923                 derr_server<<DTIME<<"Server::ProcessData(): Cancelling: peer "
1924                                 <<peer_id<<" not found"<<std::endl;
1925                 return;
1926         }
1927         
1928         u8 peer_ser_ver = getClient(peer->id)->serialization_version;
1929
1930         try
1931         {
1932
1933         if(datasize < 2)
1934                 return;
1935
1936         ToServerCommand command = (ToServerCommand)readU16(&data[0]);
1937         
1938         if(command == TOSERVER_INIT)
1939         {
1940                 // [0] u16 TOSERVER_INIT
1941                 // [2] u8 SER_FMT_VER_HIGHEST
1942                 // [3] u8[20] player_name
1943                 // [23] u8[28] password <--- can be sent without this, from old versions
1944
1945                 if(datasize < 2+1+PLAYERNAME_SIZE)
1946                         return;
1947
1948                 derr_server<<DTIME<<"Server: Got TOSERVER_INIT from "
1949                                 <<peer->id<<std::endl;
1950
1951                 // First byte after command is maximum supported
1952                 // serialization version
1953                 u8 client_max = data[2];
1954                 u8 our_max = SER_FMT_VER_HIGHEST;
1955                 // Use the highest version supported by both
1956                 u8 deployed = core::min_(client_max, our_max);
1957                 // If it's lower than the lowest supported, give up.
1958                 if(deployed < SER_FMT_VER_LOWEST)
1959                         deployed = SER_FMT_VER_INVALID;
1960
1961                 //peer->serialization_version = deployed;
1962                 getClient(peer->id)->pending_serialization_version = deployed;
1963
1964                 if(deployed == SER_FMT_VER_INVALID)
1965                 {
1966                         derr_server<<DTIME<<"Server: Cannot negotiate "
1967                                         "serialization version with peer "
1968                                         <<peer_id<<std::endl;
1969                         return;
1970                 }
1971
1972                 /*
1973                         Set up player
1974                 */
1975                 
1976                 // Get player name
1977                 char playername[PLAYERNAME_SIZE];
1978                 for(u32 i=0; i<PLAYERNAME_SIZE-1; i++)
1979                 {
1980                         playername[i] = data[3+i];
1981                 }
1982                 playername[PLAYERNAME_SIZE-1] = 0;
1983                 
1984                 if(playername[0]=='\0')
1985                 {
1986                         derr_server<<DTIME<<"Server: Player has empty name"<<std::endl;
1987                         SendAccessDenied(m_con, peer_id,
1988                                         L"Empty name");
1989                         return;
1990                 }
1991
1992                 if(string_allowed(playername, PLAYERNAME_ALLOWED_CHARS)==false)
1993                 {
1994                         derr_server<<DTIME<<"Server: Player has invalid name"<<std::endl;
1995                         SendAccessDenied(m_con, peer_id,
1996                                         L"Name contains unallowed characters");
1997                         return;
1998                 }
1999
2000                 // Get password
2001                 char password[PASSWORD_SIZE];
2002                 if(datasize == 2+1+PLAYERNAME_SIZE)
2003                 {
2004                         // old version - assume blank password
2005                         password[0] = 0;
2006                 }
2007                 else
2008                 {
2009                                 for(u32 i=0; i<PASSWORD_SIZE-1; i++)
2010                                 {
2011                                         password[i] = data[23+i];
2012                                 }
2013                                 password[PASSWORD_SIZE-1] = 0;
2014                 }
2015                 
2016                 std::string checkpwd;
2017                 if(m_authmanager.exists(playername))
2018                 {
2019                         checkpwd = m_authmanager.getPassword(playername);
2020                 }
2021                 else
2022                 {
2023                         checkpwd = g_settings.get("default_password");
2024                 }
2025                 
2026                 if(password != checkpwd && checkpwd != "")
2027                 {
2028                         derr_server<<DTIME<<"Server: peer_id="<<peer_id
2029                                         <<": supplied invalid password for "
2030                                         <<playername<<std::endl;
2031                         SendAccessDenied(m_con, peer_id, L"Invalid password");
2032                         return;
2033                 }
2034                 
2035                 // Add player to auth manager
2036                 if(m_authmanager.exists(playername) == false)
2037                 {
2038                         derr_server<<DTIME<<"Server: adding player "<<playername
2039                                         <<" to auth manager"<<std::endl;
2040                         m_authmanager.add(playername);
2041                         m_authmanager.setPassword(playername, checkpwd);
2042                         m_authmanager.setPrivs(playername,
2043                                         stringToPrivs(g_settings.get("default_privs")));
2044                         m_authmanager.save();
2045                 }
2046
2047                 // Get player
2048                 Player *player = emergePlayer(playername, password, peer_id);
2049
2050
2051                 /*{
2052                         // DEBUG: Test serialization
2053                         std::ostringstream test_os;
2054                         player->serialize(test_os);
2055                         dstream<<"Player serialization test: \""<<test_os.str()
2056                                         <<"\""<<std::endl;
2057                         std::istringstream test_is(test_os.str());
2058                         player->deSerialize(test_is);
2059                 }*/
2060
2061                 // If failed, cancel
2062                 if(player == NULL)
2063                 {
2064                         derr_server<<DTIME<<"Server: peer_id="<<peer_id
2065                                         <<": failed to emerge player"<<std::endl;
2066                         return;
2067                 }
2068
2069                 /*
2070                 // If a client is already connected to the player, cancel
2071                 if(player->peer_id != 0)
2072                 {
2073                         derr_server<<DTIME<<"Server: peer_id="<<peer_id
2074                                         <<" tried to connect to "
2075                                         "an already connected player (peer_id="
2076                                         <<player->peer_id<<")"<<std::endl;
2077                         return;
2078                 }
2079                 // Set client of player
2080                 player->peer_id = peer_id;
2081                 */
2082
2083                 // Check if player doesn't exist
2084                 if(player == NULL)
2085                         throw con::InvalidIncomingDataException
2086                                 ("Server::ProcessData(): INIT: Player doesn't exist");
2087
2088                 /*// update name if it was supplied
2089                 if(datasize >= 20+3)
2090                 {
2091                         data[20+3-1] = 0;
2092                         player->updateName((const char*)&data[3]);
2093                 }*/
2094                 
2095                 /*
2096                         Answer with a TOCLIENT_INIT
2097                 */
2098                 {
2099                         SharedBuffer<u8> reply(2+1+6+8);
2100                         writeU16(&reply[0], TOCLIENT_INIT);
2101                         writeU8(&reply[2], deployed);
2102                         writeV3S16(&reply[2+1], floatToInt(player->getPosition()+v3f(0,BS/2,0), BS));
2103                         writeU64(&reply[2+1+6], m_env.getServerMap().getSeed());
2104                         
2105                         // Send as reliable
2106                         m_con.Send(peer_id, 0, reply, true);
2107                 }
2108
2109                 /*
2110                         Send complete position information
2111                 */
2112                 SendMovePlayer(player);
2113
2114                 return;
2115         }
2116
2117         if(command == TOSERVER_INIT2)
2118         {
2119                 derr_server<<DTIME<<"Server: Got TOSERVER_INIT2 from "
2120                                 <<peer->id<<std::endl;
2121
2122
2123                 getClient(peer->id)->serialization_version
2124                                 = getClient(peer->id)->pending_serialization_version;
2125
2126                 /*
2127                         Send some initialization data
2128                 */
2129                 
2130                 // Send player info to all players
2131                 SendPlayerInfos();
2132
2133                 // Send inventory to player
2134                 UpdateCrafting(peer->id);
2135                 SendInventory(peer->id);
2136
2137                 // Send HP
2138                 {
2139                         Player *player = m_env.getPlayer(peer_id);
2140                         SendPlayerHP(player);
2141                 }
2142                 
2143                 // Send time of day
2144                 {
2145                         SharedBuffer<u8> data = makePacket_TOCLIENT_TIME_OF_DAY(
2146                                         m_env.getTimeOfDay());
2147                         m_con.Send(peer->id, 0, data, true);
2148                 }
2149                 
2150                 // Send information about server to player in chat
2151                 SendChatMessage(peer_id, getStatusString());
2152                 
2153                 // Send information about joining in chat
2154                 {
2155                         std::wstring name = L"unknown";
2156                         Player *player = m_env.getPlayer(peer_id);
2157                         if(player != NULL)
2158                                 name = narrow_to_wide(player->getName());
2159                         
2160                         std::wstring message;
2161                         message += L"*** ";
2162                         message += name;
2163                         message += L" joined game";
2164                         BroadcastChatMessage(message);
2165                 }
2166
2167                 return;
2168         }
2169
2170         if(peer_ser_ver == SER_FMT_VER_INVALID)
2171         {
2172                 derr_server<<DTIME<<"Server::ProcessData(): Cancelling: Peer"
2173                                 " serialization format invalid or not initialized."
2174                                 " Skipping incoming command="<<command<<std::endl;
2175                 return;
2176         }
2177         
2178         Player *player = m_env.getPlayer(peer_id);
2179
2180         if(player == NULL){
2181                 derr_server<<"Server::ProcessData(): Cancelling: "
2182                                 "No player for peer_id="<<peer_id
2183                                 <<std::endl;
2184                 return;
2185         }
2186         if(command == TOSERVER_PLAYERPOS)
2187         {
2188                 if(datasize < 2+12+12+4+4)
2189                         return;
2190         
2191                 u32 start = 0;
2192                 v3s32 ps = readV3S32(&data[start+2]);
2193                 v3s32 ss = readV3S32(&data[start+2+12]);
2194                 f32 pitch = (f32)readS32(&data[2+12+12]) / 100.0;
2195                 f32 yaw = (f32)readS32(&data[2+12+12+4]) / 100.0;
2196                 v3f position((f32)ps.X/100., (f32)ps.Y/100., (f32)ps.Z/100.);
2197                 v3f speed((f32)ss.X/100., (f32)ss.Y/100., (f32)ss.Z/100.);
2198                 pitch = wrapDegrees(pitch);
2199                 yaw = wrapDegrees(yaw);
2200                 player->setPosition(position);
2201                 player->setSpeed(speed);
2202                 player->setPitch(pitch);
2203                 player->setYaw(yaw);
2204                 
2205                 /*dout_server<<"Server::ProcessData(): Moved player "<<peer_id<<" to "
2206                                 <<"("<<position.X<<","<<position.Y<<","<<position.Z<<")"
2207                                 <<" pitch="<<pitch<<" yaw="<<yaw<<std::endl;*/
2208         }
2209         else if(command == TOSERVER_GOTBLOCKS)
2210         {
2211                 if(datasize < 2+1)
2212                         return;
2213                 
2214                 /*
2215                         [0] u16 command
2216                         [2] u8 count
2217                         [3] v3s16 pos_0
2218                         [3+6] v3s16 pos_1
2219                         ...
2220                 */
2221
2222                 u16 count = data[2];
2223                 for(u16 i=0; i<count; i++)
2224                 {
2225                         if((s16)datasize < 2+1+(i+1)*6)
2226                                 throw con::InvalidIncomingDataException
2227                                         ("GOTBLOCKS length is too short");
2228                         v3s16 p = readV3S16(&data[2+1+i*6]);
2229                         /*dstream<<"Server: GOTBLOCKS ("
2230                                         <<p.X<<","<<p.Y<<","<<p.Z<<")"<<std::endl;*/
2231                         RemoteClient *client = getClient(peer_id);
2232                         client->GotBlock(p);
2233                 }
2234         }
2235         else if(command == TOSERVER_DELETEDBLOCKS)
2236         {
2237                 if(datasize < 2+1)
2238                         return;
2239                 
2240                 /*
2241                         [0] u16 command
2242                         [2] u8 count
2243                         [3] v3s16 pos_0
2244                         [3+6] v3s16 pos_1
2245                         ...
2246                 */
2247
2248                 u16 count = data[2];
2249                 for(u16 i=0; i<count; i++)
2250                 {
2251                         if((s16)datasize < 2+1+(i+1)*6)
2252                                 throw con::InvalidIncomingDataException
2253                                         ("DELETEDBLOCKS length is too short");
2254                         v3s16 p = readV3S16(&data[2+1+i*6]);
2255                         /*dstream<<"Server: DELETEDBLOCKS ("
2256                                         <<p.X<<","<<p.Y<<","<<p.Z<<")"<<std::endl;*/
2257                         RemoteClient *client = getClient(peer_id);
2258                         client->SetBlockNotSent(p);
2259                 }
2260         }
2261         else if(command == TOSERVER_CLICK_OBJECT)
2262         {
2263                 if(datasize < 13)
2264                         return;
2265
2266                 if((getPlayerPrivs(player) & PRIV_BUILD) == 0)
2267                         return;
2268
2269                 /*
2270                         [0] u16 command
2271                         [2] u8 button (0=left, 1=right)
2272                         [3] v3s16 block
2273                         [9] s16 id
2274                         [11] u16 item
2275                 */
2276                 u8 button = readU8(&data[2]);
2277                 v3s16 p;
2278                 p.X = readS16(&data[3]);
2279                 p.Y = readS16(&data[5]);
2280                 p.Z = readS16(&data[7]);
2281                 s16 id = readS16(&data[9]);
2282                 //u16 item_i = readU16(&data[11]);
2283
2284                 MapBlock *block = NULL;
2285                 try
2286                 {
2287                         block = m_env.getMap().getBlockNoCreate(p);
2288                 }
2289                 catch(InvalidPositionException &e)
2290                 {
2291                         derr_server<<"CLICK_OBJECT block not found"<<std::endl;
2292                         return;
2293                 }
2294
2295                 MapBlockObject *obj = block->getObject(id);
2296
2297                 if(obj == NULL)
2298                 {
2299                         derr_server<<"CLICK_OBJECT object not found"<<std::endl;
2300                         return;
2301                 }
2302
2303                 //TODO: Check that object is reasonably close
2304                 
2305                 // Left click
2306                 if(button == 0)
2307                 {
2308                         InventoryList *ilist = player->inventory.getList("main");
2309                         if(g_settings.getBool("creative_mode") == false && ilist != NULL)
2310                         {
2311                         
2312                                 // Skip if inventory has no free space
2313                                 if(ilist->getUsedSlots() == ilist->getSize())
2314                                 {
2315                                         dout_server<<"Player inventory has no free space"<<std::endl;
2316                                         return;
2317                                 }
2318                                 
2319                                 /*
2320                                         Create the inventory item
2321                                 */
2322                                 InventoryItem *item = NULL;
2323                                 // If it is an item-object, take the item from it
2324                                 if(obj->getTypeId() == MAPBLOCKOBJECT_TYPE_ITEM)
2325                                 {
2326                                         item = ((ItemObject*)obj)->createInventoryItem();
2327                                 }
2328                                 // Else create an item of the object
2329                                 else
2330                                 {
2331                                         item = new MapBlockObjectItem
2332                                                         (obj->getInventoryString());
2333                                 }
2334                                 
2335                                 // Add to inventory and send inventory
2336                                 ilist->addItem(item);
2337                                 UpdateCrafting(player->peer_id);
2338                                 SendInventory(player->peer_id);
2339                         }
2340
2341                         // Remove from block
2342                         block->removeObject(id);
2343                 }
2344         }
2345         else if(command == TOSERVER_CLICK_ACTIVEOBJECT)
2346         {
2347                 if(datasize < 7)
2348                         return;
2349
2350                 if((getPlayerPrivs(player) & PRIV_BUILD) == 0)
2351                         return;
2352
2353                 /*
2354                         length: 7
2355                         [0] u16 command
2356                         [2] u8 button (0=left, 1=right)
2357                         [3] u16 id
2358                         [5] u16 item
2359                 */
2360                 u8 button = readU8(&data[2]);
2361                 u16 id = readS16(&data[3]);
2362                 u16 item_i = readU16(&data[11]);
2363         
2364                 ServerActiveObject *obj = m_env.getActiveObject(id);
2365
2366                 if(obj == NULL)
2367                 {
2368                         derr_server<<"Server: CLICK_ACTIVEOBJECT: object not found"
2369                                         <<std::endl;
2370                         return;
2371                 }
2372
2373                 // Skip if object has been removed
2374                 if(obj->m_removed)
2375                         return;
2376                 
2377                 //TODO: Check that object is reasonably close
2378                 
2379                 // Left click, pick object up (usually)
2380                 if(button == 0)
2381                 {
2382                         /*
2383                                 Try creating inventory item
2384                         */
2385                         InventoryItem *item = obj->createPickedUpItem();
2386                         
2387                         if(item)
2388                         {
2389                                 InventoryList *ilist = player->inventory.getList("main");
2390                                 if(ilist != NULL)
2391                                 {
2392                                         if(g_settings.getBool("creative_mode") == false)
2393                                         {
2394                                                 // Skip if inventory has no free space
2395                                                 if(ilist->getUsedSlots() == ilist->getSize())
2396                                                 {
2397                                                         dout_server<<"Player inventory has no free space"<<std::endl;
2398                                                         return;
2399                                                 }
2400
2401                                                 // Add to inventory and send inventory
2402                                                 ilist->addItem(item);
2403                                                 UpdateCrafting(player->peer_id);
2404                                                 SendInventory(player->peer_id);
2405                                         }
2406
2407                                         // Remove object from environment
2408                                         obj->m_removed = true;
2409                                 }
2410                         }
2411                         else
2412                         {
2413                                 /*
2414                                         Item cannot be picked up. Punch it instead.
2415                                 */
2416
2417                                 ToolItem *titem = NULL;
2418                                 std::string toolname = "";
2419
2420                                 InventoryList *mlist = player->inventory.getList("main");
2421                                 if(mlist != NULL)
2422                                 {
2423                                         InventoryItem *item = mlist->getItem(item_i);
2424                                         if(item && (std::string)item->getName() == "ToolItem")
2425                                         {
2426                                                 titem = (ToolItem*)item;
2427                                                 toolname = titem->getToolName();
2428                                         }
2429                                 }
2430
2431                                 v3f playerpos = player->getPosition();
2432                                 v3f objpos = obj->getBasePosition();
2433                                 v3f dir = (objpos - playerpos).normalize();
2434                                 
2435                                 u16 wear = obj->punch(toolname, dir);
2436                                 
2437                                 if(titem)
2438                                 {
2439                                         bool weared_out = titem->addWear(wear);
2440                                         if(weared_out)
2441                                                 mlist->deleteItem(item_i);
2442                                         SendInventory(player->peer_id);
2443                                 }
2444                         }
2445                 }
2446                 // Right click, do something with object
2447                 if(button == 1)
2448                 {
2449                         // Track hp changes super-crappily
2450                         u16 oldhp = player->hp;
2451                         
2452                         // Do stuff
2453                         obj->rightClick(player);
2454                         
2455                         // Send back stuff
2456                         if(player->hp != oldhp)
2457                         {
2458                                 SendPlayerHP(player);
2459                         }
2460                 }
2461         }
2462         else if(command == TOSERVER_GROUND_ACTION)
2463         {
2464                 if(datasize < 17)
2465                         return;
2466                 /*
2467                         length: 17
2468                         [0] u16 command
2469                         [2] u8 action
2470                         [3] v3s16 nodepos_undersurface
2471                         [9] v3s16 nodepos_abovesurface
2472                         [15] u16 item
2473                         actions:
2474                         0: start digging
2475                         1: place block
2476                         2: stop digging (all parameters ignored)
2477                         3: digging completed
2478                 */
2479                 u8 action = readU8(&data[2]);
2480                 v3s16 p_under;
2481                 p_under.X = readS16(&data[3]);
2482                 p_under.Y = readS16(&data[5]);
2483                 p_under.Z = readS16(&data[7]);
2484                 v3s16 p_over;
2485                 p_over.X = readS16(&data[9]);
2486                 p_over.Y = readS16(&data[11]);
2487                 p_over.Z = readS16(&data[13]);
2488                 u16 item_i = readU16(&data[15]);
2489
2490                 //TODO: Check that target is reasonably close
2491                 
2492                 /*
2493                         0: start digging
2494                 */
2495                 if(action == 0)
2496                 {
2497                         /*
2498                                 NOTE: This can be used in the future to check if
2499                                 somebody is cheating, by checking the timing.
2500                         */
2501                 } // action == 0
2502
2503                 /*
2504                         2: stop digging
2505                 */
2506                 else if(action == 2)
2507                 {
2508 #if 0
2509                         RemoteClient *client = getClient(peer->id);
2510                         JMutexAutoLock digmutex(client->m_dig_mutex);
2511                         client->m_dig_tool_item = -1;
2512 #endif
2513                 }
2514
2515                 /*
2516                         3: Digging completed
2517                 */
2518                 else if(action == 3)
2519                 {
2520                         // Mandatory parameter; actually used for nothing
2521                         core::map<v3s16, MapBlock*> modified_blocks;
2522
2523                         content_t material = CONTENT_IGNORE;
2524                         u8 mineral = MINERAL_NONE;
2525
2526                         bool cannot_remove_node = false;
2527
2528                         try
2529                         {
2530                                 MapNode n = m_env.getMap().getNode(p_under);
2531                                 // Get mineral
2532                                 mineral = n.getMineral();
2533                                 // Get material at position
2534                                 material = n.getContent();
2535                                 // If not yet cancelled
2536                                 if(cannot_remove_node == false)
2537                                 {
2538                                         // If it's not diggable, do nothing
2539                                         if(content_diggable(material) == false)
2540                                         {
2541                                                 derr_server<<"Server: Not finishing digging: "
2542                                                                 <<"Node not diggable"
2543                                                                 <<std::endl;
2544                                                 cannot_remove_node = true;
2545                                         }
2546                                 }
2547                                 // If not yet cancelled
2548                                 if(cannot_remove_node == false)
2549                                 {
2550                                         // Get node metadata
2551                                         NodeMetadata *meta = m_env.getMap().getNodeMetadata(p_under);
2552                                         if(meta && meta->nodeRemovalDisabled() == true)
2553                                         {
2554                                                 derr_server<<"Server: Not finishing digging: "
2555                                                                 <<"Node metadata disables removal"
2556                                                                 <<std::endl;
2557                                                 cannot_remove_node = true;
2558                                         }
2559                                 }
2560                         }
2561                         catch(InvalidPositionException &e)
2562                         {
2563                                 derr_server<<"Server: Not finishing digging: Node not found."
2564                                                 <<" Adding block to emerge queue."
2565                                                 <<std::endl;
2566                                 m_emerge_queue.addBlock(peer_id,
2567                                                 getNodeBlockPos(p_over), BLOCK_EMERGE_FLAG_FROMDISK);
2568                                 cannot_remove_node = true;
2569                         }
2570
2571                         // Make sure the player is allowed to do it
2572                         if((getPlayerPrivs(player) & PRIV_BUILD) == 0)
2573                         {
2574                                 dstream<<"Player "<<player->getName()<<" cannot remove node"
2575                                                 <<" because privileges are "<<getPlayerPrivs(player)
2576                                                 <<std::endl;
2577                                 cannot_remove_node = true;
2578                         }
2579
2580                         /*
2581                                 If node can't be removed, set block to be re-sent to
2582                                 client and quit.
2583                         */
2584                         if(cannot_remove_node)
2585                         {
2586                                 derr_server<<"Server: Not finishing digging."<<std::endl;
2587
2588                                 // Client probably has wrong data.
2589                                 // Set block not sent, so that client will get
2590                                 // a valid one.
2591                                 dstream<<"Client "<<peer_id<<" tried to dig "
2592                                                 <<"node; but node cannot be removed."
2593                                                 <<" setting MapBlock not sent."<<std::endl;
2594                                 RemoteClient *client = getClient(peer_id);
2595                                 v3s16 blockpos = getNodeBlockPos(p_under);
2596                                 client->SetBlockNotSent(blockpos);
2597                                         
2598                                 return;
2599                         }
2600                         
2601                         /*
2602                                 Send the removal to all close-by players.
2603                                 - If other player is close, send REMOVENODE
2604                                 - Otherwise set blocks not sent
2605                         */
2606                         core::list<u16> far_players;
2607                         sendRemoveNode(p_under, peer_id, &far_players, 30);
2608                         
2609                         /*
2610                                 Update and send inventory
2611                         */
2612
2613                         if(g_settings.getBool("creative_mode") == false)
2614                         {
2615                                 /*
2616                                         Wear out tool
2617                                 */
2618                                 InventoryList *mlist = player->inventory.getList("main");
2619                                 if(mlist != NULL)
2620                                 {
2621                                         InventoryItem *item = mlist->getItem(item_i);
2622                                         if(item && (std::string)item->getName() == "ToolItem")
2623                                         {
2624                                                 ToolItem *titem = (ToolItem*)item;
2625                                                 std::string toolname = titem->getToolName();
2626
2627                                                 // Get digging properties for material and tool
2628                                                 DiggingProperties prop =
2629                                                                 getDiggingProperties(material, toolname);
2630
2631                                                 if(prop.diggable == false)
2632                                                 {
2633                                                         derr_server<<"Server: WARNING: Player digged"
2634                                                                         <<" with impossible material + tool"
2635                                                                         <<" combination"<<std::endl;
2636                                                 }
2637                                                 
2638                                                 bool weared_out = titem->addWear(prop.wear);
2639
2640                                                 if(weared_out)
2641                                                 {
2642                                                         mlist->deleteItem(item_i);
2643                                                 }
2644                                         }
2645                                 }
2646
2647                                 /*
2648                                         Add dug item to inventory
2649                                 */
2650
2651                                 InventoryItem *item = NULL;
2652
2653                                 if(mineral != MINERAL_NONE)
2654                                         item = getDiggedMineralItem(mineral);
2655                                 
2656                                 // If not mineral
2657                                 if(item == NULL)
2658                                 {
2659                                         std::string &dug_s = content_features(material).dug_item;
2660                                         if(dug_s != "")
2661                                         {
2662                                                 std::istringstream is(dug_s, std::ios::binary);
2663                                                 item = InventoryItem::deSerialize(is);
2664                                         }
2665                                 }
2666                                 
2667                                 if(item != NULL)
2668                                 {
2669                                         // Add a item to inventory
2670                                         player->inventory.addItem("main", item);
2671
2672                                         // Send inventory
2673                                         UpdateCrafting(player->peer_id);
2674                                         SendInventory(player->peer_id);
2675                                 }
2676                         }
2677
2678                         /*
2679                                 Remove the node
2680                                 (this takes some time so it is done after the quick stuff)
2681                         */
2682                         {
2683                                 MapEditEventIgnorer ign(&m_ignore_map_edit_events);
2684
2685                                 m_env.getMap().removeNodeAndUpdate(p_under, modified_blocks);
2686                         }
2687                         /*
2688                                 Set blocks not sent to far players
2689                         */
2690                         for(core::list<u16>::Iterator
2691                                         i = far_players.begin();
2692                                         i != far_players.end(); i++)
2693                         {
2694                                 u16 peer_id = *i;
2695                                 RemoteClient *client = getClient(peer_id);
2696                                 if(client==NULL)
2697                                         continue;
2698                                 client->SetBlocksNotSent(modified_blocks);
2699                         }
2700                 }
2701                 
2702                 /*
2703                         1: place block
2704                 */
2705                 else if(action == 1)
2706                 {
2707
2708                         InventoryList *ilist = player->inventory.getList("main");
2709                         if(ilist == NULL)
2710                                 return;
2711
2712                         // Get item
2713                         InventoryItem *item = ilist->getItem(item_i);
2714                         
2715                         // If there is no item, it is not possible to add it anywhere
2716                         if(item == NULL)
2717                                 return;
2718                         
2719                         /*
2720                                 Handle material items
2721                         */
2722                         if(std::string("MaterialItem") == item->getName())
2723                         {
2724                                 try{
2725                                         // Don't add a node if this is not a free space
2726                                         MapNode n2 = m_env.getMap().getNode(p_over);
2727                                         bool no_enough_privs =
2728                                                         ((getPlayerPrivs(player) & PRIV_BUILD)==0);
2729                                         if(no_enough_privs)
2730                                                 dstream<<"Player "<<player->getName()<<" cannot add node"
2731                                                         <<" because privileges are "<<getPlayerPrivs(player)
2732                                                         <<std::endl;
2733
2734                                         if(content_features(n2).buildable_to == false
2735                                                 || no_enough_privs)
2736                                         {
2737                                                 // Client probably has wrong data.
2738                                                 // Set block not sent, so that client will get
2739                                                 // a valid one.
2740                                                 dstream<<"Client "<<peer_id<<" tried to place"
2741                                                                 <<" node in invalid position; setting"
2742                                                                 <<" MapBlock not sent."<<std::endl;
2743                                                 RemoteClient *client = getClient(peer_id);
2744                                                 v3s16 blockpos = getNodeBlockPos(p_over);
2745                                                 client->SetBlockNotSent(blockpos);
2746                                                 return;
2747                                         }
2748                                 }
2749                                 catch(InvalidPositionException &e)
2750                                 {
2751                                         derr_server<<"Server: Ignoring ADDNODE: Node not found"
2752                                                         <<" Adding block to emerge queue."
2753                                                         <<std::endl;
2754                                         m_emerge_queue.addBlock(peer_id,
2755                                                         getNodeBlockPos(p_over), BLOCK_EMERGE_FLAG_FROMDISK);
2756                                         return;
2757                                 }
2758
2759                                 // Reset build time counter
2760                                 getClient(peer->id)->m_time_from_building = 0.0;
2761                                 
2762                                 // Create node data
2763                                 MaterialItem *mitem = (MaterialItem*)item;
2764                                 MapNode n;
2765                                 n.setContent(mitem->getMaterial());
2766
2767                                 // Calculate direction for wall mounted stuff
2768                                 if(content_features(n).wall_mounted)
2769                                         n.param2 = packDir(p_under - p_over);
2770
2771                                 // Calculate the direction for furnaces and chests and stuff
2772                                 if(content_features(n).param_type == CPT_FACEDIR_SIMPLE)
2773                                 {
2774                                         v3f playerpos = player->getPosition();
2775                                         v3f blockpos = intToFloat(p_over, BS) - playerpos;
2776                                         blockpos = blockpos.normalize();
2777                                         n.param1 = 0;
2778                                         if (fabs(blockpos.X) > fabs(blockpos.Z)) {
2779                                                 if (blockpos.X < 0)
2780                                                         n.param1 = 3;
2781                                                 else
2782                                                         n.param1 = 1;
2783                                         } else {
2784                                                 if (blockpos.Z < 0)
2785                                                         n.param1 = 2;
2786                                                 else
2787                                                         n.param1 = 0;
2788                                         }
2789                                 }
2790
2791                                 /*
2792                                         Send to all close-by players
2793                                 */
2794                                 core::list<u16> far_players;
2795                                 sendAddNode(p_over, n, 0, &far_players, 30);
2796                                 
2797                                 /*
2798                                         Handle inventory
2799                                 */
2800                                 InventoryList *ilist = player->inventory.getList("main");
2801                                 if(g_settings.getBool("creative_mode") == false && ilist)
2802                                 {
2803                                         // Remove from inventory and send inventory
2804                                         if(mitem->getCount() == 1)
2805                                                 ilist->deleteItem(item_i);
2806                                         else
2807                                                 mitem->remove(1);
2808                                         // Send inventory
2809                                         UpdateCrafting(peer_id);
2810                                         SendInventory(peer_id);
2811                                 }
2812                                 
2813                                 /*
2814                                         Add node.
2815
2816                                         This takes some time so it is done after the quick stuff
2817                                 */
2818                                 core::map<v3s16, MapBlock*> modified_blocks;
2819                                 {
2820                                         MapEditEventIgnorer ign(&m_ignore_map_edit_events);
2821
2822                                         m_env.getMap().addNodeAndUpdate(p_over, n, modified_blocks);
2823                                 }
2824                                 /*
2825                                         Set blocks not sent to far players
2826                                 */
2827                                 for(core::list<u16>::Iterator
2828                                                 i = far_players.begin();
2829                                                 i != far_players.end(); i++)
2830                                 {
2831                                         u16 peer_id = *i;
2832                                         RemoteClient *client = getClient(peer_id);
2833                                         if(client==NULL)
2834                                                 continue;
2835                                         client->SetBlocksNotSent(modified_blocks);
2836                                 }
2837
2838                                 /*
2839                                         Calculate special events
2840                                 */
2841                                 
2842                                 /*if(n.d == CONTENT_MESE)
2843                                 {
2844                                         u32 count = 0;
2845                                         for(s16 z=-1; z<=1; z++)
2846                                         for(s16 y=-1; y<=1; y++)
2847                                         for(s16 x=-1; x<=1; x++)
2848                                         {
2849                                                 
2850                                         }
2851                                 }*/
2852                         }
2853                         /*
2854                                 Place other item (not a block)
2855                         */
2856                         else
2857                         {
2858                                 v3s16 blockpos = getNodeBlockPos(p_over);
2859                                 
2860                                 /*
2861                                         Check that the block is loaded so that the item
2862                                         can properly be added to the static list too
2863                                 */
2864                                 MapBlock *block = m_env.getMap().getBlockNoCreateNoEx(blockpos);
2865                                 if(block==NULL)
2866                                 {
2867                                         derr_server<<"Error while placing object: "
2868                                                         "block not found"<<std::endl;
2869                                         return;
2870                                 }
2871
2872                                 dout_server<<"Placing a miscellaneous item on map"
2873                                                 <<std::endl;
2874                                 
2875                                 // Calculate a position for it
2876                                 v3f pos = intToFloat(p_over, BS);
2877                                 //pos.Y -= BS*0.45;
2878                                 pos.Y -= BS*0.25; // let it drop a bit
2879                                 // Randomize a bit
2880                                 pos.X += BS*0.2*(float)myrand_range(-1000,1000)/1000.0;
2881                                 pos.Z += BS*0.2*(float)myrand_range(-1000,1000)/1000.0;
2882
2883                                 /*
2884                                         Create the object
2885                                 */
2886                                 ServerActiveObject *obj = item->createSAO(&m_env, 0, pos);
2887
2888                                 if(obj == NULL)
2889                                 {
2890                                         derr_server<<"WARNING: item resulted in NULL object, "
2891                                                         <<"not placing onto map"
2892                                                         <<std::endl;
2893                                 }
2894                                 else
2895                                 {
2896                                         // Add the object to the environment
2897                                         m_env.addActiveObject(obj);
2898                                         
2899                                         dout_server<<"Placed object"<<std::endl;
2900
2901                                         if(g_settings.getBool("creative_mode") == false)
2902                                         {
2903                                                 // Delete the right amount of items from the slot
2904                                                 u16 dropcount = item->getDropCount();
2905                                                 
2906                                                 // Delete item if all gone
2907                                                 if(item->getCount() <= dropcount)
2908                                                 {
2909                                                         if(item->getCount() < dropcount)
2910                                                                 dstream<<"WARNING: Server: dropped more items"
2911                                                                                 <<" than the slot contains"<<std::endl;
2912                                                         
2913                                                         InventoryList *ilist = player->inventory.getList("main");
2914                                                         if(ilist)
2915                                                                 // Remove from inventory and send inventory
2916                                                                 ilist->deleteItem(item_i);
2917                                                 }
2918                                                 // Else decrement it
2919                                                 else
2920                                                         item->remove(dropcount);
2921                                                 
2922                                                 // Send inventory
2923                                                 UpdateCrafting(peer_id);
2924                                                 SendInventory(peer_id);
2925                                         }
2926                                 }
2927                         }
2928
2929                 } // action == 1
2930
2931                 /*
2932                         Catch invalid actions
2933                 */
2934                 else
2935                 {
2936                         derr_server<<"WARNING: Server: Invalid action "
2937                                         <<action<<std::endl;
2938                 }
2939         }
2940 #if 0
2941         else if(command == TOSERVER_RELEASE)
2942         {
2943                 if(datasize < 3)
2944                         return;
2945                 /*
2946                         length: 3
2947                         [0] u16 command
2948                         [2] u8 button
2949                 */
2950                 dstream<<"TOSERVER_RELEASE ignored"<<std::endl;
2951         }
2952 #endif
2953         else if(command == TOSERVER_SIGNTEXT)
2954         {
2955                 if((getPlayerPrivs(player) & PRIV_BUILD) == 0)
2956                         return;
2957                 /*
2958                         u16 command
2959                         v3s16 blockpos
2960                         s16 id
2961                         u16 textlen
2962                         textdata
2963                 */
2964                 std::string datastring((char*)&data[2], datasize-2);
2965                 std::istringstream is(datastring, std::ios_base::binary);
2966                 u8 buf[6];
2967                 // Read stuff
2968                 is.read((char*)buf, 6);
2969                 v3s16 blockpos = readV3S16(buf);
2970                 is.read((char*)buf, 2);
2971                 s16 id = readS16(buf);
2972                 is.read((char*)buf, 2);
2973                 u16 textlen = readU16(buf);
2974                 std::string text;
2975                 for(u16 i=0; i<textlen; i++)
2976                 {
2977                         is.read((char*)buf, 1);
2978                         text += (char)buf[0];
2979                 }
2980
2981                 MapBlock *block = NULL;
2982                 try
2983                 {
2984                         block = m_env.getMap().getBlockNoCreate(blockpos);
2985                 }
2986                 catch(InvalidPositionException &e)
2987                 {
2988                         derr_server<<"Error while setting sign text: "
2989                                         "block not found"<<std::endl;
2990                         return;
2991                 }
2992
2993                 MapBlockObject *obj = block->getObject(id);
2994                 if(obj == NULL)
2995                 {
2996                         derr_server<<"Error while setting sign text: "
2997                                         "object not found"<<std::endl;
2998                         return;
2999                 }
3000                 
3001                 if(obj->getTypeId() != MAPBLOCKOBJECT_TYPE_SIGN)
3002                 {
3003                         derr_server<<"Error while setting sign text: "
3004                                         "object is not a sign"<<std::endl;
3005                         return;
3006                 }
3007
3008                 ((SignObject*)obj)->setText(text);
3009
3010                 obj->getBlock()->setChangedFlag();
3011         }
3012         else if(command == TOSERVER_SIGNNODETEXT)
3013         {
3014                 if((getPlayerPrivs(player) & PRIV_BUILD) == 0)
3015                         return;
3016                 /*
3017                         u16 command
3018                         v3s16 p
3019                         u16 textlen
3020                         textdata
3021                 */
3022                 std::string datastring((char*)&data[2], datasize-2);
3023                 std::istringstream is(datastring, std::ios_base::binary);
3024                 u8 buf[6];
3025                 // Read stuff
3026                 is.read((char*)buf, 6);
3027                 v3s16 p = readV3S16(buf);
3028                 is.read((char*)buf, 2);
3029                 u16 textlen = readU16(buf);
3030                 std::string text;
3031                 for(u16 i=0; i<textlen; i++)
3032                 {
3033                         is.read((char*)buf, 1);
3034                         text += (char)buf[0];
3035                 }
3036
3037                 NodeMetadata *meta = m_env.getMap().getNodeMetadata(p);
3038                 if(!meta)
3039                         return;
3040                 if(meta->typeId() != CONTENT_SIGN_WALL)
3041                         return;
3042                 SignNodeMetadata *signmeta = (SignNodeMetadata*)meta;
3043                 signmeta->setText(text);
3044                 
3045                 v3s16 blockpos = getNodeBlockPos(p);
3046                 MapBlock *block = m_env.getMap().getBlockNoCreateNoEx(blockpos);
3047                 if(block)
3048                 {
3049                         block->setChangedFlag();
3050                 }
3051
3052                 for(core::map<u16, RemoteClient*>::Iterator
3053                         i = m_clients.getIterator();
3054                         i.atEnd()==false; i++)
3055                 {
3056                         RemoteClient *client = i.getNode()->getValue();
3057                         client->SetBlockNotSent(blockpos);
3058                 }
3059         }
3060         else if(command == TOSERVER_INVENTORY_ACTION)
3061         {
3062                 /*// Ignore inventory changes if in creative mode
3063                 if(g_settings.getBool("creative_mode") == true)
3064                 {
3065                         dstream<<"TOSERVER_INVENTORY_ACTION: ignoring in creative mode"
3066                                         <<std::endl;
3067                         return;
3068                 }*/
3069                 // Strip command and create a stream
3070                 std::string datastring((char*)&data[2], datasize-2);
3071                 dstream<<"TOSERVER_INVENTORY_ACTION: data="<<datastring<<std::endl;
3072                 std::istringstream is(datastring, std::ios_base::binary);
3073                 // Create an action
3074                 InventoryAction *a = InventoryAction::deSerialize(is);
3075                 if(a != NULL)
3076                 {
3077                         // Create context
3078                         InventoryContext c;
3079                         c.current_player = player;
3080
3081                         /*
3082                                 Handle craftresult specially if not in creative mode
3083                         */
3084                         bool disable_action = false;
3085                         if(a->getType() == IACTION_MOVE
3086                                         && g_settings.getBool("creative_mode") == false)
3087                         {
3088                                 IMoveAction *ma = (IMoveAction*)a;
3089                                 if(ma->to_inv == "current_player" &&
3090                                                 ma->from_inv == "current_player")
3091                                 {
3092                                         InventoryList *rlist = player->inventory.getList("craftresult");
3093                                         assert(rlist);
3094                                         InventoryList *clist = player->inventory.getList("craft");
3095                                         assert(clist);
3096                                         InventoryList *mlist = player->inventory.getList("main");
3097                                         assert(mlist);
3098                                         /*
3099                                                 Craftresult is no longer preview if something
3100                                                 is moved into it
3101                                         */
3102                                         if(ma->to_list == "craftresult"
3103                                                         && ma->from_list != "craftresult")
3104                                         {
3105                                                 // If it currently is a preview, remove
3106                                                 // its contents
3107                                                 if(player->craftresult_is_preview)
3108                                                 {
3109                                                         rlist->deleteItem(0);
3110                                                 }
3111                                                 player->craftresult_is_preview = false;
3112                                         }
3113                                         /*
3114                                                 Crafting takes place if this condition is true.
3115                                         */
3116                                         if(player->craftresult_is_preview &&
3117                                                         ma->from_list == "craftresult")
3118                                         {
3119                                                 player->craftresult_is_preview = false;
3120                                                 clist->decrementMaterials(1);
3121                                         }
3122                                         /*
3123                                                 If the craftresult is placed on itself, move it to
3124                                                 main inventory instead of doing the action
3125                                         */
3126                                         if(ma->to_list == "craftresult"
3127                                                         && ma->from_list == "craftresult")
3128                                         {
3129                                                 disable_action = true;
3130                                                 
3131                                                 InventoryItem *item1 = rlist->changeItem(0, NULL);
3132                                                 mlist->addItem(item1);
3133                                         }
3134                                 }
3135                         }
3136                         
3137                         if(disable_action == false)
3138                         {
3139                                 // Feed action to player inventory
3140                                 a->apply(&c, this);
3141                                 // Eat the action
3142                                 delete a;
3143                         }
3144                         else
3145                         {
3146                                 // Send inventory
3147                                 UpdateCrafting(player->peer_id);
3148                                 SendInventory(player->peer_id);
3149                         }
3150                 }
3151                 else
3152                 {
3153                         dstream<<"TOSERVER_INVENTORY_ACTION: "
3154                                         <<"InventoryAction::deSerialize() returned NULL"
3155                                         <<std::endl;
3156                 }
3157         }
3158         else if(command == TOSERVER_CHAT_MESSAGE)
3159         {
3160                 /*
3161                         u16 command
3162                         u16 length
3163                         wstring message
3164                 */
3165                 u8 buf[6];
3166                 std::string datastring((char*)&data[2], datasize-2);
3167                 std::istringstream is(datastring, std::ios_base::binary);
3168                 
3169                 // Read stuff
3170                 is.read((char*)buf, 2);
3171                 u16 len = readU16(buf);
3172                 
3173                 std::wstring message;
3174                 for(u16 i=0; i<len; i++)
3175                 {
3176                         is.read((char*)buf, 2);
3177                         message += (wchar_t)readU16(buf);
3178                 }
3179
3180                 // Get player name of this client
3181                 std::wstring name = narrow_to_wide(player->getName());
3182                 
3183                 // Line to send to players
3184                 std::wstring line;
3185                 // Whether to send to the player that sent the line
3186                 bool send_to_sender = false;
3187                 // Whether to send to other players
3188                 bool send_to_others = false;
3189                 
3190                 // Local player gets all privileges regardless of
3191                 // what's set on their account.
3192                 u64 privs = getPlayerPrivs(player);
3193
3194                 // Parse commands
3195                 std::wstring commandprefix = L"/#";
3196                 if(message.substr(0, commandprefix.size()) == commandprefix)
3197                 {
3198                         line += L"Server: ";
3199
3200                         message = message.substr(commandprefix.size());
3201                         
3202                         WStrfnd f1(message);
3203                         f1.next(L" "); // Skip over /#whatever
3204                         std::wstring paramstring = f1.next(L"");
3205
3206                         ServerCommandContext *ctx = new ServerCommandContext(
3207                                 str_split(message, L' '),
3208                                 paramstring,
3209                                 this,
3210                                 &m_env,
3211                                 player,
3212                                 privs);
3213
3214                         line += processServerCommand(ctx);
3215                         send_to_sender = ctx->flags & 1;
3216                         send_to_others = ctx->flags & 2;
3217                         delete ctx;
3218
3219                 }
3220                 else
3221                 {
3222                         if(privs & PRIV_SHOUT)
3223                         {
3224                                 line += L"<";
3225                                 line += name;
3226                                 line += L"> ";
3227                                 line += message;
3228                                 send_to_others = true;
3229                         }
3230                         else
3231                         {
3232                                 line += L"Server: You are not allowed to shout";
3233                                 send_to_sender = true;
3234                         }
3235                 }
3236                 
3237                 if(line != L"")
3238                 {
3239                         dstream<<"CHAT: "<<wide_to_narrow(line)<<std::endl;
3240
3241                         /*
3242                                 Send the message to clients
3243                         */
3244                         for(core::map<u16, RemoteClient*>::Iterator
3245                                 i = m_clients.getIterator();
3246                                 i.atEnd() == false; i++)
3247                         {
3248                                 // Get client and check that it is valid
3249                                 RemoteClient *client = i.getNode()->getValue();
3250                                 assert(client->peer_id == i.getNode()->getKey());
3251                                 if(client->serialization_version == SER_FMT_VER_INVALID)
3252                                         continue;
3253
3254                                 // Filter recipient
3255                                 bool sender_selected = (peer_id == client->peer_id);
3256                                 if(sender_selected == true && send_to_sender == false)
3257                                         continue;
3258                                 if(sender_selected == false && send_to_others == false)
3259                                         continue;
3260
3261                                 SendChatMessage(client->peer_id, line);
3262                         }
3263                 }
3264         }
3265         else if(command == TOSERVER_DAMAGE)
3266         {
3267                 if(g_settings.getBool("enable_damage"))
3268                 {
3269                         std::string datastring((char*)&data[2], datasize-2);
3270                         std::istringstream is(datastring, std::ios_base::binary);
3271                         u8 damage = readU8(is);
3272                         if(player->hp > damage)
3273                         {
3274                                 player->hp -= damage;
3275                         }
3276                         else
3277                         {
3278                                 player->hp = 0;
3279
3280                                 dstream<<"TODO: Server: TOSERVER_HP_DECREMENT: Player dies"
3281                                                 <<std::endl;
3282                                 
3283                                 v3f pos = findSpawnPos(m_env.getServerMap());
3284                                 player->setPosition(pos);
3285                                 player->hp = 20;
3286                                 SendMovePlayer(player);
3287                                 SendPlayerHP(player);
3288                                 
3289                                 //TODO: Throw items around
3290                         }
3291                 }
3292
3293                 SendPlayerHP(player);
3294         }
3295         else if(command == TOSERVER_PASSWORD)
3296         {
3297                 /*
3298                         [0] u16 TOSERVER_PASSWORD
3299                         [2] u8[28] old password
3300                         [30] u8[28] new password
3301                 */
3302
3303                 if(datasize != 2+PASSWORD_SIZE*2)
3304                         return;
3305                 /*char password[PASSWORD_SIZE];
3306                 for(u32 i=0; i<PASSWORD_SIZE-1; i++)
3307                         password[i] = data[2+i];
3308                 password[PASSWORD_SIZE-1] = 0;*/
3309                 std::string oldpwd;
3310                 for(u32 i=0; i<PASSWORD_SIZE-1; i++)
3311                 {
3312                         char c = data[2+i];
3313                         if(c == 0)
3314                                 break;
3315                         oldpwd += c;
3316                 }
3317                 std::string newpwd;
3318                 for(u32 i=0; i<PASSWORD_SIZE-1; i++)
3319                 {
3320                         char c = data[2+PASSWORD_SIZE+i];
3321                         if(c == 0)
3322                                 break;
3323                         newpwd += c;
3324                 }
3325
3326                 std::string playername = player->getName();
3327
3328                 if(m_authmanager.exists(playername) == false)
3329                 {
3330                         dstream<<"Server: playername not found in authmanager"<<std::endl;
3331                         // Wrong old password supplied!!
3332                         SendChatMessage(peer_id, L"playername not found in authmanager");
3333                         return;
3334                 }
3335
3336                 std::string checkpwd = m_authmanager.getPassword(playername);
3337                 
3338                 if(oldpwd != checkpwd)
3339                 {
3340                         dstream<<"Server: invalid old password"<<std::endl;
3341                         // Wrong old password supplied!!
3342                         SendChatMessage(peer_id, L"Invalid old password supplied. Password NOT changed.");
3343                         return;
3344                 }
3345
3346                 m_authmanager.setPassword(playername, newpwd);
3347                 
3348                 dstream<<"Server: password change successful for "<<playername
3349                                 <<std::endl;
3350                 SendChatMessage(peer_id, L"Password change successful");
3351         }
3352         else
3353         {
3354                 derr_server<<"WARNING: Server::ProcessData(): Ignoring "
3355                                 "unknown command "<<command<<std::endl;
3356         }
3357         
3358         } //try
3359         catch(SendFailedException &e)
3360         {
3361                 derr_server<<"Server::ProcessData(): SendFailedException: "
3362                                 <<"what="<<e.what()
3363                                 <<std::endl;
3364         }
3365 }
3366
3367 void Server::onMapEditEvent(MapEditEvent *event)
3368 {
3369         //dstream<<"Server::onMapEditEvent()"<<std::endl;
3370         if(m_ignore_map_edit_events)
3371                 return;
3372         MapEditEvent *e = event->clone();
3373         m_unsent_map_edit_queue.push_back(e);
3374 }
3375
3376 Inventory* Server::getInventory(InventoryContext *c, std::string id)
3377 {
3378         if(id == "current_player")
3379         {
3380                 assert(c->current_player);
3381                 return &(c->current_player->inventory);
3382         }
3383         
3384         Strfnd fn(id);
3385         std::string id0 = fn.next(":");
3386
3387         if(id0 == "nodemeta")
3388         {
3389                 v3s16 p;
3390                 p.X = stoi(fn.next(","));
3391                 p.Y = stoi(fn.next(","));
3392                 p.Z = stoi(fn.next(","));
3393                 NodeMetadata *meta = m_env.getMap().getNodeMetadata(p);
3394                 if(meta)
3395                         return meta->getInventory();
3396                 dstream<<"nodemeta at ("<<p.X<<","<<p.Y<<","<<p.Z<<"): "
3397                                 <<"no metadata found"<<std::endl;
3398                 return NULL;
3399         }
3400
3401         dstream<<__FUNCTION_NAME<<": unknown id "<<id<<std::endl;
3402         return NULL;
3403 }
3404 void Server::inventoryModified(InventoryContext *c, std::string id)
3405 {
3406         if(id == "current_player")
3407         {
3408                 assert(c->current_player);
3409                 // Send inventory
3410                 UpdateCrafting(c->current_player->peer_id);
3411                 SendInventory(c->current_player->peer_id);
3412                 return;
3413         }
3414         
3415         Strfnd fn(id);
3416         std::string id0 = fn.next(":");
3417
3418         if(id0 == "nodemeta")
3419         {
3420                 v3s16 p;
3421                 p.X = stoi(fn.next(","));
3422                 p.Y = stoi(fn.next(","));
3423                 p.Z = stoi(fn.next(","));
3424                 v3s16 blockpos = getNodeBlockPos(p);
3425
3426                 NodeMetadata *meta = m_env.getMap().getNodeMetadata(p);
3427                 if(meta)
3428                         meta->inventoryModified();
3429
3430                 for(core::map<u16, RemoteClient*>::Iterator
3431                         i = m_clients.getIterator();
3432                         i.atEnd()==false; i++)
3433                 {
3434                         RemoteClient *client = i.getNode()->getValue();
3435                         client->SetBlockNotSent(blockpos);
3436                 }
3437
3438                 return;
3439         }
3440
3441         dstream<<__FUNCTION_NAME<<": unknown id "<<id<<std::endl;
3442 }
3443
3444 core::list<PlayerInfo> Server::getPlayerInfo()
3445 {
3446         DSTACK(__FUNCTION_NAME);
3447         JMutexAutoLock envlock(m_env_mutex);
3448         JMutexAutoLock conlock(m_con_mutex);
3449         
3450         core::list<PlayerInfo> list;
3451
3452         core::list<Player*> players = m_env.getPlayers();
3453         
3454         core::list<Player*>::Iterator i;
3455         for(i = players.begin();
3456                         i != players.end(); i++)
3457         {
3458                 PlayerInfo info;
3459
3460                 Player *player = *i;
3461
3462                 try{
3463                         con::Peer *peer = m_con.GetPeer(player->peer_id);
3464                         // Copy info from peer to info struct
3465                         info.id = peer->id;
3466                         info.address = peer->address;
3467                         info.avg_rtt = peer->avg_rtt;
3468                 }
3469                 catch(con::PeerNotFoundException &e)
3470                 {
3471                         // Set dummy peer info
3472                         info.id = 0;
3473                         info.address = Address(0,0,0,0,0);
3474                         info.avg_rtt = 0.0;
3475                 }
3476
3477                 snprintf(info.name, PLAYERNAME_SIZE, "%s", player->getName());
3478                 info.position = player->getPosition();
3479
3480                 list.push_back(info);
3481         }
3482
3483         return list;
3484 }
3485
3486
3487 void Server::peerAdded(con::Peer *peer)
3488 {
3489         DSTACK(__FUNCTION_NAME);
3490         dout_server<<"Server::peerAdded(): peer->id="
3491                         <<peer->id<<std::endl;
3492         
3493         PeerChange c;
3494         c.type = PEER_ADDED;
3495         c.peer_id = peer->id;
3496         c.timeout = false;
3497         m_peer_change_queue.push_back(c);
3498 }
3499
3500 void Server::deletingPeer(con::Peer *peer, bool timeout)
3501 {
3502         DSTACK(__FUNCTION_NAME);
3503         dout_server<<"Server::deletingPeer(): peer->id="
3504                         <<peer->id<<", timeout="<<timeout<<std::endl;
3505         
3506         PeerChange c;
3507         c.type = PEER_REMOVED;
3508         c.peer_id = peer->id;
3509         c.timeout = timeout;
3510         m_peer_change_queue.push_back(c);
3511 }
3512
3513 /*
3514         Static send methods
3515 */
3516
3517 void Server::SendHP(con::Connection &con, u16 peer_id, u8 hp)
3518 {
3519         DSTACK(__FUNCTION_NAME);
3520         std::ostringstream os(std::ios_base::binary);
3521
3522         writeU16(os, TOCLIENT_HP);
3523         writeU8(os, hp);
3524
3525         // Make data buffer
3526         std::string s = os.str();
3527         SharedBuffer<u8> data((u8*)s.c_str(), s.size());
3528         // Send as reliable
3529         con.Send(peer_id, 0, data, true);
3530 }
3531
3532 void Server::SendAccessDenied(con::Connection &con, u16 peer_id,
3533                 const std::wstring &reason)
3534 {
3535         DSTACK(__FUNCTION_NAME);
3536         std::ostringstream os(std::ios_base::binary);
3537
3538         writeU16(os, TOCLIENT_ACCESS_DENIED);
3539         os<<serializeWideString(reason);
3540
3541         // Make data buffer
3542         std::string s = os.str();
3543         SharedBuffer<u8> data((u8*)s.c_str(), s.size());
3544         // Send as reliable
3545         con.Send(peer_id, 0, data, true);
3546 }
3547
3548 /*
3549         Non-static send methods
3550 */
3551
3552 void Server::SendObjectData(float dtime)
3553 {
3554         DSTACK(__FUNCTION_NAME);
3555
3556         core::map<v3s16, bool> stepped_blocks;
3557         
3558         for(core::map<u16, RemoteClient*>::Iterator
3559                 i = m_clients.getIterator();
3560                 i.atEnd() == false; i++)
3561         {
3562                 u16 peer_id = i.getNode()->getKey();
3563                 RemoteClient *client = i.getNode()->getValue();
3564                 assert(client->peer_id == peer_id);
3565                 
3566                 if(client->serialization_version == SER_FMT_VER_INVALID)
3567                         continue;
3568                 
3569                 client->SendObjectData(this, dtime, stepped_blocks);
3570         }
3571 }
3572
3573 void Server::SendPlayerInfos()
3574 {
3575         DSTACK(__FUNCTION_NAME);
3576
3577         //JMutexAutoLock envlock(m_env_mutex);
3578         
3579         // Get connected players
3580         core::list<Player*> players = m_env.getPlayers(true);
3581         
3582         u32 player_count = players.getSize();
3583         u32 datasize = 2+(2+PLAYERNAME_SIZE)*player_count;
3584
3585         SharedBuffer<u8> data(datasize);
3586         writeU16(&data[0], TOCLIENT_PLAYERINFO);
3587         
3588         u32 start = 2;
3589         core::list<Player*>::Iterator i;
3590         for(i = players.begin();
3591                         i != players.end(); i++)
3592         {
3593                 Player *player = *i;
3594
3595                 /*dstream<<"Server sending player info for player with "
3596                                 "peer_id="<<player->peer_id<<std::endl;*/
3597                 
3598                 writeU16(&data[start], player->peer_id);
3599                 memset((char*)&data[start+2], 0, PLAYERNAME_SIZE);
3600                 snprintf((char*)&data[start+2], PLAYERNAME_SIZE, "%s", player->getName());
3601                 start += 2+PLAYERNAME_SIZE;
3602         }
3603
3604         //JMutexAutoLock conlock(m_con_mutex);
3605
3606         // Send as reliable
3607         m_con.SendToAll(0, data, true);
3608 }
3609
3610 void Server::SendInventory(u16 peer_id)
3611 {
3612         DSTACK(__FUNCTION_NAME);
3613         
3614         Player* player = m_env.getPlayer(peer_id);
3615         assert(player);
3616
3617         /*
3618                 Serialize it
3619         */
3620
3621         std::ostringstream os;
3622         //os.imbue(std::locale("C"));
3623
3624         player->inventory.serialize(os);
3625
3626         std::string s = os.str();
3627         
3628         SharedBuffer<u8> data(s.size()+2);
3629         writeU16(&data[0], TOCLIENT_INVENTORY);
3630         memcpy(&data[2], s.c_str(), s.size());
3631         
3632         // Send as reliable
3633         m_con.Send(peer_id, 0, data, true);
3634 }
3635
3636 void Server::SendChatMessage(u16 peer_id, const std::wstring &message)
3637 {
3638         DSTACK(__FUNCTION_NAME);
3639         
3640         std::ostringstream os(std::ios_base::binary);
3641         u8 buf[12];
3642         
3643         // Write command
3644         writeU16(buf, TOCLIENT_CHAT_MESSAGE);
3645         os.write((char*)buf, 2);
3646         
3647         // Write length
3648         writeU16(buf, message.size());
3649         os.write((char*)buf, 2);
3650         
3651         // Write string
3652         for(u32 i=0; i<message.size(); i++)
3653         {
3654                 u16 w = message[i];
3655                 writeU16(buf, w);
3656                 os.write((char*)buf, 2);
3657         }
3658         
3659         // Make data buffer
3660         std::string s = os.str();
3661         SharedBuffer<u8> data((u8*)s.c_str(), s.size());
3662         // Send as reliable
3663         m_con.Send(peer_id, 0, data, true);
3664 }
3665
3666 void Server::BroadcastChatMessage(const std::wstring &message)
3667 {
3668         for(core::map<u16, RemoteClient*>::Iterator
3669                 i = m_clients.getIterator();
3670                 i.atEnd() == false; i++)
3671         {
3672                 // Get client and check that it is valid
3673                 RemoteClient *client = i.getNode()->getValue();
3674                 assert(client->peer_id == i.getNode()->getKey());
3675                 if(client->serialization_version == SER_FMT_VER_INVALID)
3676                         continue;
3677
3678                 SendChatMessage(client->peer_id, message);
3679         }
3680 }
3681
3682 void Server::SendPlayerHP(Player *player)
3683 {
3684         SendHP(m_con, player->peer_id, player->hp);
3685 }
3686
3687 void Server::SendMovePlayer(Player *player)
3688 {
3689         DSTACK(__FUNCTION_NAME);
3690         std::ostringstream os(std::ios_base::binary);
3691
3692         writeU16(os, TOCLIENT_MOVE_PLAYER);
3693         writeV3F1000(os, player->getPosition());
3694         writeF1000(os, player->getPitch());
3695         writeF1000(os, player->getYaw());
3696         
3697         {
3698                 v3f pos = player->getPosition();
3699                 f32 pitch = player->getPitch();
3700                 f32 yaw = player->getYaw();
3701                 dstream<<"Server sending TOCLIENT_MOVE_PLAYER"
3702                                 <<" pos=("<<pos.X<<","<<pos.Y<<","<<pos.Z<<")"
3703                                 <<" pitch="<<pitch
3704                                 <<" yaw="<<yaw
3705                                 <<std::endl;
3706         }
3707
3708         // Make data buffer
3709         std::string s = os.str();
3710         SharedBuffer<u8> data((u8*)s.c_str(), s.size());
3711         // Send as reliable
3712         m_con.Send(player->peer_id, 0, data, true);
3713 }
3714
3715 void Server::sendRemoveNode(v3s16 p, u16 ignore_id,
3716         core::list<u16> *far_players, float far_d_nodes)
3717 {
3718         float maxd = far_d_nodes*BS;
3719         v3f p_f = intToFloat(p, BS);
3720
3721         // Create packet
3722         u32 replysize = 8;
3723         SharedBuffer<u8> reply(replysize);
3724         writeU16(&reply[0], TOCLIENT_REMOVENODE);
3725         writeS16(&reply[2], p.X);
3726         writeS16(&reply[4], p.Y);
3727         writeS16(&reply[6], p.Z);
3728
3729         for(core::map<u16, RemoteClient*>::Iterator
3730                 i = m_clients.getIterator();
3731                 i.atEnd() == false; i++)
3732         {
3733                 // Get client and check that it is valid
3734                 RemoteClient *client = i.getNode()->getValue();
3735                 assert(client->peer_id == i.getNode()->getKey());
3736                 if(client->serialization_version == SER_FMT_VER_INVALID)
3737                         continue;
3738
3739                 // Don't send if it's the same one
3740                 if(client->peer_id == ignore_id)
3741                         continue;
3742                 
3743                 if(far_players)
3744                 {
3745                         // Get player
3746                         Player *player = m_env.getPlayer(client->peer_id);
3747                         if(player)
3748                         {
3749                                 // If player is far away, only set modified blocks not sent
3750                                 v3f player_pos = player->getPosition();
3751                                 if(player_pos.getDistanceFrom(p_f) > maxd)
3752                                 {
3753                                         far_players->push_back(client->peer_id);
3754                                         continue;
3755                                 }
3756                         }
3757                 }
3758
3759                 // Send as reliable
3760                 m_con.Send(client->peer_id, 0, reply, true);
3761         }
3762 }
3763
3764 void Server::sendAddNode(v3s16 p, MapNode n, u16 ignore_id,
3765                 core::list<u16> *far_players, float far_d_nodes)
3766 {
3767         float maxd = far_d_nodes*BS;
3768         v3f p_f = intToFloat(p, BS);
3769
3770         for(core::map<u16, RemoteClient*>::Iterator
3771                 i = m_clients.getIterator();
3772                 i.atEnd() == false; i++)
3773         {
3774                 // Get client and check that it is valid
3775                 RemoteClient *client = i.getNode()->getValue();
3776                 assert(client->peer_id == i.getNode()->getKey());
3777                 if(client->serialization_version == SER_FMT_VER_INVALID)
3778                         continue;
3779
3780                 // Don't send if it's the same one
3781                 if(client->peer_id == ignore_id)
3782                         continue;
3783
3784                 if(far_players)
3785                 {
3786                         // Get player
3787                         Player *player = m_env.getPlayer(client->peer_id);
3788                         if(player)
3789                         {
3790                                 // If player is far away, only set modified blocks not sent
3791                                 v3f player_pos = player->getPosition();
3792                                 if(player_pos.getDistanceFrom(p_f) > maxd)
3793                                 {
3794                                         far_players->push_back(client->peer_id);
3795                                         continue;
3796                                 }
3797                         }
3798                 }
3799
3800                 // Create packet
3801                 u32 replysize = 8 + MapNode::serializedLength(client->serialization_version);
3802                 SharedBuffer<u8> reply(replysize);
3803                 writeU16(&reply[0], TOCLIENT_ADDNODE);
3804                 writeS16(&reply[2], p.X);
3805                 writeS16(&reply[4], p.Y);
3806                 writeS16(&reply[6], p.Z);
3807                 n.serialize(&reply[8], client->serialization_version);
3808
3809                 // Send as reliable
3810                 m_con.Send(client->peer_id, 0, reply, true);
3811         }
3812 }
3813
3814 void Server::setBlockNotSent(v3s16 p)
3815 {
3816         for(core::map<u16, RemoteClient*>::Iterator
3817                 i = m_clients.getIterator();
3818                 i.atEnd()==false; i++)
3819         {
3820                 RemoteClient *client = i.getNode()->getValue();
3821                 client->SetBlockNotSent(p);
3822         }
3823 }
3824
3825 void Server::SendBlockNoLock(u16 peer_id, MapBlock *block, u8 ver)
3826 {
3827         DSTACK(__FUNCTION_NAME);
3828
3829         v3s16 p = block->getPos();
3830         
3831 #if 0
3832         // Analyze it a bit
3833         bool completely_air = true;
3834         for(s16 z0=0; z0<MAP_BLOCKSIZE; z0++)
3835         for(s16 x0=0; x0<MAP_BLOCKSIZE; x0++)
3836         for(s16 y0=0; y0<MAP_BLOCKSIZE; y0++)
3837         {
3838                 if(block->getNodeNoEx(v3s16(x0,y0,z0)).d != CONTENT_AIR)
3839                 {
3840                         completely_air = false;
3841                         x0 = y0 = z0 = MAP_BLOCKSIZE; // Break out
3842                 }
3843         }
3844
3845         // Print result
3846         dstream<<"Server: Sending block ("<<p.X<<","<<p.Y<<","<<p.Z<<"): ";
3847         if(completely_air)
3848                 dstream<<"[completely air] ";
3849         dstream<<std::endl;
3850 #endif
3851
3852         /*
3853                 Create a packet with the block in the right format
3854         */
3855         
3856         std::ostringstream os(std::ios_base::binary);
3857         block->serialize(os, ver);
3858         std::string s = os.str();
3859         SharedBuffer<u8> blockdata((u8*)s.c_str(), s.size());
3860
3861         u32 replysize = 8 + blockdata.getSize();
3862         SharedBuffer<u8> reply(replysize);
3863         writeU16(&reply[0], TOCLIENT_BLOCKDATA);
3864         writeS16(&reply[2], p.X);
3865         writeS16(&reply[4], p.Y);
3866         writeS16(&reply[6], p.Z);
3867         memcpy(&reply[8], *blockdata, blockdata.getSize());
3868
3869         /*dstream<<"Server: Sending block ("<<p.X<<","<<p.Y<<","<<p.Z<<")"
3870                         <<":  \tpacket size: "<<replysize<<std::endl;*/
3871         
3872         /*
3873                 Send packet
3874         */
3875         m_con.Send(peer_id, 1, reply, true);
3876 }
3877
3878 void Server::SendBlocks(float dtime)
3879 {
3880         DSTACK(__FUNCTION_NAME);
3881
3882         JMutexAutoLock envlock(m_env_mutex);
3883         JMutexAutoLock conlock(m_con_mutex);
3884
3885         //TimeTaker timer("Server::SendBlocks");
3886
3887         core::array<PrioritySortedBlockTransfer> queue;
3888
3889         s32 total_sending = 0;
3890         
3891         {
3892                 ScopeProfiler sp(&g_profiler, "Server: selecting blocks for sending");
3893
3894                 for(core::map<u16, RemoteClient*>::Iterator
3895                         i = m_clients.getIterator();
3896                         i.atEnd() == false; i++)
3897                 {
3898                         RemoteClient *client = i.getNode()->getValue();
3899                         assert(client->peer_id == i.getNode()->getKey());
3900
3901                         total_sending += client->SendingCount();
3902                         
3903                         if(client->serialization_version == SER_FMT_VER_INVALID)
3904                                 continue;
3905                         
3906                         client->GetNextBlocks(this, dtime, queue);
3907                 }
3908         }
3909
3910         // Sort.
3911         // Lowest priority number comes first.
3912         // Lowest is most important.
3913         queue.sort();
3914
3915         for(u32 i=0; i<queue.size(); i++)
3916         {
3917                 //TODO: Calculate limit dynamically
3918                 if(total_sending >= g_settings.getS32
3919                                 ("max_simultaneous_block_sends_server_total"))
3920                         break;
3921                 
3922                 PrioritySortedBlockTransfer q = queue[i];
3923
3924                 MapBlock *block = NULL;
3925                 try
3926                 {
3927                         block = m_env.getMap().getBlockNoCreate(q.pos);
3928                 }
3929                 catch(InvalidPositionException &e)
3930                 {
3931                         continue;
3932                 }
3933
3934                 RemoteClient *client = getClient(q.peer_id);
3935
3936                 SendBlockNoLock(q.peer_id, block, client->serialization_version);
3937
3938                 client->SentBlock(q.pos);
3939
3940                 total_sending++;
3941         }
3942 }
3943
3944 /*
3945         Something random
3946 */
3947
3948 void Server::UpdateCrafting(u16 peer_id)
3949 {
3950         DSTACK(__FUNCTION_NAME);
3951         
3952         Player* player = m_env.getPlayer(peer_id);
3953         assert(player);
3954
3955         /*
3956                 Calculate crafting stuff
3957         */
3958         if(g_settings.getBool("creative_mode") == false)
3959         {
3960                 InventoryList *clist = player->inventory.getList("craft");
3961                 InventoryList *rlist = player->inventory.getList("craftresult");
3962
3963                 if(rlist->getUsedSlots() == 0)
3964                         player->craftresult_is_preview = true;
3965
3966                 if(rlist && player->craftresult_is_preview)
3967                 {
3968                         rlist->clearItems();
3969                 }
3970                 if(clist && rlist && player->craftresult_is_preview)
3971                 {
3972                         InventoryItem *items[9];
3973                         for(u16 i=0; i<9; i++)
3974                         {
3975                                 items[i] = clist->getItem(i);
3976                         }
3977                         
3978                         // Get result of crafting grid
3979                         InventoryItem *result = craft_get_result(items);
3980                         if(result)
3981                                 rlist->addItem(result);
3982                 }
3983         
3984         } // if creative_mode == false
3985 }
3986
3987 RemoteClient* Server::getClient(u16 peer_id)
3988 {
3989         DSTACK(__FUNCTION_NAME);
3990         //JMutexAutoLock lock(m_con_mutex);
3991         core::map<u16, RemoteClient*>::Node *n;
3992         n = m_clients.find(peer_id);
3993         // A client should exist for all peers
3994         assert(n != NULL);
3995         return n->getValue();
3996 }
3997
3998 std::wstring Server::getStatusString()
3999 {
4000         std::wostringstream os(std::ios_base::binary);
4001         os<<L"# Server: ";
4002         // Version
4003         os<<L"version="<<narrow_to_wide(VERSION_STRING);
4004         // Uptime
4005         os<<L", uptime="<<m_uptime.get();
4006         // Information about clients
4007         os<<L", clients={";
4008         for(core::map<u16, RemoteClient*>::Iterator
4009                 i = m_clients.getIterator();
4010                 i.atEnd() == false; i++)
4011         {
4012                 // Get client and check that it is valid
4013                 RemoteClient *client = i.getNode()->getValue();
4014                 assert(client->peer_id == i.getNode()->getKey());
4015                 if(client->serialization_version == SER_FMT_VER_INVALID)
4016                         continue;
4017                 // Get player
4018                 Player *player = m_env.getPlayer(client->peer_id);
4019                 // Get name of player
4020                 std::wstring name = L"unknown";
4021                 if(player != NULL)
4022                         name = narrow_to_wide(player->getName());
4023                 // Add name to information string
4024                 os<<name<<L",";
4025         }
4026         os<<L"}";
4027         if(((ServerMap*)(&m_env.getMap()))->isSavingEnabled() == false)
4028                 os<<std::endl<<L"# Server: "<<" WARNING: Map saving is disabled.";
4029         if(g_settings.get("motd") != "")
4030                 os<<std::endl<<L"# Server: "<<narrow_to_wide(g_settings.get("motd"));
4031         return os.str();
4032 }
4033
4034 v3f findSpawnPos(ServerMap &map)
4035 {
4036         //return v3f(50,50,50)*BS;
4037
4038         v2s16 nodepos;
4039         s16 groundheight = 0;
4040         
4041 #if 0
4042         nodepos = v2s16(0,0);
4043         groundheight = 20;
4044 #endif
4045
4046 #if 1
4047         // Try to find a good place a few times
4048         for(s32 i=0; i<1000; i++)
4049         {
4050                 s32 range = 1 + i;
4051                 // We're going to try to throw the player to this position
4052                 nodepos = v2s16(-range + (myrand()%(range*2)),
4053                                 -range + (myrand()%(range*2)));
4054                 v2s16 sectorpos = getNodeSectorPos(nodepos);
4055                 // Get sector (NOTE: Don't get because it's slow)
4056                 //m_env.getMap().emergeSector(sectorpos);
4057                 // Get ground height at point (fallbacks to heightmap function)
4058                 groundheight = map.findGroundLevel(nodepos);
4059                 // Don't go underwater
4060                 if(groundheight < WATER_LEVEL)
4061                 {
4062                         //dstream<<"-> Underwater"<<std::endl;
4063                         continue;
4064                 }
4065                 // Don't go to high places
4066                 if(groundheight > WATER_LEVEL + 4)
4067                 {
4068                         //dstream<<"-> Underwater"<<std::endl;
4069                         continue;
4070                 }
4071
4072                 // Found a good place
4073                 //dstream<<"Searched through "<<i<<" places."<<std::endl;
4074                 break;
4075         }
4076 #endif
4077         
4078         // If no suitable place was not found, go above water at least.
4079         if(groundheight < WATER_LEVEL)
4080                 groundheight = WATER_LEVEL;
4081
4082         return intToFloat(v3s16(
4083                         nodepos.X,
4084                         groundheight + 3,
4085                         nodepos.Y
4086                         ), BS);
4087 }
4088
4089 Player *Server::emergePlayer(const char *name, const char *password, u16 peer_id)
4090 {
4091         /*
4092                 Try to get an existing player
4093         */
4094         Player *player = m_env.getPlayer(name);
4095         if(player != NULL)
4096         {
4097                 // If player is already connected, cancel
4098                 if(player->peer_id != 0)
4099                 {
4100                         dstream<<"emergePlayer(): Player already connected"<<std::endl;
4101                         return NULL;
4102                 }
4103
4104                 // Got one.
4105                 player->peer_id = peer_id;
4106                 
4107                 // Reset inventory to creative if in creative mode
4108                 if(g_settings.getBool("creative_mode"))
4109                 {
4110                         craft_set_creative_inventory(player);
4111                 }
4112
4113                 return player;
4114         }
4115
4116         /*
4117                 If player with the wanted peer_id already exists, cancel.
4118         */
4119         if(m_env.getPlayer(peer_id) != NULL)
4120         {
4121                 dstream<<"emergePlayer(): Player with wrong name but same"
4122                                 " peer_id already exists"<<std::endl;
4123                 return NULL;
4124         }
4125         
4126         /*
4127                 Create a new player
4128         */
4129         {
4130                 player = new ServerRemotePlayer();
4131                 //player->peer_id = c.peer_id;
4132                 //player->peer_id = PEER_ID_INEXISTENT;
4133                 player->peer_id = peer_id;
4134                 player->updateName(name);
4135                 m_authmanager.add(name);
4136                 m_authmanager.setPassword(name, password);
4137                 m_authmanager.setPrivs(name,
4138                                 stringToPrivs(g_settings.get("default_privs")));
4139
4140                 /*
4141                         Set player position
4142                 */
4143                 
4144                 dstream<<"Server: Finding spawn place for player \""
4145                                 <<player->getName()<<"\""<<std::endl;
4146
4147                 v3f pos = findSpawnPos(m_env.getServerMap());
4148
4149                 player->setPosition(pos);
4150
4151                 /*
4152                         Add player to environment
4153                 */
4154
4155                 m_env.addPlayer(player);
4156
4157                 /*
4158                         Add stuff to inventory
4159                 */
4160                 
4161                 if(g_settings.getBool("creative_mode"))
4162                 {
4163                         craft_set_creative_inventory(player);
4164                 }
4165                 else if(g_settings.getBool("give_initial_stuff"))
4166                 {
4167                         craft_give_initial_stuff(player);
4168                 }
4169
4170                 return player;
4171                 
4172         } // create new player
4173 }
4174
4175 void Server::handlePeerChange(PeerChange &c)
4176 {
4177         JMutexAutoLock envlock(m_env_mutex);
4178         JMutexAutoLock conlock(m_con_mutex);
4179         
4180         if(c.type == PEER_ADDED)
4181         {
4182                 /*
4183                         Add
4184                 */
4185
4186                 // Error check
4187                 core::map<u16, RemoteClient*>::Node *n;
4188                 n = m_clients.find(c.peer_id);
4189                 // The client shouldn't already exist
4190                 assert(n == NULL);
4191
4192                 // Create client
4193                 RemoteClient *client = new RemoteClient();
4194                 client->peer_id = c.peer_id;
4195                 m_clients.insert(client->peer_id, client);
4196
4197         } // PEER_ADDED
4198         else if(c.type == PEER_REMOVED)
4199         {
4200                 /*
4201                         Delete
4202                 */
4203
4204                 // Error check
4205                 core::map<u16, RemoteClient*>::Node *n;
4206                 n = m_clients.find(c.peer_id);
4207                 // The client should exist
4208                 assert(n != NULL);
4209                 
4210                 /*
4211                         Mark objects to be not known by the client
4212                 */
4213                 RemoteClient *client = n->getValue();
4214                 // Handle objects
4215                 for(core::map<u16, bool>::Iterator
4216                                 i = client->m_known_objects.getIterator();
4217                                 i.atEnd()==false; i++)
4218                 {
4219                         // Get object
4220                         u16 id = i.getNode()->getKey();
4221                         ServerActiveObject* obj = m_env.getActiveObject(id);
4222                         
4223                         if(obj && obj->m_known_by_count > 0)
4224                                 obj->m_known_by_count--;
4225                 }
4226
4227                 // Collect information about leaving in chat
4228                 std::wstring message;
4229                 {
4230                         std::wstring name = L"unknown";
4231                         Player *player = m_env.getPlayer(c.peer_id);
4232                         if(player != NULL)
4233                                 name = narrow_to_wide(player->getName());
4234                         
4235                         message += L"*** ";
4236                         message += name;
4237                         message += L" left game";
4238                         if(c.timeout)
4239                                 message += L" (timed out)";
4240                 }
4241
4242                 /*// Delete player
4243                 {
4244                         m_env.removePlayer(c.peer_id);
4245                 }*/
4246
4247                 // Set player client disconnected
4248                 {
4249                         Player *player = m_env.getPlayer(c.peer_id);
4250                         if(player != NULL)
4251                                 player->peer_id = 0;
4252                 }
4253                 
4254                 // Delete client
4255                 delete m_clients[c.peer_id];
4256                 m_clients.remove(c.peer_id);
4257
4258                 // Send player info to all remaining clients
4259                 SendPlayerInfos();
4260                 
4261                 // Send leave chat message to all remaining clients
4262                 BroadcastChatMessage(message);
4263                 
4264         } // PEER_REMOVED
4265         else
4266         {
4267                 assert(0);
4268         }
4269 }
4270
4271 void Server::handlePeerChanges()
4272 {
4273         while(m_peer_change_queue.size() > 0)
4274         {
4275                 PeerChange c = m_peer_change_queue.pop_front();
4276
4277                 dout_server<<"Server: Handling peer change: "
4278                                 <<"id="<<c.peer_id<<", timeout="<<c.timeout
4279                                 <<std::endl;
4280
4281                 handlePeerChange(c);
4282         }
4283 }
4284
4285 u64 Server::getPlayerPrivs(Player *player)
4286 {
4287         if(player==NULL)
4288                 return 0;
4289         std::string playername = player->getName();
4290         // Local player gets all privileges regardless of
4291         // what's set on their account.
4292         if(g_settings.get("name") == playername)
4293         {
4294                 return PRIV_ALL;
4295         }
4296         else
4297         {
4298                 return getPlayerAuthPrivs(playername);
4299         }
4300 }
4301
4302 void dedicated_server_loop(Server &server, bool &kill)
4303 {
4304         DSTACK(__FUNCTION_NAME);
4305         
4306         dstream<<DTIME<<std::endl;
4307         dstream<<"========================"<<std::endl;
4308         dstream<<"Running dedicated server"<<std::endl;
4309         dstream<<"========================"<<std::endl;
4310         dstream<<std::endl;
4311
4312         IntervalLimiter m_profiler_interval;
4313
4314         for(;;)
4315         {
4316                 // This is kind of a hack but can be done like this
4317                 // because server.step() is very light
4318                 {
4319                         ScopeProfiler sp(&g_profiler, "dedicated server sleep");
4320                         sleep_ms(30);
4321                 }
4322                 server.step(0.030);
4323
4324                 if(server.getShutdownRequested() || kill)
4325                 {
4326                         dstream<<DTIME<<" dedicated_server_loop(): Quitting."<<std::endl;
4327                         break;
4328                 }
4329
4330                 /*
4331                         Profiler
4332                 */
4333                 float profiler_print_interval =
4334                                 g_settings.getFloat("profiler_print_interval");
4335                 if(profiler_print_interval != 0)
4336                 {
4337                         if(m_profiler_interval.step(0.030, profiler_print_interval))
4338                         {
4339                                 dstream<<"Profiler:"<<std::endl;
4340                                 g_profiler.print(dstream);
4341                                 g_profiler.clear();
4342                         }
4343                 }
4344                 
4345                 /*
4346                         Player info
4347                 */
4348                 static int counter = 0;
4349                 counter--;
4350                 if(counter <= 0)
4351                 {
4352                         counter = 10;
4353
4354                         core::list<PlayerInfo> list = server.getPlayerInfo();
4355                         core::list<PlayerInfo>::Iterator i;
4356                         static u32 sum_old = 0;
4357                         u32 sum = PIChecksum(list);
4358                         if(sum != sum_old)
4359                         {
4360                                 dstream<<DTIME<<"Player info:"<<std::endl;
4361                                 for(i=list.begin(); i!=list.end(); i++)
4362                                 {
4363                                         i->PrintLine(&dstream);
4364                                 }
4365                         }
4366                         sum_old = sum;
4367                 }
4368         }
4369 }
4370
4371