home *** CD-ROM | disk | FTP | other *** search
/ Freelog 9 / Freelog009.iso / BAS / Systeme / ShellUnix / FCHGRP.SH < prev    next >
Linux/UNIX/POSIX Shell Script  |  1998-07-09  |  12KB  |  389 lines
  1. #!/bin/sh
  2. #---------------------------------------------------------------------- 
  3. # NOM                                        
  4. #    fchgrp = Changement recursif de groupe avec test de propriete.
  5. # 
  6. # SYNTAXE                                    
  7. #    fchgrp -h|H          (aide)   
  8. #    fchgrp [-v] [-u user] [-o old_group] [-g new_group] [fichiers]
  9. # 
  10. #---------------------------------------------------------------------- 
  11. # VERSION
  12. #    1.0
  13. # 
  14. # DESCRIPTION
  15. #    * Changement recursif des droits GROUPE pour un utilisateur
  16. #    particulier. A la difference de la commande Chgrp -R, cette
  17. #    procedure peut effectuer le changement de groupe a partir de la
  18. #    designation d'un nom precis de groupe. Dans le cas ou pour une
  19. #    meme arborescence, il existe des fichiers de groupes differents,
  20. #    la procedure modifie uniquement les fichiers designes par
  21. #    l'option -g
  22. # 
  23. #    * Cette procedure est pratique via une utilisation en tant que
  24. #    super utilisateur (root).
  25. # 
  26. # OPTIONS
  27. #    -h|H      aide courte ou longue.        
  28. #                                            
  29. #    -v        Mode verbose, par defaut la procedure n'affiche pas les
  30. #              informations d'execution sur la sortie standard.
  31. #              Cette option permet de valider cet affichage.
  32. #                                            
  33. #    -u user   Effectue les modifications pour un utilisateur
  34. #              particulier. C'est a dire que seuls les fichiers
  35. #              appartenant a l'utilisateur sont modifies. Si 
  36. #              l'option est ommise, l'utilisateur courant (whoami)
  37. #              est utilise.
  38. # 
  39. #    -o group  Effectue les modifications pour un groupe bien
  40. #              precis. Seul les fichiers appartenant a ce groupe
  41. #              sont concernes par la modification. Option tres
  42. #              importante puisqu'elle justifie l'existance de la
  43. #              procedure vis a vis de : chgrp -R
  44. #              Sauf si desormais cette possibilite est integree
  45. #              a la commande chgrp(1M), mais peu importe la
  46. #              procedure fait bien son travail !
  47. # 
  48. #    -g group  Le nom du nouveau groupe a affecte aux fichiers et
  49. #              aux repertoires.
  50. # 
  51. #    fichiers  Les noms des repertoires et/ou fichiers de depart des
  52. #              modifications. Par defaut, la procedure utilise le
  53. #              repertoire courant (.).
  54. # 
  55. # 
  56. # EXEMPLE(S)
  57. #    * Lancement de l'application avec affichage de l'aide longue:
  58. #        $ fchgrp -H
  59. # 
  60. #    * Liste l'ensemble des fichiers appartenant a l'utilisateur
  61. #      courant, sans l'option -g aucune modification n'est effectuee,
  62. #      la procedure se transforme alors en commande ls(1M) un peu
  63. #      particuliere :
  64. #        $ fchgrp /home 
  65. # 
  66. #    * Modifie tous les fichiers du repertoire courant du groupe other
  67. #      en groupe sys pour l'utilisateur root :
  68. #        $ fchgrp -u root -o other -g sys
  69. # 
  70. # 
  71. # DEPENDANCE(S)
  72. #    find(1M), ls(1M), chgrp(1M), awk(1M) ou nawk(1M).
  73. #                                            
  74. # VOIR AUSSI
  75. #    chgrp(1M).
  76. #                                            
  77. # AUTEUR
  78. #    Copyright (c) 1998 Bertrand LE QUELLEC, All Rigths Reserved.
  79. # 
  80. # CONTACT
  81. #   eMail : blq@mygale.org ou blq@wanadoo.fr
  82. #   Url   : http://www.mygale.org/09/blq/ ou http://perso.wanadoo.fr/blq/
  83. #
  84. # Cree : 19/03/98
  85. #---------------------------------------------------------------------- 
  86. # Permission to use, copy, modify, distribute, and sell this software
  87. # and its documentation for any purpose is hereby granted without fee,
  88. # provided that the above copyright notice appear in all copies and
  89. # that both that copyright notice and this permission notice appear in
  90. # supporting documentation, and that the name of Bertrand LE QUELLEC    
  91. # not be used in advertising or publicity pertaining to distribution 
  92. # of the software without specific, written prior permission. Bertrand 
  93. # LE QUELLEC makes no representations about the suitability of
  94. # this software for any purpose. It is provided "as is" without
  95. # express or implied warranty.
  96. #
  97. # THIS SOFTWARE IS PROVIDED BY Bertrand LE QUELLEC `AS IS' AND ANY
  98. # EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  99. # IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  100. # PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL Bertrand LE QUELLEC BE
  101. # LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  102. # CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  103. # SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
  104. # BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
  105. # WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE
  106. # OR OTHERWISE)     ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
  107. # EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  108. #---------------------------------------------------------------------- 
  109.  
  110. # ------------------------------------------ 
  111. # ZONE DE DEFINITION DES VARIABLES GLOBALES:
  112. # ------------------------------------------
  113. NOM_PROCEDURE=`basename $0`
  114. LA_PROCEDURE=$0
  115. CD=`pwd`
  116. AWK=`[ -f /usr/bin/nawk ] && echo "nawk" || echo "awk" `
  117.  
  118.  
  119. ##
  120. ## Variables particulieres:
  121. ##
  122. DATE=`date "+%d/%m/%y"`
  123. MODE_COULEUR=0
  124. VISU_HTML=netscape
  125.  
  126.  
  127. ##
  128. ## Les variables concernant l'utilisateur:
  129. ##
  130. DEFAUT_AUTEUR=`whoami`
  131. DEFAUT_EDITEUR=${EDITOR}
  132. DEFAUT_SHELL=${SHELL}
  133.  
  134.  
  135. #---------------------------------------------------------------------- 
  136. # ----------------------------------------- 
  137. # ZONE DE DEFINITION DES FONCTIONS LOCALES:
  138. # -----------------------------------------
  139. # La fonction doit etre precedee d'un commentaire avec en debut de ligne
  140. # le caractere # (diese) repete deux fois.
  141.  
  142. ##
  143. ## En cas d'une interruption la fonction suivante est executee.
  144. ## Les interruptions sont des signaux envoyes au processus du script,
  145. ## par la commande Unix: kill(1). La "capture" de ces signaux est
  146. ## identifiee par la commande Shell: trap definie apres la zone des
  147. ## options.
  148. ##
  149. TrapInterrup()
  150. {
  151.     # Vous pouvez executer des instructions avant une sortie 
  152.     # par signal (ou brutale!).
  153.     exit 1
  154. }
  155.  
  156.  
  157. ##
  158. ## Renvoie le PATH et nom d'un ou plusieurs executables.
  159. ## Si le ou les executables sont introuvables la fonction ne renvoie rien.
  160. ## Dans le cas d'un alias la fonction ne renvoie rien, car le PATH n'est
  161. ## pas recuperable.
  162. ##
  163. Type()
  164. {
  165.     [ $# -ne 0 ] && type $* | ${AWK} '$2=="is" && $4!="alias" {print $NF}'
  166. }
  167.  
  168.  
  169. ##
  170. ## Affiche l'aide indiquee en en-tete du script shell.
  171. ## Ne pas supprimer car cette fonction est utilisee a l'appel de la
  172. ## procedure avec les options -H ou -H
  173. ##
  174. AideProc()
  175. {
  176.     fichier=$1
  177.     niveau=$2
  178.  
  179.     [ -z "$fichier" ] && {
  180.         Erreur "AideProc(): nombre d'argument incorect."
  181.         return 0
  182.     }
  183.  
  184.     [ ! -f "$fichier" ] && {
  185.         [ -f "`basename $fichier`" ] && fichier=`basename $fichier` || {
  186.             Erreur "AideProc(): impossible d'atteindre le fichier $fichier."
  187.             return 0
  188.         }
  189.     }
  190.  
  191.     [ ${niveau:=2} = 2 ] && {
  192.         ${AWK} 'BEGIN {i=2}
  193.             /^#[-]+/{
  194.                 if(--i<=0)exit
  195.                 next
  196.             }
  197.             /^#[     ]*[A-Z]*[     ]*$/{
  198.                 next
  199.             }
  200.             /^#[^!]/{
  201.                 print substr($0,1,80)
  202.             }
  203.             /^#[ \t]*$/{
  204.                 print ""
  205.             }
  206.         ' $fichier | sed -e 's/^#[     ]*//'
  207.     } || {
  208.         ${AWK} '\
  209.             /^#[-]+/{
  210.                 if(--i<=0) exit
  211.                 next
  212.             }
  213.             /^#[^!]/{
  214.                 print substr($0,2,80)
  215.             }
  216.             /^#[ \t]*$/{
  217.                 print ""
  218.             }
  219.         ' i=$niveau $fichier | pg -e
  220.     }
  221. }
  222.  
  223. ##
  224. ## Renvoie le type de la machine ou l'on se trouve et surtout le
  225. ## systeme d'exploitation en cours. La fonction renvoie un des numero
  226. ## suivant en reponse:
  227. ##
  228. ##    inconue            0
  229. ##
  230. ##    SunOs            1
  231. ##    Sun Solaris        2
  232. ##    HP s700            3
  233. ##    HP s800            4
  234. ##    HP s300            5
  235. ##    Silicon Graphic     6
  236. ##    IBM AIX            7
  237. ##
  238. ## Pour recuperer le code retour de la fonction, utilisez la variable $?
  239. ##
  240. Machine()
  241. {
  242.     os=`uname`
  243.  
  244.     [ "$os" = "Solaris" ] && return 2
  245.  
  246.     [ "$os" = "SunOS" ] && {
  247.         [ -f /vmunix ] && return 1 || return 2
  248.     }
  249.     
  250.     [ "$os" = "HP-UX" ] && {
  251.         if uname -a | grep "PA-RISC" 1> /dev/null
  252.         then
  253.             return 3
  254.         elif uname -a | grep "HP-PA" 1> /dev/null
  255.             return 4
  256.         then
  257.             return 5
  258.         fi
  259.     }
  260.  
  261.     [ "$os" = "IRIX" ] && return 6
  262.  
  263.     [ "$os" = "AIX" ] && return 7
  264.  
  265.     return 0
  266. }
  267.  
  268.  
  269. ##
  270. ## Affiche un message en rouge si l'on se trouve dans une fenetre hpterm
  271. ## et se met en attente de 2 secondes.
  272. ## Il est possible de recuperer le code retour de la fonction.
  273. ##
  274. Erreur()
  275. {
  276.     [ $# -eq 0 ] && return -1
  277.  
  278.     echo "\n\t${ROUGE}$*${NORMAL}"
  279.     sleep 2
  280.  
  281.     return 0
  282. }
  283.  
  284.  
  285. ##
  286. ## Permet de visualiser un fichier HTML avec le bon executable:
  287. ##    netscape ou mosaic
  288. ##
  289. VoirHTML ()
  290. {
  291.     fichier="$*"
  292.  
  293.     [ -z "$VISU_HTML" ] && VISU_HTML=mosaic
  294.  
  295.     chemin=`Type $VISU_HTML`
  296.     [ -z "$chemin" ] && VISU_HTML=netscape
  297.  
  298.     chemin=`Type $VISU_HTML`
  299.     [ -z "$chemin" ] && {
  300.         Erreur "Executable du visualiseur HTML non accessible !"
  301.         return 0
  302.     }
  303.  
  304.     $VISU_HTML $fichier &
  305.     return 1
  306. }
  307.  
  308.  
  309. #---------------------------------------------------------------------- 
  310. # ---------------------------------------------- 
  311. # DEFENITION DES VARIABLES LOCALES AU PROGRAMME:
  312. # ----------------------------------------------
  313.  
  314. LE_USER=${DEFAUT_AUTEUR}
  315. OLD_GROUP=
  316. LE_GROUP=
  317. LE_DIR="."
  318. VERBOSE=0
  319.  
  320.  
  321. #---------------------------------------------------------------------- 
  322. # ---------------------------------------------- 
  323. # DEFENITION DES FONCTIONS LOCALES AU PROGRAMME:
  324. # ----------------------------------------------
  325.  
  326.  
  327.  
  328. #---------------------------------------------------------------------- 
  329. # ------------------------- 
  330. # RECUPERATION DES OPTIONS:
  331. # -------------------------
  332. set -- `getopt hHxvu:g:o: $*`                
  333. for opt in $*                                            
  334. do                                                             
  335.     case $opt in                                           
  336.         -h) AideProc $LA_PROCEDURE    ; exit 0 ;;
  337.         -H) AideProc $LA_PROCEDURE 3  ; exit 0 ;;
  338.  
  339.         -x) set -x ; shift ;;
  340.  
  341.         -u)    LE_USER="$2" ; shift ; shift ;;
  342.         -g)    LE_GROUP="$2" ; shift ; shift ;;
  343.         -o)    OLD_GROUP="-group $2" ; shift ; shift ;;
  344.         -v)    VERBOSE=1 ; shift ;;
  345.  
  346.         --) shift ; LE_DIR="$*" ; break ;;
  347.     esac                                                        
  348. done                                                          
  349.  
  350.  
  351. #----------------------------------------------------------------------
  352. # AUTRES DEFINITIONS:
  353. # -------------------
  354. trap TrapInterrup 3 2 15    # Recuperation des interruptions 3, 2 et 15
  355.  
  356. #----------------------------------------------------------------------
  357. # DEBUT ZONE DU PROGRAMME:
  358. # ------------------------
  359.  
  360. # Boucle sur les repertoires/fichiers passes en argument
  361. for un_dir in `echo $LE_DIR`
  362. do
  363.     [ $un_dir != "--" ] && {
  364.         # Traitement recursif sur un repertoire/fichier.
  365.         # Le awk permet de traiter les noms de fichiers avec des espaces, ils sont
  366.         # quelques fois utilises et autorises par certaines applications.
  367.         find $un_dir -user $LE_USER $OLD_GROUP -print | awk '{ 
  368.             gsub(/ /, "\\\\ ", $0)
  369.             print $0
  370.         }' | while read file        # L'utilisation du While et non du For est ici importante !
  371.         do
  372.             [ $VERBOSE -eq 1 ] && {
  373.                 echo ""
  374.                 echo ">> `ls -ld "$file" | ${AWK} '{ printf(\"%s %s %s\", $1, $3, $4) }'`\t$file"
  375.             }
  376.  
  377.             [ ! -z "$LE_GROUP" ] && {
  378.                 # Changement du groupe effective
  379.                 chgrp -h $LE_GROUP "$file"
  380.  
  381.                 [ $VERBOSE -eq 1 ] && {
  382.                     echo "<< `ls -ld "$file" | ${AWK} '{ printf(\"%s %s %s\", $1, $3, $4) }'`\t$file"
  383.                 }
  384.             }
  385.         done
  386.     }
  387. done
  388.  
  389.