home *** CD-ROM | disk | FTP | other *** search
/ Freelog 9 / Freelog009.iso / BAS / Systeme / ShellUnix / NOACCESS.SH < prev    next >
Linux/UNIX/POSIX Shell Script  |  1998-07-09  |  14KB  |  393 lines
  1. #!/bin/sh 
  2. #---------------------------------------------------------------------- 
  3. # NOM 
  4. #    NoAccess = Liste des fichiers non accedes depuis une date donnee.
  5. # 
  6. # SYNTAXE 
  7. #    NoAccess -h|H     (aide) 
  8. #    NoAccess [-b] [-T +nb] [-t nb] [-l login]
  9. # 
  10. #---------------------------------------------------------------------- 
  11. # VERSION 
  12. #   2.0
  13. #
  14. # DESCRIPTION 
  15. #
  16. #    * Elle recherche les fichiers (se trouvant sous son
  17. #   Home directory) non accedes en lecture et ecriture depuis plus
  18. #   d'un certain nombre de jours (-t +nb).
  19. #    Plus precisement , elle comptabilise le nombre total de ces
  20. #   fichiers et recupere le nom du ou des plus grands fichiers .
  21. #
  22. #    * Il est egalement possible de ne recuperer que les fichiers
  23. #   qui depassent une certaine taille (-T nb). 
  24. #                               
  25. #    * Le mode Brut permet d'effectuer des "formatages" personnels
  26. #   en effectuant un traitement particulier sur les resultats. Par
  27. #   defaut la procedure presente les informations sous la forme d'un
  28. #   tableau :
  29. #
  30. #   ** Exemple de resultat en mode Brut :
  31. # NbNoAccess:     1361    +3
  32. # Sup_1_NoAccess: 3-Feb-15:13  1204224 ./bin/hp/display +3
  33. # Sup_1_NoAccess: 18-Feb-08:54 1486776 ./Tips/TipsHP +3
  34. # Sup_1_NoAccess: 8-Mar-21:22  3225088 ./windows/word/divers/wrkdoc.doc +3
  35. # Sup_1_NoAccess: 5-Jun-07:48  2171392 ./windows/word/divers/doc.doc +3
  36. # Sup_1_NoAccess: 19-Feb-18:03 1633280 ./windows/word/tmp/acc_new.ppt +3
  37. # Sup_1_NoAccess: 17-Apr-14:34 2764075 ./windows/mail/aconserver.txt +3
  38. # 
  39. #   ** Exemple de resultat formate par la procedure :
  40. # Recherche effectuee a partir du repertoire : /home/toto
  41. # +-------------------------------------------------------------------------+
  42. # | Vous avez  1361 fichiers non accedes depuis  +3 jours.                  |
  43. # | Liste des fichiers de plus de   1 Mo - La taille des fichiers est en Ko |
  44. # +----------+-------------+------------------------------------------------+
  45. # |  TAILLE  |  DATE ACCES |  REPERTOIRE ET NOM DE FICHIER                  |
  46. # +----------+-------------+------------------------------------------------+
  47. # |  1204224 | 3-Feb-15:13 | ./bin/hp/display 
  48. # |  1486776 |18-Feb-08:54 | ./Tips/TipsHP 
  49. # |  3225088 | 8-Mar-21:22 | ./windows/word/divers/wrkdoc.doc 
  50. # |  2171392 | 5-Jun-07:48 | ./windows/word/divers/doc.doc 
  51. # |  1633280 |19-Feb-18:03 | ./windows/word/tmp/acc_new.ppt 
  52. # |  2764075 |17-Apr-14:34 | ./windows/mail/aconserver.txt 
  53. # +----------+-------------+------------------------------------------------+
  54. # 
  55. # OPTION(S) 
  56. #    -h|H        aide courte ou longue. 
  57. #
  58. #    -T +nb      fichiers non accedes (ecriture / lecture)
  59. #                depuis plus de nb (nombre de jours). Si l'option n'est
  60. #                pas precise, la recherche s'effectue sur les fichiers
  61. #                de plus de 15 jours (+15).
  62. #
  63. #    -t nb       nb taille des fichiers en Mega-octets.
  64. # 
  65. #    -l login    Pour un login particulier, par defaut le login
  66. #                courant est utilise.
  67. # 
  68. #    -b          Mode Brut, les informations ne sont pas formatees
  69. #                et sont envoyees sur la sortie standard sous forme
  70. #                de colonne avec un libelle (1ere colonne) designant
  71. #                le type d'information.
  72. # 
  73. # EXEMPLE(S) 
  74. #
  75. #    * Recherche des fichiers non accedes depuis plus de 30 jours
  76. #    dont la taille est superieure a 5 Mo :
  77. #              NoAccess -t +30 -T 5
  78. # 
  79. # AUTEUR
  80. #   Bertrand Le Quellec 
  81. # 
  82. # CONTACT
  83. #   eMail : blq@mygale.org ou blq@wanadoo.fr
  84. #   Url   : http://www.mygale.org/09/blq/ ou http://perso.wanadoo.fr/blq/
  85. #
  86. # Cree : 10/11/93 - Derniere modification : 30/06/98
  87. #---------------------------------------------------------------------- 
  88. # Permission to use, copy, modify, distribute, and sell this software
  89. # and its documentation for any purpose is hereby granted without fee,
  90. # provided that the above copyright notice appear in all copies and
  91. # that both that copyright notice and this permission notice appear in
  92. # supporting documentation, and that the name of Bertrand LE QUELLEC    
  93. # not be used in advertising or publicity pertaining to distribution 
  94. # of the software without specific, written prior permission. Bertrand 
  95. # LE QUELLEC makes no representations about the suitability of
  96. # this software for any purpose. It is provided "as is" without
  97. # express or implied warranty.
  98. #
  99. # THIS SOFTWARE IS PROVIDED BY Bertrand LE QUELLEC `AS IS' AND ANY
  100. # EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  101. # IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  102. # PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL Bertrand LE QUELLEC BE
  103. # LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  104. # CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  105. # SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
  106. # BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
  107. # WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE
  108. # OR OTHERWISE)     ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
  109. # EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  110. #---------------------------------------------------------------------- 
  111.  
  112. # ------------------------------------------
  113. # ZONE DE DEFINITION DES VARIABLES GLOBALES:
  114. # ------------------------------------------
  115. NOM_PROCEDURE=`basename $0`
  116. LA_PROCEDURE=$0
  117.  
  118. CD=`pwd`
  119. AWK=`[ -f /usr/bin/nawk ] && echo "nawk" || echo "awk" `
  120.  
  121. MODE_COULEUR=0
  122.  
  123. ##
  124. ## Variables particulieres:
  125. ##
  126. DATE=`date "+%d/%m/%y"`
  127. DEFAUT_USER=`whoami`
  128. HOSTNAME=`hostname`
  129. NISHOST=`ypwhich -m passwd 2> /dev/null`
  130. UNAME=`uname`
  131. RSH=`[ "$UNAME" = "HP-UX" -o "$UNAME" = "AIX" ] && echo "remsh" || echo "rsh"`
  132.  
  133.  
  134. #---------------------------------------------------------------------- 
  135. # ----------------------------------------- 
  136. # ZONE DE DEFINITION DES FONCTIONS LOCALES:
  137. # -----------------------------------------
  138.  
  139. ##
  140. ## Affiche un message en rouge si l'on se trouve dans une fenetre hpterm
  141. ## et se met en attente de 2 secondes.
  142. ## Il est possible de recuperer le code retour de la fonction.
  143. ##
  144. Erreur()
  145. {
  146.     [ $# -eq 0 ] && return -1
  147.  
  148.     echo "\n\t$*"
  149.     sleep 2
  150.  
  151.     return 0
  152. }
  153.  
  154.  
  155. ##
  156. ## En cas d'une interruption la fonction suivante est executee.
  157. ## Les interruptions sont des signaux envoyes au processus du script,
  158. ## par la commande Unix: kill(1). La "capture" de ces signaux est
  159. ## identifiee par la commande Shell: trap definie apres la zone des
  160. ## options.
  161. ##
  162. TrapInterrup()
  163. {
  164.     # Vous pouvez executer des instructions avant une sortie 
  165.     # par signal (ou brutale!).
  166.  
  167.     for fich in $tpfnoacc3 $tpfnoacc4 $tpfnoacc2
  168.     do
  169.         [ -f $fich ] && rm -f $fich
  170.     done
  171.  
  172.     exit 1
  173. }
  174.  
  175.  
  176. ##
  177. ## Affiche l'aide indiquee en en-tete du script shell.
  178. ## Ne pas supprimer car cette fonction est utilisee a l'appel de la
  179. ## procedure avec les options -H ou -h
  180. ##
  181. AideProc()
  182. {
  183.     fichier=$1
  184.     niveau=$2
  185.  
  186.     [ -z "$fichier" ] && {
  187.         Erreur "AideProc(): nombre d'argument incorect."
  188.         return 0
  189.         }
  190.  
  191.     [ ! -f "$fichier" ] && {
  192.         Erreur "AideProc(): impossible d'atteindre le fichier $fichier."
  193.         return 0
  194.     }
  195.  
  196.     [ ${niveau:=2} = 2 ] && {
  197.         ${AWK} 'BEGIN {i=2}
  198.             /^#(#+|-+|÷+|\*+|\\+|\++|=+|\.+|\/+)+ *$/{
  199.                 if(--i<=0)exit
  200.                 next
  201.             }
  202.             /^#[     ]*[A-Z]*[     ]*$/{
  203.                 next
  204.             }
  205.             /^#[^!]/{
  206.                 print substr($0,1,80)
  207.             }
  208.             /^#[ \t]*$/{
  209.                 print ""
  210.             }
  211.         ' $fichier | sed -e 's/^#[     ]*//'
  212.     } || {
  213.         ${AWK} '\
  214.             /^#(#+|-+|÷+|\*+|\\+|\++|=+|\.+|\/+)+ *$/{
  215.                 if(--i<=0) exit
  216.                 next
  217.             }
  218.             /^#[^!]/{
  219.                 print substr($0,2,80)
  220.             }
  221.             /^#[ \t]*$/{
  222.                 print ""
  223.             }
  224.         ' i=$niveau $fichier | pg -e
  225.     }
  226. }
  227.  
  228. Temp="+15"
  229. TailleMo="5"
  230. LOGIN="$DEFAUT_USER"
  231. MODE_BRUT=0
  232. min=0
  233.  
  234. nb_arg=$#
  235. n=`expr $nb_arg / 2`
  236.  
  237. #----------------------------------------------------------------------
  238. # ------------------------- 
  239. # RECUPERATION DES OPTIONS:
  240. # -------------------------
  241. set -- `getopt hHxcbt:T:l: $*`                
  242. for opt in $*                                            
  243. do                                                             
  244.     case $opt in                                           
  245.         -h) AideProc $LA_PROCEDURE ; exit 0 ;;
  246.            -H) AideProc $LA_PROCEDURE 3 ; exit 0 ;;
  247.  
  248.         -x) set -x ; shift ;;
  249.  
  250.         -c) shift ; MODE_COULEUR=1 ;;
  251.  
  252.         -b) shift ; MODE_BRUT=1 ;;
  253.  
  254.         -T) shift ; Temp=$1 ; shift ;;
  255.         -t) shift ; TailleMo=$1 ; shift ; min=1 ;;
  256.         -l) shift ; LOGIN=$1 ; shift ;;
  257.  
  258.         --) shift ; break ;;
  259.     esac
  260. done
  261.  
  262. #----------------------------------------------------------------------
  263. # AUTRES DEFINITIONS:
  264. # -------------------
  265. trap TrapInterrup 3 2 15    # Recuperation des interruptions 3, 2 et 15
  266.  
  267. ##
  268. ## Caracteres speciaux valable uniquement sur HP:
  269. ## Permet d'obtenir de la couleur sur des fenetres hp-term.
  270. ##
  271. [ $MODE_COULEUR -eq 1 ] && {
  272.     [ "$TERM" = "hpterm" ] && {
  273.         BLANC="\033&v0S"; ROUGE="\033&v1S"; VERT="\033&v2S"; JAUNE="\033&v3S"
  274.         BLEU="\033&v4S"; MAGENTA="\033&v5S"; CYAN="\033&v6S"; NOIR="\033&v7S"
  275.            SOULIGNE="\033&dD"; INVERSE="\033&dB"; INVSOUS="\033&dF"; NORM="\033&d@"
  276.         NORMAL=${NORM}${BLANC}
  277.     } || {
  278.         NOIR=`tput setaf 0 2> /dev/null`; ROUGE=`tput setaf 1 2> /dev/null`
  279.         VERT=`tput setaf 2 2> /dev/null`; JAUNE=`tput setaf 3 2> /dev/null`
  280.         BLEU=`tput setaf 4 2> /dev/null`; MAGENTA=`tput setaf 5 2> /dev/null`
  281.         CYAN=`tput setaf 6 2> /dev/null`; BLANC=`tput setaf 7 2> /dev/null`
  282.         SOULIGNE=`tput smul 2> /dev/null`; INVERSE=`tput smso 2> /dev/null`
  283.         INVSOUS=${SOULIGNE}${INVERSE}; NORM=`tput sgr0 2> /dev/null`
  284.         NORMAL=${NORM}${BLANC}
  285.     }
  286. } || {
  287.     NOIR=""; ROUGE=""
  288.     VERT=""; JAUNE=""
  289.     BLEU=""; MAGENTA=""
  290.        CYAN=""; BLANC=""
  291.     SOULIGNE=""; INVERSE=""
  292.     INVSOUS=${SOULIGNE}${INVERSE}; NORM=""
  293.     NORMAL=${NORM}${BLANC}
  294. }
  295.  
  296.  
  297. #----------------------------------------------------------------------
  298. # DEBUT ZONE DU PROGRAMME:
  299. #----------------------------------------------------------------------
  300. flag=0
  301. taille_sup=0
  302. true=
  303. tpfnoacc2=/tmp/fnoacc2.$$
  304. tpfnoacc3=/tmp/fnoacc3.$$
  305. tpfnoacc4=/tmp/fnoacc4.$$
  306.  
  307.  
  308. #----------------------------------------------------------------------
  309. # 1 Mo --> 2048 blocks
  310. # taillebytes = tailleblocs * 512
  311. # 1 Mo --> 2048*512 = 1048576 bytes
  312. #----------------------------------------------------------------------
  313. [ ! -z "$TailleMo" ] && Tailleby=`expr $TailleMo \* 1048576`
  314.  
  315. [ -n "$NISHOST" ] && HomeRep=`ypcat passwd | ${AWK} -F: '{ if($1==login) print $6 }' login=$LOGIN` || {
  316.     HomeRep=`grep $LOGIN /etc/passwd | cut -d: -f6`
  317. }
  318.  
  319. diskuser=""
  320. [ ! -z "$HomeRep" ] && diskuser=`echo $HomeRep | cut -d"/" -f2`
  321.  
  322.  
  323. ########################################################
  324. # Recherche de fichiers avec une condition sur la taille
  325. ########################################################
  326. cd $HomeRep
  327. find . -type f -atime $Temp -exec ls -lg {} \; 2>/dev/null | grep -v "\/$diskuser\/$user\/\." > $tpfnoacc2
  328.  
  329. [ -s "$tpfnoacc2" ] && {
  330.     ###################################################
  331.     # Nombre de fichiers non accedes depuis $Temp (+nb)
  332.     ###################################################
  333.     nb_fich=`wc -l $tpfnoacc2 | cut -d" " -f1`
  334.  
  335.     #####################################################################################
  336.     # Recherche du nom des fichiers non accedes dont la taille est superieure a $TailleMo
  337.     #####################################################################################
  338.     $AWK '{
  339.         if ( $4 > Tby ) {
  340.                nom_fichier = $NF
  341.                printf("Sup_%s_NoAccess:\t%s-%s-%s\t%10s\t%s\t%s\n",
  342.                     TMo, $6, $5, $7, $4, nom_fichier, t)
  343.            }
  344.     }' Tby="$Tailleby" TMo="$TailleMo" t="$Temp" $tpfnoacc2 > $tpfnoacc4
  345.  
  346.     [ -s "$tpfnoacc4" ] && {
  347.         echo "NbNoAccess:\t$nb_fich\t$Temp" > $tpfnoacc3
  348.         cat $tpfnoacc4 >> $tpfnoacc3
  349.     } || {
  350.         echo "NbNoAccess:\t$nb_fich\t$Temp" > $tpfnoacc3
  351.         echo "Sup_${TailleMo}_NoAccess:\t-\t0\t0\t$Temp" >> $tpfnoacc3
  352.     }
  353. } || {
  354.     echo "NbNoAccess:\t0\t$Temp" > $tpfnoacc3
  355. }
  356.  
  357. [ -f $tpfnoacc3 ] && {
  358.     [ $MODE_BRUT -eq 1 ] && cat $tpfnoacc3 || {
  359.         ${AWK} ' BEGIN { flag=0 } /NbNoAccess/ {
  360.             print ""
  361.             print " Recherche effectuee a partir du repertoire :", rep
  362.             print "+-----------------------------------------------------------------------------------+"
  363.             printf("| Vous avez %s%5s%s fichiers non accedes depuis %s%3s%s jours.                            |\n",
  364.                     coul, $2, norm, coul, jour, norm)
  365.         }
  366.         /Sup_/ {
  367.             if ($3 != 0)
  368.             {
  369.                 if (flag == 0) {
  370.                     flag=1
  371.                         
  372.                     printf("| Liste des fichiers de plus de %s%3s%s Mo - La taille des fichiers est en Ko           |\n",
  373.                                 coul, mega, norm)
  374.                     print "+----------+-------------+----------------------------------------------------------+"
  375.                     print "|  TAILLE  |  DATE ACCES |  REPERTOIRE ET NOM DE FICHIER                            |"
  376.                     print "+----------+-------------+----------------------------------------------------------+"
  377.                 }
  378.  
  379.                 printf("|%s%9s%s |%12s | %s \n", coul, $3, norm, $2, $4)
  380.             }
  381.         } END {
  382.             if (flag > 0)
  383.                 print "+----------+-------------+----------------------------------------------------------+\n"
  384.             else
  385.                 print "+-----------------------------------------------------------------------------------+\n"
  386.         }' rep=$HomeRep mega=$TailleMo jour=$Temp coul=${VERT} norm=${NORMAL} $tpfnoacc3
  387.     }
  388. }
  389.  
  390. #----------------------------------------------------------------------
  391. TrapInterrup
  392.  
  393.