summaryrefslogtreecommitdiffstats
path: root/update_kernel
Commit message (Expand)AuthorAgeFilesLines
* back to 2.4.16.1mdk-1-1mdkPascal Rigaux2001-12-301-1/+1
* new BOOT kernel (2.4.16.10mdk-1-1mdk)Pascal Rigaux2001-12-191-1/+1
* - fix problems with sockets not initialized (disablingGuillaume Cottenceau2001-12-051-5/+4
* ensure errors are propagated (shell sux)Pascal Rigaux2001-12-041-1/+1
* new boot kernel 2.4.16.1mdk-1-1mdkPascal Rigaux2001-12-041-1/+1
* new BOOT kernel (2.4.13-9mdk)Pascal Rigaux2001-12-041-2/+2
* support install from USB CDROMS (using usb-storage)Guillaume Cottenceau2001-12-041-6/+5
* i810fbGuillaume Cottenceau2001-11-211-3/+4
* migrate pcmcia in drakx to use in-kernel version (onlyGuillaume Cottenceau2001-11-211-11/+1
* all needs pcmcia core modulesGuillaume Cottenceau2001-10-241-1/+1
* typo in update kernel by /meStew Benedict2001-10-161-2/+2
* New adress where to find the kernel BOOTChmouel Boudjnah2001-09-291-1/+1
* Adjust my patch for install_kernel.Chmouel Boudjnah2001-09-171-1/+1
* takes care of cardmgr in sbinPascal Rigaux2001-08-161-1/+5
* (install_kernel): small location fixesPascal Rigaux2001-08-141-3/+3
* update install_kernel to the fact that boot kernels are now rpmsPascal Rigaux2001-08-081-5/+6
* bloody cp -f not overriding the -iPascal Rigaux2001-08-041-4/+5
* minor fixPascal Rigaux2001-08-021-3/+3
* add support for install from USB Network AdaptersGuillaume Cottenceau2001-07-031-1/+5
* sort of a pixelizationGuillaume Cottenceau2001-06-211-10/+4
* add hfs support to rescue - PPC, fix bootstrap creation, formatting sequenceStew Benedict2001-05-251-2/+10
* have a fake main for cardmgr only if neededPascal Rigaux2001-04-111-2/+4
* *** empty log message ***Pascal Rigaux2001-04-041-1/+1
* update unuseful commentPascal Rigaux2001-04-021-4/+9
* change a bit because packdrake seems to parse the filename in some casesGuillaume Cottenceau2001-04-021-1/+2
* - remove all.kernels/cardmgr (allow more simple glob in all.kernels, and is n...Pascal Rigaux2001-03-301-9/+22
* support more than one boot kernel :-)Guillaume Cottenceau2001-03-291-28/+46
* restore update_kernel hability to build cardmgr...Francois Pons2001-03-271-2/+3
* mods to create/move image, to /export for PPC, use vmlinux for PPCStew Benedict2001-03-231-1/+5
* *** empty log message ***Pascal Rigaux2001-03-081-2/+1
* no need to fake the main to cardmgr_mainPascal Rigaux2001-02-271-2/+2
* - mar is still dumb when it comes to handling missing files. Restore thePascal Rigaux2001-02-031-1/+6
* - deprecate "hdreiser.img" since we have room for "reiserfs.o" in "hd.img"Guillaume Cottenceau2001-01-291-4/+2
* - mdk-stage1: now linux-2.4 uses floppy.o to access floppy drivesGuillaume Cottenceau2001-01-251-21/+21
* stage1: add pcmciaGuillaume Cottenceau2001-01-241-1/+1
* mar no more stops on file-not-foundsGuillaume Cottenceau2001-01-101-1/+1
* - use $(ls $*) instead of $* before giving args to mar otherwise mar stops onPascal Rigaux2001-01-061-2/+1
* re-integrate reiserfs.o gracias to kernel-2.4-boot2Guillaume Cottenceau2001-01-041-2/+2
* add checks of dependencies on marfilesGuillaume Cottenceau2001-01-031-13/+31
* make them work with kernel-2.4 by disabling non existent modulesGuillaume Cottenceau2000-12-221-2/+2
* adapt to new depmod (modutils)Pascal Rigaux2000-12-191-1/+1
* mdk-stage1 produces the boot images in CookerGuillaume Cottenceau2000-12-181-7/+7
* no_commentPascal Rigaux2000-10-051-1/+1
* try to fix hd_reiser.imgGuillaume Cottenceau2000-09-221-2/+2
* no_commentPascal Rigaux2000-09-211-15/+18
* no_commentPascal Rigaux2000-09-141-0/+6
* no_commentPascal Rigaux2000-09-131-4/+6
* no_commentPascal Rigaux2000-09-131-3/+6
* no_commentPascal Rigaux2000-09-051-4/+4
* *** empty log message ***Francois Pons2000-08-241-1/+1
generated by cgit v1.2.1 (git 2.21.0) at 2024-06-30 06:32:09 +0000
>'pReserved', ); $p_format = join '', @$p_format; my $magic = 0x4552; my $pmagic = 0x504D; sub first_usable_sector { 1 } sub adjustStart($$) { my ($hd, $part) = @_; my $end = $part->{start} + $part->{size}; my $partmap_end = $hd->{primary}{raw}[0]{size}; if ($part->{start} <= $partmap_end) { $part->{start} = $partmap_end + 1; $part->{size} = $end - $part->{start}; } } sub adjustEnd($$) { my ($_hd, $_part) = @_; } sub read($$) { my ($hd, $sector) = @_; my $tmp; my $F = partition_table::raw::openit($hd) or die "failed to open device"; c::lseek_sector(fileno($F), $sector, 0) or die "reading of partition in sector $sector failed"; sysread $F, $tmp, psizeof($bz_format) or die "error while reading bz (Block Zero) in sector $sector"; my %info; @info{@$bz_fields} = unpack $bz_format, $tmp; foreach (1 .. $info{bzDrvrCnt}) { sysread $F, $tmp, psizeof($dd_format) or die "error while reading driver data in sector $sector"; my %dd; @dd{@$dd_fields} = unpack $dd_format, $tmp; push @{$info{ddMap}}, \%dd; } #- check magic number $info{bzSig} == $magic or die "bad magic number on disk $hd->{device}"; my $numparts; c::lseek_sector(fileno($F), $sector, 516) or die "reading of partition in sector $sector failed"; sysread $F, $tmp, 4 or die "error while reading partition info in sector $sector"; $numparts = unpack "N", $tmp; my $partmapsize; c::lseek_sector(fileno($F), $sector, 524) or die "reading of partition in sector $sector failed"; sysread $F, $tmp, 4 or die "error while reading partition info in sector $sector"; $partmapsize = ((unpack "N", $tmp) * $info{bzBlkSize}) / psizeof($p_format); c::lseek_sector(fileno($F), $sector, 512) or die "reading of partition in sector $sector failed"; my @pt; for (my $i = 0; $i < $partmapsize; $i++) { my $part; sysread $F, $part, psizeof($p_format) or die "error while reading partition info in sector $sector"; push @pt, map { my %h; @h{@$p_fields} = unpack $p_format, $part; if ($i < $numparts && $h{pSig} eq $pmagic) { $h{size} = ($h{pPBlocks} * $info{bzBlkSize}) / 512; $h{start} = ($h{pPBlockStart} * $info{bzBlkSize}) / 512; if ($h{pType} =~ /^Apple_UNIX_SVR2/i) { $h{pName} =~ /swap/i ? ($h{type} = 0x82) : ($h{type} = 0x83); } elsif ($h{pType} =~ /^Apple_Free/i) { #- need to locate a 1MB partition to setup a bootstrap on if ($freepart && $freepart->{size} >= 1) { #- already found a suitable partition } else { $freepart = { start => $h{start}, size => $h{size}/2048, hd => $hd, part => "/dev/$hd->{device}" . ($i+1) }; log::l("free apple partition found on drive /dev/$freepart->{hd}{device}, block $freepart->{start}, size $freepart->{size}"); } $h{type} = 0x0; $h{pName} = 'Extra'; } elsif ($h{pType} =~ /^Apple_HFS/i) { $h{type} = 0x402; if (defined $macos_part) { #- swag at identifying MacOS - 1st HFS partition } else { $macos_part = "/dev/" . $hd->{device} . ($i+1); log::l("found MacOS at partition $macos_part"); } } elsif ($h{pType} =~ /^Apple_Partition_Map/i) { $h{type} = 0x401; $h{isMap} = 1; } elsif ($h{pType} =~ /^Apple_Bootstrap/i) { $h{type} = 0x401; $h{isBoot} = 1; if (defined $bootstrap_part) { #found a bootstrap already - use it, but log the find log::l("found another apple bootstrap at partition /dev/$hd->{device}" . ($i+1)); } else { $bootstrap_part = "/dev/" . $hd->{device} . ($i+1); log::l("found apple bootstrap at partition $bootstrap_part"); } } else { $h{type} = 0x401; $h{isDriver} = 1; }; # Let's see if this partition is a driver. foreach (@{$info{ddMap}}) { $_->{ddBlock} == $h{pPBlockStart} and $h{isDriver} = 1; } } \%h; } [ $part ]; }; [ @pt ], \%info; } sub write($$$;$) { my ($hd, $sector, $pt, $info) = @_; #- handle testing for writing partition table on file only! my $F; if ($::testing) { my $file = "/tmp/partition_table_$hd->{device}"; open $F, ">$file" or die "error opening test file $file"; } else { $F = partition_table::raw::openit($hd, 2) or die "error opening device $hd->{device} for writing"; c::lseek_sector(fileno($F), $sector, 0) or return 0; } # Find the partition map. my @partstowrite; my $part = $pt->[0]; defined $part->{isMap} or die "the first partition is not the partition map"; push @partstowrite, $part; # Now go thru the partitions, sort and fill gaps. my $last; while ($part) { $last = $part; $part = &partition_table::next($hd, $part); $part or last; if ($last->{start} + $last->{size} < $part->{start}) { #There is a gap between partitions. Fill it and move on. push @partstowrite, { type => 0x0, start => $last->{start} + $last->{size}, size => $part->{start} - ($last->{start} + $last->{size}), }; } push @partstowrite, $part; }; # now, fill a gap at the end if there is one. if ($last->{start} + $last->{size} < $hd->{totalsectors}) { push @partstowrite, { type => 0x0, start => $last->{start} + $last->{size}, size => $hd->{totalsectors} - ($last->{start} + $last->{size}), }; } # Since we didn't create any new drivers, let's try and match up our driver records with out partitons and see if any are missing. $info->{bzDrvrCnt} = 0; my @ddstowrite; foreach my $dd (@{$info->{ddMap}}) { foreach (@partstowrite) { if ($dd->{ddBlock} == $_->{pPBlockStart}) { push @ddstowrite, $dd; $info->{bzDrvrCnt}++; last; } } } # Now let's write our first block. syswrite $F, pack($bz_format, @$info{@$bz_fields}), psizeof($bz_format) or return 0; # ...and now the driver information. foreach (@ddstowrite) { syswrite $F, pack($dd_format, @$_{@$dd_fields}), psizeof($dd_format) or return 0; } # zero the rest of the data in the first block. foreach (1 .. (494 - ((@ddstowrite) * 8))) { syswrite $F, "\0", 1 or return 0; } #c::lseek_sector(fileno($F), $sector, 512) or return 0; # Now, we iterate thru the partstowrite and write them. foreach (@partstowrite) { if (!defined $_->{pSig}) { # The values we need to write to disk are not defined. Let's make them up. $_->{pSig} = $pmagic; $_->{pSigPad} = 0; $_->{pPBlockStart} = ($_->{start} * 512) / $info->{bzBlkSize}; $_->{pPBlocks} = ($_->{size} * 512) / $info->{bzBlkSize}; $_->{pLBlockStart} = 0; $_->{pLBlocks} = $_->{pPBlocks}; $_->{pBootBlock} = 0; $_->{pBootBytes} = 0; $_->{pAddrs1} = 0; $_->{pAddrs2} = 0; $_->{pAddrs3} = 0; $_->{pAddrs4} = 0; $_->{pChecksum} = 0; $_->{pProcID} = "\0"; $_->{pBootArgs} = "\0"; $_->{pReserved} = "\0"; if ($_->{type} == 0x402) { $_->{pType} = "Apple_HFS"; $_->{pName} = "MacOS"; $_->{pFlags} = 0x4000037F; } elsif ($_->{type} == 0x401 && $_->{start} == 1) { $_->{pType} = "Apple_Partition_Map"; $_->{pName} = "Apple"; $_->{pFlags} = 0x33; } elsif ($_->{type} == 0x401) { $_->{pType} = "Apple_Bootstrap"; $_->{pName} = "bootstrap"; $_->{pFlags} = 0x33; $_->{isBoot} = 1; log::l("writing a bootstrap at /dev/$_->{device}"); $install_steps_interactive::new_bootstrap = 1 if !(defined $partition_table::mac::bootstrap_part); $bootstrap_part = "/dev/" . $_->{device}; } elsif ($_->{type} == 0x82) { $_->{pType} = "Apple_UNIX_SVR2"; $_->{pName} = "swap"; $_->{pFlags} = 0x33; } elsif ($_->{type} == 0x83) { $_->{pType} = "Apple_UNIX_SVR2"; $_->{pName} = "Linux Native"; $_->{pFlags} = 0x33; } elsif ($_->{type} == 0x183) { $_->{pType} = "Apple_UNIX_SVR2"; $_->{pName} = "Linux ReiserFS"; $_->{pFlags} = 0x33; } elsif ($_->{type} == 0x283) { $_->{pType} = "Apple_UNIX_SVR2"; $_->{pName} = "Linux XFS"; $_->{pFlags} = 0x33; } elsif ($_->{type} == 0x383) { $_->{pType} = "Apple_UNIX_SVR2"; $_->{pName} = "Linux JFS"; $_->{pFlags} = 0x33; } elsif ($_->{type} == 0x483) { $_->{pType} = "Apple_UNIX_SVR2"; $_->{pName} = "Linux ext3"; $_->{pFlags} = 0x33; } elsif ($_->{type} == 0x0) { $_->{pType} = "Apple_Free"; $_->{pName} = "Extra"; $_->{pFlags} = 0x31; } }; $_->{pMapEntry} = @partstowrite; syswrite $F, pack($p_format, @$_{@$p_fields}), psizeof($p_format) or return 0; } common::sync(); 1; } sub info { my ($hd) = @_; # - Build the first block of the drive. my $info = { bzSig => $magic, bzBlkSize => 512, bzBlkCnt => $hd->{totalsectors}, bzDevType => 0, bzDevID => 0, bzReserved => 0, bzDrvrCnt => 0, }; $info; } sub clear_raw { my ($hd) = @_; my @oldraw = @{$hd->{primary}{raw}}; my $pt = { raw => [ ({}) x 63 ], info => info($hd) }; #- handle special case for partition 1 which is the partition map. $pt->{raw}[0] = { type => 0x401, start => 1, size => 63, isMap => 1, }; # $pt->{raw}[1] = { # type => 0x0, # start => 64, # size => $hd->{totalsectors} - 64, # isMap => 0, # }; push @{$pt->{normal}}, $pt->{raw}[0]; # push @{$pt->{normal}}, $pt->{raw}[1]; #- Recover any Apple Drivers, if any. my $i = 1; foreach (@oldraw) { if (defined $_->{isDriver}) { $pt->{raw}[$i] = $_; push @{$pt->{normal}}, $pt->{raw}[$i]; $i++; } }; @{$pt->{info}{ddMap}} = @{$hd->{primary}{info}{ddMap}}; $pt; } 1;
generated by cgit v1.2.1 (git 2.21.0) at 2024-06-30 06:32:09 +0000