view.C

Go to the documentation of this file.

/* Gxsm - Gnome X Scanning Microscopy
 * universal STM/AFM/SARLS/SPALEED/... controlling and
 * data analysis software
 * 
 * Copyright (C) 1999,2000,2001,2002,2003 Percy Zahl
 *
 * Authors: Percy Zahl <zahl@users.sf.net>
 * additional features: Andreas Klust <klust@users.sf.net>
 * WWW Home: http://gxsm.sf.net
 *
 * 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307, USA.
 */

/* -*- Mode: C++; indent-tabs-mode: nil; c-basic-offset: 8 c-style: "K&R" -*- */

#define XSHMIMG_MAXZOOM 10


#include <locale.h>
#include <libintl.h>

#include "view.h"
#include "mem2d.h"
#include "xsmmasks.h"
#include "glbvars.h"
#include "scan_event.h"

#include "bench.h"
#include "util.h"

#include "app_view.h"

//==================================================
// Posthandler
//==================================================


#define L_NULL    0
#define L_START   1
#define L_CHANGE  2
#define L_MOVE    3
#define L_END     4

#define QSIZE   5  // Size of Line-Handles (Squares)

//==================================================
// View Class
//==================================================

View::View(){
  XSM_DEBUG (DBG_L2, "View::View");
  scan=NULL;
  data=NULL;
  mem2d=NULL;

  trace=NULL;
  reset_trace();
  abs_move_tip(0.,0.);
}

View::View(Scan *sc, int ChNo){
  XSM_DEBUG (DBG_L2, "View::View(m2d)");
  scan  = sc;
  data  = &scan->data;
  //-  data  = scan->vdata;
  mem2d = scan->mem2d;
  ChanNo=ChNo;

  trace=NULL;
  reset_trace();
  abs_move_tip(scan->data.s.x0, scan->data.s.y0);
}

View::~View(){
  XSM_DEBUG (DBG_L2, "View::~View");
  hide();
}

void View::hide(){
  XSM_DEBUG (DBG_L2, "View::hide");
}

void View::update_mxyz_from_points (){
        /* plane with  ax +by +cz +d = 0 given by 3 points */
        double a, b, c, d;
        double x1, y1, z1, z2, x2, y2, z3, x3, y3;
        long i;
        int n_obj = scan->number_of_object ();
        
        Point2D p[3];
        
        // at least three...
        if (n_obj < 3) {
                scan->mem2d-> SetPlaneMxyz ();
                return;
        }

        // look for the three point objects 
        i=0;
        while (n_obj-- && i < 3){
                scan_object_data *obj_data = scan->get_object_data (n_obj);
                
                if (strncmp (obj_data->get_name (), "Point", 5) )
                        continue; // only points are used!
                
                if (obj_data->get_num_points () != 1) 
                        continue; // sth. is weired!

                // get real world coordinates of point
                double x,y;
                obj_data->get_xy_pixel (0, x, y); // get point 0 coordinates in pixels!!
                p[i].x = (int)x; p[i].y = (int)y;
                ++i;
        }               

        if(i != 3){
                scan->mem2d-> SetPlaneMxyz ();
                return;
        }

        /* PRODUCE IN-PLANE VECTORS */
        x3 = p[1].x;
        y3 = p[1].y;
        if (x3 < 0 || y3 < 0 || x3 > scan->mem2d->GetNx() || y3 > scan->mem2d->GetNy()) 
                return;
        z3 = scan->mem2d->GetDataPkt((int)(x3), (int)(y3));
        
        x1 = p[0].x-x3;
        y1 = p[0].y-y3;
        if (p[0].x < 0 || p[0].y < 0 || p[0].x > scan->mem2d->GetNx() || p[0].y > scan->mem2d->GetNy()) 
                return;
        z1 = (double)scan->mem2d->GetDataPkt((int)p[0].x, (int)p[0].y) - z3;
        
        x2 = p[2].x-x3;
        y2 = p[2].y-y3;
        if (p[0].x < 0 || p[0].y < 0 || p[2].x > scan->mem2d->GetNx() || p[2].y > scan->mem2d->GetNy()) 
                return;
        z2 = (double)scan->mem2d->GetDataPkt((int)p[2].x, (int)p[2].y) - z3;
        
        /* a,b,c follow from cross-produkt of 1 and 2 */
        a = y1*z2 - z1*y2;
        b = z1*x2 - x1*z2;
        c = x1*y2 - y1*x2;
        
        /* d follows from one special point, use POINT 3 */
        d = -(a*x3 + b*y3 + c*z3);
        
        d /= c;
        a /= c;
        b /= c;

        scan->mem2d-> SetPlaneMxyz (a,b,d);
}

int View::draw(int zoomoverride){
  XSM_DEBUG (DBG_L2, "View Base: draw !");
  return 0;
}

int View::update(int y1, int y2){
  XSM_DEBUG (DBG_L2, "View Base: update !");
  return 0;
}

