src/tile.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 "tile.h"
  21 #include "debug.h"
  22 #include "main.h" // for g_settings
  23 #include "filesys.h"
  24 #include "utility.h"
  25 #include "settings.h"
  26 #include <ICameraSceneNode.h>
  27 #include "log.h"
  28 #include "mapnode.h" // For texture atlas making
  29 #include "mineral.h" // For texture atlas making
  30 #include "nodedef.h" // For texture atlas making
  31 #include "gamedef.h"
  32
  33 /*
  34         A cache from texture name to texture path
  35 */
  36 MutexedMap<std::string, std::string> g_texturename_to_path_cache;
  37
  38 /*
  39         Replaces the filename extension.
  40         eg:
  41                 std::string image = "a/image.png"
  42                 replace_ext(image, "jpg")
  43                 -> image = "a/image.jpg"
  44         Returns true on success.
  45 */
  46 static bool replace_ext(std::string &path, const char *ext)
  47 {
  48         if(ext == NULL)
  49                 return false;
  50         // Find place of last dot, fail if \ or / found.
  51         s32 last_dot_i = -1;
  52         for(s32 i=path.size()-1; i>=0; i--)
  53         {
  54                 if(path[i] == '.')
  55                 {
  56                         last_dot_i = i;
  57                         break;
  58                 }
  59
  60                 if(path[i] == '\\' || path[i] == '/')
  61                         break;
  62         }
  63         // If not found, return an empty string
  64         if(last_dot_i == -1)
  65                 return false;
  66         // Else make the new path
  67         path = path.substr(0, last_dot_i+1) + ext;
  68         return true;
  69 }
  70
  71 /*
  72         Find out the full path of an image by trying different filename
  73         extensions.
  74
  75         If failed, return "".
  76 */
  77 static std::string getImagePath(std::string path)
  78 {
  79         // A NULL-ended list of possible image extensions
  80         const char *extensions[] = {
  81                 "png", "jpg", "bmp", "tga",
  82                 "pcx", "ppm", "psd", "wal", "rgb",
  83                 NULL
  84         };
  85
  86         const char **ext = extensions;
  87         do{
  88                 bool r = replace_ext(path, *ext);
  89                 if(r == false)
  90                         return "";
  91                 if(fs::PathExists(path))
  92                         return path;
  93         }
  94         while((++ext) != NULL);
  95
  96         return "";
  97 }
  98
  99 /*
 100         Gets the path to a texture by first checking if the texture exists
 101         in texture_path and if not, using the data path.
 102
 103         Checks all supported extensions by replacing the original extension.
 104
 105         If not found, returns "".
 106
 107         Utilizes a thread-safe cache.
 108 */
 109 std::string getTexturePath(const std::string &filename)
 110 {
 111         std::string fullpath = "";
 112         /*
 113                 Check from cache
 114         */
 115         bool incache = g_texturename_to_path_cache.get(filename, &fullpath);
 116         if(incache)
 117                 return fullpath;
 118
 119         /*
 120                 Check from texture_path
 121         */
 122         std::string texture_path = g_settings->get("texture_path");
 123         if(texture_path != "")
 124         {
 125                 std::string testpath = texture_path + DIR_DELIM + filename;
 126                 // Check all filename extensions. Returns "" if not found.
 127                 fullpath = getImagePath(testpath);
 128         }
 129
 130         /*
 131                 Check from default data directory
 132         */
 133         if(fullpath == "")
 134         {
 135                 std::string rel_path = std::string("clienttextures")+DIR_DELIM+filename;
 136                 std::string testpath = porting::path_data + DIR_DELIM + rel_path;
 137                 // Check all filename extensions. Returns "" if not found.
 138                 fullpath = getImagePath(testpath);
 139         }
 140
 141         // Add to cache (also an empty result is cached)
 142         g_texturename_to_path_cache.set(filename, fullpath);
 143
 144         // Finally return it
 145         return fullpath;
 146 }
 147
 148 /*
 149         An internal variant of AtlasPointer with more data.
 150         (well, more like a wrapper)
 151 */
 152
 153 struct SourceAtlasPointer
 154 {
 155         std::string name;
 156         AtlasPointer a;
 157         video::IImage *atlas_img; // The source image of the atlas
 158         // Integer variants of position and size
 159         v2s32 intpos;
 160         v2u32 intsize;
 161
 162         SourceAtlasPointer(
 163                         const std::string &name_,
 164                         AtlasPointer a_=AtlasPointer(0, NULL),
 165                         video::IImage *atlas_img_=NULL,
 166                         v2s32 intpos_=v2s32(0,0),
 167                         v2u32 intsize_=v2u32(0,0)
 168                 ):
 169                 name(name_),
 170                 a(a_),
 171                 atlas_img(atlas_img_),
 172                 intpos(intpos_),
 173                 intsize(intsize_)
 174         {
 175         }
 176 };
 177
 178 /*
 179         SourceImageCache: A cache used for storing source images.
 180 */
 181
 182 class SourceImageCache
 183 {
 184 public:
 185         void insert(const std::string &name, video::IImage *img,
 186                         bool prefer_local, video::IVideoDriver *driver)
 187         {
 188                 assert(img);
 189                 // Remove old image
 190                 core::map<std::string, video::IImage*>::Node *n;
 191                 n = m_images.find(name);
 192                 if(n){
 193                         video::IImage *oldimg = n->getValue();
 194                         if(oldimg)
 195                                 oldimg->drop();
 196                 }
 197                 // Try to use local texture instead if asked to
 198                 if(prefer_local){
 199                         std::string path = getTexturePath(name.c_str());
 200                         if(path != ""){
 201                                 video::IImage *img2 = driver->createImageFromFile(path.c_str());
 202                                 if(img2){
 203                                         m_images[name] = img2;
 204                                         return;
 205                                 }
 206                         }
 207                 }
 208                 img->grab();
 209                 m_images[name] = img;
 210         }
 211         video::IImage* get(const std::string &name)
 212         {
 213                 core::map<std::string, video::IImage*>::Node *n;
 214                 n = m_images.find(name);
 215                 if(n)
 216                         return n->getValue();
 217                 return NULL;
 218         }
 219         // Primarily fetches from cache, secondarily tries to read from filesystem
 220         video::IImage* getOrLoad(const std::string &name, IrrlichtDevice *device)
 221         {
 222                 core::map<std::string, video::IImage*>::Node *n;
 223                 n = m_images.find(name);
 224                 if(n){
 225                         n->getValue()->grab(); // Grab for caller
 226                         return n->getValue();
 227                 }
 228                 video::IVideoDriver* driver = device->getVideoDriver();
 229                 std::string path = getTexturePath(name.c_str());
 230                 if(path == ""){
 231                         infostream<<"SourceImageCache::getOrLoad(): No path found for \""
 232                                         <<name<<"\""<<std::endl;
 233                         return NULL;
 234                 }
 235                 infostream<<"SourceImageCache::getOrLoad(): Loading path \""<<path
 236                                 <<"\""<<std::endl;
 237                 video::IImage *img = driver->createImageFromFile(path.c_str());
 238                 // Even if could not be loaded, put as NULL
 239                 //m_images[name] = img;
 240                 if(img){
 241                         m_images[name] = img;
 242                         img->grab(); // Grab for caller
 243                 }
 244                 return img;
 245         }
 246 private:
 247         core::map<std::string, video::IImage*> m_images;
 248 };
 249
 250 /*
 251         TextureSource
 252 */
 253
 254 class TextureSource : public IWritableTextureSource
 255 {
 256 public:
 257         TextureSource(IrrlichtDevice *device);
 258         ~TextureSource();
 259
 260         /*
 261                 Example case:
 262                 Now, assume a texture with the id 1 exists, and has the name
 263                 "stone.png^mineral1".
 264                 Then a random thread calls getTextureId for a texture called
 265                 "stone.png^mineral1^crack0".
 266                 ...Now, WTF should happen? Well:
 267                 - getTextureId strips off stuff recursively from the end until
 268                   the remaining part is found, or nothing is left when
 269                   something is stripped out
 270
 271                 But it is slow to search for textures by names and modify them
 272                 like that?
 273                 - ContentFeatures is made to contain ids for the basic plain
 274                   textures
 275                 - Crack textures can be slow by themselves, but the framework
 276                   must be fast.
 277
 278                 Example case #2:
 279                 - Assume a texture with the id 1 exists, and has the name
 280                   "stone.png^mineral1" and is specified as a part of some atlas.
 281                 - Now MapBlock::getNodeTile() stumbles upon a node which uses
 282                   texture id 1, and finds out that NODEMOD_CRACK must be applied
 283                   with progression=0
 284                 - It finds out the name of the texture with getTextureName(1),
 285                   appends "^crack0" to it and gets a new texture id with
 286                   getTextureId("stone.png^mineral1^crack0")
 287
 288         */
 289
 290         /*
 291                 Gets a texture id from cache or
 292                 - if main thread, from getTextureIdDirect
 293                 - if other thread, adds to request queue and waits for main thread
 294         */
 295         u32 getTextureId(const std::string &name);
 296
 297         /*
 298                 Example names:
 299                 "stone.png"
 300                 "stone.png^crack2"
 301                 "stone.png^blit:mineral_coal.png"
 302                 "stone.png^blit:mineral_coal.png^crack1"
 303
 304                 - If texture specified by name is found from cache, return the
 305                   cached id.
 306                 - Otherwise generate the texture, add to cache and return id.
 307                   Recursion is used to find out the largest found part of the
 308                   texture and continue based on it.
 309
 310                 The id 0 points to a NULL texture. It is returned in case of error.
 311         */
 312         u32 getTextureIdDirect(const std::string &name);
 313
 314         // Finds out the name of a cached texture.
 315         std::string getTextureName(u32 id);
 316
 317         /*
 318                 If texture specified by the name pointed by the id doesn't
 319                 exist, create it, then return the cached texture.
 320
 321                 Can be called from any thread. If called from some other thread
 322                 and not found in cache, the call is queued to the main thread
 323                 for processing.
 324         */
 325         AtlasPointer getTexture(u32 id);
 326
 327         AtlasPointer getTexture(const std::string &name)
 328         {
 329                 return getTexture(getTextureId(name));
 330         }
 331
 332         // Gets a separate texture
 333         video::ITexture* getTextureRaw(const std::string &name)
 334         {
 335                 AtlasPointer ap = getTexture(name);
 336                 return ap.atlas;
 337         }
 338
 339         // Update new texture pointer and texture coordinates to an
 340         // AtlasPointer based on it's texture id
 341         void updateAP(AtlasPointer &ap);
 342
 343         // Processes queued texture requests from other threads.
 344         // Shall be called from the main thread.
 345         void processQueue();
 346
 347         // Insert an image into the cache without touching the filesystem.
 348         // Shall be called from the main thread.
 349         void insertSourceImage(const std::string &name, video::IImage *img);
 350
 351         // Rebuild images and textures from the current set of source images
 352         // Shall be called from the main thread.
 353         void rebuildImagesAndTextures();
 354
 355         // Build the main texture atlas which contains most of the
 356         // textures.
 357         void buildMainAtlas(class IGameDef *gamedef);
 358
 359 private:
 360
 361         // The id of the thread that is allowed to use irrlicht directly
 362         threadid_t m_main_thread;
 363         // The irrlicht device
 364         IrrlichtDevice *m_device;
 365
 366         // Cache of source images
 367         // This should be only accessed from the main thread
 368         SourceImageCache m_sourcecache;
 369
 370         // A texture id is index in this array.
 371         // The first position contains a NULL texture.
 372         core::array<SourceAtlasPointer> m_atlaspointer_cache;
 373         // Maps a texture name to an index in the former.
 374         core::map<std::string, u32> m_name_to_id;
 375         // The two former containers are behind this mutex
 376         JMutex m_atlaspointer_cache_mutex;
 377
 378         // Main texture atlas. This is filled at startup and is then not touched.
 379         video::IImage *m_main_atlas_image;
 380         video::ITexture *m_main_atlas_texture;
 381
 382         // Queued texture fetches (to be processed by the main thread)
 383         RequestQueue<std::string, u32, u8, u8> m_get_texture_queue;
 384 };
 385
 386 IWritableTextureSource* createTextureSource(IrrlichtDevice *device)
 387 {
 388         return new TextureSource(device);
 389 }
 390
 391 TextureSource::TextureSource(IrrlichtDevice *device):
 392                 m_device(device),
 393                 m_main_atlas_image(NULL),
 394                 m_main_atlas_texture(NULL)
 395 {
 396         assert(m_device);
 397
 398         m_atlaspointer_cache_mutex.Init();
 399
 400         m_main_thread = get_current_thread_id();
 401
 402         // Add a NULL AtlasPointer as the first index, named ""
 403         m_atlaspointer_cache.push_back(SourceAtlasPointer(""));
 404         m_name_to_id[""] = 0;
 405 }
 406
 407 TextureSource::~TextureSource()
 408 {
 409 }
 410
 411 u32 TextureSource::getTextureId(const std::string &name)
 412 {
 413         //infostream<<"getTextureId(): \""<<name<<"\""<<std::endl;
 414
 415         {
 416                 /*
 417                         See if texture already exists
 418                 */
 419                 JMutexAutoLock lock(m_atlaspointer_cache_mutex);
 420                 core::map<std::string, u32>::Node *n;
 421                 n = m_name_to_id.find(name);
 422                 if(n != NULL)
 423                 {
 424                         return n->getValue();
 425                 }
 426         }
 427
 428         /*
 429                 Get texture
 430         */
 431         if(get_current_thread_id() == m_main_thread)
 432         {
 433                 return getTextureIdDirect(name);
 434         }
 435         else
 436         {
 437                 infostream<<"getTextureId(): Queued: name=\""<<name<<"\""<<std::endl;
 438
 439                 // We're gonna ask the result to be put into here
 440                 ResultQueue<std::string, u32, u8, u8> result_queue;
 441
 442                 // Throw a request in
 443                 m_get_texture_queue.add(name, 0, 0, &result_queue);
 444
 445                 infostream<<"Waiting for texture from main thread, name=\""
 446                                 <<name<<"\""<<std::endl;
 447
 448                 try
 449                 {
 450                         // Wait result for a second
 451                         GetResult<std::string, u32, u8, u8>
 452                                         result = result_queue.pop_front(1000);
 453
 454                         // Check that at least something worked OK
 455                         assert(result.key == name);
 456
 457                         return result.item;
 458                 }
 459                 catch(ItemNotFoundException &e)
 460                 {
 461                         infostream<<"Waiting for texture timed out."<<std::endl;
 462                         return 0;
 463                 }
 464         }
 465
 466         infostream<<"getTextureId(): Failed"<<std::endl;
 467
 468         return 0;
 469 }
 470
 471 // Draw a progress bar on the image
 472 void make_progressbar(float value, video::IImage *image);
 473 // Brighten image
 474 void brighten(video::IImage *image);
 475
 476 /*
 477         Generate image based on a string like "stone.png" or "[crack0".
 478         if baseimg is NULL, it is created. Otherwise stuff is made on it.
 479 */
 480 bool generate_image(std::string part_of_name, video::IImage *& baseimg,
 481                 IrrlichtDevice *device, SourceImageCache *sourcecache);
 482
 483 /*
 484         Generates an image from a full string like
 485         "stone.png^mineral_coal.png^[crack0".
 486
 487         This is used by buildMainAtlas().
 488 */
 489 video::IImage* generate_image_from_scratch(std::string name,
 490                 IrrlichtDevice *device, SourceImageCache *sourcecache);
 491
 492 /*
 493         This method generates all the textures
 494 */
 495 u32 TextureSource::getTextureIdDirect(const std::string &name)
 496 {
 497         //infostream<<"getTextureIdDirect(): name=\""<<name<<"\""<<std::endl;
 498
 499         // Empty name means texture 0
 500         if(name == "")
 501         {
 502                 infostream<<"getTextureIdDirect(): name is empty"<<std::endl;
 503                 return 0;
 504         }
 505
 506         /*
 507                 Calling only allowed from main thread
 508         */
 509         if(get_current_thread_id() != m_main_thread)
 510         {
 511                 errorstream<<"TextureSource::getTextureIdDirect() "
 512                                 "called not from main thread"<<std::endl;
 513                 return 0;
 514         }
 515
 516         /*
 517                 See if texture already exists
 518         */
 519         {
 520                 JMutexAutoLock lock(m_atlaspointer_cache_mutex);
 521
 522                 core::map<std::string, u32>::Node *n;
 523                 n = m_name_to_id.find(name);
 524                 if(n != NULL)
 525                 {
 526                         /*infostream<<"getTextureIdDirect(): \""<<name
 527                                         <<"\" found in cache"<<std::endl;*/
 528                         return n->getValue();
 529                 }
 530         }
 531
 532         /*infostream<<"getTextureIdDirect(): \""<<name
 533                         <<"\" NOT found in cache. Creating it."<<std::endl;*/
 534
 535         /*
 536                 Get the base image
 537         */
 538
 539         char separator = '^';
 540
 541         /*
 542                 This is set to the id of the base image.
 543                 If left 0, there is no base image and a completely new image
 544                 is made.
 545         */
 546         u32 base_image_id = 0;
 547
 548         // Find last meta separator in name
 549         s32 last_separator_position = -1;
 550         for(s32 i=name.size()-1; i>=0; i--)
 551         {
 552                 if(name[i] == separator)
 553                 {
 554                         last_separator_position = i;
 555                         break;
 556                 }
 557         }
 558         /*
 559                 If separator was found, construct the base name and make the
 560                 base image using a recursive call
 561         */
 562         std::string base_image_name;
 563         if(last_separator_position != -1)
 564         {
 565                 // Construct base name
 566                 base_image_name = name.substr(0, last_separator_position);
 567                 /*infostream<<"getTextureIdDirect(): Calling itself recursively"
 568                                 " to get base image of \""<<name<<"\" = \""
 569                 <<base_image_name<<"\""<<std::endl;*/
 570                 base_image_id = getTextureIdDirect(base_image_name);
 571         }
 572
 573         //infostream<<"base_image_id="<<base_image_id<<std::endl;
 574
 575         video::IVideoDriver* driver = m_device->getVideoDriver();
 576         assert(driver);
 577
 578         video::ITexture *t = NULL;
 579
 580         /*
 581                 An image will be built from files and then converted into a texture.
 582         */
 583         video::IImage *baseimg = NULL;
 584
 585         // If a base image was found, copy it to baseimg
 586         if(base_image_id != 0)
 587         {
 588                 JMutexAutoLock lock(m_atlaspointer_cache_mutex);
 589
 590                 SourceAtlasPointer ap = m_atlaspointer_cache[base_image_id];
 591
 592                 video::IImage *image = ap.atlas_img;
 593
 594                 if(image == NULL)
 595                 {
 596                         infostream<<"getTextureIdDirect(): WARNING: NULL image in "
 597                                         <<"cache: \""<<base_image_name<<"\""
 598                                         <<std::endl;
 599                 }
 600                 else
 601                 {
 602                         core::dimension2d<u32> dim = ap.intsize;
 603
 604                         baseimg = driver->createImage(video::ECF_A8R8G8B8, dim);
 605
 606                         core::position2d<s32> pos_to(0,0);
 607                         core::position2d<s32> pos_from = ap.intpos;
 608
 609                         image->copyTo(
 610                                         baseimg, // target
 611                                         v2s32(0,0), // position in target
 612                                         core::rect<s32>(pos_from, dim) // from
 613                         );
 614
 615                         /*infostream<<"getTextureIdDirect(): Loaded \""
 616                                         <<base_image_name<<"\" from image cache"
 617                                         <<std::endl;*/
 618                 }
 619         }
 620
 621         /*
 622                 Parse out the last part of the name of the image and act
 623                 according to it
 624         */
 625
 626         std::string last_part_of_name = name.substr(last_separator_position+1);
 627         //infostream<<"last_part_of_name=\""<<last_part_of_name<<"\""<<std::endl;
 628
 629         // Generate image according to part of name
 630         if(!generate_image(last_part_of_name, baseimg, m_device, &m_sourcecache))
 631         {
 632                 errorstream<<"getTextureIdDirect(): "
 633                                 "failed to generate \""<<last_part_of_name<<"\""
 634                                 <<std::endl;
 635         }
 636
 637         // If no resulting image, print a warning
 638         if(baseimg == NULL)
 639         {
 640                 errorstream<<"getTextureIdDirect(): baseimg is NULL (attempted to"
 641                                 " create texture \""<<name<<"\""<<std::endl;
 642         }
 643
 644         if(baseimg != NULL)
 645         {
 646                 // Create texture from resulting image
 647                 t = driver->addTexture(name.c_str(), baseimg);
 648         }
 649
 650         /*
 651                 Add texture to caches (add NULL textures too)
 652         */
 653
 654         JMutexAutoLock lock(m_atlaspointer_cache_mutex);
 655
 656         u32 id = m_atlaspointer_cache.size();
 657         AtlasPointer ap(id);
 658         ap.atlas = t;
 659         ap.pos = v2f(0,0);
 660         ap.size = v2f(1,1);
 661         ap.tiled = 0;
 662         core::dimension2d<u32> baseimg_dim(0,0);
 663         if(baseimg)
 664                 baseimg_dim = baseimg->getDimension();
 665         SourceAtlasPointer nap(name, ap, baseimg, v2s32(0,0), baseimg_dim);
 666         m_atlaspointer_cache.push_back(nap);
 667         m_name_to_id.insert(name, id);
 668
 669         /*infostream<<"getTextureIdDirect(): "
 670                         <<"Returning id="<<id<<" for name \""<<name<<"\""<<std::endl;*/
 671
 672         return id;
 673 }
 674
 675 std::string TextureSource::getTextureName(u32 id)
 676 {
 677         JMutexAutoLock lock(m_atlaspointer_cache_mutex);
 678
 679         if(id >= m_atlaspointer_cache.size())
 680         {
 681                 errorstream<<"TextureSource::getTextureName(): id="<<id
 682                                 <<" >= m_atlaspointer_cache.size()="
 683                                 <<m_atlaspointer_cache.size()<<std::endl;
 684                 return "";
 685         }
 686
 687         return m_atlaspointer_cache[id].name;
 688 }
 689
 690
 691 AtlasPointer TextureSource::getTexture(u32 id)
 692 {
 693         JMutexAutoLock lock(m_atlaspointer_cache_mutex);
 694
 695         if(id >= m_atlaspointer_cache.size())
 696                 return AtlasPointer(0, NULL);
 697
 698         return m_atlaspointer_cache[id].a;
 699 }
 700
 701 void TextureSource::updateAP(AtlasPointer &ap)
 702 {
 703         AtlasPointer ap2 = getTexture(ap.id);
 704         ap = ap2;
 705 }
 706
 707 void TextureSource::processQueue()
 708 {
 709         /*
 710                 Fetch textures
 711         */
 712         if(m_get_texture_queue.size() > 0)
 713         {
 714                 GetRequest<std::string, u32, u8, u8>
 715                                 request = m_get_texture_queue.pop();
 716
 717                 /*infostream<<"TextureSource::processQueue(): "
 718                                 <<"got texture request with "
 719                                 <<"name=\""<<request.key<<"\""
 720                                 <<std::endl;*/
 721
 722                 GetResult<std::string, u32, u8, u8>
 723                                 result;
 724                 result.key = request.key;
 725                 result.callers = request.callers;
 726                 result.item = getTextureIdDirect(request.key);
 727
 728                 request.dest->push_back(result);
 729         }
 730 }
 731
 732 void TextureSource::insertSourceImage(const std::string &name, video::IImage *img)
 733 {
 734         //infostream<<"TextureSource::insertSourceImage(): name="<<name<<std::endl;
 735
 736         assert(get_current_thread_id() == m_main_thread);
 737
 738         m_sourcecache.insert(name, img, true, m_device->getVideoDriver());
 739 }
 740
 741 void TextureSource::rebuildImagesAndTextures()
 742 {
 743         JMutexAutoLock lock(m_atlaspointer_cache_mutex);
 744
 745         /*// Oh well... just clear everything, they'll load sometime.
 746         m_atlaspointer_cache.clear();
 747         m_name_to_id.clear();*/
 748
 749         video::IVideoDriver* driver = m_device->getVideoDriver();
 750
 751         // Remove source images from textures to disable inheriting textures
 752         // from existing textures
 753         /*for(u32 i=0; i<m_atlaspointer_cache.size(); i++){
 754                 SourceAtlasPointer *sap = &m_atlaspointer_cache[i];
 755                 sap->atlas_img->drop();
 756                 sap->atlas_img = NULL;
 757         }*/
 758
 759         // Recreate textures
 760         for(u32 i=0; i<m_atlaspointer_cache.size(); i++){
 761                 SourceAtlasPointer *sap = &m_atlaspointer_cache[i];
 762                 video::IImage *img =
 763                         generate_image_from_scratch(sap->name, m_device, &m_sourcecache);
 764                 // Create texture from resulting image
 765                 video::ITexture *t = NULL;
 766                 if(img)
 767                         t = driver->addTexture(sap->name.c_str(), img);
 768
 769                 // Replace texture
 770                 sap->a.atlas = t;
 771                 sap->a.pos = v2f(0,0);
 772                 sap->a.size = v2f(1,1);
 773                 sap->a.tiled = 0;
 774                 sap->atlas_img = img;
 775                 sap->intpos = v2s32(0,0);
 776                 sap->intsize = img->getDimension();
 777         }
 778 }
 779
 780 void TextureSource::buildMainAtlas(class IGameDef *gamedef)
 781 {
 782         assert(gamedef->tsrc() == this);
 783         INodeDefManager *ndef = gamedef->ndef();
 784
 785         infostream<<"TextureSource::buildMainAtlas()"<<std::endl;
 786
 787         //return; // Disable (for testing)
 788
 789         video::IVideoDriver* driver = m_device->getVideoDriver();
 790         assert(driver);
 791
 792         JMutexAutoLock lock(m_atlaspointer_cache_mutex);
 793
 794         // Create an image of the right size
 795         core::dimension2d<u32> atlas_dim(1024,1024);
 796         video::IImage *atlas_img =
 797                         driver->createImage(video::ECF_A8R8G8B8, atlas_dim);
 798         //assert(atlas_img);
 799         if(atlas_img == NULL)
 800         {
 801                 errorstream<<"TextureSource::buildMainAtlas(): Failed to create atlas "
 802                                 "image; not building texture atlas."<<std::endl;
 803                 return;
 804         }
 805
 806         /*
 807                 Grab list of stuff to include in the texture atlas from the
 808                 main content features
 809         */
 810
 811         core::map<std::string, bool> sourcelist;
 812
 813         for(u16 j=0; j<MAX_CONTENT+1; j++)
 814         {
 815                 if(j == CONTENT_IGNORE || j == CONTENT_AIR)
 816                         continue;
 817                 const ContentFeatures &f = ndef->get(j);
 818                 for(std::set<std::string>::const_iterator
 819                                 i = f.used_texturenames.begin();
 820                                 i != f.used_texturenames.end(); i++)
 821                 {
 822                         std::string name = *i;
 823                         sourcelist[name] = true;
 824
 825                         if(f.often_contains_mineral){
 826                                 for(int k=1; k<MINERAL_COUNT; k++){
 827                                         std::string mineraltexture = mineral_block_texture(k);
 828                                         std::string fulltexture = name + "^" + mineraltexture;
 829                                         sourcelist[fulltexture] = true;
 830                                 }
 831                         }
 832                 }
 833         }
 834
 835         infostream<<"Creating texture atlas out of textures: ";
 836         for(core::map<std::string, bool>::Iterator
 837                         i = sourcelist.getIterator();
 838                         i.atEnd() == false; i++)
 839         {
 840                 std::string name = i.getNode()->getKey();
 841                 infostream<<"\""<<name<<"\" ";
 842         }
 843         infostream<<std::endl;
 844
 845         // Padding to disallow texture bleeding
 846         s32 padding = 16;
 847
 848         s32 column_width = 256;
 849         s32 column_padding = 16;
 850
 851         /*
 852                 First pass: generate almost everything
 853         */
 854         core::position2d<s32> pos_in_atlas(0,0);
 855
 856         pos_in_atlas.Y = padding;
 857
 858         for(core::map<std::string, bool>::Iterator
 859                         i = sourcelist.getIterator();
 860                         i.atEnd() == false; i++)
 861         {
 862                 std::string name = i.getNode()->getKey();
 863
 864                 // Generate image by name
 865                 video::IImage *img2 = generate_image_from_scratch(name, m_device,
 866                                 &m_sourcecache);
 867                 if(img2 == NULL)
 868                 {
 869                         errorstream<<"TextureSource::buildMainAtlas(): "
 870                                         <<"Couldn't generate image \""<<name<<"\""<<std::endl;
 871                         continue;
 872                 }
 873
 874                 core::dimension2d<u32> dim = img2->getDimension();
 875
 876                 // Don't add to atlas if image is large
 877                 core::dimension2d<u32> max_size_in_atlas(32,32);
 878                 if(dim.Width > max_size_in_atlas.Width
 879                 || dim.Height > max_size_in_atlas.Height)
 880                 {
 881                         infostream<<"TextureSource::buildMainAtlas(): Not adding "
 882                                         <<"\""<<name<<"\" because image is large"<<std::endl;
 883                         continue;
 884                 }
 885
 886                 // Wrap columns and stop making atlas if atlas is full
 887                 if(pos_in_atlas.Y + dim.Height > atlas_dim.Height)
 888                 {
 889                         if(pos_in_atlas.X > (s32)atlas_dim.Width - 256 - padding){
 890                                 errorstream<<"TextureSource::buildMainAtlas(): "
 891                                                 <<"Atlas is full, not adding more textures."
 892                                                 <<std::endl;
 893                                 break;
 894                         }
 895                         pos_in_atlas.Y = padding;
 896                         pos_in_atlas.X += column_width + column_padding;
 897                 }
 898
 899                 /*infostream<<"TextureSource::buildMainAtlas(): Adding \""<<name
 900                                 <<"\" to texture atlas"<<std::endl;*/
 901
 902                 // Tile it a few times in the X direction
 903                 u16 xwise_tiling = column_width / dim.Width;
 904                 if(xwise_tiling > 16) // Limit to 16 (more gives no benefit)
 905                         xwise_tiling = 16;
 906                 for(u32 j=0; j<xwise_tiling; j++)
 907                 {
 908                         // Copy the copy to the atlas
 909                         img2->copyToWithAlpha(atlas_img,
 910                                         pos_in_atlas + v2s32(j*dim.Width,0),
 911                                         core::rect<s32>(v2s32(0,0), dim),
 912                                         video::SColor(255,255,255,255),
 913                                         NULL);
 914                 }
 915
 916                 // Copy the borders a few times to disallow texture bleeding
 917                 for(u32 side=0; side<2; side++) // top and bottom
 918                 for(s32 y0=0; y0<padding; y0++)
 919                 for(s32 x0=0; x0<(s32)xwise_tiling*(s32)dim.Width; x0++)
 920                 {
 921                         s32 dst_y;
 922                         s32 src_y;
 923                         if(side==0)
 924                         {
 925                                 dst_y = y0 + pos_in_atlas.Y + dim.Height;
 926                                 src_y = pos_in_atlas.Y + dim.Height - 1;
 927                         }
 928                         else
 929                         {
 930                                 dst_y = -y0 + pos_in_atlas.Y-1;
 931                                 src_y = pos_in_atlas.Y;
 932                         }
 933                         s32 x = x0 + pos_in_atlas.X;
 934                         video::SColor c = atlas_img->getPixel(x, src_y);
 935                         atlas_img->setPixel(x,dst_y,c);
 936                 }
 937
 938                 img2->drop();
 939
 940                 /*
 941                         Add texture to caches
 942                 */
 943
 944                 bool reuse_old_id = false;
 945                 u32 id = m_atlaspointer_cache.size();
 946                 // Check old id without fetching a texture
 947                 core::map<std::string, u32>::Node *n;
 948                 n = m_name_to_id.find(name);
 949                 // If it exists, we will replace the old definition
 950                 if(n){
 951                         id = n->getValue();
 952                         reuse_old_id = true;
 953                         /*infostream<<"TextureSource::buildMainAtlas(): "
 954                                         <<"Replacing old AtlasPointer"<<std::endl;*/
 955                 }
 956
 957                 // Create AtlasPointer
 958                 AtlasPointer ap(id);
 959                 ap.atlas = NULL; // Set on the second pass
 960                 ap.pos = v2f((float)pos_in_atlas.X/(float)atlas_dim.Width,
 961                                 (float)pos_in_atlas.Y/(float)atlas_dim.Height);
 962                 ap.size = v2f((float)dim.Width/(float)atlas_dim.Width,
 963                                 (float)dim.Width/(float)atlas_dim.Height);
 964                 ap.tiled = xwise_tiling;
 965
 966                 // Create SourceAtlasPointer and add to containers
 967                 SourceAtlasPointer nap(name, ap, atlas_img, pos_in_atlas, dim);
 968                 if(reuse_old_id)
 969                         m_atlaspointer_cache[id] = nap;
 970                 else
 971                         m_atlaspointer_cache.push_back(nap);
 972                 m_name_to_id[name] = id;
 973
 974                 // Increment position
 975                 pos_in_atlas.Y += dim.Height + padding * 2;
 976         }
 977
 978         /*
 979                 Make texture
 980         */
 981         video::ITexture *t = driver->addTexture("__main_atlas__", atlas_img);
 982         assert(t);
 983
 984         /*
 985                 Second pass: set texture pointer in generated AtlasPointers
 986         */
 987         for(core::map<std::string, bool>::Iterator
 988                         i = sourcelist.getIterator();
 989                         i.atEnd() == false; i++)
 990         {
 991                 std::string name = i.getNode()->getKey();
 992                 if(m_name_to_id.find(name) == NULL)
 993                         continue;
 994                 u32 id = m_name_to_id[name];
 995                 //infostream<<"id of name "<<name<<" is "<<id<<std::endl;
 996                 m_atlaspointer_cache[id].a.atlas = t;
 997         }
 998
 999         /*
1000                 Write image to file so that it can be inspected
1001         */
1002         /*std::string atlaspath = porting::path_userdata
1003                         + DIR_DELIM + "generated_texture_atlas.png";
1004         infostream<<"Removing and writing texture atlas for inspection to "
1005                         <<atlaspath<<std::endl;
1006         fs::RecursiveDelete(atlaspath);
1007         driver->writeImageToFile(atlas_img, atlaspath.c_str());*/
1008 }
1009
1010 video::IImage* generate_image_from_scratch(std::string name,
1011                 IrrlichtDevice *device, SourceImageCache *sourcecache)
1012 {
1013         /*infostream<<"generate_image_from_scratch(): "
1014                         "\""<<name<<"\""<<std::endl;*/
1015
1016         video::IVideoDriver* driver = device->getVideoDriver();
1017         assert(driver);
1018
1019         /*
1020                 Get the base image
1021         */
1022
1023         video::IImage *baseimg = NULL;
1024
1025         char separator = '^';
1026
1027         // Find last meta separator in name
1028         s32 last_separator_position = -1;
1029         for(s32 i=name.size()-1; i>=0; i--)
1030         {
1031                 if(name[i] == separator)
1032                 {
1033                         last_separator_position = i;
1034                         break;
1035                 }
1036         }
1037
1038         /*infostream<<"generate_image_from_scratch(): "
1039                         <<"last_separator_position="<<last_separator_position
1040                         <<std::endl;*/
1041
1042         /*
1043                 If separator was found, construct the base name and make the
1044                 base image using a recursive call
1045         */
1046         std::string base_image_name;
1047         if(last_separator_position != -1)
1048         {
1049                 // Construct base name
1050                 base_image_name = name.substr(0, last_separator_position);
1051                 /*infostream<<"generate_image_from_scratch(): Calling itself recursively"
1052                                 " to get base image of \""<<name<<"\" = \""
1053                 <<base_image_name<<"\""<<std::endl;*/
1054                 baseimg = generate_image_from_scratch(base_image_name, device,
1055                                 sourcecache);
1056         }
1057
1058         /*
1059                 Parse out the last part of the name of the image and act
1060                 according to it
1061         */
1062
1063         std::string last_part_of_name = name.substr(last_separator_position+1);
1064         //infostream<<"last_part_of_name=\""<<last_part_of_name<<"\""<<std::endl;
1065
1066         // Generate image according to part of name
1067         if(!generate_image(last_part_of_name, baseimg, device, sourcecache))
1068         {
1069                 errorstream<<"generate_image_from_scratch(): "
1070                                 "failed to generate \""<<last_part_of_name<<"\""
1071                                 <<std::endl;
1072                 return NULL;
1073         }
1074
1075         return baseimg;
1076 }
1077
1078 bool generate_image(std::string part_of_name, video::IImage *& baseimg,
1079                 IrrlichtDevice *device, SourceImageCache *sourcecache)
1080 {
1081         video::IVideoDriver* driver = device->getVideoDriver();
1082         assert(driver);
1083
1084         // Stuff starting with [ are special commands
1085         if(part_of_name.size() == 0 || part_of_name[0] != '[')
1086         {
1087                 video::IImage *image = sourcecache->getOrLoad(part_of_name, device);
1088
1089                 if(image == NULL)
1090                 {
1091                         if(part_of_name != ""){
1092                                 errorstream<<"generate_image(): Could not load image \""
1093                                                 <<part_of_name<<"\""<<" while building texture"<<std::endl;
1094                                 errorstream<<"generate_image(): Creating a dummy"
1095                                                 <<" image for \""<<part_of_name<<"\""<<std::endl;
1096                         }
1097
1098                         // Just create a dummy image
1099                         //core::dimension2d<u32> dim(2,2);
1100                         core::dimension2d<u32> dim(1,1);
1101                         image = driver->createImage(video::ECF_A8R8G8B8, dim);
1102                         assert(image);
1103                         /*image->setPixel(0,0, video::SColor(255,255,0,0));
1104                         image->setPixel(1,0, video::SColor(255,0,255,0));
1105                         image->setPixel(0,1, video::SColor(255,0,0,255));
1106                         image->setPixel(1,1, video::SColor(255,255,0,255));*/
1107                         image->setPixel(0,0, video::SColor(255,myrand()%256,
1108                                         myrand()%256,myrand()%256));
1109                         /*image->setPixel(1,0, video::SColor(255,myrand()%256,
1110                                         myrand()%256,myrand()%256));
1111                         image->setPixel(0,1, video::SColor(255,myrand()%256,
1112                                         myrand()%256,myrand()%256));
1113                         image->setPixel(1,1, video::SColor(255,myrand()%256,
1114                                         myrand()%256,myrand()%256));*/
1115                 }
1116
1117                 // If base image is NULL, load as base.
1118                 if(baseimg == NULL)
1119                 {
1120                         //infostream<<"Setting "<<part_of_name<<" as base"<<std::endl;
1121                         /*
1122                                 Copy it this way to get an alpha channel.
1123                                 Otherwise images with alpha cannot be blitted on
1124                                 images that don't have alpha in the original file.
1125                         */
1126                         core::dimension2d<u32> dim = image->getDimension();
1127                         baseimg = driver->createImage(video::ECF_A8R8G8B8, dim);
1128                         image->copyTo(baseimg);
1129                         image->drop();
1130                 }
1131                 // Else blit on base.
1132                 else
1133                 {
1134                         //infostream<<"Blitting "<<part_of_name<<" on base"<<std::endl;
1135                         // Size of the copied area
1136                         core::dimension2d<u32> dim = image->getDimension();
1137                         //core::dimension2d<u32> dim(16,16);
1138                         // Position to copy the blitted to in the base image
1139                         core::position2d<s32> pos_to(0,0);
1140                         // Position to copy the blitted from in the blitted image
1141                         core::position2d<s32> pos_from(0,0);
1142                         // Blit
1143                         image->copyToWithAlpha(baseimg, pos_to,
1144                                         core::rect<s32>(pos_from, dim),
1145                                         video::SColor(255,255,255,255),
1146                                         NULL);
1147                         // Drop image
1148                         image->drop();
1149                 }
1150         }
1151         else
1152         {
1153                 // A special texture modification
1154
1155                 /*infostream<<"generate_image(): generating special "
1156                                 <<"modification \""<<part_of_name<<"\""
1157                                 <<std::endl;*/
1158
1159                 /*
1160                         This is the simplest of all; it just adds stuff to the
1161                         name so that a separate texture is created.
1162
1163                         It is used to make textures for stuff that doesn't want
1164                         to implement getting the texture from a bigger texture
1165                         atlas.
1166                 */
1167                 if(part_of_name == "[forcesingle")
1168                 {
1169                 }
1170                 /*
1171                         [crackN
1172                         Adds a cracking texture
1173                 */
1174                 else if(part_of_name.substr(0,6) == "[crack")
1175                 {
1176                         if(baseimg == NULL)
1177                         {
1178                                 errorstream<<"generate_image(): baseimg==NULL "
1179                                                 <<"for part_of_name=\""<<part_of_name
1180                                                 <<"\", cancelling."<<std::endl;
1181                                 return false;
1182                         }
1183
1184                         // Crack image number
1185                         u16 progression = stoi(part_of_name.substr(6));
1186
1187                         // Size of the base image
1188                         core::dimension2d<u32> dim_base = baseimg->getDimension();
1189
1190                         /*
1191                                 Load crack image.
1192
1193                                 It is an image with a number of cracking stages
1194                                 horizontally tiled.
1195                         */
1196                         video::IImage *img_crack = sourcecache->getOrLoad("crack.png", device);
1197
1198                         if(img_crack)
1199                         {
1200                                 // Dimension of original image
1201                                 core::dimension2d<u32> dim_crack
1202                                                 = img_crack->getDimension();
1203                                 // Count of crack stages
1204                                 u32 crack_count = dim_crack.Height / dim_crack.Width;
1205                                 // Limit progression
1206                                 if(progression > crack_count-1)
1207                                         progression = crack_count-1;
1208                                 // Dimension of a single scaled crack stage
1209                                 core::dimension2d<u32> dim_crack_scaled_single(
1210                                         dim_base.Width,
1211                                         dim_base.Height
1212                                 );
1213                                 // Dimension of scaled size
1214                                 core::dimension2d<u32> dim_crack_scaled(
1215                                         dim_crack_scaled_single.Width,
1216                                         dim_crack_scaled_single.Height * crack_count
1217                                 );
1218                                 // Create scaled crack image
1219                                 video::IImage *img_crack_scaled = driver->createImage(
1220                                                 video::ECF_A8R8G8B8, dim_crack_scaled);
1221                                 if(img_crack_scaled)
1222                                 {
1223                                         // Scale crack image by copying
1224                                         img_crack->copyToScaling(img_crack_scaled);
1225
1226                                         // Position to copy the crack from
1227                                         core::position2d<s32> pos_crack_scaled(
1228                                                 0,
1229                                                 dim_crack_scaled_single.Height * progression
1230                                         );
1231
1232                                         // This tiling does nothing currently but is useful
1233                                         for(u32 y0=0; y0<dim_base.Height
1234                                                         / dim_crack_scaled_single.Height; y0++)
1235                                         for(u32 x0=0; x0<dim_base.Width
1236                                                         / dim_crack_scaled_single.Width; x0++)
1237                                         {
1238                                                 // Position to copy the crack to in the base image
1239                                                 core::position2d<s32> pos_base(
1240                                                         x0*dim_crack_scaled_single.Width,
1241                                                         y0*dim_crack_scaled_single.Height
1242                                                 );
1243                                                 // Rectangle to copy the crack from on the scaled image
1244                                                 core::rect<s32> rect_crack_scaled(
1245                                                         pos_crack_scaled,
1246                                                         dim_crack_scaled_single
1247                                                 );
1248                                                 // Copy it
1249                                                 img_crack_scaled->copyToWithAlpha(baseimg, pos_base,
1250                                                                 rect_crack_scaled,
1251                                                                 video::SColor(255,255,255,255),
1252                                                                 NULL);
1253                                         }
1254
1255                                         img_crack_scaled->drop();
1256                                 }
1257
1258                                 img_crack->drop();
1259                         }
1260                 }
1261                 /*
1262                         [combine:WxH:X,Y=filename:X,Y=filename2
1263                         Creates a bigger texture from an amount of smaller ones
1264                 */
1265                 else if(part_of_name.substr(0,8) == "[combine")
1266                 {
1267                         Strfnd sf(part_of_name);
1268                         sf.next(":");
1269                         u32 w0 = stoi(sf.next("x"));
1270                         u32 h0 = stoi(sf.next(":"));
1271                         infostream<<"combined w="<<w0<<" h="<<h0<<std::endl;
1272                         core::dimension2d<u32> dim(w0,h0);
1273                         baseimg = driver->createImage(video::ECF_A8R8G8B8, dim);
1274                         while(sf.atend() == false)
1275                         {
1276                                 u32 x = stoi(sf.next(","));
1277                                 u32 y = stoi(sf.next("="));
1278                                 std::string filename = sf.next(":");
1279                                 infostream<<"Adding \""<<filename
1280                                                 <<"\" to combined ("<<x<<","<<y<<")"
1281                                                 <<std::endl;
1282                                 video::IImage *img = sourcecache->getOrLoad(filename, device);
1283                                 if(img)
1284                                 {
1285                                         core::dimension2d<u32> dim = img->getDimension();
1286                                         infostream<<"Size "<<dim.Width
1287                                                         <<"x"<<dim.Height<<std::endl;
1288                                         core::position2d<s32> pos_base(x, y);
1289                                         video::IImage *img2 =
1290                                                         driver->createImage(video::ECF_A8R8G8B8, dim);
1291                                         img->copyTo(img2);
1292                                         img->drop();
1293                                         img2->copyToWithAlpha(baseimg, pos_base,
1294                                                         core::rect<s32>(v2s32(0,0), dim),
1295                                                         video::SColor(255,255,255,255),
1296                                                         NULL);
1297                                         img2->drop();
1298                                 }
1299                                 else
1300                                 {
1301                                         infostream<<"img==NULL"<<std::endl;
1302                                 }
1303                         }
1304                 }
1305                 /*
1306                         [progressbarN
1307                         Adds a progress bar, 0.0 <= N <= 1.0
1308                 */
1309                 else if(part_of_name.substr(0,12) == "[progressbar")
1310                 {
1311                         if(baseimg == NULL)
1312                         {
1313                                 errorstream<<"generate_image(): baseimg==NULL "
1314                                                 <<"for part_of_name=\""<<part_of_name
1315                                                 <<"\", cancelling."<<std::endl;
1316                                 return false;
1317                         }
1318
1319                         float value = stof(part_of_name.substr(12));
1320                         make_progressbar(value, baseimg);
1321                 }
1322                 /*
1323                         "[brighten"
1324                 */
1325                 else if(part_of_name.substr(0,9) == "[brighten")
1326                 {
1327                         if(baseimg == NULL)
1328                         {
1329                                 errorstream<<"generate_image(): baseimg==NULL "
1330                                                 <<"for part_of_name=\""<<part_of_name
1331                                                 <<"\", cancelling."<<std::endl;
1332                                 return false;
1333                         }
1334
1335                         brighten(baseimg);
1336                 }
1337                 /*
1338                         "[noalpha"
1339                         Make image completely opaque.
1340                         Used for the leaves texture when in old leaves mode, so
1341                         that the transparent parts don't look completely black
1342                         when simple alpha channel is used for rendering.
1343                 */
1344                 else if(part_of_name.substr(0,8) == "[noalpha")
1345                 {
1346                         if(baseimg == NULL)
1347                         {
1348                                 errorstream<<"generate_image(): baseimg==NULL "
1349                                                 <<"for part_of_name=\""<<part_of_name
1350                                                 <<"\", cancelling."<<std::endl;
1351                                 return false;
1352                         }
1353
1354                         core::dimension2d<u32> dim = baseimg->getDimension();
1355
1356                         // Set alpha to full
1357                         for(u32 y=0; y<dim.Height; y++)
1358                         for(u32 x=0; x<dim.Width; x++)
1359                         {
1360                                 video::SColor c = baseimg->getPixel(x,y);
1361                                 c.setAlpha(255);
1362                                 baseimg->setPixel(x,y,c);
1363                         }
1364                 }
1365                 /*
1366                         "[makealpha:R,G,B"
1367                         Convert one color to transparent.
1368                 */
1369                 else if(part_of_name.substr(0,11) == "[makealpha:")
1370                 {
1371                         if(baseimg == NULL)
1372                         {
1373                                 errorstream<<"generate_image(): baseimg==NULL "
1374                                                 <<"for part_of_name=\""<<part_of_name
1375                                                 <<"\", cancelling."<<std::endl;
1376                                 return false;
1377                         }
1378
1379                         Strfnd sf(part_of_name.substr(11));
1380                         u32 r1 = stoi(sf.next(","));
1381                         u32 g1 = stoi(sf.next(","));
1382                         u32 b1 = stoi(sf.next(""));
1383                         std::string filename = sf.next("");
1384
1385                         core::dimension2d<u32> dim = baseimg->getDimension();
1386
1387                         /*video::IImage *oldbaseimg = baseimg;
1388                         baseimg = driver->createImage(video::ECF_A8R8G8B8, dim);
1389                         oldbaseimg->copyTo(baseimg);
1390                         oldbaseimg->drop();*/
1391
1392                         // Set alpha to full
1393                         for(u32 y=0; y<dim.Height; y++)
1394                         for(u32 x=0; x<dim.Width; x++)
1395                         {
1396                                 video::SColor c = baseimg->getPixel(x,y);
1397                                 u32 r = c.getRed();
1398                                 u32 g = c.getGreen();
1399                                 u32 b = c.getBlue();
1400                                 if(!(r == r1 && g == g1 && b == b1))
1401                                         continue;
1402                                 c.setAlpha(0);
1403                                 baseimg->setPixel(x,y,c);
1404                         }
1405                 }
1406                 /*
1407                         [inventorycube{topimage{leftimage{rightimage
1408                         In every subimage, replace ^ with &.
1409                         Create an "inventory cube".
1410                         NOTE: This should be used only on its own.
1411                         Example (a grass block (not actually used in game):
1412                         "[inventorycube{grass.png{mud.png&grass_side.png{mud.png&grass_side.png"
1413                 */
1414                 else if(part_of_name.substr(0,14) == "[inventorycube")
1415                 {
1416                         if(baseimg != NULL)
1417                         {
1418                                 errorstream<<"generate_image(): baseimg!=NULL "
1419                                                 <<"for part_of_name=\""<<part_of_name
1420                                                 <<"\", cancelling."<<std::endl;
1421                                 return false;
1422                         }
1423
1424                         str_replace_char(part_of_name, '&', '^');
1425                         Strfnd sf(part_of_name);
1426                         sf.next("{");
1427                         std::string imagename_top = sf.next("{");
1428                         std::string imagename_left = sf.next("{");
1429                         std::string imagename_right = sf.next("{");
1430
1431 #if 1
1432                         // TODO: Create cube with different textures on different sides
1433
1434                         if(driver->queryFeature(video::EVDF_RENDER_TO_TARGET) == false)
1435                         {
1436                                 errorstream<<"generate_image(): EVDF_RENDER_TO_TARGET"
1437                                                 " not supported. Creating fallback image"<<std::endl;
1438                                 baseimg = generate_image_from_scratch(
1439                                                 imagename_top, device, sourcecache);
1440                                 return true;
1441                         }
1442
1443                         u32 w0 = 64;
1444                         u32 h0 = 64;
1445                         //infostream<<"inventorycube w="<<w0<<" h="<<h0<<std::endl;
1446                         core::dimension2d<u32> dim(w0,h0);
1447
1448                         // Generate images for the faces of the cube
1449                         video::IImage *img_top = generate_image_from_scratch(
1450                                         imagename_top, device, sourcecache);
1451                         video::IImage *img_left = generate_image_from_scratch(
1452                                         imagename_left, device, sourcecache);
1453                         video::IImage *img_right = generate_image_from_scratch(
1454                                         imagename_right, device, sourcecache);
1455                         assert(img_top && img_left && img_right);
1456
1457                         // Create textures from images
1458                         // TODO: Use them all
1459                         video::ITexture *texture_top = driver->addTexture(
1460                                         (imagename_top + "__temp__").c_str(), img_top);
1461                         assert(texture_top);
1462
1463                         // Drop images
1464                         img_top->drop();
1465                         img_left->drop();
1466                         img_right->drop();
1467
1468                         // Create render target texture
1469                         video::ITexture *rtt = NULL;
1470                         std::string rtt_name = part_of_name + "_RTT";
1471                         rtt = driver->addRenderTargetTexture(dim, rtt_name.c_str(),
1472                                         video::ECF_A8R8G8B8);
1473                         assert(rtt);
1474
1475                         // Set render target
1476                         driver->setRenderTarget(rtt, true, true,
1477                                         video::SColor(0,0,0,0));
1478
1479                         // Get a scene manager
1480                         scene::ISceneManager *smgr_main = device->getSceneManager();
1481                         assert(smgr_main);
1482                         scene::ISceneManager *smgr = smgr_main->createNewSceneManager();
1483                         assert(smgr);
1484
1485                         /*
1486                                 Create scene:
1487                                 - An unit cube is centered at 0,0,0
1488                                 - Camera looks at cube from Y+, Z- towards Y-, Z+
1489                                 NOTE: Cube has to be changed to something else because
1490                                 the textures cannot be set individually (or can they?)
1491                         */
1492
1493                         scene::ISceneNode* cube = smgr->addCubeSceneNode(1.0, NULL, -1,
1494                                         v3f(0,0,0), v3f(0, 45, 0));
1495                         // Set texture of cube
1496                         cube->setMaterialTexture(0, texture_top);
1497                         //cube->setMaterialFlag(video::EMF_LIGHTING, false);
1498                         cube->setMaterialFlag(video::EMF_ANTI_ALIASING, false);
1499                         cube->setMaterialFlag(video::EMF_BILINEAR_FILTER, false);
1500
1501                         scene::ICameraSceneNode* camera = smgr->addCameraSceneNode(0,
1502                                         v3f(0, 1.0, -1.5), v3f(0, 0, 0));
1503                         // Set orthogonal projection
1504                         core::CMatrix4<f32> pm;
1505                         pm.buildProjectionMatrixOrthoLH(1.65, 1.65, 0, 100);
1506                         camera->setProjectionMatrix(pm, true);
1507
1508                         /*scene::ILightSceneNode *light =*/ smgr->addLightSceneNode(0,
1509                                         v3f(-50, 100, 0), video::SColorf(0.5,0.5,0.5), 1000);
1510
1511                         smgr->setAmbientLight(video::SColorf(0.2,0.2,0.2));
1512
1513                         // Render scene
1514                         driver->beginScene(true, true, video::SColor(0,0,0,0));
1515                         smgr->drawAll();
1516                         driver->endScene();
1517
1518                         // NOTE: The scene nodes should not be dropped, otherwise
1519                         //       smgr->drop() segfaults
1520                         /*cube->drop();
1521                         camera->drop();
1522                         light->drop();*/
1523                         // Drop scene manager
1524                         smgr->drop();
1525
1526                         // Unset render target
1527                         driver->setRenderTarget(0, true, true, 0);
1528
1529                         // Free textures of images
1530                         // TODO: When all are used, free them all
1531                         driver->removeTexture(texture_top);
1532
1533                         // Create image of render target
1534                         video::IImage *image = driver->createImage(rtt, v2s32(0,0), dim);
1535
1536                         assert(image);
1537
1538                         baseimg = driver->createImage(video::ECF_A8R8G8B8, dim);
1539
1540                         if(image)
1541                         {
1542                                 image->copyTo(baseimg);
1543                                 image->drop();
1544                         }
1545 #endif
1546                 }
1547                 else
1548                 {
1549                         errorstream<<"generate_image(): Invalid "
1550                                         " modification: \""<<part_of_name<<"\""<<std::endl;
1551                 }
1552         }
1553
1554         return true;
1555 }
1556
1557 void make_progressbar(float value, video::IImage *image)
1558 {
1559         if(image == NULL)
1560                 return;
1561
1562         core::dimension2d<u32> size = image->getDimension();
1563
1564         u32 barheight = size.Height/16;
1565         u32 barpad_x = size.Width/16;
1566         u32 barpad_y = size.Height/16;
1567         u32 barwidth = size.Width - barpad_x*2;
1568         v2u32 barpos(barpad_x, size.Height - barheight - barpad_y);
1569
1570         u32 barvalue_i = (u32)(((float)barwidth * value) + 0.5);
1571
1572         video::SColor active(255,255,0,0);
1573         video::SColor inactive(255,0,0,0);
1574         for(u32 x0=0; x0<barwidth; x0++)
1575         {
1576                 video::SColor *c;
1577                 if(x0 < barvalue_i)
1578                         c = &active;
1579                 else
1580                         c = &inactive;
1581                 u32 x = x0 + barpos.X;
1582                 for(u32 y=barpos.Y; y<barpos.Y+barheight; y++)
1583                 {
1584                         image->setPixel(x,y, *c);
1585                 }
1586         }
1587 }
1588
1589 void brighten(video::IImage *image)
1590 {
1591         if(image == NULL)
1592                 return;
1593
1594         core::dimension2d<u32> dim = image->getDimension();
1595
1596         for(u32 y=0; y<dim.Height; y++)
1597         for(u32 x=0; x<dim.Width; x++)
1598         {
1599                 video::SColor c = image->getPixel(x,y);
1600                 c.setRed(0.5 * 255 + 0.5 * (float)c.getRed());
1601                 c.setGreen(0.5 * 255 + 0.5 * (float)c.getGreen());
1602                 c.setBlue(0.5 * 255 + 0.5 * (float)c.getBlue());
1603                 image->setPixel(x,y,c);
1604         }
1605 }
1606