[1368] | 1 | #!/bin/bash |
---|
| 2 | # $Id$ |
---|
[293] | 3 | #-----------------------------------------------# |
---|
[728] | 4 | #--- What is host ? - w_i_h - 21/07/2009 ---# |
---|
[293] | 5 | #-----------------------------------------------# |
---|
| 6 | w_z=$(uname -s -n -r -m 2>/dev/null); |
---|
| 7 | [[ ${?} != 0 ]] && { exit 1; } |
---|
[728] | 8 | read u_s u_n u_r u_m <<< ${w_z} |
---|
[293] | 9 | unset w_z; |
---|
[2] | 10 | #- |
---|
[728] | 11 | d_n=$(dirname ${0}); |
---|
| 12 | #- |
---|
[293] | 13 | case ${u_s} in |
---|
| 14 | ( AIX ) \ |
---|
| 15 | { case ${u_n} in |
---|
[728] | 16 | ( zahir* ) DSYS="aix";; |
---|
| 17 | ( vargas* ) DSYS="aix6";; |
---|
| 18 | ( * ) DSYS="ax_mono"; |
---|
[293] | 19 | esac |
---|
| 20 | };; |
---|
[728] | 21 | ( AIXESA ) DSYS="aixesa";; |
---|
| 22 | ( ConvexOS ) DSYS="convex";; |
---|
| 23 | ( CP486 | dev ) DSYS="sco";; |
---|
| 24 | ( Darwin ) DSYS="Darwin";; |
---|
[293] | 25 | ( HP-UX ) \ |
---|
| 26 | { case ${u_n} in |
---|
[728] | 27 | ( moon ) DSYS="eshpux";; |
---|
| 28 | ( * ) DSYS="hpux";; |
---|
[293] | 29 | esac |
---|
| 30 | };; |
---|
| 31 | ( IRIX ) \ |
---|
| 32 | { case ${u_r} in |
---|
[728] | 33 | ( 4\.* ) DSYS="sgi4";; |
---|
| 34 | ( * ) DSYS="sgi5";; |
---|
[293] | 35 | esac |
---|
| 36 | };; |
---|
[728] | 37 | ( IRIX64 ) DSYS="sgi6";; |
---|
[293] | 38 | ( Linux ) \ |
---|
| 39 | { case ${u_n} in |
---|
[1990] | 40 | ( ada* ) DSYS="ada";; |
---|
[728] | 41 | ( asterix* | obelix* ) DSYS="lxiv8";; |
---|
[2791] | 42 | ( ciclad* ) DSYS="ifort_CICLAD";; |
---|
| 43 | ( camelot*|loholt*|merlin*)DSYS="ifort_CICLAD";; |
---|
[728] | 44 | ( argent[0-9]* ) DSYS="argent";; |
---|
| 45 | ( cesium[0-9]* ) DSYS="cesium";; |
---|
| 46 | ( platine[0-9]* ) DSYS="platine";; |
---|
[898] | 47 | ( titane[0-9]* ) DSYS="titane";; |
---|
[933] | 48 | ( mercure* ) \ |
---|
[728] | 49 | { DSYS="sx8mercure" |
---|
| 50 | u_l=$(/usr/bin/modulecmd bash list -t 2>&1) |
---|
| 51 | for h in ${u_l} |
---|
| 52 | do |
---|
| 53 | [[ ${h} = 'SX9' ]] && { DSYS="sx9mercure"; break; } |
---|
| 54 | done |
---|
| 55 | unset u_l h |
---|
| 56 | };; |
---|
| 57 | ( brodie ) DSYS="sx8brodie";; |
---|
| 58 | ( ulam ) DSYS="ulam";; |
---|
| 59 | ( ds[0-9]* ) DSYS="sxdkrz";; |
---|
| 60 | ( babel* ) DSYS="babel";; |
---|
[1594] | 61 | ( curie* ) DSYS="curie";; |
---|
[2634] | 62 | ( occigen* ) DSYS="occigen";; |
---|
[728] | 63 | ( * ) DSYS="linux";; |
---|
[293] | 64 | esac |
---|
| 65 | };; |
---|
[728] | 66 | ( MIPS ) DSYS="mips";; |
---|
| 67 | ( OSF1 ) DSYS="osf1";; |
---|
[293] | 68 | ( SunOS ) \ |
---|
| 69 | { case ${u_r} in |
---|
[728] | 70 | ( 5\.* ) DSYS="solaris";; |
---|
| 71 | ( * ) DSYS="sun";; |
---|
[293] | 72 | esac |
---|
| 73 | };; |
---|
[728] | 74 | ( SUPER-UX ) DSYS="nec";; |
---|
| 75 | ( ULTRIX ) DSYS="ultrix";; |
---|
| 76 | ( UNICOS | sn4803 | sn4602 ) DSYS="cray";; |
---|
| 77 | ( UNIX_System_V ) DSYS="fjvpp";; |
---|
[293] | 78 | (*) \ |
---|
| 79 | { case ${u_m} in |
---|
[728] | 80 | ( "CRAY T3E" ) DSYS="t3e";; |
---|
| 81 | ( * ) DSYS="Unknown";; |
---|
[293] | 82 | esac |
---|
| 83 | };; |
---|
| 84 | esac |
---|
[2] | 85 | #- |
---|
| 86 | echo "$DSYS"; |
---|
[293] | 87 | unset u_s u_n u_r u_m; |
---|
[2] | 88 | #- |
---|
| 89 | exit 0; |
---|
[1359] | 90 | |
---|