void View::abs_move_tip(double xa, double ya, int mode){
        Trace_Data *td = new Trace_Data;
        current_td.x = xa;
        current_td.y = ya;
        current_td.mode = mode;
        current_td.t = clock () - trace_t0;
        memcpy (td, &current_td, sizeof (Trace_Data));
        add_to_trace (td);
        update_trace ();
}

void View::rel_move_tip(double dxa, double dya, int mode){
        current_td.x += dxa;
        current_td.y += dya;
        abs_move_tip(current_td.x, current_td.y, mode);
}

void View::update_position(Trace_Data *td){
        memcpy (&current_td, td, sizeof (Trace_Data));  
}

void View::save_trace(){
        g_slist_foreach((GSList*) trace, 
                        (GFunc) View::print_td, this);
}

void View::print_trace(){
        g_slist_foreach((GSList*) trace, 
                        (GFunc) View::print_td, this);
}

void View::add_to_trace(Trace_Data *td){
        g_slist_prepend (trace, td);
}

void View::print_td(Trace_Data *td, gpointer data){
        XSM_DEBUG(DBG_L1, "("
             << ((double)td->t/CLOCKS_PER_SEC) << ": " 
             << td->x << ", " 
             << td->y << ", " 
             << td->z << ", " 
             << td->v[0] << ", " 
             << td->mode
             << ")" );
}

void View::reset_trace(){
        if (trace){
                g_slist_foreach((GSList*) trace, 
                                (GFunc) View::delete_td, this);
                g_slist_free(trace);
                trace = NULL;
        }
        trace_t0 = clock ();
}


// ============================== Class Grey2D ==============================

Grey2D::Grey2D(Scan *sc, int ChNo):View(sc, ChNo){
  XSM_DEBUG (DBG_L2, "Grey2D::Grey2D");
  XImg = NULL;
  oMC=oZ=oQ=oXPMx=oXPMy=oVm=0;
  viewcontrol=NULL;
  userzoom = FALSE;
}

Grey2D::Grey2D():View(){
  oMC=oZ=oQ=oXPMx=oXPMy=oVm=0;
  XImg = NULL;
  viewcontrol=NULL;
  userzoom = FALSE;
}

Grey2D::~Grey2D(){
  XSM_DEBUG (DBG_L2, "Grey2D::~");
  hide();
}

void Grey2D::hide(){
  XSM_DEBUG (DBG_L2, "Grey2D::hide");
  if(viewcontrol)
    delete viewcontrol;
  viewcontrol=NULL;
  XImg=NULL;
}

int Grey2D::update(int y1, int y2){
        if (!XImg) 
                return 0;

        if (y2 < y1){
                if (ChanNo == gapp->xsm->ActiveChannel)
                        viewcontrol->SetActive (TRUE);
                else
                        viewcontrol->SetActive (FALSE);
                
                XImg->ShowPic (0,0);
                return 0;
        }
        int j,k;
        int nx;

        if ((y1%QuenchFac) == 0){
                nx=mem2d->GetNx ();
                for (j=y1; j<y2; j+=QuenchFac)
                        for (k=0; k<nx; k+=QuenchFac)
                                XImg->PutPixel ((unsigned long)(k/QuenchFac),(unsigned long)(j/QuenchFac),
                                               mem2d->GetDataVMode (k,j));
                
                XImg->ShowSubPic(0,y1/QuenchFac,nx/QuenchFac,(y2+QuenchFac-y1-1)/QuenchFac);
        }
        
        // Show Red Line ...
        --y2;
        if (y1 == y2){
                scan->Pkt2dScanLine[0].x = 0;
                scan->Pkt2dScanLine[0].y = y1;
                scan->Pkt2dScanLine[1].x = mem2d->GetNx () - 1;
                scan->Pkt2dScanLine[1].y = y1;
                viewcontrol -> CheckRedLine ();
        }
        return 0;
}

void Grey2D::add_object(int type, gpointer data){
        double *xy = (double*) data;
        scan -> realloc_pkt2d ((int)xy[0]);
        viewcontrol -> AddObject(
                new VObPolyLine (viewcontrol->GetCanvas(),
                                 xy, scan->Pkt2d,
                                 FALSE, VOBJ_COORD_ABSOLUT)
                );
}

void Grey2D::update_events(){
        if (viewcontrol) 
                viewcontrol->events_update (); 
}

void Grey2D::update_event_info(ScanEvent* se){
        viewcontrol->update_event_panel (se);
}



void Grey2D::ZoomIn(){
  if(QuenchFac>1)
    --QuenchFac;
  else
    ++ZoomFac;
  draw(TRUE);
}

void Grey2D::ZoomOut(){
  if(ZoomFac>1)
    --ZoomFac;
  else
    ++QuenchFac;
  draw(TRUE);
}

int Grey2D::SetZF(int zf, int qf, Grey2D *p){
  if(!zf){
    p->ZoomIn();
    return 0;
  }
  if(!qf){
    p->ZoomOut();
    return 0;
  }
  p->ZoomFac = zf;
  p->QuenchFac = qf;
  p->userzoom = TRUE;
  p->draw();
  return 0;
}

