1/* $OpenBSD: ldapclient.c,v 1.31 2014/11/16 23:24:44 tedu Exp $ */
| 1/* $OpenBSD: ldapclient.c,v 1.31 2014/11/16 23:24:44 tedu Exp $ */
|
2/* $FreeBSD: head/usr.sbin/ypldap/ldapclient.c 292273 2015-12-15 15:46:14Z araujo $ */
| 2/* $FreeBSD: head/usr.sbin/ypldap/ldapclient.c 297907 2016-04-13 03:36:34Z araujo $ */
|
3 4/* 5 * Copyright (c) 2008 Alexander Schrijver <aschrijver@openbsd.org> 6 * Copyright (c) 2008 Pierre-Yves Ritschard <pyr@openbsd.org> 7 * 8 * Permission to use, copy, modify, and distribute this software for any 9 * purpose with or without fee is hereby granted, provided that the above 10 * copyright notice and this permission notice appear in all copies. 11 * 12 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES 13 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF 14 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR 15 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES 16 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN 17 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF 18 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. 19 */ 20 21#include <sys/types.h> 22#include <sys/param.h> 23#include <sys/queue.h> 24#include <sys/socket.h> 25#include <sys/tree.h> 26 27#include <netinet/in.h> 28#include <arpa/inet.h> 29 30#include <netdb.h> 31#include <errno.h> 32#include <err.h> 33#include <event.h> 34#include <fcntl.h> 35#include <unistd.h> 36#include <pwd.h> 37#include <signal.h> 38#include <stdio.h> 39#include <stdlib.h> 40#include <string.h> 41 42#include "aldap.h" 43#include "ypldap.h" 44 45void client_sig_handler(int, short, void *); 46void client_dispatch_dns(int, short, void *); 47void client_dispatch_parent(int, short, void *); 48void client_shutdown(void); 49void client_connect(int, short, void *); 50void client_configure(struct env *); 51void client_periodic_update(int, short, void *); 52int client_build_req(struct idm *, struct idm_req *, struct aldap_message *, 53 int, int); 54int client_search_idm(struct env *, struct idm *, struct aldap *, 55 char **, char *, int, int, enum imsg_type); 56int client_try_idm(struct env *, struct idm *); 57int client_addr_init(struct idm *); 58int client_addr_free(struct idm *); 59
| 3 4/* 5 * Copyright (c) 2008 Alexander Schrijver <aschrijver@openbsd.org> 6 * Copyright (c) 2008 Pierre-Yves Ritschard <pyr@openbsd.org> 7 * 8 * Permission to use, copy, modify, and distribute this software for any 9 * purpose with or without fee is hereby granted, provided that the above 10 * copyright notice and this permission notice appear in all copies. 11 * 12 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES 13 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF 14 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR 15 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES 16 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN 17 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF 18 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. 19 */ 20 21#include <sys/types.h> 22#include <sys/param.h> 23#include <sys/queue.h> 24#include <sys/socket.h> 25#include <sys/tree.h> 26 27#include <netinet/in.h> 28#include <arpa/inet.h> 29 30#include <netdb.h> 31#include <errno.h> 32#include <err.h> 33#include <event.h> 34#include <fcntl.h> 35#include <unistd.h> 36#include <pwd.h> 37#include <signal.h> 38#include <stdio.h> 39#include <stdlib.h> 40#include <string.h> 41 42#include "aldap.h" 43#include "ypldap.h" 44 45void client_sig_handler(int, short, void *); 46void client_dispatch_dns(int, short, void *); 47void client_dispatch_parent(int, short, void *); 48void client_shutdown(void); 49void client_connect(int, short, void *); 50void client_configure(struct env *); 51void client_periodic_update(int, short, void *); 52int client_build_req(struct idm *, struct idm_req *, struct aldap_message *, 53 int, int); 54int client_search_idm(struct env *, struct idm *, struct aldap *, 55 char **, char *, int, int, enum imsg_type); 56int client_try_idm(struct env *, struct idm *); 57int client_addr_init(struct idm *); 58int client_addr_free(struct idm *); 59
|
60struct aldap *client_aldap_open(struct ypldap_addr *);
| 60struct aldap *client_aldap_open(struct ypldap_addr_list *);
|
61 62/* 63 * dummy wrapper to provide aldap_init with its fd's. 64 */ 65struct aldap *
| 61 62/* 63 * dummy wrapper to provide aldap_init with its fd's. 64 */ 65struct aldap *
|
66client_aldap_open(struct ypldap_addr *addr)
| 66client_aldap_open(struct ypldap_addr_list *addr)
|
67{ 68 int fd = -1; 69 struct ypldap_addr *p; 70
| 67{ 68 int fd = -1; 69 struct ypldap_addr *p; 70
|
71 for (p = addr; p != NULL; p = p->next) {
| 71 TAILQ_FOREACH(p, addr, next) {
|
72 char hbuf[NI_MAXHOST], sbuf[NI_MAXSERV]; 73 struct sockaddr *sa = (struct sockaddr *)&p->ss; 74 75 if (getnameinfo(sa, sa->sa_len, hbuf, sizeof(hbuf), sbuf, 76 sizeof(sbuf), NI_NUMERICHOST | NI_NUMERICSERV)) 77 errx(1, "could not get numeric hostname"); 78 79 if ((fd = socket(sa->sa_family, SOCK_STREAM, 0)) < 0) 80 return NULL; 81 82 if (connect(fd, sa, sa->sa_len) == 0) 83 break; 84 85 warn("connect to %s port %s (%s) failed", hbuf, sbuf, "tcp"); 86 close(fd); 87 } 88 89 if (fd == -1) 90 return NULL; 91 92 return aldap_init(fd); 93} 94 95int 96client_addr_init(struct idm *idm) 97{ 98 struct sockaddr_in *sa_in; 99 struct sockaddr_in6 *sa_in6; 100 struct ypldap_addr *h; 101
| 72 char hbuf[NI_MAXHOST], sbuf[NI_MAXSERV]; 73 struct sockaddr *sa = (struct sockaddr *)&p->ss; 74 75 if (getnameinfo(sa, sa->sa_len, hbuf, sizeof(hbuf), sbuf, 76 sizeof(sbuf), NI_NUMERICHOST | NI_NUMERICSERV)) 77 errx(1, "could not get numeric hostname"); 78 79 if ((fd = socket(sa->sa_family, SOCK_STREAM, 0)) < 0) 80 return NULL; 81 82 if (connect(fd, sa, sa->sa_len) == 0) 83 break; 84 85 warn("connect to %s port %s (%s) failed", hbuf, sbuf, "tcp"); 86 close(fd); 87 } 88 89 if (fd == -1) 90 return NULL; 91 92 return aldap_init(fd); 93} 94 95int 96client_addr_init(struct idm *idm) 97{ 98 struct sockaddr_in *sa_in; 99 struct sockaddr_in6 *sa_in6; 100 struct ypldap_addr *h; 101
|
102 for (h = idm->idm_addr; h != NULL; h = h->next) {
| 102 TAILQ_FOREACH(h, &idm->idm_addr, next) {
|
103 switch (h->ss.ss_family) { 104 case AF_INET: 105 sa_in = (struct sockaddr_in *)&h->ss; 106 if (ntohs(sa_in->sin_port) == 0) 107 sa_in->sin_port = htons(LDAP_PORT); 108 idm->idm_state = STATE_DNS_DONE; 109 break; 110 case AF_INET6: 111 sa_in6 = (struct sockaddr_in6 *)&h->ss; 112 if (ntohs(sa_in6->sin6_port) == 0) 113 sa_in6->sin6_port = htons(LDAP_PORT); 114 idm->idm_state = STATE_DNS_DONE; 115 break; 116 default: 117 fatalx("king bula sez: wrong AF in client_addr_init"); 118 /* not reached */ 119 } 120 } 121 122 return (0); 123} 124 125int 126client_addr_free(struct idm *idm) 127{
| 103 switch (h->ss.ss_family) { 104 case AF_INET: 105 sa_in = (struct sockaddr_in *)&h->ss; 106 if (ntohs(sa_in->sin_port) == 0) 107 sa_in->sin_port = htons(LDAP_PORT); 108 idm->idm_state = STATE_DNS_DONE; 109 break; 110 case AF_INET6: 111 sa_in6 = (struct sockaddr_in6 *)&h->ss; 112 if (ntohs(sa_in6->sin6_port) == 0) 113 sa_in6->sin6_port = htons(LDAP_PORT); 114 idm->idm_state = STATE_DNS_DONE; 115 break; 116 default: 117 fatalx("king bula sez: wrong AF in client_addr_init"); 118 /* not reached */ 119 } 120 } 121 122 return (0); 123} 124 125int 126client_addr_free(struct idm *idm) 127{
|
128 struct ypldap_addr *h, *p;
| 128 struct ypldap_addr *h;
|
129
| 129
|
130 if (idm->idm_addr == NULL) 131 return (-1); 132 133 for (h = idm->idm_addr; h != NULL; h = p) { 134 p = h->next;
| 130 while (!TAILQ_EMPTY(&idm->idm_addr)) { 131 h = TAILQ_FIRST(&idm->idm_addr); 132 TAILQ_REMOVE(&idm->idm_addr, h, next);
|
135 free(h); 136 } 137
| 133 free(h); 134 } 135
|
138 idm->idm_addr = NULL; 139
| |
140 return (0); 141} 142 143void 144client_sig_handler(int sig, short event, void *p) 145{ 146 switch (sig) { 147 case SIGINT: 148 case SIGTERM: 149 client_shutdown(); 150 break; 151 default: 152 fatalx("unexpected signal"); 153 } 154} 155 156void 157client_dispatch_dns(int fd, short events, void *p) 158{ 159 struct imsg imsg; 160 u_int16_t dlen; 161 u_char *data; 162 struct ypldap_addr *h; 163 int n, wait_cnt = 0; 164 struct idm *idm; 165 int shut = 0; 166 167 struct env *env = p; 168 struct imsgev *iev = env->sc_iev_dns; 169 struct imsgbuf *ibuf = &iev->ibuf; 170 171 if ((events & (EV_READ | EV_WRITE)) == 0) 172 fatalx("unknown event"); 173 174 if (events & EV_READ) { 175 if ((n = imsg_read(ibuf)) == -1 && errno != EAGAIN) 176 fatal("imsg_read error"); 177 if (n == 0) 178 shut = 1; 179 } 180 if (events & EV_WRITE) { 181 if ((n = msgbuf_write(&ibuf->w)) == -1 && errno != EAGAIN) 182 fatal("msgbuf_write"); 183 if (n == 0) 184 shut = 1; 185 goto done; 186 } 187 188 for (;;) { 189 if ((n = imsg_get(ibuf, &imsg)) == -1) 190 fatal("client_dispatch_dns: imsg_get error"); 191 if (n == 0) 192 break; 193 194 switch (imsg.hdr.type) { 195 case IMSG_HOST_DNS: 196 TAILQ_FOREACH(idm, &env->sc_idms, idm_entry) 197 if (idm->idm_id == imsg.hdr.peerid) 198 break; 199 if (idm == NULL) { 200 log_warnx("IMSG_HOST_DNS with invalid peerID"); 201 break; 202 }
| 136 return (0); 137} 138 139void 140client_sig_handler(int sig, short event, void *p) 141{ 142 switch (sig) { 143 case SIGINT: 144 case SIGTERM: 145 client_shutdown(); 146 break; 147 default: 148 fatalx("unexpected signal"); 149 } 150} 151 152void 153client_dispatch_dns(int fd, short events, void *p) 154{ 155 struct imsg imsg; 156 u_int16_t dlen; 157 u_char *data; 158 struct ypldap_addr *h; 159 int n, wait_cnt = 0; 160 struct idm *idm; 161 int shut = 0; 162 163 struct env *env = p; 164 struct imsgev *iev = env->sc_iev_dns; 165 struct imsgbuf *ibuf = &iev->ibuf; 166 167 if ((events & (EV_READ | EV_WRITE)) == 0) 168 fatalx("unknown event"); 169 170 if (events & EV_READ) { 171 if ((n = imsg_read(ibuf)) == -1 && errno != EAGAIN) 172 fatal("imsg_read error"); 173 if (n == 0) 174 shut = 1; 175 } 176 if (events & EV_WRITE) { 177 if ((n = msgbuf_write(&ibuf->w)) == -1 && errno != EAGAIN) 178 fatal("msgbuf_write"); 179 if (n == 0) 180 shut = 1; 181 goto done; 182 } 183 184 for (;;) { 185 if ((n = imsg_get(ibuf, &imsg)) == -1) 186 fatal("client_dispatch_dns: imsg_get error"); 187 if (n == 0) 188 break; 189 190 switch (imsg.hdr.type) { 191 case IMSG_HOST_DNS: 192 TAILQ_FOREACH(idm, &env->sc_idms, idm_entry) 193 if (idm->idm_id == imsg.hdr.peerid) 194 break; 195 if (idm == NULL) { 196 log_warnx("IMSG_HOST_DNS with invalid peerID"); 197 break; 198 }
|
203 if (idm->idm_addr != NULL) { 204 log_warnx("IMSG_HOST_DNS but addr != NULL!");
| 199 if (!TAILQ_EMPTY(&idm->idm_addr)) { 200 log_warnx("IMSG_HOST_DNS but addrs set!");
|
205 break; 206 } 207 208 dlen = imsg.hdr.len - IMSG_HEADER_SIZE; 209 if (dlen == 0) { /* no data -> temp error */ 210 idm->idm_state = STATE_DNS_TEMPFAIL; 211 break; 212 } 213 214 data = (u_char *)imsg.data; 215 while (dlen >= sizeof(struct sockaddr_storage)) {
| 201 break; 202 } 203 204 dlen = imsg.hdr.len - IMSG_HEADER_SIZE; 205 if (dlen == 0) { /* no data -> temp error */ 206 idm->idm_state = STATE_DNS_TEMPFAIL; 207 break; 208 } 209 210 data = (u_char *)imsg.data; 211 while (dlen >= sizeof(struct sockaddr_storage)) {
|
216 if ((h = calloc(1, sizeof(struct ypldap_addr))) == 217 NULL)
| 212 if ((h = calloc(1, sizeof(*h))) == NULL)
|
218 fatal(NULL); 219 memcpy(&h->ss, data, sizeof(h->ss));
| 213 fatal(NULL); 214 memcpy(&h->ss, data, sizeof(h->ss));
|
| 215 TAILQ_INSERT_HEAD(&idm->idm_addr, h, next);
|
220
| 216
|
221 if (idm->idm_addr == NULL) 222 h->next = NULL; 223 else 224 h->next = idm->idm_addr; 225 226 idm->idm_addr = h; 227
| |
228 data += sizeof(h->ss); 229 dlen -= sizeof(h->ss); 230 } 231 if (dlen != 0) 232 fatalx("IMSG_HOST_DNS: dlen != 0"); 233 234 client_addr_init(idm); 235 236 break; 237 default: 238 break; 239 } 240 imsg_free(&imsg); 241 } 242 243 TAILQ_FOREACH(idm, &env->sc_idms, idm_entry) { 244 if (client_try_idm(env, idm) == -1) 245 idm->idm_state = STATE_LDAP_FAIL; 246 247 if (idm->idm_state < STATE_LDAP_DONE) 248 wait_cnt++; 249 } 250 if (wait_cnt == 0) 251 imsg_compose_event(env->sc_iev, IMSG_END_UPDATE, 0, 0, -1, 252 NULL, 0); 253 254done: 255 if (!shut) 256 imsg_event_add(iev); 257 else { 258 /* this pipe is dead, so remove the event handler */ 259 event_del(&iev->ev); 260 event_loopexit(NULL); 261 } 262} 263 264void 265client_dispatch_parent(int fd, short events, void *p) 266{ 267 int n; 268 int shut = 0; 269 struct imsg imsg; 270 struct env *env = p; 271 struct imsgev *iev = env->sc_iev; 272 struct imsgbuf *ibuf = &iev->ibuf; 273 274 if ((events & (EV_READ | EV_WRITE)) == 0) 275 fatalx("unknown event"); 276 277 if (events & EV_READ) { 278 if ((n = imsg_read(ibuf)) == -1 && errno != EAGAIN) 279 fatal("imsg_read error"); 280 if (n == 0) 281 shut = 1; 282 } 283 if (events & EV_WRITE) { 284 if ((n = msgbuf_write(&ibuf->w)) == -1 && errno != EAGAIN) 285 fatal("msgbuf_write"); 286 if (n == 0) 287 shut = 1; 288 goto done; 289 } 290 291 for (;;) { 292 if ((n = imsg_get(ibuf, &imsg)) == -1) 293 fatal("client_dispatch_parent: imsg_get error"); 294 if (n == 0) 295 break; 296 297 switch (imsg.hdr.type) { 298 case IMSG_CONF_START: { 299 struct env params; 300 301 if (env->sc_flags & F_CONFIGURING) { 302 log_warnx("configuration already in progress"); 303 break; 304 } 305 memcpy(¶ms, imsg.data, sizeof(params)); 306 log_debug("configuration starting"); 307 env->sc_flags |= F_CONFIGURING; 308 purge_config(env); 309 memcpy(&env->sc_conf_tv, ¶ms.sc_conf_tv, 310 sizeof(env->sc_conf_tv)); 311 env->sc_flags |= params.sc_flags; 312 break; 313 } 314 case IMSG_CONF_IDM: { 315 struct idm *idm; 316 317 if (!(env->sc_flags & F_CONFIGURING)) 318 break; 319 if ((idm = calloc(1, sizeof(*idm))) == NULL) 320 fatal(NULL); 321 memcpy(idm, imsg.data, sizeof(*idm)); 322 idm->idm_env = env; 323 TAILQ_INSERT_TAIL(&env->sc_idms, idm, idm_entry); 324 break; 325 } 326 case IMSG_CONF_END: 327 env->sc_flags &= ~F_CONFIGURING; 328 log_debug("applying configuration"); 329 client_configure(env); 330 break; 331 default: 332 log_debug("client_dispatch_parent: unexpect imsg %d", 333 imsg.hdr.type); 334 335 break; 336 } 337 imsg_free(&imsg); 338 } 339 340done: 341 if (!shut) 342 imsg_event_add(iev); 343 else { 344 /* this pipe is dead, so remove the event handler */ 345 event_del(&iev->ev); 346 event_loopexit(NULL); 347 } 348} 349 350void 351client_shutdown(void) 352{ 353 log_info("ldap client exiting"); 354 _exit(0); 355} 356 357pid_t 358ldapclient(int pipe_main2client[2]) 359{ 360 pid_t pid, dns_pid; 361 int pipe_dns[2]; 362 struct passwd *pw; 363 struct event ev_sigint; 364 struct event ev_sigterm; 365 struct env env; 366 367 switch (pid = fork()) { 368 case -1: 369 fatal("cannot fork"); 370 break; 371 case 0: 372 break; 373 default: 374 return (pid); 375 } 376 377 bzero(&env, sizeof(env)); 378 TAILQ_INIT(&env.sc_idms); 379 380 if ((pw = getpwnam(YPLDAP_USER)) == NULL) 381 fatal("getpwnam"); 382 383 if (socketpair(AF_UNIX, SOCK_STREAM, PF_UNSPEC, pipe_dns) == -1) 384 fatal("socketpair"); 385 dns_pid = ypldap_dns(pipe_dns, pw); 386 close(pipe_dns[1]); 387 388#ifndef DEBUG 389 if (chroot(pw->pw_dir) == -1) 390 fatal("chroot"); 391 if (chdir("/") == -1) 392 fatal("chdir"); 393#else 394#warning disabling chrooting in DEBUG mode 395#endif 396 setproctitle("ldap client"); 397 ypldap_process = PROC_CLIENT; 398 399#ifndef DEBUG 400 if (setgroups(1, &pw->pw_gid) || 401 setresgid(pw->pw_gid, pw->pw_gid, pw->pw_gid) || 402 setresuid(pw->pw_uid, pw->pw_uid, pw->pw_uid)) 403 fatal("cannot drop privileges"); 404#else 405#warning disabling privilege revocation in DEBUG mode 406#endif 407 408 event_init(); 409 signal(SIGPIPE, SIG_IGN); 410 signal_set(&ev_sigint, SIGINT, client_sig_handler, NULL); 411 signal_set(&ev_sigterm, SIGTERM, client_sig_handler, NULL); 412 signal_add(&ev_sigint, NULL); 413 signal_add(&ev_sigterm, NULL); 414 415 close(pipe_main2client[0]); 416 if ((env.sc_iev = calloc(1, sizeof(*env.sc_iev))) == NULL) 417 fatal(NULL); 418 if ((env.sc_iev_dns = calloc(1, sizeof(*env.sc_iev_dns))) == NULL) 419 fatal(NULL); 420 421 env.sc_iev->events = EV_READ; 422 env.sc_iev->data = &env; 423 imsg_init(&env.sc_iev->ibuf, pipe_main2client[1]); 424 env.sc_iev->handler = client_dispatch_parent; 425 event_set(&env.sc_iev->ev, env.sc_iev->ibuf.fd, env.sc_iev->events, 426 env.sc_iev->handler, &env); 427 event_add(&env.sc_iev->ev, NULL); 428 429 env.sc_iev_dns->events = EV_READ; 430 env.sc_iev_dns->data = &env; 431 imsg_init(&env.sc_iev_dns->ibuf, pipe_dns[0]); 432 env.sc_iev_dns->handler = client_dispatch_dns; 433 event_set(&env.sc_iev_dns->ev, env.sc_iev_dns->ibuf.fd, 434 env.sc_iev_dns->events, env.sc_iev_dns->handler, &env); 435 event_add(&env.sc_iev_dns->ev, NULL); 436 437 event_dispatch(); 438 client_shutdown(); 439 440 return (0); 441 442} 443 444int 445client_build_req(struct idm *idm, struct idm_req *ir, struct aldap_message *m, 446 int min_attr, int max_attr) 447{ 448 char **ldap_attrs; 449 int i, k; 450 451 bzero(ir, sizeof(*ir)); 452 for (i = min_attr; i < max_attr; i++) { 453 if (idm->idm_flags & F_FIXED_ATTR(i)) { 454 if (strlcat(ir->ir_line, idm->idm_attrs[i], 455 sizeof(ir->ir_line)) >= sizeof(ir->ir_line)) 456 /* 457 * entry yields a line > 1024, trash it. 458 */ 459 return (-1); 460 461 if (i == ATTR_UID) { 462 ir->ir_key.ik_uid = strtonum( 463 idm->idm_attrs[i], 0, 464 UID_MAX, NULL); 465 } else if (i == ATTR_GR_GID) { 466 ir->ir_key.ik_gid = strtonum( 467 idm->idm_attrs[i], 0, 468 GID_MAX, NULL); 469 } 470 } else if (idm->idm_list & F_LIST(i)) { 471 aldap_match_attr(m, idm->idm_attrs[i], &ldap_attrs); 472 for (k = 0; k >= 0 && ldap_attrs && ldap_attrs[k] != NULL; k++) { 473 /* XXX: Fail when attributes have illegal characters e.g. ',' */ 474 if (strlcat(ir->ir_line, ldap_attrs[k], 475 sizeof(ir->ir_line)) >= sizeof(ir->ir_line)) 476 continue; 477 if (ldap_attrs[k+1] != NULL) 478 if (strlcat(ir->ir_line, ",", 479 sizeof(ir->ir_line)) 480 >= sizeof(ir->ir_line)) { 481 aldap_free_attr(ldap_attrs); 482 return (-1); 483 } 484 } 485 aldap_free_attr(ldap_attrs); 486 } else { 487 if (aldap_match_attr(m, idm->idm_attrs[i], &ldap_attrs) == -1) 488 return (-1); 489 if (ldap_attrs[0] == NULL) 490 return (-1); 491 if (strlcat(ir->ir_line, ldap_attrs[0], 492 sizeof(ir->ir_line)) >= sizeof(ir->ir_line)) { 493 aldap_free_attr(ldap_attrs); 494 return (-1); 495 } 496 if (i == ATTR_UID) { 497 ir->ir_key.ik_uid = strtonum( 498 ldap_attrs[0], 0, UID_MAX, NULL); 499 } else if (i == ATTR_GR_GID) { 500 ir->ir_key.ik_uid = strtonum( 501 ldap_attrs[0], 0, GID_MAX, NULL); 502 } 503 aldap_free_attr(ldap_attrs); 504 } 505 506 if (i + 1 != max_attr) 507 if (strlcat(ir->ir_line, ":", 508 sizeof(ir->ir_line)) >= sizeof(ir->ir_line)) 509 return (-1); 510 } 511 512 return (0); 513} 514 515int 516client_search_idm(struct env *env, struct idm *idm, struct aldap *al, 517 char **attrs, char *filter, int min_attr, int max_attr, 518 enum imsg_type type) 519{ 520 struct idm_req ir; 521 struct aldap_message *m; 522 struct aldap_page_control *pg = NULL; 523 const char *errstr; 524 char *dn; 525 526 dn = idm->idm_basedn; 527 if (type == IMSG_GRP_ENTRY && idm->idm_groupdn[0] != '\0') 528 dn = idm->idm_groupdn; 529 530 do { 531 if (aldap_search(al, dn, LDAP_SCOPE_SUBTREE, 532 filter, attrs, 0, 0, 0, pg) == -1) { 533 aldap_get_errno(al, &errstr); 534 log_debug("%s", errstr); 535 return (-1); 536 } 537 538 if (pg != NULL) { 539 aldap_freepage(pg); 540 pg = NULL; 541 } 542 543 while ((m = aldap_parse(al)) != NULL) { 544 if (al->msgid != m->msgid) { 545 goto fail; 546 } 547 548 if (m->message_type == LDAP_RES_SEARCH_RESULT) { 549 if (m->page != NULL && m->page->cookie_len != 0) 550 pg = m->page; 551 else 552 pg = NULL; 553 554 aldap_freemsg(m); 555 break; 556 } 557 558 if (m->message_type != LDAP_RES_SEARCH_ENTRY) { 559 goto fail; 560 } 561 562 if (client_build_req(idm, &ir, m, min_attr, max_attr) == 0) 563 imsg_compose_event(env->sc_iev, type, 0, 0, -1, 564 &ir, sizeof(ir)); 565 566 aldap_freemsg(m); 567 } 568 } while (pg != NULL); 569 570 return (0); 571 572fail: 573 aldap_freemsg(m); 574 if (pg != NULL) { 575 aldap_freepage(pg); 576 } 577 578 return (-1); 579} 580 581int 582client_try_idm(struct env *env, struct idm *idm) 583{ 584 const char *where; 585 char *attrs[ATTR_MAX+1]; 586 int i, j; 587 struct aldap_message *m; 588 struct aldap *al; 589 590 where = "connect";
| 217 data += sizeof(h->ss); 218 dlen -= sizeof(h->ss); 219 } 220 if (dlen != 0) 221 fatalx("IMSG_HOST_DNS: dlen != 0"); 222 223 client_addr_init(idm); 224 225 break; 226 default: 227 break; 228 } 229 imsg_free(&imsg); 230 } 231 232 TAILQ_FOREACH(idm, &env->sc_idms, idm_entry) { 233 if (client_try_idm(env, idm) == -1) 234 idm->idm_state = STATE_LDAP_FAIL; 235 236 if (idm->idm_state < STATE_LDAP_DONE) 237 wait_cnt++; 238 } 239 if (wait_cnt == 0) 240 imsg_compose_event(env->sc_iev, IMSG_END_UPDATE, 0, 0, -1, 241 NULL, 0); 242 243done: 244 if (!shut) 245 imsg_event_add(iev); 246 else { 247 /* this pipe is dead, so remove the event handler */ 248 event_del(&iev->ev); 249 event_loopexit(NULL); 250 } 251} 252 253void 254client_dispatch_parent(int fd, short events, void *p) 255{ 256 int n; 257 int shut = 0; 258 struct imsg imsg; 259 struct env *env = p; 260 struct imsgev *iev = env->sc_iev; 261 struct imsgbuf *ibuf = &iev->ibuf; 262 263 if ((events & (EV_READ | EV_WRITE)) == 0) 264 fatalx("unknown event"); 265 266 if (events & EV_READ) { 267 if ((n = imsg_read(ibuf)) == -1 && errno != EAGAIN) 268 fatal("imsg_read error"); 269 if (n == 0) 270 shut = 1; 271 } 272 if (events & EV_WRITE) { 273 if ((n = msgbuf_write(&ibuf->w)) == -1 && errno != EAGAIN) 274 fatal("msgbuf_write"); 275 if (n == 0) 276 shut = 1; 277 goto done; 278 } 279 280 for (;;) { 281 if ((n = imsg_get(ibuf, &imsg)) == -1) 282 fatal("client_dispatch_parent: imsg_get error"); 283 if (n == 0) 284 break; 285 286 switch (imsg.hdr.type) { 287 case IMSG_CONF_START: { 288 struct env params; 289 290 if (env->sc_flags & F_CONFIGURING) { 291 log_warnx("configuration already in progress"); 292 break; 293 } 294 memcpy(¶ms, imsg.data, sizeof(params)); 295 log_debug("configuration starting"); 296 env->sc_flags |= F_CONFIGURING; 297 purge_config(env); 298 memcpy(&env->sc_conf_tv, ¶ms.sc_conf_tv, 299 sizeof(env->sc_conf_tv)); 300 env->sc_flags |= params.sc_flags; 301 break; 302 } 303 case IMSG_CONF_IDM: { 304 struct idm *idm; 305 306 if (!(env->sc_flags & F_CONFIGURING)) 307 break; 308 if ((idm = calloc(1, sizeof(*idm))) == NULL) 309 fatal(NULL); 310 memcpy(idm, imsg.data, sizeof(*idm)); 311 idm->idm_env = env; 312 TAILQ_INSERT_TAIL(&env->sc_idms, idm, idm_entry); 313 break; 314 } 315 case IMSG_CONF_END: 316 env->sc_flags &= ~F_CONFIGURING; 317 log_debug("applying configuration"); 318 client_configure(env); 319 break; 320 default: 321 log_debug("client_dispatch_parent: unexpect imsg %d", 322 imsg.hdr.type); 323 324 break; 325 } 326 imsg_free(&imsg); 327 } 328 329done: 330 if (!shut) 331 imsg_event_add(iev); 332 else { 333 /* this pipe is dead, so remove the event handler */ 334 event_del(&iev->ev); 335 event_loopexit(NULL); 336 } 337} 338 339void 340client_shutdown(void) 341{ 342 log_info("ldap client exiting"); 343 _exit(0); 344} 345 346pid_t 347ldapclient(int pipe_main2client[2]) 348{ 349 pid_t pid, dns_pid; 350 int pipe_dns[2]; 351 struct passwd *pw; 352 struct event ev_sigint; 353 struct event ev_sigterm; 354 struct env env; 355 356 switch (pid = fork()) { 357 case -1: 358 fatal("cannot fork"); 359 break; 360 case 0: 361 break; 362 default: 363 return (pid); 364 } 365 366 bzero(&env, sizeof(env)); 367 TAILQ_INIT(&env.sc_idms); 368 369 if ((pw = getpwnam(YPLDAP_USER)) == NULL) 370 fatal("getpwnam"); 371 372 if (socketpair(AF_UNIX, SOCK_STREAM, PF_UNSPEC, pipe_dns) == -1) 373 fatal("socketpair"); 374 dns_pid = ypldap_dns(pipe_dns, pw); 375 close(pipe_dns[1]); 376 377#ifndef DEBUG 378 if (chroot(pw->pw_dir) == -1) 379 fatal("chroot"); 380 if (chdir("/") == -1) 381 fatal("chdir"); 382#else 383#warning disabling chrooting in DEBUG mode 384#endif 385 setproctitle("ldap client"); 386 ypldap_process = PROC_CLIENT; 387 388#ifndef DEBUG 389 if (setgroups(1, &pw->pw_gid) || 390 setresgid(pw->pw_gid, pw->pw_gid, pw->pw_gid) || 391 setresuid(pw->pw_uid, pw->pw_uid, pw->pw_uid)) 392 fatal("cannot drop privileges"); 393#else 394#warning disabling privilege revocation in DEBUG mode 395#endif 396 397 event_init(); 398 signal(SIGPIPE, SIG_IGN); 399 signal_set(&ev_sigint, SIGINT, client_sig_handler, NULL); 400 signal_set(&ev_sigterm, SIGTERM, client_sig_handler, NULL); 401 signal_add(&ev_sigint, NULL); 402 signal_add(&ev_sigterm, NULL); 403 404 close(pipe_main2client[0]); 405 if ((env.sc_iev = calloc(1, sizeof(*env.sc_iev))) == NULL) 406 fatal(NULL); 407 if ((env.sc_iev_dns = calloc(1, sizeof(*env.sc_iev_dns))) == NULL) 408 fatal(NULL); 409 410 env.sc_iev->events = EV_READ; 411 env.sc_iev->data = &env; 412 imsg_init(&env.sc_iev->ibuf, pipe_main2client[1]); 413 env.sc_iev->handler = client_dispatch_parent; 414 event_set(&env.sc_iev->ev, env.sc_iev->ibuf.fd, env.sc_iev->events, 415 env.sc_iev->handler, &env); 416 event_add(&env.sc_iev->ev, NULL); 417 418 env.sc_iev_dns->events = EV_READ; 419 env.sc_iev_dns->data = &env; 420 imsg_init(&env.sc_iev_dns->ibuf, pipe_dns[0]); 421 env.sc_iev_dns->handler = client_dispatch_dns; 422 event_set(&env.sc_iev_dns->ev, env.sc_iev_dns->ibuf.fd, 423 env.sc_iev_dns->events, env.sc_iev_dns->handler, &env); 424 event_add(&env.sc_iev_dns->ev, NULL); 425 426 event_dispatch(); 427 client_shutdown(); 428 429 return (0); 430 431} 432 433int 434client_build_req(struct idm *idm, struct idm_req *ir, struct aldap_message *m, 435 int min_attr, int max_attr) 436{ 437 char **ldap_attrs; 438 int i, k; 439 440 bzero(ir, sizeof(*ir)); 441 for (i = min_attr; i < max_attr; i++) { 442 if (idm->idm_flags & F_FIXED_ATTR(i)) { 443 if (strlcat(ir->ir_line, idm->idm_attrs[i], 444 sizeof(ir->ir_line)) >= sizeof(ir->ir_line)) 445 /* 446 * entry yields a line > 1024, trash it. 447 */ 448 return (-1); 449 450 if (i == ATTR_UID) { 451 ir->ir_key.ik_uid = strtonum( 452 idm->idm_attrs[i], 0, 453 UID_MAX, NULL); 454 } else if (i == ATTR_GR_GID) { 455 ir->ir_key.ik_gid = strtonum( 456 idm->idm_attrs[i], 0, 457 GID_MAX, NULL); 458 } 459 } else if (idm->idm_list & F_LIST(i)) { 460 aldap_match_attr(m, idm->idm_attrs[i], &ldap_attrs); 461 for (k = 0; k >= 0 && ldap_attrs && ldap_attrs[k] != NULL; k++) { 462 /* XXX: Fail when attributes have illegal characters e.g. ',' */ 463 if (strlcat(ir->ir_line, ldap_attrs[k], 464 sizeof(ir->ir_line)) >= sizeof(ir->ir_line)) 465 continue; 466 if (ldap_attrs[k+1] != NULL) 467 if (strlcat(ir->ir_line, ",", 468 sizeof(ir->ir_line)) 469 >= sizeof(ir->ir_line)) { 470 aldap_free_attr(ldap_attrs); 471 return (-1); 472 } 473 } 474 aldap_free_attr(ldap_attrs); 475 } else { 476 if (aldap_match_attr(m, idm->idm_attrs[i], &ldap_attrs) == -1) 477 return (-1); 478 if (ldap_attrs[0] == NULL) 479 return (-1); 480 if (strlcat(ir->ir_line, ldap_attrs[0], 481 sizeof(ir->ir_line)) >= sizeof(ir->ir_line)) { 482 aldap_free_attr(ldap_attrs); 483 return (-1); 484 } 485 if (i == ATTR_UID) { 486 ir->ir_key.ik_uid = strtonum( 487 ldap_attrs[0], 0, UID_MAX, NULL); 488 } else if (i == ATTR_GR_GID) { 489 ir->ir_key.ik_uid = strtonum( 490 ldap_attrs[0], 0, GID_MAX, NULL); 491 } 492 aldap_free_attr(ldap_attrs); 493 } 494 495 if (i + 1 != max_attr) 496 if (strlcat(ir->ir_line, ":", 497 sizeof(ir->ir_line)) >= sizeof(ir->ir_line)) 498 return (-1); 499 } 500 501 return (0); 502} 503 504int 505client_search_idm(struct env *env, struct idm *idm, struct aldap *al, 506 char **attrs, char *filter, int min_attr, int max_attr, 507 enum imsg_type type) 508{ 509 struct idm_req ir; 510 struct aldap_message *m; 511 struct aldap_page_control *pg = NULL; 512 const char *errstr; 513 char *dn; 514 515 dn = idm->idm_basedn; 516 if (type == IMSG_GRP_ENTRY && idm->idm_groupdn[0] != '\0') 517 dn = idm->idm_groupdn; 518 519 do { 520 if (aldap_search(al, dn, LDAP_SCOPE_SUBTREE, 521 filter, attrs, 0, 0, 0, pg) == -1) { 522 aldap_get_errno(al, &errstr); 523 log_debug("%s", errstr); 524 return (-1); 525 } 526 527 if (pg != NULL) { 528 aldap_freepage(pg); 529 pg = NULL; 530 } 531 532 while ((m = aldap_parse(al)) != NULL) { 533 if (al->msgid != m->msgid) { 534 goto fail; 535 } 536 537 if (m->message_type == LDAP_RES_SEARCH_RESULT) { 538 if (m->page != NULL && m->page->cookie_len != 0) 539 pg = m->page; 540 else 541 pg = NULL; 542 543 aldap_freemsg(m); 544 break; 545 } 546 547 if (m->message_type != LDAP_RES_SEARCH_ENTRY) { 548 goto fail; 549 } 550 551 if (client_build_req(idm, &ir, m, min_attr, max_attr) == 0) 552 imsg_compose_event(env->sc_iev, type, 0, 0, -1, 553 &ir, sizeof(ir)); 554 555 aldap_freemsg(m); 556 } 557 } while (pg != NULL); 558 559 return (0); 560 561fail: 562 aldap_freemsg(m); 563 if (pg != NULL) { 564 aldap_freepage(pg); 565 } 566 567 return (-1); 568} 569 570int 571client_try_idm(struct env *env, struct idm *idm) 572{ 573 const char *where; 574 char *attrs[ATTR_MAX+1]; 575 int i, j; 576 struct aldap_message *m; 577 struct aldap *al; 578 579 where = "connect";
|
591 if ((al = client_aldap_open(idm->idm_addr)) == NULL)
| 580 if ((al = client_aldap_open(&idm->idm_addr)) == NULL)
|
592 return (-1); 593 594 if (idm->idm_flags & F_NEEDAUTH) { 595 where = "binding"; 596 if (aldap_bind(al, idm->idm_binddn, idm->idm_bindcred) == -1) 597 goto bad; 598 599 where = "parsing"; 600 if ((m = aldap_parse(al)) == NULL) 601 goto bad; 602 where = "verifying msgid"; 603 if (al->msgid != m->msgid) { 604 aldap_freemsg(m); 605 goto bad; 606 } 607 aldap_freemsg(m); 608 } 609 610 bzero(attrs, sizeof(attrs)); 611 for (i = 0, j = 0; i < ATTR_MAX; i++) { 612 if (idm->idm_flags & F_FIXED_ATTR(i)) 613 continue; 614 attrs[j++] = idm->idm_attrs[i]; 615 } 616 attrs[j] = NULL; 617 618 /* 619 * build password line. 620 */ 621 where = "search"; 622 log_debug("searching password entries"); 623 if (client_search_idm(env, idm, al, attrs, 624 idm->idm_filters[FILTER_USER], 0, ATTR_MAX, IMSG_PW_ENTRY) == -1) 625 goto bad; 626 627 bzero(attrs, sizeof(attrs)); 628 for (i = ATTR_GR_MIN, j = 0; i < ATTR_GR_MAX; i++) { 629 if (idm->idm_flags & F_FIXED_ATTR(i)) 630 continue; 631 attrs[j++] = idm->idm_attrs[i]; 632 } 633 attrs[j] = NULL; 634 635 /* 636 * build group line. 637 */ 638 where = "search"; 639 log_debug("searching group entries"); 640 if (client_search_idm(env, idm, al, attrs, 641 idm->idm_filters[FILTER_GROUP], ATTR_GR_MIN, ATTR_GR_MAX, 642 IMSG_GRP_ENTRY) == -1) 643 goto bad; 644 645 aldap_close(al); 646 647 idm->idm_state = STATE_LDAP_DONE; 648 649 return (0); 650bad: 651 aldap_close(al); 652 log_debug("directory %s errored out in %s", idm->idm_name, where); 653 return (-1); 654} 655 656void 657client_periodic_update(int fd, short event, void *p) 658{ 659 struct env *env = p; 660 661 struct idm *idm; 662 int fail_cnt = 0; 663 664 /* If LDAP isn't finished, notify the master process to trash the 665 * update. */ 666 TAILQ_FOREACH(idm, &env->sc_idms, idm_entry) { 667 if (idm->idm_state < STATE_LDAP_DONE) 668 fail_cnt++; 669 670 idm->idm_state = STATE_NONE; 671 672 client_addr_free(idm); 673 } 674 if (fail_cnt > 0) { 675 log_debug("trash the update"); 676 imsg_compose_event(env->sc_iev, IMSG_TRASH_UPDATE, 0, 0, -1, 677 NULL, 0); 678 } 679 680 client_configure(env); 681} 682 683void 684client_configure(struct env *env) 685{ 686 struct timeval tv; 687 struct idm *idm; 688 u_int16_t dlen; 689 690 log_debug("connecting to directories"); 691 692 imsg_compose_event(env->sc_iev, IMSG_START_UPDATE, 0, 0, -1, NULL, 0); 693 694 /* Start the DNS lookups */ 695 TAILQ_FOREACH(idm, &env->sc_idms, idm_entry) { 696 dlen = strlen(idm->idm_name) + 1; 697 imsg_compose_event(env->sc_iev_dns, IMSG_HOST_DNS, idm->idm_id, 698 0, -1, idm->idm_name, dlen); 699 } 700 701 tv.tv_sec = env->sc_conf_tv.tv_sec; 702 tv.tv_usec = env->sc_conf_tv.tv_usec; 703 evtimer_set(&env->sc_conf_ev, client_periodic_update, env); 704 evtimer_add(&env->sc_conf_ev, &tv); 705}
| 581 return (-1); 582 583 if (idm->idm_flags & F_NEEDAUTH) { 584 where = "binding"; 585 if (aldap_bind(al, idm->idm_binddn, idm->idm_bindcred) == -1) 586 goto bad; 587 588 where = "parsing"; 589 if ((m = aldap_parse(al)) == NULL) 590 goto bad; 591 where = "verifying msgid"; 592 if (al->msgid != m->msgid) { 593 aldap_freemsg(m); 594 goto bad; 595 } 596 aldap_freemsg(m); 597 } 598 599 bzero(attrs, sizeof(attrs)); 600 for (i = 0, j = 0; i < ATTR_MAX; i++) { 601 if (idm->idm_flags & F_FIXED_ATTR(i)) 602 continue; 603 attrs[j++] = idm->idm_attrs[i]; 604 } 605 attrs[j] = NULL; 606 607 /* 608 * build password line. 609 */ 610 where = "search"; 611 log_debug("searching password entries"); 612 if (client_search_idm(env, idm, al, attrs, 613 idm->idm_filters[FILTER_USER], 0, ATTR_MAX, IMSG_PW_ENTRY) == -1) 614 goto bad; 615 616 bzero(attrs, sizeof(attrs)); 617 for (i = ATTR_GR_MIN, j = 0; i < ATTR_GR_MAX; i++) { 618 if (idm->idm_flags & F_FIXED_ATTR(i)) 619 continue; 620 attrs[j++] = idm->idm_attrs[i]; 621 } 622 attrs[j] = NULL; 623 624 /* 625 * build group line. 626 */ 627 where = "search"; 628 log_debug("searching group entries"); 629 if (client_search_idm(env, idm, al, attrs, 630 idm->idm_filters[FILTER_GROUP], ATTR_GR_MIN, ATTR_GR_MAX, 631 IMSG_GRP_ENTRY) == -1) 632 goto bad; 633 634 aldap_close(al); 635 636 idm->idm_state = STATE_LDAP_DONE; 637 638 return (0); 639bad: 640 aldap_close(al); 641 log_debug("directory %s errored out in %s", idm->idm_name, where); 642 return (-1); 643} 644 645void 646client_periodic_update(int fd, short event, void *p) 647{ 648 struct env *env = p; 649 650 struct idm *idm; 651 int fail_cnt = 0; 652 653 /* If LDAP isn't finished, notify the master process to trash the 654 * update. */ 655 TAILQ_FOREACH(idm, &env->sc_idms, idm_entry) { 656 if (idm->idm_state < STATE_LDAP_DONE) 657 fail_cnt++; 658 659 idm->idm_state = STATE_NONE; 660 661 client_addr_free(idm); 662 } 663 if (fail_cnt > 0) { 664 log_debug("trash the update"); 665 imsg_compose_event(env->sc_iev, IMSG_TRASH_UPDATE, 0, 0, -1, 666 NULL, 0); 667 } 668 669 client_configure(env); 670} 671 672void 673client_configure(struct env *env) 674{ 675 struct timeval tv; 676 struct idm *idm; 677 u_int16_t dlen; 678 679 log_debug("connecting to directories"); 680 681 imsg_compose_event(env->sc_iev, IMSG_START_UPDATE, 0, 0, -1, NULL, 0); 682 683 /* Start the DNS lookups */ 684 TAILQ_FOREACH(idm, &env->sc_idms, idm_entry) { 685 dlen = strlen(idm->idm_name) + 1; 686 imsg_compose_event(env->sc_iev_dns, IMSG_HOST_DNS, idm->idm_id, 687 0, -1, idm->idm_name, dlen); 688 } 689 690 tv.tv_sec = env->sc_conf_tv.tv_sec; 691 tv.tv_usec = env->sc_conf_tv.tv_usec; 692 evtimer_set(&env->sc_conf_ev, client_periodic_update, env); 693 evtimer_add(&env->sc_conf_ev, &tv); 694}
|