source: trunk/src/matlab/rpElementAsType.cc @ 118

Last change on this file since 118 was 115, checked in by mmc, 18 years ago

Updated all copyright notices.

File size: 1.4 KB
Line 
1/*
2 * ----------------------------------------------------------------------
3 *  INTERFACE: Matlab Rappture Library Source
4 *
5 *    retStr = rpElementAsType(lib,path)
6 *
7 * ======================================================================
8 *  AUTHOR:  Derrick Kearney, Purdue University
9 *  Copyright (c) 2004-2005  Purdue Research Foundation
10 *
11 *  See the file "license.terms" for information on usage and
12 *  redistribution of this file, and for a DISCLAIMER OF ALL WARRANTIES.
13 * ======================================================================
14 */
15
16#include "RpMatlabInterface.h"
17
18void mexFunction(int nlhs, mxArray *plhs[],
19                 int nrhs, const mxArray *prhs[])
20{
21    int         libIndex = 0;
22    int         retLibIndex = 0;
23    RpLibrary*  lib = NULL;
24    char*       path = NULL;
25    const char* retStr = NULL;
26
27    /* Check for proper number of arguments. */
28    if (nrhs != 2)
29        mexErrMsgTxt("Two input required.");
30    else if (nlhs > 1)
31        mexErrMsgTxt("Too many output arguments.");
32
33    libIndex = getIntInput(prhs[0]);
34    path = getStringInput(prhs[1]);
35
36    /* Call the C subroutine. */
37    if ( (libIndex > 0) && (path) ) {
38        lib = getObject_Lib(libIndex);
39        if (lib) {
40            retStr = rpElementAsType(lib,path);
41        }
42    }
43
44    /* Set C-style string output_buf to MATLAB mexFunction output*/
45    plhs[0] = mxCreateString(retStr);
46
47    return;
48}
Note: See TracBrowser for help on using the repository browser.