6 * Copyright (C) 1987 by the Massachusetts Institute of Technology
7 * For copying and distribution information, please see the file
12 static char *rcsid_mr_util_c = "$Header$";
15 #include <mit-copyright.h>
16 #include "mr_server.h"
19 #include <sys/types.h>
28 register int count = 0;
29 register unsigned char c;
30 if (len <= 2) return buf;
31 *buf++ = '"'; count++; len--;
32 for(; (count < 40) && (len > 1) && (c = *cp);
33 cp++, --len, ++count) {
34 if (c == '\\' || c == '"') *buf++ = '\\';
35 if (isprint(c)) *buf++ = c;
37 sprintf(buf, "\\%03o", c);
38 buf = index(buf, '\0');
41 if (len > 1) { *buf++ = '"'; count++; len--; }
42 if (len > 3 && count >= 40) {
43 *buf++ = '.'; count++; len--;
44 *buf++ = '.'; count++; len--;
45 *buf++ = '.'; count++; len--;
47 if (len > 1) *buf = '\0';
51 log_args(tag, version, argc, argv)
62 sprintf(buf, "%s[%d]: ", tag, version);
63 for (bp = buf; *bp; bp++);
65 for (i = 0; i < argc && ((buf - bp) + 1024) > 2; i++) {
70 bp = requote(bp, argv[i], (buf - bp) + 1024);
73 com_err(whoami, 0, "%s", buf);
76 void mr_com_err(whoami, code, fmt, pvar)
82 extern char *error_message();
83 extern client *cur_client;
86 fputs(whoami, stderr);
87 if (cur_client) fprintf(stderr, "[#%d]", cur_client->id);
91 fputs(error_message(code), stderr);
94 _doprnt(fmt, pvar, stderr);
100 /* mr_trim_args: passed an argument vector, it will trim any trailing
101 * spaces on the args by writing a null into the string. If an argument
102 * appears to be binary instead of ASCII, it will not be trimmed.
105 int mr_trim_args(argc, argv)
110 register unsigned char *p, *lastch;
112 for (arg = argv; argc--; arg++) {
113 for (lastch = p = (unsigned char *) *arg; *p; p++) {
114 /* If any byte in the string has the high bit set, assume
115 * that it is binary and we do not want to trim it.
116 * Setting p = lastch will cause us not to trim the string
117 * when we break out of this inner loop.
127 if (isspace(*lastch))
137 /* returns a copy of the argv and all of it's strings */
139 char **mr_copy_args(argv, argc)
146 a = (char **) malloc(argc * sizeof(char *));
149 for (i = 0; i < argc; i++)
150 a[i] = strsave(argv[i]);