int ProcessOptions::Process_Switch(Cmd_Parser_Table *option, char *param, POVMSObjectPtr obj, bool is_on)
{
double floatval = 0.0;
int intval = 0;
int intval2 = 0;
int err = 0;
char chr = 0;
if(option->is_switch != kPOVMSType_Null)
{
err = POVMSUtil_SetBool(obj, option->is_switch, is_on);
if(err != kNoErr)
return err;
}
switch(option->type)
{
case kPOVMSType_Int:
if(sscanf(param, "%d", &intval) == 1)
err = POVMSUtil_SetInt(obj, option->key, intval);
else
{
ParseError("Integer parameter expected for switch '%s', found '%s'.", option->command, param);
err = kParseErr;
}
break;
case kPOVMSType_Float:
if(sscanf(param, "%lf", &floatval) == 1)
err = POVMSUtil_SetFloat(obj, option->key, floatval);
else
{
ParseError("Floating-point parameter expected for switch '%s', found '%s'.", option->command, param);
err = kParseErr;
}
break;
case kPOVMSType_Bool:
err = POVMSUtil_SetBool(obj, option->key, IsTrue(param));
break;
case kPOVObjectClass_File:
// make the file object
if(err == kNoErr)
err = POVMSUtil_SetString(obj, option->key, param);
else
{
ParseError("File name or path parameter expected for switch '%s', found '%s'.", option->command, param);
err = kParseErr;
}
break;
case kPOVMSType_WildCard:
err = ReadSpecialSwitchHandler(option, param, obj, is_on);
break;
case kPOVMSType_Null:
break;
default:
err = kParseErr;
break;
}
return err;
}
void POVMS_Object::SetFloat(POVMSType key, POVMSFloat value)
{
int err;
err = POVMSUtil_SetFloat(&data, key, value);
if(err != kNoErr)
throw err;
}
void POVMS_Object::SetFloat(POVMSType key, POVMSFloat value)
{
int err;
err = POVMSUtil_SetFloat(&data, key, value);
if(err != pov_base::kNoErr)
throw POV_EXCEPTION_CODE(err);
}
int ProcessOptions::Process_INI_Option(INI_Parser_Table *option, char *param, POVMSObjectPtr obj)
{
double floatval = 0.0;
int intval = 0;
int intval2 = 0;
int err = kNoErr;
switch(option->type)
{
case kPOVMSType_Int:
if(sscanf(param, "%d", &intval) == 1)
err = POVMSUtil_SetInt(obj, option->key, intval);
else
{
ParseError("Integer parameter expected for option '%s', found '%s'.", option->keyword, param);
err = kParseErr;
}
break;
case kPOVMSType_Float:
if(sscanf(param, "%lf", &floatval) == 1)
err = POVMSUtil_SetFloat(obj, option->key, floatval);
else
{
ParseError("Floating-point parameter expected for option '%s', found '%s'.", option->keyword, param);
err = kParseErr;
}
break;
case kPOVMSType_Bool:
err = POVMSUtil_SetBool(obj, option->key, IsTrue(param));
break;
case kPOVObjectClass_File:
// make the file object
if(err == kNoErr)
err = POVMSUtil_SetString(obj, option->key, param);
else
{
ParseError("File name or path parameter expected for option '%s', found '%s'.", option->keyword, param);
err = kParseErr;
}
break;
case kPOVMSType_WildCard:
err = ReadSpecialOptionHandler(option, param, obj);
break;
default:
err = kParseErr;
break;
}
return err;
}
int BuildProgress(POVMSObjectPtr msg, int progress)
{
int ret = kNoErr;
DBL time_dif;
STOP_TIME
time_dif = TIME_ELAPSED
ret = POVMSUtil_SetInt(msg, kPOVAttrib_TotalTime, int(time_dif));
switch(progress)
{
case kPOVList_Prog_CreatingBoundingSlabs:
break;
case kPOVList_Prog_CreatingVistaBuffer:
break;
case kPOVList_Prog_CreatingLightBuffers:
break;
case kPOVList_Prog_BuildingPhotonMaps:
(void)POVMSUtil_SetInt(msg, kPOVAttrib_TotalPhotonCount, GetPhotonStat(kPOVAttrib_TotalPhotonCount));
(void)POVMSUtil_SetInt(msg, kPOVAttrib_ObjectPhotonCount, GetPhotonStat(kPOVAttrib_ObjectPhotonCount));
(void)POVMSUtil_SetInt(msg, kPOVAttrib_MediaPhotonCount, GetPhotonStat(kPOVAttrib_MediaPhotonCount));
(void)POVMSUtil_SetInt(msg, kPOVAttrib_PhotonXSamples, GetPhotonStat(kPOVAttrib_PhotonXSamples));
(void)POVMSUtil_SetInt(msg, kPOVAttrib_PhotonYSamples, GetPhotonStat(kPOVAttrib_PhotonYSamples));
break;
case kPOVList_Prog_LoadingPhotonMaps:
break;
case kPOVList_Prog_SavingPhotonMaps:
break;
case kPOVList_Prog_SortingPhotons:
(void)POVMSUtil_SetInt(msg, kPOVAttrib_CurrentPhotonCount, GetPhotonStat(kPOVAttrib_CurrentPhotonCount));
(void)POVMSUtil_SetInt(msg, kPOVAttrib_TotalPhotonCount, GetPhotonStat(kPOVAttrib_TotalPhotonCount));
break;
case kPOVList_Prog_ReclaimingMemory:
break;
case kPOVList_Prog_WritingINIFile:
break;
case kPOVList_Prog_WritingHistogramFile:
break;
case kPOVList_Prog_PerformingShelloutCommand:
break;
case kPOVList_Prog_ResumingInterruptedTrace:
break;
case kPOVList_Prog_ProcessingFrame:
(void)POVMSUtil_SetInt(msg, kPOVAttrib_CurrentFrame, opts.FrameSeq.FrameNumber - opts.FrameSeq.InitialFrame + 1);
(void)POVMSUtil_SetInt(msg, kPOVAttrib_FrameCount, opts.FrameSeq.FinalFrame - opts.FrameSeq.InitialFrame + 1);
(void)POVMSUtil_SetInt(msg, kPOVAttrib_AbsoluteCurFrame, opts.FrameSeq.FrameNumber);
(void)POVMSUtil_SetFloat(msg, kPOVAttrib_FirstClock, opts.FrameSeq.InitialClock);
(void)POVMSUtil_SetFloat(msg, kPOVAttrib_CurrentClock, opts.FrameSeq.Clock_Value);
(void)POVMSUtil_SetFloat(msg, kPOVAttrib_LastClock, opts.FrameSeq.FinalClock);
break;
case kPOVList_Prog_Parsing:
(void)POVMSUtil_SetLong(msg, kPOVAttrib_CurrentToken, Current_Token_Count);
break;
case kPOVList_Prog_Displaying:
break;
case kPOVList_Prog_Rendering:
(void)POVMSUtil_SetInt(msg, kPOVAttrib_CurrentLine, Current_Line_Number - opts.First_Line + 1);
(void)POVMSUtil_SetInt(msg, kPOVAttrib_AbsoluteCurrentLine, Current_Line_Number);
(void)POVMSUtil_SetInt(msg, kPOVAttrib_LineCount, opts.Last_Line - opts.First_Line);
if(MosaicPreviewSize > 1)
(void)POVMSUtil_SetInt(msg, kPOVAttrib_MosaicPreviewSize, MosaicPreviewSize);
else
{
if(opts.Options & ANTIALIAS)
(void)POVMSUtil_SetInt(msg, kPOVAttrib_SuperSampleCount, SuperSampleCount);
if(opts.Radiosity_Enabled)
(void)POVMSUtil_SetInt(msg, kPOVAttrib_RadGatherCount, ra_gather_count - RadiosityCount);
}
break;
case kPOVList_Prog_DoneTracing:
break;
case kPOVList_Prog_AbortingRender:
break;
case kPOVList_Prog_UserAbort:
break;
}
return ret;
}
int BuildRenderOptions(POVMSObjectPtr msg)
{
POVMSAttribute attr;
int err = kNoErr;
if(msg == NULL)
return kParamErr;
if(err == kNoErr)
err = POVMSAttr_New(&attr);
if(err == kNoErr)
{
err = POVMSAttr_Set(&attr, kPOVMSType_WildCard, (void *)(&opts.Preview_RefCon), sizeof(unsigned long));
if(err == kNoErr)
err = POVMSObject_Set(msg, &attr, kPOVAttrib_PreviewRefCon);
}
if(err == kNoErr)
err = POVMSUtil_SetInt(msg, kPOVAttrib_Height, Frame.Screen_Height);
if(err == kNoErr)
err = POVMSUtil_SetInt(msg, kPOVAttrib_Width, Frame.Screen_Width);
if(err == kNoErr)
{
if (opts.First_Column == -1)
err = POVMSUtil_SetFloat(msg, kPOVAttrib_StartColumn, opts.First_Column_Percent);
else
err = POVMSUtil_SetFloat(msg, kPOVAttrib_StartColumn, opts.First_Column);
}
if(err == kNoErr)
{
if (opts.Last_Column == -1)
err = POVMSUtil_SetFloat(msg, kPOVAttrib_EndColumn, opts.Last_Column_Percent);
else
err = POVMSUtil_SetFloat(msg, kPOVAttrib_EndColumn, opts.Last_Column);
}
if(err == kNoErr)
{
if (opts.First_Line == -1)
err = POVMSUtil_SetFloat(msg, kPOVAttrib_StartRow, opts.First_Line_Percent);
else
err = POVMSUtil_SetFloat(msg, kPOVAttrib_StartRow, opts.First_Line);
}
if(err == kNoErr)
{
if (opts.Last_Line == -1)
err = POVMSUtil_SetFloat(msg, kPOVAttrib_EndRow, opts.Last_Line_Percent);
else
err = POVMSUtil_SetFloat(msg, kPOVAttrib_EndRow, opts.Last_Line);
}
if(err == kNoErr)
err = POVMSUtil_SetBool(msg, kPOVAttrib_TestAbort, (opts.Options & EXITENABLE) != 0);
if(err == kNoErr)
err = POVMSUtil_SetInt(msg, kPOVAttrib_TestAbortCount, opts.Abort_Test_Counter);
if(err == kNoErr)
err = POVMSUtil_SetBool(msg, kPOVAttrib_ContinueTrace, (opts.Options & CONTINUE_TRACE) != 0);
if(err == kNoErr)
err = POVMSUtil_SetString(msg, kPOVAttrib_CreateIni, opts.Ini_Output_File_Name);
if(err == kNoErr)
err = POVMSUtil_SetFloat(msg, kPOVAttrib_Clock, opts.FrameSeq.Clock_Value);
if(err == kNoErr)
err = POVMSUtil_SetInt(msg, kPOVAttrib_InitialFrame, max(opts.FrameSeq.InitialFrame, 1));
if(err == kNoErr)
err = POVMSUtil_SetInt(msg, kPOVAttrib_FinalFrame, max(opts.FrameSeq.FinalFrame, 1));
if(err == kNoErr)
err = POVMSUtil_SetFloat(msg, kPOVAttrib_InitialClock, opts.FrameSeq.InitialClock);
if(err == kNoErr)
{
if(opts.FrameSeq.FinalFrame <= 1)
err = POVMSUtil_SetFloat(msg, kPOVAttrib_FinalClock, 1.0);
else
err = POVMSUtil_SetFloat(msg, kPOVAttrib_FinalClock, opts.FrameSeq.FinalClock);
}
if(err == kNoErr)
err = POVMSUtil_SetInt(msg, kPOVAttrib_SubsetStartFrame, max(opts.FrameSeq.SubsetStartFrame, 1));
if(err == kNoErr)
err = POVMSUtil_SetInt(msg, kPOVAttrib_SubsetEndFrame, max(opts.FrameSeq.SubsetEndFrame, 1));
if(err == kNoErr)
err = POVMSUtil_SetBool(msg, kPOVAttrib_CyclicAnimation, (opts.Options & CYCLIC_ANIMATION) != 0);
if(err == kNoErr)
err = POVMSUtil_SetBool(msg, kPOVAttrib_FieldRender, opts.FrameSeq.Field_Render_Flag);
if(err == kNoErr)
err = POVMSUtil_SetBool(msg, kPOVAttrib_OddField, opts.FrameSeq.Odd_Field_Flag);
if(err == kNoErr)
err = POVMSUtil_SetBool(msg, kPOVAttrib_PauseWhenDone, (opts.Options & PROMPTEXIT) != 0);
if(err == kNoErr)
err = POVMSUtil_SetBool(msg, kPOVAttrib_Verbose, (opts.Options & VERBOSE) != 0);
if(err == kNoErr)
err = POVMSUtil_SetBool(msg, kPOVAttrib_DrawVistas, (opts.Options & USE_VISTA_DRAW) != 0);
if(err == kNoErr)
err = POVMSUtil_SetBool(msg, kPOVAttrib_Display, (opts.Options & DISPLAY) != 0);
if(err == kNoErr)
err = POVMSUtil_SetInt(msg, kPOVAttrib_VideoMode, opts.DisplayFormat);
if(err == kNoErr)
err = POVMSUtil_SetInt(msg, kPOVAttrib_Palette, opts.PaletteOption);
if(err == kNoErr)
err = POVMSUtil_SetFloat(msg, kPOVAttrib_DisplayGamma, opts.DisplayGamma);
if(err == kNoErr)
err = POVMSUtil_SetInt(msg, kPOVAttrib_PreviewStartSize, opts.PreviewGridSize_Start);
if(err == kNoErr)
err = POVMSUtil_SetInt(msg, kPOVAttrib_PreviewEndSize, opts.PreviewGridSize_End);
if(err == kNoErr)
err = POVMSUtil_SetBool(msg, kPOVAttrib_OutputToFile, (opts.Options & DISKWRITE) != 0);
if(err == kNoErr)
err = POVMSUtil_SetInt(msg, kPOVAttrib_OutputFileType, opts.OutputFormat);
if(err == kNoErr)
err = POVMSUtil_SetInt(msg, kPOVAttrib_Compression, opts.OutputQuality);
if(err == kNoErr)
err = POVMSUtil_SetBool(msg, kPOVAttrib_OutputAlpha, (opts.Options & OUTPUT_ALPHA) != 0);
if(err == kNoErr)
err = POVMSUtil_SetInt(msg, kPOVAttrib_BitsPerColor, opts.OutputQuality);
if(err == kNoErr)
err = POVMSUtil_SetString(msg, kPOVAttrib_OutputFile, opts.Output_File_Name);
if(err == kNoErr)
err = POVMSUtil_SetString(msg, kPOVAttrib_OutputPath, opts.Output_Path);
#if PRECISION_TIMER_AVAILABLE
if(err == kNoErr)
err = POVMSUtil_SetBool(msg, kPOVAttrib_CreateHistogram, opts.histogram_on != 0);
if(err == kNoErr)
err = POVMSUtil_SetInt(msg, kPOVAttrib_HistogramFileType, opts.histogram_type);
if(err == kNoErr)
err = POVMSUtil_SetString(msg, kPOVAttrib_HistogramFile, opts.Histogram_File_Name);
if(err == kNoErr)
err = POVMSUtil_SetInt(msg, kPOVAttrib_HistogramGridSizeX, opts.histogram_x);
if(err == kNoErr)
err = POVMSUtil_SetInt(msg, kPOVAttrib_HistogramGridSizeY, opts.histogram_y);
#endif /* PRECISION_TIMER_AVAILABLE */
if(err == kNoErr)
err = BuildCommand(msg, kPOVAttrib_PreSceneCommand, &opts.Shellouts[PRE_SCENE_SHL]);
if(err == kNoErr)
err = BuildCommand(msg, kPOVAttrib_PreFrameCommand, &opts.Shellouts[PRE_FRAME_SHL]);
if(err == kNoErr)
err = BuildCommand(msg, kPOVAttrib_PostSceneCommand, &opts.Shellouts[POST_SCENE_SHL]);
if(err == kNoErr)
err = BuildCommand(msg, kPOVAttrib_PostFrameCommand, &opts.Shellouts[POST_FRAME_SHL]);
if(err == kNoErr)
err = BuildCommand(msg, kPOVAttrib_UserAbortCommand, &opts.Shellouts[USER_ABORT_SHL]);
if(err == kNoErr)
err = BuildCommand(msg, kPOVAttrib_FatalErrorCommand, &opts.Shellouts[FATAL_SHL]);
if(err == kNoErr)
err = POVMSUtil_SetString(msg, kPOVAttrib_InputFile, opts.Input_File_Name);
if(err == kNoErr)
{
POVMSAttributeList list;
err = POVMSAttrList_New(&list);
if(err == kNoErr)
{
int ii;
for(ii = 0; ii < opts.Library_Path_Index; ii++)
{
err = POVMSAttr_New(&attr);
if(err == kNoErr)
{
err = POVMSAttr_Set(&attr, kPOVMSType_CString, opts.Library_Paths[ii], strlen(opts.Library_Paths[ii]) + 1);
if(err == kNoErr)
err = POVMSAttrList_Append(&list, &attr);
else
err = POVMSAttr_Delete(&attr);
}
}
if(err == kNoErr)
err = POVMSObject_Set(msg, &list, kPOVAttrib_LibraryPath);
}
}
if(err == kNoErr)
{
POVMSFloat f = opts.Language_Version / 100.0;
err = POVMSUtil_SetFloat(msg, kPOVAttrib_Version, f);
}
/* FIXME
if(err == kNoErr)
err = POVMSUtil_SetBool(msg, kPOVAttrib_DebugConsole, Stream_Info[DEBUG_STREAM]->console != NULL);
if(err == kNoErr)
err = POVMSUtil_SetBool(msg, kPOVAttrib_FatalConsole, Stream_Info[FATAL_STREAM]->console != NULL);
if(err == kNoErr)
err = POVMSUtil_SetBool(msg, kPOVAttrib_RenderConsole, Stream_Info[RENDER_STREAM]->console != NULL);
if(err == kNoErr)
err = POVMSUtil_SetBool(msg, kPOVAttrib_StatisticsConsole, Stream_Info[STATISTIC_STREAM]->console != NULL);
if(err == kNoErr)
err = POVMSUtil_SetBool(msg, kPOVAttrib_WarningConsole, Stream_Info[WARNING_STREAM]->console != NULL);
if(err == kNoErr)
err = POVMSUtil_SetBool(msg, kPOVAttrib_AllConsole, Stream_Info[ALL_STREAM]->console != NULL);
if((err == kNoErr) && (Stream_Info[DEBUG_STREAM]->name != NULL))
err = POVMSUtil_SetString(msg, kPOVAttrib_DebugFile, Stream_Info[DEBUG_STREAM]->name);
if((err == kNoErr) && (Stream_Info[FATAL_STREAM]->name != NULL))
err = POVMSUtil_SetString(msg, kPOVAttrib_FatalFile, Stream_Info[FATAL_STREAM]->name);
if((err == kNoErr) && (Stream_Info[RENDER_STREAM]->name != NULL))
err = POVMSUtil_SetString(msg, kPOVAttrib_RenderFile, Stream_Info[RENDER_STREAM]->name);
if((err == kNoErr) && (Stream_Info[STATISTIC_STREAM]->name != NULL))
err = POVMSUtil_SetString(msg, kPOVAttrib_StatisticsFile, Stream_Info[STATISTIC_STREAM]->name);
if((err == kNoErr) && (Stream_Info[WARNING_STREAM]->name != NULL))
err = POVMSUtil_SetString(msg, kPOVAttrib_WarningFile, Stream_Info[WARNING_STREAM]->name);
if((err == kNoErr) && (Stream_Info[ALL_STREAM]->name != NULL))
err = POVMSUtil_SetString(msg, kPOVAttrib_AllFile, Stream_Info[ALL_STREAM]->name);
*/ if(err == kNoErr)
err = POVMSUtil_SetInt(msg, kPOVAttrib_Quality, opts.Quality);
if(err == kNoErr)
err = POVMSUtil_SetBool(msg, kPOVAttrib_Bounding, opts.Use_Slabs);
if(err == kNoErr)
err = POVMSUtil_SetInt(msg, kPOVAttrib_BoundingThreshold, opts.BBox_Threshold);
if(err == kNoErr)
err = POVMSUtil_SetBool(msg, kPOVAttrib_LightBuffer, (opts.Options & USE_LIGHT_BUFFER) != 0);
if(err == kNoErr)
err = POVMSUtil_SetBool(msg, kPOVAttrib_VistaBuffer, (opts.Options & USE_VISTA_BUFFER) != 0);
if(err == kNoErr)
err = POVMSUtil_SetBool(msg, kPOVAttrib_RemoveBounds, (opts.Options & REMOVE_BOUNDS) != 0);
if(err == kNoErr)
err = POVMSUtil_SetBool(msg, kPOVAttrib_SplitUnions, (opts.Options & SPLIT_UNION) != 0);
if(err == kNoErr)
err = POVMSUtil_SetBool(msg, kPOVAttrib_Antialias, (opts.Options & ANTIALIAS) != 0);
if(err == kNoErr)
err = POVMSUtil_SetInt(msg, kPOVAttrib_SamplingMethod, opts.Tracing_Method);
if(err == kNoErr)
err = POVMSUtil_SetFloat(msg, kPOVAttrib_AntialiasThreshold, opts.Antialias_Threshold);
if(err == kNoErr)
err = POVMSUtil_SetInt(msg, kPOVAttrib_AntialiasDepth, opts.AntialiasDepth);
if(err == kNoErr)
err = POVMSUtil_SetBool(msg, kPOVAttrib_Jitter, (opts.Options & JITTER) != 0);
if(err == kNoErr)
err = POVMSUtil_SetFloat(msg, kPOVAttrib_JitterAmount, opts.JitterScale);
if(err == kNoErr)
err = POVMSUtil_SetString(msg, kPOVAttrib_IncludeHeader, opts.Header_File_Name);
return err;
}
int ProcessRenderOptions::ReadSpecialOptionHandler(INI_Parser_Table *option, char *param, POVMSObjectPtr obj)
{
POVMSAttributeList list;
double floatval = 0.0;
int intval = 0;
int intval2 = 0;
int err = kNoErr;
switch(option->key)
{
case kPOVAttrib_HistogramGridSizeX:
if(sscanf(param, "%d.%d", &intval, &intval2) == 2)
{
err = POVMSUtil_SetInt(obj, kPOVAttrib_HistogramGridSizeX, intval);
if(err == kNoErr)
err = POVMSUtil_SetInt(obj, kPOVAttrib_HistogramGridSizeY, intval2);
}
else
{
ParseError("Invalid histogram grid size '%s'.", param);
err = kParseErr;
}
break;
case kPOVAttrib_Palette:
case kPOVAttrib_VideoMode:
while(isspace(*param))
param++;
err = POVMSUtil_SetInt(obj, option->key, tolower(*param));
break;
case kPOVAttrib_HistogramFileType:
case kPOVAttrib_OutputFileType:
while(isspace(*param))
param++;
if(strchr(Output_File_Types, *param) == NULL)
ParseError("Unrecognized output file format %c.", *param);
err = POVMSUtil_SetInt(obj, option->key, tolower(*param));
break;
case kPOVAttrib_IncludeIni:
case kPOVAttrib_LibraryPath:
POVMSAttribute attr;
if(err == kNoErr)
{
// parse INI file (recursive)
if(option->key == kPOVAttrib_IncludeIni)
err = ParseFile(param, obj);
// create list if it isn't there
if(err == kNoErr)
{
if(POVMSObject_Exist(obj, option->key) == kFalseErr)
err = POVMSAttrList_New(&list);
else if(POVMSObject_Exist(obj, option->key) != kNoErr)
err = kObjectAccessErr;
else
err = POVMSObject_Get(obj, &list, option->key);
}
}
else
{
ParseError("File name or path parameter expected for option '%s', found '%s'.", option->keyword, param);
err = kParseErr;
}
// add path or file to list
if(err == kNoErr)
err = POVMSAttr_New(&attr);
if(err == kNoErr)
{
err = POVMSAttr_Set(&attr, kPOVMSType_CString, (void *)param, strlen(param) + 1);
if(err == kNoErr)
err = POVMSAttrList_Append(&list, &attr);
else
err = POVMSAttr_Delete(&attr);
}
if(err == kNoErr)
err = POVMSObject_Set(obj, &list, option->key);
break;
case kPOVAttrib_Declare:
POVMSObject decobj;
// create list if it isn't there
if(POVMSObject_Exist(obj, option->key) == kFalseErr)
err = POVMSAttrList_New(&list);
else if(POVMSObject_Exist(obj, option->key) != kNoErr)
err = kObjectAccessErr;
else
err = POVMSObject_Get(obj, &list, option->key);
// add value to list
if(err == kNoErr)
err = POVMSObject_New(&decobj, kPOVMSType_WildCard);
if(err == kNoErr)
{
char *ptr = NULL;
err = POVMSUtil_SetString(&decobj, kPOVAttrib_Identifier, strtok(param, "="));
if(err == kNoErr)
{
ptr = strtok(NULL, "");
if(ptr == NULL)
err = kParseErr;
}
if(err == kNoErr)
{
if(strchr(ptr, '"') != NULL)
{
ptr = strchr(ptr, '"') + 1;
strtok(ptr, "\"");
err = POVMSUtil_SetString(&decobj, kPOVAttrib_Value, ptr);
}
else
err = POVMSUtil_SetFloat(&decobj, kPOVAttrib_Value, atof(ptr));
}
if(err == kNoErr)
err = POVMSAttrList_Append(&list, &decobj);
else
err = POVMSObject_Delete(&decobj);
}
if(err == kNoErr)
err = POVMSObject_Set(obj, &list, option->key);
break;
case kPOVAttrib_FatalErrorCommand:
case kPOVAttrib_PostFrameCommand:
case kPOVAttrib_PostSceneCommand:
case kPOVAttrib_PreFrameCommand:
case kPOVAttrib_PreSceneCommand:
case kPOVAttrib_UserAbortCommand:
POVMSObject cmdobj;
if(POVMSObject_Exist(obj, option->key) == kNoErr)
err = POVMSObject_Get(obj, &cmdobj, option->key);
else
err = POVMSObject_New(&cmdobj, kPOVMSType_WildCard);
if(toupper(*(option->keyword + strlen(option->keyword) - 1)) == 'D')
{
if(err == kNoErr)
err = POVMSUtil_SetString(&cmdobj, kPOVAttrib_CommandString, param);
}
else
{
if(err == kNoErr)
{
int i = 0;
if((*param == '-') || (*param == '!'))
i = tolower(*(param + 1));
else
i = tolower(*param);
err = POVMSUtil_SetInt(&cmdobj, kPOVAttrib_ReturnAction, i);
}
}
if(err == kNoErr)
err = POVMSObject_Set(obj, &cmdobj, option->key);
break;
}
return err;
}