# This file contains simple bridging functions to the runtime

function _log (msg) %{
    _stp_log (THIS->msg);
%}

function log (msg) {
   _log (msg . "")
}

function _printk (msg) %{
    printk (KERN_INFO "%s\n", THIS->msg);
%}

function printk (msg) {
    _printk (msg . "")
}

function _warn (msg) %{
    _stp_warn ("%s", THIS->msg);
%}

function warn (msg) {
    _warn (msg . "")
}

function exit () %{
    CONTEXT->errorcount ++; /* kill current probe */
    _stp_exit ();
%}

function _error (msg) %{
    CONTEXT->errorcount ++; /* kill current probe */
    _stp_error ("%s", THIS->msg); /* implies _stp_exit */
%}

function error (msg) {
    _error (msg . "")
}