Annotation of 43BSDTahoe/new/rcs/src/rcsmerge.c, revision 1.1.1.1

1.1       root        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,4)==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("/tmp/",TMPFILE1);
                    135:                 temp2file=mktempfile("/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: 

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.