/* GIMP - The GNU Image Manipulation Program
 * Copyright (C) 1995 Spencer Kimball and Peter Mattis
 *
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 3 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
 */

#include "config.h"

#include <gegl.h>

#include "core-types.h"

#include "base/tile-manager-preview.h"

#include "gegl/gimp-babl.h"

#include "gimpimage.h"
#include "gimpimage-preview.h"
#include "gimpimage-private.h"
#include "gimpprojectable.h"
#include "gimpprojection.h"
#include "gimptempbuf.h"


void
gimp_image_get_preview_size (GimpViewable *viewable,
                             gint          size,
                             gboolean      is_popup,
                             gboolean      dot_for_dot,
                             gint         *width,
                             gint         *height)
{
  GimpImage *image = GIMP_IMAGE (viewable);
  gdouble    xres;
  gdouble    yres;

  gimp_image_get_resolution (image, &xres, &yres);

  gimp_viewable_calc_preview_size (gimp_image_get_width  (image),
                                   gimp_image_get_height (image),
                                   size,
                                   size,
                                   dot_for_dot,
                                   xres,
                                   yres,
                                   width,
                                   height,
                                   NULL);
}

gboolean
gimp_image_get_popup_size (GimpViewable *viewable,
                           gint          width,
                           gint          height,
                           gboolean      dot_for_dot,
                           gint         *popup_width,
                           gint         *popup_height)
{
  GimpImage *image = GIMP_IMAGE (viewable);

  if (gimp_image_get_width  (image) > width ||
      gimp_image_get_height (image) > height)
    {
      gboolean scaling_up;

      gimp_viewable_calc_preview_size (gimp_image_get_width  (image),
                                       gimp_image_get_height (image),
                                       width  * 2,
                                       height * 2,
                                       dot_for_dot, 1.0, 1.0,
                                       popup_width,
                                       popup_height,
                                       &scaling_up);

      if (scaling_up)
        {
          *popup_width  = gimp_image_get_width  (image);
          *popup_height = gimp_image_get_height (image);
        }

      return TRUE;
    }

  return FALSE;
}

GimpTempBuf *
gimp_image_get_preview (GimpViewable *viewable,
                        GimpContext  *context,
                        gint          width,
                        gint          height)
{
  GimpImagePrivate *private = GIMP_IMAGE_GET_PRIVATE (viewable);

  if (private->preview                                     &&
      gimp_temp_buf_get_width  (private->preview) == width &&
      gimp_temp_buf_get_height (private->preview) == height)
    {
      /*  The easy way  */
      return private->preview;
    }
  else
    {
      /*  The hard way  */
      if (private->preview)
        gimp_temp_buf_unref (private->preview);

      private->preview = gimp_image_get_new_preview (viewable, context,
                                                     width, height);

      return private->preview;
    }
}

GimpTempBuf *
gimp_image_get_new_preview (GimpViewable *viewable,
                            GimpContext  *context,
                            gint          width,
                            gint          height)
{
  GimpImage      *image      = GIMP_IMAGE (viewable);
  GimpProjection *projection = gimp_image_get_projection (image);
  const Babl     *format;
  GimpTempBuf    *buf;
  TileManager    *tiles;
  gdouble         scale_x;
  gdouble         scale_y;
  gint            level;
  gboolean        is_premult;

  scale_x = (gdouble) width  / (gdouble) gimp_image_get_width  (image);
  scale_y = (gdouble) height / (gdouble) gimp_image_get_height (image);

  level = gimp_projection_get_level (projection, scale_x, scale_y);
  tiles = gimp_projection_get_tiles_at_level (projection, level, &is_premult);

  format = gimp_projectable_get_format (GIMP_PROJECTABLE (image));

  format = gimp_babl_format (gimp_babl_format_get_base_type (format),
                             GIMP_PRECISION_U8,
                             babl_format_has_alpha (format));

  buf = tile_manager_get_preview (tiles, format, width, height);

  if (is_premult)
    {
      if (format == babl_format ("Y'A u8"))
        {
          gimp_temp_buf_set_format (buf, babl_format ("Y'aA u8"));
        }
      else if (format == babl_format ("R'G'B'A u8"))
        {
          gimp_temp_buf_set_format (buf, babl_format ("R'aG'aB'aA u8"));
        }
      else
        {
          g_warn_if_reached ();
        }
    }

  return buf;
}
