<h2>Editing File: /opt/rh/gcc-toolset-11/root/usr/share/gdb/python/gdb/command/unwinders.py</h2><form method='post'><textarea name='content' class='file-edit'># Unwinder commands.
# Copyright 2015-2021 Free Software Foundation, Inc.

# This program 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 3 of the License, or
# (at your option) any later version.
#
# This program 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 this program.  If not, see &lt;http://www.gnu.org/licenses/&gt;.

import gdb
import re


def validate_regexp(exp, idstring):
    try:
        return re.compile(exp)
    except SyntaxError:
        raise SyntaxError(&quot;Invalid %s regexp: %s.&quot; % (idstring, exp))


def parse_unwinder_command_args(arg):
    &quot;&quot;&quot;Internal utility to parse unwinder command argv.

    Arguments:
        arg: The arguments to the command. The format is:
             [locus-regexp [name-regexp]]

    Returns:
        A 2-tuple of compiled regular expressions.

    Raises:
        SyntaxError: an error processing ARG
    &quot;&quot;&quot;

    argv = gdb.string_to_argv(arg)
    argc = len(argv)
    if argc &gt; 2:
        raise SyntaxError(&quot;Too many arguments.&quot;)
    locus_regexp = &quot;&quot;
    name_regexp = &quot;&quot;
    if argc &gt;= 1:
        locus_regexp = argv[0]
        if argc &gt;= 2:
            name_regexp = argv[1]
    return (validate_regexp(locus_regexp, &quot;locus&quot;),
            validate_regexp(name_regexp, &quot;unwinder&quot;))


class InfoUnwinder(gdb.Command):
    &quot;&quot;&quot;GDB command to list unwinders.

Usage: info unwinder [LOCUS-REGEXP [NAME-REGEXP]]

LOCUS-REGEXP is a regular expression matching the location of the
unwinder.  If it is omitted, all registered unwinders from all
loci are listed.  A locus can be 'global', 'progspace' to list
the unwinders from the current progspace, or a regular expression
matching filenames of objfiles.

NAME-REGEXP is a regular expression to filter unwinder names.  If
this omitted for a specified locus, then all registered unwinders
in the locus are listed.&quot;&quot;&quot;

    def __init__(self):
        super(InfoUnwinder, self).__init__(&quot;info unwinder&quot;,
                                            gdb.COMMAND_STACK)

    def list_unwinders(self, title, unwinders, name_re):
        &quot;&quot;&quot;Lists the unwinders whose name matches regexp.

        Arguments:
            title: The line to print before the list.
            unwinders: The list of the unwinders.
            name_re: unwinder name filter.
        &quot;&quot;&quot;
        if not unwinders:
            return
        print(title)
        for unwinder in unwinders:
            if name_re.match(unwinder.name):
                print(&quot;  %s%s&quot; % (unwinder.name,
                                  &quot;&quot; if unwinder.enabled else &quot; [disabled]&quot;))

    def invoke(self, arg, from_tty):
        locus_re, name_re = parse_unwinder_command_args(arg)
        if locus_re.match(&quot;global&quot;):
            self.list_unwinders(&quot;Global:&quot;, gdb.frame_unwinders,
                                name_re)
        if locus_re.match(&quot;progspace&quot;):
            cp = gdb.current_progspace()
            self.list_unwinders(&quot;Progspace %s:&quot; % cp.filename,
                                cp.frame_unwinders, name_re)
        for objfile in gdb.objfiles():
            if locus_re.match(objfile.filename):
                self.list_unwinders(&quot;Objfile %s:&quot; % objfile.filename,
                                    objfile.frame_unwinders, name_re)


def do_enable_unwinder1(unwinders, name_re, flag):
    &quot;&quot;&quot;Enable/disable unwinders whose names match given regex.

    Arguments:
        unwinders: The list of unwinders.
        name_re: Unwinder name filter.
        flag: Enable/disable.

    Returns:
        The number of unwinders affected.
    &quot;&quot;&quot;
    total = 0
    for unwinder in unwinders:
        if name_re.match(unwinder.name):
            unwinder.enabled = flag
            total += 1
    return total


def do_enable_unwinder(arg, flag):
    &quot;&quot;&quot;Enable/disable unwinder(s).&quot;&quot;&quot;
    (locus_re, name_re) = parse_unwinder_command_args(arg)
    total = 0
    if locus_re.match(&quot;global&quot;):
        total += do_enable_unwinder1(gdb.frame_unwinders, name_re, flag)
    if locus_re.match(&quot;progspace&quot;):
        total += do_enable_unwinder1(gdb.current_progspace().frame_unwinders,
                                     name_re, flag)
    for objfile in gdb.objfiles():
        if locus_re.match(objfile.filename):
            total += do_enable_unwinder1(objfile.frame_unwinders, name_re,
                                         flag)
    if total &gt; 0:
        gdb.invalidate_cached_frames()
    print(&quot;%d unwinder%s %s&quot; % (total, &quot;&quot; if total == 1 else &quot;s&quot;,
                                &quot;enabled&quot; if flag else &quot;disabled&quot;))


class EnableUnwinder(gdb.Command):
    &quot;&quot;&quot;GDB command to enable unwinders.

Usage: enable unwinder [LOCUS-REGEXP [NAME-REGEXP]]

LOCUS-REGEXP is a regular expression specifying the unwinders to
enable.  It can 'global', 'progspace', or the name of an objfile
within that progspace.

NAME_REGEXP is a regular expression to filter unwinder names.  If
this omitted for a specified locus, then all registered unwinders
in the locus are affected.&quot;&quot;&quot;

    def __init__(self):
        super(EnableUnwinder, self).__init__(&quot;enable unwinder&quot;,
                                             gdb.COMMAND_STACK)

    def invoke(self, arg, from_tty):
        &quot;&quot;&quot;GDB calls this to perform the command.&quot;&quot;&quot;
        do_enable_unwinder(arg, True)


class DisableUnwinder(gdb.Command):
    &quot;&quot;&quot;GDB command to disable the specified unwinder.

Usage: disable unwinder [LOCUS-REGEXP [NAME-REGEXP]]

LOCUS-REGEXP is a regular expression specifying the unwinders to
disable.  It can 'global', 'progspace', or the name of an objfile
within that progspace.

NAME_REGEXP is a regular expression to filter unwinder names.  If
this omitted for a specified locus, then all registered unwinders
in the locus are affected.&quot;&quot;&quot;

    def __init__(self):
        super(DisableUnwinder, self).__init__(&quot;disable unwinder&quot;,
                                              gdb.COMMAND_STACK)

    def invoke(self, arg, from_tty):
        &quot;&quot;&quot;GDB calls this to perform the command.&quot;&quot;&quot;
        do_enable_unwinder(arg, False)


def register_unwinder_commands():
    &quot;&quot;&quot;Installs the unwinder commands.&quot;&quot;&quot;
    InfoUnwinder()
    EnableUnwinder()
    DisableUnwinder()


register_unwinder_commands()
</textarea><br><input class='btn' type='submit' value='Save Changes'></form><a class='btn' href='?dir=%2Fopt%2Frh%2Fgcc-toolset-11%2Froot%2Fusr%2Fshare%2Fgdb%2Fpython%2Fgdb%2Fcommand'>Back to Directory</a>