tlbaseDisp_tool.c

Go to the documentation of this file.

/**********
 * 
 * Copyright (c) 2003, Division of Imaging Science and Biomedical Engineering,
 * University of Manchester, UK.  All rights reserved.
 * 
 * Redistribution and use in source and binary forms, with or without modification, 
 * are permitted provided that the following conditions are met:
 * 
 *   . Redistributions of source code must retain the above copyright notice, 
 *     this list of conditions and the following disclaimer.
 *    
 *   . 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.
 * 
 *   . Neither the name of the University of Manchester 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.
 *
 **********
 * 
 * Program :    TINA
 * File    :  $Source: /home/tina/cvs/tina-tools/tinatool/tlbase/tlbaseDisp_tool.c,v $
 * Date    :  $Date: 2008/12/02 22:04:19 $
 * Version :  $Revision: 1.6 $
 * CVS Id  :  $Id: tlbaseDisp_tool.c,v 1.6 2008/12/02 22:04:19 paul Exp $
 *
 * Author  :  Legacy TINA
 *
 * Notes : Tv Tool creation function and associated tv_screen procs (for XView & Motif).
 *
 *********
*/

#include "tlbaseDisp_tool.h"

#if HAVE_CONFIG_H
#    include <config.h>
#endif

#include <stdio.h>
#include <math.h>
#include <tina/sys/sysDef.h>
#include <tina/sys/sysPro.h>
#include <tina/math/mathDef.h>
#include <tina/math/mathPro.h>
#include <tinatool/draw/drawDef.h>
#include <tinatool/draw/drawPro.h>
#include <tinatool/wdgts/wdgtsDef.h>
#include <tinatool/wdgts/wdgtsPro.h>
#include <tinatool/gphx/gphxDef.h>
#include <tinatool/gphx/gphxPro.h>


#define simple_pair_make(p1, p2) pair_make((void*) p1, 0, (void*) p2, 0)
#define ERASE_TV 3

static void button_repaint_proc(void *tv_screen)
{
  Tv *tv;

  if (tv_screen == NULL)
    return;

  tv = tv_screen_tv_get(tv_screen);

  if (tv == NULL)
    return;
  tv_free_background(tv);
  tv_repaint(tv);
}

static void size_proc(Pair * pair)
{
  int size = (int) pair->to1;
  void *tv_screen = (void *) pair->to2;

  if (tv_screen == NULL)
    return;

  tv_screen_set_size(tv_screen, size, size);
}

static void activity_proc(Pair * pair)
{
  int activity = (int) pair->to1;
  void *tv_screen = (void *) pair->to2;

  if (tv_screen == NULL)
    return;
  (void) tv_set_activity(tv_screen_tv_get(tv_screen), activity);
}

static void proj_proc(Pair * pair)
{
  int proj = (int) pair->to1;
  void *tv_screen = (void *) pair->to2;
  Tv *tv;

  if (tv_screen == NULL)
    return;

  tv = tv_screen_tv_get(tv_screen);

  if (tv == NULL)
    return;

  tv_set_proj3(tv, proj);
  tv_repaint(tv);
}

static void paint_proc(Pair * pair)
{
  int mode = (int) pair->to1;
  void *tv_screen = (void *) pair->to2;
  Tv *tv;

  if (tv_screen == NULL)
    return;

  tv = tv_screen_tv_get(tv_screen);

  if (tv == NULL)
    return;

  if (mode == ERASE_TV)
    tv_erase(tv);
  else
    tv_set_paint_mode(tv, mode);

  if (mode == FULL_PAINT)
    tv_repaint(tv);
}

/*
 * Button procedures are applied to current tv_screen: Since a button
 * * has been hit, a tv_screen window has been entered and the current
 * * tv_screen has been set. 
 */

static void install_proc(Pair * pair)
{
  Tv *tv;
  int *label = (void *) pair->to1;
  void *tv_screen = (void *) pair->to2;
  void tw_label_reset();
  void tw_tool_title_reset();

  if (tv_screen == NULL)
    return;

  tv_install(tv_get_next(), tv_screen);
  tv = tv_screen_tv_get(tv_screen);
  tv_message_function_set(tv, tw_label_reset, (void *) *label);
}

