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 <queue>
  24 #include "clientserver.h"
  25 #include "map.h"
  26 #include "jmutexautolock.h"
  27 #include "main.h"
  28 #include "constants.h"
  29 #include "voxel.h"
  30 #include "config.h"
  31 #include "servercommand.h"
  32 #include "filesys.h"
  33 #include "mapblock.h"
  34 #include "serverobject.h"
  35 #include "settings.h"
  36 #include "profiler.h"
  37 #include "log.h"
  38 #include "script.h"
  39 #include "scriptapi.h"
  40 #include "nodedef.h"
  41 #include "itemdef.h"
  42 #include "craftdef.h"
  43 #include "mapgen.h"
  44 #include "content_mapnode.h"
  45 #include "content_nodemeta.h"
  46 #include "content_abm.h"
  47 #include "content_sao.h"
  48 #include "mods.h"
  49 #include "sha1.h"
  50 #include "base64.h"
  51 #include "tool.h"
  52 #include "utility_string.h"
  53 #include "sound.h" // dummySoundManager
  54 #include "event_manager.h"
  55 #include "hex.h"
  56
  57 #define PP(x) "("<<(x).X<<","<<(x).Y<<","<<(x).Z<<")"
  58
  59 #define BLOCK_EMERGE_FLAG_FROMDISK (1<<0)
  60
  61 class MapEditEventIgnorer
  62 {
  63 public:
  64         MapEditEventIgnorer(bool *flag):
  65                 m_flag(flag)
  66         {
  67                 if(*m_flag == false)
  68                         *m_flag = true;
  69                 else
  70                         m_flag = NULL;
  71         }
  72
  73         ~MapEditEventIgnorer()
  74         {
  75                 if(m_flag)
  76                 {
  77                         assert(*m_flag);
  78                         *m_flag = false;
  79                 }
  80         }
  81
  82 private:
  83         bool *m_flag;
  84 };
  85
  86 class MapEditEventAreaIgnorer
  87 {
  88 public:
  89         MapEditEventAreaIgnorer(VoxelArea *ignorevariable, const VoxelArea &a):
  90                 m_ignorevariable(ignorevariable)
  91         {
  92                 if(m_ignorevariable->getVolume() == 0)
  93                         *m_ignorevariable = a;
  94                 else
  95                         m_ignorevariable = NULL;
  96         }
  97
  98         ~MapEditEventAreaIgnorer()
  99         {
 100                 if(m_ignorevariable)
 101                 {
 102                         assert(m_ignorevariable->getVolume() != 0);
 103                         *m_ignorevariable = VoxelArea();
 104                 }
 105         }
 106
 107 private:
 108         VoxelArea *m_ignorevariable;
 109 };
 110
 111 void * ServerThread::Thread()
 112 {
 113         ThreadStarted();
 114
 115         log_register_thread("ServerThread");
 116
 117         DSTACK(__FUNCTION_NAME);
 118
 119         BEGIN_DEBUG_EXCEPTION_HANDLER
 120
 121         while(getRun())
 122         {
 123                 try{
 124                         //TimeTaker timer("AsyncRunStep() + Receive()");
 125
 126                         {
 127                                 //TimeTaker timer("AsyncRunStep()");
 128                                 m_server->AsyncRunStep();
 129                         }
 130
 131                         //infostream<<"Running m_server->Receive()"<<std::endl;
 132                         m_server->Receive();
 133                 }
 134                 catch(con::NoIncomingDataException &e)
 135                 {
 136                 }
 137                 catch(con::PeerNotFoundException &e)
 138                 {
 139                         infostream<<"Server: PeerNotFoundException"<<std::endl;
 140                 }
 141                 catch(con::ConnectionBindFailed &e)
 142                 {
 143                         m_server->setAsyncFatalError(e.what());
 144                 }
 145                 catch(LuaError &e)
 146                 {
 147                         m_server->setAsyncFatalError(e.what());
 148                 }
 149         }
 150
 151         END_DEBUG_EXCEPTION_HANDLER(errorstream)
 152
 153         return NULL;
 154 }
 155
 156 void * EmergeThread::Thread()
 157 {
 158         ThreadStarted();
 159
 160         log_register_thread("EmergeThread");
 161
 162         DSTACK(__FUNCTION_NAME);
 163
 164         BEGIN_DEBUG_EXCEPTION_HANDLER
 165
 166         bool enable_mapgen_debug_info = g_settings->getBool("enable_mapgen_debug_info");
 167
 168         /*
 169                 Get block info from queue, emerge them and send them
 170                 to clients.
 171
 172                 After queue is empty, exit.
 173         */
 174         while(getRun())
 175         {
 176                 QueuedBlockEmerge *qptr = m_server->m_emerge_queue.pop();
 177                 if(qptr == NULL)
 178                         break;
 179
 180                 SharedPtr<QueuedBlockEmerge> q(qptr);
 181
 182                 v3s16 &p = q->pos;
 183                 v2s16 p2d(p.X,p.Z);
 184
 185                 /*
 186                         Do not generate over-limit
 187                 */
 188                 if(blockpos_over_limit(p))
 189                         continue;
 190
 191                 //infostream<<"EmergeThread::Thread(): running"<<std::endl;
 192
 193                 //TimeTaker timer("block emerge");
 194
 195                 /*
 196                         Try to emerge it from somewhere.
 197
 198                         If it is only wanted as optional, only loading from disk
 199                         will be allowed.
 200                 */
 201
 202                 /*
 203                         Check if any peer wants it as non-optional. In that case it
 204                         will be generated.
 205
 206                         Also decrement the emerge queue count in clients.
 207                 */
 208
 209                 bool only_from_disk = true;
 210
 211                 {
 212                         core::map<u16, u8>::Iterator i;
 213                         for(i=q->peer_ids.getIterator(); i.atEnd()==false; i++)
 214                         {
 215                                 //u16 peer_id = i.getNode()->getKey();
 216
 217                                 // Check flags
 218                                 u8 flags = i.getNode()->getValue();
 219                                 if((flags & BLOCK_EMERGE_FLAG_FROMDISK) == false)
 220                                         only_from_disk = false;
 221
 222                         }
 223                 }
 224
 225                 if(enable_mapgen_debug_info)
 226                         infostream<<"EmergeThread: p="
 227                                         <<"("<<p.X<<","<<p.Y<<","<<p.Z<<") "
 228                                         <<"only_from_disk="<<only_from_disk<<std::endl;
 229
 230                 ServerMap &map = ((ServerMap&)m_server->m_env->getMap());
 231
 232                 MapBlock *block = NULL;
 233                 bool got_block = true;
 234                 core::map<v3s16, MapBlock*> modified_blocks;
 235
 236                 /*
 237                         Try to fetch block from memory or disk.
 238                         If not found and asked to generate, initialize generator.
 239                 */
 240
 241                 bool started_generate = false;
 242                 mapgen::BlockMakeData data;
 243
 244                 {
 245                         JMutexAutoLock envlock(m_server->m_env_mutex);
 246
 247                         // Load sector if it isn't loaded
 248                         if(map.getSectorNoGenerateNoEx(p2d) == NULL)
 249                                 map.loadSectorMeta(p2d);
 250
 251                         // Attempt to load block
 252                         block = map.getBlockNoCreateNoEx(p);
 253                         if(!block || block->isDummy() || !block->isGenerated())
 254                         {
 255                                 if(enable_mapgen_debug_info)
 256                                         infostream<<"EmergeThread: not in memory, "
 257                                                         <<"attempting to load from disk"<<std::endl;
 258
 259                                 block = map.loadBlock(p);
 260                         }
 261
 262                         // If could not load and allowed to generate, start generation
 263                         // inside this same envlock
 264                         if(only_from_disk == false &&
 265                                         (block == NULL || block->isGenerated() == false)){
 266                                 if(enable_mapgen_debug_info)
 267                                         infostream<<"EmergeThread: generating"<<std::endl;
 268                                 started_generate = true;
 269
 270                                 map.initBlockMake(&data, p);
 271                         }
 272                 }
 273
 274                 /*
 275                         If generator was initialized, generate now when envlock is free.
 276                 */
 277                 if(started_generate)
 278                 {
 279                         {
 280                                 ScopeProfiler sp(g_profiler, "EmergeThread: mapgen::make_block",
 281                                                 SPT_AVG);
 282                                 TimeTaker t("mapgen::make_block()");
 283
 284                                 mapgen::make_block(&data);
 285
 286                                 if(enable_mapgen_debug_info == false)
 287                                         t.stop(true); // Hide output
 288                         }
 289
 290                         do{ // enable break
 291                                 // Lock environment again to access the map
 292                                 JMutexAutoLock envlock(m_server->m_env_mutex);
 293
 294                                 ScopeProfiler sp(g_profiler, "EmergeThread: after "
 295                                                 "mapgen::make_block (envlock)", SPT_AVG);
 296
 297                                 // Blit data back on map, update lighting, add mobs and
 298                                 // whatever this does
 299                                 map.finishBlockMake(&data, modified_blocks);
 300
 301                                 // Get central block
 302                                 block = map.getBlockNoCreateNoEx(p);
 303
 304                                 // If block doesn't exist, don't try doing anything with it
 305                                 // This happens if the block is not in generation boundaries
 306                                 if(!block)
 307                                         break;
 308
 309                                 /*
 310                                         Do some post-generate stuff
 311                                 */
 312
 313                                 v3s16 minp = data.blockpos_min*MAP_BLOCKSIZE;
 314                                 v3s16 maxp = data.blockpos_max*MAP_BLOCKSIZE +
 315                                                 v3s16(1,1,1)*(MAP_BLOCKSIZE-1);
 316
 317                                 /*
 318                                         Ignore map edit events, they will not need to be
 319                                         sent to anybody because the block hasn't been sent
 320                                         to anybody
 321                                 */
 322                                 //MapEditEventIgnorer ign(&m_server->m_ignore_map_edit_events);
 323                                 MapEditEventAreaIgnorer ign(
 324                                                 &m_server->m_ignore_map_edit_events_area,
 325                                                 VoxelArea(minp, maxp));
 326                                 {
 327                                         TimeTaker timer("on_generated");
 328                                         scriptapi_environment_on_generated(m_server->m_lua,
 329                                                         minp, maxp, mapgen::get_blockseed(data.seed, minp));
 330                                         /*int t = timer.stop(true);
 331                                         dstream<<"on_generated took "<<t<<"ms"<<std::endl;*/
 332                                 }
 333
 334                                 if(enable_mapgen_debug_info)
 335                                         infostream<<"EmergeThread: ended up with: "
 336                                                         <<analyze_block(block)<<std::endl;
 337
 338                                 // Activate objects and stuff
 339                                 m_server->m_env->activateBlock(block, 0);
 340                         }while(false);
 341                 }
 342
 343                 if(block == NULL)
 344                         got_block = false;
 345
 346                 /*
 347                         Set sent status of modified blocks on clients
 348                 */
 349
 350                 // NOTE: Server's clients are also behind the connection mutex
 351                 JMutexAutoLock lock(m_server->m_con_mutex);
 352
 353                 /*
 354                         Add the originally fetched block to the modified list
 355                 */
 356                 if(got_block)
 357                 {
 358                         modified_blocks.insert(p, block);
 359                 }
 360
 361                 /*
 362                         Set the modified blocks unsent for all the clients
 363                 */
 364
 365                 for(core::map<u16, RemoteClient*>::Iterator
 366                                 i = m_server->m_clients.getIterator();
 367                                 i.atEnd() == false; i++)
 368                 {
 369                         RemoteClient *client = i.getNode()->getValue();
 370
 371                         if(modified_blocks.size() > 0)
 372                         {
 373                                 // Remove block from sent history
 374                                 client->SetBlocksNotSent(modified_blocks);
 375                         }
 376                 }
 377
 378         }
 379
 380         END_DEBUG_EXCEPTION_HANDLER(errorstream)
 381
 382         log_deregister_thread();
 383
 384         return NULL;
 385 }
 386
 387 v3f ServerSoundParams::getPos(ServerEnvironment *env, bool *pos_exists) const
 388 {
 389         if(pos_exists) *pos_exists = false;
 390         switch(type){
 391         case SSP_LOCAL:
 392                 return v3f(0,0,0);
 393         case SSP_POSITIONAL:
 394                 if(pos_exists) *pos_exists = true;
 395                 return pos;
 396         case SSP_OBJECT: {
 397                 if(object == 0)
 398                         return v3f(0,0,0);
 399                 ServerActiveObject *sao = env->getActiveObject(object);
 400                 if(!sao)
 401                         return v3f(0,0,0);
 402                 if(pos_exists) *pos_exists = true;
 403                 return sao->getBasePosition(); }
 404         }
 405         return v3f(0,0,0);
 406 }
 407
 408 void RemoteClient::GetNextBlocks(Server *server, float dtime,
 409                 core::array<PrioritySortedBlockTransfer> &dest)
 410 {
 411         DSTACK(__FUNCTION_NAME);
 412
 413         /*u32 timer_result;
 414         TimeTaker timer("RemoteClient::GetNextBlocks", &timer_result);*/
 415
 416         // Increment timers
 417         m_nothing_to_send_pause_timer -= dtime;
 418         m_nearest_unsent_reset_timer += dtime;
 419
 420         if(m_nothing_to_send_pause_timer >= 0)
 421         {
 422                 return;
 423         }
 424
 425         // Won't send anything if already sending
 426         if(m_blocks_sending.size() >= g_settings->getU16
 427                         ("max_simultaneous_block_sends_per_client"))
 428         {
 429                 //infostream<<"Not sending any blocks, Queue full."<<std::endl;
 430                 return;
 431         }
 432
 433         //TimeTaker timer("RemoteClient::GetNextBlocks");
 434
 435         Player *player = server->m_env->getPlayer(peer_id);
 436
 437         assert(player != NULL);
 438
 439         v3f playerpos = player->getPosition();
 440         v3f playerspeed = player->getSpeed();
 441         v3f playerspeeddir(0,0,0);
 442         if(playerspeed.getLength() > 1.0*BS)
 443                 playerspeeddir = playerspeed / playerspeed.getLength();
 444         // Predict to next block
 445         v3f playerpos_predicted = playerpos + playerspeeddir*MAP_BLOCKSIZE*BS;
 446
 447         v3s16 center_nodepos = floatToInt(playerpos_predicted, BS);
 448
 449         v3s16 center = getNodeBlockPos(center_nodepos);
 450
 451         // Camera position and direction
 452         v3f camera_pos = player->getEyePosition();
 453         v3f camera_dir = v3f(0,0,1);
 454         camera_dir.rotateYZBy(player->getPitch());
 455         camera_dir.rotateXZBy(player->getYaw());
 456
 457         /*infostream<<"camera_dir=("<<camera_dir.X<<","<<camera_dir.Y<<","
 458                         <<camera_dir.Z<<")"<<std::endl;*/
 459
 460         /*
 461                 Get the starting value of the block finder radius.
 462         */
 463
 464         if(m_last_center != center)
 465         {
 466                 m_nearest_unsent_d = 0;
 467                 m_last_center = center;
 468         }
 469
 470         /*infostream<<"m_nearest_unsent_reset_timer="
 471                         <<m_nearest_unsent_reset_timer<<std::endl;*/
 472
 473         // Reset periodically to workaround for some bugs or stuff
 474         if(m_nearest_unsent_reset_timer > 20.0)
 475         {
 476                 m_nearest_unsent_reset_timer = 0;
 477                 m_nearest_unsent_d = 0;
 478                 //infostream<<"Resetting m_nearest_unsent_d for "
 479                 //              <<server->getPlayerName(peer_id)<<std::endl;
 480         }
 481
 482         //s16 last_nearest_unsent_d = m_nearest_unsent_d;
 483         s16 d_start = m_nearest_unsent_d;
 484
 485         //infostream<<"d_start="<<d_start<<std::endl;
 486
 487         u16 max_simul_sends_setting = g_settings->getU16
 488                         ("max_simultaneous_block_sends_per_client");
 489         u16 max_simul_sends_usually = max_simul_sends_setting;
 490
 491         /*
 492                 Check the time from last addNode/removeNode.
 493
 494                 Decrease send rate if player is building stuff.
 495         */
 496         m_time_from_building += dtime;
 497         if(m_time_from_building < g_settings->getFloat(
 498                                 "full_block_send_enable_min_time_from_building"))
 499         {
 500                 max_simul_sends_usually
 501                         = LIMITED_MAX_SIMULTANEOUS_BLOCK_SENDS;
 502         }
 503
 504         /*
 505                 Number of blocks sending + number of blocks selected for sending
 506         */
 507         u32 num_blocks_selected = m_blocks_sending.size();
 508
 509         /*
 510                 next time d will be continued from the d from which the nearest
 511                 unsent block was found this time.
 512
 513                 This is because not necessarily any of the blocks found this
 514                 time are actually sent.
 515         */
 516         s32 new_nearest_unsent_d = -1;
 517
 518         s16 d_max = g_settings->getS16("max_block_send_distance");
 519         s16 d_max_gen = g_settings->getS16("max_block_generate_distance");
 520
 521         // Don't loop very much at a time
 522         s16 max_d_increment_at_time = 2;
 523         if(d_max > d_start + max_d_increment_at_time)
 524                 d_max = d_start + max_d_increment_at_time;
 525         /*if(d_max_gen > d_start+2)
 526                 d_max_gen = d_start+2;*/
 527
 528         //infostream<<"Starting from "<<d_start<<std::endl;
 529
 530         s32 nearest_emerged_d = -1;
 531         s32 nearest_emergefull_d = -1;
 532         s32 nearest_sent_d = -1;
 533         bool queue_is_full = false;
 534
 535         s16 d;
 536         for(d = d_start; d <= d_max; d++)
 537         {
 538                 /*errorstream<<"checking d="<<d<<" for "
 539                                 <<server->getPlayerName(peer_id)<<std::endl;*/
 540                 //infostream<<"RemoteClient::SendBlocks(): d="<<d<<std::endl;
 541
 542                 /*
 543                         If m_nearest_unsent_d was changed by the EmergeThread
 544                         (it can change it to 0 through SetBlockNotSent),
 545                         update our d to it.
 546                         Else update m_nearest_unsent_d
 547                 */
 548                 /*if(m_nearest_unsent_d != last_nearest_unsent_d)
 549                 {
 550                         d = m_nearest_unsent_d;
 551                         last_nearest_unsent_d = m_nearest_unsent_d;
 552                 }*/
 553
 554                 /*
 555                         Get the border/face dot coordinates of a "d-radiused"
 556                         box
 557                 */
 558                 core::list<v3s16> list;
 559                 getFacePositions(list, d);
 560
 561                 core::list<v3s16>::Iterator li;
 562                 for(li=list.begin(); li!=list.end(); li++)
 563                 {
 564                         v3s16 p = *li + center;
 565
 566                         /*
 567                                 Send throttling
 568                                 - Don't allow too many simultaneous transfers
 569                                 - EXCEPT when the blocks are very close
 570
 571                                 Also, don't send blocks that are already flying.
 572                         */
 573
 574                         // Start with the usual maximum
 575                         u16 max_simul_dynamic = max_simul_sends_usually;
 576
 577                         // If block is very close, allow full maximum
 578                         if(d <= BLOCK_SEND_DISABLE_LIMITS_MAX_D)
 579                                 max_simul_dynamic = max_simul_sends_setting;
 580
 581                         // Don't select too many blocks for sending
 582                         if(num_blocks_selected >= max_simul_dynamic)
 583                         {
 584                                 queue_is_full = true;
 585                                 goto queue_full_break;
 586                         }
 587
 588                         // Don't send blocks that are currently being transferred
 589                         if(m_blocks_sending.find(p) != NULL)
 590                                 continue;
 591
 592                         /*
 593                                 Do not go over-limit
 594                         */
 595                         if(p.X < -MAP_GENERATION_LIMIT / MAP_BLOCKSIZE
 596                         || p.X > MAP_GENERATION_LIMIT / MAP_BLOCKSIZE
 597                         || p.Y < -MAP_GENERATION_LIMIT / MAP_BLOCKSIZE
 598                         || p.Y > MAP_GENERATION_LIMIT / MAP_BLOCKSIZE
 599                         || p.Z < -MAP_GENERATION_LIMIT / MAP_BLOCKSIZE
 600                         || p.Z > MAP_GENERATION_LIMIT / MAP_BLOCKSIZE)
 601                                 continue;
 602
 603                         // If this is true, inexistent block will be made from scratch
 604                         bool generate = d <= d_max_gen;
 605
 606                         {
 607                                 /*// Limit the generating area vertically to 2/3
 608                                 if(abs(p.Y - center.Y) > d_max_gen - d_max_gen / 3)
 609                                         generate = false;*/
 610
 611                                 // Limit the send area vertically to 1/2
 612                                 if(abs(p.Y - center.Y) > d_max / 2)
 613                                         continue;
 614                         }
 615
 616 #if 0
 617                         /*
 618                                 If block is far away, don't generate it unless it is
 619                                 near ground level.
 620                         */
 621                         if(d >= 4)
 622                         {
 623         #if 1
 624                                 // Block center y in nodes
 625                                 f32 y = (f32)(p.Y * MAP_BLOCKSIZE + MAP_BLOCKSIZE/2);
 626                                 // Don't generate if it's very high or very low
 627                                 if(y < -64 || y > 64)
 628                                         generate = false;
 629         #endif
 630         #if 0
 631                                 v2s16 p2d_nodes_center(
 632                                         MAP_BLOCKSIZE*p.X,
 633                                         MAP_BLOCKSIZE*p.Z);
 634
 635                                 // Get ground height in nodes
 636                                 s16 gh = server->m_env->getServerMap().findGroundLevel(
 637                                                 p2d_nodes_center);
 638
 639                                 // If differs a lot, don't generate
 640                                 if(fabs(gh - y) > MAP_BLOCKSIZE*2)
 641                                         generate = false;
 642                                         // Actually, don't even send it
 643                                         //continue;
 644         #endif
 645                         }
 646 #endif
 647
 648                         //infostream<<"d="<<d<<std::endl;
 649 #if 1
 650                         /*
 651                                 Don't generate or send if not in sight
 652                                 FIXME This only works if the client uses a small enough
 653                                 FOV setting. The default of 72 degrees is fine.
 654                         */
 655
 656                         float camera_fov = (72.0*PI/180) * 4./3.;
 657                         if(isBlockInSight(p, camera_pos, camera_dir, camera_fov, 10000*BS) == false)
 658                         {
 659                                 continue;
 660                         }
 661 #endif
 662                         /*
 663                                 Don't send already sent blocks
 664                         */
 665                         {
 666                                 if(m_blocks_sent.find(p) != NULL)
 667                                 {
 668                                         continue;
 669                                 }
 670                         }
 671
 672                         /*
 673                                 Check if map has this block
 674                         */
 675                         MapBlock *block = server->m_env->getMap().getBlockNoCreateNoEx(p);
 676
 677                         bool surely_not_found_on_disk = false;
 678                         bool block_is_invalid = false;
 679                         if(block != NULL)
 680                         {
 681                                 // Reset usage timer, this block will be of use in the future.
 682                                 block->resetUsageTimer();
 683
 684                                 // Block is dummy if data doesn't exist.
 685                                 // It means it has been not found from disk and not generated
 686                                 if(block->isDummy())
 687                                 {
 688                                         surely_not_found_on_disk = true;
 689                                 }
 690
 691                                 // Block is valid if lighting is up-to-date and data exists
 692                                 if(block->isValid() == false)
 693                                 {
 694                                         block_is_invalid = true;
 695                                 }
 696
 697                                 /*if(block->isFullyGenerated() == false)
 698                                 {
 699                                         block_is_invalid = true;
 700                                 }*/
 701
 702 #if 0
 703                                 v2s16 p2d(p.X, p.Z);
 704                                 ServerMap *map = (ServerMap*)(&server->m_env->getMap());
 705                                 v2s16 chunkpos = map->sector_to_chunk(p2d);
 706                                 if(map->chunkNonVolatile(chunkpos) == false)
 707                                         block_is_invalid = true;
 708 #endif
 709                                 if(block->isGenerated() == false)
 710                                         block_is_invalid = true;
 711 #if 1
 712                                 /*
 713                                         If block is not close, don't send it unless it is near
 714                                         ground level.
 715
 716                                         Block is near ground level if night-time mesh
 717                                         differs from day-time mesh.
 718                                 */
 719                                 if(d >= 4)
 720                                 {
 721                                         if(block->getDayNightDiff() == false)
 722                                                 continue;
 723                                 }
 724 #endif
 725                         }
 726
 727                         /*
 728                                 If block has been marked to not exist on disk (dummy)
 729                                 and generating new ones is not wanted, skip block.
 730                         */
 731                         if(generate == false && surely_not_found_on_disk == true)
 732                         {
 733                                 // get next one.
 734                                 continue;
 735                         }
 736
 737                         /*
 738                                 Add inexistent block to emerge queue.
 739                         */
 740                         if(block == NULL || surely_not_found_on_disk || block_is_invalid)
 741                         {
 742                                 //TODO: Get value from somewhere
 743                                 // Allow only one block in emerge queue
 744                                 //if(server->m_emerge_queue.peerItemCount(peer_id) < 1)
 745                                 // Allow two blocks in queue per client
 746                                 //if(server->m_emerge_queue.peerItemCount(peer_id) < 2)
 747                                 u32 max_emerge = 5;
 748                                 // Make it more responsive when needing to generate stuff
 749                                 if(surely_not_found_on_disk)
 750                                         max_emerge = 1;
 751                                 if(server->m_emerge_queue.peerItemCount(peer_id) < max_emerge)
 752                                 {
 753                                         //infostream<<"Adding block to emerge queue"<<std::endl;
 754
 755                                         // Add it to the emerge queue and trigger the thread
 756
 757                                         u8 flags = 0;
 758                                         if(generate == false)
 759                                                 flags |= BLOCK_EMERGE_FLAG_FROMDISK;
 760
 761                                         server->m_emerge_queue.addBlock(peer_id, p, flags);
 762                                         server->m_emergethread.trigger();
 763
 764                                         if(nearest_emerged_d == -1)
 765                                                 nearest_emerged_d = d;
 766                                 } else {
 767                                         if(nearest_emergefull_d == -1)
 768                                                 nearest_emergefull_d = d;
 769                                 }
 770
 771                                 // get next one.
 772                                 continue;
 773                         }
 774
 775                         if(nearest_sent_d == -1)
 776                                 nearest_sent_d = d;
 777
 778                         /*
 779                                 Add block to send queue
 780                         */
 781
 782                         /*errorstream<<"sending from d="<<d<<" to "
 783                                         <<server->getPlayerName(peer_id)<<std::endl;*/
 784
 785                         PrioritySortedBlockTransfer q((float)d, p, peer_id);
 786
 787                         dest.push_back(q);
 788
 789                         num_blocks_selected += 1;
 790                 }
 791         }
 792 queue_full_break:
 793
 794         //infostream<<"Stopped at "<<d<<std::endl;
 795
 796         // If nothing was found for sending and nothing was queued for
 797         // emerging, continue next time browsing from here
 798         if(nearest_emerged_d != -1){
 799                 new_nearest_unsent_d = nearest_emerged_d;
 800         } else if(nearest_emergefull_d != -1){
 801                 new_nearest_unsent_d = nearest_emergefull_d;
 802         } else {
 803                 if(d > g_settings->getS16("max_block_send_distance")){
 804                         new_nearest_unsent_d = 0;
 805                         m_nothing_to_send_pause_timer = 2.0;
 806                         /*infostream<<"GetNextBlocks(): d wrapped around for "
 807                                         <<server->getPlayerName(peer_id)
 808                                         <<"; setting to 0 and pausing"<<std::endl;*/
 809                 } else {
 810                         if(nearest_sent_d != -1)
 811                                 new_nearest_unsent_d = nearest_sent_d;
 812                         else
 813                                 new_nearest_unsent_d = d;
 814                 }
 815         }
 816
 817         if(new_nearest_unsent_d != -1)
 818                 m_nearest_unsent_d = new_nearest_unsent_d;
 819
 820         /*timer_result = timer.stop(true);
 821         if(timer_result != 0)
 822                 infostream<<"GetNextBlocks duration: "<<timer_result<<" (!=0)"<<std::endl;*/
 823 }
 824
 825 void RemoteClient::GotBlock(v3s16 p)
 826 {
 827         if(m_blocks_sending.find(p) != NULL)
 828                 m_blocks_sending.remove(p);
 829         else
 830         {
 831                 /*infostream<<"RemoteClient::GotBlock(): Didn't find in"
 832                                 " m_blocks_sending"<<std::endl;*/
 833                 m_excess_gotblocks++;
 834         }
 835         m_blocks_sent.insert(p, true);
 836 }
 837
 838 void RemoteClient::SentBlock(v3s16 p)
 839 {
 840         if(m_blocks_sending.find(p) == NULL)
 841                 m_blocks_sending.insert(p, 0.0);
 842         else
 843                 infostream<<"RemoteClient::SentBlock(): Sent block"
 844                                 " already in m_blocks_sending"<<std::endl;
 845 }
 846
 847 void RemoteClient::SetBlockNotSent(v3s16 p)
 848 {
 849         m_nearest_unsent_d = 0;
 850
 851         if(m_blocks_sending.find(p) != NULL)
 852                 m_blocks_sending.remove(p);
 853         if(m_blocks_sent.find(p) != NULL)
 854                 m_blocks_sent.remove(p);
 855 }
 856
 857 void RemoteClient::SetBlocksNotSent(core::map<v3s16, MapBlock*> &blocks)
 858 {
 859         m_nearest_unsent_d = 0;
 860
 861         for(core::map<v3s16, MapBlock*>::Iterator
 862                         i = blocks.getIterator();
 863                         i.atEnd()==false; i++)
 864         {
 865                 v3s16 p = i.getNode()->getKey();
 866
 867                 if(m_blocks_sending.find(p) != NULL)
 868                         m_blocks_sending.remove(p);
 869                 if(m_blocks_sent.find(p) != NULL)
 870                         m_blocks_sent.remove(p);
 871         }
 872 }
 873
 874 /*
 875         PlayerInfo
 876 */
 877
 878 PlayerInfo::PlayerInfo()
 879 {
 880         name[0] = 0;
 881         avg_rtt = 0;
 882 }
 883
 884 void PlayerInfo::PrintLine(std::ostream *s)
 885 {
 886         (*s)<<id<<": ";
 887         (*s)<<"\""<<name<<"\" ("
 888                         <<(position.X/10)<<","<<(position.Y/10)
 889                         <<","<<(position.Z/10)<<") ";
 890         address.print(s);
 891         (*s)<<" avg_rtt="<<avg_rtt;
 892         (*s)<<std::endl;
 893 }
 894
 895 /*
 896         Server
 897 */
 898
 899 Server::Server(
 900                 const std::string &path_world,
 901                 const std::string &path_config,
 902                 const SubgameSpec &gamespec,
 903                 bool simple_singleplayer_mode
 904         ):
 905         m_path_world(path_world),
 906         m_path_config(path_config),
 907         m_gamespec(gamespec),
 908         m_simple_singleplayer_mode(simple_singleplayer_mode),
 909         m_async_fatal_error(""),
 910         m_env(NULL),
 911         m_con(PROTOCOL_ID, 512, CONNECTION_TIMEOUT, this),
 912         m_banmanager(path_world+DIR_DELIM+"ipban.txt"),
 913         m_lua(NULL),
 914         m_itemdef(createItemDefManager()),
 915         m_nodedef(createNodeDefManager()),
 916         m_craftdef(createCraftDefManager()),
 917         m_event(new EventManager()),
 918         m_thread(this),
 919         m_emergethread(this),
 920         m_time_of_day_send_timer(0),
 921         m_uptime(0),
 922         m_shutdown_requested(false),
 923         m_ignore_map_edit_events(false),
 924         m_ignore_map_edit_events_peer_id(0)
 925 {
 926         m_liquid_transform_timer = 0.0;
 927         m_print_info_timer = 0.0;
 928         m_objectdata_timer = 0.0;
 929         m_emergethread_trigger_timer = 0.0;
 930         m_savemap_timer = 0.0;
 931
 932         m_env_mutex.Init();
 933         m_con_mutex.Init();
 934         m_step_dtime_mutex.Init();
 935         m_step_dtime = 0.0;
 936
 937         if(path_world == "")
 938                 throw ServerError("Supplied empty world path");
 939
 940         if(!gamespec.isValid())
 941                 throw ServerError("Supplied invalid gamespec");
 942
 943         infostream<<"Server created for gameid \""<<m_gamespec.id<<"\"";
 944         if(m_simple_singleplayer_mode)
 945                 infostream<<" in simple singleplayer mode"<<std::endl;
 946         else
 947                 infostream<<std::endl;
 948         infostream<<"- world:  "<<m_path_world<<std::endl;
 949         infostream<<"- config: "<<m_path_config<<std::endl;
 950         infostream<<"- game:   "<<m_gamespec.path<<std::endl;
 951
 952         // Add world mod search path
 953         m_modspaths.push_front(m_path_world + DIR_DELIM + "worldmods");
 954         // Add addon mod search path
 955         for(std::set<std::string>::const_iterator i = m_gamespec.mods_paths.begin();
 956                         i != m_gamespec.mods_paths.end(); i++)
 957                 m_modspaths.push_front((*i));
 958
 959         // Print out mod search paths
 960         for(core::list<std::string>::Iterator i = m_modspaths.begin();
 961                         i != m_modspaths.end(); i++){
 962                 std::string modspath = *i;
 963                 infostream<<"- mods:   "<<modspath<<std::endl;
 964         }
 965
 966         // Path to builtin.lua
 967         std::string builtinpath = getBuiltinLuaPath() + DIR_DELIM + "builtin.lua";
 968
 969         // Create world if it doesn't exist
 970         if(!initializeWorld(m_path_world, m_gamespec.id))
 971                 throw ServerError("Failed to initialize world");
 972
 973         // Lock environment
 974         JMutexAutoLock envlock(m_env_mutex);
 975         JMutexAutoLock conlock(m_con_mutex);
 976
 977         // Initialize scripting
 978
 979         infostream<<"Server: Initializing Lua"<<std::endl;
 980         m_lua = script_init();
 981         assert(m_lua);
 982         // Export API
 983         scriptapi_export(m_lua, this);
 984         // Load and run builtin.lua
 985         infostream<<"Server: Loading builtin.lua [\""
 986                         <<builtinpath<<"\"]"<<std::endl;
 987         bool success = scriptapi_loadmod(m_lua, builtinpath, "__builtin");
 988         if(!success){
 989                 errorstream<<"Server: Failed to load and run "
 990                                 <<builtinpath<<std::endl;
 991                 throw ModError("Failed to load and run "+builtinpath);
 992         }
 993         // Find mods in mod search paths
 994         m_mods = getMods(m_modspaths);
 995         // Print 'em
 996         infostream<<"Server: Loading mods: ";
 997         for(core::list<ModSpec>::Iterator i = m_mods.begin();
 998                         i != m_mods.end(); i++){
 999                 const ModSpec &mod = *i;
1000                 infostream<<mod.name<<" ";
1001         }
1002         infostream<<std::endl;
1003         // Load and run "mod" scripts
1004         for(core::list<ModSpec>::Iterator i = m_mods.begin();
1005                         i != m_mods.end(); i++){
1006                 const ModSpec &mod = *i;
1007                 std::string scriptpath = mod.path + DIR_DELIM + "init.lua";
1008                 infostream<<"  ["<<padStringRight(mod.name, 12)<<"] [\""
1009                                 <<scriptpath<<"\"]"<<std::endl;
1010                 bool success = scriptapi_loadmod(m_lua, scriptpath, mod.name);
1011                 if(!success){
1012                         errorstream<<"Server: Failed to load and run "
1013                                         <<scriptpath<<std::endl;
1014                         throw ModError("Failed to load and run "+scriptpath);
1015                 }
1016         }
1017
1018         // Read Textures and calculate sha1 sums
1019         fillMediaCache();
1020
1021         // Apply item aliases in the node definition manager
1022         m_nodedef->updateAliases(m_itemdef);
1023
1024         // Initialize Environment
1025
1026         m_env = new ServerEnvironment(new ServerMap(path_world, this), m_lua,
1027                         this, this);
1028
1029         // Give environment reference to scripting api
1030         scriptapi_add_environment(m_lua, m_env);
1031
1032         // Register us to receive map edit events
1033         m_env->getMap().addEventReceiver(this);
1034
1035         // If file exists, load environment metadata
1036         if(fs::PathExists(m_path_world+DIR_DELIM+"env_meta.txt"))
1037         {
1038                 infostream<<"Server: Loading environment metadata"<<std::endl;
1039                 m_env->loadMeta(m_path_world);
1040         }
1041
1042         // Load players
1043         infostream<<"Server: Loading players"<<std::endl;
1044         m_env->deSerializePlayers(m_path_world);
1045
1046         /*
1047                 Add some test ActiveBlockModifiers to environment
1048         */
1049         add_legacy_abms(m_env, m_nodedef);
1050 }
1051
1052 Server::~Server()
1053 {
1054         infostream<<"Server destructing"<<std::endl;
1055
1056         /*
1057                 Send shutdown message
1058         */
1059         {
1060                 JMutexAutoLock conlock(m_con_mutex);
1061
1062                 std::wstring line = L"*** Server shutting down";
1063
1064                 /*
1065                         Send the message to clients
1066                 */
1067                 for(core::map<u16, RemoteClient*>::Iterator
1068                         i = m_clients.getIterator();
1069                         i.atEnd() == false; i++)
1070                 {
1071                         // Get client and check that it is valid
1072                         RemoteClient *client = i.getNode()->getValue();
1073                         assert(client->peer_id == i.getNode()->getKey());
1074                         if(client->serialization_version == SER_FMT_VER_INVALID)
1075                                 continue;
1076
1077                         try{
1078                                 SendChatMessage(client->peer_id, line);
1079                         }
1080                         catch(con::PeerNotFoundException &e)
1081                         {}
1082                 }
1083         }
1084
1085         {
1086                 JMutexAutoLock envlock(m_env_mutex);
1087
1088                 /*
1089                         Save players
1090                 */
1091                 infostream<<"Server: Saving players"<<std::endl;
1092                 m_env->serializePlayers(m_path_world);
1093
1094                 /*
1095                         Save environment metadata
1096                 */
1097                 infostream<<"Server: Saving environment metadata"<<std::endl;
1098                 m_env->saveMeta(m_path_world);
1099         }
1100
1101         /*
1102                 Stop threads
1103         */
1104         stop();
1105
1106         /*
1107                 Delete clients
1108         */
1109         {
1110                 JMutexAutoLock clientslock(m_con_mutex);
1111
1112                 for(core::map<u16, RemoteClient*>::Iterator
1113                         i = m_clients.getIterator();
1114                         i.atEnd() == false; i++)
1115                 {
1116                         /*// Delete player
1117                         // NOTE: These are removed by env destructor
1118                         {
1119                                 u16 peer_id = i.getNode()->getKey();
1120                                 JMutexAutoLock envlock(m_env_mutex);
1121                                 m_env->removePlayer(peer_id);
1122                         }*/
1123
1124                         // Delete client
1125                         delete i.getNode()->getValue();
1126                 }
1127         }
1128
1129         // Delete things in the reverse order of creation
1130         delete m_env;
1131         delete m_event;
1132         delete m_itemdef;
1133         delete m_nodedef;
1134         delete m_craftdef;
1135
1136         // Deinitialize scripting
1137         infostream<<"Server: Deinitializing scripting"<<std::endl;
1138         script_deinit(m_lua);
1139 }
1140
1141 void Server::start(unsigned short port)
1142 {
1143         DSTACK(__FUNCTION_NAME);
1144         infostream<<"Starting server on port "<<port<<"..."<<std::endl;
1145
1146         // Stop thread if already running
1147         m_thread.stop();
1148
1149         // Initialize connection
1150         m_con.SetTimeoutMs(30);
1151         m_con.Serve(port);
1152
1153         // Start thread
1154         m_thread.setRun(true);
1155         m_thread.Start();
1156
1157         // ASCII art for the win!
1158         actionstream
1159         <<"        .__               __                   __   "<<std::endl
1160         <<"  _____ |__| ____   _____/  |_  ____   _______/  |_ "<<std::endl
1161         <<" /     \\|  |/    \\_/ __ \\   __\\/ __ \\ /  ___/\\   __\\"<<std::endl
1162         <<"|  Y Y  \\  |   |  \\  ___/|  | \\  ___/ \\___ \\  |  |  "<<std::endl
1163         <<"|__|_|  /__|___|  /\\___  >__|  \\___  >____  > |__|  "<<std::endl
1164         <<"      \\/        \\/     \\/          \\/     \\/        "<<std::endl;
1165         actionstream<<"World at ["<<m_path_world<<"]"<<std::endl;
1166         actionstream<<"Server for gameid=\""<<m_gamespec.id
1167                         <<"\" listening on port "<<port<<"."<<std::endl;
1168 }
1169
1170 void Server::stop()
1171 {
1172         DSTACK(__FUNCTION_NAME);
1173
1174         infostream<<"Server: Stopping and waiting threads"<<std::endl;
1175
1176         // Stop threads (set run=false first so both start stopping)
1177         m_thread.setRun(false);
1178         m_emergethread.setRun(false);
1179         m_thread.stop();
1180         m_emergethread.stop();
1181
1182         infostream<<"Server: Threads stopped"<<std::endl;
1183 }
1184
1185 void Server::step(float dtime)
1186 {
1187         DSTACK(__FUNCTION_NAME);
1188         // Limit a bit
1189         if(dtime > 2.0)
1190                 dtime = 2.0;
1191         {
1192                 JMutexAutoLock lock(m_step_dtime_mutex);
1193                 m_step_dtime += dtime;
1194         }
1195         // Throw if fatal error occurred in thread
1196         std::string async_err = m_async_fatal_error.get();
1197         if(async_err != ""){
1198                 throw ServerError(async_err);
1199         }
1200 }
1201
1202 void Server::AsyncRunStep()
1203 {
1204         DSTACK(__FUNCTION_NAME);
1205
1206         g_profiler->add("Server::AsyncRunStep (num)", 1);
1207
1208         float dtime;
1209         {
1210                 JMutexAutoLock lock1(m_step_dtime_mutex);
1211                 dtime = m_step_dtime;
1212         }
1213
1214         {
1215                 // Send blocks to clients
1216                 SendBlocks(dtime);
1217         }
1218
1219         if(dtime < 0.001)
1220                 return;
1221
1222         g_profiler->add("Server::AsyncRunStep with dtime (num)", 1);
1223
1224         //infostream<<"Server steps "<<dtime<<std::endl;
1225         //infostream<<"Server::AsyncRunStep(): dtime="<<dtime<<std::endl;
1226
1227         {
1228                 JMutexAutoLock lock1(m_step_dtime_mutex);
1229                 m_step_dtime -= dtime;
1230         }
1231
1232         /*
1233                 Update uptime
1234         */
1235         {
1236                 m_uptime.set(m_uptime.get() + dtime);
1237         }
1238
1239         {
1240                 // Process connection's timeouts
1241                 JMutexAutoLock lock2(m_con_mutex);
1242                 ScopeProfiler sp(g_profiler, "Server: connection timeout processing");
1243                 m_con.RunTimeouts(dtime);
1244         }
1245
1246         {
1247                 // This has to be called so that the client list gets synced
1248                 // with the peer list of the connection
1249                 handlePeerChanges();
1250         }
1251
1252         /*
1253                 Update time of day and overall game time
1254         */
1255         {
1256                 JMutexAutoLock envlock(m_env_mutex);
1257
1258                 m_env->setTimeOfDaySpeed(g_settings->getFloat("time_speed"));
1259
1260                 /*
1261                         Send to clients at constant intervals
1262                 */
1263
1264                 m_time_of_day_send_timer -= dtime;
1265                 if(m_time_of_day_send_timer < 0.0)
1266                 {
1267                         m_time_of_day_send_timer = g_settings->getFloat("time_send_interval");
1268
1269                         //JMutexAutoLock envlock(m_env_mutex);
1270                         JMutexAutoLock conlock(m_con_mutex);
1271
1272                         for(core::map<u16, RemoteClient*>::Iterator
1273                                 i = m_clients.getIterator();
1274                                 i.atEnd() == false; i++)
1275                         {
1276                                 RemoteClient *client = i.getNode()->getValue();
1277                                 SharedBuffer<u8> data = makePacket_TOCLIENT_TIME_OF_DAY(
1278                                                 m_env->getTimeOfDay(), g_settings->getFloat("time_speed"));
1279                                 // Send as reliable
1280                                 m_con.Send(client->peer_id, 0, data, true);
1281                         }
1282                 }
1283         }
1284
1285         {
1286                 JMutexAutoLock lock(m_env_mutex);
1287                 // Step environment
1288                 ScopeProfiler sp(g_profiler, "SEnv step");
1289                 ScopeProfiler sp2(g_profiler, "SEnv step avg", SPT_AVG);
1290                 m_env->step(dtime);
1291         }
1292
1293         const float map_timer_and_unload_dtime = 2.92;
1294         if(m_map_timer_and_unload_interval.step(dtime, map_timer_and_unload_dtime))
1295         {
1296                 JMutexAutoLock lock(m_env_mutex);
1297                 // Run Map's timers and unload unused data
1298                 ScopeProfiler sp(g_profiler, "Server: map timer and unload");
1299                 m_env->getMap().timerUpdate(map_timer_and_unload_dtime,
1300                                 g_settings->getFloat("server_unload_unused_data_timeout"));
1301         }
1302
1303         /*
1304                 Do background stuff
1305         */
1306
1307         /*
1308                 Handle players
1309         */
1310         {
1311                 JMutexAutoLock lock(m_env_mutex);
1312                 JMutexAutoLock lock2(m_con_mutex);
1313
1314                 ScopeProfiler sp(g_profiler, "Server: handle players");
1315
1316                 for(core::map<u16, RemoteClient*>::Iterator
1317                         i = m_clients.getIterator();
1318                         i.atEnd() == false; i++)
1319                 {
1320                         RemoteClient *client = i.getNode()->getValue();
1321                         PlayerSAO *playersao = getPlayerSAO(client->peer_id);
1322                         if(playersao == NULL)
1323                                 continue;
1324
1325                         /*
1326                                 Handle player HPs (die if hp=0)
1327                         */
1328                         if(playersao->getHP() == 0 && playersao->m_hp_not_sent)
1329                                 DiePlayer(client->peer_id);
1330
1331                         /*
1332                                 Send player inventories and HPs if necessary
1333                         */
1334                         if(playersao->m_teleported){
1335                                 SendMovePlayer(client->peer_id);
1336                                 playersao->m_teleported = false;
1337                         }
1338                         if(playersao->m_inventory_not_sent){
1339                                 UpdateCrafting(client->peer_id);
1340                                 SendInventory(client->peer_id);
1341                         }
1342                         if(playersao->m_hp_not_sent){
1343                                 SendPlayerHP(client->peer_id);
1344                         }
1345                 }
1346         }
1347
1348         /* Transform liquids */
1349         m_liquid_transform_timer += dtime;
1350         if(m_liquid_transform_timer >= 1.00)
1351         {
1352                 m_liquid_transform_timer -= 1.00;
1353
1354                 JMutexAutoLock lock(m_env_mutex);
1355
1356                 ScopeProfiler sp(g_profiler, "Server: liquid transform");
1357
1358                 core::map<v3s16, MapBlock*> modified_blocks;
1359                 m_env->getMap().transformLiquids(modified_blocks);
1360 #if 0
1361                 /*
1362                         Update lighting
1363                 */
1364                 core::map<v3s16, MapBlock*> lighting_modified_blocks;
1365                 ServerMap &map = ((ServerMap&)m_env->getMap());
1366                 map.updateLighting(modified_blocks, lighting_modified_blocks);
1367
1368                 // Add blocks modified by lighting to modified_blocks
1369                 for(core::map<v3s16, MapBlock*>::Iterator
1370                                 i = lighting_modified_blocks.getIterator();
1371                                 i.atEnd() == false; i++)
1372                 {
1373                         MapBlock *block = i.getNode()->getValue();
1374                         modified_blocks.insert(block->getPos(), block);
1375                 }
1376 #endif
1377                 /*
1378                         Set the modified blocks unsent for all the clients
1379                 */
1380
1381                 JMutexAutoLock lock2(m_con_mutex);
1382
1383                 for(core::map<u16, RemoteClient*>::Iterator
1384                                 i = m_clients.getIterator();
1385                                 i.atEnd() == false; i++)
1386                 {
1387                         RemoteClient *client = i.getNode()->getValue();
1388
1389                         if(modified_blocks.size() > 0)
1390                         {
1391                                 // Remove block from sent history
1392                                 client->SetBlocksNotSent(modified_blocks);
1393                         }
1394                 }
1395         }
1396
1397         // Periodically print some info
1398         {
1399                 float &counter = m_print_info_timer;
1400                 counter += dtime;
1401                 if(counter >= 30.0)
1402                 {
1403                         counter = 0.0;
1404
1405                         JMutexAutoLock lock2(m_con_mutex);
1406
1407                         if(m_clients.size() != 0)
1408                                 infostream<<"Players:"<<std::endl;
1409                         for(core::map<u16, RemoteClient*>::Iterator
1410                                 i = m_clients.getIterator();
1411                                 i.atEnd() == false; i++)
1412                         {
1413                                 //u16 peer_id = i.getNode()->getKey();
1414                                 RemoteClient *client = i.getNode()->getValue();
1415                                 Player *player = m_env->getPlayer(client->peer_id);
1416                                 if(player==NULL)
1417                                         continue;
1418                                 infostream<<"* "<<player->getName()<<"\t";
1419                                 client->PrintInfo(infostream);
1420                         }
1421                 }
1422         }
1423
1424         //if(g_settings->getBool("enable_experimental"))
1425         {
1426
1427         /*
1428                 Check added and deleted active objects
1429         */
1430         {
1431                 //infostream<<"Server: Checking added and deleted active objects"<<std::endl;
1432                 JMutexAutoLock envlock(m_env_mutex);
1433                 JMutexAutoLock conlock(m_con_mutex);
1434
1435                 ScopeProfiler sp(g_profiler, "Server: checking added and deleted objs");
1436
1437                 // Radius inside which objects are active
1438                 s16 radius = g_settings->getS16("active_object_send_range_blocks");
1439                 radius *= MAP_BLOCKSIZE;
1440
1441                 for(core::map<u16, RemoteClient*>::Iterator
1442                         i = m_clients.getIterator();
1443                         i.atEnd() == false; i++)
1444                 {
1445                         RemoteClient *client = i.getNode()->getValue();
1446
1447                         // If definitions and textures have not been sent, don't
1448                         // send objects either
1449                         if(!client->definitions_sent)
1450                                 continue;
1451
1452                         Player *player = m_env->getPlayer(client->peer_id);
1453                         if(player==NULL)
1454                         {
1455                                 // This can happen if the client timeouts somehow
1456                                 /*infostream<<"WARNING: "<<__FUNCTION_NAME<<": Client "
1457                                                 <<client->peer_id
1458                                                 <<" has no associated player"<<std::endl;*/
1459                                 continue;
1460                         }
1461                         v3s16 pos = floatToInt(player->getPosition(), BS);
1462
1463                         core::map<u16, bool> removed_objects;
1464                         core::map<u16, bool> added_objects;
1465                         m_env->getRemovedActiveObjects(pos, radius,
1466                                         client->m_known_objects, removed_objects);
1467                         m_env->getAddedActiveObjects(pos, radius,
1468                                         client->m_known_objects, added_objects);
1469
1470                         // Ignore if nothing happened
1471                         if(removed_objects.size() == 0 && added_objects.size() == 0)
1472                         {
1473                                 //infostream<<"active objects: none changed"<<std::endl;
1474                                 continue;
1475                         }
1476
1477                         std::string data_buffer;
1478
1479                         char buf[4];
1480
1481                         // Handle removed objects
1482                         writeU16((u8*)buf, removed_objects.size());
1483                         data_buffer.append(buf, 2);
1484                         for(core::map<u16, bool>::Iterator
1485                                         i = removed_objects.getIterator();
1486                                         i.atEnd()==false; i++)
1487                         {
1488                                 // Get object
1489                                 u16 id = i.getNode()->getKey();
1490                                 ServerActiveObject* obj = m_env->getActiveObject(id);
1491
1492                                 // Add to data buffer for sending
1493                                 writeU16((u8*)buf, i.getNode()->getKey());
1494                                 data_buffer.append(buf, 2);
1495
1496                                 // Remove from known objects
1497                                 client->m_known_objects.remove(i.getNode()->getKey());
1498
1499                                 if(obj && obj->m_known_by_count > 0)
1500                                         obj->m_known_by_count--;
1501                         }
1502
1503                         // Handle added objects
1504                         writeU16((u8*)buf, added_objects.size());
1505                         data_buffer.append(buf, 2);
1506                         for(core::map<u16, bool>::Iterator
1507                                         i = added_objects.getIterator();
1508                                         i.atEnd()==false; i++)
1509                         {
1510                                 // Get object
1511                                 u16 id = i.getNode()->getKey();
1512                                 ServerActiveObject* obj = m_env->getActiveObject(id);
1513
1514                                 // Get object type
1515                                 u8 type = ACTIVEOBJECT_TYPE_INVALID;
1516                                 if(obj == NULL)
1517                                         infostream<<"WARNING: "<<__FUNCTION_NAME
1518                                                         <<": NULL object"<<std::endl;
1519                                 else
1520                                         type = obj->getSendType();
1521
1522                                 // Add to data buffer for sending
1523                                 writeU16((u8*)buf, id);
1524                                 data_buffer.append(buf, 2);
1525                                 writeU8((u8*)buf, type);
1526                                 data_buffer.append(buf, 1);
1527
1528                                 if(obj)
1529                                         data_buffer.append(serializeLongString(
1530                                                         obj->getClientInitializationData()));
1531                                 else
1532                                         data_buffer.append(serializeLongString(""));
1533
1534                                 // Add to known objects
1535                                 client->m_known_objects.insert(i.getNode()->getKey(), false);
1536
1537                                 if(obj)
1538                                         obj->m_known_by_count++;
1539                         }
1540
1541                         // Send packet
1542                         SharedBuffer<u8> reply(2 + data_buffer.size());
1543                         writeU16(&reply[0], TOCLIENT_ACTIVE_OBJECT_REMOVE_ADD);
1544                         memcpy((char*)&reply[2], data_buffer.c_str(),
1545                                         data_buffer.size());
1546                         // Send as reliable
1547                         m_con.Send(client->peer_id, 0, reply, true);
1548
1549                         verbosestream<<"Server: Sent object remove/add: "
1550                                         <<removed_objects.size()<<" removed, "
1551                                         <<added_objects.size()<<" added, "
1552                                         <<"packet size is "<<reply.getSize()<<std::endl;
1553                 }
1554
1555 #if 0
1556                 /*
1557                         Collect a list of all the objects known by the clients
1558                         and report it back to the environment.
1559                 */
1560
1561                 core::map<u16, bool> all_known_objects;
1562
1563                 for(core::map<u16, RemoteClient*>::Iterator
1564                         i = m_clients.getIterator();
1565                         i.atEnd() == false; i++)
1566                 {
1567                         RemoteClient *client = i.getNode()->getValue();
1568                         // Go through all known objects of client
1569                         for(core::map<u16, bool>::Iterator
1570                                         i = client->m_known_objects.getIterator();
1571                                         i.atEnd()==false; i++)
1572                         {
1573                                 u16 id = i.getNode()->getKey();
1574                                 all_known_objects[id] = true;
1575                         }
1576                 }
1577
1578                 m_env->setKnownActiveObjects(whatever);
1579 #endif
1580
1581         }
1582
1583         /*
1584                 Send object messages
1585         */
1586         {
1587                 JMutexAutoLock envlock(m_env_mutex);
1588                 JMutexAutoLock conlock(m_con_mutex);
1589
1590                 ScopeProfiler sp(g_profiler, "Server: sending object messages");
1591
1592                 // Key = object id
1593                 // Value = data sent by object
1594                 core::map<u16, core::list<ActiveObjectMessage>* > buffered_messages;
1595
1596                 // Get active object messages from environment
1597                 for(;;)
1598                 {
1599                         ActiveObjectMessage aom = m_env->getActiveObjectMessage();
1600                         if(aom.id == 0)
1601                                 break;
1602
1603                         core::list<ActiveObjectMessage>* message_list = NULL;
1604                         core::map<u16, core::list<ActiveObjectMessage>* >::Node *n;
1605                         n = buffered_messages.find(aom.id);
1606                         if(n == NULL)
1607                         {
1608                                 message_list = new core::list<ActiveObjectMessage>;
1609                                 buffered_messages.insert(aom.id, message_list);
1610                         }
1611                         else
1612                         {
1613                                 message_list = n->getValue();
1614                         }
1615                         message_list->push_back(aom);
1616                 }
1617
1618                 // Route data to every client
1619                 for(core::map<u16, RemoteClient*>::Iterator
1620                         i = m_clients.getIterator();
1621                         i.atEnd()==false; i++)
1622                 {
1623                         RemoteClient *client = i.getNode()->getValue();
1624                         std::string reliable_data;
1625                         std::string unreliable_data;
1626                         // Go through all objects in message buffer
1627                         for(core::map<u16, core::list<ActiveObjectMessage>* >::Iterator
1628                                         j = buffered_messages.getIterator();
1629                                         j.atEnd()==false; j++)
1630                         {
1631                                 // If object is not known by client, skip it
1632                                 u16 id = j.getNode()->getKey();
1633                                 if(client->m_known_objects.find(id) == NULL)
1634                                         continue;
1635                                 // Get message list of object
1636                                 core::list<ActiveObjectMessage>* list = j.getNode()->getValue();
1637                                 // Go through every message
1638                                 for(core::list<ActiveObjectMessage>::Iterator
1639                                                 k = list->begin(); k != list->end(); k++)
1640                                 {
1641                                         // Compose the full new data with header
1642                                         ActiveObjectMessage aom = *k;
1643                                         std::string new_data;
1644                                         // Add object id
1645                                         char buf[2];
1646                                         writeU16((u8*)&buf[0], aom.id);
1647                                         new_data.append(buf, 2);
1648                                         // Add data
1649                                         new_data += serializeString(aom.datastring);
1650                                         // Add data to buffer
1651                                         if(aom.reliable)
1652                                                 reliable_data += new_data;
1653                                         else
1654                                                 unreliable_data += new_data;
1655                                 }
1656                         }
1657                         /*
1658                                 reliable_data and unreliable_data are now ready.
1659                                 Send them.
1660                         */
1661                         if(reliable_data.size() > 0)
1662                         {
1663                                 SharedBuffer<u8> reply(2 + reliable_data.size());
1664                                 writeU16(&reply[0], TOCLIENT_ACTIVE_OBJECT_MESSAGES);
1665                                 memcpy((char*)&reply[2], reliable_data.c_str(),
1666                                                 reliable_data.size());
1667                                 // Send as reliable
1668                                 m_con.Send(client->peer_id, 0, reply, true);
1669                         }
1670                         if(unreliable_data.size() > 0)
1671                         {
1672                                 SharedBuffer<u8> reply(2 + unreliable_data.size());
1673                                 writeU16(&reply[0], TOCLIENT_ACTIVE_OBJECT_MESSAGES);
1674                                 memcpy((char*)&reply[2], unreliable_data.c_str(),
1675                                                 unreliable_data.size());
1676                                 // Send as unreliable
1677                                 m_con.Send(client->peer_id, 0, reply, false);
1678                         }
1679
1680                         /*if(reliable_data.size() > 0 || unreliable_data.size() > 0)
1681                         {
1682                                 infostream<<"Server: Size of object message data: "
1683                                                 <<"reliable: "<<reliable_data.size()
1684                                                 <<", unreliable: "<<unreliable_data.size()
1685                                                 <<std::endl;
1686                         }*/
1687                 }
1688
1689                 // Clear buffered_messages
1690                 for(core::map<u16, core::list<ActiveObjectMessage>* >::Iterator
1691                                 i = buffered_messages.getIterator();
1692                                 i.atEnd()==false; i++)
1693                 {
1694                         delete i.getNode()->getValue();
1695                 }
1696         }
1697
1698         } // enable_experimental
1699
1700         /*
1701                 Send queued-for-sending map edit events.
1702         */
1703         {
1704                 // We will be accessing the environment and the connection
1705                 JMutexAutoLock lock(m_env_mutex);
1706                 JMutexAutoLock conlock(m_con_mutex);
1707
1708                 // Don't send too many at a time
1709                 //u32 count = 0;
1710
1711                 // Single change sending is disabled if queue size is not small
1712                 bool disable_single_change_sending = false;
1713                 if(m_unsent_map_edit_queue.size() >= 4)
1714                         disable_single_change_sending = true;
1715
1716                 int event_count = m_unsent_map_edit_queue.size();
1717
1718                 // We'll log the amount of each
1719                 Profiler prof;
1720
1721                 while(m_unsent_map_edit_queue.size() != 0)
1722                 {
1723                         MapEditEvent* event = m_unsent_map_edit_queue.pop_front();
1724
1725                         // Players far away from the change are stored here.
1726                         // Instead of sending the changes, MapBlocks are set not sent
1727                         // for them.
1728                         core::list<u16> far_players;
1729
1730                         if(event->type == MEET_ADDNODE)
1731                         {
1732                                 //infostream<<"Server: MEET_ADDNODE"<<std::endl;
1733                                 prof.add("MEET_ADDNODE", 1);
1734                                 if(disable_single_change_sending)
1735                                         sendAddNode(event->p, event->n, event->already_known_by_peer,
1736                                                         &far_players, 5);
1737                                 else
1738                                         sendAddNode(event->p, event->n, event->already_known_by_peer,
1739                                                         &far_players, 30);
1740                         }
1741                         else if(event->type == MEET_REMOVENODE)
1742                         {
1743                                 //infostream<<"Server: MEET_REMOVENODE"<<std::endl;
1744                                 prof.add("MEET_REMOVENODE", 1);
1745                                 if(disable_single_change_sending)
1746                                         sendRemoveNode(event->p, event->already_known_by_peer,
1747                                                         &far_players, 5);
1748                                 else
1749                                         sendRemoveNode(event->p, event->already_known_by_peer,
1750                                                         &far_players, 30);
1751                         }
1752                         else if(event->type == MEET_BLOCK_NODE_METADATA_CHANGED)
1753                         {
1754                                 infostream<<"Server: MEET_BLOCK_NODE_METADATA_CHANGED"<<std::endl;
1755                                 prof.add("MEET_BLOCK_NODE_METADATA_CHANGED", 1);
1756                                 setBlockNotSent(event->p);
1757                         }
1758                         else if(event->type == MEET_OTHER)
1759                         {
1760                                 infostream<<"Server: MEET_OTHER"<<std::endl;
1761                                 prof.add("MEET_OTHER", 1);
1762                                 for(core::map<v3s16, bool>::Iterator
1763                                                 i = event->modified_blocks.getIterator();
1764                                                 i.atEnd()==false; i++)
1765                                 {
1766                                         v3s16 p = i.getNode()->getKey();
1767                                         setBlockNotSent(p);
1768                                 }
1769                         }
1770                         else
1771                         {
1772                                 prof.add("unknown", 1);
1773                                 infostream<<"WARNING: Server: Unknown MapEditEvent "
1774                                                 <<((u32)event->type)<<std::endl;
1775                         }
1776
1777                         /*
1778                                 Set blocks not sent to far players
1779                         */
1780                         if(far_players.size() > 0)
1781                         {
1782                                 // Convert list format to that wanted by SetBlocksNotSent
1783                                 core::map<v3s16, MapBlock*> modified_blocks2;
1784                                 for(core::map<v3s16, bool>::Iterator
1785                                                 i = event->modified_blocks.getIterator();
1786                                                 i.atEnd()==false; i++)
1787                                 {
1788                                         v3s16 p = i.getNode()->getKey();
1789                                         modified_blocks2.insert(p,
1790                                                         m_env->getMap().getBlockNoCreateNoEx(p));
1791                                 }
1792                                 // Set blocks not sent
1793                                 for(core::list<u16>::Iterator
1794                                                 i = far_players.begin();
1795                                                 i != far_players.end(); i++)
1796                                 {
1797                                         u16 peer_id = *i;
1798                                         RemoteClient *client = getClient(peer_id);
1799                                         if(client==NULL)
1800                                                 continue;
1801                                         client->SetBlocksNotSent(modified_blocks2);
1802                                 }
1803                         }
1804
1805                         delete event;
1806
1807                         /*// Don't send too many at a time
1808                         count++;
1809                         if(count >= 1 && m_unsent_map_edit_queue.size() < 100)
1810                                 break;*/
1811                 }
1812
1813                 if(event_count >= 5){
1814                         infostream<<"Server: MapEditEvents:"<<std::endl;
1815                         prof.print(infostream);
1816                 } else if(event_count != 0){
1817                         verbosestream<<"Server: MapEditEvents:"<<std::endl;
1818                         prof.print(verbosestream);
1819                 }
1820
1821         }
1822
1823         /*
1824                 Trigger emergethread (it somehow gets to a non-triggered but
1825                 bysy state sometimes)
1826         */
1827         {
1828                 float &counter = m_emergethread_trigger_timer;
1829                 counter += dtime;
1830                 if(counter >= 2.0)
1831                 {
1832                         counter = 0.0;
1833
1834                         m_emergethread.trigger();
1835                 }
1836         }
1837
1838         // Save map, players and auth stuff
1839         {
1840                 float &counter = m_savemap_timer;
1841                 counter += dtime;
1842                 if(counter >= g_settings->getFloat("server_map_save_interval"))
1843                 {
1844                         counter = 0.0;
1845                         JMutexAutoLock lock(m_env_mutex);
1846
1847                         ScopeProfiler sp(g_profiler, "Server: saving stuff");
1848
1849                         //Ban stuff
1850                         if(m_banmanager.isModified())
1851                                 m_banmanager.save();
1852
1853                         // Save changed parts of map
1854                         m_env->getMap().save(MOD_STATE_WRITE_NEEDED);
1855
1856                         // Save players
1857                         m_env->serializePlayers(m_path_world);
1858
1859                         // Save environment metadata
1860                         m_env->saveMeta(m_path_world);
1861                 }
1862         }
1863 }
1864
1865 void Server::Receive()
1866 {
1867         DSTACK(__FUNCTION_NAME);
1868         SharedBuffer<u8> data;
1869         u16 peer_id;
1870         u32 datasize;
1871         try{
1872                 {
1873                         JMutexAutoLock conlock(m_con_mutex);
1874                         datasize = m_con.Receive(peer_id, data);
1875                 }
1876
1877                 // This has to be called so that the client list gets synced
1878                 // with the peer list of the connection
1879                 handlePeerChanges();
1880
1881                 ProcessData(*data, datasize, peer_id);
1882         }
1883         catch(con::InvalidIncomingDataException &e)
1884         {
1885                 infostream<<"Server::Receive(): "
1886                                 "InvalidIncomingDataException: what()="
1887                                 <<e.what()<<std::endl;
1888         }
1889         catch(con::PeerNotFoundException &e)
1890         {
1891                 //NOTE: This is not needed anymore
1892
1893                 // The peer has been disconnected.
1894                 // Find the associated player and remove it.
1895
1896                 /*JMutexAutoLock envlock(m_env_mutex);
1897
1898                 infostream<<"ServerThread: peer_id="<<peer_id
1899                                 <<" has apparently closed connection. "
1900                                 <<"Removing player."<<std::endl;
1901
1902                 m_env->removePlayer(peer_id);*/
1903         }
1904 }
1905
1906 void Server::ProcessData(u8 *data, u32 datasize, u16 peer_id)
1907 {
1908         DSTACK(__FUNCTION_NAME);
1909         // Environment is locked first.
1910         JMutexAutoLock envlock(m_env_mutex);
1911         JMutexAutoLock conlock(m_con_mutex);
1912
1913         ScopeProfiler sp(g_profiler, "Server::ProcessData");
1914
1915         try{
1916                 Address address = m_con.GetPeerAddress(peer_id);
1917                 std::string addr_s = address.serializeString();
1918
1919                 // drop player if is ip is banned
1920                 if(m_banmanager.isIpBanned(addr_s)){
1921                         infostream<<"Server: A banned client tried to connect from "
1922                                         <<addr_s<<"; banned name was "
1923                                         <<m_banmanager.getBanName(addr_s)<<std::endl;
1924                         // This actually doesn't seem to transfer to the client
1925                         SendAccessDenied(m_con, peer_id,
1926                                         L"Your ip is banned. Banned name was "
1927                                         +narrow_to_wide(m_banmanager.getBanName(addr_s)));
1928                         m_con.DeletePeer(peer_id);
1929                         return;
1930                 }
1931         }
1932         catch(con::PeerNotFoundException &e)
1933         {
1934                 infostream<<"Server::ProcessData(): Cancelling: peer "
1935                                 <<peer_id<<" not found"<<std::endl;
1936                 return;
1937         }
1938
1939         std::string addr_s = m_con.GetPeerAddress(peer_id).serializeString();
1940
1941         u8 peer_ser_ver = getClient(peer_id)->serialization_version;
1942
1943         try
1944         {
1945
1946         if(datasize < 2)
1947                 return;
1948
1949         ToServerCommand command = (ToServerCommand)readU16(&data[0]);
1950
1951         if(command == TOSERVER_INIT)
1952         {
1953                 // [0] u16 TOSERVER_INIT
1954                 // [2] u8 SER_FMT_VER_HIGHEST
1955                 // [3] u8[20] player_name
1956                 // [23] u8[28] password <--- can be sent without this, from old versions
1957
1958                 if(datasize < 2+1+PLAYERNAME_SIZE)
1959                         return;
1960
1961                 verbosestream<<"Server: Got TOSERVER_INIT from "
1962                                 <<peer_id<<std::endl;
1963
1964                 // First byte after command is maximum supported
1965                 // serialization version
1966                 u8 client_max = data[2];
1967                 u8 our_max = SER_FMT_VER_HIGHEST;
1968                 // Use the highest version supported by both
1969                 u8 deployed = core::min_(client_max, our_max);
1970                 // If it's lower than the lowest supported, give up.
1971                 if(deployed < SER_FMT_VER_LOWEST)
1972                         deployed = SER_FMT_VER_INVALID;
1973
1974                 //peer->serialization_version = deployed;
1975                 getClient(peer_id)->pending_serialization_version = deployed;
1976
1977                 if(deployed == SER_FMT_VER_INVALID)
1978                 {
1979                         actionstream<<"Server: A mismatched client tried to connect from "
1980                                         <<addr_s<<std::endl;
1981                         infostream<<"Server: Cannot negotiate "
1982                                         "serialization version with peer "
1983                                         <<peer_id<<std::endl;
1984                         SendAccessDenied(m_con, peer_id, std::wstring(
1985                                         L"Your client's version is not supported.\n"
1986                                         L"Server version is ")
1987                                         + narrow_to_wide(VERSION_STRING) + L"."
1988                         );
1989                         return;
1990                 }
1991
1992                 /*
1993                         Read and check network protocol version
1994                 */
1995
1996                 u16 net_proto_version = 0;
1997                 if(datasize >= 2+1+PLAYERNAME_SIZE+PASSWORD_SIZE+2)
1998                 {
1999                         net_proto_version = readU16(&data[2+1+PLAYERNAME_SIZE+PASSWORD_SIZE]);
2000                 }
2001
2002                 getClient(peer_id)->net_proto_version = net_proto_version;
2003
2004                 if(net_proto_version == 0)
2005                 {
2006                         actionstream<<"Server: An old tried to connect from "<<addr_s
2007                                         <<std::endl;
2008                         SendAccessDenied(m_con, peer_id, std::wstring(
2009                                         L"Your client's version is not supported.\n"
2010                                         L"Server version is ")
2011                                         + narrow_to_wide(VERSION_STRING) + L"."
2012                         );
2013                         return;
2014                 }
2015
2016                 if(g_settings->getBool("strict_protocol_version_checking"))
2017                 {
2018                         if(net_proto_version != PROTOCOL_VERSION)
2019                         {
2020                                 actionstream<<"Server: A mismatched client tried to connect"
2021                                                 <<" from "<<addr_s<<std::endl;
2022                                 SendAccessDenied(m_con, peer_id, std::wstring(
2023                                                 L"Your client's version is not supported.\n"
2024                                                 L"Server version is ")
2025                                                 + narrow_to_wide(VERSION_STRING) + L",\n"
2026                                                 + L"server's PROTOCOL_VERSION is "
2027                                                 + narrow_to_wide(itos(PROTOCOL_VERSION))
2028                                                 + L", client's PROTOCOL_VERSION is "
2029                                                 + narrow_to_wide(itos(net_proto_version))
2030                                 );
2031                                 return;
2032                         }
2033                 }
2034
2035                 /*
2036                         Set up player
2037                 */
2038
2039                 // Get player name
2040                 char playername[PLAYERNAME_SIZE];
2041                 for(u32 i=0; i<PLAYERNAME_SIZE-1; i++)
2042                 {
2043                         playername[i] = data[3+i];
2044                 }
2045                 playername[PLAYERNAME_SIZE-1] = 0;
2046
2047                 if(playername[0]=='\0')
2048                 {
2049                         actionstream<<"Server: Player with an empty name "
2050                                         <<"tried to connect from "<<addr_s<<std::endl;
2051                         SendAccessDenied(m_con, peer_id,
2052                                         L"Empty name");
2053                         return;
2054                 }
2055
2056                 if(string_allowed(playername, PLAYERNAME_ALLOWED_CHARS)==false)
2057                 {
2058                         actionstream<<"Server: Player with an invalid name "
2059                                         <<"tried to connect from "<<addr_s<<std::endl;
2060                         SendAccessDenied(m_con, peer_id,
2061                                         L"Name contains unallowed characters");
2062                         return;
2063                 }
2064
2065                 infostream<<"Server: New connection: \""<<playername<<"\" from "
2066                                 <<m_con.GetPeerAddress(peer_id).serializeString()<<std::endl;
2067
2068                 // Get password
2069                 char password[PASSWORD_SIZE];
2070                 if(datasize < 2+1+PLAYERNAME_SIZE+PASSWORD_SIZE)
2071                 {
2072                         // old version - assume blank password
2073                         password[0] = 0;
2074                 }
2075                 else
2076                 {
2077                         for(u32 i=0; i<PASSWORD_SIZE-1; i++)
2078                         {
2079                                 password[i] = data[23+i];
2080                         }
2081                         password[PASSWORD_SIZE-1] = 0;
2082                 }
2083
2084                 std::string checkpwd;
2085                 bool has_auth = scriptapi_get_auth(m_lua, playername, &checkpwd, NULL);
2086
2087                 if(!has_auth){
2088                         std::wstring raw_default_password =
2089                                 narrow_to_wide(g_settings->get("default_password"));
2090                         std::string use_password =
2091                                 translatePassword(playername, raw_default_password);
2092
2093                         // If default_password is empty, allow any initial password
2094                         if (raw_default_password.length() == 0)
2095                                 use_password = password;
2096
2097                         scriptapi_create_auth(m_lua, playername, use_password);
2098                 }
2099
2100                 has_auth = scriptapi_get_auth(m_lua, playername, &checkpwd, NULL);
2101
2102                 if(!has_auth){
2103                         SendAccessDenied(m_con, peer_id, L"Not allowed to login");
2104                         return;
2105                 }
2106
2107                 if(password != checkpwd){
2108                         infostream<<"Server: peer_id="<<peer_id
2109                                         <<": supplied invalid password for "
2110                                         <<playername<<std::endl;
2111                         SendAccessDenied(m_con, peer_id, L"Invalid password");
2112                         return;
2113                 }
2114
2115                 // Do not allow multiple players in simple singleplayer mode.
2116                 // This isn't a perfect way to do it, but will suffice for now.
2117                 if(m_simple_singleplayer_mode && m_clients.size() > 1){
2118                         infostream<<"Server: Not allowing another client to connect in"
2119                                         <<" simple singleplayer mode"<<std::endl;
2120                         SendAccessDenied(m_con, peer_id,
2121                                         L"Running in simple singleplayer mode.");
2122                         return;
2123                 }
2124
2125                 // Enforce user limit.
2126                 // Don't enforce for users that have some admin right
2127                 if(m_clients.size() >= g_settings->getU16("max_users") &&
2128                                 !checkPriv(playername, "server") &&
2129                                 !checkPriv(playername, "ban") &&
2130                                 !checkPriv(playername, "privs") &&
2131                                 !checkPriv(playername, "password") &&
2132                                 playername != g_settings->get("name"))
2133                 {
2134                         actionstream<<"Server: "<<playername<<" tried to join, but there"
2135                                         <<" are already max_users="
2136                                         <<g_settings->getU16("max_users")<<" players."<<std::endl;
2137                         SendAccessDenied(m_con, peer_id, L"Too many users.");
2138                         return;
2139                 }
2140
2141                 // Get player
2142                 PlayerSAO *playersao = emergePlayer(playername, peer_id);
2143
2144                 // If failed, cancel
2145                 if(playersao == NULL)
2146                 {
2147                         errorstream<<"Server: peer_id="<<peer_id
2148                                         <<": failed to emerge player"<<std::endl;
2149                         return;
2150                 }
2151
2152                 /*
2153                         Answer with a TOCLIENT_INIT
2154                 */
2155                 {
2156                         SharedBuffer<u8> reply(2+1+6+8);
2157                         writeU16(&reply[0], TOCLIENT_INIT);
2158                         writeU8(&reply[2], deployed);
2159                         writeV3S16(&reply[2+1], floatToInt(playersao->getPlayer()->getPosition()+v3f(0,BS/2,0), BS));
2160                         writeU64(&reply[2+1+6], m_env->getServerMap().getSeed());
2161
2162                         // Send as reliable
2163                         m_con.Send(peer_id, 0, reply, true);
2164                 }
2165
2166                 /*
2167                         Send complete position information
2168                 */
2169                 SendMovePlayer(peer_id);
2170
2171                 return;
2172         }
2173
2174         if(command == TOSERVER_INIT2)
2175         {
2176                 verbosestream<<"Server: Got TOSERVER_INIT2 from "
2177                                 <<peer_id<<std::endl;
2178
2179
2180                 getClient(peer_id)->serialization_version
2181                                 = getClient(peer_id)->pending_serialization_version;
2182
2183                 /*
2184                         Send some initialization data
2185                 */
2186
2187                 infostream<<"Server: Sending content to "
2188                                 <<getPlayerName(peer_id)<<std::endl;
2189
2190                 // Send item definitions
2191                 SendItemDef(m_con, peer_id, m_itemdef);
2192
2193                 // Send node definitions
2194                 SendNodeDef(m_con, peer_id, m_nodedef);
2195
2196                 // Send media announcement
2197                 sendMediaAnnouncement(peer_id);
2198
2199                 // Send privileges
2200                 SendPlayerPrivileges(peer_id);
2201
2202                 // Send inventory
2203                 UpdateCrafting(peer_id);
2204                 SendInventory(peer_id);
2205
2206                 Player *player = m_env->getPlayer(peer_id);
2207
2208                 // Send HP
2209                 SendPlayerHP(peer_id);
2210
2211                 // Show death screen if necessary
2212                 if(player->hp == 0)
2213                         SendDeathscreen(m_con, peer_id, false, v3f(0,0,0));
2214
2215                 // Send time of day
2216                 {
2217                         SharedBuffer<u8> data = makePacket_TOCLIENT_TIME_OF_DAY(
2218                                         m_env->getTimeOfDay(), g_settings->getFloat("time_speed"));
2219                         m_con.Send(peer_id, 0, data, true);
2220                 }
2221
2222                 // Note things in chat if not in simple singleplayer mode
2223                 if(!m_simple_singleplayer_mode)
2224                 {
2225                         // Send information about server to player in chat
2226                         SendChatMessage(peer_id, getStatusString());
2227
2228                         // Send information about joining in chat
2229                         {
2230                                 std::wstring name = L"unknown";
2231                                 Player *player = m_env->getPlayer(peer_id);
2232                                 if(player != NULL)
2233                                         name = narrow_to_wide(player->getName());
2234
2235                                 std::wstring message;
2236                                 message += L"*** ";
2237                                 message += name;
2238                                 message += L" joined game";
2239                                 BroadcastChatMessage(message);
2240                         }
2241                 }
2242
2243                 // Warnings about protocol version can be issued here
2244                 if(getClient(peer_id)->net_proto_version < PROTOCOL_VERSION)
2245                 {
2246                         SendChatMessage(peer_id, L"# Server: WARNING: YOUR CLIENT IS OLD AND MAY WORK PROPERLY WITH THIS SERVER");
2247                 }
2248
2249                 /*
2250                         Print out action
2251                 */
2252                 {
2253                         std::ostringstream os(std::ios_base::binary);
2254                         for(core::map<u16, RemoteClient*>::Iterator
2255                                 i = m_clients.getIterator();
2256                                 i.atEnd() == false; i++)
2257                         {
2258                                 RemoteClient *client = i.getNode()->getValue();
2259                                 assert(client->peer_id == i.getNode()->getKey());
2260                                 if(client->serialization_version == SER_FMT_VER_INVALID)
2261                                         continue;
2262                                 // Get player
2263                                 Player *player = m_env->getPlayer(client->peer_id);
2264                                 if(!player)
2265                                         continue;
2266                                 // Get name of player
2267                                 os<<player->getName()<<" ";
2268                         }
2269
2270                         actionstream<<player->getName()<<" joins game. List of players: "
2271                                         <<os.str()<<std::endl;
2272                 }
2273
2274                 return;
2275         }
2276
2277         if(peer_ser_ver == SER_FMT_VER_INVALID)
2278         {
2279                 infostream<<"Server::ProcessData(): Cancelling: Peer"
2280                                 " serialization format invalid or not initialized."
2281                                 " Skipping incoming command="<<command<<std::endl;
2282                 return;
2283         }
2284
2285         Player *player = m_env->getPlayer(peer_id);
2286         if(player == NULL){
2287                 infostream<<"Server::ProcessData(): Cancelling: "
2288                                 "No player for peer_id="<<peer_id
2289                                 <<std::endl;
2290                 return;
2291         }
2292
2293         PlayerSAO *playersao = player->getPlayerSAO();
2294         if(playersao == NULL){
2295                 infostream<<"Server::ProcessData(): Cancelling: "
2296                                 "No player object for peer_id="<<peer_id
2297                                 <<std::endl;
2298                 return;
2299         }
2300
2301         if(command == TOSERVER_PLAYERPOS)
2302         {
2303                 if(datasize < 2+12+12+4+4)
2304                         return;
2305
2306                 u32 start = 0;
2307                 v3s32 ps = readV3S32(&data[start+2]);
2308                 v3s32 ss = readV3S32(&data[start+2+12]);
2309                 f32 pitch = (f32)readS32(&data[2+12+12]) / 100.0;
2310                 f32 yaw = (f32)readS32(&data[2+12+12+4]) / 100.0;
2311                 v3f position((f32)ps.X/100., (f32)ps.Y/100., (f32)ps.Z/100.);
2312                 v3f speed((f32)ss.X/100., (f32)ss.Y/100., (f32)ss.Z/100.);
2313                 pitch = wrapDegrees(pitch);
2314                 yaw = wrapDegrees(yaw);
2315
2316                 player->setPosition(position);
2317                 player->setSpeed(speed);
2318                 player->setPitch(pitch);
2319                 player->setYaw(yaw);
2320
2321                 /*infostream<<"Server::ProcessData(): Moved player "<<peer_id<<" to "
2322                                 <<"("<<position.X<<","<<position.Y<<","<<position.Z<<")"
2323                                 <<" pitch="<<pitch<<" yaw="<<yaw<<std::endl;*/
2324         }
2325         else if(command == TOSERVER_GOTBLOCKS)
2326         {
2327                 if(datasize < 2+1)
2328                         return;
2329
2330                 /*
2331                         [0] u16 command
2332                         [2] u8 count
2333                         [3] v3s16 pos_0
2334                         [3+6] v3s16 pos_1
2335                         ...
2336                 */
2337
2338                 u16 count = data[2];
2339                 for(u16 i=0; i<count; i++)
2340                 {
2341                         if((s16)datasize < 2+1+(i+1)*6)
2342                                 throw con::InvalidIncomingDataException
2343                                         ("GOTBLOCKS length is too short");
2344                         v3s16 p = readV3S16(&data[2+1+i*6]);
2345                         /*infostream<<"Server: GOTBLOCKS ("
2346                                         <<p.X<<","<<p.Y<<","<<p.Z<<")"<<std::endl;*/
2347                         RemoteClient *client = getClient(peer_id);
2348                         client->GotBlock(p);
2349                 }
2350         }
2351         else if(command == TOSERVER_DELETEDBLOCKS)
2352         {
2353                 if(datasize < 2+1)
2354                         return;
2355
2356                 /*
2357                         [0] u16 command
2358                         [2] u8 count
2359                         [3] v3s16 pos_0
2360                         [3+6] v3s16 pos_1
2361                         ...
2362                 */
2363
2364                 u16 count = data[2];
2365                 for(u16 i=0; i<count; i++)
2366                 {
2367                         if((s16)datasize < 2+1+(i+1)*6)
2368                                 throw con::InvalidIncomingDataException
2369                                         ("DELETEDBLOCKS length is too short");
2370                         v3s16 p = readV3S16(&data[2+1+i*6]);
2371                         /*infostream<<"Server: DELETEDBLOCKS ("
2372                                         <<p.X<<","<<p.Y<<","<<p.Z<<")"<<std::endl;*/
2373                         RemoteClient *client = getClient(peer_id);
2374                         client->SetBlockNotSent(p);
2375                 }
2376         }
2377         else if(command == TOSERVER_CLICK_OBJECT)
2378         {
2379                 infostream<<"Server: CLICK_OBJECT not supported anymore"<<std::endl;
2380                 return;
2381         }
2382         else if(command == TOSERVER_CLICK_ACTIVEOBJECT)
2383         {
2384                 infostream<<"Server: CLICK_ACTIVEOBJECT not supported anymore"<<std::endl;
2385                 return;
2386         }
2387         else if(command == TOSERVER_GROUND_ACTION)
2388         {
2389                 infostream<<"Server: GROUND_ACTION not supported anymore"<<std::endl;
2390                 return;
2391
2392         }
2393         else if(command == TOSERVER_RELEASE)
2394         {
2395                 infostream<<"Server: RELEASE not supported anymore"<<std::endl;
2396                 return;
2397         }
2398         else if(command == TOSERVER_SIGNTEXT)
2399         {
2400                 infostream<<"Server: SIGNTEXT not supported anymore"
2401                                 <<std::endl;
2402                 return;
2403         }
2404         else if(command == TOSERVER_SIGNNODETEXT)
2405         {
2406                 if(!checkPriv(player->getName(), "interact"))
2407                         return;
2408                 /*
2409                         u16 command
2410                         v3s16 p
2411                         u16 textlen
2412                         textdata
2413                 */
2414                 std::string datastring((char*)&data[2], datasize-2);
2415                 std::istringstream is(datastring, std::ios_base::binary);
2416                 u8 buf[6];
2417                 // Read stuff
2418                 is.read((char*)buf, 6);
2419                 v3s16 p = readV3S16(buf);
2420                 is.read((char*)buf, 2);
2421                 u16 textlen = readU16(buf);
2422                 std::string text;
2423                 for(u16 i=0; i<textlen; i++)
2424                 {
2425                         is.read((char*)buf, 1);
2426                         text += (char)buf[0];
2427                 }
2428
2429                 NodeMetadata *meta = m_env->getMap().getNodeMetadata(p);
2430                 if(!meta)
2431                         return;
2432
2433                 meta->setText(text);
2434
2435                 actionstream<<player->getName()<<" writes \""<<text<<"\" to sign"
2436                                 <<" at "<<PP(p)<<std::endl;
2437
2438                 v3s16 blockpos = getNodeBlockPos(p);
2439                 MapBlock *block = m_env->getMap().getBlockNoCreateNoEx(blockpos);
2440                 if(block)
2441                 {
2442                         block->raiseModified(MOD_STATE_WRITE_NEEDED,
2443                                         "sign node text");
2444                 }
2445
2446                 setBlockNotSent(blockpos);
2447         }
2448         else if(command == TOSERVER_INVENTORY_ACTION)
2449         {
2450                 // Strip command and create a stream
2451                 std::string datastring((char*)&data[2], datasize-2);
2452                 verbosestream<<"TOSERVER_INVENTORY_ACTION: data="<<datastring<<std::endl;
2453                 std::istringstream is(datastring, std::ios_base::binary);
2454                 // Create an action
2455                 InventoryAction *a = InventoryAction::deSerialize(is);
2456                 if(a == NULL)
2457                 {
2458                         infostream<<"TOSERVER_INVENTORY_ACTION: "
2459                                         <<"InventoryAction::deSerialize() returned NULL"
2460                                         <<std::endl;
2461                         return;
2462                 }
2463
2464                 /*
2465                         Note: Always set inventory not sent, to repair cases
2466                         where the client made a bad prediction.
2467                 */
2468
2469                 /*
2470                         Handle restrictions and special cases of the move action
2471                 */
2472                 if(a->getType() == IACTION_MOVE)
2473                 {
2474                         IMoveAction *ma = (IMoveAction*)a;
2475
2476                         ma->from_inv.applyCurrentPlayer(player->getName());
2477                         ma->to_inv.applyCurrentPlayer(player->getName());
2478
2479                         setInventoryModified(ma->from_inv);
2480                         setInventoryModified(ma->to_inv);
2481
2482                         bool from_inv_is_current_player =
2483                                 (ma->from_inv.type == InventoryLocation::PLAYER) &&
2484                                 (ma->from_inv.name == player->getName());
2485
2486                         bool to_inv_is_current_player =
2487                                 (ma->to_inv.type == InventoryLocation::PLAYER) &&
2488                                 (ma->to_inv.name == player->getName());
2489
2490                         /*
2491                                 Disable moving items out of craftpreview
2492                         */
2493                         if(ma->from_list == "craftpreview")
2494                         {
2495                                 infostream<<"Ignoring IMoveAction from "
2496                                                 <<(ma->from_inv.dump())<<":"<<ma->from_list
2497                                                 <<" to "<<(ma->to_inv.dump())<<":"<<ma->to_list
2498                                                 <<" because src is "<<ma->from_list<<std::endl;
2499                                 delete a;
2500                                 return;
2501                         }
2502
2503                         /*
2504                                 Disable moving items into craftresult and craftpreview
2505                         */
2506                         if(ma->to_list == "craftpreview" || ma->to_list == "craftresult")
2507                         {
2508                                 infostream<<"Ignoring IMoveAction from "
2509                                                 <<(ma->from_inv.dump())<<":"<<ma->from_list
2510                                                 <<" to "<<(ma->to_inv.dump())<<":"<<ma->to_list
2511                                                 <<" because dst is "<<ma->to_list<<std::endl;
2512                                 delete a;
2513                                 return;
2514                         }
2515
2516                         // Disallow moving items in elsewhere than player's inventory
2517                         // if not allowed to interact
2518                         if(!checkPriv(player->getName(), "interact") &&
2519                                         (!from_inv_is_current_player ||
2520                                         !to_inv_is_current_player))
2521                         {
2522                                 infostream<<"Cannot move outside of player's inventory: "
2523                                                 <<"No interact privilege"<<std::endl;
2524                                 delete a;
2525                                 return;
2526                         }
2527
2528                         // If player is not an admin, check for ownership of src and dst
2529                         if(!checkPriv(player->getName(), "server"))
2530                         {
2531                                 std::string owner_from = getInventoryOwner(ma->from_inv);
2532                                 if(owner_from != "" && owner_from != player->getName())
2533                                 {
2534                                         infostream<<"WARNING: "<<player->getName()
2535                                                 <<" tried to access an inventory that"
2536                                                 <<" belongs to "<<owner_from<<std::endl;
2537                                         delete a;
2538                                         return;
2539                                 }
2540
2541                                 std::string owner_to = getInventoryOwner(ma->to_inv);
2542                                 if(owner_to != "" && owner_to != player->getName())
2543                                 {
2544                                         infostream<<"WARNING: "<<player->getName()
2545                                                 <<" tried to access an inventory that"
2546                                                 <<" belongs to "<<owner_to<<std::endl;
2547                                         delete a;
2548                                         return;
2549                                 }
2550                         }
2551                 }
2552                 /*
2553                         Handle restrictions and special cases of the drop action
2554                 */
2555                 else if(a->getType() == IACTION_DROP)
2556                 {
2557                         IDropAction *da = (IDropAction*)a;
2558
2559                         da->from_inv.applyCurrentPlayer(player->getName());
2560
2561                         setInventoryModified(da->from_inv);
2562
2563                         // Disallow dropping items if not allowed to interact
2564                         if(!checkPriv(player->getName(), "interact"))
2565                         {
2566                                 delete a;
2567                                 return;
2568                         }
2569                         // If player is not an admin, check for ownership
2570                         else if(!checkPriv(player->getName(), "server"))
2571                         {
2572                                 std::string owner_from = getInventoryOwner(da->from_inv);
2573                                 if(owner_from != "" && owner_from != player->getName())
2574                                 {
2575                                         infostream<<"WARNING: "<<player->getName()
2576                                                 <<" tried to access an inventory that"
2577                                                 <<" belongs to "<<owner_from<<std::endl;
2578                                         delete a;
2579                                         return;
2580                                 }
2581                         }
2582                 }
2583                 /*
2584                         Handle restrictions and special cases of the craft action
2585                 */
2586                 else if(a->getType() == IACTION_CRAFT)
2587                 {
2588                         ICraftAction *ca = (ICraftAction*)a;
2589
2590                         ca->craft_inv.applyCurrentPlayer(player->getName());
2591
2592                         setInventoryModified(ca->craft_inv);
2593
2594                         //bool craft_inv_is_current_player =
2595                         //      (ca->craft_inv.type == InventoryLocation::PLAYER) &&
2596                         //      (ca->craft_inv.name == player->getName());
2597
2598                         // Disallow crafting if not allowed to interact
2599                         if(!checkPriv(player->getName(), "interact"))
2600                         {
2601                                 infostream<<"Cannot craft: "
2602                                                 <<"No interact privilege"<<std::endl;
2603                                 delete a;
2604                                 return;
2605                         }
2606
2607                         // If player is not an admin, check for ownership of inventory
2608                         if(!checkPriv(player->getName(), "server"))
2609                         {
2610                                 std::string owner_craft = getInventoryOwner(ca->craft_inv);
2611                                 if(owner_craft != "" && owner_craft != player->getName())
2612                                 {
2613                                         infostream<<"WARNING: "<<player->getName()
2614                                                 <<" tried to access an inventory that"
2615                                                 <<" belongs to "<<owner_craft<<std::endl;
2616                                         delete a;
2617                                         return;
2618                                 }
2619                         }
2620                 }
2621
2622                 // Do the action
2623                 a->apply(this, playersao, this);
2624                 // Eat the action
2625                 delete a;
2626         }
2627         else if(command == TOSERVER_CHAT_MESSAGE)
2628         {
2629                 /*
2630                         u16 command
2631                         u16 length
2632                         wstring message
2633                 */
2634                 u8 buf[6];
2635                 std::string datastring((char*)&data[2], datasize-2);
2636                 std::istringstream is(datastring, std::ios_base::binary);
2637
2638                 // Read stuff
2639                 is.read((char*)buf, 2);
2640                 u16 len = readU16(buf);
2641
2642                 std::wstring message;
2643                 for(u16 i=0; i<len; i++)
2644                 {
2645                         is.read((char*)buf, 2);
2646                         message += (wchar_t)readU16(buf);
2647                 }
2648
2649                 // Get player name of this client
2650                 std::wstring name = narrow_to_wide(player->getName());
2651
2652                 // Run script hook
2653                 bool ate = scriptapi_on_chat_message(m_lua, player->getName(),
2654                                 wide_to_narrow(message));
2655                 // If script ate the message, don't proceed
2656                 if(ate)
2657                         return;
2658
2659                 // Line to send to players
2660                 std::wstring line;
2661                 // Whether to send to the player that sent the line
2662                 bool send_to_sender = false;
2663                 // Whether to send to other players
2664                 bool send_to_others = false;
2665
2666                 // Parse commands
2667                 if(message[0] == L'/')
2668                 {
2669                         size_t strip_size = 1;
2670                         if (message[1] == L'#') // support old-style commans
2671                                 ++strip_size;
2672                         message = message.substr(strip_size);
2673
2674                         WStrfnd f1(message);
2675                         f1.next(L" "); // Skip over /#whatever
2676                         std::wstring paramstring = f1.next(L"");
2677
2678                         ServerCommandContext *ctx = new ServerCommandContext(
2679                                 str_split(message, L' '),
2680                                 paramstring,
2681                                 this,
2682                                 m_env,
2683                                 player);
2684
2685                         std::wstring reply(processServerCommand(ctx));
2686                         send_to_sender = ctx->flags & SEND_TO_SENDER;
2687                         send_to_others = ctx->flags & SEND_TO_OTHERS;
2688
2689                         if (ctx->flags & SEND_NO_PREFIX)
2690                                 line += reply;
2691                         else
2692                                 line += L"Server: " + reply;
2693
2694                         delete ctx;
2695
2696                 }
2697                 else
2698                 {
2699                         if(checkPriv(player->getName(), "shout")){
2700                                 line += L"<";
2701                                 line += name;
2702                                 line += L"> ";
2703                                 line += message;
2704                                 send_to_others = true;
2705                         } else {
2706                                 line += L"Server: You are not allowed to shout";
2707                                 send_to_sender = true;
2708                         }
2709                 }
2710
2711                 if(line != L"")
2712                 {
2713                         if(send_to_others)
2714                                 actionstream<<"CHAT: "<<wide_to_narrow(line)<<std::endl;
2715
2716                         /*
2717                                 Send the message to clients
2718                         */
2719                         for(core::map<u16, RemoteClient*>::Iterator
2720                                 i = m_clients.getIterator();
2721                                 i.atEnd() == false; i++)
2722                         {
2723                                 // Get client and check that it is valid
2724                                 RemoteClient *client = i.getNode()->getValue();
2725                                 assert(client->peer_id == i.getNode()->getKey());
2726                                 if(client->serialization_version == SER_FMT_VER_INVALID)
2727                                         continue;
2728
2729                                 // Filter recipient
2730                                 bool sender_selected = (peer_id == client->peer_id);
2731                                 if(sender_selected == true && send_to_sender == false)
2732                                         continue;
2733                                 if(sender_selected == false && send_to_others == false)
2734                                         continue;
2735
2736                                 SendChatMessage(client->peer_id, line);
2737                         }
2738                 }
2739         }
2740         else if(command == TOSERVER_DAMAGE)
2741         {
2742                 std::string datastring((char*)&data[2], datasize-2);
2743                 std::istringstream is(datastring, std::ios_base::binary);
2744                 u8 damage = readU8(is);
2745
2746                 actionstream<<player->getName()<<" damaged by "
2747                                 <<(int)damage<<" hp at "<<PP(player->getPosition()/BS)
2748                                 <<std::endl;
2749
2750                 playersao->setHP(playersao->getHP() - damage);
2751
2752                 if(playersao->getHP() == 0 && playersao->m_hp_not_sent)
2753                         DiePlayer(peer_id);
2754
2755                 if(playersao->m_hp_not_sent)
2756                         SendPlayerHP(peer_id);
2757         }
2758         else if(command == TOSERVER_PASSWORD)
2759         {
2760                 /*
2761                         [0] u16 TOSERVER_PASSWORD
2762                         [2] u8[28] old password
2763                         [30] u8[28] new password
2764                 */
2765
2766                 if(datasize != 2+PASSWORD_SIZE*2)
2767                         return;
2768                 /*char password[PASSWORD_SIZE];
2769                 for(u32 i=0; i<PASSWORD_SIZE-1; i++)
2770                         password[i] = data[2+i];
2771                 password[PASSWORD_SIZE-1] = 0;*/
2772                 std::string oldpwd;
2773                 for(u32 i=0; i<PASSWORD_SIZE-1; i++)
2774                 {
2775                         char c = data[2+i];
2776                         if(c == 0)
2777                                 break;
2778                         oldpwd += c;
2779                 }
2780                 std::string newpwd;
2781                 for(u32 i=0; i<PASSWORD_SIZE-1; i++)
2782                 {
2783                         char c = data[2+PASSWORD_SIZE+i];
2784                         if(c == 0)
2785                                 break;
2786                         newpwd += c;
2787                 }
2788
2789                 infostream<<"Server: Client requests a password change from "
2790                                 <<"'"<<oldpwd<<"' to '"<<newpwd<<"'"<<std::endl;
2791
2792                 std::string playername = player->getName();
2793
2794                 std::string checkpwd;
2795                 scriptapi_get_auth(m_lua, playername, &checkpwd, NULL);
2796
2797                 if(oldpwd != checkpwd)
2798                 {
2799                         infostream<<"Server: invalid old password"<<std::endl;
2800                         // Wrong old password supplied!!
2801                         SendChatMessage(peer_id, L"Invalid old password supplied. Password NOT changed.");
2802                         return;
2803                 }
2804
2805                 bool success = scriptapi_set_password(m_lua, playername, newpwd);
2806                 if(success){
2807                         actionstream<<player->getName()<<" changes password"<<std::endl;
2808                         SendChatMessage(peer_id, L"Password change successful");
2809                 } else {
2810                         actionstream<<player->getName()<<" tries to change password but "
2811                                         <<"it fails"<<std::endl;
2812                         SendChatMessage(peer_id, L"Password change failed or inavailable");
2813                 }
2814         }
2815         else if(command == TOSERVER_PLAYERITEM)
2816         {
2817                 if (datasize < 2+2)
2818                         return;
2819
2820                 u16 item = readU16(&data[2]);
2821                 playersao->setWieldIndex(item);
2822         }
2823         else if(command == TOSERVER_RESPAWN)
2824         {
2825                 if(player->hp != 0)
2826                         return;
2827
2828                 RespawnPlayer(peer_id);
2829
2830                 actionstream<<player->getName()<<" respawns at "
2831                                 <<PP(player->getPosition()/BS)<<std::endl;
2832
2833                 // ActiveObject is added to environment in AsyncRunStep after
2834                 // the previous addition has been succesfully removed
2835         }
2836         else if(command == TOSERVER_REQUEST_MEDIA) {
2837                 std::string datastring((char*)&data[2], datasize-2);
2838                 std::istringstream is(datastring, std::ios_base::binary);
2839
2840                 core::list<MediaRequest> tosend;
2841                 u16 numfiles = readU16(is);
2842
2843                 infostream<<"Sending "<<numfiles<<" files to "
2844                                 <<getPlayerName(peer_id)<<std::endl;
2845                 verbosestream<<"TOSERVER_REQUEST_MEDIA: "<<std::endl;
2846
2847                 for(int i = 0; i < numfiles; i++) {
2848                         std::string name = deSerializeString(is);
2849                         tosend.push_back(MediaRequest(name));
2850                         verbosestream<<"TOSERVER_REQUEST_MEDIA: requested file "
2851                                         <<name<<std::endl;
2852                 }
2853
2854                 sendRequestedMedia(peer_id, tosend);
2855
2856                 // Now the client should know about everything
2857                 // (definitions and files)
2858                 getClient(peer_id)->definitions_sent = true;
2859         }
2860         else if(command == TOSERVER_INTERACT)
2861         {
2862                 std::string datastring((char*)&data[2], datasize-2);
2863                 std::istringstream is(datastring, std::ios_base::binary);
2864
2865                 /*
2866                         [0] u16 command
2867                         [2] u8 action
2868                         [3] u16 item
2869                         [5] u32 length of the next item
2870                         [9] serialized PointedThing
2871                         actions:
2872                         0: start digging (from undersurface) or use
2873                         1: stop digging (all parameters ignored)
2874                         2: digging completed
2875                         3: place block or item (to abovesurface)
2876                         4: use item
2877                 */
2878                 u8 action = readU8(is);
2879                 u16 item_i = readU16(is);
2880                 std::istringstream tmp_is(deSerializeLongString(is), std::ios::binary);
2881                 PointedThing pointed;
2882                 pointed.deSerialize(tmp_is);
2883
2884                 verbosestream<<"TOSERVER_INTERACT: action="<<(int)action<<", item="
2885                                 <<item_i<<", pointed="<<pointed.dump()<<std::endl;
2886
2887                 if(player->hp == 0)
2888                 {
2889                         verbosestream<<"TOSERVER_INTERACT: "<<player->getName()
2890                                 <<" tried to interact, but is dead!"<<std::endl;
2891                         return;
2892                 }
2893
2894                 v3f player_pos = playersao->getLastGoodPosition();
2895
2896                 // Update wielded item
2897                 playersao->setWieldIndex(item_i);
2898
2899                 // Get pointed to node (undefined if not POINTEDTYPE_NODE)
2900                 v3s16 p_under = pointed.node_undersurface;
2901                 v3s16 p_above = pointed.node_abovesurface;
2902
2903                 // Get pointed to object (NULL if not POINTEDTYPE_OBJECT)
2904                 ServerActiveObject *pointed_object = NULL;
2905                 if(pointed.type == POINTEDTHING_OBJECT)
2906                 {
2907                         pointed_object = m_env->getActiveObject(pointed.object_id);
2908                         if(pointed_object == NULL)
2909                         {
2910                                 verbosestream<<"TOSERVER_INTERACT: "
2911                                         "pointed object is NULL"<<std::endl;
2912                                 return;
2913                         }
2914
2915                 }
2916
2917                 v3f pointed_pos_under = player_pos;
2918                 v3f pointed_pos_above = player_pos;
2919                 if(pointed.type == POINTEDTHING_NODE)
2920                 {
2921                         pointed_pos_under = intToFloat(p_under, BS);
2922                         pointed_pos_above = intToFloat(p_above, BS);
2923                 }
2924                 else if(pointed.type == POINTEDTHING_OBJECT)
2925                 {
2926                         pointed_pos_under = pointed_object->getBasePosition();
2927                         pointed_pos_above = pointed_pos_under;
2928                 }
2929
2930                 /*
2931                         Check that target is reasonably close
2932                         (only when digging or placing things)
2933                 */
2934                 if(action == 0 || action == 2 || action == 3)
2935                 {
2936                         float d = player_pos.getDistanceFrom(pointed_pos_under);
2937                         float max_d = BS * 14; // Just some large enough value
2938                         if(d > max_d){
2939                                 actionstream<<"Player "<<player->getName()
2940                                                 <<" tried to access "<<pointed.dump()
2941                                                 <<" from too far: "
2942                                                 <<"d="<<d<<", max_d="<<max_d
2943                                                 <<". ignoring."<<std::endl;
2944                                 // Re-send block to revert change on client-side
2945                                 RemoteClient *client = getClient(peer_id);
2946                                 v3s16 blockpos = getNodeBlockPos(floatToInt(pointed_pos_under, BS));
2947                                 client->SetBlockNotSent(blockpos);
2948                                 // Do nothing else
2949                                 return;
2950                         }
2951                 }
2952
2953                 /*
2954                         Make sure the player is allowed to do it
2955                 */
2956                 if(!checkPriv(player->getName(), "interact"))
2957                 {
2958                         infostream<<"Ignoring interaction from player "<<player->getName()
2959                                         <<" (no interact privilege)"<<std::endl;
2960                         return;
2961                 }
2962
2963                 /*
2964                         0: start digging or punch object
2965                 */
2966                 if(action == 0)
2967                 {
2968                         if(pointed.type == POINTEDTHING_NODE)
2969                         {
2970                                 /*
2971                                         NOTE: This can be used in the future to check if
2972                                         somebody is cheating, by checking the timing.
2973                                 */
2974                                 MapNode n(CONTENT_IGNORE);
2975                                 try
2976                                 {
2977                                         n = m_env->getMap().getNode(p_under);
2978                                 }
2979                                 catch(InvalidPositionException &e)
2980                                 {
2981                                         infostream<<"Server: Not punching: Node not found."
2982                                                         <<" Adding block to emerge queue."
2983                                                         <<std::endl;
2984                                         m_emerge_queue.addBlock(peer_id,
2985                                                         getNodeBlockPos(p_above), BLOCK_EMERGE_FLAG_FROMDISK);
2986                                 }
2987                                 if(n.getContent() != CONTENT_IGNORE)
2988                                         scriptapi_node_on_punch(m_lua, p_under, n, playersao);
2989                         }
2990                         else if(pointed.type == POINTEDTHING_OBJECT)
2991                         {
2992                                 // Skip if object has been removed
2993                                 if(pointed_object->m_removed)
2994                                         return;
2995
2996                                 actionstream<<player->getName()<<" punches object "
2997                                                 <<pointed.object_id<<": "
2998                                                 <<pointed_object->getDescription()<<std::endl;
2999
3000                                 ItemStack punchitem = playersao->getWieldedItem();
3001                                 ToolCapabilities toolcap =
3002                                                 punchitem.getToolCapabilities(m_itemdef);
3003                                 v3f dir = (pointed_object->getBasePosition() -
3004                                                 (player->getPosition() + player->getEyeOffset())
3005                                                         ).normalize();
3006                                 float time_from_last_punch =
3007                                         playersao->resetTimeFromLastPunch();
3008                                 pointed_object->punch(dir, &toolcap, playersao,
3009                                                 time_from_last_punch);
3010                         }
3011
3012                 } // action == 0
3013
3014                 /*
3015                         1: stop digging
3016                 */
3017                 else if(action == 1)
3018                 {
3019                 } // action == 1
3020
3021                 /*
3022                         2: Digging completed
3023                 */
3024                 else if(action == 2)
3025                 {
3026                         // Only complete digging of nodes
3027                         if(pointed.type == POINTEDTHING_NODE)
3028                         {
3029                                 MapNode n(CONTENT_IGNORE);
3030                                 try
3031                                 {
3032                                         n = m_env->getMap().getNode(p_under);
3033                                 }
3034                                 catch(InvalidPositionException &e)
3035                                 {
3036                                         infostream<<"Server: Not finishing digging: Node not found."
3037                                                         <<" Adding block to emerge queue."
3038                                                         <<std::endl;
3039                                         m_emerge_queue.addBlock(peer_id,
3040                                                         getNodeBlockPos(p_above), BLOCK_EMERGE_FLAG_FROMDISK);
3041                                 }
3042                                 if(n.getContent() != CONTENT_IGNORE)
3043                                         scriptapi_node_on_dig(m_lua, p_under, n, playersao);
3044                         }
3045                 } // action == 2
3046
3047                 /*
3048                         3: place block or right-click object
3049                 */
3050                 else if(action == 3)
3051                 {
3052                         ItemStack item = playersao->getWieldedItem();
3053
3054                         // Reset build time counter
3055                         if(pointed.type == POINTEDTHING_NODE &&
3056                                         item.getDefinition(m_itemdef).type == ITEM_NODE)
3057                                 getClient(peer_id)->m_time_from_building = 0.0;
3058
3059                         if(pointed.type == POINTEDTHING_OBJECT)
3060                         {
3061                                 // Right click object
3062
3063                                 // Skip if object has been removed
3064                                 if(pointed_object->m_removed)
3065                                         return;
3066
3067                                 actionstream<<player->getName()<<" right-clicks object "
3068                                                 <<pointed.object_id<<": "
3069                                                 <<pointed_object->getDescription()<<std::endl;
3070
3071                                 // Do stuff
3072                                 pointed_object->rightClick(playersao);
3073                         }
3074                         else if(scriptapi_item_on_place(m_lua,
3075                                         item, playersao, pointed))
3076                         {
3077                                 // Placement was handled in lua
3078
3079                                 // Apply returned ItemStack
3080                                 if(g_settings->getBool("creative_mode") == false)
3081                                         playersao->setWieldedItem(item);
3082                         }
3083
3084                 } // action == 3
3085
3086                 /*
3087                         4: use
3088                 */
3089                 else if(action == 4)
3090                 {
3091                         ItemStack item = playersao->getWieldedItem();
3092
3093                         actionstream<<player->getName()<<" uses "<<item.name
3094                                         <<", pointing at "<<pointed.dump()<<std::endl;
3095
3096                         if(scriptapi_item_on_use(m_lua,
3097                                         item, playersao, pointed))
3098                         {
3099                                 // Apply returned ItemStack
3100                                 if(g_settings->getBool("creative_mode") == false)
3101                                         playersao->setWieldedItem(item);
3102                         }
3103
3104                 } // action == 4
3105
3106                 /*
3107                         Catch invalid actions
3108                 */
3109                 else
3110                 {
3111                         infostream<<"WARNING: Server: Invalid action "
3112                                         <<action<<std::endl;
3113                 }
3114         }
3115         else if(command == TOSERVER_REMOVED_SOUNDS)
3116         {
3117                 std::string datastring((char*)&data[2], datasize-2);
3118                 std::istringstream is(datastring, std::ios_base::binary);
3119
3120                 int num = readU16(is);
3121                 for(int k=0; k<num; k++){
3122                         s32 id = readS32(is);
3123                         std::map<s32, ServerPlayingSound>::iterator i =
3124                                         m_playing_sounds.find(id);
3125                         if(i == m_playing_sounds.end())
3126                                 continue;
3127                         ServerPlayingSound &psound = i->second;
3128                         psound.clients.erase(peer_id);
3129                         if(psound.clients.size() == 0)
3130                                 m_playing_sounds.erase(i++);
3131                 }
3132         }
3133         else
3134         {
3135                 infostream<<"Server::ProcessData(): Ignoring "
3136                                 "unknown command "<<command<<std::endl;
3137         }
3138
3139         } //try
3140         catch(SendFailedException &e)
3141         {
3142                 errorstream<<"Server::ProcessData(): SendFailedException: "
3143                                 <<"what="<<e.what()
3144                                 <<std::endl;
3145         }
3146 }
3147
3148 void Server::onMapEditEvent(MapEditEvent *event)
3149 {
3150         //infostream<<"Server::onMapEditEvent()"<<std::endl;
3151         if(m_ignore_map_edit_events)
3152                 return;
3153         if(m_ignore_map_edit_events_area.contains(event->getArea()))
3154                 return;
3155         MapEditEvent *e = event->clone();
3156         m_unsent_map_edit_queue.push_back(e);
3157 }
3158
3159 Inventory* Server::getInventory(const InventoryLocation &loc)
3160 {
3161         switch(loc.type){
3162         case InventoryLocation::UNDEFINED:
3163         {}
3164         break;
3165         case InventoryLocation::CURRENT_PLAYER:
3166         {}
3167         break;
3168         case InventoryLocation::PLAYER:
3169         {
3170                 Player *player = m_env->getPlayer(loc.name.c_str());
3171                 if(!player)
3172                         return NULL;
3173                 PlayerSAO *playersao = player->getPlayerSAO();
3174                 if(!playersao)
3175                         return NULL;
3176                 return playersao->getInventory();
3177         }
3178         break;
3179         case InventoryLocation::NODEMETA:
3180         {
3181                 NodeMetadata *meta = m_env->getMap().getNodeMetadata(loc.p);
3182                 if(!meta)
3183                         return NULL;
3184                 return meta->getInventory();
3185         }
3186         break;
3187         default:
3188                 assert(0);
3189         }
3190         return NULL;
3191 }
3192 std::string Server::getInventoryOwner(const InventoryLocation &loc)
3193 {
3194         switch(loc.type){
3195         case InventoryLocation::UNDEFINED:
3196         {}
3197         break;
3198         case InventoryLocation::CURRENT_PLAYER:
3199         {}
3200         break;
3201         case InventoryLocation::PLAYER:
3202         {
3203                 return loc.name;
3204         }
3205         break;
3206         case InventoryLocation::NODEMETA:
3207         {
3208                 NodeMetadata *meta = m_env->getMap().getNodeMetadata(loc.p);
3209                 if(!meta)
3210                         return "";
3211                 return meta->getOwner();
3212         }
3213         break;
3214         default:
3215                 assert(0);
3216         }
3217         return "";
3218 }
3219 void Server::setInventoryModified(const InventoryLocation &loc)
3220 {
3221         switch(loc.type){
3222         case InventoryLocation::UNDEFINED:
3223         {}
3224         break;
3225         case InventoryLocation::PLAYER:
3226         {
3227                 Player *player = m_env->getPlayer(loc.name.c_str());
3228                 if(!player)
3229                         return;
3230                 PlayerSAO *playersao = player->getPlayerSAO();
3231                 if(!playersao)
3232                         return;
3233                 playersao->m_inventory_not_sent = true;
3234                 playersao->m_wielded_item_not_sent = true;
3235         }
3236         break;
3237         case InventoryLocation::NODEMETA:
3238         {
3239                 v3s16 blockpos = getNodeBlockPos(loc.p);
3240
3241                 NodeMetadata *meta = m_env->getMap().getNodeMetadata(loc.p);
3242                 if(meta)
3243                         meta->inventoryModified();
3244
3245                 MapBlock *block = m_env->getMap().getBlockNoCreateNoEx(blockpos);
3246                 if(block)
3247                         block->raiseModified(MOD_STATE_WRITE_NEEDED);
3248
3249                 setBlockNotSent(blockpos);
3250         }
3251         break;
3252         default:
3253                 assert(0);
3254         }
3255 }
3256
3257 core::list<PlayerInfo> Server::getPlayerInfo()
3258 {
3259         DSTACK(__FUNCTION_NAME);
3260         JMutexAutoLock envlock(m_env_mutex);
3261         JMutexAutoLock conlock(m_con_mutex);
3262
3263         core::list<PlayerInfo> list;
3264
3265         core::list<Player*> players = m_env->getPlayers();
3266
3267         core::list<Player*>::Iterator i;
3268         for(i = players.begin();
3269                         i != players.end(); i++)
3270         {
3271                 PlayerInfo info;
3272
3273                 Player *player = *i;
3274
3275                 try{
3276                         // Copy info from connection to info struct
3277                         info.id = player->peer_id;
3278                         info.address = m_con.GetPeerAddress(player->peer_id);
3279                         info.avg_rtt = m_con.GetPeerAvgRTT(player->peer_id);
3280                 }
3281                 catch(con::PeerNotFoundException &e)
3282                 {
3283                         // Set dummy peer info
3284                         info.id = 0;
3285                         info.address = Address(0,0,0,0,0);
3286                         info.avg_rtt = 0.0;
3287                 }
3288
3289                 snprintf(info.name, PLAYERNAME_SIZE, "%s", player->getName());
3290                 info.position = player->getPosition();
3291
3292                 list.push_back(info);
3293         }
3294
3295         return list;
3296 }
3297
3298
3299 void Server::peerAdded(con::Peer *peer)
3300 {
3301         DSTACK(__FUNCTION_NAME);
3302         verbosestream<<"Server::peerAdded(): peer->id="
3303                         <<peer->id<<std::endl;
3304
3305         PeerChange c;
3306         c.type = PEER_ADDED;
3307         c.peer_id = peer->id;
3308         c.timeout = false;
3309         m_peer_change_queue.push_back(c);
3310 }
3311
3312 void Server::deletingPeer(con::Peer *peer, bool timeout)
3313 {
3314         DSTACK(__FUNCTION_NAME);
3315         verbosestream<<"Server::deletingPeer(): peer->id="
3316                         <<peer->id<<", timeout="<<timeout<<std::endl;
3317
3318         PeerChange c;
3319         c.type = PEER_REMOVED;
3320         c.peer_id = peer->id;
3321         c.timeout = timeout;
3322         m_peer_change_queue.push_back(c);
3323 }
3324
3325 /*
3326         Static send methods
3327 */
3328
3329 void Server::SendHP(con::Connection &con, u16 peer_id, u8 hp)
3330 {
3331         DSTACK(__FUNCTION_NAME);
3332         std::ostringstream os(std::ios_base::binary);
3333
3334         writeU16(os, TOCLIENT_HP);
3335         writeU8(os, hp);
3336
3337         // Make data buffer
3338         std::string s = os.str();
3339         SharedBuffer<u8> data((u8*)s.c_str(), s.size());
3340         // Send as reliable
3341         con.Send(peer_id, 0, data, true);
3342 }
3343
3344 void Server::SendAccessDenied(con::Connection &con, u16 peer_id,
3345                 const std::wstring &reason)
3346 {
3347         DSTACK(__FUNCTION_NAME);
3348         std::ostringstream os(std::ios_base::binary);
3349
3350         writeU16(os, TOCLIENT_ACCESS_DENIED);
3351         os<<serializeWideString(reason);
3352
3353         // Make data buffer
3354         std::string s = os.str();
3355         SharedBuffer<u8> data((u8*)s.c_str(), s.size());
3356         // Send as reliable
3357         con.Send(peer_id, 0, data, true);
3358 }
3359
3360 void Server::SendDeathscreen(con::Connection &con, u16 peer_id,
3361                 bool set_camera_point_target, v3f camera_point_target)
3362 {
3363         DSTACK(__FUNCTION_NAME);
3364         std::ostringstream os(std::ios_base::binary);
3365
3366         writeU16(os, TOCLIENT_DEATHSCREEN);
3367         writeU8(os, set_camera_point_target);
3368         writeV3F1000(os, camera_point_target);
3369
3370         // Make data buffer
3371         std::string s = os.str();
3372         SharedBuffer<u8> data((u8*)s.c_str(), s.size());
3373         // Send as reliable
3374         con.Send(peer_id, 0, data, true);
3375 }
3376
3377 void Server::SendItemDef(con::Connection &con, u16 peer_id,
3378                 IItemDefManager *itemdef)
3379 {
3380         DSTACK(__FUNCTION_NAME);
3381         std::ostringstream os(std::ios_base::binary);
3382
3383         /*
3384                 u16 command
3385                 u32 length of the next item
3386                 zlib-compressed serialized ItemDefManager
3387         */
3388         writeU16(os, TOCLIENT_ITEMDEF);
3389         std::ostringstream tmp_os(std::ios::binary);
3390         itemdef->serialize(tmp_os);
3391         std::ostringstream tmp_os2(std::ios::binary);
3392         compressZlib(tmp_os.str(), tmp_os2);
3393         os<<serializeLongString(tmp_os2.str());
3394
3395         // Make data buffer
3396         std::string s = os.str();
3397         verbosestream<<"Server: Sending item definitions to id("<<peer_id
3398                         <<"): size="<<s.size()<<std::endl;
3399         SharedBuffer<u8> data((u8*)s.c_str(), s.size());
3400         // Send as reliable
3401         con.Send(peer_id, 0, data, true);
3402 }
3403
3404 void Server::SendNodeDef(con::Connection &con, u16 peer_id,
3405                 INodeDefManager *nodedef)
3406 {
3407         DSTACK(__FUNCTION_NAME);
3408         std::ostringstream os(std::ios_base::binary);
3409
3410         /*
3411                 u16 command
3412                 u32 length of the next item
3413                 zlib-compressed serialized NodeDefManager
3414         */
3415         writeU16(os, TOCLIENT_NODEDEF);
3416         std::ostringstream tmp_os(std::ios::binary);
3417         nodedef->serialize(tmp_os);
3418         std::ostringstream tmp_os2(std::ios::binary);
3419         compressZlib(tmp_os.str(), tmp_os2);
3420         os<<serializeLongString(tmp_os2.str());
3421
3422         // Make data buffer
3423         std::string s = os.str();
3424         verbosestream<<"Server: Sending node definitions to id("<<peer_id
3425                         <<"): size="<<s.size()<<std::endl;
3426         SharedBuffer<u8> data((u8*)s.c_str(), s.size());
3427         // Send as reliable
3428         con.Send(peer_id, 0, data, true);
3429 }
3430
3431 /*
3432         Non-static send methods
3433 */
3434
3435 void Server::SendInventory(u16 peer_id)
3436 {
3437         DSTACK(__FUNCTION_NAME);
3438
3439         PlayerSAO *playersao = getPlayerSAO(peer_id);
3440         assert(playersao);
3441
3442         playersao->m_inventory_not_sent = false;
3443
3444         /*
3445                 Serialize it
3446         */
3447
3448         std::ostringstream os;
3449         playersao->getInventory()->serialize(os);
3450
3451         std::string s = os.str();
3452
3453         SharedBuffer<u8> data(s.size()+2);
3454         writeU16(&data[0], TOCLIENT_INVENTORY);
3455         memcpy(&data[2], s.c_str(), s.size());
3456
3457         // Send as reliable
3458         m_con.Send(peer_id, 0, data, true);
3459 }
3460
3461 void Server::SendChatMessage(u16 peer_id, const std::wstring &message)
3462 {
3463         DSTACK(__FUNCTION_NAME);
3464
3465         std::ostringstream os(std::ios_base::binary);
3466         u8 buf[12];
3467
3468         // Write command
3469         writeU16(buf, TOCLIENT_CHAT_MESSAGE);
3470         os.write((char*)buf, 2);
3471
3472         // Write length
3473         writeU16(buf, message.size());
3474         os.write((char*)buf, 2);
3475
3476         // Write string
3477         for(u32 i=0; i<message.size(); i++)
3478         {
3479                 u16 w = message[i];
3480                 writeU16(buf, w);
3481                 os.write((char*)buf, 2);
3482         }
3483
3484         // Make data buffer
3485         std::string s = os.str();
3486         SharedBuffer<u8> data((u8*)s.c_str(), s.size());
3487         // Send as reliable
3488         m_con.Send(peer_id, 0, data, true);
3489 }
3490
3491 void Server::BroadcastChatMessage(const std::wstring &message)
3492 {
3493         for(core::map<u16, RemoteClient*>::Iterator
3494                 i = m_clients.getIterator();
3495                 i.atEnd() == false; i++)
3496         {
3497                 // Get client and check that it is valid
3498                 RemoteClient *client = i.getNode()->getValue();
3499                 assert(client->peer_id == i.getNode()->getKey());
3500                 if(client->serialization_version == SER_FMT_VER_INVALID)
3501                         continue;
3502
3503                 SendChatMessage(client->peer_id, message);
3504         }
3505 }
3506
3507 void Server::SendPlayerHP(u16 peer_id)
3508 {
3509         DSTACK(__FUNCTION_NAME);
3510         PlayerSAO *playersao = getPlayerSAO(peer_id);
3511         assert(playersao);
3512         playersao->m_hp_not_sent = false;
3513         SendHP(m_con, peer_id, playersao->getHP());
3514 }
3515
3516 void Server::SendMovePlayer(u16 peer_id)
3517 {
3518         DSTACK(__FUNCTION_NAME);
3519         Player *player = m_env->getPlayer(peer_id);
3520         assert(player);
3521
3522         std::ostringstream os(std::ios_base::binary);
3523         writeU16(os, TOCLIENT_MOVE_PLAYER);
3524         writeV3F1000(os, player->getPosition());
3525         writeF1000(os, player->getPitch());
3526         writeF1000(os, player->getYaw());
3527
3528         {
3529                 v3f pos = player->getPosition();
3530                 f32 pitch = player->getPitch();
3531                 f32 yaw = player->getYaw();
3532                 verbosestream<<"Server: Sending TOCLIENT_MOVE_PLAYER"
3533                                 <<" pos=("<<pos.X<<","<<pos.Y<<","<<pos.Z<<")"
3534                                 <<" pitch="<<pitch
3535                                 <<" yaw="<<yaw
3536                                 <<std::endl;
3537         }
3538
3539         // Make data buffer
3540         std::string s = os.str();
3541         SharedBuffer<u8> data((u8*)s.c_str(), s.size());
3542         // Send as reliable
3543         m_con.Send(peer_id, 0, data, true);
3544 }
3545
3546 void Server::SendPlayerPrivileges(u16 peer_id)
3547 {
3548         Player *player = m_env->getPlayer(peer_id);
3549         assert(player);
3550         std::set<std::string> privs;
3551         scriptapi_get_auth(m_lua, player->getName(), NULL, &privs);
3552
3553         std::ostringstream os(std::ios_base::binary);
3554         writeU16(os, TOCLIENT_PRIVILEGES);
3555         writeU16(os, privs.size());
3556         for(std::set<std::string>::const_iterator i = privs.begin();
3557                         i != privs.end(); i++){
3558                 os<<serializeString(*i);
3559         }
3560
3561         // Make data buffer
3562         std::string s = os.str();
3563         SharedBuffer<u8> data((u8*)s.c_str(), s.size());
3564         // Send as reliable
3565         m_con.Send(peer_id, 0, data, true);
3566 }
3567
3568 s32 Server::playSound(const SimpleSoundSpec &spec,
3569                 const ServerSoundParams &params)
3570 {
3571         // Find out initial position of sound
3572         bool pos_exists = false;
3573         v3f pos = params.getPos(m_env, &pos_exists);
3574         // If position is not found while it should be, cancel sound
3575         if(pos_exists != (params.type != ServerSoundParams::SSP_LOCAL))
3576                 return -1;
3577         // Filter destination clients
3578         std::set<RemoteClient*> dst_clients;
3579         if(params.to_player != "")
3580         {
3581                 Player *player = m_env->getPlayer(params.to_player.c_str());
3582                 if(!player){
3583                         infostream<<"Server::playSound: Player \""<<params.to_player
3584                                         <<"\" not found"<<std::endl;
3585                         return -1;
3586                 }
3587                 if(player->peer_id == PEER_ID_INEXISTENT){
3588                         infostream<<"Server::playSound: Player \""<<params.to_player
3589                                         <<"\" not connected"<<std::endl;
3590                         return -1;
3591                 }
3592                 RemoteClient *client = getClient(player->peer_id);
3593                 dst_clients.insert(client);
3594         }
3595         else
3596         {
3597                 for(core::map<u16, RemoteClient*>::Iterator
3598                                 i = m_clients.getIterator(); i.atEnd() == false; i++)
3599                 {
3600                         RemoteClient *client = i.getNode()->getValue();
3601                         Player *player = m_env->getPlayer(client->peer_id);
3602                         if(!player)
3603                                 continue;
3604                         if(pos_exists){
3605                                 if(player->getPosition().getDistanceFrom(pos) >
3606                                                 params.max_hear_distance)
3607                                         continue;
3608                         }
3609                         dst_clients.insert(client);
3610                 }
3611         }
3612         if(dst_clients.size() == 0)
3613                 return -1;
3614         // Create the sound
3615         s32 id = m_next_sound_id++;
3616         // The sound will exist as a reference in m_playing_sounds
3617         m_playing_sounds[id] = ServerPlayingSound();
3618         ServerPlayingSound &psound = m_playing_sounds[id];
3619         psound.params = params;
3620         for(std::set<RemoteClient*>::iterator i = dst_clients.begin();
3621                         i != dst_clients.end(); i++)
3622                 psound.clients.insert((*i)->peer_id);
3623         // Create packet
3624         std::ostringstream os(std::ios_base::binary);
3625         writeU16(os, TOCLIENT_PLAY_SOUND);
3626         writeS32(os, id);
3627         os<<serializeString(spec.name);
3628         writeF1000(os, spec.gain * params.gain);
3629         writeU8(os, params.type);
3630         writeV3F1000(os, pos);
3631         writeU16(os, params.object);
3632         writeU8(os, params.loop);
3633         // Make data buffer
3634         std::string s = os.str();
3635         SharedBuffer<u8> data((u8*)s.c_str(), s.size());
3636         // Send
3637         for(std::set<RemoteClient*>::iterator i = dst_clients.begin();
3638                         i != dst_clients.end(); i++){
3639                 // Send as reliable
3640                 m_con.Send((*i)->peer_id, 0, data, true);
3641         }
3642         return id;
3643 }
3644 void Server::stopSound(s32 handle)
3645 {
3646         // Get sound reference
3647         std::map<s32, ServerPlayingSound>::iterator i =
3648                         m_playing_sounds.find(handle);
3649         if(i == m_playing_sounds.end())
3650                 return;
3651         ServerPlayingSound &psound = i->second;
3652         // Create packet
3653         std::ostringstream os(std::ios_base::binary);
3654         writeU16(os, TOCLIENT_STOP_SOUND);
3655         writeS32(os, handle);
3656         // Make data buffer
3657         std::string s = os.str();
3658         SharedBuffer<u8> data((u8*)s.c_str(), s.size());
3659         // Send
3660         for(std::set<u16>::iterator i = psound.clients.begin();
3661                         i != psound.clients.end(); i++){
3662                 // Send as reliable
3663                 m_con.Send(*i, 0, data, true);
3664         }
3665         // Remove sound reference
3666         m_playing_sounds.erase(i);
3667 }
3668
3669 void Server::sendRemoveNode(v3s16 p, u16 ignore_id,
3670         core::list<u16> *far_players, float far_d_nodes)
3671 {
3672         float maxd = far_d_nodes*BS;
3673         v3f p_f = intToFloat(p, BS);
3674
3675         // Create packet
3676         u32 replysize = 8;
3677         SharedBuffer<u8> reply(replysize);
3678         writeU16(&reply[0], TOCLIENT_REMOVENODE);
3679         writeS16(&reply[2], p.X);
3680         writeS16(&reply[4], p.Y);
3681         writeS16(&reply[6], p.Z);
3682
3683         for(core::map<u16, RemoteClient*>::Iterator
3684                 i = m_clients.getIterator();
3685                 i.atEnd() == false; i++)
3686         {
3687                 // Get client and check that it is valid
3688                 RemoteClient *client = i.getNode()->getValue();
3689                 assert(client->peer_id == i.getNode()->getKey());
3690                 if(client->serialization_version == SER_FMT_VER_INVALID)
3691                         continue;
3692
3693                 // Don't send if it's the same one
3694                 if(client->peer_id == ignore_id)
3695                         continue;
3696
3697                 if(far_players)
3698                 {
3699                         // Get player
3700                         Player *player = m_env->getPlayer(client->peer_id);
3701                         if(player)
3702                         {
3703                                 // If player is far away, only set modified blocks not sent
3704                                 v3f player_pos = player->getPosition();
3705                                 if(player_pos.getDistanceFrom(p_f) > maxd)
3706                                 {
3707                                         far_players->push_back(client->peer_id);
3708                                         continue;
3709                                 }
3710                         }
3711                 }
3712
3713                 // Send as reliable
3714                 m_con.Send(client->peer_id, 0, reply, true);
3715         }
3716 }
3717
3718 void Server::sendAddNode(v3s16 p, MapNode n, u16 ignore_id,
3719                 core::list<u16> *far_players, float far_d_nodes)
3720 {
3721         float maxd = far_d_nodes*BS;
3722         v3f p_f = intToFloat(p, BS);
3723
3724         for(core::map<u16, RemoteClient*>::Iterator
3725                 i = m_clients.getIterator();
3726                 i.atEnd() == false; i++)
3727         {
3728                 // Get client and check that it is valid
3729                 RemoteClient *client = i.getNode()->getValue();
3730                 assert(client->peer_id == i.getNode()->getKey());
3731                 if(client->serialization_version == SER_FMT_VER_INVALID)
3732                         continue;
3733
3734                 // Don't send if it's the same one
3735                 if(client->peer_id == ignore_id)
3736                         continue;
3737
3738                 if(far_players)
3739                 {
3740                         // Get player
3741                         Player *player = m_env->getPlayer(client->peer_id);
3742                         if(player)
3743                         {
3744                                 // If player is far away, only set modified blocks not sent
3745                                 v3f player_pos = player->getPosition();
3746                                 if(player_pos.getDistanceFrom(p_f) > maxd)
3747                                 {
3748                                         far_players->push_back(client->peer_id);
3749                                         continue;
3750                                 }
3751                         }
3752                 }
3753
3754                 // Create packet
3755                 u32 replysize = 8 + MapNode::serializedLength(client->serialization_version);
3756                 SharedBuffer<u8> reply(replysize);
3757                 writeU16(&reply[0], TOCLIENT_ADDNODE);
3758                 writeS16(&reply[2], p.X);
3759                 writeS16(&reply[4], p.Y);
3760                 writeS16(&reply[6], p.Z);
3761                 n.serialize(&reply[8], client->serialization_version);
3762
3763                 // Send as reliable
3764                 m_con.Send(client->peer_id, 0, reply, true);
3765         }
3766 }
3767
3768 void Server::setBlockNotSent(v3s16 p)
3769 {
3770         for(core::map<u16, RemoteClient*>::Iterator
3771                 i = m_clients.getIterator();
3772                 i.atEnd()==false; i++)
3773         {
3774                 RemoteClient *client = i.getNode()->getValue();
3775                 client->SetBlockNotSent(p);
3776         }
3777 }
3778
3779 void Server::SendBlockNoLock(u16 peer_id, MapBlock *block, u8 ver)
3780 {
3781         DSTACK(__FUNCTION_NAME);
3782
3783         v3s16 p = block->getPos();
3784
3785 #if 0
3786         // Analyze it a bit
3787         bool completely_air = true;
3788         for(s16 z0=0; z0<MAP_BLOCKSIZE; z0++)
3789         for(s16 x0=0; x0<MAP_BLOCKSIZE; x0++)
3790         for(s16 y0=0; y0<MAP_BLOCKSIZE; y0++)
3791         {
3792                 if(block->getNodeNoEx(v3s16(x0,y0,z0)).d != CONTENT_AIR)
3793                 {
3794                         completely_air = false;
3795                         x0 = y0 = z0 = MAP_BLOCKSIZE; // Break out
3796                 }
3797         }
3798
3799         // Print result
3800         infostream<<"Server: Sending block ("<<p.X<<","<<p.Y<<","<<p.Z<<"): ";
3801         if(completely_air)
3802                 infostream<<"[completely air] ";
3803         infostream<<std::endl;
3804 #endif
3805
3806         /*
3807                 Create a packet with the block in the right format
3808         */
3809
3810         std::ostringstream os(std::ios_base::binary);
3811         block->serialize(os, ver, false);
3812         std::string s = os.str();
3813         SharedBuffer<u8> blockdata((u8*)s.c_str(), s.size());
3814
3815         u32 replysize = 8 + blockdata.getSize();
3816         SharedBuffer<u8> reply(replysize);
3817         writeU16(&reply[0], TOCLIENT_BLOCKDATA);
3818         writeS16(&reply[2], p.X);
3819         writeS16(&reply[4], p.Y);
3820         writeS16(&reply[6], p.Z);
3821         memcpy(&reply[8], *blockdata, blockdata.getSize());
3822
3823         /*infostream<<"Server: Sending block ("<<p.X<<","<<p.Y<<","<<p.Z<<")"
3824                         <<":  \tpacket size: "<<replysize<<std::endl;*/
3825
3826         /*
3827                 Send packet
3828         */
3829         m_con.Send(peer_id, 1, reply, true);
3830 }
3831
3832 void Server::SendBlocks(float dtime)
3833 {
3834         DSTACK(__FUNCTION_NAME);
3835
3836         JMutexAutoLock envlock(m_env_mutex);
3837         JMutexAutoLock conlock(m_con_mutex);
3838
3839         ScopeProfiler sp(g_profiler, "Server: sel and send blocks to clients");
3840
3841         core::array<PrioritySortedBlockTransfer> queue;
3842
3843         s32 total_sending = 0;
3844
3845         {
3846                 ScopeProfiler sp(g_profiler, "Server: selecting blocks for sending");
3847
3848                 for(core::map<u16, RemoteClient*>::Iterator
3849                         i = m_clients.getIterator();
3850                         i.atEnd() == false; i++)
3851                 {
3852                         RemoteClient *client = i.getNode()->getValue();
3853                         assert(client->peer_id == i.getNode()->getKey());
3854
3855                         // If definitions and textures have not been sent, don't
3856                         // send MapBlocks either
3857                         if(!client->definitions_sent)
3858                                 continue;
3859
3860                         total_sending += client->SendingCount();
3861
3862                         if(client->serialization_version == SER_FMT_VER_INVALID)
3863                                 continue;
3864
3865                         client->GetNextBlocks(this, dtime, queue);
3866                 }
3867         }
3868
3869         // Sort.
3870         // Lowest priority number comes first.
3871         // Lowest is most important.
3872         queue.sort();
3873
3874         for(u32 i=0; i<queue.size(); i++)
3875         {
3876                 //TODO: Calculate limit dynamically
3877                 if(total_sending >= g_settings->getS32
3878                                 ("max_simultaneous_block_sends_server_total"))
3879                         break;
3880
3881                 PrioritySortedBlockTransfer q = queue[i];
3882
3883                 MapBlock *block = NULL;
3884                 try
3885                 {
3886                         block = m_env->getMap().getBlockNoCreate(q.pos);
3887                 }
3888                 catch(InvalidPositionException &e)
3889                 {
3890                         continue;
3891                 }
3892
3893                 RemoteClient *client = getClient(q.peer_id);
3894
3895                 SendBlockNoLock(q.peer_id, block, client->serialization_version);
3896
3897                 client->SentBlock(q.pos);
3898
3899                 total_sending++;
3900         }
3901 }
3902
3903 void Server::fillMediaCache()
3904 {
3905         DSTACK(__FUNCTION_NAME);
3906
3907         infostream<<"Server: Calculating media file checksums"<<std::endl;
3908
3909         // Collect all media file paths
3910         std::list<std::string> paths;
3911         for(core::list<ModSpec>::Iterator i = m_mods.begin();
3912                         i != m_mods.end(); i++){
3913                 const ModSpec &mod = *i;
3914                 paths.push_back(mod.path + DIR_DELIM + "textures");
3915                 paths.push_back(mod.path + DIR_DELIM + "sounds");
3916                 paths.push_back(mod.path + DIR_DELIM + "media");
3917         }
3918
3919         // Collect media file information from paths into cache
3920         for(std::list<std::string>::iterator i = paths.begin();
3921                         i != paths.end(); i++)
3922         {
3923                 std::string mediapath = *i;
3924                 std::vector<fs::DirListNode> dirlist = fs::GetDirListing(mediapath);
3925                 for(u32 j=0; j<dirlist.size(); j++){
3926                         if(dirlist[j].dir) // Ignode dirs
3927                                 continue;
3928                         std::string filename = dirlist[j].name;
3929                         // If name contains illegal characters, ignore the file
3930                         if(!string_allowed(filename, TEXTURENAME_ALLOWED_CHARS)){
3931                                 infostream<<"Server: ignoring illegal file name: \""
3932                                                 <<filename<<"\""<<std::endl;
3933                                 continue;
3934                         }
3935                         // If name is not in a supported format, ignore it
3936                         const char *supported_ext[] = {
3937                                 ".png", ".jpg", ".bmp", ".tga",
3938                                 ".pcx", ".ppm", ".psd", ".wal", ".rgb",
3939                                 ".ogg",
3940                                 NULL
3941                         };
3942                         if(removeStringEnd(filename, supported_ext) == ""){
3943                                 infostream<<"Server: ignoring unsupported file extension: \""
3944                                                 <<filename<<"\""<<std::endl;
3945                                 continue;
3946                         }
3947                         // Ok, attempt to load the file and add to cache
3948                         std::string filepath = mediapath + DIR_DELIM + filename;
3949                         // Read data
3950                         std::ifstream fis(filepath.c_str(), std::ios_base::binary);
3951                         if(fis.good() == false){
3952                                 errorstream<<"Server::fillMediaCache(): Could not open \""
3953                                                 <<filename<<"\" for reading"<<std::endl;
3954                                 continue;
3955                         }
3956                         std::ostringstream tmp_os(std::ios_base::binary);
3957                         bool bad = false;
3958                         for(;;){
3959                                 char buf[1024];
3960                                 fis.read(buf, 1024);
3961                                 std::streamsize len = fis.gcount();
3962                                 tmp_os.write(buf, len);
3963                                 if(fis.eof())
3964                                         break;
3965                                 if(!fis.good()){
3966                                         bad = true;
3967                                         break;
3968                                 }
3969                         }
3970                         if(bad){
3971                                 errorstream<<"Server::fillMediaCache(): Failed to read \""
3972                                                 <<filename<<"\""<<std::endl;
3973                                 continue;
3974                         }
3975                         if(tmp_os.str().length() == 0){
3976                                 errorstream<<"Server::fillMediaCache(): Empty file \""
3977                                                 <<filepath<<"\""<<std::endl;
3978                                 continue;
3979                         }
3980
3981                         SHA1 sha1;
3982                         sha1.addBytes(tmp_os.str().c_str(), tmp_os.str().length());
3983
3984                         unsigned char *digest = sha1.getDigest();
3985                         std::string sha1_base64 = base64_encode(digest, 20);
3986                         std::string sha1_hex = hex_encode((char*)digest, 20);
3987                         free(digest);
3988
3989                         // Put in list
3990                         this->m_media[filename] = MediaInfo(filepath, sha1_base64);
3991                         verbosestream<<"Server: "<<sha1_hex<<" is "<<filename<<std::endl;
3992                 }
3993         }
3994 }
3995
3996 struct SendableMediaAnnouncement
3997 {
3998         std::string name;
3999         std::string sha1_digest;
4000
4001         SendableMediaAnnouncement(const std::string name_="",
4002                         const std::string sha1_digest_=""):
4003                 name(name_),
4004                 sha1_digest(sha1_digest_)
4005         {}
4006 };
4007
4008 void Server::sendMediaAnnouncement(u16 peer_id)
4009 {
4010         DSTACK(__FUNCTION_NAME);
4011
4012         verbosestream<<"Server: Announcing files to id("<<peer_id<<")"
4013                         <<std::endl;
4014
4015         core::list<SendableMediaAnnouncement> file_announcements;
4016
4017         for(std::map<std::string, MediaInfo>::iterator i = m_media.begin();
4018                         i != m_media.end(); i++){
4019                 // Put in list
4020                 file_announcements.push_back(
4021                                 SendableMediaAnnouncement(i->first, i->second.sha1_digest));
4022         }
4023
4024         // Make packet
4025         std::ostringstream os(std::ios_base::binary);
4026
4027         /*
4028                 u16 command
4029                 u32 number of files
4030                 for each texture {
4031                         u16 length of name
4032                         string name
4033                         u16 length of sha1_digest
4034                         string sha1_digest
4035                 }
4036         */
4037
4038         writeU16(os, TOCLIENT_ANNOUNCE_MEDIA);
4039         writeU16(os, file_announcements.size());
4040
4041         for(core::list<SendableMediaAnnouncement>::Iterator
4042                         j = file_announcements.begin();
4043                         j != file_announcements.end(); j++){
4044                 os<<serializeString(j->name);
4045                 os<<serializeString(j->sha1_digest);
4046         }
4047
4048         // Make data buffer
4049         std::string s = os.str();
4050         SharedBuffer<u8> data((u8*)s.c_str(), s.size());
4051
4052         // Send as reliable
4053         m_con.Send(peer_id, 0, data, true);
4054
4055 }
4056
4057 struct SendableMedia
4058 {
4059         std::string name;
4060         std::string path;
4061         std::string data;
4062
4063         SendableMedia(const std::string &name_="", const std::string path_="",
4064                         const std::string &data_=""):
4065                 name(name_),
4066                 path(path_),
4067                 data(data_)
4068         {}
4069 };
4070
4071 void Server::sendRequestedMedia(u16 peer_id,
4072                 const core::list<MediaRequest> &tosend)
4073 {
4074         DSTACK(__FUNCTION_NAME);
4075
4076         verbosestream<<"Server::sendRequestedMedia(): "
4077                         <<"Sending files to client"<<std::endl;
4078
4079         /* Read files */
4080
4081         // Put 5kB in one bunch (this is not accurate)
4082         u32 bytes_per_bunch = 5000;
4083
4084         core::array< core::list<SendableMedia> > file_bunches;
4085         file_bunches.push_back(core::list<SendableMedia>());
4086
4087         u32 file_size_bunch_total = 0;
4088
4089         for(core::list<MediaRequest>::ConstIterator i = tosend.begin();
4090                         i != tosend.end(); i++)
4091         {
4092                 if(m_media.find(i->name) == m_media.end()){
4093                         errorstream<<"Server::sendRequestedMedia(): Client asked for "
4094                                         <<"unknown file \""<<(i->name)<<"\""<<std::endl;
4095                         continue;
4096                 }
4097
4098                 //TODO get path + name
4099                 std::string tpath = m_media[(*i).name].path;
4100
4101                 // Read data
4102                 std::ifstream fis(tpath.c_str(), std::ios_base::binary);
4103                 if(fis.good() == false){
4104                         errorstream<<"Server::sendRequestedMedia(): Could not open \""
4105                                         <<tpath<<"\" for reading"<<std::endl;
4106                         continue;
4107                 }
4108                 std::ostringstream tmp_os(std::ios_base::binary);
4109                 bool bad = false;
4110                 for(;;){
4111                         char buf[1024];
4112                         fis.read(buf, 1024);
4113                         std::streamsize len = fis.gcount();
4114                         tmp_os.write(buf, len);
4115                         file_size_bunch_total += len;
4116                         if(fis.eof())
4117                                 break;
4118                         if(!fis.good()){
4119                                 bad = true;
4120                                 break;
4121                         }
4122                 }
4123                 if(bad){
4124                         errorstream<<"Server::sendRequestedMedia(): Failed to read \""
4125                                         <<(*i).name<<"\""<<std::endl;
4126                         continue;
4127                 }
4128                 /*infostream<<"Server::sendRequestedMedia(): Loaded \""
4129                                 <<tname<<"\""<<std::endl;*/
4130                 // Put in list
4131                 file_bunches[file_bunches.size()-1].push_back(
4132                                 SendableMedia((*i).name, tpath, tmp_os.str()));
4133
4134                 // Start next bunch if got enough data
4135                 if(file_size_bunch_total >= bytes_per_bunch){
4136                         file_bunches.push_back(core::list<SendableMedia>());
4137                         file_size_bunch_total = 0;
4138                 }
4139
4140         }
4141
4142         /* Create and send packets */
4143
4144         u32 num_bunches = file_bunches.size();
4145         for(u32 i=0; i<num_bunches; i++)
4146         {
4147                 std::ostringstream os(std::ios_base::binary);
4148
4149                 /*
4150                         u16 command
4151                         u16 total number of texture bunches
4152                         u16 index of this bunch
4153                         u32 number of files in this bunch
4154                         for each file {
4155                                 u16 length of name
4156                                 string name
4157                                 u32 length of data
4158                                 data
4159                         }
4160                 */
4161
4162                 writeU16(os, TOCLIENT_MEDIA);
4163                 writeU16(os, num_bunches);
4164                 writeU16(os, i);
4165                 writeU32(os, file_bunches[i].size());
4166
4167                 for(core::list<SendableMedia>::Iterator
4168                                 j = file_bunches[i].begin();
4169                                 j != file_bunches[i].end(); j++){
4170                         os<<serializeString(j->name);
4171                         os<<serializeLongString(j->data);
4172                 }
4173
4174                 // Make data buffer
4175                 std::string s = os.str();
4176                 verbosestream<<"Server::sendRequestedMedia(): bunch "
4177                                 <<i<<"/"<<num_bunches
4178                                 <<" files="<<file_bunches[i].size()
4179                                 <<" size=" <<s.size()<<std::endl;
4180                 SharedBuffer<u8> data((u8*)s.c_str(), s.size());
4181                 // Send as reliable
4182                 m_con.Send(peer_id, 0, data, true);
4183         }
4184 }
4185
4186 /*
4187         Something random
4188 */
4189
4190 void Server::DiePlayer(u16 peer_id)
4191 {
4192         DSTACK(__FUNCTION_NAME);
4193
4194         PlayerSAO *playersao = getPlayerSAO(peer_id);
4195         assert(playersao);
4196
4197         infostream<<"Server::DiePlayer(): Player "
4198                         <<playersao->getPlayer()->getName()
4199                         <<" dies"<<std::endl;
4200
4201         playersao->setHP(0);
4202
4203         // Trigger scripted stuff
4204         scriptapi_on_dieplayer(m_lua, playersao);
4205
4206         SendPlayerHP(peer_id);
4207         SendDeathscreen(m_con, peer_id, false, v3f(0,0,0));
4208 }
4209
4210 void Server::RespawnPlayer(u16 peer_id)
4211 {
4212         DSTACK(__FUNCTION_NAME);
4213
4214         PlayerSAO *playersao = getPlayerSAO(peer_id);
4215         assert(playersao);
4216
4217         infostream<<"Server::RespawnPlayer(): Player "
4218                         <<playersao->getPlayer()->getName()
4219                         <<" respawns"<<std::endl;
4220
4221         playersao->setHP(PLAYER_MAX_HP);
4222
4223         bool repositioned = scriptapi_on_respawnplayer(m_lua, playersao);
4224         if(!repositioned){
4225                 v3f pos = findSpawnPos(m_env->getServerMap());
4226                 playersao->setPos(pos);
4227         }
4228 }
4229
4230 void Server::UpdateCrafting(u16 peer_id)
4231 {
4232         DSTACK(__FUNCTION_NAME);
4233
4234         Player* player = m_env->getPlayer(peer_id);
4235         assert(player);
4236
4237         // Get a preview for crafting
4238         ItemStack preview;
4239         // No crafting in creative mode
4240         if(g_settings->getBool("creative_mode") == false)
4241                 getCraftingResult(&player->inventory, preview, false, this);
4242
4243         // Put the new preview in
4244         InventoryList *plist = player->inventory.getList("craftpreview");
4245         assert(plist);
4246         assert(plist->getSize() >= 1);
4247         plist->changeItem(0, preview);
4248 }
4249
4250 RemoteClient* Server::getClient(u16 peer_id)
4251 {
4252         DSTACK(__FUNCTION_NAME);
4253         //JMutexAutoLock lock(m_con_mutex);
4254         core::map<u16, RemoteClient*>::Node *n;
4255         n = m_clients.find(peer_id);
4256         // A client should exist for all peers
4257         assert(n != NULL);
4258         return n->getValue();
4259 }
4260
4261 std::wstring Server::getStatusString()
4262 {
4263         std::wostringstream os(std::ios_base::binary);
4264         os<<L"# Server: ";
4265         // Version
4266         os<<L"version="<<narrow_to_wide(VERSION_STRING);
4267         // Uptime
4268         os<<L", uptime="<<m_uptime.get();
4269         // Information about clients
4270         os<<L", clients={";
4271         for(core::map<u16, RemoteClient*>::Iterator
4272                 i = m_clients.getIterator();
4273                 i.atEnd() == false; i++)
4274         {
4275                 // Get client and check that it is valid
4276                 RemoteClient *client = i.getNode()->getValue();
4277                 assert(client->peer_id == i.getNode()->getKey());
4278                 if(client->serialization_version == SER_FMT_VER_INVALID)
4279                         continue;
4280                 // Get player
4281                 Player *player = m_env->getPlayer(client->peer_id);
4282                 // Get name of player
4283                 std::wstring name = L"unknown";
4284                 if(player != NULL)
4285                         name = narrow_to_wide(player->getName());
4286                 // Add name to information string
4287                 os<<name<<L",";
4288         }
4289         os<<L"}";
4290         if(((ServerMap*)(&m_env->getMap()))->isSavingEnabled() == false)
4291                 os<<std::endl<<L"# Server: "<<" WARNING: Map saving is disabled.";
4292         if(g_settings->get("motd") != "")
4293                 os<<std::endl<<L"# Server: "<<narrow_to_wide(g_settings->get("motd"));
4294         return os.str();
4295 }
4296
4297 std::set<std::string> Server::getPlayerEffectivePrivs(const std::string &name)
4298 {
4299         std::set<std::string> privs;
4300         scriptapi_get_auth(m_lua, name, NULL, &privs);
4301         return privs;
4302 }
4303
4304 bool Server::checkPriv(const std::string &name, const std::string &priv)
4305 {
4306         std::set<std::string> privs = getPlayerEffectivePrivs(name);
4307         return (privs.count(priv) != 0);
4308 }
4309
4310 void Server::reportPrivsModified(const std::string &name)
4311 {
4312         if(name == ""){
4313                 for(core::map<u16, RemoteClient*>::Iterator
4314                                 i = m_clients.getIterator();
4315                                 i.atEnd() == false; i++){
4316                         RemoteClient *client = i.getNode()->getValue();
4317                         Player *player = m_env->getPlayer(client->peer_id);
4318                         reportPrivsModified(player->getName());
4319                 }
4320         } else {
4321                 Player *player = m_env->getPlayer(name.c_str());
4322                 if(!player)
4323                         return;
4324                 SendPlayerPrivileges(player->peer_id);
4325                 player->getPlayerSAO()->updatePrivileges(
4326                                 getPlayerEffectivePrivs(name),
4327                                 isSingleplayer());
4328         }
4329 }
4330
4331 // Saves g_settings to configpath given at initialization
4332 void Server::saveConfig()
4333 {
4334         if(m_path_config != "")
4335                 g_settings->updateConfigFile(m_path_config.c_str());
4336 }
4337
4338 void Server::notifyPlayer(const char *name, const std::wstring msg)
4339 {
4340         Player *player = m_env->getPlayer(name);
4341         if(!player)
4342                 return;
4343         SendChatMessage(player->peer_id, std::wstring(L"Server: -!- ")+msg);
4344 }
4345
4346 void Server::notifyPlayers(const std::wstring msg)
4347 {
4348         BroadcastChatMessage(msg);
4349 }
4350
4351 void Server::queueBlockEmerge(v3s16 blockpos, bool allow_generate)
4352 {
4353         u8 flags = 0;
4354         if(!allow_generate)
4355                 flags |= BLOCK_EMERGE_FLAG_FROMDISK;
4356         m_emerge_queue.addBlock(PEER_ID_INEXISTENT, blockpos, flags);
4357 }
4358
4359 // IGameDef interface
4360 // Under envlock
4361 IItemDefManager* Server::getItemDefManager()
4362 {
4363         return m_itemdef;
4364 }
4365 INodeDefManager* Server::getNodeDefManager()
4366 {
4367         return m_nodedef;
4368 }
4369 ICraftDefManager* Server::getCraftDefManager()
4370 {
4371         return m_craftdef;
4372 }
4373 ITextureSource* Server::getTextureSource()
4374 {
4375         return NULL;
4376 }
4377 u16 Server::allocateUnknownNodeId(const std::string &name)
4378 {
4379         return m_nodedef->allocateDummy(name);
4380 }
4381 ISoundManager* Server::getSoundManager()
4382 {
4383         return &dummySoundManager;
4384 }
4385 MtEventManager* Server::getEventManager()
4386 {
4387         return m_event;
4388 }
4389
4390 IWritableItemDefManager* Server::getWritableItemDefManager()
4391 {
4392         return m_itemdef;
4393 }
4394 IWritableNodeDefManager* Server::getWritableNodeDefManager()
4395 {
4396         return m_nodedef;
4397 }
4398 IWritableCraftDefManager* Server::getWritableCraftDefManager()
4399 {
4400         return m_craftdef;
4401 }
4402
4403 const ModSpec* Server::getModSpec(const std::string &modname)
4404 {
4405         for(core::list<ModSpec>::Iterator i = m_mods.begin();
4406                         i != m_mods.end(); i++){
4407                 const ModSpec &mod = *i;
4408                 if(mod.name == modname)
4409                         return &mod;
4410         }
4411         return NULL;
4412 }
4413 std::string Server::getBuiltinLuaPath()
4414 {
4415         return porting::path_share + DIR_DELIM + "builtin";
4416 }
4417
4418 v3f findSpawnPos(ServerMap &map)
4419 {
4420         //return v3f(50,50,50)*BS;
4421
4422         v3s16 nodepos;
4423
4424 #if 0
4425         nodepos = v2s16(0,0);
4426         groundheight = 20;
4427 #endif
4428
4429 #if 1
4430         // Try to find a good place a few times
4431         for(s32 i=0; i<1000; i++)
4432         {
4433                 s32 range = 1 + i;
4434                 // We're going to try to throw the player to this position
4435                 v2s16 nodepos2d = v2s16(-range + (myrand()%(range*2)),
4436                                 -range + (myrand()%(range*2)));
4437                 //v2s16 sectorpos = getNodeSectorPos(nodepos2d);
4438                 // Get ground height at point (fallbacks to heightmap function)
4439                 s16 groundheight = map.findGroundLevel(nodepos2d);
4440                 // Don't go underwater
4441                 if(groundheight < WATER_LEVEL)
4442                 {
4443                         //infostream<<"-> Underwater"<<std::endl;
4444                         continue;
4445                 }
4446                 // Don't go to high places
4447                 if(groundheight > WATER_LEVEL + 4)
4448                 {
4449                         //infostream<<"-> Underwater"<<std::endl;
4450                         continue;
4451                 }
4452
4453                 nodepos = v3s16(nodepos2d.X, groundheight-2, nodepos2d.Y);
4454                 bool is_good = false;
4455                 s32 air_count = 0;
4456                 for(s32 i=0; i<10; i++){
4457                         v3s16 blockpos = getNodeBlockPos(nodepos);
4458                         map.emergeBlock(blockpos, true);
4459                         MapNode n = map.getNodeNoEx(nodepos);
4460                         if(n.getContent() == CONTENT_AIR){
4461                                 air_count++;
4462                                 if(air_count >= 2){
4463                                         is_good = true;
4464                                         nodepos.Y -= 1;
4465                                         break;
4466                                 }
4467                         }
4468                         nodepos.Y++;
4469                 }
4470                 if(is_good){
4471                         // Found a good place
4472                         //infostream<<"Searched through "<<i<<" places."<<std::endl;
4473                         break;
4474                 }
4475         }
4476 #endif
4477
4478         return intToFloat(nodepos, BS);
4479 }
4480
4481 PlayerSAO* Server::emergePlayer(const char *name, u16 peer_id)
4482 {
4483         RemotePlayer *player = NULL;
4484         bool newplayer = false;
4485
4486         /*
4487                 Try to get an existing player
4488         */
4489         player = static_cast<RemotePlayer*>(m_env->getPlayer(name));
4490
4491         // If player is already connected, cancel
4492         if(player != NULL && player->peer_id != 0)
4493         {
4494                 infostream<<"emergePlayer(): Player already connected"<<std::endl;
4495                 return NULL;
4496         }
4497
4498         /*
4499                 If player with the wanted peer_id already exists, cancel.
4500         */
4501         if(m_env->getPlayer(peer_id) != NULL)
4502         {
4503                 infostream<<"emergePlayer(): Player with wrong name but same"
4504                                 " peer_id already exists"<<std::endl;
4505                 return NULL;
4506         }
4507
4508         /*
4509                 Create a new player if it doesn't exist yet
4510         */
4511         if(player == NULL)
4512         {
4513                 newplayer = true;
4514                 player = new RemotePlayer(this);
4515                 player->updateName(name);
4516
4517                 /* Set player position */
4518                 infostream<<"Server: Finding spawn place for player \""
4519                                 <<name<<"\""<<std::endl;
4520                 v3f pos = findSpawnPos(m_env->getServerMap());
4521                 player->setPosition(pos);
4522
4523                 /* Add player to environment */
4524                 m_env->addPlayer(player);
4525         }
4526
4527         /*
4528                 Create a new player active object
4529         */
4530         PlayerSAO *playersao = new PlayerSAO(m_env, player, peer_id,
4531                         getPlayerEffectivePrivs(player->getName()),
4532                         isSingleplayer());
4533
4534         /* Add object to environment */
4535         m_env->addActiveObject(playersao);
4536
4537         /* Run scripts */
4538         if(newplayer)
4539                 scriptapi_on_newplayer(m_lua, playersao);
4540
4541         scriptapi_on_joinplayer(m_lua, playersao);
4542
4543         /* Creative mode */
4544         if(g_settings->getBool("creative_mode"))
4545                 playersao->createCreativeInventory();
4546
4547         return playersao;
4548 }
4549
4550 void Server::handlePeerChange(PeerChange &c)
4551 {
4552         JMutexAutoLock envlock(m_env_mutex);
4553         JMutexAutoLock conlock(m_con_mutex);
4554
4555         if(c.type == PEER_ADDED)
4556         {
4557                 /*
4558                         Add
4559                 */
4560
4561                 // Error check
4562                 core::map<u16, RemoteClient*>::Node *n;
4563                 n = m_clients.find(c.peer_id);
4564                 // The client shouldn't already exist
4565                 assert(n == NULL);
4566
4567                 // Create client
4568                 RemoteClient *client = new RemoteClient();
4569                 client->peer_id = c.peer_id;
4570                 m_clients.insert(client->peer_id, client);
4571
4572         } // PEER_ADDED
4573         else if(c.type == PEER_REMOVED)
4574         {
4575                 /*
4576                         Delete
4577                 */
4578
4579                 // Error check
4580                 core::map<u16, RemoteClient*>::Node *n;
4581                 n = m_clients.find(c.peer_id);
4582                 // The client should exist
4583                 assert(n != NULL);
4584
4585                 /*
4586                         Mark objects to be not known by the client
4587                 */
4588                 RemoteClient *client = n->getValue();
4589                 // Handle objects
4590                 for(core::map<u16, bool>::Iterator
4591                                 i = client->m_known_objects.getIterator();
4592                                 i.atEnd()==false; i++)
4593                 {
4594                         // Get object
4595                         u16 id = i.getNode()->getKey();
4596                         ServerActiveObject* obj = m_env->getActiveObject(id);
4597
4598                         if(obj && obj->m_known_by_count > 0)
4599                                 obj->m_known_by_count--;
4600                 }
4601
4602                 /*
4603                         Clear references to playing sounds
4604                 */
4605                 for(std::map<s32, ServerPlayingSound>::iterator
4606                                 i = m_playing_sounds.begin();
4607                                 i != m_playing_sounds.end();)
4608                 {
4609                         ServerPlayingSound &psound = i->second;
4610                         psound.clients.erase(c.peer_id);
4611                         if(psound.clients.size() == 0)
4612                                 m_playing_sounds.erase(i++);
4613                         else
4614                                 i++;
4615                 }
4616
4617                 Player *player = m_env->getPlayer(c.peer_id);
4618
4619                 // Collect information about leaving in chat
4620                 std::wstring message;
4621                 {
4622                         if(player != NULL)
4623                         {
4624                                 std::wstring name = narrow_to_wide(player->getName());
4625                                 message += L"*** ";
4626                                 message += name;
4627                                 message += L" left game";
4628                                 if(c.timeout)
4629                                         message += L" (timed out)";
4630                         }
4631                 }
4632
4633                 /* Run scripts and remove from environment */
4634                 {
4635                         if(player != NULL)
4636                         {
4637                                 PlayerSAO *playersao = player->getPlayerSAO();
4638                                 assert(playersao);
4639
4640                                 scriptapi_on_leaveplayer(m_lua, playersao);
4641
4642                                 playersao->disconnected();
4643                         }
4644                 }
4645
4646                 /*
4647                         Print out action
4648                 */
4649                 {
4650                         if(player != NULL)
4651                         {
4652                                 std::ostringstream os(std::ios_base::binary);
4653                                 for(core::map<u16, RemoteClient*>::Iterator
4654                                         i = m_clients.getIterator();
4655                                         i.atEnd() == false; i++)
4656                                 {
4657                                         RemoteClient *client = i.getNode()->getValue();
4658                                         assert(client->peer_id == i.getNode()->getKey());
4659                                         if(client->serialization_version == SER_FMT_VER_INVALID)
4660                                                 continue;
4661                                         // Get player
4662                                         Player *player = m_env->getPlayer(client->peer_id);
4663                                         if(!player)
4664                                                 continue;
4665                                         // Get name of player
4666                                         os<<player->getName()<<" ";
4667                                 }
4668
4669                                 actionstream<<player->getName()<<" "
4670                                                 <<(c.timeout?"times out.":"leaves game.")
4671                                                 <<" List of players: "
4672                                                 <<os.str()<<std::endl;
4673                         }
4674                 }
4675
4676                 // Delete client
4677                 delete m_clients[c.peer_id];
4678                 m_clients.remove(c.peer_id);
4679
4680                 // Send player info to all remaining clients
4681                 //SendPlayerInfos();
4682
4683                 // Send leave chat message to all remaining clients
4684                 if(message.length() != 0)
4685                         BroadcastChatMessage(message);
4686
4687         } // PEER_REMOVED
4688         else
4689         {
4690                 assert(0);
4691         }
4692 }
4693
4694 void Server::handlePeerChanges()
4695 {
4696         while(m_peer_change_queue.size() > 0)
4697         {
4698                 PeerChange c = m_peer_change_queue.pop_front();
4699
4700                 verbosestream<<"Server: Handling peer change: "
4701                                 <<"id="<<c.peer_id<<", timeout="<<c.timeout
4702                                 <<std::endl;
4703
4704                 handlePeerChange(c);
4705         }
4706 }
4707
4708 void dedicated_server_loop(Server &server, bool &kill)
4709 {
4710         DSTACK(__FUNCTION_NAME);
4711
4712         verbosestream<<"dedicated_server_loop()"<<std::endl;
4713
4714         IntervalLimiter m_profiler_interval;
4715
4716         for(;;)
4717         {
4718                 float steplen = g_settings->getFloat("dedicated_server_step");
4719                 // This is kind of a hack but can be done like this
4720                 // because server.step() is very light
4721                 {
4722                         ScopeProfiler sp(g_profiler, "dedicated server sleep");
4723                         sleep_ms((int)(steplen*1000.0));
4724                 }
4725                 server.step(steplen);
4726
4727                 if(server.getShutdownRequested() || kill)
4728                 {
4729                         infostream<<"Dedicated server quitting"<<std::endl;
4730                         break;
4731                 }
4732
4733                 /*
4734                         Profiler
4735                 */
4736                 float profiler_print_interval =
4737                                 g_settings->getFloat("profiler_print_interval");
4738                 if(profiler_print_interval != 0)
4739                 {
4740                         if(m_profiler_interval.step(steplen, profiler_print_interval))
4741                         {
4742                                 infostream<<"Profiler:"<<std::endl;
4743                                 g_profiler->print(infostream);
4744                                 g_profiler->clear();
4745                         }
4746                 }
4747         }
4748 }
4749
4750