nodestack: eliminate get_future_value_expiration()
[cdsspec-compiler.git] / nodestack.cc
1 #define __STDC_FORMAT_MACROS
2 #include <inttypes.h>
3
4 #include <string.h>
5
6 #include "nodestack.h"
7 #include "action.h"
8 #include "common.h"
9 #include "model.h"
10 #include "threads-model.h"
11
12 /**
13  * @brief Node constructor
14  *
15  * Constructs a single Node for use in a NodeStack. Each Node is associated
16  * with exactly one ModelAction (exception: the first Node should be created
17  * as an empty stub, to represent the first thread "choice") and up to one
18  * parent.
19  *
20  * @param act The ModelAction to associate with this Node. May be NULL.
21  * @param par The parent Node in the NodeStack. May be NULL if there is no
22  * parent.
23  * @param nthreads The number of threads which exist at this point in the
24  * execution trace.
25  */
26 Node::Node(ModelAction *act, Node *par, int nthreads, Node *prevfairness)
27         : action(act),
28         parent(par),
29         num_threads(nthreads),
30         explored_children(num_threads),
31         backtrack(num_threads),
32         fairness(num_threads),
33         numBacktracks(0),
34         enabled_array(NULL),
35         may_read_from(),
36         read_from_index(0),
37         future_values(),
38         future_index(-1),
39         relseq_break_writes(),
40         relseq_break_index(0),
41         misc_index(0),
42         misc_max(0)
43 {
44         ASSERT(act);
45         act->set_node(this);
46         int currtid = id_to_int(act->get_tid());
47         int prevtid = prevfairness ? id_to_int(prevfairness->action->get_tid()) : 0;
48
49         if (model->params.fairwindow != 0) {
50                 for (int i = 0; i < num_threads; i++) {
51                         ASSERT(i < ((int)fairness.size()));
52                         struct fairness_info *fi = &fairness[i];
53                         struct fairness_info *prevfi = (parent && i < parent->get_num_threads()) ? &parent->fairness[i] : NULL;
54                         if (prevfi) {
55                                 *fi = *prevfi;
56                         }
57                         if (parent && parent->is_enabled(int_to_id(i))) {
58                                 fi->enabled_count++;
59                         }
60                         if (i == currtid) {
61                                 fi->turns++;
62                                 fi->priority = false;
63                         }
64                         /* Do window processing */
65                         if (prevfairness != NULL) {
66                                 if (prevfairness->parent->is_enabled(int_to_id(i)))
67                                         fi->enabled_count--;
68                                 if (i == prevtid) {
69                                         fi->turns--;
70                                 }
71                                 /* Need full window to start evaluating
72                                  * conditions
73                                  * If we meet the enabled count and have no
74                                  * turns, give us priority */
75                                 if ((fi->enabled_count >= model->params.enabledcount) &&
76                                                 (fi->turns == 0))
77                                         fi->priority = true;
78                         }
79                 }
80         }
81 }
82
83 /** @brief Node desctructor */
84 Node::~Node()
85 {
86         delete action;
87         if (enabled_array)
88                 model_free(enabled_array);
89 }
90
91 /** Prints debugging info for the ModelAction associated with this Node */
92 void Node::print()
93 {
94         action->print();
95         model_print("          backtrack: %s", backtrack_empty() ? "empty" : "non-empty ");
96         for (int i = 0; i < (int)backtrack.size(); i++)
97                 if (backtrack[i] == true)
98                         model_print("[%d]", i);
99         model_print("\n");
100         model_print("          future values: %s", future_value_empty() ? "empty" : "non-empty ");
101         for (int i = future_index + 1; i < (int)future_values.size(); i++)
102                 model_print("[%#" PRIx64 "]", future_values[i].value);
103         model_print("\n");
104
105         model_print("          read-from: %s", read_from_empty() ? "empty" : "non-empty ");
106         for (int i = read_from_index + 1; i < (int)may_read_from.size(); i++)
107                 model_print("[%d]", may_read_from[i]->get_seq_number());
108         model_print("\n");
109
110         model_print("          promises: %s\n", promise_empty() ? "empty" : "non-empty");
111         model_print("          misc: %s\n", misc_empty() ? "empty" : "non-empty");
112         model_print("          rel seq break: %s\n", relseq_break_empty() ? "empty" : "non-empty");
113 }
114
115 /** @brief Prints info about may_read_from set */
116 void Node::print_may_read_from()
117 {
118         for (unsigned int i = 0; i < may_read_from.size(); i++)
119                 may_read_from[i]->print();
120 }
121
122 /**
123  * Sets a promise to explore meeting with the given node.
124  * @param i is the promise index.
125  */
126 void Node::set_promise(unsigned int i, bool is_rmw)
127 {
128         if (i >= promises.size())
129                 promises.resize(i + 1, PROMISE_IGNORE);
130         if (promises[i] == PROMISE_IGNORE) {
131                 promises[i] = PROMISE_UNFULFILLED;
132                 if (is_rmw)
133                         promises[i] |= PROMISE_RMW;
134         }
135 }
136
137 /**
138  * Looks up whether a given promise should be satisfied by this node.
139  * @param i The promise index.
140  * @return true if the promise should be satisfied by the given model action.
141  */
142 bool Node::get_promise(unsigned int i) const
143 {
144         return (i < promises.size()) && ((promises[i] & PROMISE_MASK) == PROMISE_FULFILLED);
145 }
146
147 /**
148  * Increments to the next combination of promises.
149  * @return true if we have a valid combination.
150  */
151 bool Node::increment_promise()
152 {
153         DBG();
154         unsigned int rmw_count = 0;
155         for (unsigned int i = 0; i < promises.size(); i++) {
156                 if (promises[i] == (PROMISE_RMW|PROMISE_FULFILLED))
157                         rmw_count++;
158         }
159
160         for (unsigned int i = 0; i < promises.size(); i++) {
161                 if ((promises[i] & PROMISE_MASK) == PROMISE_UNFULFILLED) {
162                         if ((rmw_count > 0) && (promises[i] & PROMISE_RMW)) {
163                                 //sending our value to two rmws... not going to work..try next combination
164                                 continue;
165                         }
166                         promises[i] = (promises[i] & PROMISE_RMW) |PROMISE_FULFILLED;
167                         while (i > 0) {
168                                 i--;
169                                 if ((promises[i] & PROMISE_MASK) == PROMISE_FULFILLED)
170                                         promises[i] = (promises[i] & PROMISE_RMW) | PROMISE_UNFULFILLED;
171                         }
172                         return true;
173                 } else if (promises[i] == (PROMISE_RMW|PROMISE_FULFILLED)) {
174                         rmw_count--;
175                 }
176         }
177         return false;
178 }
179
180 /**
181  * Returns whether the promise set is empty.
182  * @return true if we have explored all promise combinations.
183  */
184 bool Node::promise_empty() const
185 {
186         bool fulfilledrmw = false;
187         for (int i = promises.size() - 1; i >= 0; i--) {
188                 if (promises[i] == PROMISE_UNFULFILLED)
189                         return false;
190                 if (!fulfilledrmw && ((promises[i]&PROMISE_MASK) == PROMISE_UNFULFILLED))
191                         return false;
192                 if (promises[i] == (PROMISE_FULFILLED|PROMISE_RMW))
193                         fulfilledrmw = true;
194         }
195         return true;
196 }
197
198 void Node::set_misc_max(int i)
199 {
200         misc_max = i;
201 }
202
203 int Node::get_misc() const
204 {
205         return misc_index;
206 }
207
208 bool Node::increment_misc()
209 {
210         return (misc_index < misc_max) && ((++misc_index) < misc_max);
211 }
212
213 bool Node::misc_empty() const
214 {
215         return (misc_index + 1) >= misc_max;
216 }
217
218 /**
219  * Adds a value from a weakly ordered future write to backtrack to. This
220  * operation may "fail" if the future value has already been run (within some
221  * sloppiness window of this expiration), or if the futurevalues set has
222  * reached its maximum.
223  * @see model_params.maxfuturevalues
224  *
225  * @param value is the value to backtrack to.
226  * @return True if the future value was successully added; false otherwise
227  */
228 bool Node::add_future_value(uint64_t value, modelclock_t expiration)
229 {
230         int idx = -1; /* Highest index where value is found */
231         for (unsigned int i = 0; i < future_values.size(); i++) {
232                 if (future_values[i].value == value) {
233                         if (expiration <= future_values[i].expiration)
234                                 return false;
235                         idx = i;
236                 }
237         }
238         if (idx > future_index) {
239                 /* Future value hasn't been explored; update expiration */
240                 future_values[idx].expiration = expiration;
241                 return true;
242         } else if (idx >= 0 && expiration <= future_values[idx].expiration + model->params.expireslop) {
243                 /* Future value has been explored and is within the "sloppy" window */
244                 return false;
245         }
246
247         /* Limit the size of the future-values set */
248         if (model->params.maxfuturevalues > 0 &&
249                         (int)future_values.size() >= model->params.maxfuturevalues)
250                 return false;
251
252         struct future_value newfv = {value, expiration};
253         future_values.push_back(newfv);
254         return true;
255 }
256
257 /**
258  * Checks whether the future_values set for this node is empty.
259  * @return true if the future_values set is empty.
260  */
261 bool Node::future_value_empty() const
262 {
263         return ((future_index + 1) >= ((int)future_values.size()));
264 }
265
266 /**
267  * Checks if the Thread associated with this thread ID has been explored from
268  * this Node already.
269  * @param tid is the thread ID to check
270  * @return true if this thread choice has been explored already, false
271  * otherwise
272  */
273 bool Node::has_been_explored(thread_id_t tid) const
274 {
275         int id = id_to_int(tid);
276         return explored_children[id];
277 }
278
279 /**
280  * Checks if the backtracking set is empty.
281  * @return true if the backtracking set is empty
282  */
283 bool Node::backtrack_empty() const
284 {
285         return (numBacktracks == 0);
286 }
287
288 /**
289  * Checks whether the readsfrom set for this node is empty.
290  * @return true if the readsfrom set is empty.
291  */
292 bool Node::read_from_empty() const
293 {
294         return ((read_from_index + 1) >= may_read_from.size());
295 }
296
297 /**
298  * Mark the appropriate backtracking information for exploring a thread choice.
299  * @param act The ModelAction to explore
300  */
301 void Node::explore_child(ModelAction *act, enabled_type_t *is_enabled)
302 {
303         if (!enabled_array)
304                 enabled_array = (enabled_type_t *)model_malloc(sizeof(enabled_type_t) * num_threads);
305         if (is_enabled != NULL)
306                 memcpy(enabled_array, is_enabled, sizeof(enabled_type_t) * num_threads);
307         else {
308                 for (int i = 0; i < num_threads; i++)
309                         enabled_array[i] = THREAD_DISABLED;
310         }
311
312         explore(act->get_tid());
313 }
314
315 /**
316  * Records a backtracking reference for a thread choice within this Node.
317  * Provides feedback as to whether this thread choice is already set for
318  * backtracking.
319  * @return false if the thread was already set to be backtracked, true
320  * otherwise
321  */
322 bool Node::set_backtrack(thread_id_t id)
323 {
324         int i = id_to_int(id);
325         ASSERT(i < ((int)backtrack.size()));
326         if (backtrack[i])
327                 return false;
328         backtrack[i] = true;
329         numBacktracks++;
330         return true;
331 }
332
333 thread_id_t Node::get_next_backtrack()
334 {
335         /** @todo Find next backtrack */
336         unsigned int i;
337         for (i = 0; i < backtrack.size(); i++)
338                 if (backtrack[i] == true)
339                         break;
340         /* Backtrack set was empty? */
341         ASSERT(i != backtrack.size());
342
343         backtrack[i] = false;
344         numBacktracks--;
345         return int_to_id(i);
346 }
347
348 bool Node::is_enabled(Thread *t) const
349 {
350         int thread_id = id_to_int(t->get_id());
351         return thread_id < num_threads && (enabled_array[thread_id] != THREAD_DISABLED);
352 }
353
354 enabled_type_t Node::enabled_status(thread_id_t tid) const
355 {
356         int thread_id = id_to_int(tid);
357         if (thread_id < num_threads)
358                 return enabled_array[thread_id];
359         else
360                 return THREAD_DISABLED;
361 }
362
363 bool Node::is_enabled(thread_id_t tid) const
364 {
365         int thread_id = id_to_int(tid);
366         return thread_id < num_threads && (enabled_array[thread_id] != THREAD_DISABLED);
367 }
368
369 bool Node::has_priority(thread_id_t tid) const
370 {
371         return fairness[id_to_int(tid)].priority;
372 }
373
374 /**
375  * Add an action to the may_read_from set.
376  * @param act is the action to add
377  */
378 void Node::add_read_from(const ModelAction *act)
379 {
380         may_read_from.push_back(act);
381 }
382
383 /**
384  * Gets the next 'future_value' from this Node. Only valid for a node where
385  * this->action is a 'read'.
386  * @return The first element in future_values
387  */
388 struct future_value Node::get_future_value() const
389 {
390         ASSERT(future_index >= 0 && future_index < ((int)future_values.size()));
391         return future_values[future_index];
392 }
393
394 int Node::get_read_from_size() const
395 {
396         return may_read_from.size();
397 }
398
399 const ModelAction * Node::get_read_from_at(int i) const
400 {
401         return may_read_from[i];
402 }
403
404 /**
405  * Gets the next 'may_read_from' action from this Node. Only valid for a node
406  * where this->action is a 'read'.
407  * @return The first element in may_read_from
408  */
409 const ModelAction * Node::get_read_from() const
410 {
411         if (read_from_index < may_read_from.size())
412                 return may_read_from[read_from_index];
413         else
414                 return NULL;
415 }
416
417 /**
418  * Increments the index into the readsfrom set to explore the next item.
419  * @return Returns false if we have explored all items.
420  */
421 bool Node::increment_read_from()
422 {
423         DBG();
424         promises.clear();
425         if (read_from_index < may_read_from.size()) {
426                 read_from_index++;
427                 return read_from_index < may_read_from.size();
428         }
429         return false;
430 }
431
432 /**
433  * Increments the index into the future_values set to explore the next item.
434  * @return Returns false if we have explored all values.
435  */
436 bool Node::increment_future_value()
437 {
438         DBG();
439         promises.clear();
440         if (future_index < ((int)future_values.size())) {
441                 future_index++;
442                 return (future_index < ((int)future_values.size()));
443         }
444         return false;
445 }
446
447 /**
448  * Add a write ModelAction to the set of writes that may break the release
449  * sequence. This is used during replay exploration of pending release
450  * sequences. This Node must correspond to a release sequence fixup action.
451  *
452  * @param write The write that may break the release sequence. NULL means we
453  * allow the release sequence to synchronize.
454  */
455 void Node::add_relseq_break(const ModelAction *write)
456 {
457         relseq_break_writes.push_back(write);
458 }
459
460 /**
461  * Get the write that may break the current pending release sequence,
462  * according to the replay / divergence pattern.
463  *
464  * @return A write that may break the release sequence. If NULL, that means
465  * the release sequence should not be broken.
466  */
467 const ModelAction * Node::get_relseq_break() const
468 {
469         if (relseq_break_index < (int)relseq_break_writes.size())
470                 return relseq_break_writes[relseq_break_index];
471         else
472                 return NULL;
473 }
474
475 /**
476  * Increments the index into the relseq_break_writes set to explore the next
477  * item.
478  * @return Returns false if we have explored all values.
479  */
480 bool Node::increment_relseq_break()
481 {
482         DBG();
483         promises.clear();
484         if (relseq_break_index < ((int)relseq_break_writes.size())) {
485                 relseq_break_index++;
486                 return (relseq_break_index < ((int)relseq_break_writes.size()));
487         }
488         return false;
489 }
490
491 /**
492  * @return True if all writes that may break the release sequence have been
493  * explored
494  */
495 bool Node::relseq_break_empty() const
496 {
497         return ((relseq_break_index + 1) >= ((int)relseq_break_writes.size()));
498 }
499
500 void Node::explore(thread_id_t tid)
501 {
502         int i = id_to_int(tid);
503         ASSERT(i < ((int)backtrack.size()));
504         if (backtrack[i]) {
505                 backtrack[i] = false;
506                 numBacktracks--;
507         }
508         explored_children[i] = true;
509 }
510
511 NodeStack::NodeStack() :
512         node_list(),
513         head_idx(-1),
514         total_nodes(0)
515 {
516         total_nodes++;
517 }
518
519 NodeStack::~NodeStack()
520 {
521         for (unsigned int i = 0; i < node_list.size(); i++)
522                 delete node_list[i];
523 }
524
525 void NodeStack::print() const
526 {
527         model_print("............................................\n");
528         model_print("NodeStack printing node_list:\n");
529         for (unsigned int it = 0; it < node_list.size(); it++) {
530                 if ((int)it == this->head_idx)
531                         model_print("vvv following action is the current iterator vvv\n");
532                 node_list[it]->print();
533         }
534         model_print("............................................\n");
535 }
536
537 /** Note: The is_enabled set contains what actions were enabled when
538  *  act was chosen. */
539 ModelAction * NodeStack::explore_action(ModelAction *act, enabled_type_t *is_enabled)
540 {
541         DBG();
542
543         if ((head_idx + 1) < (int)node_list.size()) {
544                 head_idx++;
545                 return node_list[head_idx]->get_action();
546         }
547
548         /* Record action */
549         Node *head = get_head();
550         Node *prevfairness = NULL;
551         if (head) {
552                 head->explore_child(act, is_enabled);
553                 if (model->params.fairwindow != 0 && head_idx > (int)model->params.fairwindow)
554                         prevfairness = node_list[head_idx - model->params.fairwindow];
555         }
556         node_list.push_back(new Node(act, head, model->get_num_threads(), prevfairness));
557         total_nodes++;
558         head_idx++;
559         return NULL;
560 }
561
562 /**
563  * Empties the stack of all trailing nodes after a given position and calls the
564  * destructor for each. This function is provided an offset which determines
565  * how many nodes (relative to the current replay state) to save before popping
566  * the stack.
567  * @param numAhead gives the number of Nodes (including this Node) to skip over
568  * before removing nodes.
569  */
570 void NodeStack::pop_restofstack(int numAhead)
571 {
572         /* Diverging from previous execution; clear out remainder of list */
573         unsigned int it = head_idx + numAhead;
574         for (unsigned int i = it; i < node_list.size(); i++)
575                 delete node_list[i];
576         node_list.resize(it);
577 }
578
579 Node * NodeStack::get_head() const
580 {
581         if (node_list.empty() || head_idx < 0)
582                 return NULL;
583         return node_list[head_idx];
584 }
585
586 Node * NodeStack::get_next() const
587 {
588         if (node_list.empty()) {
589                 DEBUG("Empty\n");
590                 return NULL;
591         }
592         unsigned int it = head_idx + 1;
593         if (it == node_list.size()) {
594                 DEBUG("At end\n");
595                 return NULL;
596         }
597         return node_list[it];
598 }
599
600 void NodeStack::reset_execution()
601 {
602         head_idx = -1;
603 }