X-Git-Url: https://feistymeow.org/gitweb/?a=blobdiff_plain;f=scripts%2Fcore%2Fgenerate_aliases.pl;h=8408b5830cb4685bc2efb915fb0f78e6a7e662bf;hb=c72b7521e60f5ca7d2873271767c7ff4fba09bf2;hp=660fdd8d5a1b8a042647bf902af0e1b61b9a5f0d;hpb=0b700ef6b9dbe7a15bdd4eb4b41c22796bf75425;p=feisty_meow.git diff --git a/scripts/core/generate_aliases.pl b/scripts/core/generate_aliases.pl index 660fdd8d..8408b583 100644 --- a/scripts/core/generate_aliases.pl +++ b/scripts/core/generate_aliases.pl @@ -8,10 +8,10 @@ # # Purpose: # -# This script generates YETI alias files. Alias files contain a list of -# definitions for command aliases that are written in the specified shell -# dialect (such as bash or perl) and which are additionally tailored for the -# operating system to be used. +# This script generates feisty meow script alias files. Alias files +# contain a list of definitions for command aliases that are written in the +# specified shell dialect (such as bash or perl) and which are additionally +# tailored for the operating system to be used. # ############## # This program is free software; you can redistribute it and/or modify it @@ -23,7 +23,7 @@ require "filename_helper.pl"; -require "importenv.pl"; +use Env qw(BINDIR BUILD_TOP FEISTY_MEOW_DIR FEISTY_MEOW_GENERATED FEISTY_MEOW_SCRIPTS SHELL_DEBUG ); # given a possible aliasable filename, this will decide whether to create a perl # or bash alias for it. it needs the filename of the possible alias and the @@ -155,7 +155,7 @@ if ( ! length("$FEISTY_MEOW_GENERATED") ) { The FEISTY_MEOW_GENERATED variable is not defined. This must point to the location where\n\ the generated scripts are stored. Perhaps you still need to run\n\ bootstrap_shells.sh and set up some environment variables. Please see\n\ -http://yeticode.org for more details.\n"; +http://feistymeow.org for more details.\n"; exit 1; #really need to use better exit codes. } @@ -171,7 +171,7 @@ if (! -d $FEISTY_MEOW_GENERATED) { ############## -# set the executable bit for yeti binaries for just this current user. +# set the executable bit for binaries for just this current user. if (-d $BINDIR) { system("chmod -R u+x \"$BINDIR\"/*"); } @@ -190,14 +190,13 @@ if (length($SHELL_DEBUG)) { # open the alias files to be created. open(she, ">> $FEISTY_MEOW_GENERATED/fmc_aliases_for_scripts.sh"); -#print "os is $OS\n"; - # find the list of files in the scripts directory. #opendir(scripts, "$FEISTY_MEOW_SCRIPTS"); #@shell_files = sort(readdir(scripts)); -#print "yeti scripts: @shell_files\n"; +#print "scripts: @shell_files\n"; -@shell_files = &load_file_names("$FEISTY_MEOW_SCRIPTS"); +@shell_files = (&load_file_names("$FEISTY_MEOW_SCRIPTS"), + &load_file_names("$FEISTY_MEOW_GENERATED/custom/scripts")); # construct aliases for items in the scripts directory. foreach $file (@shell_files) { @@ -220,6 +219,11 @@ foreach $file (@shell_files) { foreach $subfile (@subdir_files) { push(@shell_files, "$file/$subfile"); } + } elsif (-f "$FEISTY_MEOW_GENERATED/custom/scripts/$file") { + # if we see a file in the auto-generated area that comes from the + # customized scripts folder, we add it as an alias. + make_alias($file, "$FEISTY_MEOW_GENERATED/custom/scripts/"); + #print "added custom script file: $FEISTY_MEOW_GENERATED/custom/scripts/$file\n"; } else { # if it's a regular file, we'll try to make an alias for it. the function # will only fire if the ending is appropriate for the script languages we use.