19943359860

Committed 04 Dec 2025 08:45PM UTC coverage: 55.608% (-0.2%) from 55.811%

Build # 19943359860

Build Type

Pull #1996

github

Committed by

web-flow

Commit Message

Merge 7587cd1c9 into b0776a3f7

Pull Request Pull Request #1996: Add vs support for stl vector, deque, and array containers of supported data types

Run Details

35 of 131 new or added lines in 6 files covered. (26.72%)

4 existing lines in 3 files now uncovered.

12425 of 22344 relevant lines covered (55.61%)

252751.04 hits per line

Source File
Press 'n' to go to next uncovered line, 'b' for previous

46.05

/trick_source/sim_services/MemoryManager/MemoryManager_ref_assignment.cpp

#include "trick/MemoryManager.hh"
#include "trick/bitfield_proto.h"
#include "trick/vval.h"
#include "trick/wcs_ext.h"
#include <limits.h>
#include <sstream>
#include <udunits2.h>
#include <string.h>

int Trick::MemoryManager::assign_recursive(void* base_addr, ATTRIBUTES* attr, int curr_dim, int offset, V_TREE* v_tree, cv_converter* cf) {

   char* assign_addr;
   int remaining_dimensions = attr->num_index - curr_dim;
   // local_type is set to the type of the attribute, but if it's a STL type, we need to use the element type.
   TRICK_TYPE local_type = attr->type;
   if (local_type == TRICK_STL) {
      local_type = attr->stl_elem_type;
   }

   if ( remaining_dimensions == 0 ) {

      switch (local_type) {

           case TRICK_CHARACTER :
           case TRICK_UNSIGNED_CHARACTER :
               assign_addr = (char*)base_addr + offset * sizeof(char);
               if (v_tree && v_tree->v_data) {
                   *(char*)assign_addr = vval_char(v_tree->v_data);
               } else {
                   *(char*)assign_addr = '\0';
               }
               if (debug_level) {
                   std::cout << std::endl << "Assignment: *(char*)" << (void*)assign_addr
                             << " = ";
                   if (isprint(*(char*)assign_addr)) {
                       std::cout << *(char*)assign_addr;
                   } else {
                       std::cout << (int)*(char*)assign_addr;
                   }
                   std::cout << ";" << std::endl;
                   std::cout.flush();
               }
               break;
           case TRICK_WCHAR :
               assign_addr = (char*)base_addr + offset * sizeof(wchar_t);
               if (v_tree && v_tree->v_data) {
                   *(wchar_t*)assign_addr = vval_char(v_tree->v_data);
               } else {
                   *(wchar_t*)assign_addr = 0;
               }
               if (debug_level) {
                   char buff[16] = {0};
                   wctomb(buff,*(wchar_t*)assign_addr);
                   std::cout << std::endl << "Assignment: *(wchar_t*)" << (void*)assign_addr
                             << " = " << buff << ";" << std::endl;
                   std::cout.flush();
               }
               break;
           case TRICK_SHORT :
           case TRICK_UNSIGNED_SHORT :
               assign_addr = (char*)base_addr + offset * sizeof(short);
               if (v_tree && v_tree->v_data) {
                   *(short *)assign_addr = vval_short(v_tree->v_data);
               } else {
                   *(short *)assign_addr = 0;
               }
               if (debug_level) {
                   std::cout << std::endl << "Assignment: *(short*)" << (void*)assign_addr
                             << " = " << *(short*)assign_addr << ";" << std::endl;
                   std::cout.flush();
               }
               break;
           case TRICK_INTEGER :
           case TRICK_UNSIGNED_INTEGER :
               assign_addr = (char*)base_addr + offset * sizeof(int);
               if (v_tree && v_tree->v_data) {
                   int input_value;
                   input_value = vval_int(v_tree->v_data);
                   if (cf == NULL) {
                       *(int *)assign_addr = input_value;
                   } else {
                       *(int *)assign_addr = (int)cv_convert_double(cf, (double)input_value) ;
                   }
               } else {
                   *(int *)assign_addr = 0;
               }
               if (debug_level) {
                   std::cout << std::endl << "Assignment: *(int*)" << (void*)assign_addr
                             << " = " << *(int*)assign_addr << ";" << std::endl;
                   std::cout.flush();
               }
               break;
           case TRICK_BOOLEAN :
               assign_addr = (char*)base_addr + offset * sizeof(bool);
               if (v_tree && v_tree->v_data) {
                   *(bool *)assign_addr = (vval_short(v_tree->v_data)!=0);
               } else {
                   *(bool *)assign_addr = false;
               }
               if (debug_level) {
                   std::cout << std::endl << "Assignment: *(bool*)" << (void*)assign_addr
                             << " = " << *(bool*)assign_addr << ";" << std::endl;
                   std::cout.flush();
               }
               break;
           case TRICK_ENUMERATED :
               if (v_tree && v_tree->v_data) {
                   if ((size_t)attr->size == sizeof(int)) {
                       assign_addr = (char*)base_addr + offset * sizeof(int);
                       *(int *)assign_addr = vval_int(v_tree->v_data);
                       if (debug_level) {
                           std::cout << std::endl << "Assignment (Enum): *(int*)" << (void*)assign_addr
                                     << " = " << *(int*)assign_addr << ";" << std::endl;
                           std::cout.flush();
                       }
                   } else if ((size_t)attr->size == sizeof(short)) {
                       assign_addr = (char*)base_addr + offset * sizeof(short);
                       *(short *)assign_addr = vval_short(v_tree->v_data);
                       if (debug_level) {
                           std::cout << std::endl << "Assignment (Enum): *(short*)" << (void*)assign_addr
                                     << " = " << *(short*)assign_addr << ";" << std::endl;
                           std::cout.flush();
                       }
                   } else if ((size_t)attr->size == sizeof(char)) {
                       assign_addr = (char*)base_addr + offset * sizeof(char);
                       *(char *)assign_addr = vval_char(v_tree->v_data);
                       if (debug_level) {
                           std::cout << std::endl << "Assignment (Enum): *(char*)" << (void*)assign_addr
                                     << " = " << *(char*)assign_addr << ";" << std::endl;
                           std::cout.flush();
                       }
                   } else {
                       std::stringstream message;
                       message << "Enumeration of size " << attr->size << " is not supported.";
                       emitError(message.str());
                   }
               } else {
                   emitError("v_tree data appears to be corrupted.");
               }
               break;
           case TRICK_LONG :
           case TRICK_UNSIGNED_LONG :
               assign_addr = (char*)base_addr + offset * sizeof(long);
               if (v_tree && v_tree->v_data) {
                   long input_value;
                   input_value = vval_long(v_tree->v_data);
                   if (cf == NULL) {
                       *(long *)assign_addr = input_value;
                   } else {
                       *(long *)assign_addr = (long)cv_convert_double(cf, (double)input_value) ;
                   }
               } else {
                   *(long *)assign_addr = 0;
               }
               if (debug_level) {
                   std::cout << std::endl << "Assignment: *(long*)" << (void*)assign_addr
                             << " = " << *(long*)assign_addr << ";" << std::endl;
                   std::cout.flush();
               }
               break;
           case TRICK_FLOAT :
               assign_addr = (char*)base_addr + offset * sizeof(float);
               if (v_tree && v_tree->v_data) {
                   float input_value;
                   input_value = vval_float(v_tree->v_data);
                   if (cf == NULL) {  // There is no units conversion.
                       *(float *)assign_addr = input_value;
                   } else { // There is units conversion.
                       *(float *)assign_addr = (float)cv_convert_double(cf, (double)input_value) ;
                   }
               } else {
                   *(float *)assign_addr = 0;
               }
               if (debug_level) {
                   std::cout << std::endl << "Assignment: *(float*)" << (void*)assign_addr
                             << " = " << *(float*)assign_addr << ";" << std::endl;
                   std::cout.flush();
               }
               break;
           case TRICK_DOUBLE :
               assign_addr = (char*)base_addr + offset * sizeof(double);
               if (v_tree && v_tree->v_data) {
                   double input_value;
                   input_value = vval_double(v_tree->v_data);
                   if (cf == NULL) {
                       *(double *)assign_addr = input_value;
                   } else {
                       *(double *)assign_addr = cv_convert_double(cf, input_value) ;
                   }
               } else {
                   *(double *)assign_addr = 0;
               }
               if (debug_level) {
                   std::cout << std::endl << "Assignment: *(double*)" << (void*)assign_addr
                             << " = " << *(double*)assign_addr << ";" << std::endl;
                   std::cout.flush();
               }
               break;
           case TRICK_LONG_LONG :
           case TRICK_UNSIGNED_LONG_LONG :
               assign_addr = (char*)base_addr + offset * sizeof(long long);
               if (v_tree && v_tree->v_data) {
                   *(long long *)assign_addr = vval_longlong(v_tree->v_data);
               } else {
                   *(long long *)assign_addr = 0;
               }
               if (debug_level) {
                   std::cout << std::endl << "Assignment: *(long long*)" << (void*)assign_addr
                             << " = " << *(long long*)assign_addr << ";" << std::endl;
                   std::cout.flush();
               }
               break;
           case TRICK_BITFIELD :
           case TRICK_UNSIGNED_BITFIELD : {
                   int input_value;
                   assign_addr = (char*)base_addr + offset * (size_t)attr->size;
                   if (v_tree && v_tree->v_data) {
                       input_value = vval_int(v_tree->v_data);
                   } else {
                       input_value = 0;
                   }
                   if (attr->size == sizeof(int)) {
                       *(unsigned int*)assign_addr = insert_bitfield_any(
                           *(unsigned int*)assign_addr, input_value, attr->size, attr->index[0].start, attr->index[0].size);
                   } else if (attr->size == sizeof(short)) {
                       *(unsigned short*)assign_addr = insert_bitfield_any(
                           *(unsigned short*)assign_addr, input_value, attr->size, attr->index[0].start, attr->index[0].size);
                   } else if (attr->size == sizeof(char)) {
                       *(unsigned char*)assign_addr = insert_bitfield_any(
                           *(unsigned char*)assign_addr, input_value, attr->size, attr->index[0].start, attr->index[0].size);
                   } else {
                       std::stringstream message;
                       message << "Unhandled bitfield struct size (" << attr->size << ") in bitfield assignment.";
                       emitError(message.str());
                   }
                   if (debug_level) {
                       std::cout << std::endl << "Assignment: "
                                 << "Within the " << attr->size << " byte struct at " << (void*)assign_addr
                                 << ", the bitfield ["<< attr->index[0].start << ".."
                                 << attr->index[0].start + attr->index[0].size - 1
                                 << "] = " << input_value << ";"
                                 << std::endl;
                       std::cout.flush();
                   }
               } break;
           case TRICK_FILE_PTR :
               if (debug_level) {
                   std::cout << std::endl << "Assignment: TRICK_FILE_PTR assignments not yet implemented."
                             << std::endl;
                   std::cout.flush();
               }
               break;
           case TRICK_VOID_PTR :
               if (debug_level) {
                   std::cout << std::endl << "Assignment: TRICK_VOID_PTR assignments not yet implemented."
                             << std::endl;
                   std::cout.flush();
               }
               break;
           case TRICK_STRING :
               assign_addr = (char*)base_addr + offset * sizeof(std::string);
               if (v_tree && v_tree->v_data) {
                   *(std::string*)assign_addr = vval_string(v_tree->v_data);
               } else {
                   *(std::string*)assign_addr = "";
               }
               if (debug_level) {
                   std::cout << std::endl << "Assignment: *(std::string)" << (void*)assign_addr
                             << " = \"" << *(std::string*)assign_addr << "\";" << std::endl;
                   std::cout.flush();
               }
               break;
           default:
               std::stringstream message;
               message << "Unhandled Type (" << local_type << ") in assignment.";
               emitError(message.str());
               return (1);
               break;
      }

   } else if ( remaining_dimensions > 0 ) {

       int size_of_curr_dim = attr->index[curr_dim].size ;

       if ( size_of_curr_dim == 0) { // the remaining dimensions are pointer dimensions.

           assign_addr = (char*)base_addr + offset * sizeof(void*);

           if (v_tree && v_tree->v_data) {

               if ((remaining_dimensions == 1) && (v_tree->v_data->type == TRICK_STRING)) {
                   *(char**)assign_addr = mm_strdup( vval_string(v_tree->v_data));
               } else {
                   *(void**)assign_addr = vval_voidp(v_tree->v_data);
               }

           } else {
               *(void**)assign_addr = 0;
           }

           if (debug_level) {
               std::cout << std::endl << "Assignment: *(void**)" << (void*)assign_addr
                         << " = " << *(void**)assign_addr << ";" << std::endl;
               std::cout.flush();
           }

       } else { // next dimension is fixed.

           if ((local_type == TRICK_CHARACTER) &&
               (remaining_dimensions == 1) &&
               (v_tree) &&
               (v_tree->v_data)
              ) {

               assign_addr = (char*)base_addr + offset * size_of_curr_dim * sizeof(char);

               if ((v_tree->v_data->type == TRICK_STRING) &&
                   (v_tree->v_data->value.cp != NULL)) {

                   int rhs_len = (int)strlen(v_tree->v_data->value.cp) + 1;
                   if (rhs_len <= size_of_curr_dim ) {
                       strcpy((char*)assign_addr, v_tree->v_data->value.cp);
                   } else {
                       emitError("Memory Manager: char array is too small for the attempted string assignment.");
                       return (1);
                   }
               } else {
                   *(char*)assign_addr = '\0';
               }

           } else if ( (local_type == TRICK_WCHAR) &&
                       (remaining_dimensions == 1)) {

               assign_addr = (char*)base_addr + offset * size_of_curr_dim * sizeof(wchar_t);

               if ((v_tree) &&
                   (v_tree->v_data->type == TRICK_WSTRING) &&
                   (v_tree->v_data->value.wcp != NULL)) {

                       int rhs_len = (int)wcslen(v_tree->v_data->value.wcp) + 1;
                       if (rhs_len <= size_of_curr_dim ) {
                           wcscpy((wchar_t*)assign_addr, v_tree->v_data->value.wcp);
                       } else {
                           std::stringstream message;
                           message << "wchar_t array at [" << (void*)assign_addr
                                   << "] is to small for the attempted string assignment." ;
                           emitError(message.str());
                           return (1);
                       }
               } else if ((v_tree) &&
                          (v_tree->v_data->type == TRICK_STRING) &&
                          (v_tree->v_data->value.cp != NULL)) {

                       int rhs_len = (int)ncs_to_wcs_len(v_tree->v_data->value.cp) + 1;
                       if (rhs_len <= size_of_curr_dim ) {
                           ncs_to_wcs( v_tree->v_data->value.cp, (wchar_t*)assign_addr, rhs_len);
                       } else {
                           std::stringstream message;
                           message << "wchar_t array at [" << (void*)assign_addr
                                   << "] is too small for the attempted string assignment." ;
                           emitError(message.str());
                           return (1);
                       }
               } else {
                   *(wchar_t*)assign_addr = (wchar_t) NULL;
               }

           } else {
               int ii;
               V_TREE* curr_vt_node;
               if (v_tree) {
                   curr_vt_node = v_tree->down;
               } else {
                   curr_vt_node =  NULL;
               }

               for (ii=0; ii < size_of_curr_dim; ii++) {
                   int ret;
                   ret = assign_recursive (base_addr,
                                           attr,
                                           curr_dim+1,
                                           offset * size_of_curr_dim + ii,
                                           curr_vt_node,
                                           cf);

                   if (ret !=0) {
                       return(1);
                   }

                   if (curr_vt_node) {
                     curr_vt_node = curr_vt_node->next;
                   }
               }
           }
       }
   } else {
        emitError("This is bad. In assign_recursive(), remaining_dimensions is negative.");
        return (1);
   }
   return (0);
}

