]> cvs.zerfleddert.de Git - m1-debian/blame_incremental - files/wifi.pl
more notes
[m1-debian] / files / wifi.pl
... / ...
CommitLineData
1#!/usr/bin/perl
2
3use strict;
4use warnings FATAL => 'all';
5
6my $firmware_tarball = '/mnt/linux-firmware.tar';
7my @vfat_devices;
8
9for (`blkid`) {
10 if (/^([^:]+):.*vfat/) {
11 push @vfat_devices, $1;
12 }
13}
14
15for my $dev (@vfat_devices) {
16 system("mount -o ro $dev /mnt");
17 if (-f $firmware_tarball) {
18 system("tar -C /lib/firmware/ -xf $firmware_tarball");
19 system('rmmod brcmfmac');
20 system('rmmod brcmutil');
21 sleep(1);
22 system('modprobe brcmfmac');
23 sleep(1);
24 system('rmmod brcmfmac');
25 sleep(1);
26 system('modprobe brcmfmac');
27 }
28 system('umount /mnt');
29
30}
Impressum, Datenschutz