File: stack.c

package info (click to toggle)
remake 4.3%2Bdbg-1.6%2Bdfsg-5
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 9,688 kB
  • sloc: ansic: 38,702; sh: 5,248; perl: 1,577; makefile: 236; lisp: 26; sed: 16
file content (120 lines) | stat: -rw-r--r-- 3,110 bytes parent folder | download | duplicates (7)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
/* 
Copyright (C) 2005, 2008, 2009, 2011 R. Bernstein <rocky@gnu.org>
This file is part of GNU Make (remake variant).

GNU Make is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2, or (at your option)
any later version.

GNU Make is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with GNU Make; see the file COPYING.  If not, write to
the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
Boston, MA 02111-1307, USA.  */

/* debugger command interface. */

#include "fns.h"
#include "msg.h"
#include "print.h"
#include "stack.h"
#include "commands.h"

int i_stack_pos = 0;

/** Pointer to current target call stack at the place we are currently
   focused on.
 */
target_stack_node_t *p_stack = NULL;
floc_stack_node_t *p_floc_stack = NULL;


unsigned int dbg_stack_size() 
{
  int i=0;
  
  if (p_stack_top) {
    for ( p_stack=p_stack_top; p_stack ; p_stack = p_stack->p_parent ) {
      i++;
    }
    return i;
  } else if (p_stack_floc_top) {
    /* We have a Makefile stack */
    for ( p_floc_stack=p_stack_floc_top; 
	  p_floc_stack ; p_floc_stack = p_floc_stack->p_parent ) {
      i++;
    }

  }
  return i;
}


debug_return_t 
dbg_adjust_frame(int i_amount, int b_absolute) 
{
  int i=0;
  int i_try_frame_pos;

  if (b_absolute) {
    if (i_amount < 0)
      i_try_frame_pos = dbg_stack_size() + i_amount;
    else    
      i_try_frame_pos = i_amount;
  } else
    i_try_frame_pos = i_stack_pos + i_amount;

  if (i_try_frame_pos < 0) {
    dbg_errmsg(_("Moving target would go beyond bottom-most target position."));
    return debug_cmd_error;
  }

  i = i_try_frame_pos + 1;

  if (p_stack_top) {
    for ( p_stack=p_stack_top; p_stack ; p_stack = p_stack->p_parent ) {
      i--;
      if (0 == i)
	break;
    }

    if (0 != i) {
     dbg_errmsg(_("Can't set frame to position %d; "
	       "%d is the highest target position."),
	     i_try_frame_pos, i_try_frame_pos - i);
      return debug_cmd_error;
    }
    
    i_stack_pos     = i_try_frame_pos;
    p_target_loc    = &(p_stack->p_target->floc);
    
    print_target_stack_entry(p_stack->p_target, i_stack_pos, i_stack_pos);
    print_debugger_location(p_stack->p_target, DEBUG_STACK_CHANGING, NULL);
  } else if (p_stack_floc_top) {
    /* We have a Makefile stack */
    for ( p_floc_stack=p_stack_floc_top; 
	  p_floc_stack ; p_floc_stack = p_floc_stack->p_parent ) {
      i--;
      if (0 == i)
	break;
    }

    if (0 != i) {
      dbg_errmsg(_("Can't set frame to position %d; "
	       "%d is the highest target position."),
	     i_try_frame_pos, i_try_frame_pos - i);
      return debug_cmd_error;
    }
    i_stack_pos     = i_try_frame_pos;

    print_debugger_location(NULL, DEBUG_NOT_GIVEN, p_floc_stack);
  }
  
  return debug_readloop;
}