UNIX 7th Ed. - /usr/src/cmd/uucp/gnxseq.c

   1: #include "uucp.h"
   2: #include <sys/types.h>
   3: #include <time.h>
   4: 
   5: 
   6: 
   7: /*******
   8:  *	gnxseq(rmtname)		get next conversation sequence number
   9:  *	char *rmtname;
  10:  *
  11:  *	return - 0 no entry | >0 sequence number
  12:  */
  13: 
  14: gnxseq(rmtname)
  15: char *rmtname;
  16: {
  17:     int count = 0, ct, ret;
  18:     struct tm *tp;
  19:     extern struct tm *localtime();
  20:     time_t clock;
  21:     FILE *fp0, *fp1;
  22:     char buf[BUFSIZ], name[NAMESIZE];
  23: 
  24:     if (ulockf(SQLOCK, SQTIME) != 0)
  25:         return(0);
  26:     if ((fp0 = fopen(SQFILE, "r")) == NULL)
  27:         return(0);
  28:     if ((fp1 = fopen(SQTMP, "w")) == NULL) {
  29:         fclose(fp0);
  30:         return(0);
  31:     }
  32:     chmod(SQTMP, 0400);
  33: 
  34:     while (fgets(buf, BUFSIZ, fp0) != NULL) {
  35:         ret = sscanf(buf, "%s%d", name, &ct);
  36:         if (ret < 2)
  37:             ct = 0;
  38:         name[7] = '\0';
  39:         if (ct > 9998)
  40:             ct = 0;
  41:         if (strcmp(rmtname, name) != SAME) {
  42:             fputs(buf, fp1);
  43:             continue;
  44:         }
  45: 
  46:         /*  found name  */
  47:         count = ++ct;
  48:         time(&clock);
  49:         tp = localtime(&clock);
  50:         fprintf(fp1, "%s %d %d/%d-%d:%d\n", name, ct,
  51:           tp->tm_mon + 1, tp->tm_mday, tp->tm_hour,
  52:           tp->tm_min);
  53:         while (fgets(buf, BUFSIZ, fp0) != NULL)
  54:             fputs(buf, fp1);
  55:     }
  56:     fclose(fp0);
  57:     fclose(fp1);
  58:     if (count == 0) {
  59:         rmlock(SQLOCK);
  60:         unlink(SQTMP);
  61:     }
  62:     return(count);
  63: }
  64: 
  65: 
  66: /***
  67:  *	cmtseq()	commit sequence update
  68:  *
  69:  *	return  0  ok | other - link failed
  70:  */
  71: 
  72: cmtseq()
  73: {
  74:     int ret;
  75: 
  76:     if ((ret = access(SQTMP, 0400)) != 0) {
  77:         rmlock(SQLOCK);
  78:         return(0);
  79:     }
  80:     unlink(SQFILE);
  81:     ret = link(SQTMP, SQFILE);
  82:     unlink(SQTMP);
  83:     rmlock(SQLOCK);
  84:     return(ret);
  85: }
  86: 
  87: /***
  88:  *	ulkseq()	unlock sequence file
  89:  */
  90: 
  91: ulkseq()
  92: {
  93:     unlink(SQTMP);
  94:     rmlock(SQLOCK);
  95: }

Defined functions