All pastes #446866 Raw Edit

Untitled

public text v1 · immutable
·published 2007-04-18 18:32 UTC
rendered paste body
#!/bin/sh -h
# -*- sh -*-
# -*- ksh -*-

SetPAType() {
        # Determine HP architecture (PA1.1, PA2.0, etc.)
        if [ "$OLD_ARCH" = "HP" ]; then
                PA_STR="";
                if [ -r /opt/langtools/lib/sched.models ]; then
                        PAOS=`${UNAME} -m | ${SED} 's#^[^/]*/##`;
                        PA_STR=`${GREP} "^$PAOS" /opt/langtools/lib/sched.models`;
                        PA_STR="PA"`${ECHO} $PA_STR | ${AWK} '{print $2}'`;
                        PA_REV=`${ECHO} $PA_STR | ${SED} 's/[^0-9]//g'`;
                fi
                if [ `${ECHO} $PA_STR | ${EGREP} -c "PA[0-9]\.[0-9]"` = 0 ]; then
                        # Model wasn't found, try mapping from CPU version
                        CPU=`getconf _SC_CPU_VERSION`;
                        if [ "$CPU" = "523" ]; then
                                PA_STR="PA1.0";
                                PA_REV=10;
                        elif [ "$CPU" = "528" ]; then
                                PA_STR="PA1.1";
                                PA_REV=11;
                        elif [ "$CPU" = "529" ]; then
                                PA_STR="PA1.2";
                                PA_REV=12;
                        elif [ "$CPU" = "532" ]; then
                                PA_STR="PA2.0";
                                PA_REV=20;
                        else
                                PA_STR="PA?.?";
                                PA_REV=0;
                        fi
                fi
        return $PA_REV;
}