root/assert_handler.cc

/*  This file is part of Alue, the multiprotocol Internet discussion daemon

    Copyright © 2010 Antti-Juhani Kaijanaho

    Alue 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.

    Alue 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 Alue.  If not, see <http://www.gnu.org/licenses/>.

 */

#include "config.hh"
#include "logger/logline.hh"

#include <boost/assert.hpp>
#include <execinfo.h>
#include <stdio.h>

namespace boost
{
        void assertion_failed(char const *expr,
                              char const *function,
                              char const *file,
                              long line)
        {
                logger::logline ll;
                ll << "ASSERTION FAILED at "
                   << file << ":"
                   << line
                   << " [" << function << "]: "
                   << expr;
                ll.close();
                logger::logger.flush();

                static void *array[250];
                size_t size;
                size = backtrace(array, sizeof array / sizeof *array);
                char **bt = backtrace_symbols(array, size);

                ll.open();
                ll << "BACKTRACE FOLLOWS:";
                for (size_t i = 0; i < size; i++)
                {
                        ll << "\t" << bt[i] << "\n";
                }
                logger::logger.flush();
                std::string gdb = "gdb --batch ";
                for (size_t i = 0; i < size; i++)
                {
                        std::string bta = bt[i];
                        size_t ob = bta.find('[');
                        size_t cb = bta.rfind(']');
                        if (ob == std::string::npos ||
                            cb == std::string::npos)
                                continue;
                        bta = bta.substr(ob + 1, cb - ob - 1);
                        gdb += "--ex 'info line *";
                        gdb += bta.c_str();
                        gdb += "' ";
                }
                gdb += config["executable"].as<std::string>();
                gdb += " </dev/null";
                ll.open();
                ll << gdb;
                ll.close();
                FILE *fp = ::popen(gdb.c_str(), "r");
                if (fp != 0)
                {
                        ll.open();
                        ll << "LINE INFORMATION FOLLOWS:";
                        ll.nl();
                        while (true)
                        {
                                char buf[128];
                                int n = ::fread(buf, 1, sizeof buf, fp);
                                ll << std::string(buf, n); 
                                if (n == 0) break;
                        }
                        ::pclose(fp);
                        ll.close();
                        logger::logger.flush();
                }

                std::free(bt);

                throw std::logic_error("internal error");
        }

}