[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";; |
---|
[2359] | 42 | ( ciclad* ) DSYS="ifort_CICLAD";; |
---|
[728] | 43 | ( argent[0-9]* ) DSYS="argent";; |
---|
| 44 | ( cesium[0-9]* ) DSYS="cesium";; |
---|
| 45 | ( platine[0-9]* ) DSYS="platine";; |
---|
[898] | 46 | ( titane[0-9]* ) DSYS="titane";; |
---|
[933] | 47 | ( mercure* ) \ |
---|
[728] | 48 | { DSYS="sx8mercure" |
---|
| 49 | u_l=$(/usr/bin/modulecmd bash list -t 2>&1) |
---|
| 50 | for h in ${u_l} |
---|
| 51 | do |
---|
| 52 | [[ ${h} = 'SX9' ]] && { DSYS="sx9mercure"; break; } |
---|
| 53 | done |
---|
| 54 | unset u_l h |
---|
| 55 | };; |
---|
| 56 | ( brodie ) DSYS="sx8brodie";; |
---|
| 57 | ( ulam ) DSYS="ulam";; |
---|
| 58 | ( ds[0-9]* ) DSYS="sxdkrz";; |
---|
| 59 | ( babel* ) DSYS="babel";; |
---|
[1594] | 60 | ( curie* ) DSYS="curie";; |
---|
[728] | 61 | ( * ) DSYS="linux";; |
---|
[293] | 62 | esac |
---|
| 63 | };; |
---|
[728] | 64 | ( MIPS ) DSYS="mips";; |
---|
| 65 | ( OSF1 ) DSYS="osf1";; |
---|
[293] | 66 | ( SunOS ) \ |
---|
| 67 | { case ${u_r} in |
---|
[728] | 68 | ( 5\.* ) DSYS="solaris";; |
---|
| 69 | ( * ) DSYS="sun";; |
---|
[293] | 70 | esac |
---|
| 71 | };; |
---|
[728] | 72 | ( SUPER-UX ) DSYS="nec";; |
---|
| 73 | ( ULTRIX ) DSYS="ultrix";; |
---|
| 74 | ( UNICOS | sn4803 | sn4602 ) DSYS="cray";; |
---|
| 75 | ( UNIX_System_V ) DSYS="fjvpp";; |
---|
[293] | 76 | (*) \ |
---|
| 77 | { case ${u_m} in |
---|
[728] | 78 | ( "CRAY T3E" ) DSYS="t3e";; |
---|
| 79 | ( * ) DSYS="Unknown";; |
---|
[293] | 80 | esac |
---|
| 81 | };; |
---|
| 82 | esac |
---|
[2] | 83 | #- |
---|
| 84 | echo "$DSYS"; |
---|
[293] | 85 | unset u_s u_n u_r u_m; |
---|
[2] | 86 | #- |
---|
| 87 | exit 0; |
---|
[1359] | 88 | |
---|