+sub freedos {
+ my $ip = shift;
+
+ my $dir = "$server::base_dir/tftp/freedos";
+ mkdir $dir unless -e $dir;
+
+ symlink '/usr/lib/syslinux/memdisk', "$dir/memdisk" unless -e "$dir/memdisk";
+
+ my $floppy = 'freedos.img';
+
+ upstream::mirror_file 'http://www.ibiblio.org/pub/micro/pc-stuff/freedos/files/distributions/unofficial/balder/balder10.img' => "$dir/$floppy";
+
+ pxelinux::config_for_ip( $ip, qq{
+
+default freedos
+label freedos
+ kernel memdisk
+ append initrd=freedos.imz
+
+ });
+}
+