void Grey2D::setup_data_transformation(){
        if(gapp->xsm->ZoomFlg & VIEW_COLOR)
                MaxColor = 1024;
        else
                MaxColor = 64;
        
        update_mxyz_from_points ();
        mem2d->SetDataPktMode (data->display.ViewFlg);
        mem2d->SetDataRange (0, MaxColor-1);
}


int Grey2D::draw(int zoomoverride){
  int nx,ny;
  gchar *titel=NULL;
  
  int NewFlg=0;

  if(!mem2d) { 
    XSM_DEBUG (DBG_L2, "Grey2D: no mem2d !"); 
    return 1; 
  }

  nx=mem2d->GetNx();
  ny=mem2d->GetNy();

  XSM_DEBUG (DBG_L2, "NX: " << nx << " NY: " << ny);
  if(nx<1 || ny<1) return 1;

  if(!zoomoverride && !userzoom){
    ZoomFac = 1;
    QuenchFac = 1;
    if(gapp->xsm->ZoomFlg & VIEW_ZOOM){
      if(gapp->xsm->ZoomFlg & VIEW_Z400)
        ZoomFac   = 400/nx;
      if(gapp->xsm->ZoomFlg & VIEW_Z600)
        ZoomFac   = 600/nx;
      QuenchFac = nx/400;
      
      if(ZoomFac   < 1 )
        ZoomFac = 1;
      if(ZoomFac > XSHMIMG_MAXZOOM )
        ZoomFac = XSHMIMG_MAXZOOM;
      if(QuenchFac < 1 )
        QuenchFac = 1;
    }
  }
  XSM_DEBUG (DBG_L2, "Grey2D::draw ZoomFac: " << ZoomFac << " QuenchFac: " << QuenchFac);
  
  // hier war das Problem....
  XPM_x = nx*ZoomFac/QuenchFac + (QuenchFac > 1 ? 1:0);
  XPM_y = ny*ZoomFac/QuenchFac + (QuenchFac > 1 ? 1:0);

  if(oXPMx != XPM_x || oXPMy != XPM_y || oQ != QuenchFac || oZ != ZoomFac 
     || oMC != MaxColor || (oVm & VIEW_INFO) != (gapp->xsm->ZoomFlg & VIEW_INFO) ){
    if(!zoomoverride){
      oXPMx=XPM_x;
      oXPMy=XPM_y;
    }
    oZ=ZoomFac;
    oQ=QuenchFac;
    oMC=MaxColor;
    oVm=gapp->xsm->ZoomFlg;
    NewFlg  = 1;
  }

  titel = g_strdup_printf("Ch%d:%d%s %s Q%d/%d %s", 
                          ChanNo+1, mem2d->GetLayer()+1,
                          strcmp(data->ui.originalname, "unknown (not saved)") == 0 ? " *NOT-SAVED* :" : ":",
                          data->ui.name,ZoomFac,QuenchFac, mem2d->GetEname());

  if(NewFlg){ // neue Größe ?
    XSM_DEBUG (DBG_L2, "Grey2D::draw ResizeVC");
    if(viewcontrol)
      viewcontrol->Resize(titel, XPM_x , XPM_y, ChanNo, scan, ZoomFac, QuenchFac);
    NewFlg=0;
  }

  if(!viewcontrol){
    XSM_DEBUG (DBG_L2, "Grey2D::draw NewVC");
    viewcontrol =  new ViewControl(titel, XPM_x , XPM_y, ChanNo, scan, ZoomFac, QuenchFac);
    viewcontrol->SetZoomQFkt(SetZF, this);
    viewcontrol->show();
    XImg = viewcontrol->GetXImg();
  }

  if(ChanNo == gapp->xsm->ActiveChannel)
    viewcontrol->SetActive(TRUE);
  else
    viewcontrol->SetActive(FALSE);

  if(gapp->xsm->ZoomFlg & VIEW_PALETTE)
    XImg->MkPalette(xsmres.Palette);
  else
    XImg->MkPalette();
    
  MaxColor=XImg->GetMaxCol();

//  XSM_DEBUG (DBG_L2, "Grey2D::draw update 0..ny=" << ny << " MaxCol=" << MaxColor);
  BenchStart(vbm,"View Update All",nx*ny);
  update(0, ny);
  BenchStop(vbm);

  viewcontrol->SetTitle(titel);  
  g_free(titel);

  XSM_DEBUG (DBG_L5,"Grey2D::draw ret");

  return 0;
}

void Grey2D::show_tip(){
}

void Grey2D::hide_tip(){
}


void Grey2D::show_trace(){
        update_trace();
}

void Grey2D::hide_trace(){
        viewcontrol->remove_trace ();
}

void Grey2D::update_trace(){
//      viewcontrol->update_trace (double *xy, int len);
}

void Grey2D::remove_events(){
        if (viewcontrol){
                viewcontrol->RemoveEventObjects ();
                scan->mem2d->RemoveScanEvents ();
        }
}

---