# This file contains simple bridging functions to the runtime

function print (msg:string) %{
    _stp_print (THIS->msg);
%}

// almost the same as print
function log (msg) {
    print (msg . "\n")
}

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

function warn (msg:string) %{
    _stp_warn ("%s", THIS->msg);
%}

// NB: exit() does *not* cause immediate return from current function/probe
function exit () %{
    _stp_exit ();
%}

function error (msg:string) %{
    CONTEXT->last_error = "called error()"; /* kill current probe */
    _stp_error ("%s", THIS->msg); /* implies _stp_exit */
%}