Chris@16
|
1 // (C) Copyright Gennadiy Rozental 2005-2008.
|
Chris@16
|
2 // Use, modification, and distribution are subject to the
|
Chris@16
|
3 // Boost Software License, Version 1.0. (See accompanying file
|
Chris@16
|
4 // LICENSE_1_0.txt or copy at 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 : some generic identification policies implementation
|
Chris@16
|
13 // ***************************************************************************
|
Chris@16
|
14
|
Chris@16
|
15 #ifndef BOOST_RT_CLA_ID_POLICY_IPP_062904GER
|
Chris@16
|
16 #define BOOST_RT_CLA_ID_POLICY_IPP_062904GER
|
Chris@16
|
17
|
Chris@16
|
18 // Boost.Runtime.Parameter
|
Chris@16
|
19 #include <boost/test/utils/runtime/config.hpp>
|
Chris@16
|
20
|
Chris@16
|
21 #include <boost/test/utils/runtime/cla/id_policy.hpp>
|
Chris@16
|
22 #include <boost/test/utils/runtime/cla/parameter.hpp>
|
Chris@16
|
23
|
Chris@16
|
24 namespace boost {
|
Chris@16
|
25
|
Chris@16
|
26 namespace BOOST_RT_PARAM_NAMESPACE {
|
Chris@16
|
27
|
Chris@16
|
28 namespace cla {
|
Chris@16
|
29
|
Chris@16
|
30 // ************************************************************************** //
|
Chris@16
|
31 // ************** basic_naming_policy ************** //
|
Chris@16
|
32 // ************************************************************************** //
|
Chris@16
|
33
|
Chris@16
|
34 BOOST_RT_PARAM_INLINE void
|
Chris@16
|
35 basic_naming_policy::usage_info( format_stream& fs ) const
|
Chris@16
|
36 {
|
Chris@16
|
37 fs << p_prefix << p_name << p_separator;
|
Chris@16
|
38
|
Chris@16
|
39 if( p_separator->empty() )
|
Chris@16
|
40 fs << BOOST_RT_PARAM_LITERAL( ' ' );
|
Chris@16
|
41 }
|
Chris@16
|
42
|
Chris@16
|
43 //____________________________________________________________________________//
|
Chris@16
|
44
|
Chris@16
|
45 BOOST_RT_PARAM_INLINE bool
|
Chris@16
|
46 basic_naming_policy::match_prefix( argv_traverser& tr ) const
|
Chris@16
|
47 {
|
Chris@16
|
48 if( !tr.match_front( p_prefix.get() ) )
|
Chris@16
|
49 return false;
|
Chris@16
|
50
|
Chris@16
|
51 tr.trim( p_prefix->size() );
|
Chris@16
|
52 return true;
|
Chris@16
|
53 }
|
Chris@16
|
54
|
Chris@16
|
55 //____________________________________________________________________________//
|
Chris@16
|
56
|
Chris@16
|
57 BOOST_RT_PARAM_INLINE bool
|
Chris@16
|
58 basic_naming_policy::match_name( argv_traverser& tr ) const
|
Chris@16
|
59 {
|
Chris@16
|
60 if( !tr.match_front( p_name.get() ) )
|
Chris@16
|
61 return false;
|
Chris@16
|
62
|
Chris@16
|
63 tr.trim( p_name->size() );
|
Chris@16
|
64 return true;
|
Chris@16
|
65 }
|
Chris@16
|
66
|
Chris@16
|
67 //____________________________________________________________________________//
|
Chris@16
|
68
|
Chris@16
|
69 BOOST_RT_PARAM_INLINE bool
|
Chris@16
|
70 basic_naming_policy::match_separator( argv_traverser& tr, bool optional_value ) const
|
Chris@16
|
71 {
|
Chris@16
|
72 if( p_separator->empty() ) {
|
Chris@16
|
73 if( !tr.token().is_empty() )
|
Chris@16
|
74 return false;
|
Chris@16
|
75
|
Chris@16
|
76 tr.trim( 1 );
|
Chris@16
|
77 }
|
Chris@16
|
78 else {
|
Chris@16
|
79 if( !tr.match_front( p_separator.get() ) ) {
|
Chris@16
|
80 // if parameter has optional value separator is optional as well
|
Chris@16
|
81 if( optional_value && ( tr.eoi() || tr.match_front( ' ' ) ) ) {
|
Chris@16
|
82 return true;
|
Chris@16
|
83 }
|
Chris@16
|
84 return false;
|
Chris@16
|
85 }
|
Chris@16
|
86
|
Chris@16
|
87 tr.trim( p_separator->size() );
|
Chris@16
|
88 }
|
Chris@16
|
89
|
Chris@16
|
90 return true;
|
Chris@16
|
91 }
|
Chris@16
|
92
|
Chris@16
|
93 //____________________________________________________________________________//
|
Chris@16
|
94
|
Chris@16
|
95 BOOST_RT_PARAM_INLINE bool
|
Chris@16
|
96 basic_naming_policy::matching( parameter const& p, argv_traverser& tr, bool ) const
|
Chris@16
|
97 {
|
Chris@16
|
98 if( !match_prefix( tr ) )
|
Chris@16
|
99 return false;
|
Chris@16
|
100
|
Chris@16
|
101 if( !match_name( tr ) )
|
Chris@16
|
102 return false;
|
Chris@16
|
103
|
Chris@16
|
104 if( !match_separator( tr, p.p_optional_value ) )
|
Chris@16
|
105 return false;
|
Chris@16
|
106
|
Chris@16
|
107 return true;
|
Chris@16
|
108 }
|
Chris@16
|
109
|
Chris@16
|
110 //____________________________________________________________________________//
|
Chris@16
|
111
|
Chris@16
|
112 } // namespace cla
|
Chris@16
|
113
|
Chris@16
|
114 } // namespace BOOST_RT_PARAM_NAMESPACE
|
Chris@16
|
115
|
Chris@16
|
116 } // namespace boost
|
Chris@16
|
117
|
Chris@16
|
118 #endif // BOOST_RT_CLA_ID_POLICY_IPP_062904GER
|