_palm.C

Ir a la documentación de este archivo.

//===========================================================================
//= _palm.C                                                   Enero de 2004 =
//=-------------------------------------------------------------------------=
//= Definicion de elementos GUI especificos a la plataforma PALM.           =
//=-------------------------------------------------------------------------=
//= ADVERTENCIA: ESTE SOFTWARE NO ESTA CONCEBIDO NI DISENNADO PARA EL USO   =
//= EN EQUIPO DE CONTROL EN LINEA EN ENTORNOS PELIGROSOS QUE REQUIERAN UN   =
//= DESEMPENNO LIBRE DE FALLAS, COMO LA OPERACION DE PLANTAS NUCLEARES,     = 
//= SISTEMAS DE NAVEGACION O COMUNICACION EN AVIONES, TRAFICO AEREO,        =
//= EQUIPO MEDICO DEL CUAL DEPENDAN VIDAS HUMANAS O SISTEMAS DE ARMAMENTO,  =
//= EN LOS CUALES UNA FALLA EN EL SOFTWARE PUEDA IMPLICAR DIRECTAMENTE LA   =
//= MUERTE, DANNOS PERSONALES O DANNOS FISICOS Y/O AMBIENTALES GRAVES       =
//= ("ACTIVIDADES DE ALGO RIESGO").                                         =
//=-------------------------------------------------------------------------=
//= Autor original: Oscar J. Chavarro G.  A.K.A. JEDILINK. Copyright (c),   =
//= 1997 - 2004, oscarchavarro@hotmail.com                                  =
//= AQUYNZA es software libre, y se rige bajo los terminos de la licencia   =
//= LGPL de GNU (http://www.gnu.org). Para mayor informacion respecto a la  =
//= licencia de uso, consulte el archivo ./doc/LICENCIA en la distribucion. =
//===========================================================================

#include "framework/gui/_palm.h"

//===========================================================================
//= Chequeo de activacion de esta interfaz                                  =
//===========================================================================

#if PLATAFORMA != PALM_PALMOS_CODEWARRIOR

JED_GUI_CLASE_NULA(JED_PALM_INTERFACE, "JED_PALM_INTERFACE",
    "PALM", "palm", "(PLATAFORMA == PALM_PALMOS_*)");

#endif

#if PLATAFORMA == PALM_PALMOS_CODEWARRIOR

#include <stdarg.h>
#include <string.h>

//===========================================================================

#define CONSTRUIR_EVENTO_MOUSE()                                \
    EVNT_EVENTO_GUI->mouse_old_x = EVNT_EVENTO_GUI->mouse_x;    \
    EVNT_EVENTO_GUI->mouse_old_y = EVNT_EVENTO_GUI->mouse_y;    \
    EVNT_EVENTO_GUI->mouse_x = evento->screenX;                 \
    EVNT_EVENTO_GUI->mouse_y = evento->screenY;                 \
    EVNT_EVENTO_GUI->mouse_delta_x=                             \
        evento->screenX-EVNT_EVENTO_GUI->mouse_old_x;           \
    EVNT_EVENTO_GUI->mouse_delta_y=                             \
        evento->screenY-EVNT_EVENTO_GUI->mouse_old_y;

#define LINEAS_EN_CONSOLA 15

//===========================================================================

static int PALM_procesar_mouse_nulo(EVENTO_GUI *e, int context_id);
static int PALM_procesar_teclado_nulo(EVENTO_GUI *e, int context_id);
static Boolean PALM_procesar_eventos_nulo(EventPtr event);

//===========================================================================

static int (*PALM_keyboard_callback)(EVENTO_GUI *e, int) =
    PALM_procesar_teclado_nulo;

static int (*PALM_mouse_callback)(EVENTO_GUI *e, int context_id) =
    PALM_procesar_mouse_nulo;

static EVENTO_GUI EVENTO_palm;   // Esto es para que funcione EVNT_EVENTO_GUI

static char *BUFFER_consola[LINEAS_EN_CONSOLA] = {
    NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, 
    NULL, NULL, NULL, NULL, NULL
};

//===========================================================================
//= Funciones utilitarias                                                   =
//===========================================================================

static int
PALM_procesar_mouse_nulo(EVENTO_GUI *e, int context_id)
{
    return 0;
}
static int
PALM_procesar_teclado_nulo(EVENTO_GUI *e, int context_id)
{
    return 0;
}

static Boolean
PALM_procesar_eventos_nulo(EventPtr event)
{
    return false;
}

static void
liberar_buffer_consola(void)
{
    int i;

    for ( i = 0; i < LINEAS_EN_CONSOLA; i++ ) {
        if ( BUFFER_consola[i] ) delete BUFFER_consola[i];
    }
}

