140 lines
4.5 KiB
C++
140 lines
4.5 KiB
C++
/* ----------------------------------------------------------------------------
|
|
|
|
* GTSAM Copyright 2010, Georgia Tech Research Corporation,
|
|
* Atlanta, Georgia 30332-0415
|
|
* All Rights Reserved
|
|
* Authors: Frank Dellaert, et al. (see THANKS for the full author list)
|
|
|
|
* See LICENSE for the license information
|
|
|
|
* -------------------------------------------------------------------------- */
|
|
|
|
/**
|
|
* file: Method.ccp
|
|
* Author: Frank Dellaert
|
|
**/
|
|
|
|
#include <iostream>
|
|
#include <fstream>
|
|
|
|
#include <boost/foreach.hpp>
|
|
|
|
#include "Method.h"
|
|
#include "utilities.h"
|
|
|
|
using namespace std;
|
|
|
|
/* ************************************************************************* */
|
|
// auxiliary function to wrap an argument into a shared_ptr template
|
|
/* ************************************************************************* */
|
|
string maybe_shared_ptr(bool add, const string& type) {
|
|
string str = add? "shared_ptr<" : "";
|
|
str += type;
|
|
if (add) str += ">";
|
|
return str;
|
|
}
|
|
|
|
/* ************************************************************************* */
|
|
string Method::return_type(bool add_ptr, pairing p) {
|
|
if (p==pair && returns_pair) {
|
|
string str = "pair< " +
|
|
maybe_shared_ptr(add_ptr && returns_ptr, returns ) + ", " +
|
|
maybe_shared_ptr(add_ptr && returns_ptr, returns2) + " >";
|
|
return str;
|
|
} else
|
|
return maybe_shared_ptr(add_ptr && returns_ptr, (p==arg2)? returns2 : returns);
|
|
}
|
|
|
|
/* ************************************************************************* */
|
|
void Method::matlab_mfile(const string& classPath) {
|
|
|
|
// open destination m-file
|
|
string wrapperFile = classPath + "/" + name + ".m";
|
|
ofstream ofs(wrapperFile.c_str());
|
|
if(!ofs) throw CantOpenFile(wrapperFile);
|
|
if(verbose_) cerr << "generating " << wrapperFile << endl;
|
|
|
|
// generate code
|
|
emit_header_comment(ofs, "%");
|
|
ofs << "% usage: obj." << name << "(" << args.names() << ")" << endl;
|
|
string returnType = returns_pair? "[first,second]" : "result";
|
|
ofs << "function " << returnType << " = " << name << "(obj";
|
|
if (args.size()) ofs << "," << args.names();
|
|
ofs << ")" << endl;
|
|
ofs << " error('need to compile " << name << ".cpp');" << endl;
|
|
ofs << "end" << endl;
|
|
|
|
// close file
|
|
ofs.close();
|
|
}
|
|
|
|
/* ************************************************************************* */
|
|
void Method::matlab_wrapper(const string& classPath,
|
|
const string& className,
|
|
const string& nameSpace)
|
|
{
|
|
// open destination wrapperFile
|
|
string wrapperFile = classPath + "/" + name + ".cpp";
|
|
ofstream ofs(wrapperFile.c_str());
|
|
if(!ofs) throw CantOpenFile(wrapperFile);
|
|
if(verbose_) cerr << "generating " << wrapperFile << endl;
|
|
|
|
// generate code
|
|
|
|
// header
|
|
emit_header_comment(ofs, "//");
|
|
ofs << "#include <wrap/matlab.h>\n";
|
|
ofs << "#include <" << className << ".h>\n";
|
|
if (!nameSpace.empty()) ofs << "using namespace " << nameSpace << ";" << endl;
|
|
|
|
// call
|
|
ofs << "void mexFunction(int nargout, mxArray *out[], int nargin, const mxArray *in[])\n";
|
|
// start
|
|
ofs << "{\n";
|
|
|
|
// check arguments
|
|
// extra argument obj -> nargin-1 is passed !
|
|
// example: checkArguments("equals",nargout,nargin-1,2);
|
|
ofs << " checkArguments(\"" << name << "\",nargout,nargin-1," << args.size() << ");\n";
|
|
|
|
// get class pointer
|
|
// example: shared_ptr<Test> = unwrap_shared_ptr< Test >(in[0], "Test");
|
|
ofs << " shared_ptr<" << className << "> self = unwrap_shared_ptr< " << className
|
|
<< " >(in[0],\"" << className << "\");" << endl;
|
|
|
|
// unwrap arguments, see Argument.cpp
|
|
args.matlab_unwrap(ofs,1);
|
|
|
|
// call method
|
|
// example: bool result = self->return_field(t);
|
|
ofs << " ";
|
|
if (returns!="void")
|
|
ofs << return_type(true,pair) << " result = ";
|
|
ofs << "self->" << name << "(" << args.names() << ");\n";
|
|
|
|
// wrap result
|
|
// example: out[0]=wrap<bool>(result);
|
|
if (returns_pair) {
|
|
if (returns_ptr)
|
|
ofs << " out[0] = wrap_shared_ptr(result.first,\"" << returns << "\");\n";
|
|
else
|
|
ofs << " out[0] = wrap< " << return_type(true,arg1) << " >(result.first);\n";
|
|
if (returns_ptr2)
|
|
ofs << " out[1] = wrap_shared_ptr(result.second,\"" << returns2 << "\");\n";
|
|
else
|
|
ofs << " out[1] = wrap< " << return_type(true,arg2) << " >(result.second);\n";
|
|
}
|
|
else if (returns_ptr)
|
|
ofs << " out[0] = wrap_shared_ptr(result,\"" << returns << "\");\n";
|
|
else if (returns!="void")
|
|
ofs << " out[0] = wrap< " << return_type(true,arg1) << " >(result);\n";
|
|
|
|
// finish
|
|
ofs << "}\n";
|
|
|
|
// close file
|
|
ofs.close();
|
|
}
|
|
|
|
/* ************************************************************************* */
|