예제 #1
0
파일: macro_test.c 프로젝트: jbl5088/psu
int main(void)
{
  macro_list_print();
  macro_set("A", "a");
  macro_set("B", "bb");
  macro_set("C", "ccc");
  macro_list_print();

  macro_set("B", "dddd");
  macro_list_print();

  macro_set("A", "eeeee");
  macro_list_print();


  printf("%s = '%s' (%d)\n", "A", macro_body("A"), macro_length("A"));
  printf("%s = '%s' (%d)\n", "B", macro_body("B"), macro_length("B"));
  printf("%s = '%s' (%d)\n", "C", macro_body("C"), macro_length("C"));
  printf("%s = '%s' (%d)\n", "D", macro_body("D"), macro_length("D"));


  char in[4096] = "test.${A}.${B}.${C}.${D}.";
  char out[4096];
  printf("len %d\n", macro_expand_length(in));
  macro_expand(in, out);
  printf("%zd %s\n", strlen(in), in);
  printf("%zd %s\n", strlen(out), out);
  printf("len %d\n", macro_expand_length(in));

  macro_set("A", "${B}");
  macro_list_print();
  printf("len %d\n", macro_expand_length(in));
  macro_expand(in, out);
  printf("%zd %s\n", strlen(in), in);
  printf("%zd %s\n", strlen(out), out);
  
  printf("len %d\n", macro_expand_length(in));

  macro_set("A", "body");
  macro_set("B", "body body");
  macro_set("C", "body body body");
  macro_set("D", "enough already!");
  macro_list_print();
  printf("len %d\n", macro_expand_length(in));
  macro_expand(in, out);
  printf("%zd %s\n", strlen(in), in);
  printf("%zd %s\n", strlen(out), out);
  printf("len %d\n", macro_expand_length(in));

  return 0;
}
예제 #2
0
파일: cli.c 프로젝트: mharlan/embedded-labs
static void cli_command_switch(char *args)
{
	char *token;
	int value;

	cli_strip_spaces(&args);

	token = args;
	if(cli_strip_decimal_number(&args)) {
		uart_printf("1 Incorrect format, switch [n] [\"text\"]\n");
		return;
	}
	value = atoi(token);

	if(value < 0 || value >= MACRO_MAX) {
		uart_printf("2 Incorrect format, switch [n] [\"text\"]\n");
		return;
	}

	++args;
	cli_strip_spaces(&args);

	token = args;
	if(cli_strip_quotes(&args)) {
		uart_printf("3 Incorrect format, switch [n] [\"text\"]\n");
		return;
	}

	macro_set(value, ++token);
}
예제 #3
0
파일: hake.c 프로젝트: bgold09/psu_cmpsc
static void read_lines(char *filename, FILE *fp)
{
  verify(filename != NULL, "null arg filename");
  verify(filename[0] != '\0', "empty arg filename");
  verify(fp != NULL, "null arg fp");

  if (verbose > 0)
    { fprintf(stderr, "%s: read_lines(%s)\n", prog, filename); }

  char original[MAXLINE+2];	// from fgets()
  char expanded[MAXLINE+2];	// after macro expansion
  char buffer[MAXLINE+2];	// working copy, safe to modify

  char whsp[] = " \t\n\v\f\r";			// whitespace characters
  int line_number = 0;
  int recipe_line_number = 0;

  while (fgets(original, MAXLINE, fp) != NULL) {
    // it is possible that the input line was too long, so terminate the string cleanly
    original[MAXLINE] = '\n';
    original[MAXLINE+1] = '\0';

    line_number++;
    if (verbose > 0) printf("%s: %s: line %d: %s", prog, filename, line_number, original);

    // assume original[] is constructed properly
    // assume expanded[] is large enough
    macro_expand(original, expanded);
    if (verbose > 0) printf("%s: %s: line %d: %s", prog, filename, line_number, expanded);

    strcpy(buffer, expanded);			// copy, safe to modify

    char *buf = buffer;

    while (*buf == ' ') buf++;			// skip past leading spaces (not tabs!)

    char *p_hash = strchr(buf, '#');		// a comment starts with #
    if (p_hash != NULL)
      { *p_hash = '\0'; }			// remove the comment

    int n = 0;					// remove trailing whitespace
    while (buf[n] != '\0')
      {
        int n1 = strspn(&buf[n], whsp);		// buf[n .. n+n1-1] is whitespace
        int n2 = strcspn(&buf[n + n1], whsp);	// buf[n+n1 .. n+n1+n2-1] is not
        if (n2 == 0) { buf[n] = '\0'; break; }	// remove trailing whitespace
        n += n1 + n2;
      }

    if (buf[0] == '\0')				// nothing left?
      { continue; }

    char *p_colon = strchr(buf, ':');		// : indicates a target-prerequisite line
    char *p_equal = strchr(buf, '=');		// = indicates a macro definition

    if (buffer[0] == '\t')
      {
	recipe_line_number++;
        if (verbose > 0) printf("  >>> recipe line %d\n", recipe_line_number);
	// (save this for a later project)
      }
    else if (p_colon != NULL)
      {
	recipe_line_number = 0;
        if (verbose > 0) printf("  >>> target-prerequisite\n");
	// (save this for a later project)
      }
    else if (p_equal != NULL)
      {
        if (verbose > 0) printf("  >>> macro definition\n");
	// name = body
	// *p_equal is '='
        char *name_start = buf;
	while (*name_start == ' ' || *name_start == '\t')	// skip past spaces and tabs
	  { name_start++; }
        char *name_end = p_equal-1;
	while (*name_end == ' ' || *name_end == '\t')
	  { name_end--; }
	name_end++;
	*name_end = '\0';
        char *body_start = p_equal+1;
	while (*body_start == ' ' || *body_start == '\t')
	  { body_start++; }
        char *body_end = body_start;
	while (*body_end != '\0')	// end of string
	  { body_end++; }
	while (*body_end == ' ' || *body_end == '\t')
	  { body_end--; }
	body_end++;
	*body_end = '\0';
	if (verbose > 1) macro_list_print();
	macro_set(name_start, body_start);
	if (verbose > 1) macro_list_print();
      }
    else if (strncmp("include", buf, 7) == 0)
      {
        if (verbose > 0) printf("  >>> include\n");
	char *name_start = buf + 7;				// skip past "include"
	while (*name_start == ' ' || *name_start == '\t')	// skip past spaces and tabs
	  { name_start++; }
	if (*name_start == '\0')
	  {
	    // following GNU Make, this is not an error
	    if (verbose > 0) fprintf(stderr, "%s: %s: line %d: include but no filename\n", prog, filename, line_number);
	    continue;
	  }
	else if (*name_start == '\'' || *name_start == '"')		// quoted filename
	  {
	    // find matching quote, remove it
	    char *q = name_start + 1;				// skip past ' or "
	    while (*q != *name_start && *q != '\0') q++;	// find end of string or line
	    if (*q == '\0')
	      {
		fprintf(stderr, "%s: %s: line %d: file name error: >>>%s<<<\n", prog, filename, line_number, name_start);
		continue;
	      }
	    name_start++;	// skip past opening quote
	    *q = '\0';		// remove closing quote
	  }
        read_file(name_start, 0);
      }
    else
      {
        if (verbose > 0) printf("  >>> something else\n");
	fprintf(stderr, "%s: %s: line %d: not recognized: %s", prog, filename, line_number, original);
      }
  }

  if (ferror(fp))	// error when reading the file
    { fprintf(stderr, "%s: %s: read error: %s\n", prog, filename, strerror(errno)); }

  return;
}
예제 #4
0
파일: pr8.4.c 프로젝트: jbl5088/psu
static void read_lines(char *filename, FILE *fp)
{
   verify(filename != NULL, "null arg filename");
   verify(filename[0] != '\0', "empty arg filename");
   verify(fp != NULL, "null arg fp");

   fprintf(stderr, "%s: read_lines(%s)\n", prog, filename); 

   char original[MAXLINE+2];	// from fgets()
   char expanded[MAXLINE+2];	// after macro expansion
   char buffer[MAXLINE+2];	   // working copy, safe to modify

   char whsp[] = " \t\n\v\f\r";			// whitespace characters
   int line_number = 0;
   int recipe_line_number = 0;

   while (fgets(original, MAXLINE, fp) != NULL) {
       // it is possible that the input line was too long, so terminate the string cleanly
       original[MAXLINE] = '\n';
       original[MAXLINE+1] = '\0';

       line_number++;
     //printf("%s: %s: line %d: %s", prog, filename, line_number, original);

       // assume original[] is constructed properly
       // assume expanded[] is large enough
       macro_expand(original, expanded);
       printf("%s: %s: line %d: %s", prog, filename, line_number, expanded);

       strcpy(buffer, expanded);			// copy, safe to modify

       char *buf = buffer;

       while (*buf == ' ') buf++;			// skip past leading spaces (not tabs!)

       char *p_hash = strchr(buf, '#');		// a comment starts with #
    
       if (p_hash != NULL) {
           *p_hash = '\0'; 
       }			// remove the comment

       int n = 0;					// remove trailing whitespace
       while (buf[n] != '\0'){
           int n1 = strspn(&buf[n], whsp);		// buf[n .. n+n1-1] is whitespace
           int n2 = strcspn(&buf[n + n1], whsp);	// buf[n+n1 .. n+n1+n2-1] is not
           if (n2 == 0) {
                buf[n] = '\0'; break; }	// remove trailing whitespace
           n += n1 + n2;
      }

		if (buf[0] == '\0')	{			// nothing left?
		    continue; 
		}

		char *p_colon = strchr(buf, ':');		// : indicates a target-prerequisite line
		char *p_equal = strchr(buf, '=');		// = indicates a macro definition
		 
// ---------------------------Recipes---------------------------------------------------------
	       	
       if (buffer[0] == '\t') {
		     recipe_line_number++;
		     //printf("  >>> recipe line %d\n", recipe_line_number);
		    
           // the target that is before the recipe
           struct target *myTarget = tg_list.head;
           
           if ( myTarget != NULL) { 	 
               myTarget->rp_list.head = NULL;
               myTarget->rp_list.tail = NULL;
               
               // (save this for a later project)
		         char *recipe = Malloc(128*sizeof(char *));
		         int i = 1;
		         
		         for(; buffer[i] != '\0'; i++) {
		             recipe[i-1] = buffer[i];
		         }
		         recipe[i] = '\0';
		         list_recipes_append(&(myTarget->rp_list), recipe);
           }    
           
		}
		   
// --------------------------------Targets--------------------------------------------------------
		
		else if (p_colon != NULL) {
		    recipe_line_number = 0;
		   // printf("  >>> target-prerequisite\n");
	
		    // (save this for a later project)
		    char *target = Malloc(128 * sizeof(char *));
		    int i = 0;
		    //printf("%s\n",buffer);
	
		    // store target to the list
		    while(buffer[i] != ':' && buffer[i] != ' ') {
		        target[i] = buffer[i];
		        i++;
		    } 
			   
		    target[i] = '\0';
		    list_targets_append(&tg_list, target);

		    struct target *myTarget = target_lookup(tg_list, target);
		    		    
	// --------------------------------Sources------------------------------------------------------				
		    //struct list_sources sc_list = *(myTarget->sc_list);
		    
		    myTarget->sc_list.head = NULL;
          myTarget->sc_list.tail = NULL; 
		    		    
		    // store source to the list
		    // skip all the spaces and ':', and go to the first source
		    while(buffer[i] == ' ' || buffer[i] == ':' ) {
		        i++;
		    }	
			 
		    // store sources to the list
		    while(buffer[i] != '\0') {                 // not terminate until the end of line
			     if( isalpha(buffer[i]) ) {
		            char* source = Malloc(128*sizeof(char));
		            assert(source != NULL);
		            int j=0;
		     
		            while( isalpha(buffer[i]) ) {
		                source[j] = buffer[i];
		               // printf("source: %s\n", source);
		                j++;
		                i++;
		            }
		            list_sources_append(&(myTarget->sc_list), source);
			     }
		        else {	// skip one whitespace 
		            i++;
		        }
		    }
		}    
		   
	// --------------------------------Macros-----------------------------------------------------
		else if (p_equal != NULL){
		   // printf("  >>> macro definition\n");
	
		    // name = body
		    // *p_equal is '='
		    char *name_start = buf;
	
		    while (*name_start == ' ' || *name_start == '\t')	// skip past spaces and tabs
		    { name_start++; }
		    
		    char *name_end = p_equal-1;
	
		    while (*name_end == ' ' || *name_end == '\t') 
		    { name_end--; }
	
		    name_end++;
		    *name_end = '\0';
		    char *body_start = p_equal+1;
	
		    while (*body_start == ' ' || *body_start == '\t')
		     { body_start++; }
		     
		    char *body_end = body_start;
	
		    while (*body_end != '\0')	// end of string
		     { body_end++; }
	
		    while (*body_end == ' ' || *body_end == '\t')
		     { body_end--; }
			 body_end++;
			 *body_end = '\0';
			 macro_list_print();
		    macro_set(name_start, body_start);
			 macro_list_print();
		}
		else if (strncmp("include", buf, 7) == 0) {
		   // printf("  >>> include\n");
		    char *name_start = buf + 7;				// skip past "include"
		    while (*name_start == ' ' || *name_start == '\t') {	// skip past spaces and tabs
		        name_start++; 
		    }
	
		    if (*name_start == '\0') {
			 // following GNU Make, this is not an error
			   //  fprintf(stderr, "%s: %s: line %d: include but no filename\n", prog, filename, line_number);
			     continue;
		    }
		    else if (*name_start == '\'' || *name_start == '"'){		// quoted filename
		        // find matching quote, remove it
			     char *q = name_start + 1;				        // skip past ' or "
			     while (*q != *name_start && *q != '\0') { 
		            q++;	// find end of string or line
		        }
			     if (*q == '\0') {
		            fprintf(stderr, "%s: %s: line %d: file name error: >>>%s<<<\n", 
		                  prog, filename, line_number, name_start);
		            continue;
		        }
		        name_start++;	// skip past opening quote
		        *q = '\0';		// remove closing quote
		    }
		    
		    read_file(name_start, 0);
		}
		else {
		    printf("  >>> something else\n");
		    fprintf(stderr, "%s: %s: line %d: not recognized: %s", prog, filename, line_number, original);
		}
   }

   if (ferror(fp)) {	// error when reading the file
       fprintf(stderr, "%s: %s: read error: %s\n", prog, filename, strerror(errno)); 
   }

   return;
}
예제 #5
0
파일: pr8.c 프로젝트: njb5174/Hake
static void read_lines(char *filename, FILE *fp)
{
  

 // if (verbose > 0)
   // { fprintf(stderr, "%s: read_lines(%s)\n", prog, filename); }

  char original[MAXLINE+2];	// from fgets()
  char expanded[MAXLINE+2];	// after macro expansion
  char buffer[MAXLINE+2];	// working copy, safe to modify

  char whsp[] = " \t\n\v\f\r";			// whitespace characters
  int line_number = 0;
  int recipe_line_number = 0;

  bool have_target = false;			// recipes must follow targets

  while (fgets(original, MAXLINE, fp) != NULL) {
    // it is possible that the input line was too long, so terminate the string cleanly
    original[MAXLINE] = '\n';
    original[MAXLINE+1] = '\0';

    line_number++;
   if (verbose > 0) printf("%s: %s: line %d: %s\n", "prog", filename, line_number, original);

    // assume original[] is constructed properly
    // assume expanded[] is large enough
    macro_expand(original, expanded);
   if (verbose > 0) printf("%s: %s: line %d: %s\n", "prog", filename, line_number, expanded);

    strcpy(buffer, expanded);			// copy, safe to modify

    char *buf = buffer;

    while (*buf == ' ') buf++;			// skip past leading spaces (not tabs!)

    char *p_hash = strchr(buf, '#');		// a comment starts with #
    if (p_hash != NULL)
      { *p_hash = '\0'; }			// remove the comment

    int n = 0;					// remove trailing whitespace
    while (buf[n] != '\0')
      {
        int n1 = strspn(&buf[n], whsp);		// buf[n .. n+n1-1] is whitespace
        int n2 = strcspn(&buf[n + n1], whsp);	// buf[n+n1 .. n+n1+n2-1] is not
        if (n2 == 0) { buf[n] = '\0'; break; }	// remove trailing whitespace
        n += n1 + n2;
      }

    if (buf[0] == '\0')				// nothing left?
      { continue; }

    char *p_colon = strchr(buf, ':');		// : indicates a target-prerequisite line
    char *p_equal = strchr(buf, '=');		// = indicates a macro definition

    if (buffer[0] == '\t')
      {
		recipe_line_number++;
			if (verbose > 0) printf("  diagnosis: recipe line %d\n", recipe_line_number);
		if (have_target == false)
		  {
			fprintf(stderr, "%s: %s: line %d: recipe but no target\n", prog, filename, line_number);
			continue;
		  }

		int count = 0;
				while(*(buffer+1+count) != '\0')
				{
					count++;
				}
				
			char *recipe_temp = malloc((count+1)*sizeof(char));
			set_chars(recipe_temp, buffer+1);
				
		struct target* temp_update_target = find_target(first_related_target);
		for(int i = 0; i < target_length; i++)			
		{
				temp_update_target->target_recipes = add_recipe(temp_update_target->target_recipes, recipe_temp);
				if(target_length > 1)
					temp_update_target = temp_update_target->next;
		}
		

		
		
		
      }
    else if (p_colon != NULL)
      {
     	 first_related_target = NULL;
		target_length = 0;
	recipe_line_number = 0;
        if (verbose > 0) printf("  diagnosis: target-prerequisite\n");
	have_target = true;
	
	char *source_start = p_colon+1;
	
	while(*source_start == ' ')
	{	
		source_start++;
	}
	
	char *source_end = source_start;
	
	struct source *source_head = malloc(sizeof(struct source));
		
	if(source_head == NULL)
	{
		printf("Malloc failed to allocate space for a source_head in the main program\n");
		return;
	}
	
	if(*source_end == '\n' || *source_end == '\0' || *source_end == '\r')
	{
		source_head = add_source(source_head, "");
	}
	
	while(*source_end != '\n' && *source_end != '\0' && *source_end != '\r')
	{
		if(*source_end == ' ' || *source_end == '\0')
		{
			
			*source_end = '\0';
			
			int count = 0;
				while(*(source_start+count) != '\0')
				{
					count++;
				}
				
			char *source_temp = malloc((count+1)*sizeof(char));
			set_chars(source_temp, source_start);
			source_head = add_source(source_head, source_temp);
			
			source_start = source_end+1;
		}
		
		if(*(source_end+1) == '\0')
		{
			int count = 0;
				while(*(source_start+count) != '\0')
				{
					count++;
				}
				
			char *source_temp = malloc((count+1)*sizeof(char));
			set_chars(source_temp, source_start);
			source_head = add_source(source_head, source_temp);
			
		}
		
		source_end++;

	}

	char *tar_start = buf;
	while(*tar_start == ' ')
	{
		tar_start++;
	}
	
	char *tar_end = tar_start;
	
	
	while(*tar_end != ':' && *tar_end != '\0')
	{	
		if(*tar_end == ' ' || *tar_end == '\t')
		{		

			*tar_end = '\0';
			if(default_goal == NULL)
			{
				int count = 0;
				while(*(tar_start+count) != '\0')
				{
					count++;
				}
				
				default_goal = malloc((count+1)*sizeof(char));
				set_chars(default_goal, tar_start);
			}
			
			struct recipe* super_temp = malloc(sizeof(struct recipe));
			super_temp->line = "replaceme";
			
			char* temp = malloc(30 * sizeof(char));
			set_chars(temp, tar_start);
			
			add_target(temp, source_head, super_temp);

			
			if(first_related_target == NULL)
			{
				int count = 0;
				while(*(tar_start+count) != '\0')
				{
					count++;
				}
				
				first_related_target = malloc((count+1)*sizeof(char));
				if (first_related_target == NULL)
				{
					printf("malloc failed\n");
				}
				
				for(int i = 0; i < count+2; i++)
				{
					*(first_related_target+i) = *(tar_start+i);
				}
				
			}
			
			target_length++;
			tar_start = (tar_end+1);
		}
		
		if(*(tar_end+1) == ':' )
		{
			if(*(tar_end) != ' ')
			{
				int count = 0;
					while(*(tar_start+count) != ':')
					{
						count++;
					}
					
				*(tar_end+1) = '\0';
					
				char *tar_temp = malloc((count+1)*sizeof(char));
				set_chars(tar_temp, tar_start);
				struct recipe* super_temp = malloc(sizeof(struct recipe));
				super_temp->line = "replaceme";
				
				
				add_target(tar_temp, source_head, super_temp);
				
				if(first_related_target == NULL)
			{
				int count = 0;
				while(*(tar_start+count) != '\0')
				{
					count++;
				}
				
				first_related_target = malloc((count+1)*sizeof(char));
				if (first_related_target == NULL)
				{
					printf("malloc failed\n");
				}
				
				set_chars(first_related_target, tar_start);
				
			}
			}
			
		}
		
		tar_end++;

	}	
		
	
	}
	
    else if (p_equal != NULL)
      {
      	first_related_target = NULL;
		target_length = 0;
		
        if (verbose > 0) printf("  diagnosis: macro definition\n");
	have_target = false;
        // name = body
        // *p_equal is '='
        char *name_start = buf;
        while (*name_start == ' ' || *name_start == '\t')       // skip past spaces and tabs
          { name_start++; }
        char *name_end = p_equal-1;
        while (*name_end == ' ' || *name_end == '\t')
          { name_end--; }
        name_end++;
        *name_end = '\0';
        char *body_start = p_equal+1;
        while (*body_start == ' ' || *body_start == '\t')
          { body_start++; }
        char *body_end = body_start;
        while (*body_end != '\0')       // end of string
          { body_end++; }
        while (*body_end == ' ' || *body_end == '\t')
          { body_end--; }
        body_end++;
        *body_end = '\0';
        if (verbose > 1) macro_list_print();
        macro_set(name_start, body_start);
        if (verbose > 1) macro_list_print();
      }
    else if (strncmp("include", buf, 7) == 0)
      {
      	first_related_target = NULL;
		target_length = 0;
        if (verbose > 0) printf("  diagnosis: include\n");
	have_target = false;
	char *name_start = buf + 7;				// skip past "include"
	while (*name_start == ' ' || *name_start == '\t')	// skip past spaces and tabs
	  { name_start++; }
	if (*name_start == '\0')
	  {
	    // following GNU Make, this is not an error
	    if (verbose > 0) fprintf(stderr, "%s: %s: line %d: include but no filename\n", prog, filename, line_number);
	    continue;
	  }
	else if (*name_start == '\'' || *name_start == '"')		// quoted filename
	  {
	    // find matching quote, remove it
	    char *q = name_start + 1;				// skip past ' or "
	    while (*q != *name_start && *q != '\0') q++;	// find end of string or line
	    if (*q == '\0')
	      {
		fprintf(stderr, "%s: %s: line %d: file name error [%s]\n", prog, filename, line_number, name_start);
		continue;
	      }
	    name_start++;	// skip past opening quote
	    *q = '\0';		// remove closing quote
	  }
        pr8_read(name_start);
      }
    else
      {
        if (verbose > 0) printf("  diagnosis: something else\n");
	have_target = false;
//	fprintf(stderr, "%s: %s: line %d: not recognized: %s", prog, filename, line_number, original);
      }
  }

//  if (ferror(fp))	// error when reading the file
  //  { fprintf(stderr, "%s: %s: read error: %s\n", prog, filename, strerror(errno)); }

  return;
}