1 /* 2 * Copyright (c) 2000-2001, Boris Popov 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 3. All advertising materials mentioning features or use of this software 14 * must display the following acknowledgement: 15 * This product includes software developed by Boris Popov. 16 * 4. Neither the name of the author nor the names of any co-contributors 17 * may be used to endorse or promote products derived from this software 18 * without specific prior written permission. 19 * 20 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 23 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 24 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 30 * SUCH DAMAGE. 31 * 32 * $Id: nb_name.c,v 1.2 2001/08/22 03:31:36 bp Exp $ 33 */ 34 35 #include <sys/cdefs.h> 36 __FBSDID("$FreeBSD$"); 37 38 #include <sys/param.h> 39 #include <sys/endian.h> 40 #include <sys/socket.h> 41 42 #include <ctype.h> 43 #include <err.h> 44 #include <errno.h> 45 #include <stdio.h> 46 #include <stdlib.h> 47 #include <string.h> 48 49 #include <netsmb/netbios.h> 50 #include <netsmb/smb_lib.h> 51 #include <netsmb/nb_lib.h> 52 53 int 54 nb_snballoc(int namelen, struct sockaddr_nb **dst) 55 { 56 struct sockaddr_nb *snb; 57 int slen; 58 59 slen = namelen + sizeof(*snb) - sizeof(snb->snb_name); 60 snb = malloc(slen); 61 if (snb == NULL) 62 return ENOMEM; 63 bzero(snb, slen); 64 snb->snb_family = AF_NETBIOS; 65 snb->snb_len = slen; 66 *dst = snb; 67 return 0; 68 } 69 70 void 71 nb_snbfree(struct sockaddr *snb) 72 { 73 free(snb); 74 } 75 76 /* 77 * Create a full NETBIOS address 78 */ 79 int 80 nb_sockaddr(struct sockaddr *peer, struct nb_name *np, 81 struct sockaddr_nb **dst) 82 83 { 84 struct sockaddr_nb *snb; 85 int nmlen, error; 86 87 if (peer && (peer->sa_family != AF_INET && peer->sa_family != AF_IPX)) 88 return EPROTONOSUPPORT; 89 nmlen = nb_name_len(np); 90 if (nmlen < NB_ENCNAMELEN) 91 return EINVAL; 92 error = nb_snballoc(nmlen, &snb); 93 if (error) 94 return error; 95 if (nmlen != nb_name_encode(np, snb->snb_name)) 96 printf("a bug somewhere in the nb_name* code\n"); 97 if (peer) 98 memcpy(&snb->snb_tran, peer, peer->sa_len); 99 *dst = snb; 100 return 0; 101 } 102 103 int 104 nb_name_len(struct nb_name *np) 105 { 106 u_char *name; 107 int len, sclen; 108 109 len = 1 + NB_ENCNAMELEN; 110 if (np->nn_scope == NULL) 111 return len + 1; 112 sclen = 0; 113 for (name = np->nn_scope; *name; name++) { 114 if (*name == '.') { 115 sclen = 0; 116 } else { 117 if (sclen < NB_MAXLABLEN) { 118 sclen++; 119 len++; 120 } 121 } 122 } 123 return len + 1; 124 } 125 126 int 127 nb_encname_len(const char *str) 128 { 129 const u_char *cp = (const u_char *)str; 130 int len, blen; 131 132 if ((cp[0] & 0xc0) == 0xc0) 133 return -1; /* first two bytes are offset to name */ 134 135 len = 1; 136 for (;;) { 137 blen = *cp; 138 if (blen++ == 0) 139 break; 140 len += blen; 141 cp += blen; 142 } 143 return len; 144 } 145 146 static inline void 147 nb_char_encode(u_char **ptr, u_char c, int n) 148 { 149 150 while (n--) { 151 *(*ptr)++ = 0x41 + (c >> 4); 152 *(*ptr)++ = 0x41 + (c & 0x0f); 153 } 154 } 155 156 int 157 nb_name_encode(struct nb_name *np, u_char *dst) 158 { 159 u_char *name, *plen; 160 u_char *cp = dst; 161 int i, lblen; 162 163 *cp++ = NB_ENCNAMELEN; 164 name = np->nn_name; 165 if (name[0] == '*' && name[1] == 0) { 166 nb_char_encode(&cp, '*', 1); 167 nb_char_encode(&cp, ' ', NB_NAMELEN - 1); 168 } else { 169 for (i = 0; i < NB_NAMELEN - 1; i++) 170 if (*name != 0) 171 nb_char_encode(&cp, toupper(*name++), 1); 172 else 173 nb_char_encode(&cp, ' ', 1); 174 nb_char_encode(&cp, np->nn_type, 1); 175 } 176 *cp = 0; 177 if (np->nn_scope == NULL) 178 return nb_encname_len(dst); 179 plen = cp++; 180 lblen = 0; 181 for (name = np->nn_scope; ; name++) { 182 if (*name == '.' || *name == 0) { 183 *plen = lblen; 184 plen = cp++; 185 *plen = 0; 186 if (*name == 0) 187 break; 188 } else { 189 if (lblen < NB_MAXLABLEN) { 190 *cp++ = *name; 191 lblen++; 192 } 193 } 194 } 195 return nb_encname_len(dst); 196 } 197 198