#include <stdio.h>
#include <stdlib.h>
 
struct listNode {
       char data;
       struct listNode *nextPtr;
};
 
typedef struct listNode LISTNODE;
typedef LISTNODE *LISTNODEPTR;
 
void insert(LISTNODEPTR *, char);
char delete(LISTNODEPTR *, char);
int isEmpty(LISTNODEPTR);
void printList(LISTNODEPTR);
void instructions(void);
 
main()
{
      LISTNODEPTR startPtr = NULL;
      int choice;
      char item;
      instructions();
      printf("? ");
      scanf("%d", &choice);
 
      while (choice != 3) {
 
            switch (choice) {
                   case 1:
                        printf("Enter a character: ");
                        scanf("\n%c", &item);
                        insert(&startPtr, item);
                        printList(startPtr);
                        break;
                   case 2:
                        if (!isEmpty(startPtr)) {
                            printf("Enter character to be deleted: ");
                            scanf("\n%c", &item);
 
                            if (delete(&startPtr, item)) {
                                printf("%c deleted.\n", item);
                                printList(startPtr);
                            }
                            else
                                printf("%c not found.\n\n", item);
                        }
                        else
                            printf("List is empty.\n\n");
 
                        break;
                   default:
                       printf("Invalid choice.\n\n");
                       instructions();
                       break;
            }
 
            printf("? ");
            scanf("%d", &choice);
      }
 
      printf("End of run.\n");
      system("pause");
      return 0;
}
 
void instructions(void)
{
     printf("Enter your chice:\n"
     "   1 to insert an element into the list.\n"
     "   2 to delete an element from the list.\n"
     "   3 to end.\n");
}
 
void insert(LISTNODEPTR *sPtr, char value)
{
     LISTNODEPTR newPtr, previewPtr, currentPtr;
 
     newPtr = malloc(sizeof(LISTNODE));
 
     if (newPtr != NULL) {
                newPtr->data = value;
                newPtr->nextPtr = NULL;
 
                previousPtr = NULL;
                currentPtr = *sPtr;
 
                while (currentPtr != NULL && value > currentPtr->data) {
                      previousPtr = currentPtr;
                      currentPtr = currentPtr->nextPtr;
                }
 
                if (previousPtr == NULL) {
                               newPtr->nextPtr = *sPtr; //¿Para que es esta linea?, si sPtr se usa por primera ves con NULL, entonces aqui newPTr.nextPtr valdra NULL?
                               *sPtr = newPtr; // Como es esta linea no entiendo
                }
                else {
                     previousPtr->nextPtr = newPtr; // Para que es esto?
                     newPtr->nextPtr = currentPtr; // y Esto para que se hace? una explicacion detallada por favor
                }
     }
     else
         printf("%c not inserted. No memory available.\n", value);
}
 
char delete(LISTNODEPTR *sPtr, char value)
{
     LISTNODEPTR previousPtr, currentPtr, tempPtr;
 
     if(value == (*sPtr)->data) { // Porque se usan parentesis en *aPtr ? , no es valido sPtr.data? o sPtr->data?
              tempPtr = *sPtr
              *sPtr = (*sPtr)->nextPtr; //Parentesis para que?
              free(tempPtr);
              return value;
     }
     else {
          previousPtr = *sPtr;
          currentPtr : (*sPtr)->nextPtr; //Parentesis para que?
 
          while (currentPtr != NULL && currentPtr->data != value) {
                previousPtr = currentPtr;
                currentPtr = currentPtr->nextPtr;
          }
 
          if (currentPtr != NULL) {
                         tempPtr = currentPtr;
                         previousPtr->nextPtr = currentPtr->nextPtr;
                         free(tempPtr);
                         return value;
          }
     }
 
     return '\0';
}
 
int isEmpty(LISTNODEPTR sPtr)
{
    return sPtr == NULL;
}
 
void printList(LISTNODEPTR sPtr)
{
     if (currentPtr == NULL)
         printf("List is empty.\n\n");
     else {
          printf(The list is:\n");
 
          while (currentPtr != NULL) {
                printf("%c --> ", currentPtr->data);
                currentPtr = currentPtr->nextPtr;
          }
 
          printf("NULL\n\n");
     }
}