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