/*      _______   __   __   __   ______   __   __   _______   __   __
 *     / _____/\ / /\ / /\ / /\ / ____/\ / /\ / /\ / ___  /\ /  |\/ /\
 *    / /\____\// / // / // / // /\___\// /_// / // /\_/ / // , |/ / /
 *   / / /__   / / // / // / // / /    / ___  / // ___  / // /| ' / /
 *  / /_// /\ / /_// / // / // /_/_   / / // / // /\_/ / // / |  / /
 * /______/ //______/ //_/ //_____/\ /_/ //_/ //_/ //_/ //_/ /|_/ /
 * \______\/ \______\/ \_\/ \_____\/ \_\/ \_\/ \_\/ \_\/ \_\/ \_\/
 *
 * Copyright (c) 2004 - 2008 Olof Naessén and Per Larsson
 *
 *
 * Per Larsson a.k.a finalman
 * Olof Naessén a.k.a jansem/yakslem
 *
 * Visit: http://guichan.sourceforge.net
 *
 * License: (BSD)
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in
 *    the documentation and/or other materials provided with the
 *    distribution.
 * 3. Neither the name of Guichan nor the names of its contributors may
 *    be used to endorse or promote products derived from this software
 *    without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
 * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED
 * TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
 * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
 * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
 * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
 * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */

/*
 * For comments regarding functions please see the header file.
 */

#include "guichan/allegro/allegroimage.hpp"

#include "guichan/exception.hpp"

namespace gcn
{
    AllegroImage::AllegroImage(BITMAP* bitmap, bool autoFree)
    {
        mAutoFree = autoFree;
        mBitmap = bitmap;
    }

    AllegroImage::~AllegroImage()
    {
        if (mAutoFree)
        {
            free();
        }
    }

    BITMAP* AllegroImage::getBitmap() const
    {
        return mBitmap;
    }

    void AllegroImage::free()
    {
        if (mBitmap)
        {
            destroy_bitmap(mBitmap);
            mBitmap = 0;
        }
    }

    int AllegroImage::getWidth() const
    {
        if (!mBitmap)
        {
            throw GCN_EXCEPTION("Trying to get the width of a non loaded image.");
        }

        return mBitmap->w;
    }

    int AllegroImage::getHeight() const
    {
        if (!mBitmap)
        {
            GCN_EXCEPTION("Trying to get the height of a non loaded image.");
        }

        return mBitmap->h;
    }

    Color AllegroImage::getPixel(int x, int y)
    {
        if (!mBitmap)
        {
            throw GCN_EXCEPTION("Trying to get a pixel from a non loaded image.");
        }

        int c = getpixel(mBitmap, x, y);

        return Color(getr32(c), getg32(c), getb32(c), geta(32));
    }

    void AllegroImage::putPixel(int x, int y, const Color& color)
    {
        if (!mBitmap)
        {
            throw GCN_EXCEPTION("Trying to put a pixel in a non loaded image.");
        }

        int c = makeacol_depth(32, color.r, color.g, color.b, color.a);

        putpixel(mBitmap, x, y, c);
    }

    void AllegroImage::convertToDisplayFormat()
    {
        if (!mBitmap)
        {
            GCN_EXCEPTION("Trying to convert a non loaded image to display format.");
        }

        BITMAP *bmp = create_bitmap(mBitmap->w, mBitmap->h);

        blit(mBitmap, bmp, 0, 0, 0, 0, bmp->w, bmp->h);

        destroy_bitmap(mBitmap);

        mBitmap = bmp;
    }
}