drv.c

Vá para a documentação deste arquivo.

/*
** ---------------------------------------------------------------
** drv.c - Driver of second assignment of course CIV 2801 - 2004.2
**
** ---------------------------------------------------------------
**
** Project:
**    CIV 2801 - Fundamentos de Computacao Grafica Aplicada - 2004.2
**    Semester Projects.
**    See documentation on class notes.
**
** ---------------------------------------------------------------
*/

/*
** ---------------------------------------------------------------
** Global variables and definitions:
*/
#include <stdlib.h>
#include <stdio.h>
#include <string.h>

#include "iup.h"
#include "iupkey.h"
#include "cd.h"
#include "wd.h"

#include "prj.h"
#include "crs.h"

/*
** ---------------------------------------------------------------
** Local variables and definitions:
*/

static Ihandle *Omain;

static Ihandle *Otopmsg;

static char file_name[256];

static int dsp_load = 1;

#define ButtonPressed  1

#define ButtonReleased  0


/*
** ---------------------------------------------------------------
** Local auxiliary functions:
*/

/* ======================  drvOpenFile  ======================= */

static FILE *drvOpenFile( char *mode )
{
 FILE    *fd;         /* file descriptor */
 Ihandle *dlg;        /* Ponteiro para o dialogo criado  */
 int     status;      /* return status of dialog to get file name */

 strcpy( file_name, "*.*" );

/* Create a file open dialog.
 */
 dlg = IupFileDlg( );
 if( strcmp( mode, "r" ) == 0 )
 {
  IupSetAttribute( dlg, IUP_DIALOGTYPE, "OPEN" );
 }
 else
 {
  IupSetAttribute( dlg, IUP_DIALOGTYPE, "SAVE" );
 }
 IupSetAttribute( dlg, IUP_TITLE, "Trab3 get file name dialog" );
 IupSetAttribute( dlg, IUP_FILTER, "*.*" );
 IupSetAttribute( dlg, IUP_FILE, file_name );

/* Display file open dialog and get file name.
 */
 IupPopup( dlg, IUP_ANYWHERE, IUP_ANYWHERE );
 status = IupGetInt( dlg, IUP_STATUS );
 if( status >= 0 )
 {
  strcpy( file_name, IupGetAttribute( dlg, IUP_VALUE ) );
 }
 else
 {
  return( NULL );
 }

/* Open file.
 */
 fd = fopen( file_name, mode );
 if( fd == NULL )
 {
  IupMessage( " Mensagem de Erro ",
              "\n Nao foi possivel abrir arquivo! \n" );
  return( NULL );
 }

 return( fd );
}


/*
** ---------------------------------------------------------------
** Local callback functions:
*/
static int drvResize( Ihandle *cv, int width, int height );
static int drvRedisplay( Ihandle *cv );
static int drvMouseBt( Ihandle *cv, int b, int mode,
                       int x, int y, char *mousecfg );
static int drvMouseMv( Ihandle *cv, int x, int y, char *mousecfg );
static int drvKeyCrtl( Ihandle *dg, int key );


/* ========================  drvResize  ======================= */

static int drvResize( Ihandle *cv, int width, int height )
{
 prjResize( width, height );
 return( IUP_DEFAULT );
}

/* ======================  drvRedisplay  ====================== */

static int drvRedisplay( Ihandle *cv )
{
 if( prjChkEmptyModel( ) )  /* In case model is empty, display help message */
 {
  prjHelp( );
  IupSetAttribute( Otopmsg, IUP_TITLE,
                   " Os comandos abaixo podem ser acionados"
                   " de acordo com as teclas indicadas. " );
 }
 else /* Otherwise, resdiplay model and clear top message. */
 {
  prjRedisplay( );
  IupSetAttribute( Otopmsg, IUP_TITLE, " " );
 }
 return( IUP_DEFAULT );
}

/* ========================  drvMouseBt  ====================== */

static int drvMouseBt( Ihandle *cv, int b, int mode,
                       int x, int y, char *mousecfg )
{
 double xw, yw;   /* mouse position in world coordinates */
 int    status;

/* Reject point if hit canvas is not the data screen.
 */
 if( cv != Odatascreen )
  return( IUP_DEFAULT );

/* In case model is empty, do nothing.
 */
 if( prjChkEmptyModel( ) )
  return( IUP_DEFAULT );

/* Disregard button release event.
 */
 if( mode == ButtonReleased )
  return( IUP_DEFAULT );

/* Translate point from device (raster) coordinates to 
 * world coordinates.
 */
 cdCanvas2Raster( &x, &y );
 wdCanvas2World( x, y, &xw, &yw );

/* Check to see whether mouse location is close to a node
 * of the current model and, if that is the case, process
 * the equilibrium of this node.
 */
 status = prjProcessNode( xw, yw );
 switch( status )
 {
  default:
  case CRS_SUCCESS:
  case CRS_NO_MODEL_DEFINED:
   IupSetAttribute( Otopmsg, IUP_TITLE, " " );
   break;
  case CRS_NO_STEP_TO_GO:
   IupSetAttribute( Otopmsg, IUP_TITLE, 
                             " Este no' ja' esta' equilibrado." );
   break;
  case CRS_FAILURE:
   IupSetAttribute( Otopmsg, IUP_TITLE, 
                             " Nenhum no' foi encontrado nesta posicao." );
   break;
  case CRS_FIXED_NODE:
   IupSetAttribute( Otopmsg, IUP_TITLE, 
                             " Este no' tem a rotacao fixa." );
   break;
 }

 return( IUP_DEFAULT );
}

