version 1.36.6.1, 2015/07/27 16:08:18 |
version 1.37, 2014/11/22 15:49:28 |
|
|
return name; |
return name; |
} |
} |
|
|
|
/* |
|
* Takes the name returned by fetchname and looks in RCS directory |
|
* for a checked in version. |
|
*/ |
|
char * |
|
checked_in(char *file) |
|
{ |
|
char *filebase, *filedir, tmpbuf[MAXPATHLEN]; |
|
struct stat filestat; |
|
|
|
filebase = basename(file); |
|
filedir = dirname(file); |
|
|
|
#define try(f, a1, a2, a3) \ |
|
(snprintf(tmpbuf, sizeof tmpbuf, f, a1, a2, a3), stat(tmpbuf, &filestat) == 0) |
|
|
|
if (try("%s/RCS/%s%s", filedir, filebase, RCSSUFFIX) || |
|
try("%s/RCS/%s%s", filedir, filebase, "") || |
|
try("%s/%s%s", filedir, filebase, RCSSUFFIX)) |
|
return file; |
|
|
|
return NULL; |
|
} |
|
|
void |
void |
version(void) |
version(void) |
{ |
{ |