tools_fill_domain.c

#if defined(__GNUC__)
#ident "University of Edinburgh $Id$"
#else
static char _tools_fill_domain_c[] = "University of Edinburgh $Id$";
#endif
/*!
* \file         tools_fill_domain.c
* \author	Richard Baldock
* \date		April 2009
* \version      $Id$
* \par
* Address:
*               MRC Human Genetics Unit,
*               MRC Institute of Genetics and Molecular Medicine,
*               University of Edinburgh,
*               Western General Hospital,
*               Edinburgh, EH4 2XU, UK.
* \par
* Copyright (C), [2012],
* The University Court of the University of Edinburgh,
* Old College, Edinburgh, UK.
* 
* 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., 51 Franklin Street, Fifth Floor,
* Boston, MA  02110-1301, USA.
* \ingroup      MAPaint
* \brief        
*/

#include <stdio.h>
#include <stdlib.h>

#include <MAPaint.h>

static Widget fill_delete_w, fill_flood_w;

DomainSelection getSelectedDomainType(
  int			x, 
  int			y, 
  ThreeDViewStruct	*view_struct)
{
  WlzThreeDViewStruct	*wlzViewStr= view_struct->wlzViewStr;
  DomainSelection	sel_domain;

  /* check scaling */
  x /= wlzViewStr->scale;
  y /= wlzViewStr->scale;

  /* determine selected colour and get domain should get this in Wlz not
     rely on the ximage */
  if((x < 0) || (x >= view_struct->ximage->width) ||
     (y < 0) || (y >= view_struct->ximage->height) ){
    return( DOMAIN_INVALID ); /* HACK WAS return( NULL ); WHAT SHOULD THIS BE? - introduced invalid enum */
  }

  sel_domain = imageValueToDomain
    ((unsigned int ) *(((WlzUByte *)view_struct->ximage->data) +
		       x + y * view_struct->ximage->bytes_per_line));

  return sel_domain;
}

WlzObject *getSelectedRegion(
  int			x, 
  int			y, 
  ThreeDViewStruct	*view_struct)
{
  WlzThreeDViewStruct	*wlzViewStr= view_struct->wlzViewStr;
  WlzObject		*obj, *obj1, **objs;
  DomainSelection	sel_domain;
  int			i, nobjs;
  WlzErrorNum		errNum=WLZ_ERR_NONE;

  /* get the selected domain */
  if( (sel_domain = getSelectedDomainType(x, y, view_struct)) == DOMAIN_INVALID ){
    return NULL;
  }

  /* check for painted object */
  if( view_struct->painted_object == NULL ){
    WlzObject	*sectObj, *rectObj;
    WlzDomain	domain;
    sectObj = WlzGetMaskedSectionFromObject(globals.obj, wlzViewStr,
					    WLZ_INTERPOLATION_NEAREST,
					    &errNum);
    if( sectObj ){
      domain.i = WlzMakeIntervalDomain(WLZ_INTERVALDOMAIN_RECT,
				       WLZ_NINT(wlzViewStr->minvals.vtY),
				       WLZ_NINT(wlzViewStr->maxvals.vtY),
				       WLZ_NINT(wlzViewStr->minvals.vtX),
				       WLZ_NINT(wlzViewStr->maxvals.vtX),
				       &errNum);
      rectObj = WlzMakeMain(WLZ_2D_DOMAINOBJ, domain, sectObj->values,
			    NULL, NULL, &errNum);
      if( view_struct->masked_object ){
	WlzFreeObj(view_struct->masked_object);
      }
      view_struct->masked_object = WlzAssignObject(sectObj, NULL);
      view_struct->painted_object = WlzAssignObject(rectObj, NULL);
    }
    else {
      if( errNum != WLZ_ERR_NONE ){
	MAPaintReportWlzError(globals.topl, "getSelectedRegion", errNum);
      }
      return NULL;
    }
  }

  /* check scaling and offsets */
  x /= wlzViewStr->scale;
  y /= wlzViewStr->scale;
  x += view_struct->painted_object->domain.i->kol1;
  y += view_struct->painted_object->domain.i->line1;

  if( (obj = get_domain_from_object(view_struct->painted_object,
				    sel_domain)) == NULL )
  {
    return( NULL );
  }
  obj = WlzAssignObject(obj, NULL);

  /* segment domain and find connected region */
  if( (errNum = WlzLabel(obj, &nobjs, &objs, 256, 1, WLZ_4_CONNECTED))
     == WLZ_ERR_NONE ){
    for(i=0, obj1=NULL; i < nobjs; i++){
      if( WlzInsideDomain(objs[i], 0, y, x, NULL) ){
	obj1 = WlzMakeMain(WLZ_2D_DOMAINOBJ,
			   objs[i]->domain, objs[i]->values,
			   NULL, NULL, NULL);
      }
      WlzFreeObj( objs[i] );
    }
    AlcFree((void *) objs);
  }
  else {
    MAPaintReportWlzError(globals.topl, "getSelectedRegion", errNum);
    obj1 = NULL;
  }
  WlzFreeObj( obj );

  /* trim off the values */
  if( obj1 && obj1->values.core ){
    WlzFreeValues(obj1->values);
    obj1->values.core = NULL;
  }

  return obj1;
}

