2 * Copyright (c) 1992, Brian Berliner and Jeff Polk
3 * Copyright (c) 1989-1992, Brian Berliner
5 * You may distribute under the terms of the GNU General Public License as
6 * specified in the README file that comes with the CVS source distribution.
8 * Show last revision where each line modified
10 * Prints the specified files with each line annotated with the revision
11 * number where it was last modified. With no argument, annotates all
12 * all the files in the directory (recursive by default).
17 /* Options from the command line. */
19 static int force_tag_match = 1;
20 static int force_binary = 0;
21 static char *tag = NULL;
22 static int tag_validated;
23 static char *date = NULL;
25 static int is_rannotate;
27 static int annotate_fileproc PROTO ((void *callerdat, struct file_info *));
28 static int rannotate_proc PROTO((int argc, char **argv, char *xwhere,
29 char *mwhere, char *mfile, int shorten,
30 int local, char *mname, char *msg));
32 static const char *const annotate_usage[] =
34 "Usage: %s %s [-lRfF] [-r rev] [-D date] [files...]\n",
35 "\t-l\tLocal directory only, no recursion.\n",
36 "\t-R\tProcess directories recursively.\n",
37 "\t-f\tUse head revision if tag/date not found.\n",
38 "\t-F\tAnnotate binary files.\n",
39 "\t-r rev\tAnnotate file as of specified revision/tag.\n",
40 "\t-D date\tAnnotate file as of specified date.\n",
41 "(Specify the --help global option for a list of other help options)\n",
45 /* Command to show the revision, date, and author where each line of a
57 is_rannotate = (strcmp(cvs_cmd_name, "rannotate") == 0);
60 usage (annotate_usage);
63 while ((c = getopt (argc, argv, "+lr:D:fFR")) != -1)
77 date = Make_Date (optarg);
87 usage (annotate_usage);
95 if (current_parsed_root->isremote)
99 if (is_rannotate && !supported_request ("rannotate"))
100 error (1, 0, "server does not support rannotate");
106 if (!force_tag_match)
110 option_with_arg ("-r", tag);
112 client_senddate (date);
117 for (i = 0; i < argc; i++)
119 send_to_server ("rannotate\012", 0);
123 send_files (argc, argv, local, 0, SEND_NO_CONTENTS);
124 send_file_names (argc, argv, SEND_EXPAND_WILD);
125 send_to_server ("annotate\012", 0);
127 return get_responses_and_close ();
129 #endif /* CLIENT_SUPPORT */
136 for (i = 0; i < argc; i++)
138 err += do_module (db, argv[i], MISC, "Annotating", rannotate_proc,
139 (char *) NULL, 0, local, 0, 0, (char *) NULL);
145 err = rannotate_proc (argc + 1, argv - 1, (char *) NULL,
146 (char *) NULL, (char *) NULL, 0, local, (char *) NULL,
155 rannotate_proc (argc, argv, xwhere, mwhere, mfile, shorten, local, mname, msg)
166 /* Begin section which is identical to patch_proc--should this
167 be abstracted out somehow? */
176 repository = xmalloc (strlen (current_parsed_root->directory) + strlen (argv[0])
177 + (mfile == NULL ? 0 : strlen (mfile) + 1) + 2);
178 (void) sprintf (repository, "%s/%s", current_parsed_root->directory, argv[0]);
179 where = xmalloc (strlen (argv[0]) + (mfile == NULL ? 0 : strlen (mfile) + 1)
181 (void) strcpy (where, argv[0]);
183 /* if mfile isn't null, we need to set up to do only part of the module */
189 /* if the portion of the module is a path, put the dir part on repos */
190 if ((cp = strrchr (mfile, '/')) != NULL)
193 (void) strcat (repository, "/");
194 (void) strcat (repository, mfile);
195 (void) strcat (where, "/");
196 (void) strcat (where, mfile);
200 /* take care of the rest */
201 path = xmalloc (strlen (repository) + strlen (mfile) + 5);
202 (void) sprintf (path, "%s/%s", repository, mfile);
205 /* directory means repository gets the dir tacked on */
206 (void) strcpy (repository, path);
207 (void) strcat (where, "/");
208 (void) strcat (where, mfile);
220 /* cd to the starting repository */
221 if ( CVS_CHDIR (repository) < 0)
223 error (0, errno, "cannot chdir to %s", repository);
227 /* End section which is identical to patch_proc. */
229 if (force_tag_match && tag != NULL)
230 which = W_REPOS | W_ATTIC;
241 if (tag != NULL && !tag_validated)
243 tag_check_valid (tag, argc - 1, argv + 1, local, 0, repository);
247 err = start_recursion (annotate_fileproc, (FILESDONEPROC) NULL,
248 (DIRENTPROC) NULL, (DIRLEAVEPROC) NULL, NULL,
249 argc - 1, argv + 1, local, which, 0, CVS_LOCK_READ,
250 where, 1, repository);
251 if ( which & W_REPOS )
260 annotate_fileproc (callerdat, finfo)
262 struct file_info *finfo;
264 char *expand, *version;
266 if (finfo->rcs == NULL)
269 if (finfo->rcs->flags & PARTIAL)
270 RCS_reparsercsfile (finfo->rcs, (FILE **) NULL, (struct rcsbuffer *) NULL);
272 expand = RCS_getexpand (finfo->rcs);
273 version = RCS_getversion (finfo->rcs, tag, date, force_tag_match,
279 /* Distinguish output for various files if we are processing
281 cvs_outerr ("\nAnnotations for ", 0);
282 cvs_outerr (finfo->fullname, 0);
283 cvs_outerr ("\n***************\n", 0);
285 if (!force_binary && expand && expand[0] == 'b')
287 cvs_outerr ("Skipping binary file -- -F not specified.\n", 0);
291 RCS_deltas (finfo->rcs, (FILE *) NULL, (struct rcsbuffer *) NULL,
292 version, RCS_ANNOTATE, NULL, NULL, NULL, NULL);