clear_comments.c

Go to the documentation of this file.

/* src/clear_comments.c
 *
 * Copyright (C) 2011-2018 Dongdong Li
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundataion; either version 3 of the License, or (at
 * your option) any later version.
 *
 * This program is distributed in the hope that it will be useful, but
 * WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABLITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
 * General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
 */

#define STRING_LENGTH   1024

extern bool clear_comments (char *input, char *temp);

/* implementation of the clear_comments() function */
extern bool clear_comments (char *input, char *temp)
{
  if (input == NULL || temp == NULL)
    {
      printf ("clear_comments.c: clear_comments () the input ");
      printf ("database filename or temporary file name is null.\n");

      return false;
    }
  /* define file points for the input database and temporary file */
  FILE *input_fp, *temp_fp;

  /* alloc memory for temp_line and initialize memory */
  char *temp_line = (char*)malloc(STRING_LENGTH*sizeof(char));
  memset(temp_line, 0, STRING_LENGTH);

  /* open input file and check errors */
  if ((input_fp = fopen (input, "r")) == NULL)
    {
      printf ("clear_comments.c: clear_comments () open database file error.\n");
      return false;
    }
  else
    {
      /* open temp file and check errors */
      if ((temp_fp = fopen (temp, "w")) == NULL)
    {
      printf ("clear_comments.c: clear_comments () open temporary file error.\n");
      return false;
    }
      else
    {
      while (fgets (temp_line, STRING_LENGTH, input_fp) != NULL)
        {
          int i = 0, j = 0;

          /* erase all lines including symbol '#' and all blank lines */
          while (temp_line[i] != '\n')
        {
          if (temp_line[i] == '#') {j++;}
          i++;
        }

          if (j == 0 && strlen(temp_line) != 1)
        {
          fprintf (temp_fp, "%s", temp_line);
        }
        }

      /* close input and temp file */
      fclose (input_fp);
      fclose (temp_fp);
    }
    }

  return true;
}