summaryrefslogtreecommitdiff
path: root/main.c
diff options
context:
space:
mode:
authorSehong Na <sehong.na@samsung.com>2014-05-31 12:36:43 +0900
committerSehong Na <sehong.na@samsung.com>2014-05-31 12:36:43 +0900
commit6a1cb4de1886434da1d9d9f649889cec68e646c0 (patch)
tree78458dc04d143d6dafdb60392fac911d9d323567 /main.c
downloaded-6a1cb4de1886434da1d9d9f649889cec68e646c0.tar.gz
ed-6a1cb4de1886434da1d9d9f649889cec68e646c0.tar.bz2
ed-6a1cb4de1886434da1d9d9f649889cec68e646c0.zip
Diffstat (limited to 'main.c')
-rw-r--r--main.c199
1 files changed, 199 insertions, 0 deletions
diff --git a/main.c b/main.c
new file mode 100644
index 0000000..069bce1
--- /dev/null
+++ b/main.c
@@ -0,0 +1,199 @@
+/* GNU ed - The GNU line editor.
+ Copyright (C) 2006, 2007, 2008, 2009 Antonio Diaz Diaz.
+
+ 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 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
+ 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, see <http://www.gnu.org/licenses/>.
+*/
+/*
+ Return values: 0 for a normal exit, 1 for environmental problems
+ (file not found, invalid flags, I/O errors, etc), 2 to indicate a
+ corrupt or invalid input file, 3 for an internal consistency error
+ (eg, bug) which caused ed to panic.
+*/
+/*
+ * CREDITS
+ *
+ * This program is based on the editor algorithm described in
+ * Brian W. Kernighan and P. J. Plauger's book "Software Tools
+ * in Pascal," Addison-Wesley, 1981.
+ *
+ * The buffering algorithm is attributed to Rodney Ruddock of
+ * the University of Guelph, Guelph, Ontario.
+ *
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <sys/stat.h>
+#include <locale.h>
+
+#include "carg_parser.h"
+#include "ed.h"
+
+
+static const char * invocation_name = 0;
+static const char * const Program_name = "GNU Ed";
+static const char * const program_name = "ed";
+static const char * const program_year = "2009";
+
+static char restricted_ = 0; /* invoked as "red" */
+static char scripted_ = 0; /* if set, suppress diagnostics */
+static char traditional_ = 0; /* if set, be backwards compatible */
+
+
+char restricted( void ) { return restricted_; }
+char scripted( void ) { return scripted_; }
+char traditional( void ) { return traditional_; }
+
+
+static void show_help( void )
+ {
+ printf( "%s - The GNU line editor.\n", Program_name );
+ printf( "\nUsage: %s [options] [file]\n", invocation_name );
+ printf( "\nOptions:\n" );
+ printf( " -h, --help display this help and exit\n" );
+ printf( " -V, --version output version information and exit\n" );
+ printf( " -G, --traditional run in compatibility mode\n" );
+ printf( " -l, --loose-exit-status exit with 0 status even if a command fails\n" );
+ printf( " -p, --prompt=STRING use STRING as an interactive prompt\n" );
+ printf( " -s, --quiet, --silent suppress diagnostics\n" );
+ printf( " -v, --verbose be verbose\n" );
+ printf( "Start edit by reading in `file' if given. Read output of shell command\n" );
+ printf( "if `file' begins with a `!'.\n" );
+ printf( "\nReport bugs to <bug-ed@gnu.org>.\n" );
+ printf( "Ed home page: http://www.gnu.org/software/ed/ed.html\n" );
+ printf( "General help using GNU software: http://www.gnu.org/gethelp\n" );
+ }
+
+
+static void show_version( void )
+ {
+ printf( "%s %s\n", Program_name, PROGVERSION );
+ printf( "Copyright (C) 1994 Andrew L. Moore, %s Antonio Diaz Diaz.\n", program_year );
+ printf( "License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>\n" );
+ printf( "This is free software: you are free to change and redistribute it.\n" );
+ printf( "There is NO WARRANTY, to the extent permitted by law.\n" );
+ }
+
+
+void show_strerror( const char *filename, int errcode )
+ {
+ if( !scripted_ )
+ {
+ if( filename && filename[0] != 0 )
+ fprintf( stderr, "%s: ", filename );
+ fprintf( stderr, "%s\n", strerror( errcode ) );
+ }
+ }
+
+
+static void show_error( const char * msg, const int errcode, const char help )
+ {
+ if( msg && msg[0] != 0 )
+ {
+ fprintf( stderr, "%s: %s", program_name, msg );
+ if( errcode > 0 ) fprintf( stderr, ": %s", strerror( errcode ) );
+ fprintf( stderr, "\n" );
+ }
+ if( help && invocation_name && invocation_name[0] != 0 )
+ fprintf( stderr, "Try `%s --help' for more information.\n", invocation_name );
+ }
+
+
+/* return true if file descriptor is a regular file */
+char is_regular_file( int fd )
+ {
+ struct stat sb;
+ return ( fstat( fd, &sb ) < 0 || S_ISREG( sb.st_mode ) );
+ }
+
+
+char may_access_filename( const char *name )
+ {
+ if( restricted_ && ( *name == '!' || !strcmp( name, ".." ) || strchr( name, '/' ) ) )
+ {
+ set_error_msg( "Shell access restricted" );
+ return 0;
+ }
+ return 1;
+ }
+
+
+int main( const int argc, const char *argv[] )
+ {
+ int n = strlen( argv[0] );
+ char loose = 0;
+ const ap_Option options[] =
+ {
+ { 'G', "traditional", ap_no },
+ { 'h', "help", ap_no },
+ { 'l', "loose-exit-status", ap_no },
+ { 'p', "prompt", ap_yes },
+ { 's', "quiet", ap_no },
+ { 's', "silent", ap_no },
+ { 'v', "verbose", ap_no },
+ { 'V', "version", ap_no },
+ { 0, 0, ap_no } };
+ Arg_parser parser;
+ int argind;
+
+ if( !ap_init( &parser, argc, argv, options, 0 ) )
+ { show_error( "Memory exhausted", 0, 0 ); return 1; }
+ if( ap_error( &parser ) ) /* bad option */
+ { show_error( ap_error( &parser ), 0, 1 ); return 1; }
+ invocation_name = argv[0];
+ restricted_ = ( n > 2 && argv[0][n-3] == 'r' );
+
+ for( argind = 0; argind < ap_arguments( &parser ); ++argind )
+ {
+ const int code = ap_code( &parser, argind );
+ const char * arg = ap_argument( &parser, argind );
+ if( !code ) break; /* no more options */
+ switch( code )
+ {
+ case 'G': traditional_ = 1; break; /* backward compatibility */
+ case 'h': show_help(); return 0;
+ case 'l': loose = 1; break;
+ case 'p': set_prompt( arg ); break;
+ case 's': scripted_ = 1; break;
+ case 'v': set_verbose(); break;
+ case 'V': show_version(); return 0;
+ default: show_error( "internal_error: uncaught option", 0, 0 ); return 3;
+ }
+ }
+ setlocale( LC_ALL, "" );
+ if( !init_buffers() ) return 1;
+
+ while( argind < ap_arguments( &parser ) )
+ {
+ const char * arg = ap_argument( &parser, argind );
+ if( !strcmp( arg, "-" ) ) { scripted_ = 1; ++argind; continue; }
+ if( may_access_filename( arg ) )
+ {
+ if( read_file( arg, 0 ) < 0 && is_regular_file( 0 ) )
+ return 2;
+ else if( arg[0] != '!' ) set_def_filename( arg );
+ }
+ else
+ {
+ fputs( "?\n", stderr );
+ if( arg[0] ) set_error_msg( "Invalid filename" );
+ if( is_regular_file( 0 ) ) return 2;
+ }
+ break;
+ }
+ ap_free( &parser );
+
+ return main_loop( loose );
+ }