int
jprintf(char *cadena_de_formato, ...)
{
    //-----------------------------------------------------------------
    RectangleType rect;

    rect.topLeft.x = 0;
    rect.topLeft.y = 0;
    WinGetWindowExtent(&rect.extent.x, &rect.extent.y);

    // Modificar el area de la ventana para dejar espacio a elementos extra
    rect.extent.y -= 13;

    //-----------------------------------------------------------------
    int margen_x = rect.topLeft.x + 5;
    int min_y = rect.topLeft.y + 3;
    int max_y = rect.topLeft.y + rect.extent.y - 5;

    //-----------------------------------------------------------------
    char cad[256];

    va_list lista_de_argumentos;

    va_start(lista_de_argumentos, cadena_de_formato);
    StrPrintF(cad, cadena_de_formato, lista_de_argumentos);

    strcpy(cad, cadena_de_formato); // OJO: Esto no!

    va_end(lista_de_argumentos);

    //-----------------------------------------------------------------
    static int ultima_linea = 0;
    int i;

    if ( BUFFER_consola[ultima_linea] ) {
        delete BUFFER_consola[ultima_linea];
    }
    BUFFER_consola[ultima_linea] = new char[strlen(cad) + 1];
    strcpy(BUFFER_consola[ultima_linea], cad);

    ultima_linea++;
    if ( ultima_linea >= LINEAS_EN_CONSOLA ) {
        delete BUFFER_consola[0];
        for ( i = 0; i < LINEAS_EN_CONSOLA-1; i++ ) {
            BUFFER_consola[i] = BUFFER_consola[i+1];
        }
        ultima_linea = LINEAS_EN_CONSOLA-1;
        BUFFER_consola[ultima_linea] = NULL;
    }
    
    //-----------------------------------------------------------------
    int y;

    for ( i = 0, y = min_y; i < LINEAS_EN_CONSOLA && BUFFER_consola[i]; 
          i++, y += 10 ) {
        if ( y > max_y - 4 ) {
            y = min_y;
        }
        WinDrawChars(BUFFER_consola[i], strlen(BUFFER_consola[i]), 
                     margen_x, y);
    }

    return 0;
}

//===========================================================================
//= Clase JED_PALM_INTERFACE                                                =
//===========================================================================

JED_PALM_INTERFACE::JED_PALM_INTERFACE()
{
    EVNT_EVENTO_GUI = &EVENTO_palm;
    quiero_salir = FALSE;
    handler = PALM_procesar_eventos_nulo;
}

JED_PALM_INTERFACE::~JED_PALM_INTERFACE()
{

}

void
JED_PALM_INTERFACE::set_palm_callback(Boolean (*h)(EventPtr event))
{
    handler = h;
}

void
JED_PALM_INTERFACE::set_mouse_callback( 
    int (*p)(EVENTO_GUI *e, int context_id) )
{
    PALM_mouse_callback = p;
}

void
JED_PALM_INTERFACE::set_keyboard_callback( 
    int (*p)(EVENTO_GUI *e, int context_id) )
{
    PALM_keyboard_callback = p;
}

Boolean
JED_PALM_INTERFACE::procesar_evento_palm(EventPtr evento)
{
    switch ( evento->eType ) {
      case penUpEvent:
        CONSTRUIR_EVENTO_MOUSE()
        EVNT_EVENTO_GUI->tipo_de_evento = ETYPE_BUTTON_UP;
        return PALM_mouse_callback(EVNT_EVENTO_GUI, 1);
      case penMoveEvent:
        CONSTRUIR_EVENTO_MOUSE()
        EVNT_EVENTO_GUI->tipo_de_evento = ETYPE_MOUSE_MOVE;
        return PALM_mouse_callback(EVNT_EVENTO_GUI, 1);
      case penDownEvent:
        CONSTRUIR_EVENTO_MOUSE()
        EVNT_EVENTO_GUI->tipo_de_evento = ETYPE_BUTTON_DOWN;
        return PALM_mouse_callback(EVNT_EVENTO_GUI, 1);
      case keyDownEvent:
        Palm2JEDkeycode(EVNT_EVENTO_GUI, evento);
        return PALM_keyboard_callback(EVNT_EVENTO_GUI, 1);
      default:
        break;
    }
    return 0;
}

void
JED_PALM_INTERFACE::ejecutar(void)
{
    EventType event;
    UInt16 error;

    // Esto no esta funcionando... o hay algo que aprenderle!
    KeySetMask(keyBitsAll);
        
    do{
        EvtGetEvent(&event, evtWaitForever);

        if ( !SysHandleEvent (&event) ) {
            // check if it is a menu event 
            if ( !MenuHandleEvent(0, &event, &error) ) {
                // if not let the application handle it 
                if ( !handler(&event) ) {
                    // otherwise put it back into the queue
                    FrmDispatchEvent(&event); 
                }
            }
        }
    } while ( event.eType != appStopEvent && !quiero_salir );

    FrmCloseAllForms();
    liberar_buffer_consola();
}

void
JED_PALM_INTERFACE::finalizar(void)
{
    quiero_salir = TRUE;
}

BOOLEAN
JED_PALM_INTERFACE::crear(int *Argc, char *argv[],
                          int x_tam, int y_tam, char *nombre)
{
    return TRUE;
}

void
JED_PALM_INTERFACE::solicitar_repintado(void)
{
    ;
}

void
JED_PALM_INTERFACE::set_draw_callback( void (*p)(int) )
{
    ;
}

void
JED_PALM_INTERFACE::set_tick_callback( int (*p)(int context_id) )
{
    ;
}

void
JED_PALM_INTERFACE::set_ejecutor( int (*p)(int idc, int context_id) )
{
    ;
}

void
JED_PALM_INTERFACE::set_resize_callback(
    void (*p)(int x_tam, int y_tam, int context_id) )
{
    ;
}

void
JED_PALM_INTERFACE::set_multiview_callback
    ( void (*p)(int operacion, int id_vista, char *detalles,
                char *menu, char *botonera) )
{
    ;
}

BOOLEAN
JED_PALM_INTERFACE::anexar_controles(LISTA <CONTROL_GUI *> *Controles, 
                     REPOSITORIO_DE_ENTIDADES *Repositorio)
{
    return FALSE;
}

#endif // PLATAFORMA == PALM_PALMOS_CODEWARRIOR

//===========================================================================
//= EOF                                                                     =
//===========================================================================

---

Este archivo HTML ha sido generado automáticamente a partir del código fuente AQUYNZA. NO LO EDITE. Para mayor información contacte al autor.