Ejemplo n.º 1
0
char* vt_env_ldir()
{
  static char* ldir = NULL;
  char* tmp;

  if (! ldir)
    {
      tmp = getenv("VT_PFORM_LDIR");
      if (tmp != NULL && strlen(tmp) > 0)
        {
          ldir = replace_vars(tmp);
        }
      else
        {
          ldir = replace_vars(vt_pform_ldir());
        } 
    }
  return ldir;
}
Ejemplo n.º 2
0
char* vt_env_ldir()
{
  static char* ldir = NULL;
  char* tmp;

  if (! ldir)
    {
      tmp = getenv("VT_PFORM_LDIR");

#if defined(VT_IOFSL)
      if (vt_env_iofsl_servers())
        {
          ldir = vt_env_gdir();

          if (tmp != NULL && strlen(tmp) > 0)
            {
              vt_warning("Setting of VT_PFORM_LDIR isn't allowed in IOFSL "
                         "mode; reset it to VT_PFORM_GDIR (=%s)", ldir);
            }
        }
      else
#endif /* VT_IOFSL */
        {
          if (tmp != NULL && strlen(tmp) > 0)
            {
              vt_cntl_msg(2, "VT_PFORM_LDIR=%s", tmp);

              ldir = replace_vars(tmp);
            }
          else
            {
              ldir = replace_vars(vt_pform_ldir());
            }
        }
    }
  return ldir;
}