3 use lib "$FindBin::Bin";
8 sub target_config_features(@) {
11 while ($_ = shift @_) {
12 /arm_v(\w+)/ and $ret .= "\tselect arm_v$1\n";
13 /broken/ and $ret .= "\tdepends on BROKEN\n";
14 /audio/ and $ret .= "\tselect AUDIO_SUPPORT\n";
15 /display/ and $ret .= "\tselect DISPLAY_SUPPORT\n";
16 /dt/ and $ret .= "\tselect USES_DEVICETREE\n";
17 /gpio/ and $ret .= "\tselect GPIO_SUPPORT\n";
18 /pci/ and $ret .= "\tselect PCI_SUPPORT\n";
19 /pcie/ and $ret .= "\tselect PCIE_SUPPORT\n";
20 /usb/ and $ret .= "\tselect USB_SUPPORT\n";
21 /usbgadget/ and $ret .= "\tselect USB_GADGET_SUPPORT\n";
22 /pcmcia/ and $ret .= "\tselect PCMCIA_SUPPORT\n";
23 /rtc/ and $ret .= "\tselect RTC_SUPPORT\n";
24 /squashfs/ and $ret .= "\tselect USES_SQUASHFS\n";
25 /jffs2$/ and $ret .= "\tselect USES_JFFS2\n";
26 /jffs2_nand/ and $ret .= "\tselect USES_JFFS2_NAND\n";
27 /ext4/ and $ret .= "\tselect USES_EXT4\n";
28 /targz/ and $ret .= "\tselect USES_TARGZ\n";
29 /cpiogz/ and $ret .= "\tselect USES_CPIOGZ\n";
30 /ubifs/ and $ret .= "\tselect USES_UBIFS\n";
31 /fpu/ and $ret .= "\tselect HAS_FPU\n";
32 /spe_fpu/ and $ret .= "\tselect HAS_SPE_FPU\n";
33 /ramdisk/ and $ret .= "\tselect USES_INITRAMFS\n";
34 /powerpc64/ and $ret .= "\tselect powerpc64\n";
35 /nommu/ and $ret .= "\tselect NOMMU\n";
36 /mips16/ and $ret .= "\tselect HAS_MIPS16\n";
37 /rfkill/ and $ret .= "\tselect RFKILL_SUPPORT\n";
38 /low_mem/ and $ret .= "\tselect LOW_MEMORY_FOOTPRINT\n";
39 /small_flash/ and $ret .= "\tselect SMALL_FLASH\n";
40 /nand/ and $ret .= "\tselect NAND_SUPPORT\n";
47 my $parent = $target->{parent};
49 return $target->{parent}->{name}." - ".$target->{name};
51 return $target->{name};
58 if (substr($v,0,2) eq "2_") {
59 $v =~ /(\d+_\d+_\d+)(_\d+)?/ and $v = $1;
61 $v =~ /(\d+_\d+)(_\d+)?/ and $v = $1;
68 my $features = target_config_features(@{$target->{features}});
69 my $help = $target->{desc};
75 $help =~ s/^\s*/\t /mg;
76 $help = "\thelp\n$help";
81 my $v = kver($target->{version});
82 if (@{$target->{subtargets}} == 0) {
84 config TARGET_$target->{conf}
85 bool "$target->{name}"
91 config TARGET_$target->{conf}
92 bool "$target->{name}"
95 if ($target->{subtarget}) {
96 $confstr .= "\tdepends on TARGET_$target->{boardconf}\n";
98 if (@{$target->{subtargets}} > 0) {
99 $confstr .= "\tselect HAS_SUBTARGETS\n";
100 grep { /broken/ } @{$target->{features}} and $confstr .= "\tdepends on BROKEN\n";
102 $confstr .= $features;
103 if ($target->{arch} =~ /\w/) {
104 $confstr .= "\tselect $target->{arch}\n";
106 if ($target->{has_devices}) {
107 $confstr .= "\tselect HAS_DEVICES\n";
111 foreach my $dep (@{$target->{depends}}) {
112 my $mode = "depends on";
116 $dep =~ /^([@\+\-]+)(.+)$/;
120 next if $name =~ /:/;
121 $flags =~ /-/ and $mode = "deselect";
122 $flags =~ /\+/ and $mode = "select";
123 $flags =~ /@/ and $confstr .= "\t$mode $name\n";
125 $confstr .= "$help\n\n";
129 sub merge_package_lists($$) {
135 foreach my $pkg (@$list1, @$list2) {
138 foreach my $pkg (keys %pkgs) {
139 push @l, $pkg unless ($pkg =~ /^-/ or $pkgs{"-$pkg"});
144 sub gen_target_config() {
145 my $file = shift @ARGV;
146 my @target = parse_target_metadata($file);
149 my @target_sort = sort {
150 target_name($a) cmp target_name($b);
156 prompt "Target System"
157 default TARGET_ar71xx
162 foreach my $target (@target_sort) {
163 next if $target->{subtarget};
164 print_target($target);
171 prompt "Subtarget" if HAS_SUBTARGETS
173 foreach my $target (@target) {
174 next unless $target->{def_subtarget};
176 default TARGET_$target->{conf}_$target->{def_subtarget} if TARGET_$target->{conf}
182 foreach my $target (@target) {
183 next unless $target->{subtarget};
184 print_target($target);
191 prompt "Target Profile"
194 foreach my $target (@target) {
195 my $profile = $target->{profiles}->[0];
198 default TARGET_$target->{conf}_$profile->{id} if TARGET_$target->{conf}
204 config TARGET_MULTI_PROFILE
205 bool "Multiple devices"
206 depends on HAS_DEVICES
210 foreach my $target (@target) {
211 my $profiles = $target->{profiles};
212 foreach my $profile (@{$target->{profiles}}) {
214 config TARGET_$target->{conf}_$profile->{id}
215 bool "$profile->{name}"
216 depends on TARGET_$target->{conf}
218 my @pkglist = merge_package_lists($target->{packages}, $profile->{packages});
219 foreach my $pkg (@pkglist) {
220 print "\tselect DEFAULT_$pkg\n";
223 my $help = $profile->{desc};
224 if ($help =~ /\w+/) {
225 $help =~ s/^\s*/\t /mg;
226 $help = "\thelp\n$help";
237 menu "Target Devices"
238 depends on TARGET_MULTI_PROFILE
241 foreach my $target (@target) {
242 my $profiles = $target->{profiles};
243 foreach my $profile (@{$target->{profiles}}) {
244 next unless $profile->{id} =~ /^DEVICE_/;
246 config TARGET_DEVICE_$target->{conf}_$profile->{id}
247 bool "$profile->{name}"
248 depends on TARGET_$target->{conf}
250 my @pkglist = merge_package_lists($target->{packages}, $profile->{packages});
251 foreach my $pkg (@pkglist) {
252 print "\tselect DEFAULT_$pkg\n";
262 config HAS_SUBTARGETS
272 foreach my $target (@target) {
273 $target->{subtarget} or print "\t\tdefault \"".$target->{board}."\" if TARGET_".$target->{conf}."\n";
276 config TARGET_SUBTARGET
278 default "generic" if !HAS_SUBTARGETS
282 foreach my $target (@target) {
283 foreach my $subtarget (@{$target->{subtargets}}) {
284 print "\t\tdefault \"$subtarget\" if TARGET_".$target->{conf}."_$subtarget\n";
288 config TARGET_PROFILE
291 foreach my $target (@target) {
292 my $profiles = $target->{profiles};
293 foreach my $profile (@$profiles) {
294 print "\tdefault \"$profile->{id}\" if TARGET_$target->{conf}_$profile->{id}\n";
300 config TARGET_ARCH_PACKAGES
304 foreach my $target (@target) {
305 next if @{$target->{subtargets}} > 0;
306 print "\t\tdefault \"".($target->{arch_packages} || $target->{board})."\" if TARGET_".$target->{conf}."\n";
310 config DEFAULT_TARGET_OPTIMIZATION
313 foreach my $target (@target) {
314 next if @{$target->{subtargets}} > 0;
315 print "\tdefault \"".$target->{cflags}."\" if TARGET_".$target->{conf}."\n";
317 print "\tdefault \"-Os -pipe -funit-at-a-time\"\n";
323 foreach my $target (@target) {
324 next if @{$target->{subtargets}} > 0;
325 print "\tdefault \"".$target->{cputype}."\" if TARGET_".$target->{conf}."\n";
327 print "\tdefault \"\"\n";
330 foreach my $target (@target) {
331 my $v = kver($target->{version});
341 foreach my $def (sort keys %defaults) {
342 print "\tconfig DEFAULT_".$def."\n";
343 print "\t\tbool\n\n";
347 sub gen_profile_mk() {
348 my $file = shift @ARGV;
349 my $target = shift @ARGV;
350 my @targets = parse_target_metadata($file);
351 foreach my $cur (@targets) {
352 next unless $cur->{id} eq $target;
353 print "PROFILE_NAMES = ".join(" ", map { $_->{id} } @{$cur->{profiles}})."\n";
354 foreach my $profile (@{$cur->{profiles}}) {
355 print $profile->{id}.'_NAME:='.$profile->{name}."\n";
356 print $profile->{id}.'_PACKAGES:='.join(' ', @{$profile->{packages}})."\n";
361 sub parse_command() {
362 GetOptions("ignore=s", \@ignore);
363 my $cmd = shift @ARGV;
365 /^config$/ and return gen_target_config();
366 /^profile_mk$/ and return gen_profile_mk();
370 $0 config [file] Target metadata in Kconfig format
371 $0 profile_mk [file] [target] Profile metadata in makefile format