1 /*
   2  * Copyright (C) 2011 Oracle.
   3  *
   4  * This program is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU General Public License
   6  * as published by the Free Software Foundation; either version 2
   7  * of the License, or (at your option) any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License
  15  * along with this program; if not, see http://www.gnu.org/copyleft/gpl.txt
  16  */
  17 
  18 #include "smatch.h"
  19 #include "smatch_slist.h"
  20 #include "smatch_extra.h"
  21 
  22 int RETURN_ID;
  23 
  24 struct return_states_callback {
  25         void (*callback)(void);
  26 };
  27 ALLOCATOR(return_states_callback, "return states callbacks");
  28 DECLARE_PTR_LIST(callback_list, struct return_states_callback);
  29 static struct callback_list *callback_list;
  30 
  31 DECLARE_PTR_LIST(stree_stack_stack, struct stree_stack);
  32 static void push_stree_stack(struct stree_stack_stack **stack_stack, struct stree_stack *stack)
  33 {
  34         add_ptr_list(stack_stack, stack);
  35 }
  36 
  37 static struct stree_stack *pop_stree_stack(struct stree_stack_stack **stack_stack)
  38 {
  39         struct stree_stack *stack;
  40 
  41         stack = last_ptr_list((struct ptr_list *)*stack_stack);
  42         delete_ptr_list_last((struct ptr_list **)stack_stack);
  43         return stack;
  44 }
  45 
  46 static struct stree_stack *return_stree_stack;
  47 static struct stree_stack_stack *saved_stack_stack;
  48 static struct stree *all_return_states;
  49 static struct stree_stack *saved_stack;
  50 
  51 void all_return_states_hook(void (*callback)(void))
  52 {
  53         struct return_states_callback *rs_cb = __alloc_return_states_callback(0);
  54 
  55         rs_cb->callback = callback;
  56         add_ptr_list(&callback_list, rs_cb);
  57 }
  58 
  59 static void call_hooks(void)
  60 {
  61         struct return_states_callback *rs_cb;
  62         struct stree *orig;
  63 
  64         orig = __swap_cur_stree(all_return_states);
  65         FOR_EACH_PTR(callback_list, rs_cb) {
  66                 rs_cb->callback();
  67         } END_FOR_EACH_PTR(rs_cb);
  68         __swap_cur_stree(orig);
  69 }
  70 
  71 static void match_return(int return_id, char *return_ranges, struct expression *expr)
  72 {
  73         struct stree *stree;
  74 
  75         stree = clone_stree(__get_cur_stree());
  76         merge_stree_no_pools(&all_return_states, stree);
  77         push_stree(&return_stree_stack, stree);
  78 }
  79 
  80 static void match_end_func(struct symbol *sym)
  81 {
  82         /*
  83          * FIXME: either this isn't needed or we need to copy a stree into the
  84          * return_stree_stack as well.
  85          */
  86         merge_stree(&all_return_states, __get_cur_stree());
  87         call_hooks();
  88 }
  89 
  90 static void match_save_states(struct expression *expr)
  91 {
  92         push_stree(&saved_stack, all_return_states);
  93         all_return_states = NULL;
  94 
  95         push_stree_stack(&saved_stack_stack, return_stree_stack);
  96         return_stree_stack = NULL;
  97 }
  98 
  99 static void match_restore_states(struct expression *expr)
 100 {
 101         /* This free_stree() isn't needed is it?? */
 102         free_stree(&all_return_states);
 103 
 104         all_return_states = pop_stree(&saved_stack);
 105         return_stree_stack = pop_stree_stack(&saved_stack_stack);
 106 }
 107 
 108 struct stree *get_all_return_states(void)
 109 {
 110         return all_return_states;
 111 }
 112 
 113 struct stree_stack *get_all_return_strees(void)
 114 {
 115         return return_stree_stack;
 116 }
 117 
 118 static void free_resources(struct symbol *sym)
 119 {
 120         free_stree(&all_return_states);
 121         free_stack_and_strees(&return_stree_stack);
 122 }
 123 
 124 void register_returns_early(int id)
 125 {
 126         RETURN_ID = id;
 127 
 128         set_dynamic_states(RETURN_ID);
 129         add_split_return_callback(match_return);
 130 }
 131 
 132 void register_returns(int id)
 133 {
 134         add_hook(&match_end_func, END_FUNC_HOOK);
 135         add_hook(&match_save_states, INLINE_FN_START);
 136         add_hook(&match_restore_states, INLINE_FN_END);
 137         add_hook(&free_resources, AFTER_FUNC_HOOK);
 138 }