home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 22 gnu / 22-gnu.zip / rcs567s.zip / rcs / src / ms / patches < prev    next >
Text File  |  1994-08-04  |  7KB  |  243 lines
  1. diff -cbr rcs-orig/src/conf.heg rcs/src/conf.heg
  2. *** rcs-orig/src/conf.heg    Mon Aug 01 15:32:16 1994
  3. --- rcs/src/conf.heg    Mon Aug 01 15:20:30 1994
  4. ***************
  5. *** 140,145 ****
  6. --- 140,146 ----
  7.   /* This may need changing on non-Unix systems (notably DOS).  */
  8.   #define OPEN_CREAT_READONLY (S_IRUSR|S_IRGRP|S_IROTH) /* lock file mode */
  9.   #define OPEN_O_LOCK 0 /* extra open flags for creating lock file */
  10. + #define OPEN_O_WRONLY O_WRONLY
  11.   
  12.   /* Define or comment out the following symbols as needed.  */
  13.   #define bad_chmod_close 0 /* Can chmod() close file descriptors?  */
  14. diff -cbr rcs-orig/src/conf.sh rcs/src/conf.sh
  15. *** rcs-orig/src/conf.sh    Thu Apr 14 16:14:32 1994
  16. --- rcs/src/conf.sh    Thu Aug 04 19:39:16 1994
  17. ***************
  18. *** 590,595 ****
  19. --- 590,596 ----
  20.   /* This may need changing on non-Unix systems (notably DOS).  */
  21.   #define OPEN_CREAT_READONLY (S_IRUSR|S_IRGRP|S_IROTH) /* lock file mode */
  22.   #define OPEN_O_LOCK 0 /* extra open flags for creating lock file */
  23. + #define OPEN_O_WRONLY O_WRONLY
  24.   
  25.   /* Define or comment out the following symbols as needed.  */
  26.   EOF
  27. diff -cbr rcs-orig/src/ident.c rcs/src/ident.c
  28. *** rcs-orig/src/ident.c    Sun Mar 20 05:52:58 1994
  29. --- rcs/src/ident.c    Tue Mar 22 21:33:28 1994
  30. ***************
  31. *** 239,241 ****
  32. --- 239,247 ----
  33.      VOID fprintf(stdout, "     %c%s\n", KDELIM, line);
  34.      return 0;
  35.   }
  36. + 
  37. +     void 
  38. + exiterr()
  39. + {
  40. +     _exit(EXIT_FAILURE);
  41. + }
  42. diff -cbr rcs-orig/src/rcs.c rcs/src/rcs.c
  43. *** rcs-orig/src/rcs.c    Thu Mar 17 15:05:48 1994
  44. --- rcs/src/rcs.c    Tue Mar 22 21:00:02 1994
  45. ***************
  46. *** 1052,1058 ****
  47. --- 1052,1060 ----
  48.           warn("Mail notification of broken locks is not available."),
  49.   #endif
  50.           warn("Please tell `%s' why you broke the lock.", who);
  51. + #ifdef SENDMAIL
  52.       Ozclose(&mailmess);
  53. + #endif
  54.       return(true);
  55.   }
  56.   
  57. diff -cbr rcs-orig/src/rcsedit.c rcs/src/rcsedit.c
  58. *** rcs-orig/src/rcsedit.c    Sun Mar 20 05:52:58 1994
  59. --- rcs/src/rcsedit.c    Tue Jul 26 20:46:50 1994
  60. ***************
  61. *** 1371,1377 ****
  62.   #    if !open_can_creat
  63.   #        define create(f) creat(f, OPEN_CREAT_READONLY)
  64.   #    else
  65. ! #        define create(f) open(f, OPEN_O_BINARY|OPEN_O_LOCK|O_CREAT|O_EXCL|O_TRUNC|O_WRONLY, OPEN_CREAT_READONLY)
  66.   #    endif
  67.   
  68.       catchints();
  69. --- 1371,1377 ----
  70.   #    if !open_can_creat
  71.   #        define create(f) creat(f, OPEN_CREAT_READONLY)
  72.   #    else
  73. ! #        define create(f) open(f, OPEN_O_BINARY|OPEN_O_LOCK|O_CREAT|O_EXCL|O_TRUNC|OPEN_O_WRONLY, OPEN_CREAT_READONLY)
  74.   #    endif
  75.   
  76.       catchints();
  77. diff -cbr rcs-orig/src/rlog.c rcs/src/rlog.c
  78. *** rcs-orig/src/rlog.c    Thu Apr 14 16:14:06 1994
  79. --- rcs/src/rlog.c    Thu Apr 14 16:14:34 1994
  80. ***************
  81. *** 208,218 ****
  82.   static struct lockers *lockerlist;
  83.   static struct stateattri *statelist;
  84.   
  85.   
  86.   mainProg(rlogId, "rlog", "$Id: rlog.c,v 5.16 1994/04/13 16:30:34 eggert Exp $")
  87.   {
  88.       static char const cmdusage[] =
  89. !         "\nrlog usage: rlog -{bhLNRt} -ddates -l[lockers] -r[revs] -sstates -Vn -w[logins] -xsuff -zzone file ...";
  90.   
  91.       register FILE *out;
  92.       char *a, **newargv;
  93. --- 208,221 ----
  94.   static struct lockers *lockerlist;
  95.   static struct stateattri *statelist;
  96.   
  97. + static int onlyid;
  98. + static char const *numrev2symbrev P((char const *numrev));
  99. + 
  100.   
  101.   mainProg(rlogId, "rlog", "$Id: rlog.c,v 5.16 1994/04/13 16:30:34 eggert Exp $")
  102.   {
  103.       static char const cmdusage[] =
  104. !         "\nrlog usage: rlog -{bhLNRtIZ} -ddates -l[lockers] -r[revs] -sstates -Vn -w[logins] -xsuff -zzone file ...";
  105.   
  106.       register FILE *out;
  107.       char *a, **newargv;
  108. ***************
  109. *** 226,231 ****
  110. --- 229,235 ----
  111.       int descflag, selectflag;
  112.       int onlylockflag;  /* print only files with locks */
  113.       int onlyRCSflag;  /* print only RCS pathname */
  114. +     int onlylockers = 0;
  115.       int pre5;
  116.       int shownames;
  117.       int revno;
  118. ***************
  119. *** 252,257 ****
  120. --- 256,269 ----
  121.               onlyRCSflag =true;
  122.               break;
  123.   
  124. +         case 'I':
  125. +             onlyid = (*a == 'I') ? 2 : 1;
  126. +             break;
  127. + 
  128. +         case 'Z':
  129. +             onlylockers = (*a == 'Z') ? 2 : 1;
  130. +             break;
  131. + 
  132.                   case 'l':
  133.                           lockflag = true;
  134.               getlocker(a);
  135. ***************
  136. *** 353,358 ****
  137. --- 365,431 ----
  138.            * workname contains the name of the working file.
  139.                */
  140.   
  141. +         /* Options 'Z' and 'ZZ' added to quickly get the relevant Data
  142. +          * for locked File(s)/Revisions.
  143. +          * Options 'I' and 'II' added to easily get Information about
  144. +          * unlocked File(s) of the specified Revision(s). These Records
  145. +          * could be used as an Entry of an Revision-List.
  146. +          * The single-option Version prints Basenames, the double-option
  147. +          * Version prints Filenames with the full path.
  148. +          */
  149. +         if (onlyid) {
  150. +           if (Locks) {         /* Issue Warnings for locked Versions */
  151. +         currlock = Locks;
  152. +         aprintf (stderr, "Warning: there are Locks for File %s:\n",
  153. +              onlyid == 1 ? RCSname : getfullRCSname());
  154. +         while (currlock) {
  155. +           aprintf (stderr, 
  156. +                "\tFile: %s   Revision: %s [%s]  locked by: %s\n",
  157. +                onlyid == 1 ? RCSname : getfullRCSname(), 
  158. +                currlock->delta->num, 
  159. +                numrev2symbrev (currlock->delta->num),
  160. +                currlock->login);
  161. +           currlock = currlock->nextlock;
  162. +         }
  163. +           }
  164. + 
  165. +           if (! Head) continue;
  166. +           gettree ();
  167. +           revno = 0;
  168. +           getnumericrev ();
  169. +           exttree (Head);
  170. +           currdate = duelst;
  171. +           while (currdate) {
  172. +         VOID sprintf (currdate->strtdate,dateform,0,0,0,0,0,0);
  173. +         recentdate (Head, currdate);
  174. +         currdate = currdate->dnext;
  175. +           }
  176. +           revno = extdate (Head);
  177. +           getdesc (false);
  178. +           if (revno) {
  179. +         while (! (delta = readdeltalog())->selector  ||  --revno) ;
  180. +         if (delta->next && countnumflds(delta->num)==2) {
  181. +           while (readdeltalog() != delta->next) ;
  182. +         }
  183. +         putrunk ();
  184. +         putree (Head);
  185. +           }
  186. +           continue;
  187. +         }
  188. + 
  189. +         if (onlylockers) {
  190. +           currlock = Locks;
  191. +           while (currlock) {
  192. +         aprintf (out, "File: %s   Revision: %s [%s]  locked by: %s\n",
  193. +              onlylockers == 1 ? RCSname : getfullRCSname(), 
  194. +              currlock->delta->num, 
  195. +              numrev2symbrev (currlock->delta->num),
  196. +              currlock->login);
  197. +         currlock = currlock->nextlock;
  198. +           }
  199. +           continue;
  200. +         }
  201. + 
  202.           /* Keep only those locks given by -l.  */
  203.           if (lockflag)
  204.           trunclocks();
  205. ***************
  206. *** 560,565 ****
  207. --- 633,648 ----
  208.               return;
  209.   
  210.       out = stdout;
  211. + 
  212. +     if (onlyid) {
  213. +       aprintf (out, 
  214. +            "File: %s   Revision: %s [%s]  Date: %s   Author: %s  State: %s\n",
  215. +            onlyid == 1 ? workname : getfullRCSname(),
  216. +            node->num, numrev2symbrev (node->num),
  217. +            date2str (node->date, datebuf), node->author, node->state);
  218. +       return;
  219. +     }
  220. + 
  221.       aprintf(out,
  222.           "----------------------------\nrevision %s%s",
  223.           node->num,  pre5 ? "        " : ""
  224. ***************
  225. *** 1254,1257 ****
  226. --- 1337,1352 ----
  227.           else
  228.           error("missing `,' near `%c%s'", c, argv+1);
  229.       }
  230. + }
  231. + 
  232. + static char const *numrev2symbrev (numrev)
  233. + char const *numrev;
  234. + {
  235. +     struct assoc const *p;
  236. + 
  237. +     for (p = Symbols; p; p = p->nextassoc) {
  238. +         if (! strcmp (numrev, p->num)) return (p->symbol);
  239. +     }
  240. + 
  241. +     return ("");
  242.   }
  243.