File: [local] / src / usr.bin / cvs / Attic / proto.c (download)
Revision 1.61, Tue Jul 19 00:51:01 2005 UTC (18 years, 10 months ago) by joris
Branch: MAIN
Changes since 1.60: +3 -3 lines
if the user specifies the -Q flag (really quiet) we also
have to send the -q flag (quiet) to the server.
|
/* $OpenBSD: proto.c,v 1.61 2005/07/19 00:51:01 joris Exp $ */
/*
* Copyright (c) 2004 Jean-Francois Brousseau <jfb@openbsd.org>
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
*
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. The name of the author may not be used to endorse or promote products
* derived from this software without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
* INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
* AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL
* THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
* EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
* PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
* OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
* WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
* OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
* ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*/
/*
* CVS client/server protocol
* ==========================
*
* The following code implements the CVS client/server protocol, which is
* documented at the following URL:
* http://www.loria.fr/~molli/cvs/doc/cvsclient_toc.html
*
* The protocol is split up into two parts; the first part is the client side
* of things and is composed of all the response handlers, which are all named
* with a prefix of "cvs_resp_". The second part is the set of request
* handlers used by the server. These handlers process the request and
* generate the appropriate response to send back. The prefix for request
* handlers is "cvs_req_".
*
*/
#include <sys/types.h>
#include <sys/stat.h>
#include <errno.h>
#include <fcntl.h>
#include <libgen.h>
#include <pwd.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include "cvs.h"
#include "log.h"
#include "proto.h"
/* request flags */
#define CVS_REQF_RESP 0x01
static int cvs_initlog (void);
struct cvs_req cvs_requests[] = {
{ CVS_REQ_DIRECTORY, "Directory", 0 },
{ CVS_REQ_MAXDOTDOT, "Max-dotdot", 0 },
{ CVS_REQ_STATICDIR, "Static-directory", 0 },
{ CVS_REQ_STICKY, "Sticky", 0 },
{ CVS_REQ_ENTRY, "Entry", 0 },
{ CVS_REQ_ENTRYEXTRA, "EntryExtra", 0 },
{ CVS_REQ_CHECKINTIME, "Checkin-time", 0 },
{ CVS_REQ_MODIFIED, "Modified", 0 },
{ CVS_REQ_ISMODIFIED, "Is-modified", 0 },
{ CVS_REQ_UNCHANGED, "Unchanged", 0 },
{ CVS_REQ_USEUNCHANGED, "UseUnchanged", 0 },
{ CVS_REQ_NOTIFY, "Notify", 0 },
{ CVS_REQ_NOTIFYUSER, "NotifyUser", 0 },
{ CVS_REQ_QUESTIONABLE, "Questionable", 0 },
{ CVS_REQ_CASE, "Case", 0 },
{ CVS_REQ_UTF8, "Utf8", 0 },
{ CVS_REQ_ARGUMENT, "Argument", 0 },
{ CVS_REQ_ARGUMENTX, "Argumentx", 0 },
{ CVS_REQ_GLOBALOPT, "Global_option", 0 },
{ CVS_REQ_GZIPSTREAM, "Gzip-stream", 0 },
{ CVS_REQ_READCVSRC2, "read-cvsrc2", 0 },
{ CVS_REQ_READWRAP, "read-cvswrappers", 0 },
{ CVS_REQ_READIGNORE, "read-cvsignore", 0 },
{ CVS_REQ_ERRIFREADER, "Error-If-Reader", 0 },
{ CVS_REQ_VALIDRCSOPT, "Valid-RcsOptions", 0 },
{ CVS_REQ_SET, "Set", 0 },
{ CVS_REQ_XPANDMOD, "expand-modules", CVS_REQF_RESP },
{ CVS_REQ_LOG, "log", CVS_REQF_RESP },
{ CVS_REQ_CO, "co", CVS_REQF_RESP },
{ CVS_REQ_EXPORT, "export", CVS_REQF_RESP },
{ CVS_REQ_ANNOTATE, "annotate", CVS_REQF_RESP },
{ CVS_REQ_RDIFF, "rdiff", CVS_REQF_RESP },
{ CVS_REQ_RTAG, "rtag", CVS_REQF_RESP },
{ CVS_REQ_INIT, "init", CVS_REQF_RESP },
{ CVS_REQ_STATUS, "status", CVS_REQF_RESP },
{ CVS_REQ_UPDATE, "update", CVS_REQF_RESP },
{ CVS_REQ_HISTORY, "history", CVS_REQF_RESP },
{ CVS_REQ_IMPORT, "import", CVS_REQF_RESP },
{ CVS_REQ_ADD, "add", CVS_REQF_RESP },
{ CVS_REQ_REMOVE, "remove", CVS_REQF_RESP },
{ CVS_REQ_RELEASE, "release", CVS_REQF_RESP },
{ CVS_REQ_ROOT, "Root", 0 },
{ CVS_REQ_VALIDRESP, "Valid-responses", 0 },
{ CVS_REQ_VALIDREQ, "valid-requests", CVS_REQF_RESP },
{ CVS_REQ_VERSION, "version", CVS_REQF_RESP },
{ CVS_REQ_NOOP, "noop", CVS_REQF_RESP },
{ CVS_REQ_DIFF, "diff", CVS_REQF_RESP },
{ CVS_REQ_CI, "ci", CVS_REQF_RESP },
{ CVS_REQ_TAG, "tag", CVS_REQF_RESP },
{ CVS_REQ_ADMIN, "admin", CVS_REQF_RESP },
};
struct cvs_resp cvs_responses[] = {
{ CVS_RESP_OK, "ok" },
{ CVS_RESP_ERROR, "error" },
{ CVS_RESP_VALIDREQ, "Valid-requests" },
{ CVS_RESP_M, "M" },
{ CVS_RESP_MBINARY, "Mbinary" },
{ CVS_RESP_MT, "MT" },
{ CVS_RESP_E, "E" },
{ CVS_RESP_F, "F" },
{ CVS_RESP_CREATED, "Created" },
{ CVS_RESP_UPDATED, "Updated" },
{ CVS_RESP_UPDEXIST, "Update-existing" },
{ CVS_RESP_MERGED, "Merged" },
{ CVS_RESP_REMOVED, "Removed" },
{ CVS_RESP_CKSUM, "Checksum" },
{ CVS_RESP_CLRSTATDIR, "Clear-static-directory" },
{ CVS_RESP_SETSTATDIR, "Set-static-directory" },
{ CVS_RESP_NEWENTRY, "New-entry" },
{ CVS_RESP_CHECKEDIN, "Checked-in" },
{ CVS_RESP_MODE, "Mode" },
{ CVS_RESP_MODTIME, "Mod-time" },
{ CVS_RESP_MODXPAND, "Module-expansion" },
{ CVS_RESP_SETSTICKY, "Set-sticky" },
{ CVS_RESP_CLRSTICKY, "Clear-sticky" },
{ CVS_RESP_RCSDIFF, "Rcs-diff" },
{ CVS_RESP_TEMPLATE, "Template" },
{ CVS_RESP_COPYFILE, "Copy-file" },
};
#define CVS_NBREQ (sizeof(cvs_requests)/sizeof(cvs_requests[0]))
#define CVS_NBRESP (sizeof(cvs_responses)/sizeof(cvs_responses[0]))
/* hack to receive the remote version without outputting it */
u_int cvs_version_sent = 0;
static char cvs_proto_buf[4096];
/*
* Output files for protocol logging when the CVS_CLIENT_LOG environment
* variable is set.
*/
static int cvs_server_logon = 0;
static FILE *cvs_server_inlog = NULL;
static FILE *cvs_server_outlog = NULL;
static pid_t cvs_subproc_pid;
/* last directory sent with cvs_senddir() */
static char cvs_lastdir[MAXPATHLEN] = "";
/*
* cvs_connect()
*
* Open a client connection to the cvs server whose address is given in
* the <root> variable. The method used to connect depends on the
* setting of the CVS_RSH variable.
* Once the connection has been established, we first send the list of
* responses we support and request the list of supported requests from the
* server. Then, a version request is sent and various global flags are sent.
* Returns 0 on success, or -1 on failure.
*/
int
cvs_connect(struct cvsroot *root)
{
int argc, infd[2], outfd[2], errfd[2];
char *argv[16], *cvs_server_cmd, *vresp;
if (root->cr_method == CVS_METHOD_PSERVER) {
cvs_log(LP_ERR, "no pserver support due to security issues");
return (-1);
} else if ((root->cr_method == CVS_METHOD_KSERVER) ||
(root->cr_method == CVS_METHOD_GSERVER) ||
(root->cr_method == CVS_METHOD_EXT) ||
(root->cr_method == CVS_METHOD_FORK)) {
cvs_log(LP_ERR, "connection method not supported yet");
return (-1);
}
if (root->cr_flags & CVS_ROOT_CONNECTED) {
cvs_log(LP_NOTICE, "already connected to CVSROOT");
return (0);
}
if (pipe(infd) == -1) {
cvs_log(LP_ERRNO,
"failed to create input pipe for client connection");
return (-1);
}
if (pipe(outfd) == -1) {
cvs_log(LP_ERRNO,
"failed to create output pipe for client connection");
(void)close(infd[0]);
(void)close(infd[1]);
return (-1);
}
if (pipe(errfd) == -1) {
cvs_log(LP_ERRNO,
"failed to create error pipe for client connection");
(void)close(infd[0]);
(void)close(infd[1]);
(void)close(outfd[0]);
(void)close(outfd[1]);
return (-1);
}
cvs_subproc_pid = fork();
if (cvs_subproc_pid == -1) {
cvs_log(LP_ERRNO, "failed to fork for cvs server connection");
return (-1);
} else if (cvs_subproc_pid == 0) {
if ((dup2(infd[0], STDIN_FILENO) == -1) ||
(dup2(outfd[1], STDOUT_FILENO) == -1)) {
cvs_log(LP_ERRNO,
"failed to setup standard streams for cvs server");
return (-1);
}
(void)close(infd[1]);
(void)close(outfd[0]);
(void)close(errfd[0]);
argc = 0;
argv[argc++] = cvs_rsh;
if (root->cr_user != NULL) {
argv[argc++] = "-l";
argv[argc++] = root->cr_user;
}
cvs_server_cmd = getenv("CVS_SERVER");
if (cvs_server_cmd == NULL)
cvs_server_cmd = CVS_SERVER_DEFAULT;
argv[argc++] = root->cr_host;
argv[argc++] = cvs_server_cmd;
argv[argc++] = "server";
argv[argc] = NULL;
execvp(argv[0], argv);
cvs_log(LP_ERRNO, "failed to exec");
exit(1);
}
/* we are the parent */
(void)close(infd[0]);
(void)close(outfd[1]);
(void)close(errfd[1]);
root->cr_srvin = fdopen(infd[1], "w");
if (root->cr_srvin == NULL) {
cvs_log(LP_ERRNO, "failed to create pipe stream");
return (-1);
}
root->cr_srvout = fdopen(outfd[0], "r");
if (root->cr_srvout == NULL) {
cvs_log(LP_ERRNO, "failed to create pipe stream");
return (-1);
}
/* make the streams line-buffered */
(void)setvbuf(root->cr_srvin, NULL, _IOLBF, 0);
(void)setvbuf(root->cr_srvout, NULL, _IOLBF, 0);
cvs_initlog();
/*
* Send the server the list of valid responses, then ask for valid
* requests.
*/
if ((vresp = cvs_resp_getvalid()) == NULL) {
cvs_log(LP_ERR, "can't generate list of valid responses");
return (-1);
}
if (cvs_sendreq(root, CVS_REQ_VALIDRESP, vresp) < 0) {
cvs_log(LP_ERR, "failed to get valid responses");
free(vresp);
return (-1);
}
free(vresp);
if (cvs_sendreq(root, CVS_REQ_VALIDREQ, NULL) < 0) {
cvs_log(LP_ERR, "failed to get valid requests from server");
return (-1);
}
/* send the CVSROOT to the server unless it's an init */
if ((cvs_cmdop != CVS_OP_INIT) &&
(cvs_sendreq(root, CVS_REQ_ROOT, root->cr_dir) < 0))
return (-1);
/* don't fail if this request doesn't work */
if (cvs_sendreq(root, CVS_REQ_VERSION, NULL) < 0)
cvs_log(LP_WARN, "failed to get remote version");
/* now share our global options with the server */
if ((verbosity <= 1) &&
(cvs_sendreq(root, CVS_REQ_GLOBALOPT, "-q") < 0))
return (-1);
if ((verbosity == 0) &&
(cvs_sendreq(root, CVS_REQ_GLOBALOPT, "-Q") < 0))
return (-1);
if (cvs_noexec && (cvs_sendreq(root, CVS_REQ_GLOBALOPT, "-n") < 0))
return (-1);
if (cvs_nolog && (cvs_sendreq(root, CVS_REQ_GLOBALOPT, "-l") < 0))
return (-1);
if (cvs_readonly && (cvs_sendreq(root, CVS_REQ_GLOBALOPT, "-r") < 0))
return (-1);
if (cvs_trace && (cvs_sendreq(root, CVS_REQ_GLOBALOPT, "-t") < 0))
return (-1);
/* not sure why, but we have to send this */
if (cvs_sendreq(root, CVS_REQ_USEUNCHANGED, NULL) < 0)
return (-1);
cvs_log(LP_DEBUG, "connected to %s", root->cr_host);
root->cr_flags |= CVS_ROOT_CONNECTED;
return (0);
}
/*
* cvs_disconnect()
*
* Disconnect from the cvs server.
*/
void
cvs_disconnect(struct cvsroot *root)
{
if (!(root->cr_flags & CVS_ROOT_CONNECTED))
return;
cvs_log(LP_DEBUG, "closing connection to %s", root->cr_host);
if (root->cr_srvin != NULL) {
(void)fclose(root->cr_srvin);
root->cr_srvin = NULL;
}
if (root->cr_srvout != NULL) {
(void)fclose(root->cr_srvout);
root->cr_srvout = NULL;
}
root->cr_flags &= ~CVS_ROOT_CONNECTED;
}
/*
* cvs_req_getbyid()
*
*/
struct cvs_req*
cvs_req_getbyid(int reqid)
{
u_int i;
for (i = 0; i < CVS_NBREQ; i++)
if (cvs_requests[i].req_id == reqid)
return &(cvs_requests[i]);
return (NULL);
}
/*
* cvs_req_getbyname()
*/
struct cvs_req*
cvs_req_getbyname(const char *rname)
{
u_int i;
for (i = 0; i < CVS_NBREQ; i++)
if (strcmp(cvs_requests[i].req_str, rname) == 0)
return &(cvs_requests[i]);
return (NULL);
}
/*
* cvs_req_getvalid()
*
* Build a space-separated list of all the requests that this protocol
* implementation supports.
*/
char*
cvs_req_getvalid(void)
{
u_int i;
size_t len;
char *vrstr;
BUF *buf;
buf = cvs_buf_alloc(512, BUF_AUTOEXT);
if (buf == NULL)
return (NULL);
cvs_buf_set(buf, cvs_requests[0].req_str,
strlen(cvs_requests[0].req_str), 0);
for (i = 1; i < CVS_NBREQ; i++) {
if ((cvs_buf_putc(buf, ' ') < 0) ||
(cvs_buf_append(buf, cvs_requests[i].req_str,
strlen(cvs_requests[i].req_str)) < 0)) {
cvs_buf_free(buf);
return (NULL);
}
}
/* NUL-terminate */
if (cvs_buf_putc(buf, '\0') < 0) {
cvs_buf_free(buf);
return (NULL);
}
len = cvs_buf_size(buf);
vrstr = (char *)malloc(len);
if (vrstr == NULL) {
cvs_buf_free(buf);
return (NULL);
}
cvs_buf_copy(buf, 0, vrstr, len);
cvs_buf_free(buf);
return (vrstr);
}
/*
* cvs_resp_getbyid()
*
*/
struct cvs_resp*
cvs_resp_getbyid(int respid)
{
u_int i;
for (i = 0; i < CVS_NBRESP; i++)
if (cvs_responses[i].resp_id == (u_int)respid)
return &(cvs_responses[i]);
return (NULL);
}
/*
* cvs_resp_getbyname()
*/
struct cvs_resp*
cvs_resp_getbyname(const char *rname)
{
u_int i;
for (i = 0; i < CVS_NBRESP; i++)
if (strcmp(cvs_responses[i].resp_str, rname) == 0)
return &(cvs_responses[i]);
return (NULL);
}
/*
* cvs_resp_getvalid()
*
* Build a space-separated list of all the responses that this protocol
* implementation supports.
*/
char*
cvs_resp_getvalid(void)
{
u_int i;
size_t len;
char *vrstr;
BUF *buf;
buf = cvs_buf_alloc(512, BUF_AUTOEXT);
if (buf == NULL)
return (NULL);
cvs_buf_set(buf, cvs_responses[0].resp_str,
strlen(cvs_responses[0].resp_str), 0);
for (i = 1; i < CVS_NBRESP; i++) {
if ((cvs_buf_putc(buf, ' ') < 0) ||
(cvs_buf_append(buf, cvs_responses[i].resp_str,
strlen(cvs_responses[i].resp_str)) < 0)) {
cvs_buf_free(buf);
return (NULL);
}
}
/* NUL-terminate */
if (cvs_buf_putc(buf, '\0') < 0) {
cvs_buf_free(buf);
return (NULL);
}
len = cvs_buf_size(buf);
vrstr = (char *)malloc(len);
if (vrstr == NULL) {
cvs_buf_free(buf);
return (NULL);
}
cvs_buf_copy(buf, 0, vrstr, len);
cvs_buf_free(buf);
return (vrstr);
}
/*
* cvs_sendfile()
*
* Send the mode and size of a file followed by the file's contents.
* Returns 0 on success, or -1 on failure.
*/
int
cvs_sendfile(struct cvsroot *root, const char *path)
{
int fd, l;
ssize_t ret;
char buf[4096];
struct stat st;
cvs_log(LP_TRACE, "Sending file `%s' to server", basename(path));
if (stat(path, &st) == -1) {
cvs_log(LP_ERRNO, "failed to stat `%s'", path);
return (-1);
}
if (cvs_modetostr(st.st_mode, buf, sizeof(buf)) < 0)
return (-1);
fd = open(path, O_RDONLY, 0);
if (fd == -1) {
cvs_log(LP_ERRNO, "failed to open `%s'", path);
return (-1);
}
if (cvs_sendln(root, buf) < 0) {
(void)close(fd);
return (-1);
}
l = snprintf(buf, sizeof(buf), "%lld\n", st.st_size);
if (l == -1 || l >= (int)sizeof(buf))
return (-1);
if (cvs_sendln(root, buf) < 0) {
(void)close(fd);
return (-1);
}
while ((ret = read(fd, buf, sizeof(buf))) != 0) {
if (ret == -1) {
(void)close(fd);
cvs_log(LP_ERRNO, "failed to read file `%s'", path);
return (-1);
}
if (cvs_sendraw(root, buf, (size_t)ret) < 0) {
(void)close(fd);
return (-1);
}
}
(void)close(fd);
return (0);
}
/*
* cvs_recvfile()
*
* Receive the mode and size of a file followed the file's contents and
* create or update the file whose path is <path> with the received
* information.
*/
BUF*
cvs_recvfile(struct cvsroot *root, mode_t *mode)
{
size_t len;
ssize_t ret;
off_t fsz, cnt;
char buf[4096], *ep;
BUF *fbuf;
fbuf = cvs_buf_alloc(sizeof(buf), BUF_AUTOEXT);
if (fbuf == NULL)
return (NULL);
if ((cvs_getln(root, buf, sizeof(buf)) < 0) ||
(cvs_strtomode(buf, mode) < 0)) {
cvs_buf_free(fbuf);
return (NULL);
}
if (cvs_getln(root, buf, sizeof(buf)) < 0) {
cvs_buf_free(fbuf);
return (NULL);
}
fsz = (off_t)strtol(buf, &ep, 10);
if (*ep != '\0') {
cvs_log(LP_ERR, "parse error in file size transmission");
cvs_buf_free(fbuf);
return (NULL);
}
cnt = 0;
do {
len = MIN(sizeof(buf), (size_t)(fsz - cnt));
if (len == 0)
break;
ret = cvs_recvraw(root, buf, len);
if (ret == -1) {
cvs_buf_free(fbuf);
return (NULL);
}
if (cvs_buf_append(fbuf, buf, (size_t)ret) == -1) {
cvs_log(LP_ERR,
"failed to append received file data");
cvs_buf_free(fbuf);
return (NULL);
}
cnt += (off_t)ret;
} while (cnt < fsz);
return (fbuf);
}
/*
* cvs_sendreq()
*
* Send a request to the server of type <rid>, with optional arguments
* contained in <arg>, which should not be terminated by a newline.
* Returns 0 on success, or -1 on failure.
*/
int
cvs_sendreq(struct cvsroot *root, u_int rid, const char *arg)
{
int ret, l;
struct cvs_req *req;
if (root->cr_srvin == NULL) {
cvs_log(LP_ERR, "cannot send request %u: Not connected", rid);
return (-1);
}
req = cvs_req_getbyid(rid);
if (req == NULL) {
cvs_log(LP_ERR, "unsupported request type %u", rid);
return (-1);
}
/* is this request supported by the server? */
if (!CVS_GETVR(root, req->req_id)) {
if (rid == CVS_REQ_VERSION) {
ret = cvs_sendreq(root, CVS_REQ_NOOP, arg);
} else {
cvs_log(LP_WARN,
"remote end does not support request `%s'",
req->req_str);
ret = -1;
}
return (ret);
}
l = snprintf(cvs_proto_buf, sizeof(cvs_proto_buf), "%s%s%s\n",
req->req_str, (arg == NULL) ? "" : " ", (arg == NULL) ? "" : arg);
if (l == -1 || l >= (int)sizeof(cvs_proto_buf))
return (-1);
if (cvs_server_inlog != NULL)
fputs(cvs_proto_buf, cvs_server_inlog);
ret = fputs(cvs_proto_buf, root->cr_srvin);
if (ret == EOF) {
cvs_log(LP_ERRNO, "failed to send request to server");
return (-1);
}
if (rid == CVS_REQ_VERSION)
cvs_version_sent = 1;
if (req->req_flags & CVS_REQF_RESP)
ret = cvs_getresp(root);
return (ret);
}
/*
* cvs_getresp()
*
* Get a response from the server. This call will actually read and handle
* responses from the server until one of the response handlers returns
* non-zero (either an error occurred or the end of the response was reached).
* Returns the number of handled commands on success, or -1 on failure.
*/
int
cvs_getresp(struct cvsroot *root)
{
int nbcmd, ret;
size_t len;
nbcmd = 0;
do {
/* wait for incoming data */
if (fgets(cvs_proto_buf, sizeof(cvs_proto_buf),
root->cr_srvout) == NULL) {
if (feof(root->cr_srvout))
return (0);
cvs_log(LP_ERRNO,
"failed to read response from server");
return (-1);
}
if (cvs_server_outlog != NULL)
fputs(cvs_proto_buf, cvs_server_outlog);
if ((len = strlen(cvs_proto_buf)) != 0) {
/* if len - 1 != '\n' the line is truncated */
if (cvs_proto_buf[len - 1] == '\n')
cvs_proto_buf[--len] = '\0';
}
ret = cvs_resp_handle(root, cvs_proto_buf);
nbcmd++;
} while (ret == 0);
if (ret > 0)
ret = nbcmd;
return (ret);
}
/*
* cvs_getln()
*
* Get a line from the remote end and store it in <lbuf>. The terminating
* newline character is stripped from the result.
* Returns the length in bytes of the line (not including the NUL byte), or
* -1 on failure.
*/
int
cvs_getln(struct cvsroot *root, char *lbuf, size_t len)
{
size_t rlen;
FILE *in;
if (cvs_cmdop == CVS_OP_SERVER)
in = stdin;
else
in = root->cr_srvout;
if (fgets(lbuf, len, in) == NULL) {
if (ferror(in)) {
cvs_log(LP_ERRNO, "failed to read line");
return (-1);
}
if (feof(in))
*lbuf = '\0';
}
if (cvs_server_outlog != NULL)
fputs(lbuf, cvs_server_outlog);
rlen = strlen(lbuf);
if ((rlen > 0) && (lbuf[rlen - 1] == '\n'))
lbuf[--rlen] = '\0';
return (rlen);
}
/*
* cvs_sendresp()
*
* Send a response of type <rid> to the client, with optional arguments
* contained in <arg>, which should not be terminated by a newline.
* Returns 0 on success, or -1 on failure.
*/
int
cvs_sendresp(u_int rid, const char *arg)
{
int ret;
struct cvs_resp *resp;
resp = cvs_resp_getbyid(rid);
if (resp == NULL) {
cvs_log(LP_ERR, "unsupported response type %u", rid);
return (-1);
}
ret = fputs(resp->resp_str, stdout);
if (ret == EOF) {
cvs_log(LP_ERRNO, "failed to send response to client");
} else {
if (arg != NULL) {
putc(' ', stdout);
fputs(arg, stdout);
}
putc('\n', stdout);
}
return (0);
}
#ifdef notyet
/*
* cvs_getreq()
*
* Get a request from the client.
*/
int
cvs_getreq(void)
{
int nbcmd;
nbcmd = 0;
do {
/* wait for incoming data */
if (fgets(cvs_proto_buf, sizeof(cvs_proto_buf),
stdin) == NULL) {
if (feof(stdin))
return (0);
cvs_log(LP_ERRNO,
"failed to read request from client");
return (-1);
}
if ((len = strlen(cvs_proto_buf)) != 0) {
if (cvs_proto_buf[len - 1] != '\n') {
/* truncated line */
} else
cvs_proto_buf[--len] = '\0';
}
ret = cvs_resp_handle(cvs_proto_buf);
} while (ret == 0);
}
#endif
/*
* cvs_sendln()
*
* Send a single line <line> string to the remote end. The line is sent as is,
* without any modifications.
* Returns 0 on success, or -1 on failure.
*/
int
cvs_sendln(struct cvsroot *root, const char *line)
{
int nl;
size_t len;
FILE *out;
if (cvs_cmdop == CVS_OP_SERVER)
out = stdout;
else
out = root->cr_srvin;
nl = 0;
len = strlen(line);
if ((len > 0) && (line[len - 1] != '\n'))
nl = 1;
if (cvs_server_inlog != NULL) {
fputs(line, cvs_server_inlog);
if (nl)
putc('\n', cvs_server_inlog);
}
fputs(line, out);
if (nl)
putc('\n', out);
return (0);
}
/*
* cvs_sendraw()
*
* Send the first <len> bytes from the buffer <src> to the server.
*/
int
cvs_sendraw(struct cvsroot *root, const void *src, size_t len)
{
FILE *out;
if (cvs_cmdop == CVS_OP_SERVER)
out = stdout;
else
out = root->cr_srvin;
if (cvs_server_inlog != NULL)
fwrite(src, sizeof(char), len, cvs_server_inlog);
if (fwrite(src, sizeof(char), len, out) < len) {
cvs_log(LP_ERR, "failed to send data");
return (-1);
}
return (0);
}
/*
* cvs_recvraw()
*
* Receive the first <len> bytes from the buffer <src> to the server.
*/
ssize_t
cvs_recvraw(struct cvsroot *root, void *dst, size_t len)
{
size_t ret;
FILE *in;
if (cvs_cmdop == CVS_OP_SERVER)
in = stdin;
else
in = root->cr_srvout;
ret = fread(dst, sizeof(char), len, in);
if (ret == 0)
return (-1);
if (cvs_server_outlog != NULL)
fwrite(dst, sizeof(char), len, cvs_server_outlog);
return (ssize_t)ret;
}
/*
* cvs_senddir()
*
* Send a `Directory' request along with the 2 paths that follow it. If
* the directory info to be sent is the same as the last info sent, the
* call does nothing and simply returns without an error.
*/
int
cvs_senddir(struct cvsroot *root, CVSFILE *dir)
{
size_t len;
char lbuf[MAXPATHLEN], rbuf[MAXPATHLEN];
if (dir->cf_type != DT_DIR)
return (-1);
cvs_file_getpath(dir, lbuf, sizeof(lbuf));
if (strcmp(lbuf, cvs_lastdir) == 0 && cvs_cmdop != CVS_OP_CHECKOUT)
return (0);
if (dir->cf_repo == NULL)
strlcpy(rbuf, root->cr_dir, sizeof(rbuf));
else {
len = cvs_path_cat(root->cr_dir, dir->cf_repo, rbuf,
sizeof(rbuf));
if (len >= sizeof(rbuf))
return (-1);
}
if ((cvs_sendreq(root, CVS_REQ_DIRECTORY, lbuf) < 0) ||
(cvs_sendln(root, rbuf) < 0))
return (-1);
strlcpy(cvs_lastdir, lbuf, sizeof(cvs_lastdir));
return (0);
}
/*
* cvs_sendarg()
*
* Send the argument <arg> to the server. The argument <append> is used to
* determine if the argument should be simply appended to the last argument
* sent or if it should be created as a new argument (0).
*/
int
cvs_sendarg(struct cvsroot *root, const char *arg, int append)
{
return cvs_sendreq(root, ((append == 0) ?
CVS_REQ_ARGUMENT : CVS_REQ_ARGUMENTX), arg);
}
/*
* cvs_sendentry()
*
* Send an `Entry' request to the server along with the mandatory fields from
* the CVS entry <ent> (which are the name and revision).
*/
int
cvs_sendentry(struct cvsroot *root, const CVSFILE *file)
{
int l;
char ebuf[128], numbuf[64];
if (file->cf_type != DT_REG) {
cvs_log(LP_ERR, "attempt to send Entry for non-regular file");
return (-1);
}
/* don't send Entry for unknown files */
if (file->cf_cvstat == CVS_FST_UNKNOWN)
return (0);
l = snprintf(ebuf, sizeof(ebuf), "/%s/%s%s///", file->cf_name,
(file->cf_cvstat == CVS_FST_REMOVED) ? "-" : "",
rcsnum_tostr(file->cf_lrev, numbuf, sizeof(numbuf)));
if (l == -1 || l >= (int)sizeof(ebuf)) {
errno = ENAMETOOLONG;
cvs_log(LP_ERRNO, "%s", ebuf);
return (-1);
}
return cvs_sendreq(root, CVS_REQ_ENTRY, ebuf);
}
/*
* cvs_initlog()
*
* Initialize protocol logging if the CVS_CLIENT_LOG environment variable is
* set. In this case, the variable's value is used as a path to which the
* appropriate suffix is added (".in" for server input and ".out" for server
* output.
* Returns 0 on success, or -1 on failure.
*/
static int
cvs_initlog(void)
{
int l;
u_int i;
char *env, *envdup, buf[MAXPATHLEN], fpath[MAXPATHLEN];
char rpath[MAXPATHLEN], *s;
struct stat st;
time_t now;
struct passwd *pwd;
/* avoid doing it more than once */
if (cvs_server_logon)
return (0);
env = getenv("CVS_CLIENT_LOG");
if (env == NULL)
return (0);
if ((envdup = strdup(env)) == NULL)
return (-1);
if ((s = strchr(envdup, '%')) != NULL)
*s = '\0';
strlcpy(buf, env, sizeof(buf));
strlcpy(rpath, envdup, sizeof(rpath));
s = buf;
while ((s = strchr(s, '%')) != NULL) {
*s++;
switch (*s) {
case 'c':
strlcpy(fpath, cvs_command, sizeof(fpath));
break;
case 'd':
time(&now);
strlcpy(fpath, ctime(&now), sizeof(fpath));
break;
case 'p':
snprintf(fpath, sizeof(fpath), "%d", getpid());
break;
case 'u':
if ((pwd = getpwuid(getuid())) != NULL)
strlcpy(fpath, pwd->pw_name, sizeof(fpath));
else
fpath[0] = '\0';
endpwent();
break;
default:
fpath[0] = '\0';
break;
}
if (fpath[0] != '\0') {
strlcat(rpath, "-", sizeof(rpath));
strlcat(rpath, fpath, sizeof(rpath));
}
}
for (i = 0; i < UINT_MAX; i++) {
l = snprintf(fpath, sizeof(fpath), "%s-%d.in", rpath, i);
if (l == -1 || l >= (int)sizeof(fpath)) {
errno = ENAMETOOLONG;
cvs_log(LP_ERRNO, "%s", fpath);
return (-1);
}
if (stat(fpath, &st) != -1)
continue;
if (errno != ENOENT)
return (-1);
break;
}
cvs_server_inlog = fopen(fpath, "w");
if (cvs_server_inlog == NULL) {
cvs_log(LP_ERRNO, "failed to open server input log `%s'",
fpath);
return (-1);
}
for (i = 0; i < UINT_MAX; i++) {
l = snprintf(fpath, sizeof(fpath), "%s-%d.out", rpath, i);
if (l == -1 || l >= (int)sizeof(fpath)) {
errno = ENAMETOOLONG;
cvs_log(LP_ERRNO, "%s", fpath);
return (-1);
}
if (stat(fpath, &st) != -1)
continue;
if (errno != ENOENT)
return (-1);
break;
}
cvs_server_outlog = fopen(fpath, "w");
if (cvs_server_outlog == NULL) {
cvs_log(LP_ERRNO, "failed to open server output log `%s'",
fpath);
return (-1);
}
/* make the streams line-buffered */
setvbuf(cvs_server_inlog, NULL, _IOLBF, 0);
setvbuf(cvs_server_outlog, NULL, _IOLBF, 0);
cvs_server_logon = 1;
return (0);
}