1/*
2 * sparse/macro_table.c
3 *
4 * Copyright (C) 2010 Dan Carpenter.
5 *
6 * Permission is hereby granted, free of charge, to any person obtaining a copy
7 * of this software and associated documentation files (the "Software"), to deal
8 * in the Software without restriction, including without limitation the rights
9 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
10 * copies of the Software, and to permit persons to whom the Software is
11 * furnished to do so, subject to the following conditions:
12 *
13 * The above copyright notice and this permission notice shall be included in
14 * all copies or substantial portions of the Software.
15 *
16 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
19 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
22 * THE SOFTWARE.
23 */
24
25#include <stdlib.h>
26#include <stdio.h>
27#include <string.h>
28#include "lib.h"
29#include "parse.h"
30#include "cwchash/hashtable.h"
31
32static struct hashtable *macro_table;
33
34static DEFINE_HASHTABLE_INSERT(do_insert_macro, struct position, struct string_list);
35static DEFINE_HASHTABLE_SEARCH(do_search_macro, struct position, struct string_list);
36
37static inline unsigned int position_hash(void *_pos)
38{
39	struct position *pos = _pos;
40
41	return pos->line | (pos->pos << 22) | (pos->stream << 18);
42}
43
44static inline int equalkeys(void *_pos1, void *_pos2)
45{
46	struct position *pos1 = _pos1;
47	struct position *pos2 = _pos2;
48
49	return pos1->line == pos2->line && pos1->pos == pos2->pos &&
50		pos1->stream == pos2->stream;
51}
52
53static void insert_macro_string(struct string_list **str_list, char *new)
54{
55	add_ptr_list(str_list, new);
56}
57
58void store_macro_pos(struct token *token)
59{
60	struct string_list *list;
61
62	if (!macro_table)
63		macro_table = create_hashtable(5000, position_hash, equalkeys);
64
65	list = do_search_macro(macro_table, &token->pos);
66	insert_macro_string(&list, token->ident->name);
67
68	do_insert_macro(macro_table, &token->pos, list);
69}
70
71char *get_macro_name(struct position pos)
72{
73	struct string_list *list;
74
75	if (!macro_table)
76		return NULL;
77	list = do_search_macro(macro_table, &pos);
78	return first_ptr_list((struct ptr_list *)list);
79}
80
81char *get_inner_macro(struct position pos)
82{
83	struct string_list *list;
84
85	if (!macro_table)
86		return NULL;
87	list = do_search_macro(macro_table, &pos);
88	return last_ptr_list((struct ptr_list *)list);
89}
90
91struct string_list *get_all_macros(struct position pos)
92{
93	if (!macro_table)
94		return NULL;
95	return do_search_macro(macro_table, &pos);
96}
97