/* ========================  drvMouseMv  ====================== */

static int drvMouseMv( Ihandle *cv, int x, int y, char *mousecfg )
{
 return( IUP_DEFAULT );
}

/* =======================  drvKeyCrtl  ======================= */

static int drvKeyCrtl( Ihandle *dg, int key )
{
 FILE *fd;       /* pointer to file descriptor */

/* Clear top message in the general case.
 */
 IupSetAttribute( Otopmsg, IUP_TITLE, " " );

/* Take the appropriate action according to the pressed key.
 */
 switch( key )
 {
  case K_h:           /* h */
  case K_H:           /* H */
   IupSetAttribute( Otopmsg, IUP_TITLE,
                    " Os comandos abaixo podem ser acionados"
                    " de acordo com as teclas indicadas. " );
   prjHelp( );
   break;

  case K_cQ:          /* Ctrl+q */
   prjQuit( );
   return( IUP_CLOSE );

  case K_cI:          /* Ctrl+i */
   prjInfo( );
   break;

  case K_cN:          /* Ctrl+n */
   prjNew( );
   break;

  case K_cO:          /* Ctrl+o */
   if( (fd = drvOpenFile( "r" )) != NULL )
   {
    if( ! prjOpenModel( fd ) )
    {
     IupMessage( " Mensagem de Erro ",
                 "\n Erro nos dados do arquivo lido!\n" );
    }
    fclose( fd );
   }
   break;

  case K_cS:          /* Ctrl+s */
   if( (fd = drvOpenFile( "w" )) != NULL )
   {
    prjSaveResults( fd );
    fclose( fd );
   }
   break;

  case K_i:           /* i */
  case K_I:           /* I */
   prjProcessInit( );
   break;

  case K_s:           /* s */
  case K_S:           /* S */
   if( prjProcessStep( ) == CRS_NO_STEP_TO_GO )
    IupSetAttribute( Otopmsg, IUP_TITLE, 
                              " Todos os nos ja' estao equilibrados." );
   break;

  case K_g:           /* g */
  case K_G:           /* G */
   if( prjProcessGoThru( ) == CRS_NO_STEP_TO_GO )
    IupSetAttribute( Otopmsg, IUP_TITLE, 
                              " Todos os nos ja' estao equilibrados." );
   break;

  case K_l:           /* l */
  case K_L:           /* L */
   if( dsp_load )
    dsp_load = 0;
   else
    dsp_load = 1;
   prjLoadDisplay( dsp_load );
   break;

  case K_cP:          /* Ctrl+p */
   prjPrint( );
   break;

  case K_cC:          /* Ctrl+c */
   prjClipboard( );
   break;

  case K_f:           /* f */
  case K_F:           /* F */
   prjFit( );
   break;

  case K_plus:        /* + */
   prjZoomIn( );
   break;

  case K_minus:       /* - */
   prjZoomOut( );
   break;

  case K_LEFT:        /* arrow left */
   prjPanLeft( );
   break;

  case K_RIGHT:       /* arrow right */
   prjPanRight( );
   break;

  case K_DOWN:        /* arrow down */
   prjPanDown( );
   break;

  case K_UP:          /* arrow up */
   prjPanUp( );
   break;

  default:           /* any other key: redisplay */
   drvRedisplay( Odatascreen );
   break;
 }

 return( IUP_DEFAULT );
}


/*
** ---------------------------------------------------------------
** Main driver:
*/

/* --------------------------------------------------------------- */
int main( int argc, char* argv[] )
{
 static char msg_alarm[512];
 char *msg_error;

 IupOpen( );

 msg_error = IupLoad( "trab3.led" );
 if( msg_error )
 {
  sprintf( msg_alarm, "\n%s\n", msg_error );
  IupAlarm( "Erro no arquivo trab3.led!", msg_alarm, " OK ", NULL, NULL );
  IupClose( );
  exit( 1 );
 }

/* Get handle to interface objects.
 */
 Omain           = IupGetHandle( "main" );
 Otopmsg         = IupGetHandle( "topmsg" );
 Odatascreen     = IupGetHandle( "datascreen" );

/* Realize user interface dialog.
 */
 IupMap( Omain );

/* Register callback functions associated with each action.
 */
 IupSetFunction( "drvResize",        (Icallback)drvResize );
 IupSetFunction( "drvRedisplay",     (Icallback)drvRedisplay );
 IupSetFunction( "drvMouseBt",       (Icallback)drvMouseBt );
 IupSetFunction( "drvMouseMv",       (Icallback)drvMouseMv );
 IupSetFunction( "drvKeyCrtl",       (Icallback)drvKeyCrtl );

/* Initialize project.
 */
 prjInit( );

/* Exhibit user interface dialog.
 */
 IupShowXY( Omain, IUP_CENTER, IUP_CENTER );

/* Pass control to user-interface system.
 */
 IupMainLoop( );

 IupClose( );

 return( 0 );
}

---