#ifdef TRICK_VER
#include "trick/UdUnits.hh"
#else
static ut_system * u_system ;
#endif
ut_system * Trick::MemoryManager::get_unit_system() {
#ifdef TRICK_VER
    return Trick::UdUnits::get_u_system() ;
#else
    /* Initialize the udunits-2 library */
    ut_set_error_message_handler(ut_ignore) ;
    if( (u_system = ut_read_xml( NULL )) == NULL ) {
        std::cerr << "Error initializing udunits-2 unit system" << std::endl ;
        return -1 ;
    }
    ut_set_error_message_handler(ut_write_to_stderr) ;
    return u_system ;
#endif
}

// MEMBER FUNCTION
int Trick::MemoryManager::ref_assignment( REF2* R, V_TREE* V) {

    int ret = 0;
    cv_converter * cf = NULL ;

    // Create a units conversion function if necessary.
    if (R->units) {
        ut_unit * from = ut_parse(get_unit_system(), R->units, UT_ASCII) ;
        ut_unit * to = ut_parse(get_unit_system(), R->attr->units, UT_ASCII) ;
        if ( !from or !to ) {
            std::stringstream message;
            message << "Can't convert \"" << R->units << "\" to \"" << R->attr->units << "\".";
            emitError(message.str());
            return TRICK_UNITS_CONVERSION_ERROR ;
        }
        cf = ut_get_converter(from,to) ;
        if ( !cf ) {
            std::stringstream message;
            message << "Can't convert \"" << R->units << "\" to \"" << R->attr->units << "\".";
            emitError(message.str());
            return TRICK_UNITS_CONVERSION_ERROR ;
        }
    }

    // R->num_index is badly named. It is really the current dimension
    ret = assign_recursive( R->address, R->attr, R->num_index, 0, V, cf);
    if ( cf ) cv_free(cf) ;

    return ( ret);

}


