1 /* $NetBSD: lcl.c,v 1.1.1.1 2009/04/12 15:33:40 christos Exp $ */ 2 3 /* 4 * Copyright (c) 2004 by Internet Systems Consortium, Inc. ("ISC") 5 * Copyright (c) 1996-1999 by Internet Software Consortium. 6 * 7 * Permission to use, copy, modify, and distribute this software for any 8 * purpose with or without fee is hereby granted, provided that the above 9 * copyright notice and this permission notice appear in all copies. 10 * 11 * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES 12 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF 13 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL ISC BE LIABLE FOR 14 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES 15 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN 16 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT 17 * OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. 18 */ 19 20 #if !defined(LINT) && !defined(CODECENTER) 21 static const char rcsid[] = "Id: lcl.c,v 1.4 2005/04/27 04:56:30 sra Exp"; 22 #endif 23 24 /* Imports */ 25 26 #include "port_before.h" 27 28 #include <stdlib.h> 29 #include <errno.h> 30 #include <string.h> 31 32 #include <sys/types.h> 33 #include <netinet/in.h> 34 #include <arpa/nameser.h> 35 #include <resolv.h> 36 37 #include <isc/memcluster.h> 38 39 #include <irs.h> 40 41 #include "port_after.h" 42 43 #include "irs_p.h" 44 #include "lcl_p.h" 45 46 /* Forward. */ 47 48 static void lcl_close(struct irs_acc *); 49 static struct __res_state * lcl_res_get(struct irs_acc *); 50 static void lcl_res_set(struct irs_acc *, struct __res_state *, 51 void (*)(void *)); 52 53 /* Public */ 54 55 struct irs_acc * 56 irs_lcl_acc(const char *options) { 57 struct irs_acc *acc; 58 struct lcl_p *lcl; 59 60 UNUSED(options); 61 62 if (!(acc = memget(sizeof *acc))) { 63 errno = ENOMEM; 64 return (NULL); 65 } 66 memset(acc, 0x5e, sizeof *acc); 67 if (!(lcl = memget(sizeof *lcl))) { 68 errno = ENOMEM; 69 free(acc); 70 return (NULL); 71 } 72 memset(lcl, 0x5e, sizeof *lcl); 73 lcl->res = NULL; 74 lcl->free_res = NULL; 75 acc->private = lcl; 76 #ifdef WANT_IRS_GR 77 acc->gr_map = irs_lcl_gr; 78 #else 79 acc->gr_map = NULL; 80 #endif 81 #ifdef WANT_IRS_PW 82 acc->pw_map = irs_lcl_pw; 83 #else 84 acc->pw_map = NULL; 85 #endif 86 acc->sv_map = irs_lcl_sv; 87 acc->pr_map = irs_lcl_pr; 88 acc->ho_map = irs_lcl_ho; 89 acc->nw_map = irs_lcl_nw; 90 acc->ng_map = irs_lcl_ng; 91 acc->res_get = lcl_res_get; 92 acc->res_set = lcl_res_set; 93 acc->close = lcl_close; 94 return (acc); 95 } 96 97 /* Methods */ 98 static struct __res_state * 99 lcl_res_get(struct irs_acc *this) { 100 struct lcl_p *lcl = (struct lcl_p *)this->private; 101 102 if (lcl->res == NULL) { 103 struct __res_state *res; 104 res = (struct __res_state *)malloc(sizeof *res); 105 if (res == NULL) 106 return (NULL); 107 memset(res, 0, sizeof *res); 108 lcl_res_set(this, res, free); 109 } 110 111 if ((lcl->res->options & RES_INIT) == 0U && 112 res_ninit(lcl->res) < 0) 113 return (NULL); 114 115 return (lcl->res); 116 } 117 118 static void 119 lcl_res_set(struct irs_acc *this, struct __res_state *res, 120 void (*free_res)(void *)) { 121 struct lcl_p *lcl = (struct lcl_p *)this->private; 122 123 if (lcl->res && lcl->free_res) { 124 res_nclose(lcl->res); 125 (*lcl->free_res)(lcl->res); 126 } 127 128 lcl->res = res; 129 lcl->free_res = free_res; 130 } 131 132 static void 133 lcl_close(struct irs_acc *this) { 134 struct lcl_p *lcl = (struct lcl_p *)this->private; 135 136 if (lcl) { 137 if (lcl->free_res) 138 (*lcl->free_res)(lcl->res); 139 memput(lcl, sizeof *lcl); 140 } 141 memput(this, sizeof *this); 142 } 143 144 /*! \file */ 145