Fix ManjaroLinux in grub (fallback only), simple gambas script

Post

Posted
Rating:
#1 (In Topic #500)
BruceSteers
Banned
Here's a quick simple example of gambas scripting.
I was initially writing this script with bash but it has been much better to do it with gambas scripting.

What it does….
If you have ManjaroLinux on a disk but it's not your main disk and not the disk grub is installed from then the os-probe get's some details wrong about manjaro and makes a grub.cfg file that will only boot manjaro in "fallback" mode.

The reason is this…
On the Manjaro disk it's grub.cfg file will have a line like this at the end of the ManjaroLinux menu entry.
initrd  /boot/intel-ucode.img /boot/initramfs-5.8-x86_64.img

But if your grub is set up on another drive it's grub.cfg will look like this..
initrd  /boot/intel-ucode.img

I've made the simple fix before, more than once though as it reverts to the "wrong" config every time update-grub is run on the main OS.
So a simple script to fix it is born :) lol

So run this script from your main OS and it will auto-detect your Manjaro drive (if mounted) and read it's grub.cfg file to get the correct initrd line. (or you can manually select the Manjaro grub.cfg file if not detected.

It then reads the grub.cfg file from your running OS and Changes the initrd lines to be correct.
If run as root it will save the /boot/grub/grub.cfg automatically and job done.
If not run as root it will save a new modified grub.cfg file to your desktop for you to copy manually.

Wishing Well :)

(Ps. the Message() requesters show a gtk warning in the cli, ignore it. Benoit is looking into it.
change Use "gb.gui" to Use "gb.qt5" to use qt)

File Fix-manjaro-grub-entries.gbs

Code (gambas)

  1. #!/usr/bin/env gbs3
  2.  
  3. ' Gambas script file
  4.  
  5. Use "gb.gui"
  6.  
  7.  
  8. Public sMGrubLine As String
  9.  
  10. Public Sub Main()
  11.  
  12. If Access("/boot/grub/grub.cfg", gb.Write) = False Then
  13.  If Message.Warning("Warning no write access!\n\nRun this script as root to save\nyour grub.cfg file directly.\nOtherwise the file will be saved to your Desktop", "Continue", "Cancel") <> 1 Then Quit 1
  15.  
  16. Dim sVar, sText As String
  17. Shell "lsblk -o MOUNTPOINT,FSTYPE|grep /|grep ext4|awk '\{print $1}'" To sVar
  18. sVar = Trim(sVar)
  19. Dialog.Path = ""
  20. For Each sVar In Split(sVar, gb.Lf)
  21.  If Exist(sVar &/ "etc/os-release") Then
  22.  sText = File.Load(sVar &/ "etc/os-release")
  23.   If InStr(sText, "Manjaro") Then
  24.    Print "\nFound Manjaro on disk: " & sVar
  25.    If Message.Question("Found Manjaro on..\n" & sVar & "\n\nUse /boot/grub/grub.cfg\nfrom this Drive?", "Yes", "Choose grub.cfg file") = 1 Then
  26.    Dialog.Path = sVar &/ "boot/grub/grub.cfg"
  27.    Goto SkipChooser
  32.  
  33.  
  34. Print "Manjaro not auto-detected, opening file requester.."
  35. Message("Select the\n/boot/grub/grub.cfg file\non your Manjaro harddrive")
  36.  
  38. .Title = "Choose grub.cfg"
  39. .Path = "/media" &/ User.Name
  40. .Filter = ["*.cfg", "Grub cfg Files"]
  41. If .OpenFile() Then Return
  43.  
  44. SkipChooser:
  45.  
  46. Print "\nUsing '" & Dialog.Path & "'"
  47. sMGrubLine = GetManjaroLine(Dialog.Path)
  48.  
  49. If Not sMGrubLine Then
  50. Message.Error("Error.\nCould not find initrd line from\n" & Dialog.Path)
  52.  
  53. EditGrub()
  54.  
  56.  
  57.  
  58. Public Sub GetManjaroLine(sFile As String) As String
  59.  
  60. Dim sLines As String[] = Split(File.Load(sFile), gb.Lf)
  61. Dim bActive As Boolean, sLine As String
  62. For iCount As Integer = 0 To sLines.Max
  63. sLine = sLines[iCount]
  64. If InStr(sLine, "--class manjaro") Then
  65. bActive = True
  69. If InStr(sLine, "initrd") Then
  70. Print "\nFound initrd on line " & (iCount + 1) & " in Manjaro grub.cfg\n" & sLine
  71.  Return sLine
  75.  
  77.  
  78. Public Sub EditGrub()
  79. If Not Exist("/boot/grub/grub.cfg") Then
  80. Print "/bot/grub/grub.cfg not found, aborting."
  83. Dim sLines As String[] = Split(File.Load("/boot/grub/grub.cfg"), gb.Lf)
  84. Dim bActive As Boolean
  85. Dim iLine As Integer = 0
  86. Dim sLine As String
  87.  
  88. For iLine = 0 To sLines.Max
  89.  
  90.  If InStr(sLines[iLine], "menuentry 'Manjaro Linux") And (Not InStr(sLines[iLine], "fallback")) Then
  91.   Print "\nFound menuentry: " & Split(sLines[iLine], "'")[1]
  92.   bActive = True
  95.  
  97.  
  98. If InStr(sLines[iLine], "initrd") Then
  99. Print "Changing grub.cfg Line: " & (iLine + 1)
  100. sLines[iLine] = "\t" & sMGrubLine
  101. bActive = False
  104.  
  105. If Access("/boot/grub/grub.cfg", gb.Write) = True Then
  106. Print "Root permissions granted, saving '/boot/grub/grub.cfg'"
  107. File.Save("/boot/grub/grub.cfg", sLines.Join(gb.Lf))
  109. Print "Root permissions not granted, saving as " & User.Home &/ "Desktop/grub.cfg"
  110. File.Save(User.Home &/ "Desktop/grub.cfg", sLines.Join(gb.Lf))
  113. Print "An error occured..\n" & Error.Text
  115.  
Online now: No Back to the top
1 guest and 0 members have just viewed this.