home *** CD-ROM | disk | FTP | other *** search
/ rtsi.com / 2014.01.www.rtsi.com.tar / www.rtsi.com / OS9 / TOP / USR / SRC / rcs.t.Z / rcs.t / RCS / SRC / rcsmerge.c < prev    next >
Text File  |  1988-09-26  |  6KB  |  166 lines
  1. /*
  2.  *                       rcsmerge operation
  3.  */
  4. #ifndef lint
  5. static char rcsid[]=
  6. "$Header: /arthur/src/local/bin/rcs/src/RCS/rcsmerge.c,v 4.3 87/10/18 10:38:02 narten Exp $ Purdue CS";
  7. #endif
  8. /*****************************************************************************
  9.  *                       join 2 revisions with respect to a third
  10.  *****************************************************************************
  11.  *
  12.  * Copyright (C) 1982 by Walter F. Tichy
  13.  *                       Purdue University
  14.  *                       Computer Science Department
  15.  *                       West Lafayette, IN 47907
  16.  *
  17.  * All rights reserved. No part of this software may be sold or distributed
  18.  * in any form or by any means without the prior written permission of the
  19.  * author.
  20.  * Report problems and direct all inquiries to Tichy@purdue (ARPA net).
  21.  */
  22.  
  23.  
  24. /* $Log:    rcsmerge.c,v $
  25.  * Revision 4.3  87/10/18  10:38:02  narten
  26.  * Updating version numbers. Changes relative to version 1.1 
  27.  * actually relative to 4.1
  28.  * 
  29.  * Revision 1.3  87/09/24  14:00:31  narten
  30.  * Sources now pass through lint (if you ignore printf/sprintf/fprintf 
  31.  * warnings)
  32.  * 
  33.  * Revision 1.2  87/03/27  14:22:36  jenkins
  34.  * Port to suns
  35.  * 
  36.  * Revision 1.1  84/01/23  14:50:36  kcs
  37.  * Initial revision
  38.  * 
  39.  * Revision 4.1  83/03/28  11:14:57  wft
  40.  * Added handling of default branch.
  41.  * 
  42.  * Revision 3.3  82/12/24  15:29:00  wft
  43.  * Added call to catchsig().
  44.  *
  45.  * Revision 3.2  82/12/10  21:32:02  wft
  46.  * Replaced getdelta() with gettree(); improved error messages.
  47.  *
  48.  * Revision 3.1  82/11/28  19:27:44  wft
  49.  * Initial revision.
  50.  *
  51.  */
  52. #include "rcsbase.h"
  53. #ifndef lint
  54. static char rcsbaseid[] = RCSBASE;
  55. #endif
  56.  
  57. extern int  cleanup();              /* cleanup after signals                */
  58. extern char * mktempfile();         /*temporary file name generator         */
  59. extern struct hshentry * genrevs(); /*generate delta numbers                */
  60. extern int  nerror;                 /*counter for errors                    */
  61.  
  62. char *RCSfilename;
  63. char *workfilename;
  64. char * temp1file, * temp2file;
  65.  
  66. main (argc, argv)
  67. int argc; char **argv;
  68. {
  69.         char * cmdusage;
  70.         char command[NCPPN+revlength+40];
  71.         int  revnums; /* counter for revision numbers given */
  72.         int tostdout;
  73.         char * rev1, * rev2; /*revision numbers*/
  74.         char numericrev[revlength];   /* holds expanded revision number     */
  75.         struct hshentry * gendeltas[hshsize];/*stores deltas to be generated*/
  76.         struct hshentry * target;
  77.  
  78.         catchints();
  79.         cmdid = "rcsmerge";
  80.         cmdusage = "command format:\n    rcsmerge -p -rrev1 -rrev2 file\n    rcsmerge -p -rrev1 file";
  81.         revnums=0;tostdout=false;
  82.  
  83.         while (--argc,++argv, argc>=1 && ((*argv)[0] == '-')) {
  84.                 switch ((*argv)[1]) {
  85.                 case 'p':
  86.                         tostdout=true;
  87.                         /* falls into -r */
  88.                 case 'r':
  89.                         if ((*argv)[2]!='\0') {
  90.                             if (revnums==0) {
  91.                                     rev1= *argv+2; revnums=1;
  92.                             } elif (revnums==1) {
  93.                                     rev2= *argv+2; revnums=2;
  94.                             } else {
  95.                                     faterror("too many revision numbers");
  96.                             }
  97.                         } /* do nothing for empty -r or -p */
  98.                         break;
  99.  
  100.                 default:
  101.                         faterror("unknown option: %s\n%s", *argv,cmdusage);
  102.                 };
  103.         } /* end of option processing */
  104.  
  105.         if (argc<1) faterror("No input file\n%s",cmdusage);
  106.         if (revnums<1) faterror("no base revision number given");
  107.  
  108.         /* now handle all filenames */
  109.  
  110.         if (pairfilenames(argc,argv,true,false)==1) {
  111.  
  112.                 if (argc>2 || (argc==2&&argv[1]!=nil))
  113.                         warn("too many arguments");
  114.                 diagnose("RCS file: %s",RCSfilename);
  115.                 if (!(access(workfilename,1)==0))
  116.                         faterror("Can't open %s",workfilename);
  117.  
  118.                 if (!trysema(RCSfilename,false)) goto end; /* give up */
  119.  
  120.                 gettree();  /* reads in the delta tree */
  121.  
  122.                 if (Head==nil) faterror("no revisions present");
  123.  
  124.  
  125.                 if (!expandsym(rev1,numericrev)) goto end;
  126.                 if (!(target=genrevs(numericrev, (char *)nil, (char *)nil, (char *)nil,gendeltas))) goto end;
  127.                 rev1=target->num;
  128.                 if (revnums==1)  /*get default for rev2 */
  129.                         rev2=Dbranch!=nil?Dbranch->num:Head->num;
  130.                 if (!expandsym(rev2,numericrev)) goto end;
  131.                 if (!(target=genrevs(numericrev, (char *)nil, (char *)nil, (char *)nil,gendeltas))) goto end;
  132.                 rev2=target->num;
  133.  
  134.                 temp1file=mktempfile("/dd/tmp/",TMPFILE1);
  135.                 temp2file=mktempfile("/dd/tmp/",TMPFILE2);
  136.  
  137.                 diagnose("retrieving revision %s",rev1);
  138.                 VOID sprintf(command,"%s/co -q -p%s %s >-%s\n",
  139.                         TARGETDIR,rev1,RCSfilename,temp1file);
  140.                 if (system(command)){
  141.                         faterror("co failed");
  142.                 }
  143.                 diagnose("retrieving revision %s",rev2);
  144.                 VOID sprintf(command,"%s/co -q -p%s %s >-%s\n",
  145.                          TARGETDIR,rev2,RCSfilename,temp2file);
  146.                 if (system(command)){
  147.                         faterror("co failed");
  148.                 }
  149.                 diagnose("Merging differences between %s and %s into %s%s",
  150.                          rev1, rev2, workfilename,
  151.                          tostdout?"; result to stdout":"");
  152.  
  153.                 VOID sprintf(command,"%s %s%s %s %s %s %s\n",MERGE,tostdout?"-p ":"",
  154.                         workfilename,temp1file,temp2file,workfilename,rev2);
  155.                 if (system(command)) {
  156.                         faterror("merge failed");
  157.                 }
  158.         }
  159.  
  160. end:
  161.         VOID cleanup();
  162.         exit(nerror!=0);
  163.  
  164. }
  165.  
  166.