ToolkitOptions.h File Reference

Go to the source code of this file.

Data Structures
class	ToolkitOptions

Functions
char *	TokenValue (char *tokenlist, const char *target)

Function Documentation

TokenValue()

char* TokenValue	(	char *	tokenlist,
		const char *	target
	)

Definition at line 41 of file ToolkitOptions.cpp.

                                                    { /*{{{*/
 
   /*output:*/
   char* value=NULL;
 
   /*intermediary: */
   char *token         = NULL;
   char *tokenlistcopy = NULL;
 
   /*First, because tokenizing destroys a string, copy what we have: */
   if(tokenlist==NULL) _error_("tokenlist not set (may be a mex?)");
   tokenlistcopy= xNew<char>(strlen(tokenlist)+1); 
   sprintf(tokenlistcopy,"%s",tokenlist);
 
   /*Now go through list of tokens, and look for  target, return value: */
   token=strtok(tokenlistcopy, " ");
   while(token != NULL) {
 
      /*Is this token starting with "-", if so, compare to our target: */
      if (strncmp(token,"-",1)==0){
         if (strcmp(token+1,target)==0){
            /*Ok, we found our target. Get next token: */
            token = strtok(NULL, " ");
            /*This token could actually be another option start with "-", just be sure: */
            if (strncmp(token,"-",1)==0){
               /*ok, we hit another option, which means our target value is "":*/
               value= xNew<char>(strlen("")+1); 
               sprintf(value,"%s","");
               continue;
            }
            else{
               /*this token is the value we are looking for, copy: */
               value= xNew<char>(strlen(token)+1); 
               sprintf(value,"%s",token);
            }
         }
         else{
            /*we found the wrong target. Go to the next option: */
            token = strtok(NULL, " ");
            if (strncmp(token,"-",1)==0){
               /*this is indeed an option, continue: */
               continue;
            }
            else{
               /*this is the value of the option, discard it: */
            }
         }
      }
      else _error_("token list should start with an option, not a value");
 
      /*Get new token and continue*/
      token = strtok(NULL, " ");
   }
 
   /*Clean up and return*/
   xDelete<char>(tokenlistcopy);
   return value;
}