/* Return the C++ specific type identifier for the
specified type specification
*/
c_char *
idl_corbaCxxTypeFromTypeSpec(
idl_typeSpec typeSpec)
{
c_char *typeName;
/* QAC EXPECT 3416; No side effects here */
if (idl_typeSpecType(typeSpec) == idl_tbasic) {
/* if the specified type is a basic type */
if (idl_getCorbaMode() == IDL_MODE_STANDALONE) {
typeName = standaloneTypeFromTypeSpec(idl_typeBasic(typeSpec));
} else {
typeName = corbaTypeFromTypeSpec(idl_typeBasic(typeSpec));
}
} else if ((idl_typeSpecType(typeSpec) == idl_tseq) ||
(idl_typeSpecType(typeSpec) == idl_tarray)) {
/* sequence does not have an identification */
typeName = os_strdup ("");
printf ("idl_corbaCxxTypeFromTypeSpec: Unexpected type handled\n");
assert(0);
} else {
/* if a user type is specified build it from its scope and its name.
The type should be one of idl_ttypedef, idl_tenum, idl_tstruct,
idl_tunion.
*/
typeName = idl_scopeStackCxx(
idl_typeUserScope(idl_typeUser(typeSpec)),
"::",
idl_typeSpecName(typeSpec));
}
return typeName;
/* QAC EXPECT 5101; The switch statement is simple, therefor the total complexity is low */
}
static void
idl_typedefOpenClose(
idl_scope scope,
const char *name,
idl_typeDef defSpec,
void *userData)
{
c_char spaces[20];
idl_tmplExp te;
if ((idl_typeSpecType(idl_typeDefRefered(defSpec)) == idl_tstruct ||
idl_typeSpecType(idl_typeDefRefered(defSpec)) == idl_tunion) &&
idl_keyResolve(idl_keyDefDefGet(), scope, name) != NULL) {
/* keylist defined for this typedef of struct or union */
te = idl_tmplExpNew(idlpp_macroSet);
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("scope", idl_scopeStackCxx(scope, "::", NULL)));
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("typename", idl_cxxId(name)));
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("scopedtypename", idl_scopeStack(scope, "::", name)));
//idl_macroSetAdd(idlpp_macroSet, idl_macroNew("uniquetypename", idl_scopeStack(scope, "_", name)));
//snprintf(spaces, (size_t)sizeof(spaces), "%d", idlpp_indent_level*4);
//idl_macroSetAdd(idlpp_macroSet, idl_macroNew("spaces", spaces));
idlpp_inStream = idl_streamInNew(idlpp_template, idlpp_macroAttrib);
idl_tmplExpProcessTmpl(te, idlpp_inStream, idl_fileCur());
idl_streamInFree(idlpp_inStream);
idl_tmplExpFree(te);
}
}
static idl_action
idl_unionOpen(
idl_scope scope,
const char *name,
idl_typeUnion unionSpec,
void *userData)
{
c_char spaces[20];
idl_tmplExp te;
/* QAC EXPECT 3416; No unexpected side effects here */
if (idl_keyResolve(idl_keyDefDefGet(), scope, name) != NULL) {
/* keylist defined for this union */
te = idl_tmplExpNew(idlpp_macroSet);
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("scope", idl_scopeStackCxx(scope, "::", NULL)));
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("typename", idl_cxxId(name)));
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("scopedtypename", idl_scopeStack(scope, "::", name)));
//idl_macroSetAdd(idlpp_macroSet, idl_macroNew("uniquetypename", idl_scopeStack(scope, "_", name)));
//snprintf(spaces, (size_t)sizeof(spaces), "%d", idlpp_indent_level*4);
//idl_macroSetAdd(idlpp_macroSet, idl_macroNew("spaces", spaces));
idlpp_inStream = idl_streamInNew(idlpp_template, idlpp_macroAttrib);
idl_tmplExpProcessTmpl(te, idlpp_inStream, idl_fileCur());
idl_streamInFree(idlpp_inStream);
idl_tmplExpFree(te);
}
return idl_abort;
}
/** @brief callback function called on definition of a structure member in the IDL input file.
*
* Generate code for the following IDL construct:
* @verbatim
struct <structure-name> {
=> <structure-member-1>;
=> ... ...
=> <structure-member-n>;
};
@endverbatim
*
* @param scope Current scope
* @param name Name of the structure member
* @param typeSpec Type specification of the structure member
*/
static void
idl_structureMemberOpenClose (
idl_scope scope,
const char *name,
idl_typeSpec typeSpec,
void *userData)
{
struct idl_genSACPPData *arg = (struct idl_genSACPPData *)userData;
char *memberName;
char *scopedName;
char *seqName;
switch (idl_typeSpecType(typeSpec)) {
case idl_tbasic:
case idl_tenum:
case idl_ttypedef:
case idl_tstruct:
case idl_tunion:
case idl_tseq:
/* nothing todo */
break;
case idl_tarray:
/* generate implementation code for the array mapping */
memberName = idl_cxxId(name);
snprintf(arg->buffer,MAX_BUFFER,"_%s_array",memberName);
seqName = os_strdup(arg->buffer);
scopedName = idl_scopeStackCxx(scope, "::", seqName);
idl_arrayTypeImpl(idl_typeArray(typeSpec), scopedName,arg);
snprintf(arg->buffer, MAX_BUFFER, "_%s_array %s;\n", memberName, memberName);
os_free(seqName);
os_free(scopedName);
os_free(memberName);
break;
default:
printf("idl_structureMemberOpenClose: Unsupported structure member type (member name = %s, type name = %s)\n",
name, idl_scopedTypeName(typeSpec));
}
}
static idl_action
idl_structureOpen(
idl_scope scope,
const char *name,
idl_typeStruct structSpec,
void *userData)
{
idl_tmplExp te;
/* QAC EXPECT 3416; No unexpected side effects here */
if (idl_keyResolve(idl_keyDefDefGet(), scope, name) != NULL) {
/* keylist defined for this struct */
te = idl_tmplExpNew(idlpp_macroSet);
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("scope", idl_scopeStackCxx(scope, "::", NULL)));
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("typename", idl_cxxId(name)));
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("scopedtypename", idl_scopeStack(scope, "::", name)));
idlpp_inStream = idl_streamInNew(idlpp_template, idlpp_macroAttrib);
idl_tmplExpProcessTmpl(te, idlpp_inStream, idl_fileCur());
idl_streamInFree(idlpp_inStream);
idl_tmplExpFree(te);
}
return idl_abort;
}
/* Build a textual presenation of the provided scope stack taking the
language keyword identifier translation into account. Further the function
equals "idl_scopeStack".
*/
c_char *
idl_scopeStackLanguage(
idl_scope scope,
const char *name)
{
c_char *id = NULL;
switch (lang) {
case IDL_LANG_C:
id = idl_scopeStackC (scope, "_", name);
break;
case IDL_LANG_CXX:
id = idl_scopeStackCxx (scope, "::", name);
break;
case IDL_LANG_JAVA:
id = idl_scopeStackJava (scope, ".", name);
break;
case IDL_LANG_UNKNOWN:
default:
break;
}
return id;
}
