hush/sed.c

183 lines
3.9 KiB
C
Raw Normal View History

1999-10-28 16:06:25 +00:00
/*
* Mini sed implementation for busybox
*
*
* Copyright (C) 1999 by Lineo, inc.
* Written by Erik Andersen <andersen@lineo.com>, <andersee@debian.org>
*
* 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 Foundation; either version 2 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
* MERCHANTABILITY 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*
*/
#include "internal.h"
#include "regexp.h"
#include <stdio.h>
#include <dirent.h>
#include <errno.h>
#include <fcntl.h>
#include <signal.h>
#include <time.h>
#include <ctype.h>
static const char sed_usage[] =
"sed [-n] [-e script] [file...]\n"
1999-10-29 00:07:31 +00:00
"Allowed scripts come in the following form:\n\n"
1999-10-28 16:06:25 +00:00
"'s/regexp/replacement/[gp]'\n"
"\tattempt to match regexp against the pattern space\n"
1999-10-29 00:07:31 +00:00
"\tand if successful replaces the matched portion with replacement.\n\n"
1999-10-28 16:06:25 +00:00
"Options:\n"
"-e\tadd the script to the commands to be executed\n"
"-n\tsuppress automatic printing of pattern space\n\n"
#if defined BB_REGEXP
"This version of sed matches full regexps.\n";
#else
"This version of sed matches strings (not full regexps).\n";
#endif
1999-11-09 01:47:36 +00:00
1999-10-28 16:06:25 +00:00
1999-11-09 01:47:36 +00:00
static void do_sed(FILE *fp, char *needle, char *newNeedle, int ignoreCase, int printFlag, int quietFlag)
{
int foundOne=FALSE;
char haystack[1024];
1999-10-28 16:06:25 +00:00
1999-11-09 01:47:36 +00:00
while (fgets (haystack, 1023, fp)) {
foundOne = replace_match(haystack, needle, newNeedle, ignoreCase);
if (foundOne==TRUE && printFlag==TRUE) {
fprintf(stdout, haystack);
}
if (quietFlag==FALSE) {
fprintf(stdout, haystack);
}
}
}
1999-10-28 16:06:25 +00:00
extern int sed_main (int argc, char **argv)
{
FILE *fp;
1999-10-29 00:07:31 +00:00
char *needle=NULL, *newNeedle=NULL;
char *name;
char *cp;
1999-10-28 16:06:25 +00:00
int ignoreCase=FALSE;
1999-10-29 23:09:13 +00:00
int printFlag=FALSE;
int quietFlag=FALSE;
1999-10-29 00:07:31 +00:00
int stopNow;
1999-10-28 16:06:25 +00:00
argc--;
argv++;
if (argc < 1) {
1999-10-29 00:07:31 +00:00
usage(sed_usage);
1999-10-28 16:06:25 +00:00
}
if (**argv == '-') {
argc--;
cp = *argv++;
1999-10-29 00:07:31 +00:00
stopNow=FALSE;
1999-10-28 16:06:25 +00:00
1999-11-09 01:47:36 +00:00
while (*++cp && stopNow==FALSE) {
1999-10-28 16:06:25 +00:00
switch (*cp) {
case 'n':
1999-10-29 23:09:13 +00:00
quietFlag = TRUE;
1999-10-28 16:06:25 +00:00
break;
case 'e':
1999-10-29 00:07:31 +00:00
if (*(cp+1)==0 && --argc < 0) {
usage( sed_usage);
1999-10-28 16:06:25 +00:00
}
1999-11-09 01:47:36 +00:00
if ( *++cp != 's')
cp = *argv++;
1999-10-29 00:07:31 +00:00
while( *cp ) {
if (*cp == 's' && strlen(cp) > 3 && *(cp+1) == '/') {
char* pos=needle=cp+2;
for(;;) {
pos = strchr(pos, '/');
if (pos==NULL) {
usage( sed_usage);
}
if (*(pos-1) == '\\') {
pos++;
continue;
}
break;
}
*pos=0;
newNeedle=++pos;
for(;;) {
pos = strchr(pos, '/');
if (pos==NULL) {
usage( sed_usage);
}
if (*(pos-1) == '\\') {
pos++;
continue;
}
break;
}
*pos=0;
1999-10-29 23:09:13 +00:00
if (pos+2 != 0) {
while (*++pos) {
switch (*pos) {
case 'i':
ignoreCase=TRUE;
break;
case 'p':
printFlag=TRUE;
break;
case 'g':
break;
default:
usage( sed_usage);
}
}
}
1999-10-29 00:07:31 +00:00
}
cp++;
1999-10-28 16:06:25 +00:00
}
1999-11-09 01:47:36 +00:00
//fprintf(stderr, "replace '%s' with '%s'\n", needle, newNeedle);
1999-10-29 00:07:31 +00:00
stopNow=TRUE;
1999-10-28 16:06:25 +00:00
break;
default:
1999-10-29 00:07:31 +00:00
usage(sed_usage);
1999-10-28 16:06:25 +00:00
}
1999-11-09 01:47:36 +00:00
}
1999-10-28 16:06:25 +00:00
}
1999-11-09 01:47:36 +00:00
if (argc==0) {
do_sed( stdin, needle, newNeedle, ignoreCase, printFlag, quietFlag);
} else {
while (argc-- > 0) {
name = *argv++;
1999-10-28 16:06:25 +00:00
1999-11-09 01:47:36 +00:00
fp = fopen (name, "r");
if (fp == NULL) {
perror (name);
continue;
}
1999-10-28 16:06:25 +00:00
1999-11-09 01:47:36 +00:00
do_sed( fp, needle, newNeedle, ignoreCase, printFlag, quietFlag);
1999-10-28 16:06:25 +00:00
1999-11-09 01:47:36 +00:00
if (ferror (fp))
perror (name);
1999-10-28 16:06:25 +00:00
1999-11-09 01:47:36 +00:00
fclose (fp);
}
1999-10-28 16:06:25 +00:00
}
exit( TRUE);
}
/* END CODE */