jed_gui.C

Ir a la documentación de este archivo.

//===========================================================================
//= jed_gui.cc                                              Octubre de 1998 =
//=-------------------------------------------------------------------------=
//= Definiciones de la interface JED_INTERFACE                              =
//=-------------------------------------------------------------------------=
//= 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 - 2003, 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 "jed_defs.h"
#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include "framework/gui/jed_gui.h"
#include "toolkits/util/parsero.h"
#include "lista.cc"

#define ESPERO(tipo, msg) \
    if ( tipo_token != (tipo) ) { \
        fprintf(stderr,"<JED_INTERFACE> ERROR: Esperaba %s y recibi [%s].\n", \
          (msg), cad); fflush(stderr);  return FALSE; \
    }

#define ESPERO_KTE(tipo, msg) \
    if ( tipo_token != (tipo) ) { \
        return; \
    }

#define CARGAR_CADENAV(destino, origen)\
    if ( (destino) ) delete (destino);\
    des_comille((origen));\
    (destino) = new char[strlen((origen))+1];\
    if ( !(destino) ) {\
        fprintf(stderr, "<GUI_COMANDO>-ERROR: No hay memoria para una cadenita!");\
        fflush(stderr);\
        return;\
    }\
    strcpy((destino), (origen));

//===========================================================================
//= CLASE GUI_CONSTANTE_ENTERA                                                     =
//===========================================================================

void
GUI_CONSTANTE_ENTERA::leer(TOKENIZADOR *Sabiondo)
{
    char cad[1000];
    int tipo_token = TK_DESCONOCIDO;

    nombre = NULL;
    valor = 666;

    tipo_token = Sabiondo->siguiente_token(cad);
    ESPERO_KTE(TK_IDENTIFICADOR, "un identificador de constante");
    CARGAR_CADENAV(nombre, cad);
    tipo_token = Sabiondo->siguiente_token(cad);
    ESPERO_KTE(TK_NUMERO, "un numero");
    valor = atoi(cad);

    //printf("  - %s = %d.\n", nombre, valor);
}

void
GUI_CONSTANTE_ENTERA::imprimir(void)
{
   printf(" - %s = %d\n", nombre, valor);
}

//===========================================================================
//= CLASE JED_INTERFACE                                                     =
//===========================================================================

JED_INTERFACE::~JED_INTERFACE()
{
    ;
}

BOOLEAN
JED_INTERFACE::leer_gui(char *archivo)
{
    PARSERO preprocesador;
    LISTA<char *> *Bloque_de_datos;
    TOKENIZADOR sabiondo;
    char cad[1000];
    int status, tipo_token, i;
    GUI_COMANDO *Comando;
    GUI_CONSTANTE_ENTERA *Idc;
    GUI_MENU *Menu;
    GUI_BOTONERA *Botonera;

    if ( !preprocesador.init(archivo) ) return FALSE;

    //printf("<JED_INTERFACE> Leo la interface de \"%s\"...\n", archivo);
    //fflush(stdout);

    do {
        //- Llamar al preprocesador y tener en cuenta su estado -------------
        status = preprocesador.siguiente_segmento(&Bloque_de_datos);
        if ( status < 0 ) {
            fprintf(stderr, "<JED_INTERFACE> - ERROR DE SINTAXIS!\n");
            fflush(stderr);
            break;
        }
        if ( status == 0 ) break;

        //- Procesar las lineas del archivo GUI -----------------------------
        sabiondo.cambiar_lista(Bloque_de_datos);
        tipo_token = TK_DESCONOCIDO;
        while ( Bloque_de_datos->tam() > 0 && tipo_token != TK_FIN ) {
            tipo_token = sabiondo.siguiente_token(cad);
            switch( tipo_token ) {
              //- Aqui ocurre la accion! ------------------------------------
              case TK_IDENTIFICADOR:
                if ( strcmp(cad, "COMANDO") == 0 ) {
                    Comando = new GUI_COMANDO();
                    if ( !Comando || 
                         !Comando->leer(&sabiondo, &lista_idcs) ) return FALSE;
                    //Comando->imprimir();
                    lista_comandos.anx(Comando);
                  }
                  else if ( strcmp(cad, "MENU") == 0 ||
                            strcmp(cad, "POPUP") == 0 ) {
                    Menu = new GUI_MENU(&lista_idcs);
                    if ( !Menu || !Menu->leer(&sabiondo, this) ) return FALSE;
                    //Menu->imprimir();
                    lista_menus.anx(Menu);
                  }
                  else if ( strcmp(cad, "BOTONERA") == 0 ) {
                    Botonera = new GUI_BOTONERA(&lista_idcs, &lista_comandos);
                    if ( !Botonera || !Botonera->leer(&sabiondo) ) {
                        return FALSE;
                    }
                    //Menu->imprimir();
                    lista_botoneras.anx(Botonera);
                  }
                  else if ( strcmp(cad, "#define") == 0 ) {
                    Idc = new GUI_CONSTANTE_ENTERA;
                    if ( !Idc ) return FALSE;
                    Idc->leer(&sabiondo);
                    lista_idcs.anx(Idc);
                  }
                    /*
                   Esto se da automaticamente por la manera en como funciona
                   la clase PARSERO
                  else if ( strcmp(cad, "#include") == 0 ) {
                    tipo_token = sabiondo.siguiente_token(cad);
                    ESPERO(TK_CADENA, "un nombre de archivo");
                    des_comille(cad);
                    leer_gui(cad);
                    }*/
                ;
                break;
              //-------------------------------------------------------------
              case TK_ERROR_SINTACTICO: return FALSE; // break; // OJO!
              default: case TK_DESCONOCIDO: break;
            }
        }

        //- Borrar la estructura temporal -----------------------------------
        for ( i = 0; i < Bloque_de_datos->tam(); i++ ) {
            delete (*Bloque_de_datos)[i];
        }
        delete Bloque_de_datos;
        Bloque_de_datos = NULL;        
    } while( status != 0 );

    return TRUE;
}

