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 /minor/ and $ret .= "\tselect USES_MINOR\n";
31 /ubifs/ and $ret .= "\tselect USES_UBIFS\n";
32 /fpu/ and $ret .= "\tselect HAS_FPU\n";
33 /spe_fpu/ and $ret .= "\tselect HAS_SPE_FPU\n";
34 /ramdisk/ and $ret .= "\tselect USES_INITRAMFS\n";
35 /powerpc64/ and $ret .= "\tselect powerpc64\n";
36 /nommu/ and $ret .= "\tselect NOMMU\n";
37 /mips16/ and $ret .= "\tselect HAS_MIPS16\n";
38 /rfkill/ and $ret .= "\tselect RFKILL_SUPPORT\n";
39 /low_mem/ and $ret .= "\tselect LOW_MEMORY_FOOTPRINT\n";
40 /small_flash/ and $ret .= "\tselect SMALL_FLASH\n";
41 /nand/ and $ret .= "\tselect NAND_SUPPORT\n";
48 my $parent = $target->{parent
};
50 return $target->{parent
}->{name
}." - ".$target->{name
};
52 return $target->{name
};
59 if (substr($v,0,2) eq "2_") {
60 $v =~ /(\d+_\d+_\d+)(_\d+)?/ and $v = $1;
62 $v =~ /(\d+_\d+)(_\d+)?/ and $v = $1;
69 my $features = target_config_features
(@
{$target->{features
}});
70 my $help = $target->{desc
};
76 $help =~ s/^\s*/\t /mg;
77 $help = "\thelp\n$help";
82 my $v = kver
($target->{version
});
83 if (@
{$target->{subtargets
}} == 0) {
85 config TARGET_$target->{conf}
86 bool "$target->{name}"
92 config TARGET_$target->{conf}
93 bool "$target->{name}"
96 if ($target->{subtarget
}) {
97 $confstr .= "\tdepends on TARGET_$target->{boardconf}\n";
99 if (@
{$target->{subtargets
}} > 0) {
100 $confstr .= "\tselect HAS_SUBTARGETS\n";
101 grep { /broken/ } @
{$target->{features
}} and $confstr .= "\tdepends on BROKEN\n";
103 $confstr .= $features;
104 if ($target->{arch
} =~ /\w/) {
105 $confstr .= "\tselect $target->{arch}\n";
107 if ($target->{has_devices
}) {
108 $confstr .= "\tselect HAS_DEVICES\n";
112 foreach my $dep (@
{$target->{depends
}}) {
113 my $mode = "depends on";
117 $dep =~ /^([@\+\-]+)(.+)$/;
121 next if $name =~ /:/;
122 $flags =~ /-/ and $mode = "deselect";
123 $flags =~ /\+/ and $mode = "select";
124 $flags =~ /@/ and $confstr .= "\t$mode $name\n";
126 $confstr .= "$help\n\n";
130 sub merge_package_lists
($$) {
136 foreach my $pkg (@
$list1, @
$list2) {
139 foreach my $pkg (keys %pkgs) {
140 push @l, $pkg unless ($pkg =~ /^-/ or $pkgs{"-$pkg"});
145 sub gen_target_config
() {
146 my $file = shift @ARGV;
147 my @target = parse_target_metadata
($file);
150 my @target_sort = sort {
151 target_name
($a) cmp target_name
($b);
157 prompt "Target System"
158 default TARGET_ar71xx
163 foreach my $target (@target_sort) {
164 next if $target->{subtarget
};
165 print_target
($target);
172 prompt "Subtarget" if HAS_SUBTARGETS
174 foreach my $target (@target) {
175 next unless $target->{def_subtarget
};
177 default TARGET_$target->{conf}_$target->{def_subtarget} if TARGET_$target->{conf}
183 foreach my $target (@target) {
184 next unless $target->{subtarget
};
185 print_target
($target);
192 prompt "Target Profile"
195 foreach my $target (@target) {
196 my $profile = $target->{profiles
}->[0];
199 default TARGET_$target->{conf}_$profile->{id} if TARGET_$target->{conf}
205 config TARGET_MULTI_PROFILE
206 bool "Multiple devices"
207 depends on HAS_DEVICES
211 foreach my $target (@target) {
212 my $profiles = $target->{profiles
};
213 foreach my $profile (@
{$target->{profiles
}}) {
215 config TARGET_$target->{conf}_$profile->{id}
216 bool "$profile->{name}"
217 depends on TARGET_$target->{conf}
219 my @pkglist = merge_package_lists
($target->{packages
}, $profile->{packages
});
220 foreach my $pkg (@pkglist) {
221 print "\tselect DEFAULT_$pkg\n";
224 my $help = $profile->{desc
};
225 if ($help =~ /\w+/) {
226 $help =~ s/^\s*/\t /mg;
227 $help = "\thelp\n$help";
238 menu "Target Devices"
239 depends on TARGET_MULTI_PROFILE
242 foreach my $target (@target) {
243 my $profiles = $target->{profiles
};
244 foreach my $profile (@
{$target->{profiles
}}) {
245 next unless $profile->{id
} =~ /^DEVICE_/;
247 config TARGET_DEVICE_$target->{conf}_$profile->{id}
248 bool "$profile->{name}"
249 depends on TARGET_$target->{conf}
251 my @pkglist = merge_package_lists
($target->{packages
}, $profile->{packages
});
252 foreach my $pkg (@pkglist) {
253 print "\tselect DEFAULT_$pkg\n";
263 config HAS_SUBTARGETS
273 foreach my $target (@target) {
274 $target->{subtarget
} or print "\t\tdefault \"".$target->{board
}."\" if TARGET_".$target->{conf
}."\n";
277 config TARGET_SUBTARGET
279 default "generic" if !HAS_SUBTARGETS
283 foreach my $target (@target) {
284 foreach my $subtarget (@
{$target->{subtargets
}}) {
285 print "\t\tdefault \"$subtarget\" if TARGET_".$target->{conf
}."_$subtarget\n";
289 config TARGET_PROFILE
292 foreach my $target (@target) {
293 my $profiles = $target->{profiles
};
294 foreach my $profile (@
$profiles) {
295 print "\tdefault \"$profile->{id}\" if TARGET_$target->{conf}_$profile->{id}\n";
301 config TARGET_ARCH_PACKAGES
305 foreach my $target (@target) {
306 next if @
{$target->{subtargets
}} > 0;
307 print "\t\tdefault \"".($target->{arch_packages
} || $target->{board
})."\" if TARGET_".$target->{conf
}."\n";
311 config DEFAULT_TARGET_OPTIMIZATION
314 foreach my $target (@target) {
315 next if @
{$target->{subtargets
}} > 0;
316 print "\tdefault \"".$target->{cflags
}."\" if TARGET_".$target->{conf
}."\n";
318 print "\tdefault \"-Os -pipe -funit-at-a-time\"\n";
324 foreach my $target (@target) {
325 next if @
{$target->{subtargets
}} > 0;
326 print "\tdefault \"".$target->{cputype
}."\" if TARGET_".$target->{conf
}."\n";
328 print "\tdefault \"\"\n";
331 foreach my $target (@target) {
332 my $v = kver
($target->{version
});
342 foreach my $def (sort keys %defaults) {
343 print "\tconfig DEFAULT_".$def."\n";
344 print "\t\tbool\n\n";
348 sub gen_profile_mk
() {
349 my $file = shift @ARGV;
350 my $target = shift @ARGV;
351 my @targets = parse_target_metadata
($file);
352 foreach my $cur (@targets) {
353 next unless $cur->{id
} eq $target;
354 print "PROFILE_NAMES = ".join(" ", map { $_->{id
} } @
{$cur->{profiles
}})."\n";
355 foreach my $profile (@
{$cur->{profiles
}}) {
356 print $profile->{id
}.'_NAME:='.$profile->{name
}."\n";
357 print $profile->{id
}.'_PACKAGES:='.join(' ', @
{$profile->{packages
}})."\n";
362 sub parse_command
() {
363 GetOptions
("ignore=s", \
@ignore);
364 my $cmd = shift @ARGV;
366 /^config$/ and return gen_target_config
();
367 /^profile_mk$/ and return gen_profile_mk
();
371 $0 config [file] Target metadata in Kconfig format
372 $0 profile_mk [file] [target] Profile metadata in makefile format