| #include "config.h" |
| #include <ctf-api.h> |
| #include <stdio.h> |
| #include <stdlib.h> |
| #include <string.h> |
| |
| int |
| main (int argc, char *argv[]) |
| { |
| ctf_archive_t *ctf; |
| ctf_dict_t *a_fp, *ignore1_fp, *b_fp, *ignore2_fp, *tmp_fp; |
| int err; |
| ctf_id_t a, b, ignore1, ignore2, tmp; |
| char *foo; |
| ctf_next_t *i = NULL; |
| const char *name; |
| int val; |
| |
| if (argc != 2) |
| { |
| fprintf (stderr, "Syntax: %s PROGRAM\n", argv[0]); |
| exit(1); |
| } |
| |
| if ((ctf = ctf_open (argv[1], NULL, &err)) == NULL) |
| goto open_err; |
| |
| /* Fish out each symbol in turn: also try to fish out a nonexistent one. */ |
| |
| if ((a_fp = ctf_arc_lookup_symbol_name (ctf, "a", &a, &err)) == NULL) |
| goto sym_err; |
| printf ("Type of a is %s\n", foo = ctf_type_aname (a_fp, a)); |
| |
| if ((b_fp = ctf_arc_lookup_symbol_name (ctf, "b", &b, &err)) == NULL) |
| goto sym_err; |
| printf ("Type of b is %s\n", foo = ctf_type_aname (b_fp, b)); |
| |
| if ((ignore1_fp = ctf_arc_lookup_symbol_name (ctf, "ignore1", &ignore1, &err)) == NULL) |
| goto sym_err; |
| printf ("Type of ignore1 is %s\n", foo = ctf_type_aname (ignore1_fp, ignore1)); |
| |
| if ((ignore2_fp = ctf_arc_lookup_symbol_name (ctf, "ignore2", &ignore2, &err)) == NULL) |
| goto sym_err; |
| printf ("Type of ignore2 is %s\n", foo = ctf_type_aname (ignore2_fp, ignore1)); |
| |
| /* Try a call in just-get-the-dict mode and make sure it doesn't fail. */ |
| if ((tmp_fp = ctf_arc_lookup_symbol_name (ctf, "ignore2", NULL, &err)) == NULL) |
| goto sym_err; |
| ctf_dict_close (tmp_fp); |
| |
| /* Make sure failures fail. */ |
| if ((ctf_arc_lookup_symbol_name (ctf, "nonexistent", NULL, &err) != NULL) |
| || err != ECTF_NOTYPEDAT) |
| goto nosym_err; |
| |
| /* Fish them out again to check the caching layer. */ |
| if (((tmp_fp = ctf_arc_lookup_symbol_name (ctf, "a", &tmp, &err)) != a_fp) |
| || (tmp != a)) |
| goto sym_cache_err; |
| ctf_dict_close (tmp_fp); |
| |
| if (((tmp_fp = ctf_arc_lookup_symbol_name (ctf, "b", &tmp, &err)) != b_fp) |
| || (tmp != b)) |
| goto sym_cache_err; |
| ctf_dict_close (tmp_fp); |
| |
| if (((tmp_fp = ctf_arc_lookup_symbol_name (ctf, "ignore1", &tmp, &err)) != ignore1_fp) |
| || (tmp != ignore1)) |
| goto sym_cache_err; |
| ctf_dict_close (tmp_fp); |
| |
| if (((tmp_fp = ctf_arc_lookup_symbol_name (ctf, "ignore2", &tmp, &err)) != ignore2_fp) |
| || (tmp != ignore2)) |
| goto sym_cache_err; |
| ctf_dict_close (tmp_fp); |
| |
| ctf_dict_close (a_fp); |
| ctf_dict_close (b_fp); |
| ctf_dict_close (ignore1_fp); |
| ctf_dict_close (ignore2_fp); |
| ctf_close (ctf); |
| |
| return 0; |
| |
| open_err: |
| fprintf (stderr, "%s: cannot open: %s\n", argv[0], ctf_errmsg (err)); |
| return 1; |
| sym_err: |
| fprintf (stderr, "%s: Symbol lookup error: %s\n", argv[0], ctf_errmsg (err)); |
| return 1; |
| nosym_err: |
| fprintf (stderr, "%s: Nonexistent symbol lookup unexpected error: %s\n", argv[0], |
| ctf_errmsg (err)); |
| return 1; |
| sym_cache_err: |
| fprintf (stderr, "%s: Symbol re-lookup error (caching bug): %s\n", argv[0], |
| ctf_errmsg (err)); |
| return 1; |
| } |