1 /* $NetBSD: pack_dev.c,v 1.3 2002/01/31 22:43:42 tv Exp $ */ 2 3 /*- 4 * Copyright (c) 1998, 2001 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by Charles M. Hannum. 9 * 10 * Redistribution and use in source and binary forms, with or without 11 * modification, are permitted provided that the following conditions 12 * are met: 13 * 1. Redistributions of source code must retain the above copyright 14 * notice, this list of conditions and the following disclaimer. 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in the 17 * documentation and/or other materials provided with the distribution. 18 * 3. All advertising materials mentioning features or use of this software 19 * must display the following acknowledgement: 20 * This product includes software developed by the NetBSD 21 * Foundation, Inc. and its contributors. 22 * 4. Neither the name of The NetBSD Foundation nor the names of its 23 * contributors may be used to endorse or promote products derived 24 * from this software without specific prior written permission. 25 * 26 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 27 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 28 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 29 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 30 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 31 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 32 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 33 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 34 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 35 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 36 * POSSIBILITY OF SUCH DAMAGE. 37 */ 38 39 #include <sys/cdefs.h> 40 #if defined(__RCSID) && !defined(lint) 41 __RCSID("$NetBSD: pack_dev.c,v 1.3 2002/01/31 22:43:42 tv Exp $"); 42 #endif /* not lint */ 43 44 #include <sys/types.h> 45 #include <sys/stat.h> 46 47 #include <err.h> 48 #include <limits.h> 49 #include <stdio.h> 50 #include <stdlib.h> 51 #include <string.h> 52 #include <unistd.h> 53 54 #if HAVE_CONFIG_H 55 #include "config.h" 56 #endif 57 58 #include "pack_dev.h" 59 60 static pack_t pack_netbsd; 61 static pack_t pack_freebsd; 62 static pack_t pack_8_8; 63 static pack_t pack_12_20; 64 static pack_t pack_14_18; 65 static pack_t pack_8_24; 66 static pack_t pack_bsdos; 67 static int compare_format(const void *, const void *); 68 69 70 /* exported */ 71 dev_t 72 pack_native(int n, u_long numbers[]) 73 { 74 dev_t dev; 75 76 if (n == 2) { 77 dev = makedev(numbers[0], numbers[1]); 78 if (major(dev) != numbers[0]) 79 errx(1, "invalid major number"); 80 if (minor(dev) != numbers[1]) 81 errx(1, "invalid minor number"); 82 } else 83 errx(1, "too many fields for format"); 84 return (dev); 85 } 86 87 88 #define major_netbsd(x) ((int32_t)((((x) & 0x000fff00) >> 8))) 89 #define minor_netbsd(x) ((int32_t)((((x) & 0xfff00000) >> 12) | \ 90 (((x) & 0x000000ff) >> 0))) 91 #define makedev_netbsd(x,y) ((dev_t)((((x) << 8) & 0x000fff00) | \ 92 (((y) << 12) & 0xfff00000) | \ 93 (((y) << 0) & 0x000000ff))) 94 95 static dev_t 96 pack_netbsd(int n, u_long numbers[]) 97 { 98 dev_t dev; 99 100 if (n == 2) { 101 dev = makedev_netbsd(numbers[0], numbers[1]); 102 if (major_netbsd(dev) != numbers[0]) 103 errx(1, "invalid major number"); 104 if (minor_netbsd(dev) != numbers[1]) 105 errx(1, "invalid minor number"); 106 } else 107 errx(1, "too many fields for format"); 108 return (dev); 109 } 110 111 112 #define major_freebsd(x) ((int32_t)(((x) & 0x0000ff00) >> 8)) 113 #define minor_freebsd(x) ((int32_t)(((x) & 0xffff00ff) >> 0)) 114 #define makedev_freebsd(x,y) ((dev_t)((((x) << 8) & 0x0000ff00) | \ 115 (((y) << 0) & 0xffff00ff))) 116 117 static dev_t 118 pack_freebsd(int n, u_long numbers[]) 119 { 120 dev_t dev; 121 122 if (n == 2) { 123 dev = makedev_freebsd(numbers[0], numbers[1]); 124 if (major_freebsd(dev) != numbers[0]) 125 errx(1, "invalid major number"); 126 if (minor_freebsd(dev) != numbers[1]) 127 errx(1, "invalid minor number"); 128 } else 129 errx(1, "too many fields for format"); 130 return (dev); 131 } 132 133 134 #define major_8_8(x) ((int32_t)(((x) & 0x0000ff00) >> 8)) 135 #define minor_8_8(x) ((int32_t)(((x) & 0x000000ff) >> 0)) 136 #define makedev_8_8(x,y) ((dev_t)((((x) << 8) & 0x0000ff00) | \ 137 (((y) << 0) & 0x000000ff))) 138 139 static dev_t 140 pack_8_8(int n, u_long numbers[]) 141 { 142 dev_t dev; 143 144 if (n == 2) { 145 dev = makedev_8_8(numbers[0], numbers[1]); 146 if (major_8_8(dev) != numbers[0]) 147 errx(1, "invalid major number"); 148 if (minor_8_8(dev) != numbers[1]) 149 errx(1, "invalid minor number"); 150 } else 151 errx(1, "too many fields for format"); 152 return (dev); 153 } 154 155 156 #define major_12_20(x) ((int32_t)(((x) & 0xfff00000) >> 20)) 157 #define minor_12_20(x) ((int32_t)(((x) & 0x000fffff) >> 0)) 158 #define makedev_12_20(x,y) ((dev_t)((((x) << 20) & 0xfff00000) | \ 159 (((y) << 0) & 0x000fffff))) 160 161 static dev_t 162 pack_12_20(int n, u_long numbers[]) 163 { 164 dev_t dev; 165 166 if (n == 2) { 167 dev = makedev_12_20(numbers[0], numbers[1]); 168 if (major_12_20(dev) != numbers[0]) 169 errx(1, "invalid major number"); 170 if (minor_12_20(dev) != numbers[1]) 171 errx(1, "invalid minor number"); 172 } else 173 errx(1, "too many fields for format"); 174 return (dev); 175 } 176 177 178 #define major_14_18(x) ((int32_t)(((x) & 0xfffc0000) >> 18)) 179 #define minor_14_18(x) ((int32_t)(((x) & 0x0003ffff) >> 0)) 180 #define makedev_14_18(x,y) ((dev_t)((((x) << 18) & 0xfffc0000) | \ 181 (((y) << 0) & 0x0003ffff))) 182 183 static dev_t 184 pack_14_18(int n, u_long numbers[]) 185 { 186 dev_t dev; 187 188 if (n == 2) { 189 dev = makedev_14_18(numbers[0], numbers[1]); 190 if (major_14_18(dev) != numbers[0]) 191 errx(1, "invalid major number"); 192 if (minor_14_18(dev) != numbers[1]) 193 errx(1, "invalid minor number"); 194 } else 195 errx(1, "too many fields for format"); 196 return (dev); 197 } 198 199 200 #define major_8_24(x) ((int32_t)(((x) & 0xff000000) >> 24)) 201 #define minor_8_24(x) ((int32_t)(((x) & 0x00ffffff) >> 0)) 202 #define makedev_8_24(x,y) ((dev_t)((((x) << 24) & 0xff000000) | \ 203 (((y) << 0) & 0x00ffffff))) 204 205 static dev_t 206 pack_8_24(int n, u_long numbers[]) 207 { 208 dev_t dev; 209 210 if (n == 2) { 211 dev = makedev_8_24(numbers[0], numbers[1]); 212 if (major_8_24(dev) != numbers[0]) 213 errx(1, "invalid major number"); 214 if (minor_8_24(dev) != numbers[1]) 215 errx(1, "invalid minor number"); 216 } else 217 errx(1, "too many fields for format"); 218 return (dev); 219 } 220 221 222 #define major_12_12_8(x) ((int32_t)(((x) & 0xfff00000) >> 20)) 223 #define unit_12_12_8(x) ((int32_t)(((x) & 0x000fff00) >> 8)) 224 #define subunit_12_12_8(x) ((int32_t)(((x) & 0x000000ff) >> 0)) 225 #define makedev_12_12_8(x,y,z) ((dev_t)((((x) << 20) & 0xfff00000) | \ 226 (((y) << 8) & 0x000fff00) | \ 227 (((z) << 0) & 0x000000ff))) 228 229 static dev_t 230 pack_bsdos(int n, u_long numbers[]) 231 { 232 dev_t dev; 233 234 if (n == 2) { 235 dev = makedev_12_20(numbers[0], numbers[1]); 236 if (major_12_20(dev) != numbers[0]) 237 errx(1, "invalid major number"); 238 if (minor_12_20(dev) != numbers[1]) 239 errx(1, "invalid minor number"); 240 } else if (n == 3) { 241 dev = makedev_12_12_8(numbers[0], numbers[1], numbers[2]); 242 if (major_12_12_8(dev) != numbers[0]) 243 errx(1, "invalid major number"); 244 if (unit_12_12_8(dev) != numbers[1]) 245 errx(1, "invalid unit number"); 246 if (subunit_12_12_8(dev) != numbers[2]) 247 errx(1, "invalid subunit number"); 248 } else 249 errx(1, "too many fields for format"); 250 return (dev); 251 } 252 253 254 /* list of formats and pack functions */ 255 /* this list must be sorted lexically */ 256 struct format { 257 const char *name; 258 pack_t *pack; 259 } formats[] = { 260 {"386bsd", pack_8_8}, 261 {"4bsd", pack_8_8}, 262 {"bsdos", pack_bsdos}, 263 {"freebsd", pack_freebsd}, 264 {"hpux", pack_8_24}, 265 {"isc", pack_8_8}, 266 {"linux", pack_8_8}, 267 {"native", pack_native}, 268 {"netbsd", pack_netbsd}, 269 {"osf1", pack_12_20}, 270 {"sco", pack_8_8}, 271 {"solaris", pack_14_18}, 272 {"sunos", pack_8_8}, 273 {"svr3", pack_8_8}, 274 {"svr4", pack_14_18}, 275 {"ultrix", pack_8_8}, 276 }; 277 278 static int 279 compare_format(const void *key, const void *element) 280 { 281 const char *name; 282 const struct format *format; 283 284 name = key; 285 format = element; 286 287 return (strcmp(name, format->name)); 288 } 289 290 291 pack_t * 292 pack_find(const char *name) 293 { 294 struct format *format; 295 296 format = bsearch(name, formats, 297 sizeof(formats)/sizeof(formats[0]), 298 sizeof(formats[0]), compare_format); 299 if (format == 0) 300 return (NULL); 301 return (format->pack); 302 } 303