1	#include "trick/MemoryManager.hh"
2	#include "trick/bitfield_proto.h"
3	#include "trick/vval.h"
4	#include "trick/wcs_ext.h"
5	#include <limits.h>
6	#include <sstream>
7	#include <udunits2.h>
8	#include <string.h>
9
10	int Trick::MemoryManager::assign_recursive(void* base_addr, ATTRIBUTES* attr, int curr_dim, int offset, V_TREE* v_tree, cv_converter* cf) {	17,309✔
11
12	char* assign_addr;
13	int remaining_dimensions = attr->num_index - curr_dim;	17,309✔
14	// local_type is set to the type of the attribute, but if it's a STL type, we need to use the element type.
15	TRICK_TYPE local_type = attr->type;	17,309✔
16	if (local_type == TRICK_STL) {	17,309✔
NEW 17	local_type = attr->stl_elem_type;	×
18	}
19
20	if ( remaining_dimensions == 0 ) {	17,309✔
21
22	switch (local_type) {	15,225✔
23
24	case TRICK_CHARACTER :	597✔
25	case TRICK_UNSIGNED_CHARACTER :
26	assign_addr = (char)base_addr + offset sizeof(char);	597✔
27	if (v_tree && v_tree->v_data) {	597✔
28	(char)assign_addr = vval_char(v_tree->v_data);	597✔
29	} else {
30	(char)assign_addr = '\0';	×
31	}
32	if (debug_level) {	597✔
33	std::cout << std::endl << "Assignment: (char)" << (void*)assign_addr	×
34	<< " = ";	×
35	if (isprint((char)assign_addr)) {	×
36	std::cout << (char)assign_addr;	×
37	} else {
38	std::cout << (int)(char)assign_addr;	×
39	}
40	std::cout << ";" << std::endl;	×
41	std::cout.flush();	×
42	}
43	break;	15,225✔
44	case TRICK_WCHAR :	×
45	assign_addr = (char)base_addr + offset sizeof(wchar_t);	×
46	if (v_tree && v_tree->v_data) {	×
47	(wchar_t)assign_addr = vval_char(v_tree->v_data);	×
48	} else {
49	(wchar_t)assign_addr = 0;	×
50	}
51	if (debug_level) {	×
52	char buff[16] = {0};	×
53	wctomb(buff,(wchar_t)assign_addr);	×
54	std::cout << std::endl << "Assignment: (wchar_t)" << (void*)assign_addr	×
55	<< " = " << buff << ";" << std::endl;	×
56	std::cout.flush();	×
57	}
58	break;	×
59	case TRICK_SHORT :	1,068✔
60	case TRICK_UNSIGNED_SHORT :
61	assign_addr = (char)base_addr + offset sizeof(short);	1,068✔
62	if (v_tree && v_tree->v_data) {	1,068✔
63	(short )assign_addr = vval_short(v_tree->v_data);	1,068✔
64	} else {
65	(short )assign_addr = 0;	×
66	}
67	if (debug_level) {	1,068✔
68	std::cout << std::endl << "Assignment: (short)" << (void*)assign_addr	×
69	<< " = " << (short)assign_addr << ";" << std::endl;	×
70	std::cout.flush();	×
71	}
72	break;	1,068✔
73	case TRICK_INTEGER :	4,283✔
74	case TRICK_UNSIGNED_INTEGER :
75	assign_addr = (char)base_addr + offset sizeof(int);	4,283✔
76	if (v_tree && v_tree->v_data) {	4,283✔
77	int input_value;
78	input_value = vval_int(v_tree->v_data);	4,277✔
79	if (cf == NULL) {	4,277✔
80	(int )assign_addr = input_value;	4,274✔
81	} else {
82	(int )assign_addr = (int)cv_convert_double(cf, (double)input_value) ;	3✔
83	}	4,277✔
84	} else {
85	(int )assign_addr = 0;	6✔
86	}
87	if (debug_level) {	4,283✔
88	std::cout << std::endl << "Assignment: (int)" << (void*)assign_addr	×
89	<< " = " << (int)assign_addr << ";" << std::endl;	×
90	std::cout.flush();	×
91	}
92	break;	4,283✔
93	case TRICK_BOOLEAN :	1,441✔
94	assign_addr = (char)base_addr + offset sizeof(bool);	1,441✔
95	if (v_tree && v_tree->v_data) {	1,441✔
96	(bool )assign_addr = (vval_short(v_tree->v_data)!=0);	1,441✔
97	} else {
98	(bool )assign_addr = false;	×
99	}
100	if (debug_level) {	1,441✔
101	std::cout << std::endl << "Assignment: (bool)" << (void*)assign_addr	×
102	<< " = " << (bool)assign_addr << ";" << std::endl;	×
103	std::cout.flush();	×
104	}
105	break;	1,441✔
106	case TRICK_ENUMERATED :	30✔
107	if (v_tree && v_tree->v_data) {	30✔
108	if ((size_t)attr->size == sizeof(int)) {	30✔
109	assign_addr = (char)base_addr + offset sizeof(int);	30✔
110	(int )assign_addr = vval_int(v_tree->v_data);	30✔
111	if (debug_level) {	30✔
112	std::cout << std::endl << "Assignment (Enum): (int)" << (void*)assign_addr	×
113	<< " = " << (int)assign_addr << ";" << std::endl;	×
114	std::cout.flush();	×
115	}
116	} else if ((size_t)attr->size == sizeof(short)) {	×
117	assign_addr = (char)base_addr + offset sizeof(short);	×
118	(short )assign_addr = vval_short(v_tree->v_data);	×
119	if (debug_level) {	×
120	std::cout << std::endl << "Assignment (Enum): (short)" << (void*)assign_addr	×
121	<< " = " << (short)assign_addr << ";" << std::endl;	×
122	std::cout.flush();	×
123	}
124	} else if ((size_t)attr->size == sizeof(char)) {	×
125	assign_addr = (char)base_addr + offset sizeof(char);	×
126	(char )assign_addr = vval_char(v_tree->v_data);	×
127	if (debug_level) {	×
128	std::cout << std::endl << "Assignment (Enum): (char)" << (void*)assign_addr	×
129	<< " = " << (char)assign_addr << ";" << std::endl;	×
130	std::cout.flush();	×
131	}
132	} else {
133	std::stringstream message;	×
134	message << "Enumeration of size " << attr->size << " is not supported.";	×
135	emitError(message.str());	×
136	}	30✔
137	} else {
138	emitError("v_tree data appears to be corrupted.");	×
139	}
140	break;	30✔
141	case TRICK_LONG :	60✔
142	case TRICK_UNSIGNED_LONG :
143	assign_addr = (char)base_addr + offset sizeof(long);	60✔
144	if (v_tree && v_tree->v_data) {	60✔
145	long input_value;
146	input_value = vval_long(v_tree->v_data);	60✔
147	if (cf == NULL) {	60✔
148	(long )assign_addr = input_value;	58✔
149	} else {
150	(long )assign_addr = (long)cv_convert_double(cf, (double)input_value) ;	2✔
151	}	60✔
152	} else {
153	(long )assign_addr = 0;	×
154	}
155	if (debug_level) {	60✔
156	std::cout << std::endl << "Assignment: (long)" << (void*)assign_addr	×
157	<< " = " << (long)assign_addr << ";" << std::endl;	×
158	std::cout.flush();	×
159	}
160	break;	60✔
161	case TRICK_FLOAT :	18✔
162	assign_addr = (char)base_addr + offset sizeof(float);	18✔
163	if (v_tree && v_tree->v_data) {	18✔
164	float input_value;
165	input_value = vval_float(v_tree->v_data);	18✔
166	if (cf == NULL) { // There is no units conversion.	18✔
167	(float )assign_addr = input_value;	17✔
168	} else { // There is units conversion.
169	(float )assign_addr = (float)cv_convert_double(cf, (double)input_value) ;	1✔
170	}	18✔
171	} else {
172	(float )assign_addr = 0;	×
173	}
174	if (debug_level) {	18✔
175	std::cout << std::endl << "Assignment: (float)" << (void*)assign_addr	×
176	<< " = " << (float)assign_addr << ";" << std::endl;	×
177	std::cout.flush();	×
178	}
179	break;	18✔
180	case TRICK_DOUBLE :	2,959✔
181	assign_addr = (char)base_addr + offset sizeof(double);	2,959✔
182	if (v_tree && v_tree->v_data) {	2,959✔
183	double input_value;
184	input_value = vval_double(v_tree->v_data);	2,959✔
185	if (cf == NULL) {	2,959✔
186	(double )assign_addr = input_value;	2,953✔
187	} else {
188	(double )assign_addr = cv_convert_double(cf, input_value) ;	6✔
189	}	2,959✔
190	} else {
191	(double )assign_addr = 0;	×
192	}
193	if (debug_level) {	2,959✔
194	std::cout << std::endl << "Assignment: (double)" << (void*)assign_addr	×
195	<< " = " << (double)assign_addr << ";" << std::endl;	×
196	std::cout.flush();	×
197	}
198	break;	2,959✔
199	case TRICK_LONG_LONG :	460✔
200	case TRICK_UNSIGNED_LONG_LONG :
201	assign_addr = (char)base_addr + offset sizeof(long long);	460✔
202	if (v_tree && v_tree->v_data) {	460✔
203	(long long )assign_addr = vval_longlong(v_tree->v_data);	460✔
204	} else {
205	(long long )assign_addr = 0;	×
206	}
207	if (debug_level) {	460✔
208	std::cout << std::endl << "Assignment: (long long)" << (void*)assign_addr	×
209	<< " = " << (long long)assign_addr << ";" << std::endl;	×
210	std::cout.flush();	×
211	}
212	break;	460✔
213	case TRICK_BITFIELD :	×
214	case TRICK_UNSIGNED_BITFIELD : {
215	int input_value;
216	assign_addr = (char)base_addr + offset (size_t)attr->size;	×
217	if (v_tree && v_tree->v_data) {	×
218	input_value = vval_int(v_tree->v_data);	×
219	} else {
220	input_value = 0;	×
221	}
222	if (attr->size == sizeof(int)) {	×
223	(unsigned int)assign_addr = insert_bitfield_any(	×
224	(unsigned int)assign_addr, input_value, attr->size, attr->index[0].start, attr->index[0].size);
225	} else if (attr->size == sizeof(short)) {	×
226	(unsigned short)assign_addr = insert_bitfield_any(	×
227	(unsigned short)assign_addr, input_value, attr->size, attr->index[0].start, attr->index[0].size);	×
228	} else if (attr->size == sizeof(char)) {	×
229	(unsigned char)assign_addr = insert_bitfield_any(	×
230	(unsigned char)assign_addr, input_value, attr->size, attr->index[0].start, attr->index[0].size);	×
231	} else {
232	std::stringstream message;	×
233	message << "Unhandled bitfield struct size (" << attr->size << ") in bitfield assignment.";	×
234	emitError(message.str());	×
235	}
236	if (debug_level) {	×
237	std::cout << std::endl << "Assignment: "	×
238	<< "Within the " << attr->size << " byte struct at " << (void*)assign_addr	×
239	<< ", the bitfield ["<< attr->index[0].start << ".."	×
240	<< attr->index[0].start + attr->index[0].size - 1	×
241	<< "] = " << input_value << ";"	×
242	<< std::endl;	×
243	std::cout.flush();	×
244	}
245	} break;	×
246	case TRICK_FILE_PTR :	×
247	if (debug_level) {	×
248	std::cout << std::endl << "Assignment: TRICK_FILE_PTR assignments not yet implemented."	×
249	<< std::endl;	×
250	std::cout.flush();	×
251	}
252	break;	×
253	case TRICK_VOID_PTR :	×
254	if (debug_level) {	×
255	std::cout << std::endl << "Assignment: TRICK_VOID_PTR assignments not yet implemented."	×
256	<< std::endl;	×
257	std::cout.flush();	×
258	}
259	break;	×
260	case TRICK_STRING :	4,309✔
261	assign_addr = (char)base_addr + offset sizeof(std::string);	4,309✔
262	if (v_tree && v_tree->v_data) {	4,309✔
263	(std::string)assign_addr = vval_string(v_tree->v_data);	4,309✔
264	} else {
265	(std::string)assign_addr = "";	×
266	}
267	if (debug_level) {	4,309✔
268	std::cout << std::endl << "Assignment: (std::string)" << (void)assign_addr	×
269	<< " = \"" << (std::string)assign_addr << "\";" << std::endl;	×
270	std::cout.flush();	×
271	}
272	break;	4,309✔
273	default:	×
274	std::stringstream message;	×
NEW 275	message << "Unhandled Type (" << local_type << ") in assignment.";	×
276	emitError(message.str());	×
277	return (1);	×
278	break;
279	}
280
281	} else if ( remaining_dimensions > 0 ) {	2,084✔
282
283	int size_of_curr_dim = attr->index[curr_dim].size ;	2,084✔
284
285	if ( size_of_curr_dim == 0) { // the remaining dimensions are pointer dimensions.	2,084✔
286
287	assign_addr = (char)base_addr + offset sizeof(void*);	587✔
288
289	if (v_tree && v_tree->v_data) {	587✔
290
291	if ((remaining_dimensions == 1) && (v_tree->v_data->type == TRICK_STRING)) {	1,174✔
292	(char*)assign_addr = mm_strdup( vval_string(v_tree->v_data));	27✔
293	} else {
294	(void*)assign_addr = vval_voidp(v_tree->v_data);	560✔
295	}
296
297	} else {
298	(void*)assign_addr = 0;	×
299	}
300
301	if (debug_level) {	587✔
302	std::cout << std::endl << "Assignment: (void)" << (void)assign_addr	×
303	<< " = " << (void*)assign_addr << ";" << std::endl;	×
304	std::cout.flush();	×
305	}
306
307	} else { // next dimension is fixed.
308
309	if ((local_type == TRICK_CHARACTER) &&	1,497✔
310	(remaining_dimensions == 1) &&	75✔
311	(v_tree) &&	75✔
312	(v_tree->v_data)	75✔
313	) {
314
315	assign_addr = (char)base_addr + offset size_of_curr_dim * sizeof(char);	66✔
316
317	if ((v_tree->v_data->type == TRICK_STRING) &&	66✔
318	(v_tree->v_data->value.cp != NULL)) {	66✔
319
320	int rhs_len = (int)strlen(v_tree->v_data->value.cp) + 1;	66✔
321	if (rhs_len <= size_of_curr_dim ) {	66✔
322	strcpy((char*)assign_addr, v_tree->v_data->value.cp);	66✔
323	} else {
324	emitError("Memory Manager: char array is too small for the attempted string assignment.");	×
325	return (1);	×
326	}	66✔
327	} else {
328	(char)assign_addr = '\0';	×
329	}	66✔
330
331	} else if ( (local_type == TRICK_WCHAR) &&	1,431✔
332	(remaining_dimensions == 1)) {
333
334	assign_addr = (char)base_addr + offset size_of_curr_dim * sizeof(wchar_t);	×
335
336	if ((v_tree) &&	×
337	(v_tree->v_data->type == TRICK_WSTRING) &&	×
338	(v_tree->v_data->value.wcp != NULL)) {	×
339
340	int rhs_len = (int)wcslen(v_tree->v_data->value.wcp) + 1;	×
341	if (rhs_len <= size_of_curr_dim ) {	×
342	wcscpy((wchar_t*)assign_addr, v_tree->v_data->value.wcp);	×
343	} else {
344	std::stringstream message;	×
345	message << "wchar_t array at [" << (void*)assign_addr	×
346	<< "] is to small for the attempted string assignment." ;	×
347	emitError(message.str());	×
348	return (1);	×
349	}	×
350	} else if ((v_tree) &&	×
351	(v_tree->v_data->type == TRICK_STRING) &&	×
352	(v_tree->v_data->value.cp != NULL)) {	×
353
354	int rhs_len = (int)ncs_to_wcs_len(v_tree->v_data->value.cp) + 1;	×
355	if (rhs_len <= size_of_curr_dim ) {	×
356	ncs_to_wcs( v_tree->v_data->value.cp, (wchar_t*)assign_addr, rhs_len);	×
357	} else {
358	std::stringstream message;	×
359	message << "wchar_t array at [" << (void*)assign_addr	×
360	<< "] is too small for the attempted string assignment." ;	×
361	emitError(message.str());	×
362	return (1);	×
363	}	×
364	} else {
365	(wchar_t)assign_addr = (wchar_t) NULL;	×
366	}	×
367
368	} else {
369	int ii;
370	V_TREE* curr_vt_node;
371	if (v_tree) {	1,431✔
372	curr_vt_node = v_tree->down;	1,431✔
373	} else {
374	curr_vt_node = NULL;	×
375	}
376
377	for (ii=0; ii < size_of_curr_dim; ii++) {	4,125✔
378	int ret;
379	ret = assign_recursive (base_addr,	5,388✔
380	attr,
381	curr_dim+1,
382	offset * size_of_curr_dim + ii,	2,694✔
383	curr_vt_node,
384	cf);
385
386	if (ret !=0) {	2,694✔
387	return(1);	×
388	}
389
390	if (curr_vt_node) {	2,694✔
391	curr_vt_node = curr_vt_node->next;	2,688✔
392	}
393	}
394	}
395	}
396	} else {
397	emitError("This is bad. In assign_recursive(), remaining_dimensions is negative.");	×
398	return (1);	×
399	}
400	return (0);	17,309✔
401	}
402
403	#ifdef TRICK_VER
404	#include "trick/UdUnits.hh"
405	#else
406	static ut_system * u_system ;
407	#endif
408	ut_system * Trick::MemoryManager::get_unit_system() {	38✔
409	#ifdef TRICK_VER
410	return Trick::UdUnits::get_u_system() ;	38✔
411	#else
412	/* Initialize the udunits-2 library */
413	ut_set_error_message_handler(ut_ignore) ;
414	if( (u_system = ut_read_xml( NULL )) == NULL ) {
415	std::cerr << "Error initializing udunits-2 unit system" << std::endl ;
416	return -1 ;
417	}
418	ut_set_error_message_handler(ut_write_to_stderr) ;
419	return u_system ;
420	#endif
421	}
422
423	// MEMBER FUNCTION
424	int Trick::MemoryManager::ref_assignment( REF2* R, V_TREE* V) {	14,616✔
425
426	int ret = 0;	14,616✔
427	cv_converter * cf = NULL ;	14,616✔
428
429	// Create a units conversion function if necessary.
430	if (R->units) {	14,616✔
431	ut_unit * from = ut_parse(get_unit_system(), R->units, UT_ASCII) ;	19✔
432	ut_unit * to = ut_parse(get_unit_system(), R->attr->units, UT_ASCII) ;	19✔
433	if ( !from or !to ) {	19✔
434	std::stringstream message;	×
435	message << "Can't convert \"" << R->units << "\" to \"" << R->attr->units << "\".";	×
436	emitError(message.str());	×
437	return TRICK_UNITS_CONVERSION_ERROR ;	×
438	}
439	cf = ut_get_converter(from,to) ;	19✔
440	if ( !cf ) {	19✔
441	std::stringstream message;	1✔
442	message << "Can't convert \"" << R->units << "\" to \"" << R->attr->units << "\".";	1✔
443	emitError(message.str());	1✔
444	return TRICK_UNITS_CONVERSION_ERROR ;	1✔
445	}
446	}
447
448	// R->num_index is badly named. It is really the current dimension
449	ret = assign_recursive( R->address, R->attr, R->num_index, 0, V, cf);	14,615✔
450	if ( cf ) cv_free(cf) ;	14,615✔
451
452	return ( ret);	14,615✔
453
454	}
455

nasa / trick / 19943359860

Source File Press 'n' to go to next uncovered line, 'b' for previous

Source File
Press 'n' to go to next uncovered line, 'b' for previous