[Feature]Upload Modem source code

Change-Id: Id4294f30faced84d3e6fd6d5e61e1111bf287a37
diff --git a/mcu/tools/chkUpperCase.pl b/mcu/tools/chkUpperCase.pl
new file mode 100644
index 0000000..b77e103
--- /dev/null
+++ b/mcu/tools/chkUpperCase.pl
@@ -0,0 +1,24 @@
+use strict;

+use Cwd;

+

+my $theMF = $ARGV[0];

+my $custom = $ARGV[1];

+my $project = $ARGV[2];

+

+open (FILE_HANDLE, "<$theMF") or die "Cannot open $theMF. Please check if the file do not exists.\n";

+

+while (<FILE_HANDLE>) {

+	if (/^(\w+)\b\s*=/)

+	{

+	  if (/^(\S+)\s*=\s*(\S+)/) {

+	    if ($1 ne uc($1)) {

+	      print "\nFeature name $1 should be UPPER cases. please Correct $1 to ".uc($1)."\n\n";

+	    }

+

+	    if (($2 ne uc($2)) && ($1 !~ /CUSTOM_CFLAGS/i) && ($1 !~ /RELEASE_PACKAGE/i) && ($1 !~ /ORIGINAL_PROJECT_NAME/i) && ($1 !~ /ORIGINAL_FLAVOR/i) && ($1 !~ /CUSTOM_FLAVOR/i) && ($1 !~ /MODEM_SPEC/i)) {

+	      print "\n Feature value ($2) of ".uc($1)." should be UPPER cases. please Correct $2 to ".uc($2)."\n";

+	    }

+	  }

+	}

+}

+close FILE_HANDLE;