GUI_MENU *
JED_INTERFACE::resolver_menu(char *llave)
{
    int i;
    GUI_MENU *menu = NULL;

    for ( i = 0; i < lista_menus.tam(); i++ ) {
        if ( strcmp(llave, lista_menus[i]->nombre()) == 0 ) {
            menu = lista_menus[i];
            break;
        }
    }

    return menu;
}

GUI_BOTONERA *
JED_INTERFACE::resolver_botonera(char *llave)
{
    int i;
    GUI_BOTONERA *botonera = NULL;

    for ( i = 0; i < lista_botoneras.tam(); i++ ) {
        if ( strcmp(llave, lista_botoneras[i]->nombre()) == 0 ) {
            botonera = lista_botoneras[i];
            break;
        }
    }

    return botonera;
}

BOOLEAN
JED_INTERFACE::leer(TOKENIZADOR *Sabiondo)
{
    int tipo_token = TK_DESCONOCIDO, pos = 1;
    char cad[1000];

    while ( tipo_token != TK_CERRAR ) {
        //- Siguiente token ---------------------------------------------------
        tipo_token = Sabiondo->siguiente_token(cad);

        //- Condiciones de salida ---------------------------------------------
        if ( tipo_token == TK_CERRAR ) break;
        if ( tipo_token == TK_FIN ) {
            fprintf(stderr,
                "<JED_INTERFACE> ERROR: Fin de archivo inesperado!\n");
            fflush(stderr);
            return FALSE;
        }

        //- Procesamiento del primer token ------------------------------------
        if ( pos == 1 ) {
            ESPERO(TK_ABRIR, "'{'"); pos ++; continue;
          }
          else {
            ESPERO(TK_IDENTIFICADOR, "un identificador");
        }
       
        //- Procesamiento del token identificador de elemento -----------------
        // NOTA: El procesamiento de cada parametro del elemento se realiza
        // dentro de cada 'if'
        if ( strcmp(cad, "vista") == 0 ) {
            tipo_token = Sabiondo->siguiente_token(cad);
            ESPERO(TK_CADENA, "el nombre de una vista");
            printf("<JED_INTERFACE> Dejo en remojo la vista %s\n", cad);
          }
        ;
    }

    return TRUE;
}

void
JED_INTERFACE::finalizar(void)
{
  #if PLATAFORMA != PALM_PALMOS_CODEWARRIOR
    printf("<JED_INTERFACE> : Finalizacion por defecto Ok.\n");
  #endif
    exit(0);
}

void
JED_INTERFACE::desktop_size(int *x_tam, int *y_tam)
{
#if (PLATAFORMA != i386_WIN32_VC) && (PLATAFORMA != PALM_PALMOS_CODEWARRIOR)
    printf("<JED_INTERFACE> - Warning : \n"
       "    Resolucion desconocida, retornando 640x480.\n");
    fflush(stdout);
#endif
    (*x_tam) = 640;
    (*y_tam) = 480;
}

void
JED_INTERFACE::solicitar_nueva_ventana(void)
{
#if (PLATAFORMA != i386_WIN32_VC) && (PLATAFORMA != PALM_PALMOS_CODEWARRIOR)
    printf("<JED_INTERFACE> - Warning : \n"
       "    Solicitud de ventana no implementada, ignorada.\n");
    fflush(stdout);
#endif
}

BOOLEAN
JED_INTERFACE::anexar_controles(LISTA <CONTROL_GUI *> * /*Controles*/, 
                                REPOSITORIO_DE_ENTIDADES * /*Repositorio*/)
{
    fprintf(stderr, "<JED_INTERFACE> ERROR: Los controles GUI no estan\n"
        "    implemetados en la interface actual.  Intente Motif.\n");
    fflush(stderr);
    return FALSE;
}

//===========================================================================
//= 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.