src/environment.cpp

   1 /*
   2 Minetest-c55
   3 Copyright (C) 2010-2011 celeron55, Perttu Ahola <celeron55@gmail.com>
   4
   5 This program is free software; you can redistribute it and/or modify
   6 it under the terms of the GNU General Public License as published by
   7 the Free Software Foundation; either version 2 of the License, or
   8 (at your option) any later version.
   9
  10 This program is distributed in the hope that it will be useful,
  11 but WITHOUT ANY WARRANTY; without even the implied warranty of
  12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13 GNU General Public License for more details.
  14
  15 You should have received a copy of the GNU General Public License along
  16 with this program; if not, write to the Free Software Foundation, Inc.,
  17 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  18 */
  19
  20 #include "environment.h"
  21 #include "filesys.h"
  22 #include "porting.h"
  23 #include "collision.h"
  24 #include "content_mapnode.h"
  25 #include "mapblock.h"
  26 #include "serverobject.h"
  27 #include "content_sao.h"
  28 #include "mapgen.h"
  29 #include "settings.h"
  30 #include "log.h"
  31 #include "profiler.h"
  32
  33 #define PP(x) "("<<(x).X<<","<<(x).Y<<","<<(x).Z<<")"
  34
  35 Environment::Environment():
  36         m_time_of_day(9000)
  37 {
  38 }
  39
  40 Environment::~Environment()
  41 {
  42         // Deallocate players
  43         for(core::list<Player*>::Iterator i = m_players.begin();
  44                         i != m_players.end(); i++)
  45         {
  46                 delete (*i);
  47         }
  48 }
  49
  50 void Environment::addPlayer(Player *player)
  51 {
  52         DSTACK(__FUNCTION_NAME);
  53         /*
  54                 Check that peer_ids are unique.
  55                 Also check that names are unique.
  56                 Exception: there can be multiple players with peer_id=0
  57         */
  58         // If peer id is non-zero, it has to be unique.
  59         if(player->peer_id != 0)
  60                 assert(getPlayer(player->peer_id) == NULL);
  61         // Name has to be unique.
  62         assert(getPlayer(player->getName()) == NULL);
  63         // Add.
  64         m_players.push_back(player);
  65 }
  66
  67 void Environment::removePlayer(u16 peer_id)
  68 {
  69         DSTACK(__FUNCTION_NAME);
  70 re_search:
  71         for(core::list<Player*>::Iterator i = m_players.begin();
  72                         i != m_players.end(); i++)
  73         {
  74                 Player *player = *i;
  75                 if(player->peer_id != peer_id)
  76                         continue;
  77
  78                 delete player;
  79                 m_players.erase(i);
  80                 // See if there is an another one
  81                 // (shouldn't be, but just to be sure)
  82                 goto re_search;
  83         }
  84 }
  85
  86 Player * Environment::getPlayer(u16 peer_id)
  87 {
  88         for(core::list<Player*>::Iterator i = m_players.begin();
  89                         i != m_players.end(); i++)
  90         {
  91                 Player *player = *i;
  92                 if(player->peer_id == peer_id)
  93                         return player;
  94         }
  95         return NULL;
  96 }
  97
  98 Player * Environment::getPlayer(const char *name)
  99 {
 100         for(core::list<Player*>::Iterator i = m_players.begin();
 101                         i != m_players.end(); i++)
 102         {
 103                 Player *player = *i;
 104                 if(strcmp(player->getName(), name) == 0)
 105                         return player;
 106         }
 107         return NULL;
 108 }
 109
 110 Player * Environment::getRandomConnectedPlayer()
 111 {
 112         core::list<Player*> connected_players = getPlayers(true);
 113         u32 chosen_one = myrand() % connected_players.size();
 114         u32 j = 0;
 115         for(core::list<Player*>::Iterator
 116                         i = connected_players.begin();
 117                         i != connected_players.end(); i++)
 118         {
 119                 if(j == chosen_one)
 120                 {
 121                         Player *player = *i;
 122                         return player;
 123                 }
 124                 j++;
 125         }
 126         return NULL;
 127 }
 128
 129 Player * Environment::getNearestConnectedPlayer(v3f pos)
 130 {
 131         core::list<Player*> connected_players = getPlayers(true);
 132         f32 nearest_d = 0;
 133         Player *nearest_player = NULL;
 134         for(core::list<Player*>::Iterator
 135                         i = connected_players.begin();
 136                         i != connected_players.end(); i++)
 137         {
 138                 Player *player = *i;
 139                 f32 d = player->getPosition().getDistanceFrom(pos);
 140                 if(d < nearest_d || nearest_player == NULL)
 141                 {
 142                         nearest_d = d;
 143                         nearest_player = player;
 144                 }
 145         }
 146         return nearest_player;
 147 }
 148
 149 core::list<Player*> Environment::getPlayers()
 150 {
 151         return m_players;
 152 }
 153
 154 core::list<Player*> Environment::getPlayers(bool ignore_disconnected)
 155 {
 156         core::list<Player*> newlist;
 157         for(core::list<Player*>::Iterator
 158                         i = m_players.begin();
 159                         i != m_players.end(); i++)
 160         {
 161                 Player *player = *i;
 162
 163                 if(ignore_disconnected)
 164                 {
 165                         // Ignore disconnected players
 166                         if(player->peer_id == 0)
 167                                 continue;
 168                 }
 169
 170                 newlist.push_back(player);
 171         }
 172         return newlist;
 173 }
 174
 175 void Environment::printPlayers(std::ostream &o)
 176 {
 177         o<<"Players in environment:"<<std::endl;
 178         for(core::list<Player*>::Iterator i = m_players.begin();
 179                         i != m_players.end(); i++)
 180         {
 181                 Player *player = *i;
 182                 o<<"Player peer_id="<<player->peer_id<<std::endl;
 183         }
 184 }
 185
 186 /*void Environment::setDayNightRatio(u32 r)
 187 {
 188         getDayNightRatio() = r;
 189 }*/
 190
 191 u32 Environment::getDayNightRatio()
 192 {
 193         //return getDayNightRatio();
 194         return time_to_daynight_ratio(m_time_of_day);
 195 }
 196
 197 /*
 198         ActiveBlockList
 199 */
 200
 201 void fillRadiusBlock(v3s16 p0, s16 r, core::map<v3s16, bool> &list)
 202 {
 203         v3s16 p;
 204         for(p.X=p0.X-r; p.X<=p0.X+r; p.X++)
 205         for(p.Y=p0.Y-r; p.Y<=p0.Y+r; p.Y++)
 206         for(p.Z=p0.Z-r; p.Z<=p0.Z+r; p.Z++)
 207         {
 208                 // Set in list
 209                 list[p] = true;
 210         }
 211 }
 212
 213 void ActiveBlockList::update(core::list<v3s16> &active_positions,
 214                 s16 radius,
 215                 core::map<v3s16, bool> &blocks_removed,
 216                 core::map<v3s16, bool> &blocks_added)
 217 {
 218         /*
 219                 Create the new list
 220         */
 221         core::map<v3s16, bool> newlist;
 222         for(core::list<v3s16>::Iterator i = active_positions.begin();
 223                         i != active_positions.end(); i++)
 224         {
 225                 fillRadiusBlock(*i, radius, newlist);
 226         }
 227
 228         /*
 229                 Find out which blocks on the old list are not on the new list
 230         */
 231         // Go through old list
 232         for(core::map<v3s16, bool>::Iterator i = m_list.getIterator();
 233                         i.atEnd()==false; i++)
 234         {
 235                 v3s16 p = i.getNode()->getKey();
 236                 // If not on new list, it's been removed
 237                 if(newlist.find(p) == NULL)
 238                         blocks_removed.insert(p, true);
 239         }
 240
 241         /*
 242                 Find out which blocks on the new list are not on the old list
 243         */
 244         // Go through new list
 245         for(core::map<v3s16, bool>::Iterator i = newlist.getIterator();
 246                         i.atEnd()==false; i++)
 247         {
 248                 v3s16 p = i.getNode()->getKey();
 249                 // If not on old list, it's been added
 250                 if(m_list.find(p) == NULL)
 251                         blocks_added.insert(p, true);
 252         }
 253
 254         /*
 255                 Update m_list
 256         */
 257         m_list.clear();
 258         for(core::map<v3s16, bool>::Iterator i = newlist.getIterator();
 259                         i.atEnd()==false; i++)
 260         {
 261                 v3s16 p = i.getNode()->getKey();
 262                 m_list.insert(p, true);
 263         }
 264 }
 265
 266 /*
 267         ServerEnvironment
 268 */
 269
 270 ServerEnvironment::ServerEnvironment(ServerMap *map, Server *server):
 271         m_map(map),
 272         m_server(server),
 273         m_random_spawn_timer(3),
 274         m_send_recommended_timer(0),
 275         m_game_time(0),
 276         m_game_time_fraction_counter(0)
 277 {
 278 }
 279
 280 ServerEnvironment::~ServerEnvironment()
 281 {
 282         // Clear active block list.
 283         // This makes the next one delete all active objects.
 284         m_active_blocks.clear();
 285
 286         // Convert all objects to static and delete the active objects
 287         deactivateFarObjects(true);
 288
 289         // Drop/delete map
 290         m_map->drop();
 291 }
 292
 293 void ServerEnvironment::serializePlayers(const std::string &savedir)
 294 {
 295         std::string players_path = savedir + "/players";
 296         fs::CreateDir(players_path);
 297
 298         core::map<Player*, bool> saved_players;
 299
 300         std::vector<fs::DirListNode> player_files = fs::GetDirListing(players_path);
 301         for(u32 i=0; i<player_files.size(); i++)
 302         {
 303                 if(player_files[i].dir)
 304                         continue;
 305
 306                 // Full path to this file
 307                 std::string path = players_path + "/" + player_files[i].name;
 308
 309                 //infostream<<"Checking player file "<<path<<std::endl;
 310
 311                 // Load player to see what is its name
 312                 ServerRemotePlayer testplayer;
 313                 {
 314                         // Open file and deserialize
 315                         std::ifstream is(path.c_str(), std::ios_base::binary);
 316                         if(is.good() == false)
 317                         {
 318                                 infostream<<"Failed to read "<<path<<std::endl;
 319                                 continue;
 320                         }
 321                         testplayer.deSerialize(is);
 322                 }
 323
 324                 //infostream<<"Loaded test player with name "<<testplayer.getName()<<std::endl;
 325
 326                 // Search for the player
 327                 std::string playername = testplayer.getName();
 328                 Player *player = getPlayer(playername.c_str());
 329                 if(player == NULL)
 330                 {
 331                         infostream<<"Didn't find matching player, ignoring file "<<path<<std::endl;
 332                         continue;
 333                 }
 334
 335                 //infostream<<"Found matching player, overwriting."<<std::endl;
 336
 337                 // OK, found. Save player there.
 338                 {
 339                         // Open file and serialize
 340                         std::ofstream os(path.c_str(), std::ios_base::binary);
 341                         if(os.good() == false)
 342                         {
 343                                 infostream<<"Failed to overwrite "<<path<<std::endl;
 344                                 continue;
 345                         }
 346                         player->serialize(os);
 347                         saved_players.insert(player, true);
 348                 }
 349         }
 350
 351         for(core::list<Player*>::Iterator i = m_players.begin();
 352                         i != m_players.end(); i++)
 353         {
 354                 Player *player = *i;
 355                 if(saved_players.find(player) != NULL)
 356                 {
 357                         /*infostream<<"Player "<<player->getName()
 358                                         <<" was already saved."<<std::endl;*/
 359                         continue;
 360                 }
 361                 std::string playername = player->getName();
 362                 // Don't save unnamed player
 363                 if(playername == "")
 364                 {
 365                         //infostream<<"Not saving unnamed player."<<std::endl;
 366                         continue;
 367                 }
 368                 /*
 369                         Find a sane filename
 370                 */
 371                 if(string_allowed(playername, PLAYERNAME_ALLOWED_CHARS) == false)
 372                         playername = "player";
 373                 std::string path = players_path + "/" + playername;
 374                 bool found = false;
 375                 for(u32 i=0; i<1000; i++)
 376                 {
 377                         if(fs::PathExists(path) == false)
 378                         {
 379                                 found = true;
 380                                 break;
 381                         }
 382                         path = players_path + "/" + playername + itos(i);
 383                 }
 384                 if(found == false)
 385                 {
 386                         infostream<<"Didn't find free file for player"<<std::endl;
 387                         continue;
 388                 }
 389
 390                 {
 391                         /*infostream<<"Saving player "<<player->getName()<<" to "
 392                                         <<path<<std::endl;*/
 393                         // Open file and serialize
 394                         std::ofstream os(path.c_str(), std::ios_base::binary);
 395                         if(os.good() == false)
 396                         {
 397                                 infostream<<"Failed to overwrite "<<path<<std::endl;
 398                                 continue;
 399                         }
 400                         player->serialize(os);
 401                         saved_players.insert(player, true);
 402                 }
 403         }
 404
 405         //infostream<<"Saved "<<saved_players.size()<<" players."<<std::endl;
 406 }
 407
 408 void ServerEnvironment::deSerializePlayers(const std::string &savedir)
 409 {
 410         std::string players_path = savedir + "/players";
 411
 412         core::map<Player*, bool> saved_players;
 413
 414         std::vector<fs::DirListNode> player_files = fs::GetDirListing(players_path);
 415         for(u32 i=0; i<player_files.size(); i++)
 416         {
 417                 if(player_files[i].dir)
 418                         continue;
 419
 420                 // Full path to this file
 421                 std::string path = players_path + "/" + player_files[i].name;
 422
 423                 infostream<<"Checking player file "<<path<<std::endl;
 424
 425                 // Load player to see what is its name
 426                 ServerRemotePlayer testplayer;
 427                 {
 428                         // Open file and deserialize
 429                         std::ifstream is(path.c_str(), std::ios_base::binary);
 430                         if(is.good() == false)
 431                         {
 432                                 infostream<<"Failed to read "<<path<<std::endl;
 433                                 continue;
 434                         }
 435                         testplayer.deSerialize(is);
 436                 }
 437
 438                 if(!string_allowed(testplayer.getName(), PLAYERNAME_ALLOWED_CHARS))
 439                 {
 440                         infostream<<"Not loading player with invalid name: "
 441                                         <<testplayer.getName()<<std::endl;
 442                 }
 443
 444                 infostream<<"Loaded test player with name "<<testplayer.getName()
 445                                 <<std::endl;
 446
 447                 // Search for the player
 448                 std::string playername = testplayer.getName();
 449                 Player *player = getPlayer(playername.c_str());
 450                 bool newplayer = false;
 451                 if(player == NULL)
 452                 {
 453                         infostream<<"Is a new player"<<std::endl;
 454                         player = new ServerRemotePlayer();
 455                         newplayer = true;
 456                 }
 457
 458                 // Load player
 459                 {
 460                         infostream<<"Reading player "<<testplayer.getName()<<" from "
 461                                         <<path<<std::endl;
 462                         // Open file and deserialize
 463                         std::ifstream is(path.c_str(), std::ios_base::binary);
 464                         if(is.good() == false)
 465                         {
 466                                 infostream<<"Failed to read "<<path<<std::endl;
 467                                 continue;
 468                         }
 469                         player->deSerialize(is);
 470                 }
 471
 472                 if(newplayer)
 473                         addPlayer(player);
 474         }
 475 }
 476
 477 void ServerEnvironment::saveMeta(const std::string &savedir)
 478 {
 479         std::string path = savedir + "/env_meta.txt";
 480
 481         // Open file and serialize
 482         std::ofstream os(path.c_str(), std::ios_base::binary);
 483         if(os.good() == false)
 484         {
 485                 infostream<<"ServerEnvironment::saveMeta(): Failed to open "
 486                                 <<path<<std::endl;
 487                 throw SerializationError("Couldn't save env meta");
 488         }
 489
 490         Settings args;
 491         args.setU64("game_time", m_game_time);
 492         args.setU64("time_of_day", getTimeOfDay());
 493         args.writeLines(os);
 494         os<<"EnvArgsEnd\n";
 495 }
 496
 497 void ServerEnvironment::loadMeta(const std::string &savedir)
 498 {
 499         std::string path = savedir + "/env_meta.txt";
 500
 501         // Open file and deserialize
 502         std::ifstream is(path.c_str(), std::ios_base::binary);
 503         if(is.good() == false)
 504         {
 505                 infostream<<"ServerEnvironment::loadMeta(): Failed to open "
 506                                 <<path<<std::endl;
 507                 throw SerializationError("Couldn't load env meta");
 508         }
 509
 510         Settings args;
 511
 512         for(;;)
 513         {
 514                 if(is.eof())
 515                         throw SerializationError
 516                                         ("ServerEnvironment::loadMeta(): EnvArgsEnd not found");
 517                 std::string line;
 518                 std::getline(is, line);
 519                 std::string trimmedline = trim(line);
 520                 if(trimmedline == "EnvArgsEnd")
 521                         break;
 522                 args.parseConfigLine(line);
 523         }
 524
 525         try{
 526                 m_game_time = args.getU64("game_time");
 527         }catch(SettingNotFoundException &e){
 528                 // Getting this is crucial, otherwise timestamps are useless
 529                 throw SerializationError("Couldn't load env meta game_time");
 530         }
 531
 532         try{
 533                 m_time_of_day = args.getU64("time_of_day");
 534         }catch(SettingNotFoundException &e){
 535                 // This is not as important
 536                 m_time_of_day = 9000;
 537         }
 538 }
 539
 540 #if 0
 541 // This is probably very useless
 542 void spawnRandomObjects(MapBlock *block)
 543 {
 544         for(s16 z0=0; z0<MAP_BLOCKSIZE; z0++)
 545         for(s16 x0=0; x0<MAP_BLOCKSIZE; x0++)
 546         {
 547                 bool last_node_walkable = false;
 548                 for(s16 y0=0; y0<MAP_BLOCKSIZE; y0++)
 549                 {
 550                         v3s16 p(x0,y0,z0);
 551                         MapNode n = block->getNodeNoEx(p);
 552                         if(n.getContent() == CONTENT_IGNORE)
 553                                 continue;
 554                         if(content_features(n).liquid_type != LIQUID_NONE)
 555                                 continue;
 556                         if(content_features(n).walkable)
 557                         {
 558                                 last_node_walkable = true;
 559                                 continue;
 560                         }
 561                         if(last_node_walkable)
 562                         {
 563                                 // If block contains light information
 564                                 if(content_features(n).param_type == CPT_LIGHT)
 565                                 {
 566                                         if(n.getLight(LIGHTBANK_DAY) <= 5)
 567                                         {
 568                                                 if(myrand() % 1000 == 0)
 569                                                 {
 570                                                         v3f pos_f = intToFloat(p+block->getPosRelative(), BS);
 571                                                         pos_f.Y -= BS*0.4;
 572                                                         ServerActiveObject *obj = new Oerkki1SAO(NULL,0,pos_f);
 573                                                         std::string data = obj->getStaticData();
 574                                                         StaticObject s_obj(obj->getType(),
 575                                                                         obj->getBasePosition(), data);
 576                                                         // Add one
 577                                                         block->m_static_objects.insert(0, s_obj);
 578                                                         delete obj;
 579                                                         block->setChangedFlag();
 580                                                 }
 581                                         }
 582                                 }
 583                         }
 584                         last_node_walkable = false;
 585                 }
 586         }
 587 }
 588 #endif
 589
 590 void ServerEnvironment::activateBlock(MapBlock *block, u32 additional_dtime)
 591 {
 592         // Get time difference
 593         u32 dtime_s = 0;
 594         u32 stamp = block->getTimestamp();
 595         if(m_game_time > stamp && stamp != BLOCK_TIMESTAMP_UNDEFINED)
 596                 dtime_s = m_game_time - block->getTimestamp();
 597         dtime_s += additional_dtime;
 598
 599         // Set current time as timestamp (and let it set ChangedFlag)
 600         block->setTimestamp(m_game_time);
 601
 602         //infostream<<"Block is "<<dtime_s<<" seconds old."<<std::endl;
 603
 604         // Activate stored objects
 605         activateObjects(block);
 606
 607         // Run node metadata
 608         bool changed = block->m_node_metadata.step((float)dtime_s);
 609         if(changed)
 610         {
 611                 MapEditEvent event;
 612                 event.type = MEET_BLOCK_NODE_METADATA_CHANGED;
 613                 event.p = block->getPos();
 614                 m_map->dispatchEvent(&event);
 615
 616                 block->setChangedFlag();
 617         }
 618
 619         // TODO: Do something
 620         // TODO: Implement usage of ActiveBlockModifier
 621
 622         // Here's a quick demonstration
 623         v3s16 p0;
 624         for(p0.X=0; p0.X<MAP_BLOCKSIZE; p0.X++)
 625         for(p0.Y=0; p0.Y<MAP_BLOCKSIZE; p0.Y++)
 626         for(p0.Z=0; p0.Z<MAP_BLOCKSIZE; p0.Z++)
 627         {
 628                 v3s16 p = p0 + block->getPosRelative();
 629                 MapNode n = block->getNodeNoEx(p0);
 630 #if 1
 631                 // Test something:
 632                 // Convert all mud under proper day lighting to grass
 633                 if(n.getContent() == CONTENT_MUD)
 634                 {
 635                         if(dtime_s > 300)
 636                         {
 637                                 MapNode n_top = block->getNodeNoEx(p0+v3s16(0,1,0));
 638                                 if(content_features(n_top).air_equivalent &&
 639                                                 n_top.getLight(LIGHTBANK_DAY) >= 13)
 640                                 {
 641                                         n.setContent(CONTENT_GRASS);
 642                                         m_map->addNodeWithEvent(p, n);
 643                                 }
 644                         }
 645                 }
 646 #endif
 647         }
 648 }
 649
 650 static void getMob_dungeon_master(Settings &properties)
 651 {
 652         properties.set("looks", "dungeon_master");
 653         properties.setFloat("yaw", 1.57);
 654         properties.setFloat("hp", 30);
 655         properties.setBool("bright_shooting", true);
 656         properties.set("shoot_type", "fireball");
 657         properties.set("shoot_y", "0.7");
 658         properties.set("player_hit_damage", "1");
 659         properties.set("player_hit_distance", "1.0");
 660         properties.set("player_hit_interval", "0.5");
 661         properties.setBool("mindless_rage", myrand_range(0,100)==0);
 662 }
 663
 664 void ServerEnvironment::step(float dtime)
 665 {
 666         DSTACK(__FUNCTION_NAME);
 667
 668         //TimeTaker timer("ServerEnv step");
 669
 670         // Get some settings
 671         bool footprints = g_settings->getBool("footprints");
 672
 673         /*
 674                 Increment game time
 675         */
 676         {
 677                 m_game_time_fraction_counter += dtime;
 678                 u32 inc_i = (u32)m_game_time_fraction_counter;
 679                 m_game_time += inc_i;
 680                 m_game_time_fraction_counter -= (float)inc_i;
 681         }
 682
 683         /*
 684                 Handle players
 685         */
 686         {
 687                 ScopeProfiler sp(g_profiler, "SEnv: handle players avg", SPT_LOWPASS);
 688                 for(core::list<Player*>::Iterator i = m_players.begin();
 689                                 i != m_players.end(); i++)
 690                 {
 691                         Player *player = *i;
 692
 693                         // Ignore disconnected players
 694                         if(player->peer_id == 0)
 695                                 continue;
 696
 697                         v3f playerpos = player->getPosition();
 698
 699                         // Move
 700                         player->move(dtime, *m_map, 100*BS);
 701
 702                         /*
 703                                 Add footsteps to grass
 704                         */
 705                         if(footprints)
 706                         {
 707                                 // Get node that is at BS/4 under player
 708                                 v3s16 bottompos = floatToInt(playerpos + v3f(0,-BS/4,0), BS);
 709                                 try{
 710                                         MapNode n = m_map->getNode(bottompos);
 711                                         if(n.getContent() == CONTENT_GRASS)
 712                                         {
 713                                                 n.setContent(CONTENT_GRASS_FOOTSTEPS);
 714                                                 m_map->setNode(bottompos, n);
 715                                         }
 716                                 }
 717                                 catch(InvalidPositionException &e)
 718                                 {
 719                                 }
 720                         }
 721                 }
 722         }
 723
 724         /*
 725                 Manage active block list
 726         */
 727         if(m_active_blocks_management_interval.step(dtime, 2.0))
 728         {
 729                 ScopeProfiler sp(g_profiler, "SEnv: manage act. block list avg", SPT_LOWPASS);
 730                 /*
 731                         Get player block positions
 732                 */
 733                 core::list<v3s16> players_blockpos;
 734                 for(core::list<Player*>::Iterator
 735                                 i = m_players.begin();
 736                                 i != m_players.end(); i++)
 737                 {
 738                         Player *player = *i;
 739                         // Ignore disconnected players
 740                         if(player->peer_id == 0)
 741                                 continue;
 742                         v3s16 blockpos = getNodeBlockPos(
 743                                         floatToInt(player->getPosition(), BS));
 744                         players_blockpos.push_back(blockpos);
 745                 }
 746
 747                 /*
 748                         Update list of active blocks, collecting changes
 749                 */
 750                 const s16 active_block_range = g_settings->getS16("active_block_range");
 751                 core::map<v3s16, bool> blocks_removed;
 752                 core::map<v3s16, bool> blocks_added;
 753                 m_active_blocks.update(players_blockpos, active_block_range,
 754                                 blocks_removed, blocks_added);
 755
 756                 /*
 757                         Handle removed blocks
 758                 */
 759
 760                 // Convert active objects that are no more in active blocks to static
 761                 deactivateFarObjects(false);
 762
 763                 for(core::map<v3s16, bool>::Iterator
 764                                 i = blocks_removed.getIterator();
 765                                 i.atEnd()==false; i++)
 766                 {
 767                         v3s16 p = i.getNode()->getKey();
 768
 769                         /*infostream<<"Server: Block ("<<p.X<<","<<p.Y<<","<<p.Z
 770                                         <<") became inactive"<<std::endl;*/
 771
 772                         MapBlock *block = m_map->getBlockNoCreateNoEx(p);
 773                         if(block==NULL)
 774                                 continue;
 775
 776                         // Set current time as timestamp (and let it set ChangedFlag)
 777                         block->setTimestamp(m_game_time);
 778                 }
 779
 780                 /*
 781                         Handle added blocks
 782                 */
 783
 784                 for(core::map<v3s16, bool>::Iterator
 785                                 i = blocks_added.getIterator();
 786                                 i.atEnd()==false; i++)
 787                 {
 788                         v3s16 p = i.getNode()->getKey();
 789
 790                         /*infostream<<"Server: Block ("<<p.X<<","<<p.Y<<","<<p.Z
 791                                         <<") became active"<<std::endl;*/
 792
 793                         MapBlock *block = m_map->getBlockNoCreateNoEx(p);
 794                         if(block==NULL)
 795                                 continue;
 796
 797                         activateBlock(block);
 798                 }
 799         }
 800
 801         /*
 802                 Mess around in active blocks
 803         */
 804         if(m_active_blocks_nodemetadata_interval.step(dtime, 1.0))
 805         {
 806                 ScopeProfiler sp(g_profiler, "SEnv: mess in act. blocks avg", SPT_LOWPASS);
 807
 808                 float dtime = 1.0;
 809
 810                 for(core::map<v3s16, bool>::Iterator
 811                                 i = m_active_blocks.m_list.getIterator();
 812                                 i.atEnd()==false; i++)
 813                 {
 814                         v3s16 p = i.getNode()->getKey();
 815
 816                         /*infostream<<"Server: Block ("<<p.X<<","<<p.Y<<","<<p.Z
 817                                         <<") being handled"<<std::endl;*/
 818
 819                         MapBlock *block = m_map->getBlockNoCreateNoEx(p);
 820                         if(block==NULL)
 821                                 continue;
 822
 823                         // Reset block usage timer
 824                         block->resetUsageTimer();
 825
 826                         // Set current time as timestamp
 827                         block->setTimestampNoChangedFlag(m_game_time);
 828
 829                         // Run node metadata
 830                         bool changed = block->m_node_metadata.step(dtime);
 831                         if(changed)
 832                         {
 833                                 MapEditEvent event;
 834                                 event.type = MEET_BLOCK_NODE_METADATA_CHANGED;
 835                                 event.p = p;
 836                                 m_map->dispatchEvent(&event);
 837
 838                                 block->setChangedFlag();
 839                         }
 840                 }
 841         }
 842
 843         if(m_active_blocks_test_interval.step(dtime, 10.0))
 844         {
 845                 ScopeProfiler sp(g_profiler, "SEnv: modify in blocks avg", SPT_LOWPASS);
 846                 //float dtime = 10.0;
 847
 848                 for(core::map<v3s16, bool>::Iterator
 849                                 i = m_active_blocks.m_list.getIterator();
 850                                 i.atEnd()==false; i++)
 851                 {
 852                         v3s16 p = i.getNode()->getKey();
 853
 854                         /*infostream<<"Server: Block ("<<p.X<<","<<p.Y<<","<<p.Z
 855                                         <<") being handled"<<std::endl;*/
 856
 857                         MapBlock *block = m_map->getBlockNoCreateNoEx(p);
 858                         if(block==NULL)
 859                                 continue;
 860
 861                         // Set current time as timestamp
 862                         block->setTimestampNoChangedFlag(m_game_time);
 863
 864                         /*
 865                                 Do stuff!
 866
 867                                 Note that map modifications should be done using the event-
 868                                 making map methods so that the server gets information
 869                                 about them.
 870
 871                                 Reading can be done quickly directly from the block.
 872
 873                                 Everything should bind to inside this single content
 874                                 searching loop to keep things fast.
 875                         */
 876                         // TODO: Implement usage of ActiveBlockModifier
 877
 878                         // Find out how many objects the block contains
 879                         //u32 active_object_count = block->m_static_objects.m_active.size();
 880                         // Find out how many objects this and all the neighbors contain
 881                         u32 active_object_count_wider = 0;
 882                         for(s16 x=-1; x<=1; x++)
 883                         for(s16 y=-1; y<=1; y++)
 884                         for(s16 z=-1; z<=1; z++)
 885                         {
 886                                 MapBlock *block = m_map->getBlockNoCreateNoEx(p+v3s16(x,y,z));
 887                                 if(block==NULL)
 888                                         continue;
 889                                 active_object_count_wider +=
 890                                                 block->m_static_objects.m_active.size();
 891                         }
 892
 893                         v3s16 p0;
 894                         for(p0.X=0; p0.X<MAP_BLOCKSIZE; p0.X++)
 895                         for(p0.Y=0; p0.Y<MAP_BLOCKSIZE; p0.Y++)
 896                         for(p0.Z=0; p0.Z<MAP_BLOCKSIZE; p0.Z++)
 897                         {
 898                                 v3s16 p = p0 + block->getPosRelative();
 899                                 MapNode n = block->getNodeNoEx(p0);
 900
 901                                 /*
 902                                         Test something:
 903                                         Convert mud under proper lighting to grass
 904                                 */
 905                                 if(n.getContent() == CONTENT_MUD)
 906                                 {
 907                                         if(myrand()%20 == 0)
 908                                         {
 909                                                 MapNode n_top = m_map->getNodeNoEx(p+v3s16(0,1,0));
 910                                                 if(content_features(n_top).air_equivalent &&
 911                                                                 n_top.getLightBlend(getDayNightRatio()) >= 13)
 912                                                 {
 913                                                         n.setContent(CONTENT_GRASS);
 914                                                         m_map->addNodeWithEvent(p, n);
 915                                                 }
 916                                         }
 917                                 }
 918                                 /*
 919                                         Convert grass into mud if under something else than air
 920                                 */
 921                                 if(n.getContent() == CONTENT_GRASS)
 922                                 {
 923                                         //if(myrand()%20 == 0)
 924                                         {
 925                                                 MapNode n_top = m_map->getNodeNoEx(p+v3s16(0,1,0));
 926                                                 if(content_features(n_top).air_equivalent == false)
 927                                                 {
 928                                                         n.setContent(CONTENT_MUD);
 929                                                         m_map->addNodeWithEvent(p, n);
 930                                                 }
 931                                         }
 932                                 }
 933                                 /*
 934                                         Rats spawn around regular trees
 935                                 */
 936                                 if(n.getContent() == CONTENT_TREE ||
 937                                                 n.getContent() == CONTENT_JUNGLETREE)
 938                                 {
 939                                         if(myrand()%200 == 0 && active_object_count_wider == 0)
 940                                         {
 941                                                 v3s16 p1 = p + v3s16(myrand_range(-2, 2),
 942                                                                 0, myrand_range(-2, 2));
 943                                                 MapNode n1 = m_map->getNodeNoEx(p1);
 944                                                 MapNode n1b = m_map->getNodeNoEx(p1+v3s16(0,-1,0));
 945                                                 if(n1b.getContent() == CONTENT_GRASS &&
 946                                                                 n1.getContent() == CONTENT_AIR)
 947                                                 {
 948                                                         v3f pos = intToFloat(p1, BS);
 949                                                         ServerActiveObject *obj = new RatSAO(this, 0, pos);
 950                                                         addActiveObject(obj);
 951                                                 }
 952                                         }
 953                                 }
 954                                 /*
 955                                         Fun things spawn in caves and dungeons
 956                                 */
 957                                 if(n.getContent() == CONTENT_STONE ||
 958                                                 n.getContent() == CONTENT_MOSSYCOBBLE)
 959                                 {
 960                                         if(myrand()%200 == 0 && active_object_count_wider == 0)
 961                                         {
 962                                                 v3s16 p1 = p + v3s16(0,1,0);
 963                                                 MapNode n1a = m_map->getNodeNoEx(p1+v3s16(0,0,0));
 964                                                 if(n1a.getLightBlend(getDayNightRatio()) <= 3){
 965                                                         MapNode n1b = m_map->getNodeNoEx(p1+v3s16(0,1,0));
 966                                                         if(n1a.getContent() == CONTENT_AIR &&
 967                                                                         n1b.getContent() == CONTENT_AIR)
 968                                                         {
 969                                                                 v3f pos = intToFloat(p1, BS);
 970                                                                 int i = myrand()%5;
 971                                                                 if(i == 0 || i == 1){
 972                                                                         actionstream<<"A dungeon master spawns at "
 973                                                                                         <<PP(p1)<<std::endl;
 974                                                                         Settings properties;
 975                                                                         getMob_dungeon_master(properties);
 976                                                                         ServerActiveObject *obj = new MobV2SAO(
 977                                                                                         this, 0, pos, &properties);
 978                                                                         addActiveObject(obj);
 979                                                                 } else if(i == 2 || i == 3){
 980                                                                         actionstream<<"Rats spawn at "
 981                                                                                         <<PP(p1)<<std::endl;
 982                                                                         for(int j=0; j<3; j++){
 983                                                                                 ServerActiveObject *obj = new RatSAO(
 984                                                                                                 this, 0, pos);
 985                                                                                 addActiveObject(obj);
 986                                                                         }
 987                                                                 } else {
 988                                                                         actionstream<<"An oerkki spawns at "
 989                                                                                         <<PP(p1)<<std::endl;
 990                                                                         ServerActiveObject *obj = new Oerkki1SAO(
 991                                                                                         this, 0, pos);
 992                                                                         addActiveObject(obj);
 993                                                                 }
 994                                                         }
 995                                                 }
 996                                         }
 997                                 }
 998                                 /*
 999                                         Make trees from saplings!
1000                                 */
1001                                 if(n.getContent() == CONTENT_SAPLING)
1002                                 {
1003                                         if(myrand()%50 == 0)
1004                                         {
1005                                                 actionstream<<"A sapling grows into a tree at "
1006                                                                 <<PP(p)<<std::endl;
1007
1008                                                 core::map<v3s16, MapBlock*> modified_blocks;
1009                                                 v3s16 tree_p = p;
1010                                                 ManualMapVoxelManipulator vmanip(m_map);
1011                                                 v3s16 tree_blockp = getNodeBlockPos(tree_p);
1012                                                 vmanip.initialEmerge(tree_blockp - v3s16(1,1,1), tree_blockp + v3s16(1,1,1));
1013                                                 bool is_apple_tree = myrand()%4 == 0;
1014                                                 mapgen::make_tree(vmanip, tree_p, is_apple_tree);
1015                                                 vmanip.blitBackAll(&modified_blocks);
1016
1017                                                 // update lighting
1018                                                 core::map<v3s16, MapBlock*> lighting_modified_blocks;
1019                                                 for(core::map<v3s16, MapBlock*>::Iterator
1020                                                         i = modified_blocks.getIterator();
1021                                                         i.atEnd() == false; i++)
1022                                                 {
1023                                                         lighting_modified_blocks.insert(i.getNode()->getKey(), i.getNode()->getValue());
1024                                                 }
1025                                                 m_map->updateLighting(lighting_modified_blocks, modified_blocks);
1026
1027                                                 // Send a MEET_OTHER event
1028                                                 MapEditEvent event;
1029                                                 event.type = MEET_OTHER;
1030                                                 for(core::map<v3s16, MapBlock*>::Iterator
1031                                                         i = modified_blocks.getIterator();
1032                                                         i.atEnd() == false; i++)
1033                                                 {
1034                                                         v3s16 p = i.getNode()->getKey();
1035                                                         event.modified_blocks.insert(p, true);
1036                                                 }
1037                                                 m_map->dispatchEvent(&event);
1038                                         }
1039                                 }
1040                         }
1041                 }
1042         }
1043
1044         /*
1045                 Step active objects
1046         */
1047         {
1048                 ScopeProfiler sp(g_profiler, "SEnv: step act. objs avg", SPT_LOWPASS);
1049                 //TimeTaker timer("Step active objects");
1050
1051                 // This helps the objects to send data at the same time
1052                 bool send_recommended = false;
1053                 m_send_recommended_timer += dtime;
1054                 if(m_send_recommended_timer > 0.10)
1055                 {
1056                         m_send_recommended_timer = 0;
1057                         send_recommended = true;
1058                 }
1059
1060                 for(core::map<u16, ServerActiveObject*>::Iterator
1061                                 i = m_active_objects.getIterator();
1062                                 i.atEnd()==false; i++)
1063                 {
1064                         ServerActiveObject* obj = i.getNode()->getValue();
1065                         // Remove non-peaceful mobs on peaceful mode
1066                         if(g_settings->getBool("only_peaceful_mobs")){
1067                                 if(!obj->isPeaceful())
1068                                         obj->m_removed = true;
1069                         }
1070                         // Don't step if is to be removed or stored statically
1071                         if(obj->m_removed || obj->m_pending_deactivation)
1072                                 continue;
1073                         // Step object
1074                         obj->step(dtime, send_recommended);
1075                         // Read messages from object
1076                         while(obj->m_messages_out.size() > 0)
1077                         {
1078                                 m_active_object_messages.push_back(
1079                                                 obj->m_messages_out.pop_front());
1080                         }
1081                 }
1082         }
1083
1084         /*
1085                 Manage active objects
1086         */
1087         if(m_object_management_interval.step(dtime, 0.5))
1088         {
1089                 ScopeProfiler sp(g_profiler, "SEnv: remove removed objs avg", SPT_LOWPASS);
1090                 /*
1091                         Remove objects that satisfy (m_removed && m_known_by_count==0)
1092                 */
1093                 removeRemovedObjects();
1094         }
1095
1096         if(g_settings->getBool("enable_experimental"))
1097         {
1098
1099         /*
1100                 TEST CODE
1101         */
1102 #if 0
1103         m_random_spawn_timer -= dtime;
1104         if(m_random_spawn_timer < 0)
1105         {
1106                 //m_random_spawn_timer += myrand_range(2.0, 20.0);
1107                 //m_random_spawn_timer += 2.0;
1108                 m_random_spawn_timer += 200.0;
1109
1110                 /*
1111                         Find some position
1112                 */
1113
1114                 /*v2s16 p2d(myrand_range(-5,5), myrand_range(-5,5));
1115                 s16 y = 1 + getServerMap().findGroundLevel(p2d);
1116                 v3f pos(p2d.X*BS,y*BS,p2d.Y*BS);*/
1117
1118                 Player *player = getRandomConnectedPlayer();
1119                 v3f pos(0,0,0);
1120                 if(player)
1121                         pos = player->getPosition();
1122                 pos += v3f(
1123                         myrand_range(-3,3)*BS,
1124                         5,
1125                         myrand_range(-3,3)*BS
1126                 );
1127
1128                 /*
1129                         Create a ServerActiveObject
1130                 */
1131
1132                 //TestSAO *obj = new TestSAO(this, 0, pos);
1133                 //ServerActiveObject *obj = new ItemSAO(this, 0, pos, "CraftItem Stick 1");
1134                 //ServerActiveObject *obj = new RatSAO(this, 0, pos);
1135                 //ServerActiveObject *obj = new Oerkki1SAO(this, 0, pos);
1136                 //ServerActiveObject *obj = new FireflySAO(this, 0, pos);
1137
1138                 infostream<<"Server: Spawning MobV2SAO at "
1139                                 <<"("<<pos.X<<","<<pos.Y<<","<<pos.Z<<")"<<std::endl;
1140
1141                 Settings properties;
1142                 getMob_dungeon_master(properties);
1143                 ServerActiveObject *obj = new MobV2SAO(this, 0, pos, &properties);
1144                 addActiveObject(obj);
1145         }
1146 #endif
1147
1148         } // enable_experimental
1149 }
1150
1151 ServerActiveObject* ServerEnvironment::getActiveObject(u16 id)
1152 {
1153         core::map<u16, ServerActiveObject*>::Node *n;
1154         n = m_active_objects.find(id);
1155         if(n == NULL)
1156                 return NULL;
1157         return n->getValue();
1158 }
1159
1160 bool isFreeServerActiveObjectId(u16 id,
1161                 core::map<u16, ServerActiveObject*> &objects)
1162 {
1163         if(id == 0)
1164                 return false;
1165
1166         for(core::map<u16, ServerActiveObject*>::Iterator
1167                         i = objects.getIterator();
1168                         i.atEnd()==false; i++)
1169         {
1170                 if(i.getNode()->getKey() == id)
1171                         return false;
1172         }
1173         return true;
1174 }
1175
1176 u16 getFreeServerActiveObjectId(
1177                 core::map<u16, ServerActiveObject*> &objects)
1178 {
1179         u16 new_id = 1;
1180         for(;;)
1181         {
1182                 if(isFreeServerActiveObjectId(new_id, objects))
1183                         return new_id;
1184
1185                 if(new_id == 65535)
1186                         return 0;
1187
1188                 new_id++;
1189         }
1190 }
1191
1192 u16 ServerEnvironment::addActiveObject(ServerActiveObject *object)
1193 {
1194         assert(object);
1195         u16 id = addActiveObjectRaw(object, true);
1196         return id;
1197 }
1198
1199 bool ServerEnvironment::addActiveObjectAsStatic(ServerActiveObject *obj)
1200 {
1201         assert(obj);
1202
1203         v3f objectpos = obj->getBasePosition();
1204
1205         // The block in which the object resides in
1206         v3s16 blockpos_o = getNodeBlockPos(floatToInt(objectpos, BS));
1207
1208         /*
1209                 Update the static data
1210         */
1211
1212         // Create new static object
1213         std::string staticdata = obj->getStaticData();
1214         StaticObject s_obj(obj->getType(), objectpos, staticdata);
1215         // Add to the block where the object is located in
1216         v3s16 blockpos = getNodeBlockPos(floatToInt(objectpos, BS));
1217         // Get or generate the block
1218         MapBlock *block = m_map->emergeBlock(blockpos);
1219
1220         bool succeeded = false;
1221
1222         if(block)
1223         {
1224                 block->m_static_objects.insert(0, s_obj);
1225                 block->raiseModified(MOD_STATE_WRITE_AT_UNLOAD);
1226                 succeeded = true;
1227         }
1228         else{
1229                 infostream<<"ServerEnvironment::addActiveObjectAsStatic: "
1230                                 <<"Could not find or generate "
1231                                 <<"a block for storing static object"<<std::endl;
1232                 succeeded = false;
1233         }
1234
1235         delete obj;
1236
1237         return succeeded;
1238 }
1239
1240 /*
1241         Finds out what new objects have been added to
1242         inside a radius around a position
1243 */
1244 void ServerEnvironment::getAddedActiveObjects(v3s16 pos, s16 radius,
1245                 core::map<u16, bool> &current_objects,
1246                 core::map<u16, bool> &added_objects)
1247 {
1248         v3f pos_f = intToFloat(pos, BS);
1249         f32 radius_f = radius * BS;
1250         /*
1251                 Go through the object list,
1252                 - discard m_removed objects,
1253                 - discard objects that are too far away,
1254                 - discard objects that are found in current_objects.
1255                 - add remaining objects to added_objects
1256         */
1257         for(core::map<u16, ServerActiveObject*>::Iterator
1258                         i = m_active_objects.getIterator();
1259                         i.atEnd()==false; i++)
1260         {
1261                 u16 id = i.getNode()->getKey();
1262                 // Get object
1263                 ServerActiveObject *object = i.getNode()->getValue();
1264                 if(object == NULL)
1265                         continue;
1266                 // Discard if removed
1267                 if(object->m_removed)
1268                         continue;
1269                 // Discard if too far
1270                 f32 distance_f = object->getBasePosition().getDistanceFrom(pos_f);
1271                 if(distance_f > radius_f)
1272                         continue;
1273                 // Discard if already on current_objects
1274                 core::map<u16, bool>::Node *n;
1275                 n = current_objects.find(id);
1276                 if(n != NULL)
1277                         continue;
1278                 // Add to added_objects
1279                 added_objects.insert(id, false);
1280         }
1281 }
1282
1283 /*
1284         Finds out what objects have been removed from
1285         inside a radius around a position
1286 */
1287 void ServerEnvironment::getRemovedActiveObjects(v3s16 pos, s16 radius,
1288                 core::map<u16, bool> &current_objects,
1289                 core::map<u16, bool> &removed_objects)
1290 {
1291         v3f pos_f = intToFloat(pos, BS);
1292         f32 radius_f = radius * BS;
1293         /*
1294                 Go through current_objects; object is removed if:
1295                 - object is not found in m_active_objects (this is actually an
1296                   error condition; objects should be set m_removed=true and removed
1297                   only after all clients have been informed about removal), or
1298                 - object has m_removed=true, or
1299                 - object is too far away
1300         */
1301         for(core::map<u16, bool>::Iterator
1302                         i = current_objects.getIterator();
1303                         i.atEnd()==false; i++)
1304         {
1305                 u16 id = i.getNode()->getKey();
1306                 ServerActiveObject *object = getActiveObject(id);
1307                 if(object == NULL)
1308                 {
1309                         infostream<<"ServerEnvironment::getRemovedActiveObjects():"
1310                                         <<" object in current_objects is NULL"<<std::endl;
1311                 }
1312                 else if(object->m_removed == false)
1313                 {
1314                         f32 distance_f = object->getBasePosition().getDistanceFrom(pos_f);
1315                         /*infostream<<"removed == false"
1316                                         <<"distance_f = "<<distance_f
1317                                         <<", radius_f = "<<radius_f<<std::endl;*/
1318                         if(distance_f < radius_f)
1319                         {
1320                                 // Not removed
1321                                 continue;
1322                         }
1323                 }
1324                 removed_objects.insert(id, false);
1325         }
1326 }
1327
1328 ActiveObjectMessage ServerEnvironment::getActiveObjectMessage()
1329 {
1330         if(m_active_object_messages.size() == 0)
1331                 return ActiveObjectMessage(0);
1332
1333         return m_active_object_messages.pop_front();
1334 }
1335
1336 /*
1337         ************ Private methods *************
1338 */
1339
1340 u16 ServerEnvironment::addActiveObjectRaw(ServerActiveObject *object,
1341                 bool set_changed)
1342 {
1343         assert(object);
1344         if(object->getId() == 0)
1345         {
1346                 u16 new_id = getFreeServerActiveObjectId(m_active_objects);
1347                 if(new_id == 0)
1348                 {
1349                         infostream<<"ServerEnvironment::addActiveObjectRaw(): "
1350                                         <<"no free ids available"<<std::endl;
1351                         delete object;
1352                         return 0;
1353                 }
1354                 object->setId(new_id);
1355         }
1356         if(isFreeServerActiveObjectId(object->getId(), m_active_objects) == false)
1357         {
1358                 infostream<<"ServerEnvironment::addActiveObjectRaw(): "
1359                                 <<"id is not free ("<<object->getId()<<")"<<std::endl;
1360                 delete object;
1361                 return 0;
1362         }
1363         /*infostream<<"ServerEnvironment::addActiveObjectRaw(): "
1364                         <<"added (id="<<object->getId()<<")"<<std::endl;*/
1365
1366         m_active_objects.insert(object->getId(), object);
1367
1368         // Add static object to active static list of the block
1369         v3f objectpos = object->getBasePosition();
1370         std::string staticdata = object->getStaticData();
1371         StaticObject s_obj(object->getType(), objectpos, staticdata);
1372         // Add to the block where the object is located in
1373         v3s16 blockpos = getNodeBlockPos(floatToInt(objectpos, BS));
1374         MapBlock *block = m_map->getBlockNoCreateNoEx(blockpos);
1375         if(block)
1376         {
1377                 block->m_static_objects.m_active.insert(object->getId(), s_obj);
1378                 object->m_static_exists = true;
1379                 object->m_static_block = blockpos;
1380
1381                 if(set_changed)
1382                         block->setChangedFlag();
1383         }
1384         else{
1385                 infostream<<"ServerEnv: Could not find a block for "
1386                                 <<"storing newly added static active object"<<std::endl;
1387         }
1388
1389         return object->getId();
1390 }
1391
1392 /*
1393         Remove objects that satisfy (m_removed && m_known_by_count==0)
1394 */
1395 void ServerEnvironment::removeRemovedObjects()
1396 {
1397         core::list<u16> objects_to_remove;
1398         for(core::map<u16, ServerActiveObject*>::Iterator
1399                         i = m_active_objects.getIterator();
1400                         i.atEnd()==false; i++)
1401         {
1402                 u16 id = i.getNode()->getKey();
1403                 ServerActiveObject* obj = i.getNode()->getValue();
1404                 // This shouldn't happen but check it
1405                 if(obj == NULL)
1406                 {
1407                         infostream<<"NULL object found in ServerEnvironment"
1408                                         <<" while finding removed objects. id="<<id<<std::endl;
1409                         // Id to be removed from m_active_objects
1410                         objects_to_remove.push_back(id);
1411                         continue;
1412                 }
1413
1414                 /*
1415                         We will delete objects that are marked as removed or thatare
1416                         waiting for deletion after deactivation
1417                 */
1418                 if(obj->m_removed == false && obj->m_pending_deactivation == false)
1419                         continue;
1420
1421                 /*
1422                         Delete static data from block if is marked as removed
1423                 */
1424                 if(obj->m_static_exists && obj->m_removed)
1425                 {
1426                         MapBlock *block = m_map->getBlockNoCreateNoEx(obj->m_static_block);
1427                         if(block)
1428                         {
1429                                 block->m_static_objects.remove(id);
1430                                 block->setChangedFlag();
1431                         }
1432                 }
1433
1434                 // If m_known_by_count > 0, don't actually remove.
1435                 if(obj->m_known_by_count > 0)
1436                         continue;
1437
1438                 // Delete
1439                 delete obj;
1440                 // Id to be removed from m_active_objects
1441                 objects_to_remove.push_back(id);
1442         }
1443         // Remove references from m_active_objects
1444         for(core::list<u16>::Iterator i = objects_to_remove.begin();
1445                         i != objects_to_remove.end(); i++)
1446         {
1447                 m_active_objects.remove(*i);
1448         }
1449 }
1450
1451 /*
1452         Convert stored objects from blocks near the players to active.
1453 */
1454 void ServerEnvironment::activateObjects(MapBlock *block)
1455 {
1456         if(block==NULL)
1457                 return;
1458         // Ignore if no stored objects (to not set changed flag)
1459         if(block->m_static_objects.m_stored.size() == 0)
1460                 return;
1461         // A list for objects that couldn't be converted to static for some
1462         // reason. They will be stored back.
1463         core::list<StaticObject> new_stored;
1464         // Loop through stored static objects
1465         for(core::list<StaticObject>::Iterator
1466                         i = block->m_static_objects.m_stored.begin();
1467                         i != block->m_static_objects.m_stored.end(); i++)
1468         {
1469                 /*infostream<<"Server: Creating an active object from "
1470                                 <<"static data"<<std::endl;*/
1471                 StaticObject &s_obj = *i;
1472                 // Create an active object from the data
1473                 ServerActiveObject *obj = ServerActiveObject::create
1474                                 (s_obj.type, this, 0, s_obj.pos, s_obj.data);
1475                 // If couldn't create object, store static data back.
1476                 if(obj==NULL)
1477                 {
1478                         new_stored.push_back(s_obj);
1479                         continue;
1480                 }
1481                 // This will also add the object to the active static list
1482                 addActiveObjectRaw(obj, false);
1483                 //u16 id = addActiveObjectRaw(obj, false);
1484         }
1485         // Clear stored list
1486         block->m_static_objects.m_stored.clear();
1487         // Add leftover failed stuff to stored list
1488         for(core::list<StaticObject>::Iterator
1489                         i = new_stored.begin();
1490                         i != new_stored.end(); i++)
1491         {
1492                 StaticObject &s_obj = *i;
1493                 block->m_static_objects.m_stored.push_back(s_obj);
1494         }
1495         // Block has been modified
1496         // NOTE: No it has not really. Save I/O here.
1497         //block->setChangedFlag();
1498 }
1499
1500 /*
1501         Convert objects that are not in active blocks to static.
1502
1503         If m_known_by_count != 0, active object is not deleted, but static
1504         data is still updated.
1505
1506         If force_delete is set, active object is deleted nevertheless. It
1507         shall only be set so in the destructor of the environment.
1508 */
1509 void ServerEnvironment::deactivateFarObjects(bool force_delete)
1510 {
1511         core::list<u16> objects_to_remove;
1512         for(core::map<u16, ServerActiveObject*>::Iterator
1513                         i = m_active_objects.getIterator();
1514                         i.atEnd()==false; i++)
1515         {
1516                 ServerActiveObject* obj = i.getNode()->getValue();
1517
1518                 // This shouldn't happen but check it
1519                 if(obj == NULL)
1520                 {
1521                         infostream<<"NULL object found in ServerEnvironment"
1522                                         <<std::endl;
1523                         assert(0);
1524                         continue;
1525                 }
1526
1527                 u16 id = i.getNode()->getKey();
1528                 v3f objectpos = obj->getBasePosition();
1529
1530                 // The block in which the object resides in
1531                 v3s16 blockpos_o = getNodeBlockPos(floatToInt(objectpos, BS));
1532
1533                 // If block is active, don't remove
1534                 if(m_active_blocks.contains(blockpos_o))
1535                         continue;
1536
1537                 /*
1538                         Update the static data
1539                 */
1540
1541                 // Delete old static object
1542                 MapBlock *oldblock = NULL;
1543                 if(obj->m_static_exists)
1544                 {
1545                         MapBlock *block = m_map->getBlockNoCreateNoEx
1546                                         (obj->m_static_block);
1547                         if(block)
1548                         {
1549                                 block->m_static_objects.remove(id);
1550                                 oldblock = block;
1551                         }
1552                 }
1553                 // Create new static object
1554                 std::string staticdata = obj->getStaticData();
1555                 StaticObject s_obj(obj->getType(), objectpos, staticdata);
1556                 // Add to the block where the object is located in
1557                 v3s16 blockpos = getNodeBlockPos(floatToInt(objectpos, BS));
1558                 // Get or generate the block
1559                 MapBlock *block = m_map->emergeBlock(blockpos);
1560
1561                 /*MapBlock *block = m_map->getBlockNoCreateNoEx(blockpos);
1562                 if(block == NULL)
1563                 {
1564                         // Block not found. Is the old block still ok?
1565                         if(oldblock)
1566                                 block = oldblock;
1567                         // Load from disk or generate
1568                         else
1569                                 block = m_map->emergeBlock(blockpos);
1570                 }*/
1571
1572                 if(block)
1573                 {
1574                         block->m_static_objects.insert(0, s_obj);
1575                         block->setChangedFlag();
1576                         obj->m_static_exists = true;
1577                         obj->m_static_block = block->getPos();
1578                 }
1579                 else{
1580                         infostream<<"ServerEnv: Could not find or generate "
1581                                         <<"a block for storing static object"<<std::endl;
1582                         obj->m_static_exists = false;
1583                         continue;
1584                 }
1585
1586                 /*
1587                         Delete active object if not known by some client,
1588                         else set pending deactivation
1589                 */
1590
1591                 // If known by some client, don't delete.
1592                 if(obj->m_known_by_count > 0 && force_delete == false)
1593                 {
1594                         obj->m_pending_deactivation = true;
1595                         continue;
1596                 }
1597
1598                 /*infostream<<"Server: Stored static data. Deleting object."
1599                                 <<std::endl;*/
1600                 // Delete active object
1601                 delete obj;
1602                 // Id to be removed from m_active_objects
1603                 objects_to_remove.push_back(id);
1604         }
1605
1606         // Remove references from m_active_objects
1607         for(core::list<u16>::Iterator i = objects_to_remove.begin();
1608                         i != objects_to_remove.end(); i++)
1609         {
1610                 m_active_objects.remove(*i);
1611         }
1612 }
1613
1614
1615 #ifndef SERVER
1616
1617 /*
1618         ClientEnvironment
1619 */
1620
1621 ClientEnvironment::ClientEnvironment(ClientMap *map, scene::ISceneManager *smgr):
1622         m_map(map),
1623         m_smgr(smgr)
1624 {
1625         assert(m_map);
1626         assert(m_smgr);
1627 }
1628
1629 ClientEnvironment::~ClientEnvironment()
1630 {
1631         // delete active objects
1632         for(core::map<u16, ClientActiveObject*>::Iterator
1633                         i = m_active_objects.getIterator();
1634                         i.atEnd()==false; i++)
1635         {
1636                 delete i.getNode()->getValue();
1637         }
1638
1639         // Drop/delete map
1640         m_map->drop();
1641 }
1642
1643 void ClientEnvironment::addPlayer(Player *player)
1644 {
1645         DSTACK(__FUNCTION_NAME);
1646         /*
1647                 It is a failure if player is local and there already is a local
1648                 player
1649         */
1650         assert(!(player->isLocal() == true && getLocalPlayer() != NULL));
1651
1652         Environment::addPlayer(player);
1653 }
1654
1655 LocalPlayer * ClientEnvironment::getLocalPlayer()
1656 {
1657         for(core::list<Player*>::Iterator i = m_players.begin();
1658                         i != m_players.end(); i++)
1659         {
1660                 Player *player = *i;
1661                 if(player->isLocal())
1662                         return (LocalPlayer*)player;
1663         }
1664         return NULL;
1665 }
1666
1667 void ClientEnvironment::step(float dtime)
1668 {
1669         DSTACK(__FUNCTION_NAME);
1670
1671         // Get some settings
1672         bool free_move = g_settings->getBool("free_move");
1673         bool footprints = g_settings->getBool("footprints");
1674
1675         // Get local player
1676         LocalPlayer *lplayer = getLocalPlayer();
1677         assert(lplayer);
1678         // collision info queue
1679         core::list<CollisionInfo> player_collisions;
1680
1681         /*
1682                 Get the speed the player is going
1683         */
1684         bool is_climbing = lplayer->is_climbing;
1685
1686         f32 player_speed = 0.001; // just some small value
1687         player_speed = lplayer->getSpeed().getLength();
1688
1689         /*
1690                 Maximum position increment
1691         */
1692         //f32 position_max_increment = 0.05*BS;
1693         f32 position_max_increment = 0.1*BS;
1694
1695         // Maximum time increment (for collision detection etc)
1696         // time = distance / speed
1697         f32 dtime_max_increment = position_max_increment / player_speed;
1698
1699         // Maximum time increment is 10ms or lower
1700         if(dtime_max_increment > 0.01)
1701                 dtime_max_increment = 0.01;
1702
1703         // Don't allow overly huge dtime
1704         if(dtime > 0.5)
1705                 dtime = 0.5;
1706
1707         f32 dtime_downcount = dtime;
1708
1709         /*
1710                 Stuff that has a maximum time increment
1711         */
1712
1713         u32 loopcount = 0;
1714         do
1715         {
1716                 loopcount++;
1717
1718                 f32 dtime_part;
1719                 if(dtime_downcount > dtime_max_increment)
1720                 {
1721                         dtime_part = dtime_max_increment;
1722                         dtime_downcount -= dtime_part;
1723                 }
1724                 else
1725                 {
1726                         dtime_part = dtime_downcount;
1727                         /*
1728                                 Setting this to 0 (no -=dtime_part) disables an infinite loop
1729                                 when dtime_part is so small that dtime_downcount -= dtime_part
1730                                 does nothing
1731                         */
1732                         dtime_downcount = 0;
1733                 }
1734
1735                 /*
1736                         Handle local player
1737                 */
1738
1739                 {
1740                         v3f lplayerpos = lplayer->getPosition();
1741
1742                         // Apply physics
1743                         if(free_move == false && is_climbing == false)
1744                         {
1745                                 // Gravity
1746                                 v3f speed = lplayer->getSpeed();
1747                                 if(lplayer->swimming_up == false)
1748                                         speed.Y -= 9.81 * BS * dtime_part * 2;
1749
1750                                 // Water resistance
1751                                 if(lplayer->in_water_stable || lplayer->in_water)
1752                                 {
1753                                         f32 max_down = 2.0*BS;
1754                                         if(speed.Y < -max_down) speed.Y = -max_down;
1755
1756                                         f32 max = 2.5*BS;
1757                                         if(speed.getLength() > max)
1758                                         {
1759                                                 speed = speed / speed.getLength() * max;
1760                                         }
1761                                 }
1762
1763                                 lplayer->setSpeed(speed);
1764                         }
1765
1766                         /*
1767                                 Move the lplayer.
1768                                 This also does collision detection.
1769                         */
1770                         lplayer->move(dtime_part, *m_map, position_max_increment,
1771                                         &player_collisions);
1772                 }
1773         }
1774         while(dtime_downcount > 0.001);
1775
1776         //std::cout<<"Looped "<<loopcount<<" times."<<std::endl;
1777
1778         for(core::list<CollisionInfo>::Iterator
1779                         i = player_collisions.begin();
1780                         i != player_collisions.end(); i++)
1781         {
1782                 CollisionInfo &info = *i;
1783                 if(info.t == COLLISION_FALL)
1784                 {
1785                         //f32 tolerance = BS*10; // 2 without damage
1786                         f32 tolerance = BS*12; // 3 without damage
1787                         f32 factor = 1;
1788                         if(info.speed > tolerance)
1789                         {
1790                                 f32 damage_f = (info.speed - tolerance)/BS*factor;
1791                                 u16 damage = (u16)(damage_f+0.5);
1792                                 if(lplayer->hp > damage)
1793                                         lplayer->hp -= damage;
1794                                 else
1795                                         lplayer->hp = 0;
1796
1797                                 ClientEnvEvent event;
1798                                 event.type = CEE_PLAYER_DAMAGE;
1799                                 event.player_damage.amount = damage;
1800                                 m_client_event_queue.push_back(event);
1801                         }
1802                 }
1803         }
1804
1805         /*
1806                 A quick draft of lava damage
1807         */
1808         if(m_lava_hurt_interval.step(dtime, 1.0))
1809         {
1810                 v3f pf = lplayer->getPosition();
1811
1812                 // Feet, middle and head
1813                 v3s16 p1 = floatToInt(pf + v3f(0, BS*0.1, 0), BS);
1814                 MapNode n1 = m_map->getNodeNoEx(p1);
1815                 v3s16 p2 = floatToInt(pf + v3f(0, BS*0.8, 0), BS);
1816                 MapNode n2 = m_map->getNodeNoEx(p2);
1817                 v3s16 p3 = floatToInt(pf + v3f(0, BS*1.6, 0), BS);
1818                 MapNode n3 = m_map->getNodeNoEx(p2);
1819
1820                 u32 damage_per_second = 0;
1821                 damage_per_second = MYMAX(damage_per_second,
1822                                 content_features(n1).damage_per_second);
1823                 damage_per_second = MYMAX(damage_per_second,
1824                                 content_features(n2).damage_per_second);
1825                 damage_per_second = MYMAX(damage_per_second,
1826                                 content_features(n3).damage_per_second);
1827
1828                 if(damage_per_second != 0)
1829                 {
1830                         ClientEnvEvent event;
1831                         event.type = CEE_PLAYER_DAMAGE;
1832                         event.player_damage.amount = damage_per_second;
1833                         m_client_event_queue.push_back(event);
1834                 }
1835         }
1836
1837         /*
1838                 Stuff that can be done in an arbitarily large dtime
1839         */
1840         for(core::list<Player*>::Iterator i = m_players.begin();
1841                         i != m_players.end(); i++)
1842         {
1843                 Player *player = *i;
1844                 v3f playerpos = player->getPosition();
1845
1846                 /*
1847                         Handle non-local players
1848                 */
1849                 if(player->isLocal() == false)
1850                 {
1851                         // Move
1852                         player->move(dtime, *m_map, 100*BS);
1853
1854                 }
1855
1856                 // Update lighting on all players on client
1857                 u8 light = LIGHT_MAX;
1858                 try{
1859                         // Get node at head
1860                         v3s16 p = player->getLightPosition();
1861                         MapNode n = m_map->getNode(p);
1862                         light = n.getLightBlend(getDayNightRatio());
1863                 }
1864                 catch(InvalidPositionException &e) {}
1865                 player->updateLight(light);
1866
1867                 /*
1868                         Add footsteps to grass
1869                 */
1870                 if(footprints)
1871                 {
1872                         // Get node that is at BS/4 under player
1873                         v3s16 bottompos = floatToInt(playerpos + v3f(0,-BS/4,0), BS);
1874                         try{
1875                                 MapNode n = m_map->getNode(bottompos);
1876                                 if(n.getContent() == CONTENT_GRASS)
1877                                 {
1878                                         n.setContent(CONTENT_GRASS_FOOTSTEPS);
1879                                         m_map->setNode(bottompos, n);
1880                                         // Update mesh on client
1881                                         if(m_map->mapType() == MAPTYPE_CLIENT)
1882                                         {
1883                                                 v3s16 p_blocks = getNodeBlockPos(bottompos);
1884                                                 MapBlock *b = m_map->getBlockNoCreate(p_blocks);
1885                                                 //b->updateMesh(getDayNightRatio());
1886                                                 b->setMeshExpired(true);
1887                                         }
1888                                 }
1889                         }
1890                         catch(InvalidPositionException &e)
1891                         {
1892                         }
1893                 }
1894         }
1895
1896         /*
1897                 Step active objects and update lighting of them
1898         */
1899
1900         for(core::map<u16, ClientActiveObject*>::Iterator
1901                         i = m_active_objects.getIterator();
1902                         i.atEnd()==false; i++)
1903         {
1904                 ClientActiveObject* obj = i.getNode()->getValue();
1905                 // Step object
1906                 obj->step(dtime, this);
1907
1908                 if(m_active_object_light_update_interval.step(dtime, 0.21))
1909                 {
1910                         // Update lighting
1911                         //u8 light = LIGHT_MAX;
1912                         u8 light = 0;
1913                         try{
1914                                 // Get node at head
1915                                 v3s16 p = obj->getLightPosition();
1916                                 MapNode n = m_map->getNode(p);
1917                                 light = n.getLightBlend(getDayNightRatio());
1918                         }
1919                         catch(InvalidPositionException &e) {}
1920                         obj->updateLight(light);
1921                 }
1922         }
1923 }
1924
1925 void ClientEnvironment::updateMeshes(v3s16 blockpos)
1926 {
1927         m_map->updateMeshes(blockpos, getDayNightRatio());
1928 }
1929
1930 void ClientEnvironment::expireMeshes(bool only_daynight_diffed)
1931 {
1932         m_map->expireMeshes(only_daynight_diffed);
1933 }
1934
1935 ClientActiveObject* ClientEnvironment::getActiveObject(u16 id)
1936 {
1937         core::map<u16, ClientActiveObject*>::Node *n;
1938         n = m_active_objects.find(id);
1939         if(n == NULL)
1940                 return NULL;
1941         return n->getValue();
1942 }
1943
1944 bool isFreeClientActiveObjectId(u16 id,
1945                 core::map<u16, ClientActiveObject*> &objects)
1946 {
1947         if(id == 0)
1948                 return false;
1949
1950         for(core::map<u16, ClientActiveObject*>::Iterator
1951                         i = objects.getIterator();
1952                         i.atEnd()==false; i++)
1953         {
1954                 if(i.getNode()->getKey() == id)
1955                         return false;
1956         }
1957         return true;
1958 }
1959
1960 u16 getFreeClientActiveObjectId(
1961                 core::map<u16, ClientActiveObject*> &objects)
1962 {
1963         u16 new_id = 1;
1964         for(;;)
1965         {
1966                 if(isFreeClientActiveObjectId(new_id, objects))
1967                         return new_id;
1968
1969                 if(new_id == 65535)
1970                         return 0;
1971
1972                 new_id++;
1973         }
1974 }
1975
1976 u16 ClientEnvironment::addActiveObject(ClientActiveObject *object)
1977 {
1978         assert(object);
1979         if(object->getId() == 0)
1980         {
1981                 u16 new_id = getFreeClientActiveObjectId(m_active_objects);
1982                 if(new_id == 0)
1983                 {
1984                         infostream<<"ClientEnvironment::addActiveObject(): "
1985                                         <<"no free ids available"<<std::endl;
1986                         delete object;
1987                         return 0;
1988                 }
1989                 object->setId(new_id);
1990         }
1991         if(isFreeClientActiveObjectId(object->getId(), m_active_objects) == false)
1992         {
1993                 infostream<<"ClientEnvironment::addActiveObject(): "
1994                                 <<"id is not free ("<<object->getId()<<")"<<std::endl;
1995                 delete object;
1996                 return 0;
1997         }
1998         infostream<<"ClientEnvironment::addActiveObject(): "
1999                         <<"added (id="<<object->getId()<<")"<<std::endl;
2000         m_active_objects.insert(object->getId(), object);
2001         object->addToScene(m_smgr);
2002         return object->getId();
2003 }
2004
2005 void ClientEnvironment::addActiveObject(u16 id, u8 type,
2006                 const std::string &init_data)
2007 {
2008         ClientActiveObject* obj = ClientActiveObject::create(type);
2009         if(obj == NULL)
2010         {
2011                 infostream<<"ClientEnvironment::addActiveObject(): "
2012                                 <<"id="<<id<<" type="<<type<<": Couldn't create object"
2013                                 <<std::endl;
2014                 return;
2015         }
2016
2017         obj->setId(id);
2018
2019         obj->initialize(init_data);
2020
2021         addActiveObject(obj);
2022 }
2023
2024 void ClientEnvironment::removeActiveObject(u16 id)
2025 {
2026         infostream<<"ClientEnvironment::removeActiveObject(): "
2027                         <<"id="<<id<<std::endl;
2028         ClientActiveObject* obj = getActiveObject(id);
2029         if(obj == NULL)
2030         {
2031                 infostream<<"ClientEnvironment::removeActiveObject(): "
2032                                 <<"id="<<id<<" not found"<<std::endl;
2033                 return;
2034         }
2035         obj->removeFromScene();
2036         delete obj;
2037         m_active_objects.remove(id);
2038 }
2039
2040 void ClientEnvironment::processActiveObjectMessage(u16 id,
2041                 const std::string &data)
2042 {
2043         ClientActiveObject* obj = getActiveObject(id);
2044         if(obj == NULL)
2045         {
2046                 infostream<<"ClientEnvironment::processActiveObjectMessage():"
2047                                 <<" got message for id="<<id<<", which doesn't exist."
2048                                 <<std::endl;
2049                 return;
2050         }
2051         obj->processMessage(data);
2052 }
2053
2054 /*
2055         Callbacks for activeobjects
2056 */
2057
2058 void ClientEnvironment::damageLocalPlayer(u8 damage)
2059 {
2060         LocalPlayer *lplayer = getLocalPlayer();
2061         assert(lplayer);
2062
2063         if(lplayer->hp > damage)
2064                 lplayer->hp -= damage;
2065         else
2066                 lplayer->hp = 0;
2067
2068         ClientEnvEvent event;
2069         event.type = CEE_PLAYER_DAMAGE;
2070         event.player_damage.amount = damage;
2071         m_client_event_queue.push_back(event);
2072 }
2073
2074 /*
2075         Client likes to call these
2076 */
2077
2078 void ClientEnvironment::getActiveObjects(v3f origin, f32 max_d,
2079                 core::array<DistanceSortedActiveObject> &dest)
2080 {
2081         for(core::map<u16, ClientActiveObject*>::Iterator
2082                         i = m_active_objects.getIterator();
2083                         i.atEnd()==false; i++)
2084         {
2085                 ClientActiveObject* obj = i.getNode()->getValue();
2086
2087                 f32 d = (obj->getPosition() - origin).getLength();
2088
2089                 if(d > max_d)
2090                         continue;
2091
2092                 DistanceSortedActiveObject dso(obj, d);
2093
2094                 dest.push_back(dso);
2095         }
2096 }
2097
2098 ClientEnvEvent ClientEnvironment::getClientEvent()
2099 {
2100         if(m_client_event_queue.size() == 0)
2101         {
2102                 ClientEnvEvent event;
2103                 event.type = CEE_NONE;
2104                 return event;
2105         }
2106         return m_client_event_queue.pop_front();
2107 }
2108
2109 #endif // #ifndef SERVER
2110
2111