void MAPaintFill2DInit(
  ThreeDViewStruct	*view_struct)
{
  return;
}

void MAPaintFill2DQuit(
  ThreeDViewStruct	*view_struct)
{
  return;
}

void MAPaintFill2DCb(
  Widget	w,
  XtPointer	client_data,
  XtPointer	call_data)
{
  ThreeDViewStruct	*view_struct = (ThreeDViewStruct *) client_data;
  XmAnyCallbackStruct	*cbs = (XmAnyCallbackStruct *) call_data;
  DomainSelection	currDomain;
  int			delFlag;
  WlzObject		*obj, *obj1;
  Boolean		toggleFlg;
  WlzErrorNum		errNum=WLZ_ERR_NONE;

  switch( cbs->event->type ){

  case ButtonPress:
    switch( cbs->event->xbutton.button ){

    case Button1:
    case Button2:
      /* do nothing if shift pressed - magnify option */
      if( cbs->event->xbutton.state & ButtonStateIgnoreMask ){
	break;
      }

      /* save the current domain selection and meta button state */
      currDomain = globals.current_domain;
      XtVaGetValues(fill_delete_w, XmNset, &toggleFlg, NULL);
      delFlag = ((cbs->event->xbutton.state & Mod1Mask) ||
		 (cbs->event->xbutton.button == Button2) || toggleFlg);

      /* get the fill object */
      if((obj = getSelectedRegion(cbs->event->xbutton.x, cbs->event->xbutton.y,
				  view_struct))){
	XtVaGetValues(fill_flood_w, XmNset, &toggleFlg, NULL);
	if( toggleFlg ){
	  obj = WlzAssignObject(obj, NULL);
	  if((obj1 = WlzDomainFill(obj, &errNum))){
	    WlzFreeObj(obj);
	    obj = obj1;
	  }
	  else {
	    MAPaintReportWlzError(globals.topl, "MAPaintFill2DCb", errNum);
	  }
	}
	obj = WlzAssignObject(obj, NULL);
      }

      /* push domains for undo reset the painted object and redisplay */
      if( obj ){
	pushUndoDomains(view_struct);
	setDomainIncrement(obj, view_struct, currDomain, delFlag);
	WlzFreeObj( obj );
      }
      break;

    default:
      break;

    }
    break;

  case ButtonRelease:
    break;

  case MotionNotify:
    break;

  case KeyPress:
    break;

  default:
    break;
  }

  return;
}

Widget	CreateFillControls(
  Widget	parent)
{
  Widget	form, form1, label, frame;

  /* create a parent form to hold all the tracking controls */
  form = XtVaCreateWidget("fill_controls_form", xmFormWidgetClass,
			  parent,
			  XmNtopAttachment,     XmATTACH_FORM,
			  XmNbottomAttachment,	XmATTACH_FORM,
			  XmNleftAttachment,    XmATTACH_FORM,
			  XmNrightAttachment,  	XmATTACH_FORM,
			  NULL);

  /* create frame, form and label for the tracking parameters */
  frame = XtVaCreateManagedWidget("frame", xmFrameWidgetClass,
				  form,
				  XmNtopAttachment,     XmATTACH_FORM,
				  XmNleftAttachment,    XmATTACH_FORM,
				  XmNrightAttachment,  	XmATTACH_FORM,
				  NULL);

  form1 = XtVaCreateWidget("fill_rc", xmRowColumnWidgetClass,
			   frame,
			   XmNtopAttachment,    XmATTACH_FORM,
			   XmNbottomAttachment,	XmATTACH_FORM,
			   XmNleftAttachment,   XmATTACH_FORM,
			   XmNrightAttachment,  XmATTACH_FORM,
			   XmNpacking,		XmPACK_COLUMN,
			   XmNnumColumns,	2,
			   NULL);

  label = XtVaCreateManagedWidget("fill_options", xmLabelWidgetClass,
				  frame,
				  XmNborderWidth,	0,
				  XmNchildType,		XmFRAME_TITLE_CHILD,
				  NULL);

  /* create toggles for the allowed affine transformations */
  fill_delete_w = XtVaCreateManagedWidget("delete", xmToggleButtonGadgetClass,
					  form1,
					  XmNindicatorOn,	True,
					  XmNindicatorType,	XmN_OF_MANY,
					  XmNvisibleWhenOff,	True,
					  XmNset,		False,
					  XmNsensitive,		True,
					  NULL);

  fill_flood_w = XtVaCreateManagedWidget("flood", xmToggleButtonGadgetClass,
					 form1,
					 XmNindicatorOn,	True,
					 XmNindicatorType,	XmN_OF_MANY,
					 XmNvisibleWhenOff,	True,
					 XmNset,		False,
					 XmNsensitive,		True,
					 NULL);

  XtManageChild( form1 );

  return( form );
}