sergiotarxz/nuttx
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity
a743fed63d
nuttx/tools/convert-comments.c

411 lines
11 KiB
C
Raw Blame History

/****************************************************************************
* tools/convert-comments.c
*
* Licensed to the Apache Software Foundation (ASF) under one or more
* contributor license agreements. See the NOTICE file distributed with
* this work for additional information regarding copyright ownership. The
* ASF licenses this file to you under the Apache License, Version 2.0 (the
* "License"); you may not use this file except in compliance with the
* License. You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
* WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. See the
* License for the specific language governing permissions and limitations
* under the License.
*
****************************************************************************/
/****************************************************************************
* Included Files
****************************************************************************/
#include <stdbool.h>
#include <stdio.h>
#include <string.h>
#include <ctype.h>
/****************************************************************************
* Preprocessor Definitions
****************************************************************************/
#define LINESIZE 1024 /* Big so that we don't have to bother with range checks */
/****************************************************************************
* Private Data
****************************************************************************/
static char g_linea[LINESIZE + 3];
static char g_lineb[LINESIZE + 3];
static char g_iobuffer[LINESIZE];
/****************************************************************************
* Public Functions
****************************************************************************/
int main(int argc, char **argv)
{
char *g_line0;
char *g_line1;
char *ptr;
char *tmpptr;
FILE *instream;
FILE *outstream;
unsigned long lineno = 0;
unsigned int indent;
unsigned int lastindent;
unsigned int nextindent;
unsigned int tmpindent;
bool iscomment;
bool wascomment;
bool willbecomment;
bool isblank;
bool wasblank;
bool willbeblank;
bool willbevalid;
int ret = 1;
if (argc != 3)
{
fprintf(stderr, "ERROR: Two arguments expected\n");
return 1;
}
/* Open the source file read-only */
instream = fopen(argv[1], "r");
if (instream == NULL)
{
fprintf(stderr, "ERROR: Failed to open %s for reading\n", argv[1]);
return 1;
}
/* Open the destination file write-only */
outstream = fopen(argv[2], "w");
if (outstream == NULL)
{
fprintf(stderr, "ERROR: Failed to open %s for reading\n", argv[2]);
goto errout_with_instream;
}
/* Prime the pump */
g_line0 = g_linea;
g_line1 = g_lineb;
wasblank = true;
wascomment = false;
lastindent = 0;
/* Read line n + 1 (for n = 0) */
if (fgets(g_line1, LINESIZE, instream) == NULL)
{
fprintf(stderr, "ERROR: File is empty\n");
goto errout_with_outstream;
}
/* Skip over leading spaces in line n + 1 */
for (ptr = g_line1, nextindent = 0;
*ptr != '\0' && *ptr != '\n' && isspace(*ptr);
ptr++, nextindent++)
{
}
/* Check for a blank line */
if (*ptr == '\0' || *ptr == '\n')
{
ptr = g_line1;
ptr[0] = '\n';
ptr[1] = '\0';
willbeblank = true;
willbecomment = false;
nextindent = 0;
}
else
{
/* Check for a C++ style comment at this indentation in line n + 1 */
willbeblank = false;
willbecomment = strncmp(ptr, "//", 2) == 0;
}
/* Loop for each line in the file */
do
{
/* Swap line n and line n + 1 */
ptr = g_line0;
g_line0 = g_line1; /* New line n */
g_line1 = ptr; /* Will be new line n + 1 */
/* Read the new line n + 1 */
willbevalid = (fgets(g_line1, LINESIZE, instream) != NULL);
/* Update info for line 0 */
lineno++;
indent = nextindent;
isblank = willbeblank;
iscomment = willbecomment;
if (willbevalid)
{
/* Strip trailing spaces and carriage returns from line n + 1 */
tmpptr = strchr(g_line1, '\r');
if (tmpptr != NULL)
{
*tmpptr++ = '\n';
*tmpptr++ = '\0';
}
else
{
int len = strlen(ptr);
if (len > 0)
{
for (ptr += len - 1; isspace(*ptr); ptr--)
{
ptr[0] = '\n';
ptr[1] = '\0';
}
}
}
/* Skip over leading spaces in line n + 1 */
for (ptr = g_line1, nextindent = 0;
*ptr != '\0' && *ptr != '\n' && isspace(*ptr);
ptr++, nextindent++)
{
}
/* Check for a blank line */
if (*ptr == '\0' || *ptr == '\n')
{
ptr = g_line1;
ptr[0] = '\n';
ptr[1] = '\0';
willbeblank = true;
willbecomment = false;
nextindent = 0;
}
else
{
/* Check for a C++ style comment
* at this indentation in line n + 1
*/
willbeblank = false;
willbecomment = strncmp(ptr, "//", 2) == 0;
}
/* Check for a C++ style comment
* at this indentation in line n + 1
*/
willbecomment = strncmp(ptr, "//", 2) == 0;
}
else
{
willbeblank = true;
willbecomment = false;
nextindent = 0;
}
/* If current line is not a comment line, then check for a C++ style
* comment at the end of the line.
*/
if (!iscomment)
{
/* Skip over leading spaces in line n + 1 */
for (ptr = g_line0 + indent, tmpindent = indent;
*ptr != '\0' && *ptr != '\n';
ptr++, tmpindent++)
{
if (ptr[0] == '/' && ptr[1] == '/')
{
indent = tmpindent;
iscomment = true;
wascomment = false;
break;
}
}
}
printf("***************************************"
"**************************************\n");
printf("* %5lu. %s\n", lineno, g_line0);
printf("* indent: last=%u curr=%u next=%u\n",
lastindent, indent, nextindent);
printf("* comment: last=%u curr=%u next=%u\n",
wascomment, iscomment, willbecomment);
printf("* blank: last=%u curr=%u next=%u\n",
wasblank, isblank, willbeblank);
printf("***************************************"
"**************************************\n");
/* Does line n start with a comment */
ptr = g_line0 + indent;
if (iscomment)
{
char *endptr;
/* Get a pointer for the first non-blank character following the
* comment.
*/
for (endptr = &ptr[2];
*endptr != '\0' && *endptr != '\n' && isspace(*endptr);
endptr++)
{
}
/* Check for a comment only line that is was not preceded by a
* comment.
*/
if ((*endptr == '\n' || *endptr == '\0') && !wascomment)
{
/* Avoid double spacing */
if (!wasblank)
{
/* Output a blank line */
fputc('\n', outstream);
}
/* Reset to indicate a blank line */
indent = 0;
iscomment = false;
isblank = true;
}
/* Did line n - 1 start with a comment? */
else if (wascomment)
{
/* Yes.. Change it to a C-style block comment continuation */
ptr[0] = ' ';
ptr[1] = '*';
/* Write the modified line to the output */
fputs(g_line0, outstream);
}
else
{
/* No.. Change it to a C-style opening comment. */
ptr[1] = '*';
if (!willbecomment)
{
int len;
/* Remove final linefeed */
len = strlen(ptr);
if (len > 0 && ptr[len - 1] == '\n')
{
len--;
}
/* Close the single line C comment */
ptr += len;
*ptr++ = ' ';
*ptr++ = '*';
*ptr++ = '/';
*ptr++ = '\n';
*ptr++ = '\0';
iscomment = false;
/* Write the modified line to the output */
fputs(g_line0, outstream);
/* Closing comment must be followed by a blank line */
if (!willbeblank)
{
/* Output a blank line */
fputc('\n', outstream);
}
}
else
{
/* Write the modified line to the output */
fputs(g_line0, outstream);
}
}
}
else if (wascomment)
{
/* Line n is not a comment, but line n - 1 was.
* Output a closing on a newline at the same indentation.
*/
memset(g_iobuffer, ' ', LINESIZE);
ptr = g_iobuffer + lastindent + 1;
*ptr++ = '*';
*ptr++ = '/';
*ptr++ = '\n';
*ptr++ = '\0';
/* Write the closing line to the output */
fputs(g_iobuffer, outstream);
/* Closing comment must be followed by a blank line */
if (!isblank)
{
/* Output a blank line */
fputc('\n', outstream);
}
/* Write the noncomment line to the output */
fputs(g_line0, outstream);
}
else
{
/* Write the noncomment line to the output */
fputs(g_line0, outstream);
}
wascomment = iscomment;
wasblank = isblank;
lastindent = indent;
}
while (willbevalid);
ret = 0;
errout_with_outstream:
fclose(outstream);
errout_with_instream:
fclose(instream);
return ret;
}
Reference in New Issue View Git Blame Copy Permalink