Merge from vendor branch GCC:
[dragonfly.git] / share / examples / ses / srcs / getobjmap.c
1 /* $FreeBSD: src/share/examples/ses/srcs/getobjmap.c,v 1.1 2000/02/29 05:44:17 mjacob Exp $ */
2 /* $DragonFly: src/share/examples/ses/srcs/getobjmap.c,v 1.3 2003/11/14 03:54:32 dillon Exp $ */
3 /*
4  * Copyright (c) 2000 by Matthew Jacob
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions, and the following disclaimer,
12  *    without modification, immediately at the beginning of the file.
13  * 2. The name of the author may not be used to endorse or promote products
14  *    derived from this software without specific prior written permission.
15  *
16  * Alternatively, this software may be distributed under the terms of the
17  * the GNU Public License ("GPL").
18  *
19  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22  * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR
23  * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29  * SUCH DAMAGE.
30  * 
31  * Matthew Jacob
32  * Feral Software
33  * mjacob@feral.com
34  */
35
36 #include <unistd.h>
37 #include <stdlib.h>
38 #include <stdio.h>
39 #include <fcntl.h>
40 #include <sys/ioctl.h>
41 #include SESINC
42
43 extern char *geteltnm (int);
44
45 int
46 main(a, v)
47         int a;
48         char **v;
49 {
50         ses_object *objp;
51         int nobj, fd, i;
52
53         while (*++v) {
54                 fd = open(*v, O_RDONLY);
55                 if (fd < 0) {
56                         perror(*v);
57                         continue;
58                 }
59                 if (ioctl(fd, SESIOC_GETNOBJ, (caddr_t) &nobj) < 0) {
60                         perror("SESIOC_GETNOBJ");
61                         (void) close(fd);
62                         continue;
63                 }
64                 fprintf(stdout, "%s: %d objects\n", *v, nobj);
65                 if (nobj == 0) {
66                         (void) close(fd);
67                         continue;
68                 }
69                 objp = calloc(nobj, sizeof (ses_object));
70                 if (objp == NULL) {
71                         perror("calloc");
72                         (void) close(fd);
73                         continue;
74                 }
75                 if (ioctl(fd, SESIOC_GETOBJMAP, (caddr_t) objp) < 0) {
76                         perror("SESIOC_GETOBJMAP");
77                         (void) close(fd);
78                         continue;
79                 }
80                 for (i = 0; i < nobj; i++) {
81                         printf(" Object %d: ID 0x%x Type '%s'\n", i,
82                             objp[i].obj_id, geteltnm((int)objp[i].object_type));
83                 }
84                 free(objp);
85                 (void) close(fd);
86         }
87         return (0);
88 }