/*
 *  window_size.c - Part of AFD, an automatic file distribution program.
 *  Copyright (c) 1996 - 2002 Deutscher Wetterdienst (DWD),
 *                            Holger Kiehl <Holger.Kiehl@dwd.de>
 *
 *  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 2 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, write to the Free Software
 *  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 */

#include "afddefs.h"

DESCR__S_M3
/*
 ** NAME
 **   window_size - calculates the new window size
 **
 ** SYNOPSIS
 **   signed char window_size(int *window_width, int *window_height)
 **
 ** DESCRIPTION
 **
 ** RETURN VALUES
 **   YES - Window size must be changed
 **   NO  - Window size must not be changed
 **
 ** AUTHOR
 **   H.Kiehl
 **
 ** HISTORY
 **   26.01.1996 H.Kiehl Created
 **   22.12.2001 H.Kiehl Added variable column length.
 **
 */
DESCR__E_M3

#include <string.h>                 /* strerror()                       */
#include <stdlib.h>                 /* malloc(), free()                 */
#include <errno.h>
#include "gafd_ctrl.h"

extern Display                    *display;
extern int                        button_width,
                                  *line_length,
                                  max_line_length,
                                  line_height,
                                  no_of_columns,
                                  no_of_short_columns,
                                  no_of_rows,
                                  no_of_short_rows,
                                  no_of_rows_set,
                                  no_of_long_lines,
                                  no_of_short_lines,
                                  short_line_length;
extern char                       line_style;
extern struct filetransfer_status *fsa;


/*########################### window_size() ############################*/
signed char
window_size(int *window_width, int *window_height)
{
   int         i, j,
               max_no_of_lines,
               new_window_width,
               new_window_height,
               previous_no_of_rows;
   signed char window_size_changed;

   if (no_of_long_lines > 0)
   {
      /* How many columns do we need? */
      no_of_columns = no_of_long_lines / no_of_rows_set;
      if ((no_of_long_lines % no_of_rows_set) != 0)
      {
         no_of_columns += 1;
      }

      /* Ensure that there is no division by zero. */
      if (no_of_columns == 0)
      {
         no_of_columns = 1;
      }

      /* How many lines per window? */
      previous_no_of_rows = no_of_rows;
      no_of_rows = no_of_long_lines / no_of_columns;
      if (no_of_long_lines != (no_of_columns * no_of_rows))
      {
         if ((no_of_long_lines % no_of_columns) != 0)
         {
            no_of_rows += 1;
         }
      }

      /* Determine the length of each column. */
      if (line_length != NULL)
      {
         free(line_length);
      }
      if ((line_length = malloc(no_of_columns * sizeof(int))) == NULL)
      {
         (void)fprintf(stderr, "malloc() error : %s (%s %d)\n",
                       strerror(errno), __FILE__, __LINE__);
         exit(INCORRECT);
      }
      new_window_width = 0;
      if (line_style & SHOW_JOBS)
      {
         int max_no_parallel_jobs = 0,
	     pos,
             row_counter = 0;

         for (i = 0; i < no_of_columns; i++)
         {
            for (j = 0; j < no_of_rows; j++)
            {
               if ((pos = get_long_pos(row_counter, YES)) != -1)
               {
                  if (max_no_parallel_jobs < fsa[pos].allowed_transfers)
                  {
                     max_no_parallel_jobs = fsa[pos].allowed_transfers;
                     if (max_no_parallel_jobs == MAX_NO_PARALLEL_JOBS)
                     {
                        /* No need to go on with the search. */
                        row_counter += (no_of_rows - j);
                        break;
                     }
                  }
               }
               row_counter++;
               if (row_counter >= no_of_long_lines)
               {
                  break;
               }
            }
            line_length[i] = max_line_length -
                             (((MAX_NO_PARALLEL_JOBS - max_no_parallel_jobs) *
                              (button_width + BUTTON_SPACING)) - BUTTON_SPACING);
            new_window_width += line_length[i];
            max_no_parallel_jobs = 0;
         }
      }
      else
      {
         for (i = 0; i < no_of_columns; i++)
         {
            line_length[i] = max_line_length;
            new_window_width += max_line_length;
         }
      }

      /* Check if in last column rows moved up. */
      if (((max_no_of_lines = (no_of_columns * no_of_rows)) > no_of_long_lines) &&
          (previous_no_of_rows != no_of_rows) && (previous_no_of_rows != 0))
      {
         for (i = max_no_of_lines; i > no_of_long_lines; i--)
         {
            draw_long_blank_line(i - 1);
         }
      }

      if (no_of_short_lines > 0)
      {
         no_of_short_columns = new_window_width / short_line_length;
         no_of_short_rows = no_of_short_lines / no_of_short_columns;
         if ((no_of_short_lines % no_of_short_columns) != 0)
         {
            no_of_short_rows += 1;
         }
      }
      else
      {
         no_of_short_columns = no_of_short_rows = 0;
      }
   }
   else
   {
      int no_of_short_rows_set;

      no_of_short_rows_set = no_of_rows_set / (line_length[0] / short_line_length);
      if (no_of_short_rows_set == 0)
      {
         no_of_short_rows_set = 1;
      }

      /* How many columns do we need? */
      no_of_short_columns = no_of_short_lines / no_of_short_rows_set;
      if ((no_of_short_lines % no_of_short_rows_set) != 0)
      {
         no_of_short_columns += 1;
      }
      if (no_of_short_columns == 0)
      {
         no_of_short_columns = 1;
      }

      /* How many rows do we need? */
      no_of_short_rows = no_of_short_lines / no_of_short_columns;
      if (no_of_short_lines != (no_of_short_columns * no_of_short_rows))
      {
         if ((no_of_short_lines % no_of_short_columns) != 0)
         {
            no_of_short_rows += 1;
         }
      }

      no_of_columns = no_of_rows = 0;
      new_window_width = no_of_short_columns * short_line_length;
   }

   calc_but_coord(new_window_width);

   /* Calculate window width and height. */
   new_window_height = line_height * (no_of_rows + no_of_short_rows);

   /* Window resize necessary? */
   if ((new_window_width  != *window_width) ||
       (new_window_height != *window_height))
   {
      window_size_changed = YES;
   }
   else
   {
      window_size_changed = NO;
   }

   *window_width  = new_window_width;
   *window_height = new_window_height;

   return(window_size_changed);
}