home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / unix / volume6 / reminders / rs.c < prev   
Encoding:
C/C++ Source or Header  |  1986-11-30  |  13.3 KB  |  582 lines
  1. static char rcsid[] = "$Header: rs.c,v 3.3 86/07/03 14:24:34 don Exp $";
  2.  
  3. /* $Log:    rs.c,v $
  4.  * Revision 3.3  86/07/03  14:24:34  don
  5.  * 1.  MAX_LINE (# columns on a line) now defined by termcap entry for TERM.
  6.  * 2.  Misc. Optimizations.
  7.  * 3.  Reminders can now be "marked", by appending ^G to reminder, to have
  8.  *     reminder highlighted during display.  "Highlight" options can be defined
  9.  *     in the RSINIT environment variable.
  10.  *     U - Underscore,  B - Bold,  S - Asterisk. (Default is standout)
  11.  *     I - Ignore termcap entry.
  12.  * 
  13.  * Revision 3.2  85/08/26  14:55:42  don
  14.  * Adding Mike's enhancements.  Thanks Mike! :-)
  15.  * Revision 3.2 & 3.3 by Mike Spitzer @ (pur-ee!mjs)
  16.  * 
  17.  * Revision 3.2  85/08/05  13:10:52  mjs
  18.  * -added new print_line which doesn't barf on long words
  19.  * -added #define for place to break up lines(MAX_LINE)
  20.  * -print_line is always called now, test for strlen(line) < MAX_LINE
  21.  *  is now made there.
  22.  * 
  23.  *     MIke Spitzer
  24.  *     pur-ee!mjs
  25.  * 
  26.  * Revision 3.1  85/07/26  20:48:06  mjs
  27.  * "rs" now recognizes the $EDITOR variable.  "vi" will be used if 
  28.  * $EDITOR is undefined.
  29.  * 
  30.  * added "-e" flag... does the same thing as "-v"
  31.  * 
  32.  * -mjs
  33.  * 
  34.  * Revision 2.2  85/02/25  10:35:48  don
  35.  * 1.  Optimized kill and line wrap routines.
  36.  * 2.  Added defines for LPR & VI.
  37.  * 3.  Added more RSINIT options. (A & D)
  38.  * 4.  Deleted add_calendar routine, now uses add_reminders.
  39.  * 5.  Added comments.
  40.  * 
  41.  * Revision 2.1  85/01/28  17:03:56  don
  42.  * 1. Added new notes file - .rsnotes | command rs -n
  43.  * 2. Added new alternate file - user defined via setenv RSALT | command rs -A
  44.  * 3. Added environment variable RSINIT.
  45.  *    setenv RSINIT 'ad' | a = display after add | d = display after delete.
  46.  * 4. Lines may now be 256 char. long.
  47.  * 5. Long lines will automatically wrap like 'vi'.
  48.  * 6. Added search command. | rs -s 'search string'
  49.  * 7. Help deleted, replaced with 'usage' message.
  50.  * 8. Misc. optimizations.
  51.  * 
  52.  * Revision 1.3  85/01/15  09:17:57  don
  53.  * 1. Added $Log line for RCS.
  54.  * 2. Fixed help message.
  55.  * 3. Coded in range deletion.
  56.  *  */
  57.  
  58. /*    Program    written by:    Don Joslyn
  59.  *                Nova University Computer Center
  60.  *                3301 College Avenue
  61.  *                Fort Lauderdale, Florida 33314
  62.  *                (305) 475-7630 (novavax!don)
  63.  *
  64.  *    Notice:  No Copyright. 
  65.  *
  66. */
  67.  
  68. #include    <stdio.h>
  69. #include    <ctype.h>
  70. #ifdef    BSD
  71. #include    <strings.h>
  72. #else
  73. #include    <string.h>
  74. #define        rindex    strnchr
  75. #endif    BSD
  76.  
  77. #define        MAXLEN   256    /* Max. Length of a single line     */
  78. #define        MAXLINES 500    /* Max. number of lines (reminders) */
  79.  
  80. #define        CALENDAR "/calendar"    /* calendar file */
  81. #define        RSFILE     "/.reminders"    /* reminder file */
  82. #define        RSNOTES  "/.rsnotes"    /* notes    file */
  83.  
  84. #define        LPR    "/usr/ucb/lpr"    /* location of lpr */
  85. #define        EDITOR    "/usr/ucb/vi"     /* default editor  */
  86.  
  87. /*#define        BIGHELP    /* Define if you want verbose help message */
  88.  
  89. FILE    *fp,
  90.     *fptmp;
  91.  
  92. char    fname[128],        /* Filename tmp */
  93.     on[32],            /* string used to turn "mark" on  */
  94.     off[32],        /* string used to turn "mark" off */
  95.     buff[1024],        /* Holds termcap entry for TERM */
  96.     s[MAXLEN],        /* Tmp string and line storage */
  97.     sstr[80],        /* Search string */
  98.     cmd[256];        /* cmd for system call */
  99.  
  100. char    *a,
  101.     *editor,        /* Hold for EDITOR environment variable */
  102.     *entity = "Reminders",    /* Entity working on */
  103.     *env,            /* Hold for RSINIT environment variable */
  104.     *fun,            /* Used in arg processing */
  105.     *mark_on  = "so",    /* Default mark is Standout mode */
  106.     *mark_off = "se";    /* Standout end */
  107.     
  108.  
  109. char    *getenv(),
  110.     *malloc(),
  111.     *mktemp();
  112.  
  113. char    rstmp[]= "/tmp/rsXXXXXX";    /* name of temp. file during delete */
  114.  
  115. int    adisplay = 0,    /* display reminders after additions (default = no) */
  116.     ddisplay = 0,    /* display reminders after deletions (default = no) */
  117.     Adisplay = 0,    /* display notes/alt after additions (default = no) */
  118.     Ddisplay = 0,    /* display notes/alt after deletions (default = no) */
  119.     columns = 80,    /* Number of columns in a line. */
  120.     len      = 0,    /* Length of line */
  121.     mark     = 0,    /* Mark the line (High Priority) */
  122.     tcap     = 1,    /* Read Termcap stuff. */
  123.     tcapok   = 0,    /* TERM found in Termcap file. */
  124.     rem_work = 1,    /* working on reminder file by default */
  125.     search   = 0,    /* search option seen on command line */
  126.     status;        /* Hold status returned by sys calls and such */
  127.  
  128. main(argc, argv)
  129. int    argc;
  130. char    *argv[];
  131. { 
  132.  
  133. /* Get RSINIT environment variable to find options desired */
  134.  
  135. env = getenv("RSINIT");
  136.  
  137. while (*env) {
  138.     switch(*env++) {
  139.         case 'a' : adisplay++; break;
  140.         case 'd' : ddisplay++; break;
  141.         case 'A' : Adisplay++; break;
  142.         case 'D' : Ddisplay++; break;
  143.         case 'I' : tcap = 0;   break;
  144.         case 'U' :
  145.             mark_on  = "us";
  146.             mark_off = "ue";
  147.             break;
  148.         case 'B' :
  149.             mark_on  = "bo";
  150.             mark_off = "be";
  151.             break;
  152.         case 'S' :
  153.             mark_on  = "ss";
  154.             mark_off = "ss";
  155.             break;
  156.     }
  157. }
  158.  
  159.  
  160. /* Get users HOME directory and construct default name for reminder file */
  161.  
  162. sprintf(fname, "%s%s", getenv("HOME"), RSFILE);
  163.  
  164. /* Find out what the user wants to do */
  165.  
  166. while ( --argc > 0 && (*++argv)[0] == '-')
  167.     for (fun = argv[0]+1; *fun != '\0'; fun++)
  168.         switch(*fun) {
  169.         case 'A' :    /* Work on Alternate reminder file */
  170.             env = getenv("RSALT");
  171.             if (!env)
  172.                 env = "phone_numbers";
  173.  
  174.             sprintf(fname, "%s/.%s", getenv("HOME"), env);
  175.             entity = env;
  176.             if (islower(entity[0]))
  177.                 entity[0] = toupper(entity[0]);
  178.             rem_work = 0;
  179.             break;
  180.  
  181.         case 'a' :    /* Add reminder(s)/note(s)/alternate(s) */
  182.             add_reminder();
  183.             exit(0);
  184.  
  185.         case 'c' :    /* Add entries to calendar file */
  186.             sprintf(fname, "%s%s", getenv("HOME"), CALENDAR);
  187.             entity = "Calendar commands";
  188.             rem_work = 0;
  189.             add_reminder();
  190.             exit(0);
  191.  
  192.         case 'd' :    /* Delete reminder(s)/note(s)/alternate(s) */
  193.             delete_reminder(argc, argv);
  194.             exit(0);
  195.  
  196.         case 'k' :    /* Kill all reminders/notes/alternates */
  197.             if ( unlink(fname) == 0) {
  198.                 printf("%s killed.\n", entity);
  199.             }
  200.             exit(0);
  201.  
  202.         case 'n' :    /* Work on notes file */
  203.             sprintf(fname, "%s%s", getenv("HOME"), RSNOTES);
  204.             entity = "Notes";
  205.             rem_work = 0;
  206.             break;
  207.  
  208.         case 'p' :    /* print reminders/notes/alternates */
  209.             sprintf(cmd, "%s %s", LPR, fname);
  210.             status = system(cmd);
  211.  
  212.             if (status == 0) {
  213.                 printf("%s will be printed.\n", entity);
  214.                 exit(0);
  215.             }
  216.             else {
  217.                 printf("%s can't be printed, sorry\n", entity);
  218.                 exit(1);
  219.             }
  220.  
  221.         case 's' :    /* search for string in reminders/notes/alts */
  222.             argc--;
  223.             argv++;
  224.             sprintf(sstr, "%s", argv[0]);
  225.             search++;
  226.             break;
  227.         case 'e' : /* -e and -v are equivilent */
  228.         case 'v' : /* Edit reminders/notes/alternates with editor */
  229.             editor = getenv("EDITOR");
  230.             if (!editor)
  231.                 editor = EDITOR;
  232.             sprintf(cmd, "%s %s",editor,fname);
  233.             system(cmd);
  234.             exit(0);
  235.         default:    /* Give em some help */
  236. #ifndef    BIGHELP
  237.             printf("Usage: rs [ -Aaceknpv ] [ -s search_string ] [ -d # ] [ -d #-# ]\n");
  238.             printf("For additional information type:  man rs\n");
  239. #else
  240.             /* You can enable this stuff if you want! */
  241.             printf("Reminder Service commands:\n\n");
  242.             printf("-A\tWork on Alternate reminder file.\n");
  243.             printf("-a\tAdd reminder(s)/note(s)/Alt(s).\n");
  244.             printf("-c\tAdd line(s) to the calendar file.\n");
  245.             printf("-d\tDelete reminder(s)/note(s)/Alt(s).\n");
  246.             printf("-k\tKill all reminders/notes/Alternate.\n");
  247.             printf("-n\tWork on notes.\n");
  248.             printf("-p\tPrint reminders/notes/Alternates.\n");
  249.             printf("-s\tSearch for string.\n");
  250.             printf("-e\tEdit reminders/notes/Alt.\n\n");
  251.             printf("rs with no option will display reminders.\n");
  252.             printf("SEE ALSO rs(1)\n");
  253. #endif    BIGHELP
  254.             exit(0);
  255.         }
  256.  
  257. print_reminders();
  258.  
  259. }
  260.  
  261.  
  262. /* ADD REMINDERS */
  263. /* This routine uses cat to add lines to the reminder/note/alternate file */
  264. /* If you don't like it, add your own getline routine! */
  265.  
  266. add_reminder()
  267. {
  268.     printf("Enter %s then ^d to exit:\n", entity);
  269.  
  270.     sprintf(cmd, "%s %s","/bin/cat >>",fname);
  271.     system(cmd);
  272.     if ( (adisplay && rem_work) || (Adisplay && !rem_work) )
  273.         print_reminders();
  274. }
  275.  
  276.  
  277. /* DELETE REMINDERS/NOTES/ALTERNATES */
  278.  
  279. delete_reminder(argc, argv)
  280.     int    argc;
  281.     char    *argv[];
  282. {
  283.     int    begin,
  284.         end,
  285.         delete_line[MAXLINES];
  286.  
  287.     char    a[4], b[4];
  288.  
  289.     register int    i        = 0,
  290.             j        = 0,
  291.             deleted     = 0,
  292.             line_number = 0,
  293.             printed     = 0;
  294.  
  295.     argc--, argv++;
  296.     for (;argc > 0; argc--, argv++) {
  297.         if (alldigits(*argv)) {
  298.             delete_line[atoi(*argv)] = 1;
  299.         }
  300.         else {
  301.             i = rindex(*argv, '-');
  302.             sscanf(i+1, "%s", b );
  303.             j = ( strlen(*argv) - strlen(b) ) - 1;
  304.             strncpy(a, *argv, j);
  305.             a[j]='\0';
  306.             begin = atoi(a);
  307.             end   = atoi(b);
  308.  
  309.             if (begin < end) {
  310.                 for (j = begin ; j < end+1 ; j++)
  311.                     delete_line[j] = 1;
  312.             }
  313.             else {
  314.                 printf("Illegal range specified.\n");
  315.                 exit(1);
  316.             }
  317.         }
  318.     }
  319.  
  320.     mktemp(rstmp);
  321.     if ((fptmp = fopen(rstmp,"w")) == NULL) {
  322.         print_open_error_exit(rstmp);
  323.     }
  324.  
  325.     if ((fp = fopen(fname,"r")) == NULL) {
  326.         print_open_error_exit(fname);
  327.     }
  328.  
  329.     while (getline(s, MAXLEN) > 0) {
  330.         if (delete_line[++line_number] != 1) {
  331.             fprintf(fptmp,"%s",s);
  332.             printed++;
  333.         }
  334.         else {
  335.             deleted++;
  336.         }
  337.     }
  338.  
  339.     fclose(fp);
  340.     fclose(fptmp);
  341.  
  342.     status = unlink(fname);
  343.     if (status != 0) {
  344.         printf("Can't remove file - %s", fname);
  345.         exit(1);
  346.     }
  347.  
  348.     if (printed) {
  349.         if ((fp = fopen(fname,"w")) == NULL) {
  350.             print_open_error_exit(fname);
  351.         }
  352.  
  353.         if ((fptmp = fopen(rstmp,"r")) == NULL) {
  354.             print_open_error_exit(rstmp);
  355.         }
  356.  
  357.         while (fgets(s, MAXLEN, fptmp) != NULL) {
  358.             fputs(s, fp);
  359.         }
  360.     }
  361.  
  362.     fclose(fp);
  363.     fclose(fptmp);
  364.     status = unlink(rstmp);
  365.  
  366.     if (deleted)
  367.         printf("%d %s deleted.\n", deleted, entity );
  368.  
  369.     if ( (ddisplay && rem_work) || (Ddisplay && !rem_work) )
  370.         print_reminders();
  371. }
  372.  
  373.  
  374. /* PRINT REMINDERS/NOTES/ALTERNATES */
  375. /* This routine will print reminders/notes/alternates */
  376. /* print_line is called to do the printing with */
  377. /* auto wrap.  If a search argument was given, only lines that contain the */
  378. /* search string will be printed. */
  379.  
  380. print_reminders()
  381. {
  382.     register int line_number = 0;
  383.  
  384.     if ((fp = fopen(fname,"r")) == NULL) {
  385.         exit(0);
  386.     }
  387.  
  388.     if (tcap) {
  389.         if (tgetent(buff, getenv("TERM")) == 1) {
  390.             tcapok++;
  391.             columns = tgetnum("co");
  392.             if (columns <= 0)
  393.                 columns = 80;
  394.             columns -= 6;
  395.             a = on;
  396.             tgetstr(mark_on,  &a);
  397.             a = off;
  398.             tgetstr(mark_off, &a);
  399.             if (!strlen(on)) {
  400.                 if (tgetflag("bs"))
  401.                     strcpy(on, "\010*");
  402.                 else {
  403.                     a = on;
  404.                     tgetstr("bc", &a);
  405.                 }
  406.             }
  407.         }
  408.     }
  409.         
  410.     printf("\n%s:\n", entity);
  411.  
  412.     while ((len = getline(s, MAXLEN)) > 0) {
  413.         if (search) {
  414.             if (instr(s, sstr) != -1) {
  415.                 printf("%3d. ", ++line_number);
  416.                 if (tcapok)
  417.                     find_mark();
  418.                 if (mark)
  419.                     printf("%s", on);
  420.                 print_line(s, columns);
  421.                 if (mark) {
  422.                     printf("%s", off);
  423.                     mark = 0;
  424.                 }
  425.             }
  426.             else
  427.                 line_number++;
  428.         }
  429.         else {
  430.             printf("%3d. ", ++line_number);
  431.             if (tcapok)
  432.                 find_mark();
  433.             if (mark)
  434.                 printf("%s", on);
  435.             print_line(s, columns);
  436.             if (mark) {
  437.                 printf("%s", off);
  438.                 mark = 0;
  439.             }
  440.         }
  441.     }
  442.  
  443.     printf("\n");
  444.  
  445.     fclose(fp);
  446. }
  447.  
  448. getline(s, lim)
  449. char s[];
  450. int  lim;
  451. {
  452.     register int i = 0;
  453.     register int c;
  454.  
  455.     while (--lim > 0 && (c=getc(fp)) != EOF && c != '\n')
  456.         s[i++] = c;
  457.  
  458.     if (c == '\n')
  459.         s[i++] = c;
  460.  
  461.     s[i] = '\0';
  462.  
  463.     return(i);
  464. }
  465.  
  466. alldigits(s)
  467. register char *s;
  468. {
  469.     register c = *s++;
  470.  
  471.     do {
  472.     if (!isdigit(c))
  473.         return(0);
  474.     }
  475.     while (c = *s++);
  476.  
  477.     return(1);
  478. }
  479.  
  480. instr(s, t)
  481. char s[], t[];
  482. {
  483.     register int i, j, k;
  484.  
  485.     for (i = 0; s[i] != '\0' ; i++) {
  486.         for (j=i, k=0 ; t[k] != '\0' && s[j]==t[k] ; j++ , k++)
  487.             ;
  488.         if (t[k] == '\0')
  489.             return(i);
  490.     }
  491.     return(-1);
  492. }
  493.  
  494. print_open_error_exit(file_name)
  495. char    file_name[];
  496. {
  497.     printf("Can't open file - %s\n",file_name);
  498.     exit(1);
  499. }
  500.  
  501. /* This routine will wrap lines greater than 75 characters long.      */
  502. /* An attempt is made to break the line up after a word.  If a "word" */
  503. /* is greater than 75 characters, the word will be split.             */ 
  504. /*     pur-ee!mjs                              */
  505.  
  506. #define SPACE    ' '
  507. int print_line (line, maxlen)
  508. char    line[];            /* string to be printed */
  509. unsigned int    maxlen;        /* longest line permitted for output */
  510. {
  511.     register int    index,    /* used in for loops */
  512.                     breaking_pt,/* index in line[] at point to break line 
  513.                 */
  514.                     nospace = 0,/* set to TRUE if no space is found */
  515.                     last_br_pt = 0,/* last breaking point */
  516.                     line_len,    /* number of characters in line[] */
  517.                     done = 0;    /* set to TRUE if finished */
  518.  
  519.  /* if line[] isn't longer than the longest line permitted, we can just
  520.     print it, and return. */
  521.  
  522.     line_len = strlen (line);
  523.  
  524.     if (strlen (line) <= maxlen) {
  525.     printf ("%s", line);
  526.     return;
  527.     }
  528.  
  529.     do {
  530.     /* set breaking_pt at point in line[] where we should break the line.
  531.        Do this by start looking backwards from maxlen until a space is
  532.        found. */
  533.  
  534.     for (index = (maxlen + last_br_pt); line[index] != SPACE; --index) {
  535.         if (index == last_br_pt) {
  536.         nospace = 1;
  537.         break;
  538.         }
  539.         if (index >= line_len) {
  540.         index = line_len - 1;   /* 1 gets added to it below */
  541.         done = 1;
  542.         break;
  543.         }
  544.     }
  545.     breaking_pt = index + 1;
  546.  
  547.     /* if there is no space found, set breaking point to MAXLEN */
  548.  
  549.     if (nospace == 1) {
  550.         breaking_pt = maxlen + last_br_pt;
  551.         nospace = 0;    /* reset flag */
  552.     }
  553.     /* print line[] up to breaking point */
  554.  
  555.     for (index = last_br_pt; index < breaking_pt; ++index) 
  556.         putchar (line[index]);
  557.  
  558.  
  559.         if (last_br_pt == 0) /* this is our first time through */
  560.             maxlen -= 5; /* for indenting */
  561.         if (!done) {
  562.         if (mark)
  563.             printf("%s", off);
  564.  
  565.             printf("\n     "); /* indent */
  566.  
  567.         if (mark)
  568.             printf("%s", on);
  569.     }
  570.  
  571.     last_br_pt = breaking_pt;
  572.     } while (!done);
  573. }
  574. find_mark()
  575. {
  576.     if (s[len-2] == '\07') {
  577.         mark = 1;
  578.         s[len-2] = '\n';
  579.         s[len-1] = '\0';
  580.     }
  581. }
  582.