#!/bin/sh

echo "*** PACK ROOTFS BEGIN ***"

global SRC_DIR := $[pwd]

cd work

echo "Packing initramfs. This may take a while..."

# Remove the old 'initramfs' archive if it exists.
rm -f rootfs.cpio.gz

cd rootfs

# Packs the current 'initramfs' folder structure in 'cpio.xz' archive.
find . | cpio -R root:root -H newc -o | xz -9 --check=none > ../rootfs.cpio.xz

echo "Packing of initramfs has finished."

cd $SRC_DIR

echo "*** PACK ROOTFS END ***"

(CommandList
  children: [
    (C {(echo)} {(DQ ("*** PACK ROOTFS BEGIN ***"))})
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:SRC_DIR)
          op: Equal
          rhs: 
            {
              (CommandSubPart
                command_list: (CommandList children:[(C {(pwd)})])
                left_token: <Left_CommandSub "$(">
                spids: [12 14]
              )
            }
          spids: [11]
        )
      ]
      spids: [11]
    )
    (C {(cd)} {(work)})
    (C {(echo)} {(DQ ("Packing initramfs. This may take a while..."))})
    (C {(rm)} {(-f)} {(rootfs.cpio.gz)})
    (C {(cd)} {(rootfs)})
    (Pipeline
      children: [
        (C {(find)} {(.)})
        (C {(cpio)} {(-R)} {(root) (Lit_Other ":") (root)} {(-H)} {(newc)} {(-o)})
        (SimpleCommand
          words: [{(xz)} {(-9)} {(--check) (Lit_Other "=") (none)}]
          redirects: [(Redir op_id:Redir_Great fd:-1 arg_word:{(../rootfs.cpio.xz)} spids:[77])]
        )
      ]
      negated: False
    )
    (C {(echo)} {(DQ ("Packing of initramfs has finished."))})
    (C {(cd)} {($ VSub_Name "$SRC_DIR")})
    (C {(echo)} {(DQ ("*** PACK ROOTFS END ***"))})
  ]
)