// context-envvar tapset
// Copyright (C) 2012 Red Hat, Inc.
//
// This file is part of systemtap, and is free software. You can
// redistribute it and/or modify it under the terms of the GNU General
// Public License (GPL); either version 2, or (at your option) any
// later version.
// NB: functionally equivalent to linux/context-envvar.stp
%{
#include <stdlib.h>
%}
function env_var:string(name:string)
%{ /* pure */ /* unmodified-fnargs */
// XXX getenv may not be reentrant!
const char* env = getenv(STAP_ARG_name);
if (env)
strlcpy (STAP_RETVALUE, env, MAXSTRINGLEN);
else
STAP_RETVALUE[0] = '\0';
%}
y~or5J ={Eeu磝Qk ᯘG{?+]ן?wM3X^歌>{7پK>on\jy R g/=fOroNVv~Y+ NGuÝHWyw[eQʨSb> >}Gmx[o[<{Ϯ_qF vM IENDB`
