Se hace una prueba del parser_equation() y se corrigen varios bugs.

[z.facultad/75.42/calculadora.git] / dllist.c

diff --git a/dllist.c b/dllist.c
index 629f7f5733d23753385fdac162470a482bdd5201..8b427dcb2724653c5c8d1792ca43f2f77c7b234a 100644 (file)
--- a/dllist.c
+++ b/dllist.c
@@ -15,21 +15,32 @@
  */
 
 #include "dllist.h"
+/* Para usar NULL, malloc() y free(). */
 #include <stdlib.h>
 
-bool DLList_init(DLList* list) {
+DLList* DLList_new(void) {
     /* Aloco memoria para la lista. */
-    /*list = (DLList*)malloc(sizeof(DLList));*/
-    /* Si la obtuve, inicializo todo a NULL y devuelvo TRUE. */
+    DLList* list = (DLList*)malloc(sizeof(DLList));
+    /* Si la obtuve, inicializo todo a NULL. */
     if (list) {
-        list->first      = NULL;
-        list->current    = NULL;
-        list->last       = NULL;
-        return TRUE;
-    /* Si no hay más memoria devuelvo FALSE. */
-    } else {
-        return FALSE;
+        list->first   = NULL;
+        list->current = NULL;
+        list->last    = NULL;
     }
+    /* Devuelvo el nuevo puntero. */
+    return list;
+}
+
+void DLList_delete(DLList* list) {
+    /* Si el puntero a la lista no es NULL. */
+    if (list) {
+        /* Elimino los nodos. */
+        while (!DLList_empty(list)) {
+            DLList_pop(list);
+        }
+    }
+    /* Libero memoria de la lista. */
+    free(list);
 }
 
 bool DLList_empty(DLList* list) {
@@ -95,9 +106,9 @@ bool DLList_unshift(DLList* list, void* data) {
         /* Apunto el nodo actual al nuevo nodo. */
         list->current = node;
         /* Si la lista está vacía hay que hacer apuntar todo al nuevo nodo. */
-        if (DLList_empty(list)) {
-            list->first   = node;
-            list->last    = node;
+        if (list->first == NULL) {
+            list->first = node;
+            list->last  = node;
         /* Si no está vacía. */
         } else {
             /* Apunto el nodo anterior al primer nodo de la lista al nuevo. */
@@ -120,9 +131,9 @@ bool DLList_push(DLList* list, void* data) {
         /* Apunto el nodo actual al nuevo nodo. */
         list->current = node;
         /* Si la lista está vacía hay que hacer apuntar todo al nuevo nodo. */
-        if (DLList_empty(list)) {
-            list->first   = node;
-            list->last    = node;
+        if (list->first == NULL) {
+            list->first = node;
+            list->last  = node;
         /* Si no está vacía. */
         } else {
             /* Apunto el próximo nodo del último nodo de la lista al nuevo. */
@@ -141,14 +152,14 @@ void* DLList_shift(DLList* list) {
     void* data = node->data;
     /* Pongo como primer nodo al siguiente. */
     list->first = node->next;
-    /* Pongo el nodo anterior al primero como NULL. */
-    list->first->prev = NULL;
-    /* Lo pongo como nodo actual. */
+    /* Pongo al primero como nodo actual. */
     list->current = list->first;
-    /* Si era el único actualizo los otros punteros. */
+    /* Si era el único pongo el último en NULL. */
     if (!list->first) {
-        list->last    = NULL;
-        list->current = NULL;
+        list->last = NULL;
+    /* Si no, pongo el anterior en NULL. */
+    } else {
+        list->first->prev = NULL;
     }
     /* Libero memoria del nodo. */
     free(node);
@@ -162,17 +173,45 @@ void* DLList_pop(DLList* list) {
     void* data = node->data;
     /* Pongo como último nodo al anterior. */
     list->last = node->prev;
-    /* Pongo el nodo siguiente al último como NULL. */
-    list->last->next = NULL;
-    /* Lo pongo como nodo actual. */
+    /* Pongo al último como nodo actual. */
     list->current = list->last;
-    /* Si era el único actualizo los otros punteros. */
+    /* Si era el único pongo el primero en NULL. */
     if (!list->last) {
-        list->first   = NULL;
-        list->current = NULL;
+        list->first = NULL;
+    /* Si no, pongo el siguiente en NULL. */
+    } else {
+        list->last->next = NULL;
     }
     /* Libero memoria del nodo. */
     free(node);
     return data;
 }
 
+void* DLList_remove_current(DLList* list) {
+    /* Nodo actual */
+    DLNode* current = list->current;
+    /* Datos del nodo actual. */
+    void* data = current->data;
+    /* Si tiene siguiente. */
+    if (current->next) {
+        /* Se pone como anterior del siguiente al anterior del actual. */
+        current->next->prev = current->prev;
+    /* Si no tiene siguiente, se pone como último al anterior del actual. */
+    } else {
+        list->last = current->prev;
+    }
+    /* Si tiene anterior. */
+    if (current->prev) {
+        /* Se pone como siguiente del anterior al siguiente del actual. */
+        current->prev->next = current->next;
+    /* Si no tiene anterior, se pone como primero al siguiente del actual. */
+    } else {
+        list->first = current->next;
+    }
+    /* Pongo como elemento actual al próximo elemento. */
+    list->current = current->next;
+    /* Libero memoria del nodo. */
+    free(current);
+    return data;
+}
+