// ======================================================================== //
// Copyright 2009-2013 Intel Corporation                                    //
//                                                                          //
// Licensed under the Apache License, Version 2.0 (the "License");          //
// you may not use this file except in compliance with the License.         //
// You may obtain a copy of the License at                                  //
//                                                                          //
//     http://www.apache.org/licenses/LICENSE-2.0                           //
//                                                                          //
// Unless required by applicable law or agreed to in writing, software      //
// distributed under the License is distributed on an "AS IS" BASIS,        //
// WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. //
// See the License for the specific language governing permissions and      //
// limitations under the License.                                           //
// ======================================================================== //

#include "image.h"
#include "sys/stl/string.h"

#include <map>
#include <iostream>

namespace embree
{
  /*! loads an image from a file with auto-detection of format */
  Ref<Image> loadImageFromDisk(const FileName& fileName) try
  {
    std::string ext = std::strlwr(fileName.ext());
#ifdef USE_OPENEXR
    if (ext == "exr") return loadExr(fileName);
#endif
#ifdef USE_IMAGEMAGICK
    if (ext == "tga") return loadMagick(fileName);
    if (ext == "gif") return loadMagick(fileName);
    if (ext == "jpg") return loadMagick(fileName);
    if (ext == "png") return loadMagick(fileName);
    if (ext == "bmp") return loadMagick(fileName);
    //if (ext == "ppm") return loadMagick(fileName);
    if (ext == "tif") return loadMagick(fileName);
    if (ext == "tiff") return loadMagick(fileName);
#endif
    if (ext == "ppm") return loadPPM(fileName);
    if (ext == "pfm") return loadPFM(fileName);
    throw std::runtime_error("image format " + ext + " not supported");
  }
  catch (const std::exception& e) {
    std::cout << "cannot read file " << fileName << ": " << e.what() << std::endl;
    return null;
  }

  /*! loads an image from a file with auto-detection of format */
  Ref<Image> loadImage(const FileName& fileName, bool cache)
  {
    static std::map<std::string,Ref<Image> > image_cache;

    if (!cache)
      return loadImageFromDisk(fileName);

    if (image_cache.find(fileName) == image_cache.end())
      image_cache[fileName] = loadImageFromDisk(fileName);

    return image_cache[fileName];
  }

  /*! stores an image to file with auto-detection of format */
  void storeImage(const Ref<Image>& img, const FileName& fileName) try
  {
    std::string ext = strlwr(fileName.ext());
#ifdef USE_OPENEXR
    if (ext == "exr") { storeExr(img,fileName); return; }
#endif
#ifdef USE_IMAGEMAGICK
    if (ext == "tga") { storeMagick(img,fileName); return; }
    if (ext == "gif") { storeMagick(img,fileName); return; }
    if (ext == "jpg") { storeMagick(img,fileName); return; }
    if (ext == "png") { storeMagick(img,fileName); return; }
    if (ext == "bmp") { storeMagick(img,fileName); return; }
    if (ext == "ppm") { storeMagick(img,fileName); return; }
    if (ext == "tif") { storeMagick(img,fileName); return; }
    if (ext == "tiff") { storeMagick(img,fileName); return; }
#endif
    if (ext == "ppm") { storePPM(img,fileName); return; }
    if (ext == "pfm") { storePFM(img,fileName); return; }
    if (ext == "tga") { storeTga(img,fileName); return; }
    throw std::runtime_error("image format " + ext + " not supported");
  }
  catch (const std::exception& e) {
    std::cout << "cannot write file " << fileName << ": " << e.what() << std::endl;
  }

  /*! template instantiations */
  template class ImageT<Col3c>;
  template class ImageT<Col3f>;
}