1 #include <ctf-api.h>
2 #include <stdio.h>
3 #include <stdlib.h>
4 
5 static int
print_struct(const char * name,ctf_id_t membtype,unsigned long offset,void * fp_)6 print_struct (const char *name, ctf_id_t membtype, unsigned long offset,
7 	      void *fp_)
8 {
9   ctf_dict_t *fp = (ctf_dict_t *) fp_;
10   char *type_name = ctf_type_aname (fp, membtype);
11 
12   printf ("iter test: %s, offset %lx, has type %lx/%s\n",
13 	  name, offset, membtype, type_name);
14   free (type_name);
15 
16   return 0;
17 }
18 
19 int
main(int argc,char * argv[])20 main (int argc, char *argv[])
21 {
22   ctf_dict_t *fp;
23   ctf_archive_t *ctf;
24   ctf_id_t type;
25   ctf_next_t *i = NULL;
26   const char *name;
27   ctf_id_t membtype;
28   ssize_t offset;
29   int icount = 0;
30   int err;
31 
32   if (argc != 2)
33     {
34       fprintf (stderr, "Syntax: %s PROGRAM\n", argv[0]);
35       exit(1);
36     }
37 
38   if ((ctf = ctf_open (argv[1], NULL, &err)) == NULL)
39     goto open_err;
40   if ((fp = ctf_dict_open (ctf, NULL, &err)) == NULL)
41     goto open_err;
42 
43   /* Iterate over the structure members with each iterator type in turn.  */
44 
45   if ((type = ctf_lookup_by_name (fp, "struct foo_t") ) == CTF_ERR)
46     goto err;
47 
48   if (ctf_member_iter (fp, type, print_struct, fp) < 0)
49     goto ierr;
50 
51   while ((offset = ctf_member_next (fp, type, &i, &name, &membtype,
52 				    CTF_MN_RECURSE)) >= 0)
53     {
54       char *type_name = ctf_type_aname (fp, membtype);
55 
56       printf ("next test: %s, offset %lx, has type %lx/%s\n",
57 	      name, offset, membtype, type_name);
58       free (type_name);
59     }
60   if (ctf_errno (fp) != ECTF_NEXT_END)
61     goto nerr;
62 
63   /* Now make sure the count of members does not include any recursive
64      members.  */
65   while ((offset = ctf_member_next (fp, type, &i, &name, &membtype, 0)) >= 0)
66     icount++;
67 
68   if (ctf_errno (fp) != ECTF_NEXT_END)
69     goto nerr;
70 
71   if (icount != ctf_member_count (fp, type))
72     printf ("member counts differ: %i by direct iteration, "
73 	    "%i by ctf_member_count\n", icount, ctf_member_count (fp, type));
74 
75   ctf_dict_close (fp);
76   ctf_close (ctf);
77 
78   return 0;
79 
80  open_err:
81   fprintf (stderr, "%s: cannot open: %s\n", argv[0], ctf_errmsg (err));
82   return 1;
83  err:
84   fprintf (stderr, "Lookup failed: %s\n", ctf_errmsg (ctf_errno (fp)));
85   return 1;
86  ierr:
87   fprintf (stderr, "_iter iteration failed: %s\n", ctf_errmsg (ctf_errno (fp)));
88   return 1;
89  nerr:
90   fprintf (stderr, "_next iteration failed: %s\n", ctf_errmsg (ctf_errno (fp)));
91   return 1;
92 }
93