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