annotate DEPENDENCIES/generic/include/boost/test/utils/runtime/env/environment.ipp @ 133:4acb5d8d80b6 tip

Don't fail environmental check if README.md exists (but .txt and no-suffix don't)
author Chris Cannam
date Tue, 30 Jul 2019 12:25:44 +0100
parents c530137014c0
children
rev   line source
Chris@16 1 // (C) Copyright Gennadiy Rozental 2005-2008.
Chris@16 2 // Distributed under the Boost Software License, Version 1.0.
Chris@16 3 // (See accompanying file LICENSE_1_0.txt or copy at
Chris@16 4 // http://www.boost.org/LICENSE_1_0.txt)
Chris@16 5
Chris@16 6 // See http://www.boost.org/libs/test for the library home page.
Chris@16 7 //
Chris@16 8 // File : $RCSfile$
Chris@16 9 //
Chris@101 10 // Version : $Revision$
Chris@16 11 //
Chris@16 12 // Description : implements model of program environment
Chris@16 13 // ***************************************************************************
Chris@16 14
Chris@16 15 #ifndef BOOST_RT_ENV_ENVIRONMENT_IPP_062904GER
Chris@16 16 #define BOOST_RT_ENV_ENVIRONMENT_IPP_062904GER
Chris@16 17
Chris@16 18 // Boost.Runtime.Parameter
Chris@16 19 #include <boost/test/utils/runtime/config.hpp>
Chris@16 20 #include <boost/test/utils/runtime/validation.hpp>
Chris@16 21
Chris@16 22 #include <boost/test/utils/runtime/env/variable.hpp>
Chris@16 23
Chris@16 24 // Boost.Test
Chris@16 25 #include <boost/test/utils/basic_cstring/compare.hpp>
Chris@16 26 #include <boost/test/utils/basic_cstring/io.hpp>
Chris@16 27
Chris@16 28 // STL
Chris@16 29 #include <map>
Chris@16 30 #include <list>
Chris@16 31
Chris@16 32 namespace boost {
Chris@16 33
Chris@16 34 namespace BOOST_RT_PARAM_NAMESPACE {
Chris@16 35
Chris@16 36 namespace environment {
Chris@16 37
Chris@16 38 // ************************************************************************** //
Chris@16 39 // ************** runtime::environment ************** //
Chris@16 40 // ************************************************************************** //
Chris@16 41
Chris@16 42 namespace rt_env_detail {
Chris@16 43
Chris@16 44 typedef std::map<cstring,rt_env_detail::variable_data> registry;
Chris@16 45 typedef std::list<dstring> keys;
Chris@16 46
Chris@16 47 BOOST_RT_PARAM_INLINE registry& s_registry() { static registry instance; return instance; }
Chris@16 48 BOOST_RT_PARAM_INLINE keys& s_keys() { static keys instance; return instance; }
Chris@16 49
Chris@16 50 BOOST_RT_PARAM_INLINE variable_data&
Chris@16 51 new_var_record( cstring var_name )
Chris@16 52 {
Chris@16 53 // save the name in list of keys
Chris@16 54 s_keys().push_back( dstring() );
Chris@16 55 dstring& key = s_keys().back();
Chris@16 56 assign_op( key, var_name, 0 );
Chris@16 57
Chris@16 58 // create and return new record
Chris@16 59 variable_data& new_var_data = s_registry()[key];
Chris@16 60
Chris@16 61 new_var_data.m_var_name = key;
Chris@16 62
Chris@16 63 return new_var_data;
Chris@16 64 }
Chris@16 65
Chris@16 66 //____________________________________________________________________________//
Chris@16 67
Chris@16 68 BOOST_RT_PARAM_INLINE variable_data*
Chris@16 69 find_var_record( cstring var_name )
Chris@16 70 {
Chris@16 71 registry::iterator it = s_registry().find( var_name );
Chris@16 72
Chris@16 73 return it == s_registry().end() ? 0 : &(it->second);
Chris@16 74 }
Chris@16 75
Chris@16 76 //____________________________________________________________________________//
Chris@16 77
Chris@16 78 #ifdef BOOST_MSVC
Chris@16 79 #pragma warning(push)
Chris@16 80 #pragma warning(disable:4996) // getenv
Chris@16 81 #endif
Chris@16 82
Chris@16 83 BOOST_RT_PARAM_INLINE cstring
Chris@16 84 sys_read_var( cstring var_name )
Chris@16 85 {
Chris@16 86 using namespace std;
Chris@16 87 return BOOST_RT_PARAM_GETENV( var_name.begin() );
Chris@16 88 }
Chris@16 89
Chris@16 90 #ifdef BOOST_MSVC
Chris@16 91 #pragma warning(pop)
Chris@16 92 #endif
Chris@16 93 //____________________________________________________________________________//
Chris@16 94
Chris@16 95 BOOST_RT_PARAM_INLINE void
Chris@16 96 sys_write_var( cstring var_name, format_stream& var_value )
Chris@16 97 {
Chris@16 98 BOOST_RT_PARAM_PUTENV( var_name, cstring( var_value.str() ) );
Chris@16 99 }
Chris@16 100
Chris@16 101 //____________________________________________________________________________//
Chris@16 102
Chris@16 103 } // namespace rt_env_detail
Chris@16 104
Chris@16 105 BOOST_RT_PARAM_INLINE variable_base
Chris@16 106 var( cstring var_name )
Chris@16 107 {
Chris@16 108 rt_env_detail::variable_data* vd = rt_env_detail::find_var_record( var_name );
Chris@16 109
Chris@16 110 BOOST_RT_PARAM_VALIDATE_LOGIC( !!vd,
Chris@16 111 BOOST_RT_PARAM_LITERAL( "First access to the environment variable " )
Chris@16 112 << var_name << BOOST_RT_PARAM_LITERAL( " should be typed" ) );
Chris@16 113
Chris@16 114 return variable_base( *vd );
Chris@16 115 }
Chris@16 116
Chris@16 117 //____________________________________________________________________________//
Chris@16 118
Chris@16 119 } // namespace environment
Chris@16 120
Chris@16 121 } // namespace BOOST_RT_PARAM_NAMESPACE
Chris@16 122
Chris@16 123 } // namespace boost
Chris@16 124
Chris@16 125 #endif // BOOST_RT_ENV_ENVIRONMENT_IPP_062904GER