static void clone_proc(Pair * pair)
{
  Tv *tv;
  int *label = (void *) pair->to1;
  void *tv_screen = (void *) pair->to2;
  void tw_label_reset();
  void tw_tool_title_reset();

  if (tv_screen == NULL)
    return;
  tv_install_clone(tv_get_next(), tv_screen);
  tv = tv_screen_tv_get(tv_screen);
  tv_message_function_set(tv, tw_label_reset, (void *) *label);
}

static void init_proc(void *tv_screen)
{
  if (tv_screen == NULL || tv_screen_tv_get(tv_screen) == NULL)
    return;
  tv_init(tv_screen_tv_get(tv_screen));
}

static void invert_2d_proc(void *tv_screen)
{
  Tv *tv = tv_screen_tv_get(tv_screen);

  if (tv == NULL)
    return;
  tv_rot2(tv, PI);
  tv_free_background(tv);
  tv_repaint(tv);
}

static void invert_3d_proc(void *tv_screen)
{
  Tv *tv = tv_screen_tv_get(tv_screen);

  if (tv == NULL)
    return;
  tv_rot3(tv, PI);
  tv->axis = vec3_minus(tv->axis);
  tv_free_background(tv);
  tv_repaint(tv);
}

void *tv_tool_remote(int x, int y, char *display_name)
{
  char name[64];
  int canvas;
  int owner;
  int *label = ralloc(sizeof(int));
  static int no = 0;
  void canvas_upgrade();
  void *tv_screen = tv_screen_struct_create();

  ++no;                         /*
                                 * a new tool name number 
                                 */

  (void) sprintf(name, "Tv Tool %d", no);

  owner = (int) tw_tool_remote(name, x, y, display_name);

  tw_menubar("",
             "Size",
             "256", size_proc, simple_pair_make(256, tv_screen),
             "512", size_proc, simple_pair_make(512, tv_screen),
             "768", size_proc, simple_pair_make(768, tv_screen),
             NULL,
             "Mouse",
             "null", activity_proc, simple_pair_make(NULL, tv_screen),
             "zoom", activity_proc, simple_pair_make(ZOOM, tv_screen),
             "pick", activity_proc, simple_pair_make(PICK, tv_screen),
             "mouse", activity_proc, simple_pair_make(MOUSE, tv_screen),
             NULL,
             "ROI",
             "rect", activity_proc, simple_pair_make(ROI, tv_screen),
             "poly", activity_proc, simple_pair_make(POLYROI, tv_screen),
             "point", activity_proc, simple_pair_make(POINT, tv_screen),
             "global", activity_proc, simple_pair_make(GLOBAL, tv_screen),
             NULL,
             "Proj",
             "orth", proj_proc, simple_pair_make(ORTH, tv_screen),
             "persp", proj_proc, simple_pair_make(PERSP, tv_screen),
             "invert 2D", invert_2d_proc, tv_screen,
             "invert 3D", invert_3d_proc, tv_screen,
             NULL,
             NULL);

  tw_newrow();
  tw_button("install", install_proc, (void *) simple_pair_make((void *) label, tv_screen));
  tw_button(" clone ", clone_proc, (void *) simple_pair_make((void *) label, tv_screen));
  tw_button(" init  ", init_proc, (void *) tv_screen);
  tw_button("repaint", button_repaint_proc, (void *) tv_screen);

  tw_newrow();
  *label = (int) tw_label("null");

  tw_newrow();
  canvas = (int) tw_canvas(256, 256);   /*
                                         * Returns XV Canvas NOT paint
                                         * * window 
                                         */

  tw_end_tool();

  canvas_upgrade(canvas, owner, tv_screen);     /*
                                                 * sets window, screen &
                                                 * * visual 
                                                 */

  tv_screen_set_size(tv_screen, 256, 256);
  return (tv_screen);
}

void *tv_tool(int x, int y)
{
  return tv_tool_remote(x, y, (char *) NULL);
}

---