[593] | 1 | #ifndef MXLOG_H |
---|
| 2 | #define MXLOG_H |
---|
| 3 | |
---|
[384] | 4 | #include "base/loggers.h" |
---|
[293] | 5 | |
---|
[477] | 6 | namespace bdm { |
---|
| 7 | int mxReplaceFieldNM ( mxArray *X, const char * fname, mxArray *X1 ) { |
---|
[293] | 8 | mxArray *Old; |
---|
| 9 | int i; |
---|
| 10 | |
---|
[477] | 11 | if ( ( i = mxGetFieldNumber ( X, fname ) ) == -1 ) { |
---|
| 12 | if ( ( i = mxAddField ( X, fname ) ) == -1 ) return i; |
---|
[293] | 13 | |
---|
| 14 | } |
---|
| 15 | |
---|
[477] | 16 | Old = mxGetFieldByNumber ( X, 0, i ); |
---|
| 17 | if ( Old ) mxDestroyArray ( Old ); |
---|
| 18 | mxSetFieldByNumber ( X, 0, i, X1 ); |
---|
[293] | 19 | return i; |
---|
| 20 | |
---|
| 21 | }; |
---|
| 22 | |
---|
[477] | 23 | void Arrayvec2mxArray ( const Array<vec> &in, mxArray *out ) { |
---|
| 24 | int rows, cols, r, c; |
---|
[384] | 25 | |
---|
[477] | 26 | double* temp = ( double * ) mxGetPr ( out ); |
---|
| 27 | if ( temp == 0 ) mexErrMsgTxt ( "mat2mxArray: Pointer to data is NULL" ); |
---|
[384] | 28 | |
---|
[477] | 29 | cols = in.size(); |
---|
| 30 | if ( cols == 0 ) mexErrMsgTxt ( "mat2mxArray: Data has zero columns" ); |
---|
[384] | 31 | |
---|
[477] | 32 | rows = in ( 0 ).length(); //length of the first vec |
---|
| 33 | if ( rows == 0 ) mexErrMsgTxt ( "mat2mxArray: Data has zero rows" ); |
---|
[384] | 34 | |
---|
[477] | 35 | for ( c = 0; c < cols; c++ ) { |
---|
| 36 | for ( r = 0; r < rows; r++ ) { |
---|
| 37 | *temp++ = in ( c ) ( r ); |
---|
[593] | 38 | |
---|
[477] | 39 | } |
---|
| 40 | } |
---|
[384] | 41 | |
---|
| 42 | } |
---|
[536] | 43 | |
---|
| 44 | //! Logger storing results into an mxArray |
---|
[373] | 45 | class mexlog : public memlog { |
---|
[477] | 46 | public: |
---|
[293] | 47 | //! constructor |
---|
[477] | 48 | mexlog() : memlog ( 0, "" ) {}; |
---|
[609] | 49 | //! constructor |
---|
| 50 | mexlog(long maxlen0) : memlog ( maxlen0, "" ) {}; |
---|
[660] | 51 | //! copy internal data to output mxArray |
---|
[477] | 52 | mxArray* toCell() { |
---|
| 53 | mxArray* tmp = mxCreateStructMatrix ( 1, 1, 0, NULL ); |
---|
[293] | 54 | |
---|
[347] | 55 | //copied from itsave |
---|
| 56 | int i; |
---|
[477] | 57 | string vec_name = ""; |
---|
[347] | 58 | int istart, iend; |
---|
[477] | 59 | |
---|
[347] | 60 | mat M; //temporary matrix |
---|
[477] | 61 | for ( i = 0; i < entries.length(); i++ ) { |
---|
| 62 | istart = 0; |
---|
| 63 | for ( int j = 0; j < entries ( i ).length(); j++ ) { // same for as in add!!! |
---|
[685] | 64 | vec_name = names ( i ) +prefix_sep()+ entries ( i ).name ( j ); |
---|
[477] | 65 | iend = istart + entries ( i ).size ( j ) - 1; |
---|
| 66 | M = vectors ( i ).get_cols ( istart, iend ); |
---|
| 67 | istart = iend + 1; |
---|
[347] | 68 | // copy the selection to mx |
---|
[477] | 69 | mxArray* fld = mxCreateDoubleMatrix ( M.rows(), M.cols(), mxREAL ); |
---|
| 70 | mat2mxArray ( M, fld ); |
---|
| 71 | mxReplaceFieldNM ( tmp, vec_name.c_str(), fld ); |
---|
[347] | 72 | } |
---|
[293] | 73 | } |
---|
| 74 | return tmp; |
---|
| 75 | } |
---|
[477] | 76 | void from_setting ( const Setting &root ) { |
---|
| 77 | maxlen = root["maxlen"]; |
---|
[373] | 78 | } |
---|
[293] | 79 | }; |
---|
[477] | 80 | UIREGISTER ( mexlog ); |
---|
[529] | 81 | SHAREDPTR ( mexlog ); |
---|
[373] | 82 | } |
---|
[593] | 83 | |
---|
[665] | 84 | #endif //MXLOG_H |
---|