Удаление и добавление элементов однонаправленного списка

/* LIST1.CPP 
   Процедурно-ориентированная реализация связанных списков */
 
struct list {
          struct list * next;
          int   info;      
        };
 
 
#include <stdio.h>
#include <conio.h>
#include <string.h>
#include <stdlib.h>
#include <windows.h>
 
/* INPUT_info() - ввод с клавиатуры информации */
int input_info(struct list * ptr) {
 fflush(stdin);
 scanf("%d", &(ptr -> info));
 return ptr->info;
}
 
/* PRINTON() - Вывод информации на экран. Возвращает
   указатель на следующий элемент списка. */
struct list * printOn(struct list * ptr) {
  printf("%d ", ptr -> info);
  return (ptr -> next);
}
 
/* DISPLAY() - Выводит информацию во всех элементах списка.
   Сканирует список от начала в конец. Возвращает указатель на
   последний элемент. */
struct list * display(struct list * head) {
 struct list * ret;
 if (head == NULL) { /* если список пуст */
  puts("Список пуст");
  return NULL;
 }
 do {
  printOn(head);
  ret = head;
  head = head -> next;
 } while(head  != NULL);
 return (ret);
}
 
/* DESTROY() - Освобождает память, выделенную под элемент списка. */
void destroy(struct list * element) {
 free(element);
}
 
/* HASMEMBER() - Проверяет, есть ли в списке, элемент с
   идентичными полями.  Список сканируется от начала в конец. */
int hasMember(struct list * head, struct list * work) {
 while(head != NULL) { /* цикл сканирования списка */
  if (head->info  == work -> info) return 1;
  head = head -> next;
 }
 return(0);
}
 
/* ADD() - Помещает элемент new_ptr в список head в порядке
   возрастания чисел (поля info). */
int add(struct list ** head, struct list * new_ptr) {
  struct list * first, * second;
  if ((*head) == NULL) { /* если список пуст */
   (* head) = new_ptr;
   new_ptr -> next = NULL;
   return 0;
  }
  if ((*head) -> next == NULL) { /* если в нем всего один элемент */
   if( (*head) -> info >  new_ptr -> info) {
    /* новый элемент становится первым в списке */
    second = (*head); /* сохраним указатель на второй */
    (*head) = new_ptr;
    new_ptr -> next = second;
    second -> next = NULL;
   }
   else { /* новый элемент становится в конец списка */
    (*head) -> next = new_ptr;
    new_ptr -> next = NULL;
   }
   return 1;
  }
  else {
   if ( (*head) -> info > new_ptr -> info) { 
    /* новый эл-т ставится первым в списке */
    second = (*head); /* сохраним указатель на второй */
    (*head) = new_ptr;
    new_ptr -> next = second;
    return 4;
   }
   first  = (* head);
   second = first -> next;
   while (first -> next != NULL) { /* цикл поиска места в списке  */
    if ( first  -> info <= new_ptr -> info &&
     second -> info >= new_ptr -> info) {
     /* вставляем элемент между first и second */
     first -> next   = new_ptr;
     new_ptr -> next = second;
     return 2;
    }
    first = second;
    second = first -> next;
   }
   /* если добрались сюда, элемент ставим в конец списка */
   first -> next    = new_ptr;
   new_ptr  -> next = NULL;
   return 3;
  }
}
 
/* DETACH() - Удаляет элемент element из списка head */
void detach(struct list ** head, struct list * element) {
 struct list * prev;
 if(* head == NULL) return; /* если список пуст */
 if((*head) == element) { /* если удаляемый эл-т - первый       */
  (* head) = element -> next;
  destroy(element);
  return;
 }
 /* Цикл поиска предыдущего для element элемента. */
 prev = (* head);
 while((prev -> next) != element)
  prev = prev -> next; /* на выходе из цикла - адрес предыдущ*/
 prev -> next = element -> next;
 destroy(element);
 return;
}
 
int main(void) {
 char ch;
 struct list * head;   /* указатель на начало списка          */
 struct list * new_ptr;/* указатель на новый элемент списка   */
 struct list * cur;    /* указатель на текущий элемент списка */
 struct list work;
 head = NULL;          /* вначале список пуст                 */
 puts ("Input the numbers, one in one line, 0 - end of list");
 while(input_info(&work) != 0) { /* цикл ввода описаний */
  if (hasMember(head, &work) != 1) {
   if((new_ptr = (struct list *)malloc(sizeof(struct list))) == NULL) {
    puts("No memory!");
    break;
   }
   new_ptr -> info = work.info;/* копируем введен. информацию */
   add(&head, new_ptr);   /* добавляем элемент в список  */
  }
 }
 if (head == NULL)              /* список остался пустым ?     */
  return 1;                  /* да, завершение программы    */
 puts("*** ALL LIST ***");
 display(head);                /* вывод всех элем-тов списка  */
 /* Цикл выборочного удаления элементов, начиная с первого. */
 cur = head;
 puts("*** DELETING ***");
 do {
  new_ptr = printOn(cur);  /* вывод элемента списка       */
  printf("Delete the item ? (Y/N) ");
  if ((ch = getch()) == 'Y' || ch == 'y') {
   puts("Yes");
   detach(&head, cur);   /* удаление элемента из спсика */
  }
  else puts("No");
  cur = new_ptr;
 }
 while(new_ptr != NULL);
  puts("*** ALL LIST AFTER DELETING ***");
 display(head);                /* вывод всех элем-тов списка  */
 system("pause");
 return 0;
}