mirror of
https://github.com/neovim/neovim.git
synced 2025-01-01 17:23:36 -07:00
a98a6996c2
Vim runtime files based on 7.4.384 / hg changeset 7090d7f160f7
Excluding:
Amiga icons (*.info, icons/)
doc/hangulin.txt
tutor/
spell/
lang/ (only used for menu translations)
macros/maze/, macros/hanoi/, macros/life/, macros/urm/
These were used to test vi compatibility.
termcap
"Demonstration of a termcap file (for the Amiga and Archimedes)"
Helped-by: Rich Wareham <rjw57@cam.ac.uk>
Helped-by: John <john.schmidt.h@gmail.com>
Helped-by: Yann <yann@yann-salaun.com>
Helped-by: Christophe Badoit <c.badoit@lesiteimmo.com>
Helped-by: drasill <github@tof2k.com>
Helped-by: Tae Sandoval Murgan <taecilla@gmail.com>
Helped-by: Lowe Thiderman <lowe.thiderman@gmail.com>
327 lines
8.4 KiB
C
327 lines
8.4 KiB
C
/* ======================================================================= */
|
|
/* Project : VIM */
|
|
/* Module : ccfilter Version: 02.01.01 */
|
|
/* File : ccfilter.c */
|
|
/* Purpose : Filter gmake/cc output into a standardized form */
|
|
/* ======================================================================= */
|
|
/* Created On: 12-Sep-95 20:32 */
|
|
/* Last modification: 03-Feb-98 */
|
|
/* -e option added by Bernd Feige */
|
|
/* ======================================================================= */
|
|
/* Copyright : */
|
|
/* This source file is copyright (c) to Pablo Ariel Kohan */
|
|
/* ======================================================================= */
|
|
#define __CCFILTER_C__
|
|
|
|
#include <ctype.h>
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
#include <unistd.h>
|
|
|
|
#define LINELENGTH 2048
|
|
|
|
/* Collector(s) */
|
|
char Line[LINELENGTH];
|
|
char Line2[LINELENGTH];
|
|
/* Components */
|
|
char FileName[1024];
|
|
char BasePath[1024];
|
|
char CWD[1024];
|
|
unsigned long Row;
|
|
unsigned long Col;
|
|
char Severity;
|
|
char Reason[LINELENGTH];
|
|
|
|
#define COMPILER_UNKNOWN 0
|
|
#define COMPILER_GCC 1
|
|
#define COMPILER_AIX 2
|
|
#define COMPILER_ATT 3
|
|
#define COMPILER_IRIX 4
|
|
#define COMPILER_SOLARIS 5
|
|
#define COMPILER_HPUX 6
|
|
|
|
char *COMPILER_Names[][2] =
|
|
{
|
|
/* Name Description */
|
|
{ "N/A", "" },
|
|
{ "GCC", "GCC compiler" },
|
|
{ "AIX", "AIX's C compiler" },
|
|
{ "ATT", "AT&T/NCR's High Performance C Compiler" },
|
|
{ "IRIX", "IRIX's MIPS/MIPSpro C compiler" },
|
|
{ "SOLARIS", "SOLARIS's SparcWorks C compiler" },
|
|
{ "HPUX", "HPUX's C compiler" }
|
|
};
|
|
#define COMPILER_QTY (sizeof(COMPILER_Names)/sizeof(COMPILER_Names[0]))
|
|
|
|
#if defined(_GCC)
|
|
# define COMPILER_DEFAULT COMPILER_GCC
|
|
#elif defined(_AIX)
|
|
# define COMPILER_DEFAULT COMPILER_AIX
|
|
#elif defined(_ATT)
|
|
# define COMPILER_DEFAULT COMPILER_ATT
|
|
#elif defined(_IRIX)
|
|
# define COMPILER_DEFAULT COMPILER_IRIX
|
|
#elif defined(_SOLARIS)
|
|
# define COMPILER_DEFAULT COMPILER_SOLARIS
|
|
#elif defined(_HPUX)
|
|
# define COMPILER_DEFAULT COMPILER_HPUX
|
|
#else
|
|
# define COMPILER_DEFAULT COMPILER_UNKNOWN
|
|
#endif
|
|
|
|
const char USAGE[] =
|
|
"ccfilter v2.1 (c)1994-1997 by Pablo Ariel Kohan\n"
|
|
"Filter Out compiler's output, and converts it to fit VIM\n\n"
|
|
"Usage:\n"
|
|
" ccfilter [<options>]\n"
|
|
"Where: <options> is one or more of:\n"
|
|
" -c Decrement column by one\n"
|
|
" -r Decrement row by one\n"
|
|
" -e Echo stdin to stderr\n"
|
|
" -v Verbose (Outputs also invalid lines)\n"
|
|
" -o <COMPILER> Treat input as <COMPILER>'s output\n"
|
|
" Note: COMPILER may be preceded by an _\n"
|
|
" -h This usage.\n";
|
|
|
|
|
|
int ShowUsage( char *szError )
|
|
{ int i;
|
|
|
|
fprintf( stderr, USAGE );
|
|
|
|
fprintf( stderr, "Current default <COMPILER>: %s\n",
|
|
COMPILER_Names[COMPILER_DEFAULT][0] );
|
|
|
|
fprintf( stderr, "Acceptable parameters for <COMPILER> are:\n" );
|
|
for (i=1; i < COMPILER_QTY; i++)
|
|
fprintf( stderr, " %-15.15s %s\n",
|
|
COMPILER_Names[i][0],
|
|
COMPILER_Names[i][1] );
|
|
fprintf(stderr, szError);
|
|
return 0;
|
|
}
|
|
|
|
char *echogets(char *s, int echo) {
|
|
char * const retval=fgets(s, LINELENGTH, stdin);
|
|
if (echo!=0 && retval!=NULL) {
|
|
fputs(retval, stderr);
|
|
}
|
|
return retval;
|
|
}
|
|
|
|
int main( int argc, char *argv[] )
|
|
{ int rv, i, j, ok;
|
|
int stay;
|
|
int prefetch;
|
|
char *p;
|
|
int dec_col = 0; /* Decrement column value by 1 */
|
|
int dec_row = 0; /* Decrement row value by 1 */
|
|
int echo = 0; /* Echo stdin to stderr */
|
|
int verbose = 0; /* Include Bad Formatted Lines */
|
|
int CWDlen;
|
|
int COMPILER = COMPILER_DEFAULT;
|
|
|
|
getcwd( CWD, sizeof(CWD) );
|
|
CWDlen = strlen(CWD);
|
|
|
|
for (i=1; i<argc; i++)
|
|
{
|
|
if (argv[i][0] != '-')
|
|
return ShowUsage("");
|
|
switch ( argv[i][1] )
|
|
{
|
|
case 'c':
|
|
dec_col = 1;
|
|
break;
|
|
case 'r':
|
|
dec_row = 1;
|
|
break;
|
|
case 'e':
|
|
echo = 1;
|
|
break;
|
|
case 'v':
|
|
verbose = 1;
|
|
break;
|
|
case 'o':
|
|
{
|
|
if (i+1 >= argc)
|
|
return ShowUsage("Error: Missing parameter for -o\n");
|
|
i++;
|
|
COMPILER = -1;
|
|
for (j=1; j<COMPILER_QTY; j++)
|
|
if ( (strcmp(argv[i], COMPILER_Names[j][0]) == 0) ||
|
|
( (argv[i][0] == '_') &&
|
|
(strcmp(&argv[i][1], COMPILER_Names[j][0]) == 0) ) )
|
|
COMPILER = j;
|
|
if (COMPILER == -1)
|
|
return ShowUsage("Error: Invalid COMPILER specified\n");
|
|
}
|
|
break;
|
|
case 'h':
|
|
return ShowUsage("");
|
|
default:
|
|
return ShowUsage("Error: Invalid option\n");
|
|
}
|
|
}
|
|
if (COMPILER == 0)
|
|
return ShowUsage("Error: COMPILER must be specified in this system\n");
|
|
|
|
stay = ( echogets(Line, echo) != NULL );
|
|
prefetch = 0;
|
|
|
|
while( stay )
|
|
{
|
|
*FileName = 0;
|
|
Row = 0;
|
|
Col = 0;
|
|
Severity = ' ';
|
|
*Reason = 0;
|
|
ok = 0;
|
|
switch (COMPILER)
|
|
{
|
|
case COMPILER_GCC:
|
|
Severity = 'e';
|
|
#ifdef GOTO_FROM_WHERE_INCLUDED
|
|
rv = sscanf( Line, "In file included from %[^:]:%u:",
|
|
FileName, &Row );
|
|
if ( rv == 2 )
|
|
{
|
|
ok = (echogets(Reason, echo) != NULL);
|
|
}
|
|
else
|
|
#endif
|
|
{
|
|
if ((rv = sscanf( Line, "%[^:]:%u: warning: %[^\n]",
|
|
FileName, &Row, Reason ))==3) {
|
|
Severity = 'w';
|
|
} else {
|
|
rv = sscanf( Line, "%[^:]:%u: %[^\n]",
|
|
FileName, &Row, Reason );
|
|
}
|
|
ok = ( rv == 3 );
|
|
}
|
|
Col = (dec_col ? 1 : 0 );
|
|
break;
|
|
case COMPILER_AIX:
|
|
rv = sscanf( Line, "\"%[^\"]\", line %u.%u: %*s (%c) %[^\n]",
|
|
FileName, &Row, &Col, &Severity, Reason );
|
|
ok = ( rv == 5 );
|
|
break;
|
|
case COMPILER_HPUX:
|
|
rv = sscanf( Line, "cc: \"%[^\"]\", line %u: %c%*[^:]: %[^\n]",
|
|
FileName, &Row, &Severity, Reason );
|
|
ok = ( rv == 4 );
|
|
Col = (dec_col ? 1 : 0 );
|
|
break;
|
|
case COMPILER_SOLARIS:
|
|
rv = sscanf( Line, "\"%[^\"]\", line %u: warning: %[^\n]",
|
|
FileName, &Row, Reason );
|
|
Severity = 'w';
|
|
ok = ( rv == 3 );
|
|
if ( rv != 3 )
|
|
{
|
|
rv = sscanf( Line, "\"%[^\"]\", line %u: %[^\n]",
|
|
FileName, &Row, Reason );
|
|
Severity = 'e';
|
|
ok = ( rv == 3 );
|
|
}
|
|
Col = (dec_col ? 1 : 0 );
|
|
break;
|
|
case COMPILER_ATT:
|
|
rv = sscanf( Line, "%c \"%[^\"]\",L%u/C%u%*[^:]:%[^\n]",
|
|
&Severity, FileName, &Row, &Col, Reason );
|
|
ok = ( rv == 5 );
|
|
|
|
if (rv != 5)
|
|
{ rv = sscanf( Line, "%c \"%[^\"]\",L%u/C%u: %[^\n]",
|
|
&Severity, FileName, &Row, &Col, Reason );
|
|
ok = ( rv == 5 );
|
|
}
|
|
|
|
if (rv != 5)
|
|
{ rv = sscanf( Line, "%c \"%[^\"]\",L%u: %[^\n]",
|
|
&Severity, FileName, &Row, Reason );
|
|
ok = ( rv == 4 );
|
|
Col = (dec_col ? 1 : 0 );
|
|
}
|
|
|
|
stay = (echogets(Line2, echo) != NULL);
|
|
while ( stay && (Line2[0] == '|') )
|
|
{ for (p=&Line2[2]; (*p) && (isspace(*p)); p++);
|
|
strcat( Reason, ": " );
|
|
strcat( Reason, p );
|
|
Line2[0] = 0;
|
|
stay = (echogets(Line2, echo) != NULL);
|
|
}
|
|
prefetch = 1;
|
|
strcpy( Line, Line2 );
|
|
break;
|
|
case COMPILER_IRIX:
|
|
Col = 1;
|
|
prefetch = 0;
|
|
rv = 0;
|
|
ok = 0;
|
|
if ( !strncmp(Line, "cfe: ", 5) )
|
|
{ p = &Line[5];
|
|
Severity = tolower(*p);
|
|
p = strchr( &Line[5], ':' );
|
|
if (p == NULL)
|
|
{ ok = 0;
|
|
}
|
|
else
|
|
{
|
|
rv = sscanf( p+2, "%[^:]: %u: %[^\n]",
|
|
FileName, &Row, Reason );
|
|
if (rv != 3)
|
|
rv = sscanf( p+2, "%[^,], line %u: %[^\n]",
|
|
FileName, &Row, Reason );
|
|
ok = ( rv == 3 );
|
|
}
|
|
|
|
if (ok)
|
|
{ prefetch = 1;
|
|
stay = (echogets(Line, echo) != NULL);
|
|
if (Line[0] == ' ')
|
|
stay = (echogets(Line2, echo) != NULL);
|
|
if ( (Line2[0] == ' ') &&
|
|
( (Line2[1] == '-') || (Line2[1] == '^') ) )
|
|
{ Col = strlen(Line2)-1;
|
|
prefetch = 0;
|
|
}
|
|
else
|
|
{ strcat( Line, "\n" );
|
|
strcat( Line, Line2 );
|
|
}
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
if (dec_col) Col--;
|
|
if (dec_row) Row--;
|
|
if (!ok)
|
|
{
|
|
if ( Line[0] == 'g' )
|
|
p = &Line[1];
|
|
else
|
|
p = &Line[0];
|
|
ok = sscanf( p, "make[%*d]: Entering directory `%[^']",
|
|
BasePath );
|
|
if (verbose)
|
|
printf( "[%u]?%s\n", ok, Line );
|
|
}
|
|
else
|
|
{
|
|
for (p=Reason; (*p) && (isspace(*p)); p++);
|
|
if ( BasePath[CWDlen] == 0 )
|
|
printf( "%s:%u:%u:%c:%s\n", FileName, Row, Col, Severity, p );
|
|
else
|
|
{
|
|
printf( "%s/%s:%u:%u:%c:%s\n", &BasePath[CWDlen+1], FileName, Row, Col, Severity, p );
|
|
}
|
|
}
|
|
if (!prefetch)
|
|
stay = ( echogets(Line, echo) != NULL );
|
|
}
|
|
return 0;
|
|
}
|