/* Return the scoped type name where for the user types,
scopes are separated by "_" chracters.
*/
c_char *
idl_scopedTypeName (
const idl_typeSpec typeSpec)
{
const char *scopedTypeName;
/* QAC EXPECT 3416; No unexpected side effects here */
if (idl_typeSpecType(typeSpec) == idl_tseq) {
/* Sequences map to c_sequence */
scopedTypeName = "c_sequence";
/* QAC EXPECT 3416; No unexpected side effects here */
} else if (idl_typeSpecType(typeSpec) == idl_tbasic) {
/* For basic types take the corresponding type name supported by the splice database */
/* QAC EXPECT 3416; No unexpected side effects here */
if (idl_typeBasicType(idl_typeBasic(typeSpec)) == idl_string) {
/* in case of bounded string the type name must become c_string */
/* type name is of form "C_STRING<xx>" */
scopedTypeName = "c_string";
} else {
scopedTypeName = idl_typeSpecName(idl_typeSpec(typeSpec));
}
} else {
/* Build a name for user types from scope and its own name */
scopedTypeName = idl_scopeStack (
idl_typeUserScope(idl_typeUser(typeSpec)),
"_",
idl_typeSpecName(idl_typeSpec(typeSpec)));
}
return os_strdup(scopedTypeName);
}
c_char *
idl_scopedSplTypeIdent (
const idl_typeSpec typeSpec)
{
c_char scopedTypeIdent[256];
/* QAC EXPECT 3416; No unexpected side effects here */
if (idl_typeSpecType(typeSpec) == idl_tbasic) {
/* QAC EXPECT 3416; No unexpected side effects here */
if (idl_typeBasicType (idl_typeBasic(typeSpec)) == idl_string) {
snprintf (scopedTypeIdent, (size_t)sizeof(scopedTypeIdent), "c_string");
} else {
snprintf (scopedTypeIdent, (size_t)sizeof(scopedTypeIdent), "%s",
idl_typeSpecName(idl_typeSpec(typeSpec)));
}
/* QAC EXPECT 3416; No unexpected side effects here */
} else if (idl_typeSpecType(typeSpec) == idl_tenum) {
snprintf (scopedTypeIdent, (size_t)sizeof(scopedTypeIdent), "enum _%s",
idl_scopeStack (
idl_typeUserScope(idl_typeUser(typeSpec)),
"_",
idl_typeSpecName(idl_typeSpec(typeSpec))));
/* QAC EXPECT 3416; No unexpected side effects here */
} else if (idl_typeSpecType(typeSpec) == idl_tstruct) {
snprintf (scopedTypeIdent, (size_t)sizeof(scopedTypeIdent), "struct _%s",
idl_scopeStack (
idl_typeUserScope(idl_typeUser(typeSpec)),
"_",
idl_typeSpecName(idl_typeSpec(typeSpec))));
/* QAC EXPECT 3416; No unexpected side effects here */
} else if (idl_typeSpecType(typeSpec) == idl_tunion) {
snprintf (scopedTypeIdent, (size_t)sizeof(scopedTypeIdent), "struct _%s",
idl_scopeStack (
idl_typeUserScope(idl_typeUser(typeSpec)),
"_",
idl_typeSpecName(idl_typeSpec(typeSpec))));
/* QAC EXPECT 3416; No unexpected side effects here */
} else if (idl_typeSpecType(typeSpec) == idl_ttypedef) {
snprintf (scopedTypeIdent, (size_t)sizeof(scopedTypeIdent), "_%s",
idl_scopeStack (
idl_typeUserScope(idl_typeUser(typeSpec)),
"_",
idl_typeSpecName(idl_typeSpec(typeSpec))));
/* QAC EXPECT 3416; No unexpected side effects here */
} else if (idl_typeSpecType(typeSpec) == idl_tseq) {
snprintf (scopedTypeIdent, (size_t)sizeof(scopedTypeIdent), "c_sequence");
} else {
/* Do nothing, only to prevent dangling else-ifs QAC messages */
}
return os_strdup(scopedTypeIdent);
}
/* 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 */
}
/* Return the scoped type name where for the user types,
scopes are separated by "_" chracters.
*/
c_char *
idl_scopedSplTypeName (
const idl_typeSpec typeSpec)
{
char scopedTypeName[256];
/* QAC EXPECT 3416; No unexpected side effects here */
if (idl_typeSpecType(typeSpec) == idl_tseq) {
/* Sequences map to c_sequence */
os_strncpy (scopedTypeName, "c_sequence", sizeof(scopedTypeName));
/* QAC EXPECT 3416; No unexpected side effects here */
} else if (idl_typeSpecType(typeSpec) == idl_tbasic) {
/* For basic types take the corresponding type name supported by the splice database */
/* QAC EXPECT 3416; No unexpected side effects here */
if (idl_typeBasicType(idl_typeBasic(typeSpec)) == idl_string) {
/* in case of bounded string the type name must become c_string */
/* type name is of form "C_STRING<xx>" */
os_strncpy (scopedTypeName, "c_string", sizeof(scopedTypeName));
} else {
os_strncpy (scopedTypeName, idl_typeSpecName(idl_typeSpec(typeSpec)), sizeof(scopedTypeName));
}
} else if (idl_typeSpecType(typeSpec) == idl_tstruct ||
idl_typeSpecType(typeSpec) == idl_tunion) {
snprintf (scopedTypeName, (size_t)sizeof(scopedTypeName), "struct _%s",
idl_scopeStack (
idl_typeUserScope(idl_typeUser(typeSpec)),
"_",
idl_typeSpecName(idl_typeSpec(typeSpec))));
} else if (idl_typeSpecType(typeSpec) == idl_tenum) {
snprintf (scopedTypeName, (size_t)sizeof(scopedTypeName), "enum _%s",
idl_scopeStack (
idl_typeUserScope(idl_typeUser(typeSpec)),
"_",
idl_typeSpecName(idl_typeSpec(typeSpec))));
} else {
snprintf (scopedTypeName, (size_t)sizeof(scopedTypeName), "_%s",
idl_scopeStack (
idl_typeUserScope(idl_typeUser(typeSpec)),
"_",
idl_typeSpecName(idl_typeSpec(typeSpec))));
}
return os_strdup(scopedTypeName);
}
static void
newMeta(
idl_scope scope,
const char *name,
idl_typeSpec typeSpec)
{
idl_meta meta;
meta = os_malloc(C_SIZEOF(idl_meta));
if (meta) {
meta->scope = idl_scopeDup(scope);
meta->name = os_strdup(name);
if (idl_typeSpecType(typeSpec) == idl_ttypedef) {
meta->actual_name = idl_typeSpecName(idl_typeDefActual(idl_typeDef(typeSpec)));
} else {
meta->actual_name = idl_typeSpecName(typeSpec);
}
meta->type = idl_typeSpecDef(typeSpec);
}
idlpp_metaList = os_iterAppend(idlpp_metaList, meta);
}
/* Return the type name from its type specification */
c_char *
idl_typeFromTypeSpec (
const idl_typeSpec typeSpec)
{
return idl_typeSpecName(typeSpec);
}
static int
idl_genInterface(
idl_scope scope,
const char *name,
char *class_base,
idl_typeSpec typeSpec,
c_bool generateInterfaceClass)
{
idl_tmplExp te;
c_char tmplFileName[1024];
c_char pname[1024];
c_char *tmplPath;
c_char *orbPath;
int tmplFile;
struct os_stat_s tmplStat;
unsigned int nRead;
os_char *redirects;
char *scopedMetaTypeName;
const char *internalTypeName;
const char *keyList;
char *scopeStackJavaDot = idl_scopeStackJava(scope, ".", name);
char *scopeStackJavaSlash = idl_scopeStackJava(scope, "/", name);
char *typeSpecName = idl_typeSpecName(typeSpec);
char *javaId = idl_javaId(name);
int result = 0;
tmplPath = os_getenv("OSPL_TMPL_PATH");
orbPath = os_getenv("OSPL_ORB_PATH");
if (tmplPath == NULL) {
printf("OSPL_TMPL_PATH not defined\n");
result = -1;
goto err_exit;
}
if (orbPath == NULL) {
printf("OSPL_ORB_PATH not defined\n");
result = -1;
goto err_exit;
}
idlpp_macroSet = idl_macroSetNew();
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("type-name", javaId));
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("actual-type-name", typeSpecName));
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("scoped-type-name", scopeStackJavaDot));
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("java-class-name", scopeStackJavaSlash));
redirects = idl_packageRedirects ();
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("java-package-redirects", redirects));
os_free(redirects);
scopedMetaTypeName = idl_scopeStack(scope, "::", name);
internalTypeName = idl_internalTypeNameForBuiltinTopic(scopedMetaTypeName);
keyList = idl_keyResolve(idl_keyDefDefGet(), scope, name);
if ((strlen(internalTypeName) != 0) &&
((keyList == NULL) ||
(strcmp(keyList,"key") == 0))) {
keyList = "key.localId,key.systemId";
}
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("scoped-meta-type-name", scopedMetaTypeName));
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("internal-type-name", internalTypeName));
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("scoped-actual-type-name", idl_corbaJavaTypeFromTypeSpec(typeSpec)));
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("key-list", keyList));
os_free(scopedMetaTypeName);
/* Generate only in standalone mode */
if (idl_getCorbaMode() == IDL_MODE_STANDALONE) {
snprintf(pname, sizeof (pname), "%s%s", javaId, class_base);
idl_openJavaPackage(scope, pname);
if (idl_fileCur() == NULL) {
result = -1;
goto err_exit;
}
/* Prepare Interface class */
if (generateInterfaceClass) {
snprintf(tmplFileName, sizeof(tmplFileName), "%s%c%s%ctmpl%s.java", tmplPath, OS_FILESEPCHAR, orbPath, OS_FILESEPCHAR, class_base);
/* QAC EXPECT 3416; No side effects here */
if ((os_stat(tmplFileName, &tmplStat) != os_resultSuccess) ||
(os_access(tmplFileName, OS_ROK) != os_resultSuccess)) {
printf ("No template found or protection violation (%s)\n", tmplFileName);
result = -1;
goto err_exit;
}
/* QAC EXPECT 5007; will not use wrapper */
idlpp_template = os_malloc(tmplStat.stat_size+1);
tmplFile = open(tmplFileName, O_RDONLY);
nRead = (unsigned int)read(tmplFile, idlpp_template, tmplStat.stat_size);
memset(&idlpp_template[nRead], 0, tmplStat.stat_size+1-nRead);
close(tmplFile);
idlpp_macroAttrib = idl_macroAttribNew(IDL_TOKEN_START, IDL_TOKEN_OPEN, IDL_TOKEN_CLOSE);
idlpp_inStream = idl_streamInNew(idlpp_template, idlpp_macroAttrib);
te = idl_tmplExpNew(idlpp_macroSet);
idl_tmplExpProcessTmpl(te, idlpp_inStream, idl_fileCur());
idl_streamInFree(idlpp_inStream);
idl_tmplExpFree(te);
os_free(idlpp_template);
}
idl_closeJavaPackage();
snprintf(pname, sizeof(pname), "%s%sHolder", javaId, class_base);
idl_openJavaPackage(scope, pname);
if (idl_fileCur() == NULL) {
result = -1;
goto err_exit;
}
/* Prepare typeSupportHolder class */
snprintf(tmplFileName, sizeof(tmplFileName), "%s%c%s%ctmpl%sHolder.java", tmplPath, OS_FILESEPCHAR, orbPath, OS_FILESEPCHAR, class_base);
/* QAC EXPECT 3416; No side effects here */
if ((os_stat(tmplFileName, &tmplStat) != os_resultSuccess) ||
(os_access(tmplFileName, OS_ROK) != os_resultSuccess)) {
printf ("No template found or protection violation (%s)\n", tmplFileName);
result = -1;
goto err_exit;
}
/* QAC EXPECT 5007; will not use wrapper */
idlpp_template = os_malloc(tmplStat.stat_size+1);
tmplFile = open(tmplFileName, O_RDONLY);
nRead = (unsigned int)read(tmplFile, idlpp_template, tmplStat.stat_size);
memset(&idlpp_template[nRead], 0, tmplStat.stat_size+1-nRead);
close(tmplFile);
idlpp_macroAttrib = idl_macroAttribNew(IDL_TOKEN_START, IDL_TOKEN_OPEN, IDL_TOKEN_CLOSE);
idlpp_inStream = idl_streamInNew(idlpp_template, idlpp_macroAttrib);
os_free(idlpp_template);
te = idl_tmplExpNew(idlpp_macroSet);
idl_tmplExpProcessTmpl(te, idlpp_inStream, idl_fileCur());
idl_streamInFree(idlpp_inStream);
idl_tmplExpFree(te);
idl_closeJavaPackage();
snprintf(pname, sizeof(pname), "%s%sHelper", javaId, class_base);
idl_openJavaPackage(scope, pname);
if (idl_fileCur() == NULL) {
result = -1;
goto err_exit;
}
/* Prepare typeSupportHelper class */
snprintf(tmplFileName, sizeof(tmplFileName), "%s%c%s%ctmpl%sHelper.java", tmplPath, OS_FILESEPCHAR, orbPath, OS_FILESEPCHAR, class_base);
/* QAC EXPECT 3416; No side effects here */
if ((os_stat(tmplFileName, &tmplStat) != os_resultSuccess) ||
(os_access(tmplFileName, OS_ROK) != os_resultSuccess)) {
printf ("No template found or protection violation (%s)\n", tmplFileName);
result = -1;
goto err_exit;
}
/* QAC EXPECT 5007; will not use wrapper */
idlpp_template = os_malloc(tmplStat.stat_size+1);
tmplFile = open(tmplFileName, O_RDONLY);
nRead = (unsigned int)read(tmplFile, idlpp_template, tmplStat.stat_size);
memset(&idlpp_template[nRead], 0, tmplStat.stat_size+1-nRead);
close(tmplFile);
idlpp_macroAttrib = idl_macroAttribNew(IDL_TOKEN_START, IDL_TOKEN_OPEN, IDL_TOKEN_CLOSE);
idlpp_inStream = idl_streamInNew(idlpp_template, idlpp_macroAttrib);
os_free(idlpp_template);
te = idl_tmplExpNew(idlpp_macroSet);
idl_tmplExpProcessTmpl(te, idlpp_inStream, idl_fileCur());
idl_streamInFree(idlpp_inStream);
idl_tmplExpFree(te);
idl_closeJavaPackage();
snprintf(pname, sizeof(pname), "%s%sOperations", javaId, class_base);
idl_openJavaPackage(scope, pname);
if (idl_fileCur() == NULL) {
result = idl_abort;
goto err_exit;
}
/* Prepare typeSupportOperations class */
snprintf(tmplFileName, sizeof(tmplFileName), "%s%c%s%ctmpl%sOperations.java", tmplPath, OS_FILESEPCHAR, orbPath, OS_FILESEPCHAR, class_base);
/* QAC EXPECT 3416; No side effects here */
if ((os_stat(tmplFileName, &tmplStat) != os_resultSuccess) ||
(os_access(tmplFileName, OS_ROK) != os_resultSuccess)) {
printf ("No template found or protection violation (%s)\n", tmplFileName);
result = -1;
goto err_exit;
}
/* QAC EXPECT 5007; will not use wrapper */
idlpp_template = os_malloc(tmplStat.stat_size+1);
tmplFile = open(tmplFileName, O_RDONLY);
nRead = (unsigned int)read(tmplFile, idlpp_template, tmplStat.stat_size);
memset(&idlpp_template[nRead], 0, tmplStat.stat_size+1-nRead);
close(tmplFile);
idlpp_macroAttrib = idl_macroAttribNew(IDL_TOKEN_START, IDL_TOKEN_OPEN, IDL_TOKEN_CLOSE);
idlpp_inStream = idl_streamInNew(idlpp_template, idlpp_macroAttrib);
os_free(idlpp_template);
te = idl_tmplExpNew(idlpp_macroSet);
idl_tmplExpProcessTmpl(te, idlpp_inStream, idl_fileCur());
idl_streamInFree(idlpp_inStream);
idl_tmplExpFree(te);
idl_closeJavaPackage();
}
if (generateInterfaceClass) {
/* Implementation with Impl extension */
snprintf(pname, sizeof(pname), "%s%sImpl", javaId, class_base);
} else {
/* Implementation without Impl extension */
snprintf(pname, sizeof(pname), "%s%s", javaId, class_base);
}
idl_openJavaPackage(scope, pname);
if (idl_fileCur() == NULL) {
result = -1;
goto err_exit;
}
/* Prepare typeSupportStub class */
snprintf(tmplFileName, sizeof(tmplFileName), "%s%c%s%ctmpl%sImpl.java", tmplPath, OS_FILESEPCHAR, orbPath, OS_FILESEPCHAR, class_base);
/* QAC EXPECT 3416; No side effects here */
if ((os_stat(tmplFileName, &tmplStat) != os_resultSuccess) ||
(os_access(tmplFileName, OS_ROK) != os_resultSuccess)) {
printf("No template found or protection violation (%s)\n", tmplFileName);
result = idl_abort;
goto err_exit;
}
/* QAC EXPECT 5007; will not use wrapper */
idlpp_template = os_malloc(tmplStat.stat_size+1);
tmplFile = open(tmplFileName, O_RDONLY);
nRead = (unsigned int)read(tmplFile, idlpp_template, tmplStat.stat_size);
memset(&idlpp_template[nRead], 0, tmplStat.stat_size+1-nRead);
close(tmplFile);
idlpp_macroAttrib = idl_macroAttribNew(IDL_TOKEN_START, IDL_TOKEN_OPEN, IDL_TOKEN_CLOSE);
idlpp_inStream = idl_streamInNew(idlpp_template, idlpp_macroAttrib);
os_free(idlpp_template);
te = idl_tmplExpNew(idlpp_macroSet);
idl_tmplExpProcessTmpl(te, idlpp_inStream, idl_fileCur());
idl_streamInFree(idlpp_inStream);
idl_tmplExpFree(te);
idl_closeJavaPackage();
err_exit:
os_free(javaId);
os_free(scopeStackJavaDot);
os_free(scopeStackJavaSlash);
return result;
}
static int
idl_genTypeSeqHolder(
idl_scope scope,
const char *name,
idl_typeSpec typeSpec)
{
idl_tmplExp te;
c_char tmplFileName[1024];
c_char pname[1024];
c_char *tmplPath;
c_char *orbPath;
int tmplFile;
struct os_stat_s tmplStat;
unsigned int nRead;
tmplPath = os_getenv("OSPL_TMPL_PATH");
orbPath = os_getenv("OSPL_ORB_PATH");
if (tmplPath == NULL) {
printf("OSPL_TMPL_PATH not defined\n");
return -1;
}
if (orbPath == NULL) {
printf("OSPL_ORB_PATH not defined\n");
return -1;
}
idlpp_macroSet = idl_macroSetNew();
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("type-name", idl_javaId(name)));
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("actual-type-name", idl_typeSpecName(typeSpec)));
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("scoped-type-name", idl_scopeStackJava(scope, ".", name)));
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("scoped-actual-type-name", idl_corbaJavaTypeFromTypeSpec(typeSpec)));
snprintf(pname, sizeof (pname), "%sSeqHolder", idl_javaId(name));
idl_openJavaPackage(scope, pname);
if (idl_fileCur() == NULL) {
return -1;
}
/* Prepare typeSupport class */
snprintf(tmplFileName, sizeof(tmplFileName), "%s%c%s%ctmplSeqHolder.java", tmplPath, OS_FILESEPCHAR, orbPath, OS_FILESEPCHAR);
/* QAC EXPECT 3416; No side effects here */
if ((os_stat(tmplFileName, &tmplStat) != os_resultSuccess) ||
(os_access(tmplFileName, OS_ROK) != os_resultSuccess)) {
printf("No template found or protection violation (%s)\n", tmplFileName);
return -1;
}
/* QAC EXPECT 5007; will not use wrapper */
idlpp_template = os_malloc(tmplStat.stat_size+1);
tmplFile = open(tmplFileName, O_RDONLY);
nRead = (unsigned int)read(tmplFile, idlpp_template, tmplStat.stat_size);
memset(&idlpp_template[nRead], 0, tmplStat.stat_size+1-nRead);
close(tmplFile);
idlpp_macroAttrib = idl_macroAttribNew(IDL_TOKEN_START, IDL_TOKEN_OPEN, IDL_TOKEN_CLOSE);
idlpp_inStream = idl_streamInNew(idlpp_template, idlpp_macroAttrib);
te = idl_tmplExpNew(idlpp_macroSet);
idl_tmplExpProcessTmpl(te, idlpp_inStream, idl_fileCur());
idl_streamInFree(idlpp_inStream);
idl_tmplExpFree(te);
idl_closeJavaPackage();
return 0;
}
/* Return the standalone C specific type identifier for the
specified type specification
*/
c_char *
idl_sacTypeFromTypeSpec (
const 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 */
switch (idl_typeBasicType(idl_typeBasic(typeSpec))) {
case idl_short:
typeName = os_strdup("DDS_short");
break;
case idl_ushort:
typeName = os_strdup("DDS_unsigned_short");
break;
case idl_long:
typeName = os_strdup("DDS_long");
break;
case idl_ulong:
typeName = os_strdup("DDS_unsigned_long");
break;
case idl_longlong:
typeName = os_strdup("DDS_long_long");
break;
case idl_ulonglong:
typeName = os_strdup("DDS_unsigned_long_long");
break;
case idl_float:
typeName = os_strdup("DDS_float");
break;
case idl_double:
typeName = os_strdup("DDS_double");
break;
case idl_char:
typeName = os_strdup("DDS_char");
break;
case idl_string:
typeName = os_strdup("DDS_string");
break;
case idl_boolean:
typeName = os_strdup("DDS_boolean");
break;
case idl_octet:
typeName = os_strdup("DDS_octet");
break;
default:
/* No processing required, empty statement to satisfy QAC */
break;
/* QAC EXPECT 2016; Default case must be empty here */
}
/* QAC EXPECT 3416; No side effects here */
} else if (idl_typeSpecType(typeSpec) == idl_tseq) {
/* sequence does not have an identification */
typeName = os_strdup ("");
printf ("idl_sacTypeFromTypeSpec: Unexpected sequence type handled\n");
} else if (idl_typeSpecType(typeSpec) == idl_tarray) {
typeName = os_strdup ("");
printf ("idl_sacTypeFromTypeSpec: Unexpected array type handled\n");
} 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_scopeStackC (
idl_typeUserScope(idl_typeUser(typeSpec)),
"_",
idl_typeSpecName(typeSpec));
}
return typeName;
/* QAC EXPECT 5101; The switch statement is simple, therefor the total complexity is low */
}
/** @brief callback function called on definition of a named type in the IDL input file.
*
* Generate code for the following IDL construct:
* @verbatim
=> typedef <type-name> <name>;
@endverbatim
*
* @param scope Current scope
* @param name Specifies the name of the type
* @param defSpec Specifies the type of the named type
*/
static void
idl_typedefOpenClose(
idl_scope scope,
const char *name,
idl_typeDef defSpec,
void *userData)
{
struct idl_genSACPPData *arg = (struct idl_genSACPPData *)userData;
idl_typeSpec actualType;
idl_typeSpec refType;
const char *refName;
char *scopedName;
actualType = idl_typeDefActual(defSpec);
refType = idl_typeDefRefered(defSpec);
refName = idl_typeSpecName(refType);
scopedName = idl_corbaCxxTypeFromTypeSpec(idl_typeSpec(defSpec));
if (idl_typeSpecType(refType) == idl_tarray) { /* ex. typedef long myArr[22]; */
idl_arrayTypeImpl(idl_typeArray(refType), scopedName, arg);
} else {
if (idl_typeSpecType(actualType) == idl_tarray) {
/* Generate implementation _alloc() method */
idl_printIndent(arg->indent_level);
idl_fileOutPrintf(idl_fileCur(),"%s_slice *%s_alloc()\n", scopedName, scopedName);
idl_printIndent(arg->indent_level);
idl_fileOutPrintf(idl_fileCur(),"{\n");
idl_printIndent(arg->indent_level+1);
idl_fileOutPrintf(idl_fileCur(),"return (%s_slice *)%s_alloc();\n",
scopedName, refName);
idl_printIndent(arg->indent_level+1);
idl_fileOutPrintf(idl_fileCur(),"}\n\n");
/* Generate implementation _free() method:
* Implementation is independent of the actual type.
*/
idl_printIndent(arg->indent_level);
idl_fileOutPrintf(idl_fileCur(),"void %s_free(%s_slice *s)\n", scopedName, scopedName);
idl_printIndent(arg->indent_level);
idl_fileOutPrintf(idl_fileCur(),"{\n");
idl_printIndent(arg->indent_level+1);
idl_fileOutPrintf(idl_fileCur(),"%s_free(s);\n", refName);
idl_printIndent(arg->indent_level);
idl_fileOutPrintf(idl_fileCur(),"}\n\n");
/* Generate implementation _copy() method */
idl_printIndent(arg->indent_level);
idl_fileOutPrintf(idl_fileCur(),"void *%s_copy(%s_slice *to, const %s_slice *from)\n",
scopedName, scopedName, scopedName);
idl_printIndent(arg->indent_level);
idl_fileOutPrintf(idl_fileCur(),"{\n");
idl_printIndent(arg->indent_level+1);
idl_fileOutPrintf(idl_fileCur(),"%s_copy(to, from);\n", refName);
idl_printIndent(arg->indent_level);
idl_fileOutPrintf(idl_fileCur(),"}\n\n");
/* Generate implementation _dup() method */
idl_printIndent(arg->indent_level);
idl_fileOutPrintf(idl_fileCur(),"%s_slice *%s_dup(const %s_slice *from)\n",
scopedName, scopedName);
idl_printIndent(arg->indent_level);
idl_fileOutPrintf(idl_fileCur(),"{\n");
arg->indent_level++;
idl_printIndent(arg->indent_level);
idl_fileOutPrintf(idl_fileCur(),"%s_slice *to = %s_alloc();\n", scopedName, scopedName);
idl_printIndent(arg->indent_level);
idl_fileOutPrintf(idl_fileCur(),"%s_copy(to, from);\n", refName);
idl_printIndent(arg->indent_level);
idl_fileOutPrintf(idl_fileCur(),"return to;\n");
arg->indent_level--;
idl_fileOutPrintf(idl_fileCur(),"}\n\n");
}
}
os_free(scopedName);
}
/* Return the C specific type identifier for the
specified type specification
*/
c_char *
idl_corbaJavaTypeFromTypeSpec (
idl_typeSpec typeSpec)
{
c_char *typeName = NULL;
/* QAC EXPECT 3416; No side effects here */
if (idl_typeSpecType(typeSpec) == idl_tbasic) {
/* if the specified type is a basic type */
switch (idl_typeBasicType(idl_typeBasic(typeSpec))) {
case idl_short:
case idl_ushort:
typeName = os_strdup("short");
break;
case idl_long:
case idl_ulong:
typeName = os_strdup("int");
break;
case idl_longlong:
case idl_ulonglong:
typeName = os_strdup("long");
break;
case idl_float:
typeName = os_strdup("float");
break;
case idl_double:
typeName = os_strdup("double");
break;
case idl_char:
typeName = os_strdup("char");
break;
case idl_string:
typeName = os_strdup("java.lang.String");
break;
case idl_boolean:
typeName = os_strdup("boolean");
break;
case idl_octet:
typeName = os_strdup("byte");
break;
default:
/* No processing required, empty statement to satisfy QAC */
break;
/* QAC EXPECT 2016; Default case must be empty here */
}
/* QAC EXPECT 3416; No side effects here */
} else if (idl_typeSpecType(typeSpec) == idl_tseq) {
return idl_corbaJavaTypeFromTypeSpec (idl_typeSeqActual(idl_typeSeq (typeSpec)));
} else if (idl_typeSpecType(typeSpec) == idl_tarray) {
#if 0
/* sequence does not have an identification */
typeName = os_strdup ("");
printf ("idl_corbaJavaTypeFromTypeSpec: Unexpected type handled\n");
#else
return idl_corbaJavaTypeFromTypeSpec (idl_typeArrayActual(idl_typeArray (typeSpec)));
#endif
} else if (idl_typeSpecType(typeSpec) == idl_ttypedef) {
return idl_corbaJavaTypeFromTypeSpec (idl_typeDefActual(idl_typeDef (typeSpec)));
} 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_scopeStackJava(
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 int
idl_genInterface(
idl_scope scope,
const char *name,
char *class_base,
idl_typeSpec typeSpec,
c_bool generateInterfaceClass)
{
idl_tmplExp te;
c_char tmplFileName[1024];
c_char pname[1024];
c_char *tmplPath;
c_char *orbPath;
int tmplFile;
struct os_stat tmplStat;
unsigned int nRead;
tmplPath = os_getenv("OSPL_TMPL_PATH");
orbPath = os_getenv("OSPL_ORB_PATH");
if (tmplPath == NULL) {
printf("OSPL_TMPL_PATH not defined\n");
return -1;
}
if (orbPath == NULL) {
printf("OSPL_ORB_PATH not defined\n");
return -1;
}
idlpp_macroSet = idl_macroSetNew();
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("type-name", idl_javaId(name)));
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("actual-type-name", idl_typeSpecName(typeSpec)));
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("scoped-type-name", idl_scopeStackJava(scope, ".", name)));
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("java-class-name", idl_scopeStackJava(scope, "/", name)));
if(idl_genJavaHelperGetOrgPName())
{
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("java-org-package-name", idl_genJavaHelperGetOrgPName()));
} else
{
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("java-org-package-name", "null"));
}
if(idl_genJavaHelperGetTgtPName())
{
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("java-tgt-package-name", idl_genJavaHelperGetTgtPName()));
} else
{
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("java-tgt-package-name", "null"));
}
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("scoped-meta-type-name", idl_scopeStack(scope, "::", name)));
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("scoped-actual-type-name", idl_corbaJavaTypeFromTypeSpec(typeSpec)));
idl_macroSetAdd(idlpp_macroSet, idl_macroNew("key-list", idl_keyResolve(idl_keyDefDefGet(), scope, name)));
snprintf(pname, sizeof (pname), "%s%s", idl_javaId(name), class_base);
idl_openJavaPackage(scope, pname);
if (idl_fileCur() == NULL) {
return -1;
}
if (idl_scopeStackSize(scope) > 0) {
idl_fileOutPrintf(idl_fileCur(), "package %s;\n", idl_scopeStackJava (scope, ".", NULL));
idl_fileOutPrintf(idl_fileCur(), "\n");
}
/* Prepare Interface class */
if (generateInterfaceClass) {
snprintf(tmplFileName, (size_t)sizeof(tmplFileName), "%s%c%s%ctmpl%s.java", tmplPath, OS_FILESEPCHAR, orbPath, OS_FILESEPCHAR, class_base);
/* QAC EXPECT 3416; No side effects here */
if ((os_stat(tmplFileName, &tmplStat) != os_resultSuccess) ||
(os_access(tmplFileName, OS_ROK) != os_resultSuccess)) {
printf ("No template found or protection violation (%s)\n", tmplFileName);
return -1;
}
/* QAC EXPECT 5007; will not use wrapper */
idlpp_template = os_malloc((size_t)((int)tmplStat.stat_size+1));
tmplFile = open(tmplFileName, O_RDONLY);
nRead = (unsigned int)read(tmplFile, idlpp_template, (size_t)tmplStat.stat_size);
memset(&idlpp_template[nRead], 0, (size_t)((int)tmplStat.stat_size+1-nRead));
close(tmplFile);
idlpp_macroAttrib = idl_macroAttribNew(IDL_TOKEN_START, IDL_TOKEN_OPEN, IDL_TOKEN_CLOSE);
idlpp_inStream = idl_streamInNew(idlpp_template, idlpp_macroAttrib);
te = idl_tmplExpNew(idlpp_macroSet);
idl_tmplExpProcessTmpl(te, idlpp_inStream, idl_fileCur());
idl_streamInFree(idlpp_inStream);
idl_tmplExpFree(te);
}
idl_closeJavaPackage();
snprintf(pname, sizeof(pname), "%s%sHolder", idl_javaId(name), class_base);
idl_openJavaPackage(scope, pname);
if (idl_fileCur() == NULL) {
return -1;
}
if (idl_scopeStackSize(scope) > 0) {
idl_fileOutPrintf(idl_fileCur(), "package %s;\n", idl_scopeStackJava(scope, ".", NULL));
idl_fileOutPrintf(idl_fileCur(), "\n");
}
/* Prepare typeSupportHolder class */
snprintf(tmplFileName, (size_t)sizeof(tmplFileName), "%s%c%s%ctmpl%sHolder.java", tmplPath, OS_FILESEPCHAR, orbPath, OS_FILESEPCHAR, class_base);
/* QAC EXPECT 3416; No side effects here */
if ((os_stat(tmplFileName, &tmplStat) != os_resultSuccess) ||
(os_access(tmplFileName, OS_ROK) != os_resultSuccess)) {
printf ("No template found or protection violation (%s)\n", tmplFileName);
return -1;
}
/* QAC EXPECT 5007; will not use wrapper */
idlpp_template = os_malloc((size_t)((int)tmplStat.stat_size+1));
tmplFile = open(tmplFileName, O_RDONLY);
nRead = (unsigned int)read(tmplFile, idlpp_template, (size_t)tmplStat.stat_size);
memset(&idlpp_template[nRead], 0, (size_t)((int)tmplStat.stat_size+1-nRead));
close(tmplFile);
idlpp_macroAttrib = idl_macroAttribNew(IDL_TOKEN_START, IDL_TOKEN_OPEN, IDL_TOKEN_CLOSE);
idlpp_inStream = idl_streamInNew(idlpp_template, idlpp_macroAttrib);
te = idl_tmplExpNew(idlpp_macroSet);
idl_tmplExpProcessTmpl(te, idlpp_inStream, idl_fileCur());
idl_streamInFree(idlpp_inStream);
idl_tmplExpFree(te);
idl_closeJavaPackage();
snprintf(pname, sizeof(pname), "%s%sHelper", idl_javaId(name), class_base);
idl_openJavaPackage(scope, pname);
if (idl_fileCur() == NULL) {
return -1;
}
if (idl_scopeStackSize(scope) > 0) {
idl_fileOutPrintf(idl_fileCur(), "package %s;\n", idl_scopeStackJava(scope, ".", NULL));
idl_fileOutPrintf(idl_fileCur(), "\n");
}
/* Prepare typeSupportHelper class */
snprintf(tmplFileName, (size_t)sizeof(tmplFileName), "%s%c%s%ctmpl%sHelper.java", tmplPath, OS_FILESEPCHAR, orbPath, OS_FILESEPCHAR, class_base);
/* QAC EXPECT 3416; No side effects here */
if ((os_stat(tmplFileName, &tmplStat) != os_resultSuccess) ||
(os_access(tmplFileName, OS_ROK) != os_resultSuccess)) {
printf ("No template found or protection violation (%s)\n", tmplFileName);
return -1;
}
/* QAC EXPECT 5007; will not use wrapper */
idlpp_template = os_malloc((size_t)((int)tmplStat.stat_size+1));
tmplFile = open(tmplFileName, O_RDONLY);
nRead = (unsigned int)read(tmplFile, idlpp_template, (size_t)tmplStat.stat_size);
memset(&idlpp_template[nRead], 0, (size_t)((int)tmplStat.stat_size+1-nRead));
close(tmplFile);
idlpp_macroAttrib = idl_macroAttribNew(IDL_TOKEN_START, IDL_TOKEN_OPEN, IDL_TOKEN_CLOSE);
idlpp_inStream = idl_streamInNew(idlpp_template, idlpp_macroAttrib);
te = idl_tmplExpNew(idlpp_macroSet);
idl_tmplExpProcessTmpl(te, idlpp_inStream, idl_fileCur());
idl_streamInFree(idlpp_inStream);
idl_tmplExpFree(te);
idl_closeJavaPackage();
snprintf(pname, sizeof(pname), "%s%sOperations", idl_javaId(name), class_base);
idl_openJavaPackage(scope, pname);
if (idl_fileCur() == NULL) {
return (idl_abort);
}
if (idl_scopeStackSize(scope) > 0) {
idl_fileOutPrintf(idl_fileCur(), "package %s;\n", idl_scopeStackJava(scope, ".", NULL));
idl_fileOutPrintf(idl_fileCur(), "\n");
}
/* Prepare typeSupportOperations class */
snprintf(tmplFileName, (size_t)sizeof(tmplFileName), "%s%c%s%ctmpl%sOperations.java", tmplPath, OS_FILESEPCHAR, orbPath, OS_FILESEPCHAR, class_base);
/* QAC EXPECT 3416; No side effects here */
if ((os_stat(tmplFileName, &tmplStat) != os_resultSuccess) ||
(os_access(tmplFileName, OS_ROK) != os_resultSuccess)) {
printf ("No template found or protection violation (%s)\n", tmplFileName);
return -1;
}
/* QAC EXPECT 5007; will not use wrapper */
idlpp_template = os_malloc((size_t)((int)tmplStat.stat_size+1));
tmplFile = open(tmplFileName, O_RDONLY);
nRead = (unsigned int)read(tmplFile, idlpp_template, (size_t)tmplStat.stat_size);
memset(&idlpp_template[nRead], 0, (size_t)((int)tmplStat.stat_size+1-nRead));
close(tmplFile);
idlpp_macroAttrib = idl_macroAttribNew(IDL_TOKEN_START, IDL_TOKEN_OPEN, IDL_TOKEN_CLOSE);
idlpp_inStream = idl_streamInNew(idlpp_template, idlpp_macroAttrib);
te = idl_tmplExpNew(idlpp_macroSet);
idl_tmplExpProcessTmpl(te, idlpp_inStream, idl_fileCur());
idl_streamInFree(idlpp_inStream);
idl_tmplExpFree(te);
idl_closeJavaPackage();
if (generateInterfaceClass) {
/* Implementation with Impl extension */
snprintf(pname, sizeof(pname), "%s%sImpl", idl_javaId(name), class_base);
} else {
/* Implementation without Impl extension */
snprintf(pname, sizeof(pname), "%s%s", idl_javaId(name), class_base);
}
idl_openJavaPackage(scope, pname);
if (idl_fileCur() == NULL) {
return -1;
}
if (idl_scopeStackSize(scope) > 0) {
idl_fileOutPrintf(idl_fileCur(), "package %s;\n", idl_scopeStackJava(scope, ".", NULL));
idl_fileOutPrintf(idl_fileCur(), "\n");
}
/* Prepare typeSupportStub class */
snprintf(tmplFileName, (size_t)sizeof(tmplFileName), "%s%c%s%ctmpl%sImpl.java", tmplPath, OS_FILESEPCHAR, orbPath, OS_FILESEPCHAR, class_base);
/* QAC EXPECT 3416; No side effects here */
if ((os_stat(tmplFileName, &tmplStat) != os_resultSuccess) ||
(os_access(tmplFileName, OS_ROK) != os_resultSuccess)) {
printf("No template found or protection violation (%s)\n", tmplFileName);
return (idl_abort);
}
/* QAC EXPECT 5007; will not use wrapper */
idlpp_template = os_malloc((size_t)((int)tmplStat.stat_size+1));
tmplFile = open(tmplFileName, O_RDONLY);
nRead = (unsigned int)read(tmplFile, idlpp_template, (size_t)tmplStat.stat_size);
memset(&idlpp_template[nRead], 0, (size_t)((int)tmplStat.stat_size+1-nRead));
close(tmplFile);
idlpp_macroAttrib = idl_macroAttribNew(IDL_TOKEN_START, IDL_TOKEN_OPEN, IDL_TOKEN_CLOSE);
idlpp_inStream = idl_streamInNew(idlpp_template, idlpp_macroAttrib);
te = idl_tmplExpNew(idlpp_macroSet);
idl_tmplExpProcessTmpl(te, idlpp_inStream, idl_fileCur());
idl_streamInFree(idlpp_inStream);
idl_tmplExpFree(te);
idl_closeJavaPackage();
return 0;
}
