| 1 | // Copyright David Abrahams 2002. | 
|---|
| 2 | // Distributed under the Boost Software License, Version 1.0. (See | 
|---|
| 3 | // accompanying file LICENSE_1_0.txt or copy at | 
|---|
| 4 | // http://www.boost.org/LICENSE_1_0.txt) | 
|---|
| 5 | #ifndef OPERATORS_DWA2002530_HPP | 
|---|
| 6 | # define OPERATORS_DWA2002530_HPP | 
|---|
| 7 |  | 
|---|
| 8 | # include <boost/python/detail/prefix.hpp> | 
|---|
| 9 |  | 
|---|
| 10 | # include <boost/python/def_visitor.hpp> | 
|---|
| 11 | # include <boost/python/converter/arg_to_python.hpp> | 
|---|
| 12 | # include <boost/python/detail/operator_id.hpp> | 
|---|
| 13 | # include <boost/python/detail/not_specified.hpp> | 
|---|
| 14 | # include <boost/python/back_reference.hpp> | 
|---|
| 15 | # include <boost/mpl/if.hpp> | 
|---|
| 16 | # include <boost/mpl/eval_if.hpp> | 
|---|
| 17 | # include <boost/python/self.hpp> | 
|---|
| 18 | # include <boost/python/other.hpp> | 
|---|
| 19 | # include <boost/lexical_cast.hpp> | 
|---|
| 20 | # include <boost/python/refcount.hpp> | 
|---|
| 21 | # include <boost/python/detail/unwrap_wrapper.hpp> | 
|---|
| 22 | # include <string> | 
|---|
| 23 | # include <complex> | 
|---|
| 24 |  | 
|---|
| 25 | namespace boost { namespace python { | 
|---|
| 26 |  | 
|---|
| 27 | namespace detail | 
|---|
| 28 | { | 
|---|
| 29 | // This is essentially the old v1 to_python(). It will be eliminated | 
|---|
| 30 | // once the public interface for to_python is settled on. | 
|---|
| 31 | template <class T> | 
|---|
| 32 | PyObject* convert_result(T const& x) | 
|---|
| 33 | { | 
|---|
| 34 | return converter::arg_to_python<T>(x).release(); | 
|---|
| 35 | } | 
|---|
| 36 |  | 
|---|
| 37 | // Operator implementation template declarations. The nested apply | 
|---|
| 38 | // declaration here keeps MSVC6 happy. | 
|---|
| 39 | template <operator_id> struct operator_l | 
|---|
| 40 | { | 
|---|
| 41 | template <class L, class R> struct apply; | 
|---|
| 42 | }; | 
|---|
| 43 |  | 
|---|
| 44 | template <operator_id> struct operator_r | 
|---|
| 45 | { | 
|---|
| 46 | template <class L, class R> struct apply; | 
|---|
| 47 | }; | 
|---|
| 48 |  | 
|---|
| 49 | template <operator_id> struct operator_1 | 
|---|
| 50 | { | 
|---|
| 51 | template <class T> struct apply; | 
|---|
| 52 | }; | 
|---|
| 53 |  | 
|---|
| 54 | // MSVC6 doesn't want us to do this sort of inheritance on a nested | 
|---|
| 55 | // class template, so we use this layer of indirection to avoid | 
|---|
| 56 | // ::template<...> on the nested apply functions below | 
|---|
| 57 | template <operator_id id, class L, class R> | 
|---|
| 58 | struct operator_l_inner | 
|---|
| 59 | : operator_l<id>::template apply<L,R> | 
|---|
| 60 | {}; | 
|---|
| 61 |  | 
|---|
| 62 | template <operator_id id, class L, class R> | 
|---|
| 63 | struct operator_r_inner | 
|---|
| 64 | : operator_r<id>::template apply<L,R> | 
|---|
| 65 | {}; | 
|---|
| 66 |  | 
|---|
| 67 | template <operator_id id, class T> | 
|---|
| 68 | struct operator_1_inner | 
|---|
| 69 | : operator_1<id>::template apply<T> | 
|---|
| 70 | {}; | 
|---|
| 71 |  | 
|---|
| 72 | // Define three different binary_op templates which take care of | 
|---|
| 73 | // these cases: | 
|---|
| 74 | //    self op self | 
|---|
| 75 | //    self op R | 
|---|
| 76 | //    L op self | 
|---|
| 77 | // | 
|---|
| 78 | // The inner apply metafunction is used to adjust the operator to | 
|---|
| 79 | // the class type being defined. Inheritance of the outer class is | 
|---|
| 80 | // simply used to provide convenient access to the operation's | 
|---|
| 81 | // name(). | 
|---|
| 82 |  | 
|---|
| 83 | // self op self | 
|---|
| 84 | template <operator_id id> | 
|---|
| 85 | struct binary_op : operator_l<id> | 
|---|
| 86 | { | 
|---|
| 87 | template <class T> | 
|---|
| 88 | struct apply : operator_l_inner<id,T,T> | 
|---|
| 89 | { | 
|---|
| 90 | }; | 
|---|
| 91 | }; | 
|---|
| 92 |  | 
|---|
| 93 | // self op R | 
|---|
| 94 | template <operator_id id, class R> | 
|---|
| 95 | struct binary_op_l : operator_l<id> | 
|---|
| 96 | { | 
|---|
| 97 | template <class T> | 
|---|
| 98 | struct apply : operator_l_inner<id,T,R> | 
|---|
| 99 | { | 
|---|
| 100 | }; | 
|---|
| 101 | }; | 
|---|
| 102 |  | 
|---|
| 103 | // L op self | 
|---|
| 104 | template <operator_id id, class L> | 
|---|
| 105 | struct binary_op_r : operator_r<id> | 
|---|
| 106 | { | 
|---|
| 107 | template <class T> | 
|---|
| 108 | struct apply : operator_r_inner<id,L,T> | 
|---|
| 109 | { | 
|---|
| 110 | }; | 
|---|
| 111 | }; | 
|---|
| 112 |  | 
|---|
| 113 | template <operator_id id> | 
|---|
| 114 | struct unary_op : operator_1<id> | 
|---|
| 115 | { | 
|---|
| 116 | template <class T> | 
|---|
| 117 | struct apply : operator_1_inner<id,T> | 
|---|
| 118 | { | 
|---|
| 119 | }; | 
|---|
| 120 | }; | 
|---|
| 121 |  | 
|---|
| 122 | // This type is what actually gets returned from operators used on | 
|---|
| 123 | // self_t | 
|---|
| 124 | template <operator_id id, class L = not_specified, class R = not_specified> | 
|---|
| 125 | struct operator_ | 
|---|
| 126 | : def_visitor<operator_<id,L,R> > | 
|---|
| 127 | { | 
|---|
| 128 | private: | 
|---|
| 129 | template <class ClassT> | 
|---|
| 130 | void visit(ClassT& cl) const | 
|---|
| 131 | { | 
|---|
| 132 | typedef typename mpl::eval_if< | 
|---|
| 133 | is_same<L,self_t> | 
|---|
| 134 | , mpl::if_< | 
|---|
| 135 | is_same<R,self_t> | 
|---|
| 136 | , binary_op<id> | 
|---|
| 137 | , binary_op_l< | 
|---|
| 138 | id | 
|---|
| 139 | , BOOST_DEDUCED_TYPENAME unwrap_other<R>::type | 
|---|
| 140 | > | 
|---|
| 141 | > | 
|---|
| 142 | , mpl::if_< | 
|---|
| 143 | is_same<L,not_specified> | 
|---|
| 144 | , unary_op<id> | 
|---|
| 145 | , binary_op_r< | 
|---|
| 146 | id | 
|---|
| 147 | , BOOST_DEDUCED_TYPENAME unwrap_other<L>::type | 
|---|
| 148 | > | 
|---|
| 149 | > | 
|---|
| 150 | >::type generator; | 
|---|
| 151 |  | 
|---|
| 152 | cl.def( | 
|---|
| 153 | generator::name() | 
|---|
| 154 | , &generator::template apply< | 
|---|
| 155 | BOOST_DEDUCED_TYPENAME ClassT::wrapped_type | 
|---|
| 156 | >::execute | 
|---|
| 157 | ); | 
|---|
| 158 | } | 
|---|
| 159 |  | 
|---|
| 160 | friend class python::def_visitor_access; | 
|---|
| 161 | }; | 
|---|
| 162 | } | 
|---|
| 163 |  | 
|---|
| 164 | # define BOOST_PYTHON_BINARY_OPERATION(id, rid, expr)       \ | 
|---|
| 165 | namespace detail                                            \ | 
|---|
| 166 | {                                                           \ | 
|---|
| 167 | template <>                                               \ | 
|---|
| 168 | struct operator_l<op_##id>                                \ | 
|---|
| 169 | {                                                         \ | 
|---|
| 170 | template <class L, class R>                           \ | 
|---|
| 171 | struct apply                                          \ | 
|---|
| 172 | {                                                     \ | 
|---|
| 173 | typedef typename unwrap_wrapper_<L>::type lhs;    \ | 
|---|
| 174 | typedef typename unwrap_wrapper_<R>::type rhs;    \ | 
|---|
| 175 | static PyObject* execute(lhs& l, rhs const& r)    \ | 
|---|
| 176 | {                                                 \ | 
|---|
| 177 | return detail::convert_result(expr);          \ | 
|---|
| 178 | }                                                 \ | 
|---|
| 179 | };                                                    \ | 
|---|
| 180 | static char const* name() { return "__" #id "__"; }   \ | 
|---|
| 181 | };                                                        \ | 
|---|
| 182 | \ | 
|---|
| 183 | template <>                                               \ | 
|---|
| 184 | struct operator_r<op_##id>                                \ | 
|---|
| 185 | {                                                         \ | 
|---|
| 186 | template <class L, class R>                           \ | 
|---|
| 187 | struct apply                                          \ | 
|---|
| 188 | {                                                     \ | 
|---|
| 189 | typedef typename unwrap_wrapper_<L>::type lhs;    \ | 
|---|
| 190 | typedef typename unwrap_wrapper_<R>::type rhs;    \ | 
|---|
| 191 | static PyObject* execute(rhs& r, lhs const& l)    \ | 
|---|
| 192 | {                                                 \ | 
|---|
| 193 | return detail::convert_result(expr);          \ | 
|---|
| 194 | }                                                 \ | 
|---|
| 195 | };                                                    \ | 
|---|
| 196 | static char const* name() { return "__" #rid "__"; }  \ | 
|---|
| 197 | };                                                        \ | 
|---|
| 198 | } | 
|---|
| 199 |  | 
|---|
| 200 | # define BOOST_PYTHON_BINARY_OPERATOR(id, rid, op)      \ | 
|---|
| 201 | BOOST_PYTHON_BINARY_OPERATION(id, rid, l op r)          \ | 
|---|
| 202 | namespace self_ns                                       \ | 
|---|
| 203 | {                                                       \ | 
|---|
| 204 | template <class L, class R>                           \ | 
|---|
| 205 | inline detail::operator_<detail::op_##id,L,R>         \ | 
|---|
| 206 | operator op(L const&, R const&)                       \ | 
|---|
| 207 | {                                                     \ | 
|---|
| 208 | return detail::operator_<detail::op_##id,L,R>();  \ | 
|---|
| 209 | }                                                     \ | 
|---|
| 210 | } | 
|---|
| 211 |  | 
|---|
| 212 | BOOST_PYTHON_BINARY_OPERATOR(add, radd, +) | 
|---|
| 213 | BOOST_PYTHON_BINARY_OPERATOR(sub, rsub, -) | 
|---|
| 214 | BOOST_PYTHON_BINARY_OPERATOR(mul, rmul, *) | 
|---|
| 215 | BOOST_PYTHON_BINARY_OPERATOR(div, rdiv, /) | 
|---|
| 216 | BOOST_PYTHON_BINARY_OPERATOR(mod, rmod, %) | 
|---|
| 217 | BOOST_PYTHON_BINARY_OPERATOR(lshift, rlshift, <<) | 
|---|
| 218 | BOOST_PYTHON_BINARY_OPERATOR(rshift, rrshift, >>) | 
|---|
| 219 | BOOST_PYTHON_BINARY_OPERATOR(and, rand, &) | 
|---|
| 220 | BOOST_PYTHON_BINARY_OPERATOR(xor, rxor, ^) | 
|---|
| 221 | BOOST_PYTHON_BINARY_OPERATOR(or, ror, |) | 
|---|
| 222 | BOOST_PYTHON_BINARY_OPERATOR(gt, lt, >) | 
|---|
| 223 | BOOST_PYTHON_BINARY_OPERATOR(ge, le, >=) | 
|---|
| 224 | BOOST_PYTHON_BINARY_OPERATOR(lt, gt, <) | 
|---|
| 225 | BOOST_PYTHON_BINARY_OPERATOR(le, ge, <=) | 
|---|
| 226 | BOOST_PYTHON_BINARY_OPERATOR(eq, eq, ==) | 
|---|
| 227 | BOOST_PYTHON_BINARY_OPERATOR(ne, ne, !=) | 
|---|
| 228 | # undef BOOST_PYTHON_BINARY_OPERATOR | 
|---|
| 229 |  | 
|---|
| 230 | // pow isn't an operator in C++; handle it specially. | 
|---|
| 231 | BOOST_PYTHON_BINARY_OPERATION(pow, rpow, pow(l,r)) | 
|---|
| 232 | # undef BOOST_PYTHON_BINARY_OPERATION | 
|---|
| 233 |  | 
|---|
| 234 | namespace self_ns | 
|---|
| 235 | { | 
|---|
| 236 | # ifndef BOOST_NO_ARGUMENT_DEPENDENT_LOOKUP | 
|---|
| 237 | template <class L, class R> | 
|---|
| 238 | inline detail::operator_<detail::op_pow,L,R> | 
|---|
| 239 | pow(L const&, R const&) | 
|---|
| 240 | { | 
|---|
| 241 | return detail::operator_<detail::op_pow,L,R>(); | 
|---|
| 242 | } | 
|---|
| 243 | # else | 
|---|
| 244 | // When there's no argument-dependent lookup, we need these | 
|---|
| 245 | // overloads to handle the case when everything is imported into the | 
|---|
| 246 | // global namespace. Note that the plain overload below does /not/ | 
|---|
| 247 | // take const& arguments. This is needed by MSVC6 at least, or it | 
|---|
| 248 | // complains of ambiguities, since there's no partial ordering. | 
|---|
| 249 | inline detail::operator_<detail::op_pow,self_t,self_t> | 
|---|
| 250 | pow(self_t, self_t) | 
|---|
| 251 | { | 
|---|
| 252 | return detail::operator_<detail::op_pow,self_t,self_t>(); | 
|---|
| 253 | } | 
|---|
| 254 | template <class R> | 
|---|
| 255 | inline detail::operator_<detail::op_pow,self_t,R> | 
|---|
| 256 | pow(self_t const&, R const&) | 
|---|
| 257 | { | 
|---|
| 258 | return detail::operator_<detail::op_pow,self_t,R>(); | 
|---|
| 259 | } | 
|---|
| 260 | template <class L> | 
|---|
| 261 | inline detail::operator_<detail::op_pow,L,self_t> | 
|---|
| 262 | pow(L const&, self_t const&) | 
|---|
| 263 | { | 
|---|
| 264 | return detail::operator_<detail::op_pow,L,self_t>(); | 
|---|
| 265 | } | 
|---|
| 266 | # endif | 
|---|
| 267 | } | 
|---|
| 268 |  | 
|---|
| 269 |  | 
|---|
| 270 | # define BOOST_PYTHON_INPLACE_OPERATOR(id, op)                  \ | 
|---|
| 271 | namespace detail                                                \ | 
|---|
| 272 | {                                                               \ | 
|---|
| 273 | template <>                                                   \ | 
|---|
| 274 | struct operator_l<op_##id>                                    \ | 
|---|
| 275 | {                                                             \ | 
|---|
| 276 | template <class L, class R>                               \ | 
|---|
| 277 | struct apply                                              \ | 
|---|
| 278 | {                                                         \ | 
|---|
| 279 | typedef typename unwrap_wrapper_<L>::type lhs;        \ | 
|---|
| 280 | typedef typename unwrap_wrapper_<R>::type rhs;        \ | 
|---|
| 281 | static PyObject*                                      \ | 
|---|
| 282 | execute(back_reference<lhs&> l, rhs const& r)         \ | 
|---|
| 283 | {                                                     \ | 
|---|
| 284 | l.get() op r;                                     \ | 
|---|
| 285 | return python::incref(l.source().ptr());          \ | 
|---|
| 286 | }                                                     \ | 
|---|
| 287 | };                                                        \ | 
|---|
| 288 | static char const* name() { return "__" #id "__"; }       \ | 
|---|
| 289 | };                                                            \ | 
|---|
| 290 | }                                                               \ | 
|---|
| 291 | namespace self_ns                                               \ | 
|---|
| 292 | {                                                               \ | 
|---|
| 293 | template <class R>                                            \ | 
|---|
| 294 | inline detail::operator_<detail::op_##id,self_t,R>            \ | 
|---|
| 295 | operator op(self_t const&, R const&)                          \ | 
|---|
| 296 | {                                                             \ | 
|---|
| 297 | return detail::operator_<detail::op_##id,self_t,R>();     \ | 
|---|
| 298 | }                                                             \ | 
|---|
| 299 | } | 
|---|
| 300 |  | 
|---|
| 301 | BOOST_PYTHON_INPLACE_OPERATOR(iadd,+=) | 
|---|
| 302 | BOOST_PYTHON_INPLACE_OPERATOR(isub,-=) | 
|---|
| 303 | BOOST_PYTHON_INPLACE_OPERATOR(imul,*=) | 
|---|
| 304 | BOOST_PYTHON_INPLACE_OPERATOR(idiv,/=) | 
|---|
| 305 | BOOST_PYTHON_INPLACE_OPERATOR(imod,%=) | 
|---|
| 306 | BOOST_PYTHON_INPLACE_OPERATOR(ilshift,<<=) | 
|---|
| 307 | BOOST_PYTHON_INPLACE_OPERATOR(irshift,>>=) | 
|---|
| 308 | BOOST_PYTHON_INPLACE_OPERATOR(iand,&=) | 
|---|
| 309 | BOOST_PYTHON_INPLACE_OPERATOR(ixor,^=) | 
|---|
| 310 | BOOST_PYTHON_INPLACE_OPERATOR(ior,|=) | 
|---|
| 311 |  | 
|---|
| 312 | # define BOOST_PYTHON_UNARY_OPERATOR(id, op, func_name)         \ | 
|---|
| 313 | namespace detail                                                \ | 
|---|
| 314 | {                                                               \ | 
|---|
| 315 | template <>                                                   \ | 
|---|
| 316 | struct operator_1<op_##id>                                    \ | 
|---|
| 317 | {                                                             \ | 
|---|
| 318 | template <class T>                                        \ | 
|---|
| 319 | struct apply                                              \ | 
|---|
| 320 | {                                                         \ | 
|---|
| 321 | typedef typename unwrap_wrapper_<T>::type self_t;     \ | 
|---|
| 322 | static PyObject* execute(self_t& x)                   \ | 
|---|
| 323 | {                                                     \ | 
|---|
| 324 | return detail::convert_result(op(x));             \ | 
|---|
| 325 | }                                                     \ | 
|---|
| 326 | };                                                        \ | 
|---|
| 327 | static char const* name() { return "__" #id "__"; }       \ | 
|---|
| 328 | };                                                            \ | 
|---|
| 329 | }                                                               \ | 
|---|
| 330 | namespace self_ns                                               \ | 
|---|
| 331 | {                                                               \ | 
|---|
| 332 | inline detail::operator_<detail::op_##id>                     \ | 
|---|
| 333 | func_name(self_t const&)                                      \ | 
|---|
| 334 | {                                                             \ | 
|---|
| 335 | return detail::operator_<detail::op_##id>();              \ | 
|---|
| 336 | }                                                             \ | 
|---|
| 337 | } | 
|---|
| 338 | # undef BOOST_PYTHON_INPLACE_OPERATOR | 
|---|
| 339 |  | 
|---|
| 340 | BOOST_PYTHON_UNARY_OPERATOR(neg, -, operator-) | 
|---|
| 341 | BOOST_PYTHON_UNARY_OPERATOR(pos, +, operator+) | 
|---|
| 342 | BOOST_PYTHON_UNARY_OPERATOR(abs, abs, abs) | 
|---|
| 343 | BOOST_PYTHON_UNARY_OPERATOR(invert, ~, operator~) | 
|---|
| 344 | BOOST_PYTHON_UNARY_OPERATOR(nonzero, !!, operator!) | 
|---|
| 345 | BOOST_PYTHON_UNARY_OPERATOR(int, long, int_) | 
|---|
| 346 | BOOST_PYTHON_UNARY_OPERATOR(long, PyLong_FromLong, long_) | 
|---|
| 347 | BOOST_PYTHON_UNARY_OPERATOR(float, double, float_) | 
|---|
| 348 | BOOST_PYTHON_UNARY_OPERATOR(complex, std::complex<double>, complex_) | 
|---|
| 349 | BOOST_PYTHON_UNARY_OPERATOR(str, lexical_cast<std::string>, str) | 
|---|
| 350 | # undef BOOST_PYTHON_UNARY_OPERATOR | 
|---|
| 351 |  | 
|---|
| 352 | }} // namespace boost::python | 
|---|
| 353 |  | 
|---|
| 354 | # ifdef BOOST_NO_ARGUMENT_DEPENDENT_LOOKUP | 
|---|
| 355 | using boost::python::self_ns::abs; | 
|---|
| 356 | using boost::python::self_ns::int_; | 
|---|
| 357 | using boost::python::self_ns::long_; | 
|---|
| 358 | using boost::python::self_ns::float_; | 
|---|
| 359 | using boost::python::self_ns::complex_; | 
|---|
| 360 | using boost::python::self_ns::str; | 
|---|
| 361 | using boost::python::self_ns::pow; | 
|---|
| 362 | # endif | 
|---|
| 363 |  | 
|---|
| 364 | #endif // OPERATORS_DWA2002530_HPP | 
|---|