summaryrefslogtreecommitdiff
path: root/py_eval.h
blob: 109f5fc475fe83869c6347648c8671e3c1e28179 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
#ifndef _PY_EVAL_H
#define _PY_EVAL_H

#include "valexpr.h"
#include "pyfstream.h"

#include <string>
#include <iostream>

#include <boost/python.hpp>

using namespace boost::python;

namespace ledger {

void shutdown_ledger_for_python();

class python_interpreter_t : public valexpr_t::scope_t
{
  handle<> mmodule;
  dict     nspace;

 public:
  python_interpreter_t(valexpr_t::scope_t * parent);

  virtual ~python_interpreter_t() {
    Py_Finalize();
  }

  object import(const std::string& name);

  enum py_eval_mode_t {
    PY_EVAL_EXPR,
    PY_EVAL_STMT,
    PY_EVAL_MULTI
  };

  object eval(std::istream& in,       py_eval_mode_t mode = PY_EVAL_EXPR);
  object eval(const std::string& str, py_eval_mode_t mode = PY_EVAL_EXPR);
  object eval(const char * c_str,     py_eval_mode_t mode = PY_EVAL_EXPR) {
    std::string str(c_str);
    return eval(str, mode);
  }

  class functor_t : public valexpr_t::functor_t {
   protected:
    object func;
   public:
    python_functor_t(const std::string& name, object _func)
      : valexpr_t::functor_t(name), func(_func) {}

    virtual void operator()(value_t& result, valexpr_t::scope_t * locals);
  };

  virtual void define(const std::string& name, valexpr_t::node_t * def) {
    // Pass any definitions up to our parent
    parent->define(name, def);
  }

  virtual node_t * lookup(const std::string& name) {
    object func = eval(name);
    if (! func)
      return parent ? parent->lookup(name) : NULL;
    return valexpr_t::wrap_functor(new python_functor_t(name, func));
  }

  class lambda_t : public functor_t {
   public:
    python_lambda_t(object code) : python_functor_t("<lambda>"> code) {}

    virtual void operator()(value_t& result, valexpr_t::scope_t * locals);
  };
;

} // namespace ledger

#endif // _PY_EVAL_H