home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / unix / volume13 / rolodex / part02 / options.c < prev    next >
Encoding:
C/C++ Source or Header  |  1988-01-30  |  6.9 KB  |  306 lines
  1. /* options.c */
  2. #ifdef UNIX
  3. #include <sys/types.h>
  4. #include <time.h>
  5. #ifdef BSD
  6. #include <sys/file.h>
  7. #include <sgtty.h>
  8. #else
  9. #include <fcntl.h>
  10. #endif
  11. #endif
  12.  
  13. #ifdef VMS
  14. #include <types.h>
  15. #include <time.h>
  16. #include <file.h>
  17. #endif
  18.  
  19. #ifdef MSDOS
  20. #include <time.h>
  21. #include <fcntl.h>
  22. #endif
  23.  
  24. #include <stdio.h>
  25. #include <ctype.h>
  26.  
  27. #include <signal.h>
  28.  
  29. #ifdef TMC
  30. #include <ctools.h>
  31. #else
  32. #include "ctools.h"
  33. #endif
  34. #include "args.h"
  35. #include "menu.h"
  36. #include "mem.h"
  37.  
  38. #include "rolofilz.h"
  39. #include "rolodefs.h"
  40. #include "datadef.h"
  41. #include "choices.h"
  42.  
  43.  
  44. print_short ()
  45.  
  46. /* print the names and phone numbers of everyone in the rolodex. */
  47.  
  48. { 
  49.  
  50.   Ptr_Rolo_List rptr;
  51.   Ptr_Rolo_Entry lentry;
  52.         
  53.   rptr = Begin_Rlist;
  54.   if (rptr == 0) {
  55.      fprintf(stderr,"No entries to print out...\n");
  56.      return;
  57.   }
  58.    
  59.   fprintf (
  60.      stdout,
  61.      "\nNAME                      WORK PHONE                HOME PHONE"
  62.    );
  63.   fprintf (
  64.      stdout,
  65.      "\n----                      ----------                ----------\n\n\n"
  66.    );
  67.  
  68.    while (rptr != 0) {
  69.         lentry = get_entry(rptr);
  70.         fprintf (
  71.             stdout,
  72.             "%-25s %-25s %-25s\n",
  73.             get_basic_rolo_field((int) R_NAME,lentry),
  74.             get_basic_rolo_field((int) R_WORK_PHONE,lentry),
  75.             get_basic_rolo_field((int) R_HOME_PHONE,lentry)
  76.          );   
  77.          rptr = get_next_link(rptr);
  78.    }       
  79.    
  80.  }  
  81.    
  82.  
  83. person_match (person,lentry) char *person; Ptr_Rolo_Entry lentry; 
  84.  
  85. /* Match against a rolodex entry's Name and Company fields. */
  86. /* Thus if I say 'rolo CCA' I will find people who work at CCA. */
  87. /* This is good because sometimes you will forget a name but remember */
  88. /* the company the person works for. */
  89.  
  90. { 
  91.   char *name, *company;        
  92.   int len;
  93.   len = strlen(person);
  94.   name = get_basic_rolo_field((int) R_NAME,lentry);
  95.   company = get_basic_rolo_field((int) R_COMPANY,lentry);
  96.   if (strncsearch(name,strlen(name),person,len)) return(1);
  97.   if (strncsearch(company,strlen(company),person,len)) return(1);
  98.   return(0);
  99. }
  100.  
  101.  
  102. int find_all_person_matches (person) char *person;
  103.  
  104. {
  105.   Ptr_Rolo_List rptr = Begin_Rlist;        
  106.   int count = 0;
  107.   while (rptr != 0) {
  108.     unset_matched(rptr);
  109.     if (person_match(person,get_entry(rptr))) {
  110.        set_matched(rptr);
  111.        count++;
  112.     }
  113.     rptr = get_next_link(rptr);
  114.   }
  115.   return(count);
  116. }
  117.  
  118.  
  119. look_for_person (person) char *person; 
  120.  
  121. /* search against Name and Company over the rolodex.  If a match is found */
  122. /* display the entry and give the user a choice of what to do next. */
  123.  
  124. {
  125.   Ptr_Rolo_List rptr;        
  126.   int found = 0,result,nmatches;
  127.   static displayed_menu = 0;
  128.   char *response;
  129.   
  130.   rptr = Begin_Rlist;        
  131.   while (rptr != 0) {        
  132.     if (person_match(person,get_entry(rptr))) {
  133.        clear_the_screen();
  134.        display_entry(get_entry(rptr));
  135.        if (!found) {
  136.           nmatches = find_all_person_matches(person);
  137.           if (nmatches > 1) {
  138.              printf (
  139.                 "There are %d other entries which match '%s'\n\n",
  140.                 nmatches - 1, person
  141.               );
  142.           }
  143.        }
  144.        found = 1;
  145.        try_again :
  146.        if (!displayed_menu) cathelpfile(POPTIONMENU,(char *)NULL,0);
  147.        displayed_menu = 1;
  148.        menu_match (
  149.             &result,
  150.             &response,
  151.             "Select option (? for help): ",
  152.             0,1,1,1,6,
  153.             "Continue",P_CONTINUE,
  154.             "",P_CONTINUE,
  155.             "Next",P_NEXT_PERSON,
  156.             "\\",P_ABORT,
  157.             "Help",P_HELP,
  158.             "?",P_HELP
  159.          );
  160.        switch (result) {
  161.          case P_CONTINUE :
  162.            break;
  163.          case P_NEXT_PERSON :
  164.            return(0);
  165.            /* break; */
  166.          case P_ABORT :
  167.            roloexit(0);
  168.            break;
  169.          case P_HELP :
  170.            cathelpfile(POPTIONSHELP,"person search options",1);
  171.            goto try_again;
  172.          default :
  173.            fprintf(stderr,"Impossible return from menu_match\n");
  174.            exit(-1);
  175.        }
  176.     }
  177.     rptr = get_next_link(rptr);
  178.   }
  179.   if (!found) {
  180.      fprintf(stderr,"\nNo entry found for '%s'\n\n",person);
  181.      sleep(2);
  182.   }
  183.   else {
  184.      printf("No further matches for '%s'\n",person);
  185.      sleep(2);
  186.   }   
  187.   return(0);
  188. }
  189.  
  190.  
  191. print_people ()
  192.  
  193. {
  194.   int index;
  195.   char *person;
  196.   index = 1;
  197.   while (T) {
  198.      if (0 == (person = non_option_arg(index++))) break;
  199.      look_for_person(person);
  200.   }
  201. }
  202.  
  203.  
  204. interactive_rolo ()
  205.  
  206. /* Top level of the iteractive rolodex.  This code is just a big switch */
  207. /* which passes responsibility off to various routines in 'operatns.c' */
  208. /* and 'update.c' */
  209.  
  210. {
  211.  
  212.   int result,rval,field_index;
  213.   char *response,*field_name,*search_string;
  214.  
  215.   fprintf(stdout,"\n\nTMC ROLODEX, Version %s\n\n\n",VERSION);        
  216.   
  217.   while (1) {        
  218.         
  219.     cathelpfile(MAINMENU,(char *)NULL,0);
  220.     rval = menu_match (
  221.          &result,
  222.          &response,
  223.          "Select option (? for help): ",
  224.          0,1,0,1,7,
  225.          "+",M_ADD,
  226.          "%",M_PERUSE,
  227.          "\\",M_EXIT,
  228.          "?",M_HELP,
  229.          "*",M_SAVE,
  230.          "$",M_SEARCH_BY_OTHER,
  231.          "!",M_PRINT_TO_LASER_PRINTER
  232.       );
  233.       
  234.     switch (rval) {
  235.         
  236.       case MENU_AMBIGUOUS :
  237.       case MENU_ERROR :
  238.         fprintf(stderr,"Impossible return 1 from main menu_match\n");
  239.         exit(-1);
  240.         break;
  241.         
  242.       case MENU_NO_MATCH :
  243.         response = copystr(response);
  244.         rolo_search_mode((int) R_NAME,Field_Names[(int) R_NAME],response);
  245.         break;
  246.         
  247.       case MENU_MATCH :
  248.         
  249.         switch (result) {
  250.           case M_ADD :
  251.             rolo_add();
  252.             break;
  253.           case M_SEARCH_BY_OTHER :
  254.             if ((-1 == select_field_to_search_by(&field_index,&field_name)) ||
  255.                 (0 == (search_string = select_search_string()))) {
  256.                break;
  257.             }
  258.             rolo_search_mode(field_index,field_name,search_string);
  259.             break;
  260.           case M_PRINT_TO_LASER_PRINTER :
  261.             /* fprintf(stderr,"Not implemented\n"); */
  262.         pretty_print();
  263.             sleep(1);
  264.             break;
  265.           case M_PERUSE :
  266.             rolo_peruse_mode(Begin_Rlist);
  267.             break;
  268.           case M_EXIT :
  269.             save_and_exit(0);
  270.             break;
  271.           case M_SAVE :
  272.             if (changed) {
  273.                save_to_disk();
  274.                sleep(1);
  275.             }
  276.             else {
  277.                printf("No changes to be saved...\n");
  278.                sleep(2);
  279.             }
  280.             break;
  281.           case M_HELP :
  282.             cathelpfile(MOPTIONHELP,"top level menu",1);
  283.             any_char_to_continue();
  284.             break;
  285.           default :
  286.             fprintf(stderr,"Impossible result from menu_match...\n");
  287.             save_and_exit(-1);
  288.         }
  289.         break;
  290.             
  291.       case MENU_EOF :
  292.         user_eof();
  293.         break;
  294.         
  295.       default :
  296.         fprintf(stderr,"Impossible return 2 from menu_match\n");
  297.         save_and_exit(-1);
  298.         
  299.     }
  300.     
  301.     clear_the_screen();
  302.     
  303.   }
  304.  
  305. }
  306.