]> cvs.zerfleddert.de Git - m1-debian/blame - m1di.pl
remove 12.1 firmware after IRC chat with marcan, the workaround for ry darcy is no...
[m1-debian] / m1di.pl
CommitLineData
1524918e
TG
1#!/usr/bin/perl
2
1cee07b4
TG
3# SPDX-License-Identifier: MIT
4
4506cdc9
TG
5# Todo:
6# Create an exclude identifier list of all Apple volumes and build a safetey check
7# Detect if the paritions already exist and offer to reinstall system
8# Let the use pick between u-boot and untethered m1n1
9# Check that there is at least 1.5 GB space
10# Make sure that there is only one free region
11
1524918e
TG
12use strict;
13
14my ($identifier, $size);
15
16sub
17find_identifier_before_free_space
18{
19 my $identifier = undef;
20 my $size = undef;
21
22 for my $line (`diskutil list /dev/disk0`) {
23
24 if ($line =~ /^\s+\(free space\)\s+(\d+.\d GB)/) {
25 $size = $1;
26 $size =~ s/\s+//g;
27 last;
28 }
29
30 if ($line =~ /(disk0s\d)$/) {
31 $identifier = $1;
32 }
33 }
34
35 die if not defined $identifier;
36 die if not defined $size;
37
38 return ($identifier, $size);
39}
40
b403cd99
TG
41die "This script must be run as root\n" if ($< != 0);
42
1524918e
TG
43($identifier, $size) = find_identifier_before_free_space();
44system("diskutil addPartition $identifier %EFI% LB 512MB");
45
46$identifier = undef;
47
48for my $line (`diskutil list /dev/disk0`) {
49 if ($line =~ /EFI.*(disk0s\d)/) {
50 $identifier = $1;
51 }
52}
53
54die if not defined $identifier;
55
56system("newfs_msdos /dev/$identifier");
57system("mkdir -p /Volumes/efi");
58system("mount -t msdos /dev/$identifier /Volumes/efi");
59chdir('/Volumes/efi');
00dd11b5 60system('curl -sL https://tg.st/u/efi.tgz | tar -xz');
1524918e 61system('curl -sL tg.st/u/fwx.sh | bash');
d4539a8a
TG
62system('mkdir -p /Volumes/efi/vendorfw');
63system('cp /tmp/linux-firmware.tar /Volumes/efi/vendorfw/firmware.tar');
1524918e
TG
64chdir('/var/root');
65system('umount /Volumes/efi');
66
67($identifier, $size) = find_identifier_before_free_space();
68system("diskutil addPartition $identifier %Linux% %noformat% $size");
69
70$identifier = undef;
71
72for my $line (`diskutil list /dev/disk0`) {
73 if ($line =~ /Linux Filesystem.*(disk0s\d)/) {
74 $identifier = $1;
75 }
76}
77
78die if not defined $identifier;
79
80system("curl -L https://tg.st/u/m1.tgz | tar -xOz | dd of=/dev/$identifier bs=8m");
Impressum, Datenschutz