Calculadora con notación polaca inversa
En la You are not allowed to view links. You are not allowed to view links. Register or Login or You are not allowed to view links. Register or Login pudimos aprender la instalación de FreeDOS en QEMU, pero hacía falta varias cosas, que más allá de su uso, tienen que ver con el mantenimiento, instalación de paquetes y una de las cosas más esenciales de todo, las redes.
Paquetes necesarios:
Fuente: You are not allowed to view links. You are not allowed to view links. Register or Login or You are not allowed to view links. Register or Login
Esto es simple. Abrimos QEMU con las opciones pre-configuradas en la You are not allowed to view links. You are not allowed to view links. Register or Login or You are not allowed to view links. Register or Login y ejecutaremos el comando fdimples, el cual nos muestra una interfaz You are not allowed to view links. You are not allowed to view links. Register or Login or You are not allowed to view links. Register or Login. Los controles pueden ser resumidos como lo siguiente:
*.- 🡡, 🡢, 🡣, 🡠: Moverse entre los diferentes elementos. Ya sea que estés en la lista de grupos de paquetes o de los paquetes mismos, las flechas hacia arriba y hacia abajo te ayudarán a desplazarte; si necesitas moverte entre grupo de paquetes o los paquetes que éstos contengan, las flechas hacia la derecha o la izquierda, son los de utilidad. En caso de que se necesite ver la descripción de un paquete, cuando se le esté apuntando (ver imagen, paquete FDNET) presione la flecha derecha y las flechas hacia arriba y hacia abajo expandirán o disminuirán la descripción y los programas que el paquete contenga.
*.- SPACE o ENTER: Misma funcionalidad. Seleccionar o confirmar una opción. En caso de querer seleccionar todo el grupo completo (ver imagen, grupo de paquete Networking), se necesita apuntar hacia él, y luego presionar ENTER o SPACE para seleccionar/deseleccionar todos los paquetes a instalar/desinstalar, o si simplemente se desea instalar un paquete, es necesario moverse hasta él y realizar el mismo procedimiento.
Así de sencillas son las instrucciones, ahora que se sabe la forma de instalar paquetes desde el CD-ROM (la misma imagen ISO, en nuestro caso) pasemos a instalar los paquetes necesarios para obtener Internet. En nuestro caso deben ser los siguientes:
*.- FDNET: paquete de soporte de red básico para FreeDOS para varias configuraciones de hardware y plataformas de máquinas virtuales.
*.- MTCP: Colección de herramientas TCP/IP para DOS de 16 bits, tales como: DHCP, IRC, FTP, Telnet, Netcat, HTGet, Ping, SNTP.
*.- Opcionalmente, aunque encarecidamente, se recomienda instalar también: curl, wget, ping
Como último paso para esta sección, reiniciamos.
Nota: Es necesario seguir con la siguiente sección para completar este paso.
Configuración de QEMU:
No solo es necesario instalar los paquetes para darle compatibilidad a FreeDOS para las máquinas virtuales y el hardware en sí, además es necesario configurar QEMU (o la máquina virtual que se esté usando) para que las configuraciones automatizadas y demás, pueden hacer efecto.
En nuestro caso ejecutaremos el siguiente comando:
qemu-system-i386 -net nic,model=pcnet -net user -k es -smp $(($(nproc)+1)) -m 32M -drive file=freedos.img,media=disk,format=raw -drive file=FD12CD.iso,media=cdrom -boot order=d
Resultado
El gestor de paquetes:
Sí, FreeDOS tiene un gestor de paquetes
, y muy bueno, el cual nos permite instalar paquetes que no estén incluidos en el CD-ROM (la imagen ISO). En nuestro caso instalaremos los paquetes necesarios para programar en el mismo.Antes de usar el gestor de paquetes necesario, para no perder tanto tiempo verificamos que no tengamos los paquetes deseados en la imagen ISO, los cuales son: DJGPP, i16butil, i16gcc, i16newli, i16budoc, i16gcdoc
En mi caso el único que tengo en la imagen ISO es DJGPP, por lo que paso a instalarlo usando fdimples:
Mientras que los demás, usaré fdnpkg para buscarlos y si son encontrados, instalarlos:
fdnpkg search i16
Ahora, instalamos:
fdnpkg install i16butil
fdnpkg install i16gcc
fdnpkg install i16newli
fdnpkg install i16budoc
fdnpkg install i16gcdocUna vez cuncluímos el proceso de instalación de los paquetes necesarios, necesitamos definir la variable que se mostrará en unos instantes en el archivo You are not allowed to view links. You are not allowed to view links. Register or Login or You are not allowed to view links. Register or Login que se encuentra en C:
set DJGPP=c:\devel\djgpp\djgpp.envPese a que tenemos y podríamos usar perfectamente el comando EDIT para editar archivos y hasta programar con él, es recomendable usar otro editor de texto que se adhiera a sus necesidades y preferencias. En mi caso, usaré simplemente pico, aunque fed tampoco está mal, desde luego, es posible ejecutar el siguiente comando y se mostrará todos los editores, o también se puede ingresar a los You are not allowed to view links. You are not allowed to view links. Register or Login or You are not allowed to view links. Register or Login.
fdnpkg search edit
Editores válidos por el momento
Programación en C:
Para concluir este pequeño artículo, vamos a escribir dos programas en C; uno que imprima 'Hello World!' y otro que será una You are not allowed to view links. You are not allowed to view links. Register or Login or You are not allowed to view links. Register or Login.
hello.c
#include <stdio.h>
#include <stdlib.h>
int main(void) {
printf("Hello World!\n");
return EXIT_SUCCESS;
}i16gcc -o hello.exe -O2 hello.c
hello.exe
Ya compilamos nuestro hello world, pero ahora vamos a compilar un programa con más funcionalidades.
polish.c
#include <stdio.h>
#include <stdlib.h>
#include <ctype.h>
#include <errno.h>
#include <math.h>
#include <stdbool.h>
#include "calculator.h"
#define MAX_NUMBERS 30
int main(int argc, char **argv) {
long double *array = (long double *)malloc(sizeof(long double)*MAX_NUMBERS);
long double *result = array;
long double aux;
char *endstr = NULL;
int operator;
int max_numbers, count;
bool check = false;
if (!array) {
if (errno != 0)
perror("malloc");
else
fprintf(stderr, "Possibly no memory\n");
return EXIT_FAILURE;
}
max_numbers = MAX_NUMBERS;
count = 0;
while (--argc) {
if (count++ >= max_numbers) {
max_numbers *= 2;
array = (long double *)realloc(array, sizeof(long double)*max_numbers);
if (!array) {
if (errno != 0)
perror("realloc");
else
fprintf(stderr, "Possibly no memory\n");
free(array);
return EXIT_FAILURE;
}
}
if (isdigit(**++argv)) {
errno = 0;
aux = strtold(*argv, &endstr);
if (errno != 0) {
perror("stdtold");
free(array);
return EXIT_FAILURE;
}
*result++ = aux;
continue;
}
if (!check)
check = true;
result -= 2;
if (isnan(*result) || isnan(*(result+1))) {
fprintf(stderr, "Invalid syntax!\n");
return EXIT_FAILURE;
}
operator = *argv[0];
errno = 0;
*result = calculate(*result, *(result+1), operator);
result++;
if (errno != 0) {
free(array);
return EXIT_FAILURE;
}
}
if (check)
printf("%Lg\n", *--result);
else
fprintf(stderr, "Invalid syntax!\n");
free(array);
return EXIT_SUCCESS;
}calculator.c
#include <stdio.h>
#include <errno.h>
long double calculate(long double n1, long double n2, int operator) {
long double result;
result = 0.0f;
switch (operator) {
case '+':
result = n1 + n2;
break;
case '-':
result = n1 - n2;
break;
case '*':
result = n1 * n2;
break;
case '/':
if (n2 == 0.0f) {
errno = EINVAL;
fputs("Zero divisor!\n", stderr);
} else
result = n1 / n2;
break;
default:
errno = EINVAL;
fprintf(stderr, "Invalid operator: '%c'\n", operator);
}
return result;
}calculator.h
long double calculate(long double n1, long double n2, int operator);El proceso de compilación es sumamente sencillo:
i16gcc -o polish.exe -O2 polish.c calculator.c
polish.exe 2 2 +
polish.exe 4 2 *
polish.exe 2.5 2.5 +
Reto:
Aquí no acaba. Vamos a realizar una serie de retos para ver si los pueden completar. Básicamente consta de agregar nuevas funcionalidades a la calculadora:
- Agregue más operadores binarios (que requieran de dos números) como el módulo, la potencia, etc
- Sabiendo que los operadores lógicos no funcionan con el tipo de dato long double, agregue operadores, como AND, OR, XOR, etc.
- Agregue operadores de relaciones, para determinar si dos números son iguales, uno es menor o igual, uno es mayor o igual, uno es mayor, uno es menor, uno es distinto del otro, etc
¿Cuántos puedes resolver? 3:)
Notas futuras:
Desde que empecé a hacer estos pequeños artículos no he querido usar QEMU; traté sin éxito de usar FreeDOS (no el pre-configurado) con DosEMU, que me pareció mucho mejor en cuanto a rendimiento y usabilidad, pero luego de error tras error, mejor lo dejaré para otra ocasión.
Material de referencia y altamente recomendada:
*.- You are not allowed to view links. You are not allowed to view links. Register or Login or You are not allowed to view links. Register or Login
*.- You are not allowed to view links. You are not allowed to view links. Register or Login or You are not allowed to view links. Register or Login
*.- You are not allowed to view links. You are not allowed to view links. Register or Login or You are not allowed to view links. Register or Login
*.- You are not allowed to view links. You are not allowed to view links. Register or Login or You are not allowed to view links. Register or Login
*.- You are not allowed to view links. You are not allowed to view links. Register or Login or You are not allowed to view links. Register or Login
*.- You are not allowed to view links. You are not allowed to view links. Register or Login or You are not allowed to view links. Register or Login
~ DtxdF
