#!/bin/sh
#
# arch/s390x/boot/install.sh
#
# This file is subject to the terms and conditions of the GNU General Public
# License.  See the file "COPYING" in the main directory of this archive
# for more details.
#
# Copyright (C) 1995 by Linus Torvalds
#
# Adapted from code in arch/i386/boot/Makefile by H. Peter Anvin
#
# "make install" script for s390 architecture
#
# Arguments:
#   $1 - kernel version
#   $2 - kernel image file
#   $3 - kernel map file
#   $4 - default install path (blank if root directory)
#

# User may have a custom install script

if test -x ~/bin/$(INSTALLKERNEL) { exec ~/bin/$(INSTALLKERNEL) @Argv; }
if test -x /sbin/$(INSTALLKERNEL) { exec /sbin/$(INSTALLKERNEL) @Argv; }

# Default install - same as make zlilo

if test -f $4/vmlinuz {
	mv $4/vmlinuz $4/vmlinuz.old
}

if test -f $4/System.map {
	mv $4/System.map $4/System.old
}

cat $2 > $4/vmlinuz
cp $3 $4/System.map
(CommandList
  children: [
    (If
      arms: [
        (if_arm
          cond: [
            (Sentence
              child: 
                (C {(Lit_Other "[")} {(-x)} 
                  {(TildeSubPart prefix:"") (/bin/) (${ VSub_Name INSTALLKERNEL)} {(Lit_Other "]")}
                )
              terminator: <Op_Semi ";">
            )
          ]
          action: [
            (Sentence
              child: 
                (C {(exec)} {(TildeSubPart prefix:"") (/bin/) (${ VSub_Name INSTALLKERNEL)} 
                  {(DQ ($ VSub_At "$@"))}
                )
              terminator: <Op_Semi ";">
            )
          ]
          spids: [-1 80]
        )
      ]
      spids: [-1 95]
    )
    (If
      arms: [
        (if_arm
          cond: [
            (Sentence
              child: 
                (C {(Lit_Other "[")} {(-x)} {(/sbin/) (${ VSub_Name INSTALLKERNEL)} {(Lit_Other "]")})
              terminator: <Op_Semi ";">
            )
          ]
          action: [
            (Sentence
              child: (C {(exec)} {(/sbin/) (${ VSub_Name INSTALLKERNEL)} {(DQ ($ VSub_At "$@"))})
              terminator: <Op_Semi ";">
            )
          ]
          spids: [-1 111]
        )
      ]
      spids: [-1 125]
    )
    (If
      arms: [
        (if_arm
          cond: [
            (Sentence
              child: (C {(Lit_Other "[")} {(-f)} {($ VSub_Number "$4") (/vmlinuz)} {(Lit_Other "]")})
              terminator: <Op_Semi ";">
            )
          ]
          action: [(C {(mv)} {($ VSub_Number "$4") (/vmlinuz)} {($ VSub_Number "$4") (/vmlinuz.old)})]
          spids: [-1 144]
        )
      ]
      spids: [-1 155]
    )
    (If
      arms: [
        (if_arm
          cond: [
            (Sentence
              child: 
                (C {(Lit_Other "[")} {(-f)} {($ VSub_Number "$4") (/System.map)} {(Lit_Other "]")})
              terminator: <Op_Semi ";">
            )
          ]
          action: [(C {(mv)} {($ VSub_Number "$4") (/System.map)} {($ VSub_Number "$4") (/System.old)})]
          spids: [-1 170]
        )
      ]
      spids: [-1 181]
    )
    (SimpleCommand
      words: [{(cat)} {($ VSub_Number "$2")}]
      redirects: [
        (Redir
          op_id: Redir_Great
          fd: -1
          arg_word: {($ VSub_Number "$4") (/vmlinuz)}
          spids: [188]
        )
      ]
    )
    (C {(cp)} {($ VSub_Number "$3")} {($ VSub_Number "$4") (/System.map)})
  ]
)