[Feature][Modem]Update MTK MODEM V1.6 baseline version: MOLY.NR15.R3.MD700.IVT.MP1MR3.MP.V1.6
MTK modem version: MT2735_IVT_MOLY.NR15.R3.MD700.IVT.MP1MR3.MP.V1.6.tar.gz
RF modem version: NA
Change-Id: I45a4c2752fa9d1a618beacd5d40737fb39ab64fb
diff --git a/mcu/tools/gfh_cfg_flash.pl b/mcu/tools/gfh_cfg_flash.pl
new file mode 100644
index 0000000..3355b7e
--- /dev/null
+++ b/mcu/tools/gfh_cfg_flash.pl
@@ -0,0 +1,242 @@
+#!/usr/bin/perl
+#
+# Copyright Statement:
+# --------------------
+# This software is protected by Copyright and the information contained
+# herein is confidential. The software may not be copied and the information
+# contained herein may not be used or disclosed except with the written
+# permission of MediaTek Inc. (C) 2005
+#
+# BY OPENING THIS FILE, BUYER HEREBY UNEQUIVOCALLY ACKNOWLEDGES AND AGREES
+# THAT THE SOFTWARE/FIRMWARE AND ITS DOCUMENTATIONS ("MEDIATEK SOFTWARE")
+# RECEIVED FROM MEDIATEK AND/OR ITS REPRESENTATIVES ARE PROVIDED TO BUYER ON
+# AN "AS-IS" BASIS ONLY. MEDIATEK EXPRESSLY DISCLAIMS ANY AND ALL WARRANTIES,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE IMPLIED WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE OR NONINFRINGEMENT.
+# NEITHER DOES MEDIATEK PROVIDE ANY WARRANTY WHATSOEVER WITH RESPECT TO THE
+# SOFTWARE OF ANY THIRD PARTY WHICH MAY BE USED BY, INCORPORATED IN, OR
+# SUPPLIED WITH THE MEDIATEK SOFTWARE, AND BUYER AGREES TO LOOK ONLY TO SUCH
+# THIRD PARTY FOR ANY WARRANTY CLAIM RELATING THERETO. MEDIATEK SHALL ALSO
+# NOT BE RESPONSIBLE FOR ANY MEDIATEK SOFTWARE RELEASES MADE TO BUYER'S
+# SPECIFICATION OR TO CONFORM TO A PARTICULAR STANDARD OR OPEN FORUM.
+#
+# BUYER'S SOLE AND EXCLUSIVE REMEDY AND MEDIATEK'S ENTIRE AND CUMULATIVE
+# LIABILITY WITH RESPECT TO THE MEDIATEK SOFTWARE RELEASED HEREUNDER WILL BE,
+# AT MEDIATEK'S OPTION, TO REVISE OR REPLACE THE MEDIATEK SOFTWARE AT ISSUE,
+# OR REFUND ANY SOFTWARE LICENSE FEES OR SERVICE CHARGE PAID BY BUYER TO
+# MEDIATEK FOR SUCH MEDIATEK SOFTWARE AT ISSUE.
+#
+# THE TRANSACTION CONTEMPLATED HEREUNDER SHALL BE CONSTRUED IN ACCORDANCE
+# WITH THE LAWS OF THE STATE OF CALIFORNIA, USA, EXCLUDING ITS CONFLICT OF
+# LAWS PRINCIPLES. ANY DISPUTES, CONTROVERSIES OR CLAIMS ARISING THEREOF AND
+# RELATED THERETO SHALL BE SETTLED BY ARBITRATION IN SAN FRANCISCO, CA, UNDER
+# THE RULES OF THE INTERNATIONAL CHAMBER OF COMMERCE (ICC).
+#
+#
+#*****************************************************************************
+#*
+#* Filename:
+#* ---------
+#* Append2.pl
+#*
+#* Project:
+#* --------
+#* Maui_Software
+#*
+#* Description:
+#* ------------
+#* This script can append some information to a file
+#* 1. its file name
+#* 2. input strings
+#* 3. flash configuration information
+#* This script also can query flash configuration stored in FlashConf.c
+#*
+#*------------------------------------------------------------------------------
+#* Upper this line, this part is controlled by PVCS VM. DO NOT MODIFY!!
+#*============================================================================
+#****************************************************************************/
+use File::stat;
+use Math::BigInt;
+
+my ($FLASH_CFG,$file,$bin_name,$verno,$themf,$build_time_str,$tmpfolder,$scat) = @ARGV;
+&error_handler("BIN_NAME: $bin_name should NOT exceed 127 bytes", __FILE__, __LINE__) if(length($bin_name) > 127);
+&error_handler("VERNO: $verno should NOT exceed 63 bytes", __FILE__, __LINE__) if(length($verno) > 63);
+
+if($file =~ /\.bin$/ && -d "$file")
+{
+ $file = $file."/ROM";
+}
+&error_handler("$file does not exist!", __FILE__, __LINE__) if(!-e "$file");
+#****************************************************************************
+# parsing makefile
+#****************************************************************************
+open (FILE_HANDLE, "<$themf") or &error_handler("cannot open $themf!", __FILE__, __LINE__);
+while (<FILE_HANDLE>)
+{
+ if ((/^([^\#]*)\#?.*/) && ($1 =~ /^(\w+)\s*=\s*(.*\S)\s*$/))
+ {
+ $keyname = lc($1);
+ $${keyname} = uc($2);
+ }
+}
+
+#****************************************************************************
+# parsing flash configuration from a file or a string
+#****************************************************************************
+my $full_hex_str = '';
+my $full_emi_str;
+
+open (FLASH_CFG, "<$FLASH_CFG") or &error_handler("cannot open $FLASH_CFG!", __FILE__, __LINE__);
+$backup = $/;
+undef $/;
+$reading = <FLASH_CFG>;
+$/ = $backup;
+close FLASH_CFG;
+
+my $flash_name = ''; # part number
+my @NORFlashID = (0, 0, 0, 0); # flash ID (manufacture ID, device ID, ext. device ID1, ext. device ID2)
+my @NANDFlashID = (0, 0, 0, 0); # flash ID (manufacture ID, device ID, ext. device ID1, ext. device ID2)
+my @EMMCFlashID = (0, 0, 0, 0); # flash ID (manufacture ID, device ID, ext. device ID1, ext. device ID2)
+
+my $fs_nor_addr = 0;
+my $fs_nor_len = 0;
+my $fs_nand_addr = 0;
+my $fs_nand_len = 0;
+my $fs_emmc_addr = 0;
+my $fs_emmc_len = 0;
+my $hex_str = '';
+
+# get flash name(part number)
+if ($reading =~ /const\s+kal_char\s+PART_NUMBER\w+\[\d*\]\s*=\s*\"(.*)\"\s*;/)
+{
+ $flash_name = $1;
+ if ($bin_name !~ /\_FLN/)
+ { # there will be one more part number(NOR Flash with two and NAND with ONLY one)
+ # specified in custom memory device configuration file
+ $bin_name .= "_FLN" . $flash_name;
+ &error_handler("PLATFORM ID: \"$bin_name\" should NOT exceed 127 bytes!", __FILE__, __LINE__) if(length($bin_name) > 127);
+ }
+}
+
+# get flash ID
+my @flashID = (0, 0, 0, 0);
+if ($reading =~ /const\s+kal_char\s+FLASH_ID\[\d*\]\s*=\s*\"\s*(?:\{\s*)?(\w+)\s*\,\s*(\w+)\s*(\,\s*(\w+))?\s*(\,\s*(\w+))?\s*(\,\s*(\w+))*\s*(?:\}\s*)?\"\s*;/)
+{ # Flash ID has four fields, manufacture ID, device ID, ext. device ID1 & ext. device ID2
+ $flashID[0] = `perl -e "print ($1)" 2>&1` if ($1 ne "");
+ $flashID[1] = `perl -e "print ($2)" 2>&1` if ($2 ne "");
+ $flashID[2] = `perl -e "print ($4)" 2>&1` if ($4 ne "");
+ $flashID[3] = `perl -e "print ($6)" 2>&1` if ($6 ne "");
+}
+
+if ($nand_flash_booting !~ /^NONE|FALSE$/)
+{
+ @NANDFlashID = @flashID;
+}
+elsif ($emmc_booting !~ /^NONE|FALSE$/)
+{
+ @EMMCFlashID = @flashID;
+}
+else
+{
+ @NORFlashID = @flashID;
+}
+
+# get nor flash base address if device exists
+if ($reading =~ /int\s+fs_nor_base_address\s*=\s*(.*);/)
+{
+ $fs_nor_addr = `perl -e "print ($1)" 2>&1`;
+}
+
+# get nor flash FAT space if device exists
+if ($reading =~ /int\s+fs_nor_length\s*=\s*(.*);/)
+{
+ $fs_nor_len = `perl -e "print ($1)" 2>&1`;
+}
+
+# get nand flash base address if device exists
+if ($reading =~ /int\s+fs_nand_base_address\s*=\s*(.*);/)
+{
+ $fs_nand_addr = `perl -e "print ($1)" 2>&1`;
+}
+
+# get nand flash FAT space if device exists
+if ($reading =~ /int\s+fs_nand_length\s*=\s*(.*);/)
+{
+ $fs_nand_len = `perl -e "print ($1)" 2>&1`;
+}
+
+# get emmc flash base address if device exists
+if ($reading =~ /int\s+fs_emmc_base_address\s*=\s*(.*);/)
+{
+ $fs_emmc_addr = `perl -e "print ($1)" 2>&1`;
+}
+
+# get emmc flash FAT space if device exists
+if ($reading =~ /int\s+fs_emmc_length\s*=\s*(.*);/)
+{
+ $fs_emmc_len = `perl -e "print ($1)" 2>&1`;
+}
+
+$hex_str = sprintf("%02X", 3); # flash device num.
+$full_hex_str .= $hex_str;
+
+# 1st flash device info. --- NOR flash
+$hex_str = sprintf("%04X%04X%04X%04X%08X%08X", $NORFlashID[0], $NORFlashID[1], $NORFlashID[2], $NORFlashID[3], $fs_nor_addr, $fs_nor_len);
+$full_hex_str .= $hex_str;
+
+# 2nd flash device info. --- NAND flash
+$hex_str = sprintf("%04X%04X%04X%04X%08X%08X", $NANDFlashID[0], $NANDFlashID[1], $NANDFlashID[2], $NANDFlashID[3], $fs_nand_addr, $fs_nand_len);
+$full_hex_str .= $hex_str;
+
+# 3rd flash device info. --- eMMC flash
+$hex_str = sprintf("%04X%04X%04X%04X%08X%08X", $EMMCFlashID[0], $EMMCFlashID[1], $EMMCFlashID[2], $EMMCFlashID[3], $fs_emmc_addr, $fs_emmc_len);
+$full_hex_str .= $hex_str;
+
+
+$flash_len = length($full_hex_str);
+if ( ($flash_len == 2) || ((($flash_len-34)%32) !=0) || ($flash_len > 34+5*32) )
+{
+ &error_handler("The length of $full_hex_str ($flash_len) should be 34+32n. (5>=n>=0)", __FILE__, __LINE__);
+}
+$flash_device_count = hex(substr($full_hex_str, 0, 2));
+
+if ((($flash_len-2)/32) != $flash_device_count)
+{
+ &error_handler("$flash_len-2)/32 should be $flash_device_count", __FILE__, __LINE__);
+}
+
+open (CFG,">$tmpfolder/~gfh_cfg_flash.tmp") or &error_handler("cannot open $tmpfolder/~gfh_cfg_flash.tmp", __FILE__, __LINE__);
+print CFG "FLASH_DEV_CNT=$flash_device_count\n";
+
+for ($i=0; $i<$flash_device_count; $i++)
+{
+ $menuID = hex(substr($full_hex_str, 2+32*$i, 4));
+ $devID = hex(substr($full_hex_str, 6+32*$i, 4));
+ $extID1 = hex(substr($full_hex_str, 10+32*$i, 4));
+ $extID2 = hex(substr($full_hex_str, 14+32*$i, 4));
+ $fatAddr = hex(substr($full_hex_str, 18+32*$i, 8));
+ $fatLen = hex(substr($full_hex_str, 26+32*$i, 8));
+
+ $regbase2 .= sprintf("0x%04X", $devID);
+ $regbase2 .= sprintf("%04X" , $menuID).",";
+ $regbase2 .= sprintf("0x%04X", $extID2);
+ $regbase2 .= sprintf("%04X" , $extID1).",";
+ $regbase2 .= sprintf("0x%08X", $fatAddr).",";
+ $regbase2 .= sprintf("0x%08X", $fatLen).",";
+}
+print CFG "FLASH_CFG_STR =".$regbase2."\n";
+close CFG;
+
+print "Done\n";
+exit 0;
+
+#*************************************************************************************************
+# Error Handling Message
+#*************************************************************************************************
+sub error_handler
+{
+ my ($error_msg, $file, $line_no) = @_;
+ my $final_error_msg = "Error: $error_msg at $file line $line_no\n";
+ print "$final_error_msg";
+ die $final_error_msg;
+}