mcu/tools/custominfo.pl - T800_MD_V1.6 - Gitiles

 #!/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).
 #
 #
 #******************************************************************************
 # Module Use
 #******************************************************************************
 use File::Copy;
 use File::Path;
 use File::Spec;
 my $dev_nul = File::Spec->devnull();
 #******************************************************************************
 # Subroutine: Usage
 #******************************************************************************
 sub usage {
   print "perl custominfo.pl <Makefile>\n";
   exit 1;
 }

 #******************************************************************************
 # Check input arguments
 #******************************************************************************
 &Usage if ($#ARGV == -1);
 $thefile = $ARGV[0];

 die "$thefile does NOT exist\n" if (!-e $thefile);
 if ($thefile =~ /make\/(\w+)_(\w+)\((\w+)\)\.mak/i) {
   $custom = uc($1);
   $project = lc($2);
   print " custom = $custom\n project = $project \n flavor = $3 \n";
 }

 ($custom eq "") && &Usage;
 ($project eq "") && &Usage;

 open (FILE_HANDLE, "<$thefile") or die "Cannot open $thefile\n";
 while (<FILE_HANDLE>) {
   if ((/^([^\#]*)\#?.*/) && ($1 =~ /^(\w+)\s*=\s*(.*\S)\s*$/)){
     $keyname = lc($1);
     $${keyname} = uc($2);
   }
 }
 close FILE_HANDLE;

 if (($mmi_version eq "NEPTUNE_MMI") || ($mmi_version eq "NEPTUNE_COLOR_MMI")) {
   $mmidir = "lcmmi";
 } else {
   $mmidir = "plutommi";
 }

 #******************************************************************************
 # Section for
 # >>> Copy default files to project folder
 #******************************************************************************
 if (defined $touch_panel_shortcut_support) {
   if ($touch_panel_shortcut_support eq "TRUE") {
     copy("pcore/custom/common/touch_panel_shortcut_custom.c.tmp", "pcore/custom/app/$board_ver/touch_panel_shortcut_custom.c");
     copy("pcore/custom/common/touch_panel_shortcut_custom.h.tmp", "pcore/custom/app/$board_ver/touch_panel_shortcut_custom.h");
   }
 }

 if (-d "${mmidir}/Customer/Images/decoder/RGB565") {
 	copy("copy ${mmidir}/Customer/Images/decoder/RGB565/*.*", "${mmidir}/Customer/Images");
 }

 #******************************************************************************
 # Procress for JAVA
 #******************************************************************************
 my @thatdirs;

 if (($project ne "basic") && ($project ne "l1s") && defined($j2me_support)) {
   if ($j2me_support ne "NONE") {
     if ($j2me_support eq "JBLENDIA") {
       push(@thatdirs, "j2me/JBLENDIA");
       $j2me_boardBB = $board_ver;
     } elsif ($j2me_support eq "JBLENDIA_MVM") {
       push(@thatdirs, "j2me/jblendia_mvm");
       $j2me_boardBB = $board_ver;
     } elsif ($j2me_support eq "JBED") {
     	push(@thatdirs, "j2me/JBED");
     	$j2me_boardBB = $board_ver;
     } elsif ($j2me_support eq "NEMO") {
     	push(@thatdirs, "j2me/NEMO");
     	$j2me_boardBB = $board_ver;
       if ($original_flavor !~ /\bNONE\b/i) {
         $j2me_boardBB = "${board_ver}\($original_flavor\)";
       }
     }elsif($j2me_support eq "IJET"){
       push(@thatdirs, "j2me/IJET");
       $j2me_boardBB = $board_ver;
       if ($original_flavor !~ /\bNONE\b/i) {
         $j2me_boardBB = "${board_ver}\($original_flavor\)";
       }
     } elsif ($j2me_support eq "MTK_DUMMY_MVM") {
     	push(@thatdirs, "j2me/DUMMY");
     	$j2me_boardBB = $board_ver;
     } else {
       push(@thatdirs, "j2me/DUMMY");
       $j2me_boardBB = $board_ver;
       if ($original_flavor !~ /\bNONE\b/i) {
         $j2me_boardBB = "${board_ver}\($original_flavor\)";
       }
     }
     my $j2meFolder = $j2me_support;
     if($j2me_support eq "MTK_DUMMY_MVM"){
       $j2meFolder = "DUMMY";
     }
     if (!-e "pcore/custom/j2me/$j2meFolder/$j2me_boardBB/j2me_custom_option.h") {
       if (-e "pcore/custom/j2me/$j2meFolder/_DEFAULT_BB/_j2me_custom_option.h") {
         copy("pcore/custom/j2me/$j2meFolder/_DEFAULT_BB/_j2me_custom_option.h", "pcore/custom/j2me/$j2meFolder/_DEFAULT_BB/j2me_custom_option.h");
       }
     } else {
     	if (-e "pcore/custom/j2me/$j2meFolder/_DEFAULT_BB/j2me_custom_option.h") {
       	unlink("pcore/custom/j2me/$j2meFolder/_DEFAULT_BB/j2me_custom_option.h");
       }
     }

     if (!-e "pcore/custom/j2me/$j2meFolder/$j2me_boardBB/j2me_custom_param.h") {
       if (-e "pcore/custom/j2me/$j2meFolder/_DEFAULT_BB/_j2me_custom_param.h") {
         copy("pcore/custom/j2me/$j2meFolder/_DEFAULT_BB/_j2me_custom_param.h", "pcore/custom/j2me/$j2meFolder/_DEFAULT_BB/j2me_custom_param.h");
       }
     } else {
       if (-e "pcore/custom/j2me/$j2meFolder/_DEFAULT_BB/j2me_custom_param.h") {
       	unlink("pcore/custom/j2me/$j2meFolder/_DEFAULT_BB/j2me_custom_param.h");
       }
     }
   }
 }

 foreach $t (@thatdirs) {
   $thatdir = "pcore/custom/$t";
   $defaultBB =  "$thatdir/_DEFAULT_BB";
   $boardBB = "${thatdir}/${board_ver}";
   if ($j2me_support eq "IJET") {
     $j2me_boardBB = $boardBB;
     if (($original_flavor !~ /\bNONE\b/i) && (!-e "${thatdir}/${board_ver}\($original_flavor\)")) {
       print "${thatdir}/${board_ver}\($original_flavor\) does not exist. Please execute romizing first.\n";
       exit(1);
     }
     if ($original_flavor !~ /\bNONE\b/i) {
       if (-e "${thatdir}/${board_ver}\($original_flavor\)") {
         $j2me_boardBB = "${thatdir}/${board_ver}\($original_flavor\)";
       }
     }
   }elsif ($j2me_support eq "NEMO") {
     $j2me_boardBB = $boardBB;
     if (($original_flavor !~ /\bNONE\b/i) && (!-e "${thatdir}/${board_ver}\($original_flavor\)")) {
       print "${thatdir}/${board_ver}\($original_flavor\) does not exist. Please execute romizing first.\n";
       exit(1);
   }
     if ($original_flavor !~ /\bNONE\b/i) {
       if (-e "${thatdir}/${board_ver}\($original_flavor\)") {
         $j2me_boardBB = "${thatdir}/${board_ver}\($original_flavor\)";
       }
     }
   }
   if ($j2me_support eq "JBLENDIA" || $j2me_support eq "JBLENDIA_MVM") {

     $gameGenDir = "$defaultBB/jblend_preinstall";
     $gameExe = "DirRomizer.exe";
     $gamePapay = "PapayaPik.exe";
     $gameConfig = "PapayaPik.cfg";
     $gameGenFile = "${gameGenDir}/$gameExe";
     $certRomizer = "certRomizer.exe";
     $certRomizerFile = "${gameGenDir}/$certRomizer";
     $certRomizerString = $certRomizerFile;
     if ((-d $defaultBB) && (-d $gameGenDir) && (-e $gameGenFile)) {
       chdir($gameGenDir);
       $gamecfg = "../../$board_ver/$gameConfig";
       $gamecfgdir = "../../$board_ver";
       if (-e $gamecfg) {
       	unlink("$gamecfg");
       }
       if (!-e $gamecfg) {
       	mkpath("$gamecfgdir") if (!-e $gamecfgdir);
         copy($gameConfig, $gamecfg);
         open (GAME_CFG_H, ">>$gamecfg") or die "Cannot open $gamecfg\n";
         $jarcnt = 1;
         if (((-d "../../$board_ver") && (<../../$board_ver/*.jar>)) ||
             (!((($mmi_version eq "PLUTO_MMI")||($mmi_version eq "COSMOS_MMI")||($mmi_version eq "NEPTUNE_MMI")||($mmi_version eq "NEPTUNE_COLOR_MMI")) &&
              ($empty_resource eq "FALSE")))) {
           while ($jarname = <../../${board_ver}/*.jar>) {
             $jadname = $jarname;
             $jadname =~ s/\.jar/\.jad/;
             ($jadname = "") if (!-e $jadname);
             print GAME_CFG_H "MIDletSuite-$jarcnt: $jadname , $jarname\n";
             $jarcnt++;
           }
         } else {
           while ($jarname = <../*.jar>) {
             $jadname = $jarname;
             $jadname =~ s/\.jar/\.jad/;
             ($jadname = "") if (!-e $jadname);
             print GAME_CFG_H "MIDletSuite-$jarcnt: $jadname , $jarname\n";
             $jarcnt++;
           }
         }
         close GAME_CFG_H;
       }
       unlink("./rom/*");
       print("$gamePapay -config $gamecfg\n");
       system("$gamePapay -config $gamecfg");
       print("$gameExe rom\n");
       system("$gameExe rom > $dev_nul");
       move("kjava_sys_data_content.c", "../../$board_ver");
       move("kjava_sys_data_content.h", "../../$board_ver");
       # back to mcu folder
       chdir("../../../../..");
     }
     # For certRomizer.exe
     if (-e "$boardBB/kjava_sys_ext_cert.c") {
       unlink("$boardBB/kjava_sys_ext_cert.c");
     }
     if (-e "$defaultBB/kjava_sys_ext_cert.c") {
       unlink("$defaultBB/kjava_sys_ext_cert.c");
     }

     if (-e $certRomizerFile) {
     	if (<$boardBB/cert/*.cer>) {
     		while (<$boardBB/cert/*.cer>) {
     			$certRomizerString = $certRomizerString." ".$_;
     		}
         system("$certRomizerString > $boardBB/kjava_sys_ext_cert.c");
     	} elsif (<$gameGenDir/cert/*.cer>){
     		  while (<$gameGenDir/cert/*.cer>) {
     			  $certRomizerString = $certRomizerString." ".$_;
     		  }
     		  system("$certRomizerString > $defaultBB/kjava_sys_ext_cert.c");
       }
     }
   } else {
     $gameGenDir = "$defaultBB/builtin_game_generator";
     $gameExe = "DefaultGameGen.exe";
     $gameGenFile = "${gameGenDir}/$gameExe";
     $ori_board_ver = $board_ver;
     if ($original_flavor !~ /\bNONE\b/i) {
       $board_ver = "${board_ver}\($original_flavor\)";
     }
     if ((-d $defaultBB) && (-d $gameGenDir) && (-e $gameGenFile)) {
       chdir($gameGenDir);
       if (((-d "../../$board_ver") && ((<../../$board_ver/*.jar>) || (<../../$board_ver/*.jad>))) ||
           (!((($mmi_version eq "PLUTO_MMI")||($mmi_version eq "COSMOS_MMI")||($mmi_version eq "NEPTUNE_MMI")||($mmi_version eq "NEPTUNE_COLOR_MMI")) ))) {
          if ((-d "../../$board_ver") && ((-e "../../$board_ver/_main.ks") && (-e "../../$board_ver/_policy.txt") && (-e "../../$board_ver/_tck.ks") )) {
            print("$gameExe -certfolder -setpath ./setting -inputSystem ../../$board_ver -inputMidlet ../../$board_ver -output ../../$board_ver -create -logpath ../../$board_ver\n");
            system("$gameExe -certfolder -setpath ./setting -inputSystem ../../$board_ver -inputMidlet ../../$board_ver -output ../../$board_ver -create -logpath ../../$board_ver");
                     } else {
            print("$gameExe -certfolder -setpath ./setting -inputSystem .. -inputMidlet ../../$board_ver -output ../../$board_ver -create -logpath ../../$board_ver\n");
            system("$gameExe -certfolder -setpath ./setting -inputSystem .. -inputMidlet ../../$board_ver -output ../../$board_ver -create -logpath ../../$board_ver");

          }
       } else {
          if ((-d "../../$board_ver") && ((-e "../../$board_ver/_main.ks") && (-e "../../$board_ver/_policy.txt") && (-e "../../$board_ver/_tck.ks") )) {
            print("$gameExe -certfolder -setpath ./setting -inputSystem ../../$board_ver -inputMidlet .. -output ../../$board_ver -create -logpath ..\n");
            system("$gameExe -certfolder -setpath ./setting -inputSystem ../../$board_ver -inputMidlet .. -output ../../$board_ver -create -logpath ..");

          } else {
            print("$gameExe -certfolder -setpath ./setting -inputSystem .. -inputMidlet .. -output .. -create -logpath ..\n");
            system("$gameExe -certfolder -setpath ./setting -inputSystem .. -inputMidlet .. -output .. -create -logpath ..");

          }
       }
       # back to mcu folder
       chdir("../../../../..");
     } else {
       print("Skip to generate JAVA game due to no $gameGenFile\n");
     }
     $board_ver = $ori_board_ver;
   }

 }

 exit(0);
	#!/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).
	#
	#
	#******************************************************************************
	# Module Use
	#******************************************************************************
	use File::Copy;
	use File::Path;
	use File::Spec;
	my $dev_nul = File::Spec->devnull();
	#******************************************************************************
	# Subroutine: Usage
	#******************************************************************************
	sub usage {
	print "perl custominfo.pl <Makefile>\n";
	exit 1;
	}

	#******************************************************************************
	# Check input arguments
	#******************************************************************************
	&Usage if ($#ARGV == -1);
	$thefile = $ARGV[0];

	die "$thefile does NOT exist\n" if (!-e $thefile);
	if ($thefile =~ /make\/(\w+)_(\w+)\((\w+)\)\.mak/i) {
	$custom = uc($1);
	$project = lc($2);
	print " custom = $custom\n project = $project \n flavor = $3 \n";
	}

	($custom eq "") && &Usage;
	($project eq "") && &Usage;

	open (FILE_HANDLE, "<$thefile") or die "Cannot open $thefile\n";
	while (<FILE_HANDLE>) {
	if ((/^([^\#])\#?./) && ($1 =~ /^(\w+)\s=\s(.\S)\s$/)){
	$keyname = lc($1);
	$${keyname} = uc($2);
	}
	}
	close FILE_HANDLE;

	if (($mmi_version eq "NEPTUNE_MMI") \|\| ($mmi_version eq "NEPTUNE_COLOR_MMI")) {
	$mmidir = "lcmmi";
	} else {
	$mmidir = "plutommi";
	}

	#******************************************************************************
	# Section for
	# >>> Copy default files to project folder
	#******************************************************************************
	if (defined $touch_panel_shortcut_support) {
	if ($touch_panel_shortcut_support eq "TRUE") {
	copy("pcore/custom/common/touch_panel_shortcut_custom.c.tmp", "pcore/custom/app/$board_ver/touch_panel_shortcut_custom.c");
	copy("pcore/custom/common/touch_panel_shortcut_custom.h.tmp", "pcore/custom/app/$board_ver/touch_panel_shortcut_custom.h");
	}
	}

	if (-d "${mmidir}/Customer/Images/decoder/RGB565") {
	copy("copy ${mmidir}/Customer/Images/decoder/RGB565/.", "${mmidir}/Customer/Images");
	}

	#******************************************************************************
	# Procress for JAVA
	#******************************************************************************
	my @thatdirs;

	if (($project ne "basic") && ($project ne "l1s") && defined($j2me_support)) {
	if ($j2me_support ne "NONE") {
	if ($j2me_support eq "JBLENDIA") {
	push(@thatdirs, "j2me/JBLENDIA");
	$j2me_boardBB = $board_ver;
	} elsif ($j2me_support eq "JBLENDIA_MVM") {
	push(@thatdirs, "j2me/jblendia_mvm");
	$j2me_boardBB = $board_ver;
	} elsif ($j2me_support eq "JBED") {
	push(@thatdirs, "j2me/JBED");
	$j2me_boardBB = $board_ver;
	} elsif ($j2me_support eq "NEMO") {
	push(@thatdirs, "j2me/NEMO");
	$j2me_boardBB = $board_ver;
	if ($original_flavor !~ /\bNONE\b/i) {
	$j2me_boardBB = "${board_ver}\($original_flavor\)";
	}
	}elsif($j2me_support eq "IJET"){
	push(@thatdirs, "j2me/IJET");
	$j2me_boardBB = $board_ver;
	if ($original_flavor !~ /\bNONE\b/i) {
	$j2me_boardBB = "${board_ver}\($original_flavor\)";
	}
	} elsif ($j2me_support eq "MTK_DUMMY_MVM") {
	push(@thatdirs, "j2me/DUMMY");
	$j2me_boardBB = $board_ver;
	} else {
	push(@thatdirs, "j2me/DUMMY");
	$j2me_boardBB = $board_ver;
	if ($original_flavor !~ /\bNONE\b/i) {
	$j2me_boardBB = "${board_ver}\($original_flavor\)";
	}
	}
	my $j2meFolder = $j2me_support;
	if($j2me_support eq "MTK_DUMMY_MVM"){
	$j2meFolder = "DUMMY";
	}
	if (!-e "pcore/custom/j2me/$j2meFolder/$j2me_boardBB/j2me_custom_option.h") {
	if (-e "pcore/custom/j2me/$j2meFolder/_DEFAULT_BB/_j2me_custom_option.h") {
	copy("pcore/custom/j2me/$j2meFolder/_DEFAULT_BB/_j2me_custom_option.h", "pcore/custom/j2me/$j2meFolder/_DEFAULT_BB/j2me_custom_option.h");
	}
	} else {
	if (-e "pcore/custom/j2me/$j2meFolder/_DEFAULT_BB/j2me_custom_option.h") {
	unlink("pcore/custom/j2me/$j2meFolder/_DEFAULT_BB/j2me_custom_option.h");
	}
	}

	if (!-e "pcore/custom/j2me/$j2meFolder/$j2me_boardBB/j2me_custom_param.h") {
	if (-e "pcore/custom/j2me/$j2meFolder/_DEFAULT_BB/_j2me_custom_param.h") {
	copy("pcore/custom/j2me/$j2meFolder/_DEFAULT_BB/_j2me_custom_param.h", "pcore/custom/j2me/$j2meFolder/_DEFAULT_BB/j2me_custom_param.h");
	}
	} else {
	if (-e "pcore/custom/j2me/$j2meFolder/_DEFAULT_BB/j2me_custom_param.h") {
	unlink("pcore/custom/j2me/$j2meFolder/_DEFAULT_BB/j2me_custom_param.h");
	}
	}
	}
	}

	foreach $t (@thatdirs) {
	$thatdir = "pcore/custom/$t";
	$defaultBB = "$thatdir/_DEFAULT_BB";
	$boardBB = "${thatdir}/${board_ver}";
	if ($j2me_support eq "IJET") {
	$j2me_boardBB = $boardBB;
	if (($original_flavor !~ /\bNONE\b/i) && (!-e "${thatdir}/${board_ver}\($original_flavor\)")) {
	print "${thatdir}/${board_ver}\($original_flavor\) does not exist. Please execute romizing first.\n";
	exit(1);
	}
	if ($original_flavor !~ /\bNONE\b/i) {
	if (-e "${thatdir}/${board_ver}\($original_flavor\)") {
	$j2me_boardBB = "${thatdir}/${board_ver}\($original_flavor\)";
	}
	}
	}elsif ($j2me_support eq "NEMO") {
	$j2me_boardBB = $boardBB;
	if (($original_flavor !~ /\bNONE\b/i) && (!-e "${thatdir}/${board_ver}\($original_flavor\)")) {
	print "${thatdir}/${board_ver}\($original_flavor\) does not exist. Please execute romizing first.\n";
	exit(1);
	}
	if ($original_flavor !~ /\bNONE\b/i) {
	if (-e "${thatdir}/${board_ver}\($original_flavor\)") {
	$j2me_boardBB = "${thatdir}/${board_ver}\($original_flavor\)";
	}
	}
	}
	if ($j2me_support eq "JBLENDIA" \|\| $j2me_support eq "JBLENDIA_MVM") {

	$gameGenDir = "$defaultBB/jblend_preinstall";
	$gameExe = "DirRomizer.exe";
	$gamePapay = "PapayaPik.exe";
	$gameConfig = "PapayaPik.cfg";
	$gameGenFile = "${gameGenDir}/$gameExe";
	$certRomizer = "certRomizer.exe";
	$certRomizerFile = "${gameGenDir}/$certRomizer";
	$certRomizerString = $certRomizerFile;
	if ((-d $defaultBB) && (-d $gameGenDir) && (-e $gameGenFile)) {
	chdir($gameGenDir);
	$gamecfg = "../../$board_ver/$gameConfig";
	$gamecfgdir = "../../$board_ver";
	if (-e $gamecfg) {
	unlink("$gamecfg");
	}
	if (!-e $gamecfg) {
	mkpath("$gamecfgdir") if (!-e $gamecfgdir);
	copy($gameConfig, $gamecfg);
	open (GAME_CFG_H, ">>$gamecfg") or die "Cannot open $gamecfg\n";
	$jarcnt = 1;
	if (((-d "../../$board_ver") && (<../../$board_ver/*.jar>)) \|\|
	(!((($mmi_version eq "PLUTO_MMI")\|\|($mmi_version eq "COSMOS_MMI")\|\|($mmi_version eq "NEPTUNE_MMI")\|\|($mmi_version eq "NEPTUNE_COLOR_MMI")) &&
	($empty_resource eq "FALSE")))) {
	while ($jarname = <../../${board_ver}/*.jar>) {
	$jadname = $jarname;
	$jadname =~ s/\.jar/\.jad/;
	($jadname = "") if (!-e $jadname);
	print GAME_CFG_H "MIDletSuite-$jarcnt: $jadname , $jarname\n";
	$jarcnt++;
	}
	} else {
	while ($jarname = <../*.jar>) {
	$jadname = $jarname;
	$jadname =~ s/\.jar/\.jad/;
	($jadname = "") if (!-e $jadname);
	print GAME_CFG_H "MIDletSuite-$jarcnt: $jadname , $jarname\n";
	$jarcnt++;
	}
	}
	close GAME_CFG_H;
	}
	unlink("./rom/*");
	print("$gamePapay -config $gamecfg\n");
	system("$gamePapay -config $gamecfg");
	print("$gameExe rom\n");
	system("$gameExe rom > $dev_nul");
	move("kjava_sys_data_content.c", "../../$board_ver");
	move("kjava_sys_data_content.h", "../../$board_ver");
	# back to mcu folder
	chdir("../../../../..");
	}
	# For certRomizer.exe
	if (-e "$boardBB/kjava_sys_ext_cert.c") {
	unlink("$boardBB/kjava_sys_ext_cert.c");
	}
	if (-e "$defaultBB/kjava_sys_ext_cert.c") {
	unlink("$defaultBB/kjava_sys_ext_cert.c");
	}

	if (-e $certRomizerFile) {
	if (<$boardBB/cert/*.cer>) {
	while (<$boardBB/cert/*.cer>) {
	$certRomizerString = $certRomizerString." ".$_;
	}
	system("$certRomizerString > $boardBB/kjava_sys_ext_cert.c");
	} elsif (<$gameGenDir/cert/*.cer>){
	while (<$gameGenDir/cert/*.cer>) {
	$certRomizerString = $certRomizerString." ".$_;
	}
	system("$certRomizerString > $defaultBB/kjava_sys_ext_cert.c");
	}
	}
	} else {
	$gameGenDir = "$defaultBB/builtin_game_generator";
	$gameExe = "DefaultGameGen.exe";
	$gameGenFile = "${gameGenDir}/$gameExe";
	$ori_board_ver = $board_ver;
	if ($original_flavor !~ /\bNONE\b/i) {
	$board_ver = "${board_ver}\($original_flavor\)";
	}
	if ((-d $defaultBB) && (-d $gameGenDir) && (-e $gameGenFile)) {
	chdir($gameGenDir);
	if (((-d "../../$board_ver") && ((<../../$board_ver/.jar>) \|\| (<../../$board_ver/.jad>))) \|\|
	(!((($mmi_version eq "PLUTO_MMI")\|\|($mmi_version eq "COSMOS_MMI")\|\|($mmi_version eq "NEPTUNE_MMI")\|\|($mmi_version eq "NEPTUNE_COLOR_MMI")) ))) {
	if ((-d "../../$board_ver") && ((-e "../../$board_ver/_main.ks") && (-e "../../$board_ver/_policy.txt") && (-e "../../$board_ver/_tck.ks") )) {
	print("$gameExe -certfolder -setpath ./setting -inputSystem ../../$board_ver -inputMidlet ../../$board_ver -output ../../$board_ver -create -logpath ../../$board_ver\n");
	system("$gameExe -certfolder -setpath ./setting -inputSystem ../../$board_ver -inputMidlet ../../$board_ver -output ../../$board_ver -create -logpath ../../$board_ver");
	} else {
	print("$gameExe -certfolder -setpath ./setting -inputSystem .. -inputMidlet ../../$board_ver -output ../../$board_ver -create -logpath ../../$board_ver\n");
	system("$gameExe -certfolder -setpath ./setting -inputSystem .. -inputMidlet ../../$board_ver -output ../../$board_ver -create -logpath ../../$board_ver");

	}
	} else {
	if ((-d "../../$board_ver") && ((-e "../../$board_ver/_main.ks") && (-e "../../$board_ver/_policy.txt") && (-e "../../$board_ver/_tck.ks") )) {
	print("$gameExe -certfolder -setpath ./setting -inputSystem ../../$board_ver -inputMidlet .. -output ../../$board_ver -create -logpath ..\n");
	system("$gameExe -certfolder -setpath ./setting -inputSystem ../../$board_ver -inputMidlet .. -output ../../$board_ver -create -logpath ..");

	} else {
	print("$gameExe -certfolder -setpath ./setting -inputSystem .. -inputMidlet .. -output .. -create -logpath ..\n");
	system("$gameExe -certfolder -setpath ./setting -inputSystem .. -inputMidlet .. -output .. -create -logpath ..");

	}
	}
	# back to mcu folder
	chdir("../../../../..");
	} else {
	print("Skip to generate JAVA game due to no $gameGenFile\n");
	}
	$board_ver = $ori_board_ver;
	}

	}

	exit(0);