//
// "$Id$"
//
// Alignment code for the Fast Light Tool Kit (FLTK).
//
// Copyright 1998-2010 by Bill Spitzak and others.
//
// This library is free software. Distribution and use rights are outlined in
// the file "COPYING" which should have been included with this file.  If this
// file is missing or damaged, see the license at:
//
//     http://www.fltk.org/COPYING.php
//
// Please report all bugs and problems on the following page:
//
//     http://www.fltk.org/str.php
//

#include <FL/Fl.H>
#include <FL/Fl_Window.H>
#include "Fl_Widget_Type.h"
#include "undo.h"

/**
 * the first behaviour always uses the first selected widget as a reference
 * the second behaviour uses the largest widget (most extreme positions) as
 * a reference.
 */
#define BREAK_ON_FIRST break
//#define BREAK_ON_FIRST

void align_widget_cb(Fl_Widget*, long how) 
{
  const int max = 32768, min = -32768;
  int left, right, top, bot, wdt, hgt, n;
  Fl_Type *o;
  int changed = 0;
  switch ( how )
  {
  //---- align
  case 10: // align left
    left = max;
    for (o = Fl_Type::first; o; o = o->next)
      if (o->selected && o->is_widget())
      {
	Fl_Widget *w = ((Fl_Widget_Type *)o)->o;
	if (w->x()<left)
	  left = w->x();
	BREAK_ON_FIRST;
      }
    if (left!=max)
      for (Fl_Type *o = Fl_Type::first; o; o = o->next)
	if (o->selected && o->is_widget())
	{
	  if (!changed) {
	    changed = 1;
	    set_modflag(1);
	    undo_checkpoint();
	  }

	  Fl_Widget *w = ((Fl_Widget_Type *)o)->o;
	  if (o->next && o->next->level > o->level && !o->next->selected &&
	      !o->is_menu_button()) {
	    // When resizing a group, make sure we also move the children...
	    ((igroup *)w)->full_resize(left, w->y(), w->w(), w->h());
	  } else {
	    // Otherwise, just do the widget...
	    w->resize(left, w->y(), w->w(), w->h());
	  }
	  w->redraw();
	  if (w->window()) w->window()->redraw();
	}
    break;
  case 11: // align h.center
    left = max; right = min;
    for (o = Fl_Type::first; o; o = o->next)
      if (o->selected && o->is_widget())
      {
	Fl_Widget *w = ((Fl_Widget_Type *)o)->o;
	if (w->x()<left)
	  left = w->x();
	if (w->x()+w->w()>right)
	  right = w->x()+w->w();
	BREAK_ON_FIRST;
      }
    if (left!=max)
    {
      int center2 = left+right;
      for (Fl_Type *o = Fl_Type::first; o; o = o->next)
	if (o->selected && o->is_widget())
	{
	  if (!changed) {
	    changed = 1;
	    set_modflag(1);
	    undo_checkpoint();
	  }

	  Fl_Widget *w = ((Fl_Widget_Type *)o)->o;
	  if (o->next && o->next->level > o->level && !o->next->selected &&
	      !o->is_menu_button()) {
	    // When resizing a group, make sure we also move the children...
	    ((igroup *)w)->full_resize((center2-w->w())/2, w->y(), w->w(), w->h());
	  } else {
	    // Otherwise, just do the widget...
	    w->resize((center2-w->w())/2, w->y(), w->w(), w->h());
	  }
	  w->redraw();
	  if (w->window()) w->window()->redraw();
	}
    }
    break;
  case 12: // align right
    right = min;
    for (o = Fl_Type::first; o; o = o->next)
      if (o->selected && o->is_widget())
      {
	Fl_Widget *w = ((Fl_Widget_Type *)o)->o;
	if (w->x()+w->w()>right)
	  right = w->x()+w->w();
	BREAK_ON_FIRST;
      }
    if (right!=min)
      for (Fl_Type *o = Fl_Type::first; o; o = o->next)
	if (o->selected && o->is_widget())
	{
	  if (!changed) {
	    changed = 1;
	    set_modflag(1);
	    undo_checkpoint();
	  }

	  Fl_Widget *w = ((Fl_Widget_Type *)o)->o;
	  if (o->next && o->next->level > o->level && !o->next->selected &&
	      !o->is_menu_button()) {
	    // When resizing a group, make sure we also move the children...
	    ((igroup *)w)->full_resize(right-w->w(), w->y(), w->w(), w->h());
	  } else {
	    // Otherwise, just do the widget...
	    w->resize(right-w->w(), w->y(), w->w(), w->h());
	  }
	  w->redraw();
	  if (w->window()) w->window()->redraw();
	}
    break;
  case 13: // align top
    top = max;
    for (o = Fl_Type::first; o; o = o->next)
      if (o->selected && o->is_widget())
      {
	Fl_Widget *w = ((Fl_Widget_Type *)o)->o;
	if (w->y()<top)
	  top = w->y();
	BREAK_ON_FIRST;
      }
    if (top!=max)
      for (Fl_Type *o = Fl_Type::first; o; o = o->next)
	if (o->selected && o->is_widget())
	{
	  if (!changed) {
	    changed = 1;
	    set_modflag(1);
	    undo_checkpoint();
	  }

	  Fl_Widget *w = ((Fl_Widget_Type *)o)->o;
	  if (o->next && o->next->level > o->level && !o->next->selected &&
	      !o->is_menu_button()) {
	    // When resizing a group, make sure we also move the children...
	    ((igroup *)w)->full_resize(w->x(), top, w->w(), w->h());
	  } else {
	    // Otherwise, just do the widget...
	    w->resize(w->x(), top, w->w(), w->h());
	  }
	  w->redraw();
	  if (w->window()) w->window()->redraw();
	}
    break;
  case 14: // align v.center
    top = max; bot = min;
    for (o = Fl_Type::first; o; o = o->next)
      if (o->selected && o->is_widget())
      {
	Fl_Widget *w = ((Fl_Widget_Type *)o)->o;
	if (w->y()<top)
	  top = w->y();
	if (w->y()+w->h()>bot)
	  bot = w->y()+w->h();
	BREAK_ON_FIRST;
      }
    if (top!=max)
    {
      int center2 = top+bot;
      for (Fl_Type *o = Fl_Type::first; o; o = o->next)
	if (o->selected && o->is_widget())
	{
	  if (!changed) {
	    changed = 1;
	    set_modflag(1);
	    undo_checkpoint();
	  }

	  Fl_Widget *w = ((Fl_Widget_Type *)o)->o;
	  if (o->next && o->next->level > o->level && !o->next->selected &&
	      !o->is_menu_button()) {
	    // When resizing a group, make sure we also move the children...
	    ((igroup *)w)->full_resize(w->x(), (center2-w->h())/2, w->w(), w->h());
	  } else {
	    // Otherwise, just do the widget...
	    w->resize(w->x(), (center2-w->h())/2, w->w(), w->h());
	  }
	  w->redraw();
	  if (w->window()) w->window()->redraw();
	}
    }
    break;
  case 15: // align bottom
    bot = min;
    for (o = Fl_Type::first; o; o = o->next)
      if (o->selected && o->is_widget())
      {
	Fl_Widget *w = ((Fl_Widget_Type *)o)->o;
	if (w->y()+w->h()>bot)
	  bot = w->y()+w->h();
	BREAK_ON_FIRST;
      }
    if (bot!=min)
      for (Fl_Type *o = Fl_Type::first; o; o = o->next)
	if (o->selected && o->is_widget())
	{
	  if (!changed) {
	    changed = 1;
	    set_modflag(1);
	    undo_checkpoint();
	  }

	  Fl_Widget *w = ((Fl_Widget_Type *)o)->o;
	  if (o->next && o->next->level > o->level && !o->next->selected &&
	      !o->is_menu_button()) {
	    // When resizing a group, make sure we also move the children...
	    ((igroup *)w)->full_resize( w->x(), bot-w->h(), w->w(), w->h());
	  } else {
	    // Otherwise, just do the widget...
	    w->resize( w->x(), bot-w->h(), w->w(), w->h());
	  }
	  w->redraw();
	  if (w->window()) w->window()->redraw();
	}
    break;
  //---- space evently
  case 20: // space evenly across
    left = max; right = min; wdt = 0, n = 0;
    for (o = Fl_Type::first; o; o = o->next)
      if (o->selected && o->is_widget())
      {
	Fl_Widget *w = ((Fl_Widget_Type *)o)->o;
	if (w->x()<left)
	  left = w->x();
	if (w->x()+w->w()>right)
	  right = w->x()+w->w();
	wdt += w->w();
	n++;
      }
    wdt = (right-left)-wdt;
    n--;
    if (n>0)
    {
      int cnt = 0, wsum = 0;
      for (Fl_Type *o = Fl_Type::first; o; o = o->next)
	if (o->selected && o->is_widget())
	{
	  if (!changed) {
	    changed = 1;
	    set_modflag(1);
	    undo_checkpoint();
	  }

	  Fl_Widget *w = ((Fl_Widget_Type *)o)->o;
	  if (o->next && o->next->level > o->level && !o->next->selected &&
	      !o->is_menu_button()) {
	    // When resizing a group, make sure we also move the children...
	    ((igroup *)w)->full_resize(left+wsum+wdt*cnt/n, w->y(), w->w(), w->h());
	  } else {
	    // Otherwise, just do the widget...
	    w->resize(left+wsum+wdt*cnt/n, w->y(), w->w(), w->h());
	  }
	  w->redraw();
	  if (w->window()) w->window()->redraw();
	  cnt++;
	  wsum += w->w();
	}
    }
    break;
  case 21: // space evenly down
    top = max; bot = min; hgt = 0, n = 0;
    for (o = Fl_Type::first; o; o = o->next)
      if (o->selected && o->is_widget())
      {
	Fl_Widget *w = ((Fl_Widget_Type *)o)->o;
	if (w->y()<top)
	  top = w->y();
	if (w->y()+w->h()>bot)
	  bot = w->y()+w->h();
	hgt += w->h();
	n++;
      }
    hgt = (bot-top)-hgt;
    n--;
    if (n>0)
    {
      int cnt = 0, hsum = 0;
      for (Fl_Type *o = Fl_Type::first; o; o = o->next)
	if (o->selected && o->is_widget())
	{
	  if (!changed) {
	    changed = 1;
	    set_modflag(1);
	    undo_checkpoint();
	  }

	  Fl_Widget *w = ((Fl_Widget_Type *)o)->o;
	  if (o->next && o->next->level > o->level && !o->next->selected &&
	      !o->is_menu_button()) {
	    // When resizing a group, make sure we also move the children...
	    ((igroup *)w)->full_resize(w->x(), top+hsum+hgt*cnt/n, w->w(), w->h());
	  } else {
	    // Otherwise, just do the widget...
	    w->resize(w->x(), top+hsum+hgt*cnt/n, w->w(), w->h());
	  }
	  w->redraw();
	  if (w->window()) w->window()->redraw();
	  cnt++;
	  hsum += w->h();
	}
    }
    break;
  //---- make same size
  case 30: // same width
    wdt = min;
    for (o = Fl_Type::first; o; o = o->next)
      if (o->selected && o->is_widget())
      {
	Fl_Widget *w = ((Fl_Widget_Type *)o)->o;
	if (w->w()>wdt)
	  wdt = w->w();
	BREAK_ON_FIRST;
      }
    if (wdt!=min)
      for (Fl_Type *o = Fl_Type::first; o; o = o->next)
	if (o->selected && o->is_widget())
	{
	  if (!changed) {
	    changed = 1;
	    set_modflag(1);
	    undo_checkpoint();
	  }

	  Fl_Widget *w = ((Fl_Widget_Type *)o)->o;
	  if (o->next && o->next->level > o->level && !o->next->selected &&
	      !o->is_menu_button()) {
	    // When resizing a group, make sure we also move the children...
	    ((igroup *)w)->full_resize(w->x(), w->y(), wdt, w->h());
	  } else {
	    // Otherwise, just do the widget...
	    w->resize(w->x(), w->y(), wdt, w->h());
	  }
	  w->redraw();
	  if (w->window()) w->window()->redraw();
	}
    break;
  case 31: // same height
    hgt = min;
    for (o = Fl_Type::first; o; o = o->next)
      if (o->selected && o->is_widget())
      {
	Fl_Widget *w = ((Fl_Widget_Type *)o)->o;
	if (w->h()>hgt)
	  hgt = w->h();
	BREAK_ON_FIRST;
      }
    if (hgt!=min)
      for (Fl_Type *o = Fl_Type::first; o; o = o->next)
	if (o->selected && o->is_widget())
	{
	  if (!changed) {
	    changed = 1;
	    set_modflag(1);
	    undo_checkpoint();
	  }

	  Fl_Widget *w = ((Fl_Widget_Type *)o)->o;
	  if (o->next && o->next->level > o->level && !o->next->selected &&
	      !o->is_menu_button()) {
	    // When resizing a group, make sure we also move the children...
	    ((igroup *)w)->full_resize( w->x(), w->y(), w->w(), hgt);
	  } else {
	    // Otherwise, just do the widget...
	    w->resize( w->x(), w->y(), w->w(), hgt);
	  }
	  w->redraw();
	  if (w->window()) w->window()->redraw();
	}
    break;
  case 32: // same size
    hgt = min; wdt = min;
    for (o = Fl_Type::first; o; o = o->next)
      if (o->selected && o->is_widget())
      {
	Fl_Widget *w = ((Fl_Widget_Type *)o)->o;
	if (w->w()>wdt)
	  wdt = w->w();
	if (w->h()>hgt)
	  hgt = w->h();
	BREAK_ON_FIRST;
      }
    if (hgt!=min)
      for (Fl_Type *o = Fl_Type::first; o; o = o->next)
	if (o->selected && o->is_widget())
	{
	  if (!changed) {
	    changed = 1;
	    set_modflag(1);
	    undo_checkpoint();
	  }

	  Fl_Widget *w = ((Fl_Widget_Type *)o)->o;
	  if (o->next && o->next->level > o->level && !o->next->selected &&
	      !o->is_menu_button()) {
	    // When resizing a group, make sure we also move the children...
	    ((igroup *)w)->full_resize( w->x(), w->y(), wdt, hgt);
	  } else {
	    // Otherwise, just do the widget...
	    w->resize( w->x(), w->y(), wdt, hgt);
	  }
	  w->redraw();
	  if (w->window()) w->window()->redraw();
	}
    break;
  //---- center in group
  case 40: // center hor
    for (o = Fl_Type::first; o; o = o->next)
      if (o->selected && o->is_widget() && o->parent)
      {
	if (!changed) {
	  changed = 1;
	  set_modflag(1);
	  undo_checkpoint();
	}

	Fl_Widget *w = ((Fl_Widget_Type *)o)->o;
	Fl_Widget *p = ((Fl_Widget_Type *)o->parent)->o;
	int center2;

	if (w->window() == p) center2 = p->w();
	else center2 = 2*p->x()+p->w();

	if (o->next && o->next->level > o->level && !o->next->selected &&
	    !o->is_menu_button() && !o->is_menu_button()) {
	  // When resizing a group, make sure we also move the children...
	  ((igroup *)w)->full_resize((center2-w->w())/2, w->y(), w->w(), w->h());
	} else {
	  // Otherwise, just do the widget...
	  w->resize((center2-w->w())/2, w->y(), w->w(), w->h());
	}
	w->redraw();
	if (w->window()) w->window()->redraw();
      }
    break;
  case 41: // center vert
    for (o = Fl_Type::first; o; o = o->next)
      if (o->selected && o->is_widget() && o->parent)
      {
	if (!changed) {
	  changed = 1;
	  set_modflag(1);
	  undo_checkpoint();
	}

	Fl_Widget *w = ((Fl_Widget_Type *)o)->o;
	Fl_Widget *p = ((Fl_Widget_Type *)o->parent)->o;
	int center2;

	if (w->window() == p) center2 = p->h();
	else center2 = 2*p->y()+p->h();

	if (o->next && o->next->level > o->level && !o->next->selected &&
	    !o->is_menu_button()) {
	  // When resizing a group, make sure we also move the children...
	  ((igroup *)w)->full_resize(w->x(), (center2-w->h())/2, w->w(), w->h());
	} else {
	  // Otherwise, just do the widget...
	  w->resize(w->x(), (center2-w->h())/2, w->w(), w->h());
	}
	set_modflag(1);
	w->redraw();
	if (w->window()) w->window()->redraw();
      }
    break;
  }
}


// Set sizes of selected widgets...
void widget_size_cb(Fl_Widget *, long size) {
  // Update any selected widgets...
  int changed = 0;
  for (Fl_Type *o = Fl_Type::first; o; o = o->next) {
    if (o->selected && o->is_widget()) {
      if (!changed) {
	changed = 1;
	set_modflag(1);
	undo_checkpoint();
      }

      Fl_Widget *w = ((Fl_Widget_Type *)o)->o;
      w->labelsize((Fl_Font)size);
      Fl_Font f;
      int s = (int)size;
      Fl_Color c;
      ((Fl_Widget_Type *)o)->textstuff(2, f, s, c);

      w->redraw();
      // since this may be a major change, the whole window should be redrawn
      if (w->window()) w->window()->redraw();
    }
  }
}


//
// End of "$Id$".
//