* THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
* IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
- *
- * $Id$
*/
#include <h/mh.h>
+#include <h/utils.h>
#include <pwd.h>
#include <errno.h>
# define MAXHOSTNAMELEN 64
#endif
-#define DEFAULT 1
-#define LOGIN 2
-#define PASSWD 3
-#define ACCOUNT 4
+#define DEFAULT 1
+#define LOGIN 2
+#define PASSWD 3
+#define ACCOUNT 4
#define MACDEF 5
-#define ID 10
-#define MACH 11
+#define ID 10
+#define MACH 11
static char tokval[100];
struct toktab {
- char *tokstr;
- int tval;
+ char *tokstr;
+ int tval;
};
static struct toktab toktabs[] = {
- { "default", DEFAULT },
- { "login", LOGIN },
- { "password", PASSWD },
- { "passwd", PASSWD },
- { "account", ACCOUNT },
- { "machine", MACH },
- { "macdef", MACDEF },
- { 0, 0 }
+ { "default", DEFAULT },
+ { "login", LOGIN },
+ { "password", PASSWD },
+ { "passwd", PASSWD },
+ { "account", ACCOUNT },
+ { "machine", MACH },
+ { "macdef", MACDEF },
+ { 0, 0 }
};
/*
static int token(void);
-int
+void
ruserpass(char *host, char **aname, char **apass)
{
- char *hdir, buf[BUFSIZ];
- int t, usedefault = 0;
- struct stat stb;
-
- hdir = getenv("HOME");
- if (hdir == NULL)
- hdir = ".";
- snprintf(buf, sizeof(buf), "%s/.netrc", hdir);
- cfile = fopen(buf, "r");
- if (cfile == NULL) {
- if (errno != ENOENT)
- perror(buf);
- goto done;
- }
-
- while ((t = token())) {
- switch(t) {
- case DEFAULT:
- usedefault = 1;
- /* FALL THROUGH */
-
- case MACH:
- if (!usedefault) {
- if (token() != ID)
- continue;
- /*
- * Allow match either for user's host name.
- */
- if (strcasecmp(host, tokval) == 0)
- goto match;
- continue;
- }
-match:
- while ((t = token()) && t != MACH && t != DEFAULT) {
+ char *hdir, buf[BUFSIZ];
+ int t, usedefault = 0;
+ struct stat stb;
+
+ hdir = getenv("HOME");
+ if (hdir == NULL)
+ hdir = ".";
+ snprintf(buf, sizeof(buf), "%s/.netrc", hdir);
+ cfile = fopen(buf, "r");
+ if (cfile == NULL) {
+ if (errno != ENOENT)
+ perror(buf);
+ goto done;
+ }
+
+ while ((t = token())) {
switch(t) {
- case LOGIN:
- if (token() && *aname == 0) {
- *aname = malloc((size_t) strlen(tokval) + 1);
- strcpy(*aname, tokval);
- }
- break;
- case PASSWD:
- if (fstat(fileno(cfile), &stb) >= 0 &&
- (stb.st_mode & 077) != 0) {
- fprintf(stderr, "Error - .netrc file not correct mode.\n");
- fprintf(stderr, "Remove password or correct mode.\n");
- goto bad;
- }
- if (token() && *apass == 0) {
- *apass = malloc((size_t) strlen(tokval) + 1);
- strcpy(*apass, tokval);
- }
- break;
- case ACCOUNT:
- break;
-
- case MACDEF:
- goto done_close;
- break;
- default:
- fprintf(stderr, "Unknown .netrc keyword %s\n", tokval);
- break;
+ case DEFAULT:
+ usedefault = 1;
+ /* FALL THROUGH */
+
+ case MACH:
+ if (!usedefault) {
+ if (token() != ID)
+ continue;
+ /*
+ * Allow match either for user's host name.
+ */
+ if (mh_strcasecmp(host, tokval) == 0)
+ goto match;
+ continue;
+ }
+match:
+ while ((t = token()) && t != MACH && t != DEFAULT) {
+ switch(t) {
+ case LOGIN:
+ if (token() && *aname == 0) {
+ *aname = mh_xmalloc((size_t) strlen(tokval) + 1);
+ strcpy(*aname, tokval);
+ }
+ break;
+ case PASSWD:
+ if (fstat(fileno(cfile), &stb) >= 0 &&
+ (stb.st_mode & 077) != 0) {
+ /* We make this a fatal error to force the user to correct it */
+ advise(NULL, "Error - ~/.netrc file must not be world or group readable.");
+ adios(NULL, "Remove password or correct file permissions.");
+ }
+ if (token() && *apass == 0) {
+ *apass = mh_xmalloc((size_t) strlen(tokval) + 1);
+ strcpy(*apass, tokval);
+ }
+ break;
+ case ACCOUNT:
+ break;
+
+ case MACDEF:
+ goto done_close;
+ break;
+ default:
+ fprintf(stderr, "Unknown .netrc keyword %s\n", tokval);
+ break;
+ }
+ }
+ goto done;
}
- }
- goto done;
}
- }
done_close:
- fclose(cfile);
+ fclose(cfile);
done:
- if (!*aname) {
- char tmp[80];
- char *myname;
+ if (!*aname) {
+ char tmp[80];
+ char *myname;
- if ((myname = getlogin()) == NULL) {
- struct passwd *pp;
+ if ((myname = getlogin()) == NULL) {
+ struct passwd *pp;
- if ((pp = getpwuid (getuid())) != NULL)
- myname = pp->pw_name;
- }
- printf("Name (%s:%s): ", host, myname);
+ if ((pp = getpwuid (getuid())) != NULL)
+ myname = pp->pw_name;
+ }
+ printf("Name (%s:%s): ", host, myname);
- fgets(tmp, sizeof(tmp) - 1, stdin);
- tmp[strlen(tmp) - 1] = '\0';
- if (*tmp != '\0') {
- myname = tmp;
+ fgets(tmp, sizeof(tmp) - 1, stdin);
+ tmp[strlen(tmp) - 1] = '\0';
+ if (*tmp != '\0') {
+ myname = tmp;
+ }
+
+ *aname = mh_xmalloc((size_t) strlen(myname) + 1);
+ strcpy (*aname, myname);
}
- *aname = malloc((size_t) strlen(myname) + 1);
- strcpy (*aname, myname);
- }
+ if (!*apass) {
+ char prompt[256];
+ char *mypass;
- if (!*apass) {
- char prompt[256];
- char *mypass;
+ snprintf(prompt, sizeof(prompt), "Password (%s:%s): ", host, *aname);
+ mypass = nmh_getpass(prompt);
- snprintf(prompt, sizeof(prompt), "Password (%s:%s): ", host, *aname);
- mypass = nmh_getpass(prompt);
-
- if (*mypass == '\0') {
- mypass = *aname;
- }
+ if (*mypass == '\0') {
+ mypass = *aname;
+ }
- *apass = malloc((size_t) strlen(mypass) + 1);
- strcpy (*apass, mypass);
- }
+ *apass = mh_xmalloc((size_t) strlen(mypass) + 1);
+ strcpy (*apass, mypass);
+ }
- return(0);
-bad:
- fclose(cfile);
- return(-1);
}
static int
token(void)
{
- char *cp;
- int c;
- struct toktab *t;
-
- if (feof(cfile))
- return (0);
- while ((c = getc(cfile)) != EOF &&
- (c == '\n' || c == '\t' || c == ' ' || c == ','))
- continue;
- if (c == EOF)
- return (0);
- cp = tokval;
- if (c == '"') {
- while ((c = getc(cfile)) != EOF && c != '"') {
- if (c == '\\')
- c = getc(cfile);
- *cp++ = c;
- }
- } else {
- *cp++ = c;
- while ((c = getc(cfile)) != EOF
- && c != '\n' && c != '\t' && c != ' ' && c != ',') {
- if (c == '\\')
- c = getc(cfile);
- *cp++ = c;
+ char *cp;
+ int c;
+ struct toktab *t;
+
+ if (feof(cfile))
+ return (0);
+ while ((c = getc(cfile)) != EOF &&
+ (c == '\n' || c == '\t' || c == ' ' || c == ','))
+ continue;
+ if (c == EOF)
+ return (0);
+ cp = tokval;
+ if (c == '"') {
+ while ((c = getc(cfile)) != EOF && c != '"') {
+ if (c == '\\')
+ c = getc(cfile);
+ *cp++ = c;
+ }
+ } else {
+ *cp++ = c;
+ while ((c = getc(cfile)) != EOF
+ && c != '\n' && c != '\t' && c != ' ' && c != ',') {
+ if (c == '\\')
+ c = getc(cfile);
+ *cp++ = c;
+ }
}
- }
- *cp = 0;
- if (tokval[0] == 0)
- return (0);
- for (t = toktabs; t->tokstr; t++)
- if (!strcmp(t->tokstr, tokval))
- return (t->tval);
- return (ID);
+ *cp = 0;
+ if (tokval[0] == 0)
+ return (0);
+ for (t = toktabs; t->tokstr; t++)
+ if (!strcmp(t->tokstr, tokval))
+ return (t->tval);
+ return (ID);
}
projects / mmh / blobdiff