source: issm/trunk-jpl/src/c/classes/objects/Options/OptionLogical.cpp@ 12832

Last change on this file since 12832 was 12832, checked in by Eric.Larour, 13 years ago

Almost done migrating objects to classes
File size: 2.9 KB
Line 
1/*!\file OptionLogical.cpp
2 * \brief: implementation of the optionslogical object
3 */
4
5/*Headers:*/
6/*{{{*/
7#ifdef HAVE_CONFIG_H
8 #include <config.h>
9#else
10#error "Cannot compile with HAVE_CONFIG_H symbol! run configure first!"
11#endif
12
13#include <stdio.h>
14#include <string.h>
15#include "../objects.h"
16#include "../../../shared/shared.h"
17#include "../../../io/io.h"
18#include "../../../Container/Container.h"
19#include "../../../include/include.h"
20/*}}}*/
21
22/*Constructors/destructor/copy*/
23/*FUNCTION OptionLogical::OptionLogical(){{{*/
24OptionLogical::OptionLogical(){
25
26 values =NULL;
27
28}
29/*}}}*/
30/*FUNCTION OptionLogical::~OptionLogical(){{{*/
31OptionLogical::~OptionLogical(){
32
33 if (values) xDelete<bool>(values);
34
35}
36/*}}}*/
37
38/*Other*/
39/*FUNCTION OptionLogical::Echo {{{*/
40void OptionLogical::Echo(){
41
42 char cstr[81];
43 bool flag=true;
44
45 if(flag) _pprintLine_("OptionLogical Echo:");
46 Option::Echo();
47
48 if (values && size) {
49 if(numel == 1) if(flag) _pprintLine_(" values: " << (values[0] ? "true" : "false"));
50 else{
51 StringFromSize(cstr,size,ndims);
52 if(flag) _pprintLine_(" values: " << cstr << " " << "logical");
53 }
54 }
55 else if(flag) _pprintLine_(" values: [empty]");
56}
57/*}}}*/
58/*FUNCTION OptionLogical::DeepEcho() {{{*/
59void OptionLogical::DeepEcho(){
60
61 char indent[81]="";
62
63 OptionLogical::DeepEcho(indent);
64
65 return;
66}
67/*}}}*/
68/*FUNCTION OptionLogical::DeepEcho(char* indent) {{{*/
69void OptionLogical::DeepEcho(char* indent){
70
71 int i;
72 int* dims;
73 char indent2[81];
74 char cstr[81];
75 bool flag=true;
76
77 if(flag) _pprintLine_(indent << "OptionLogical DeepEcho:");
78 Option::DeepEcho(indent);
79
80 xMemCpy<char>(indent2,indent,(strlen(indent)+1));
81 strcat(indent2," ");
82
83 if (values) {
84 if(numel==1) if(flag) _pprintLine_(indent << " values: " << (values[0] ? "true" : "false"));
85 else{
86 dims=xNew<int>(ndims);
87 for (i=0; i<numel; i++) {
88 RowWiseDimsFromIndex(dims,i,size,ndims);
89 StringFromDims(cstr,dims,ndims);
90 if(flag) _pprintLine_(indent << " values" << cstr << ": " << (values[i] ? "true" : "false"));
91 }
92 xDelete<int>(dims);
93 }
94 }
95 else if(flag) _pprintLine_(indent << " values: [empty]");
96}
97/*}}}*/
98/*FUNCTION OptionLogical::Name {{{*/
99char* OptionLogical::Name(){
100
101 return(Option::Name());
102}
103/*}}}*/
104/*FUNCTION OptionLogical::NumEl {{{*/
105int OptionLogical::NumEl(){
106
107 return(Option::NumEl());
108}
109/*}}}*/
110/*FUNCTION OptionLogical::NDims {{{*/
111int OptionLogical::NDims(){
112
113 return(Option::NDims());
114}
115/*}}}*/
116/*FUNCTION OptionLogical::Size {{{*/
117int* OptionLogical::Size(){
118
119 return(Option::Size());
120}
121/*}}}*/
122/*FUNCTION OptionLogical::Get(bool* pvalue) {{{*/
123void OptionLogical::Get(bool* pvalue){
124
125 /*We should first check that the size is one*/
126 if(this->NumEl()!=1){
127 _error2_("option \"" << this->name << "\" has " << this->NumEl() << " elements and cannot return a single bool");
128 }
129
130 /*Assign output pointer*/
131 *pvalue=this->values[0];
132}
133/*}}}*/
Note: See TracBrowser for help on using the repository browser.