捕获文件夹内所有文件的权限，并生成脚本

  • yesu898

    2016-12-28 09:35:34
  • Oracle
  • 翻译

捕获文件夹内的所有权限和属主并保留成文件，当权限混乱后可以执行之前生成的文件来恢复权限。

Script to capture and restore file permission in a directory (for eg. ORACLE_HOME) (文档 ID 1515018.1) 转到底部转到底部

In this Document

Main Content
  Purpose
  Requirements
  Configuring
  Instructions
  Caution
  Script


APPLIES TO:

Oracle Database - Enterprise Edition
Generic UNIX
Generic Linux

MAIN CONTENT

PURPOSE

This script is intended to capture and restore the file permission of a given directory example - ORACLE_HOME. The script will create a output file called permission_ and permission_.cmd

 

REQUIREMENTS

The script needs to be run on command prompt of Unix platform .
Perl is required to execute this script
Shell is required to run the shell script .

CONFIGURING

Download and save the script on your server as permission.pl
Provide the execute permission on the script

INSTRUCTIONS

 Run the script from the location where you have downloaded and saved it

./permission.pl

CAUTION

This sample code is provided for educational purposes only and not supported by Oracle Support Services. It has been tested internally, however, and works as documented. We do not guarantee that it will work for you, so be sure to test it in your environment before relying on it.

Proofread this sample code before using it! Due to the differences in the way text editors, e-mail packages and operating systems handle text formatting (spaces, tabs and carriage returns), this sample code may not be in an executable state when you first receive it. Check over the sample code to ensure that errors of this type are corrected.

Note : This script can restore permission back to the point at which it was captured. It is not intended to reset the permission.

 

SCRIPT

Execute the script from the dollar ($) prompt

Steps to capture permission of a directory

 1. Download the script from here
 2. Log in as "oracle" user
 3. copy the file to a location say /home/oracle/scripts
 4. Give execute permission

    $ chmod 755 permission.pl


 5. Execute the script to capture permission

  $ cd /home/oracle/scripts
  $ ./permission.pl

 

Script generates two files

a. permission- - This contains file permission in octal value, owner and group information of the files captured
b. restore-perm- - This contains command to change the permission, owner, and group of the captured files

Steps to restore captured permission of the directory

1. Give execute permission to file generated during capture

    chmod 755 restore-perm-.cmd

2. execute .cmd file to restore the permission and the ownership

    $ ./restore-perm-.cmd

 

Sample output of the script

permission-

755 oracle oinstall /u03/app/oracle/OraHome_11202g
750 oracle oinstall /u03/app/oracle/OraHome_11202g/root.sh
644 oracle oinstall /u03/app/oracle/OraHome_11202g/install.platform
640 oracle oinstall /u03/app/oracle/OraHome_11202g/oraInst.loc
644 oracle oinstall /u03/app/oracle/OraHome_11202g/afiedt.buf
644 oracle oinstall /u03/app/oracle/OraHome_11202g/a.out
6755 root root /u03/app/oracle/OraHome_11202g/tsh.sh
644 oracle oinstall /u03/app/oracle/OraHome_11202g/Readme.txt
640 oracle oinstall /u03/app/oracle/OraHome_11202g/oraorcl1122
644 oracle oinstall /u03/app/oracle/OraHome_11202g/SQLtraining_day1.lst
751 oracle oinstall /u03/app/oracle/OraHome_11202g/bin/hsots
751 oracle oinstall /u03/app/oracle/OraHome_11202g/bin/nid
6751 oracle oinstall /u03/app/oracle/OraHome_11202g/bin/oracle
751 oracle oinstall /u03/app/oracle/OraHome_11202g/bin/orapwd
751 oracle oinstall /u03/app/oracle/OraHome_11202g/bin/wrap
750 oracle oinstall /u03/app/oracle/OraHome_11202g/bin/grdcscan

 

 restore-perm-

chown  oracle:oinstall /u03/app/oracle/OraHome_11202g
chmod  755 /u03/app/oracle/OraHome_11202g
chown  oracle:oinstall /u03/app/oracle/OraHome_11202g/root.sh
chmod  750 /u03/app/oracle/OraHome_11202g/root.sh
chown  oracle:oinstall /u03/app/oracle/OraHome_11202g/install.platform
chmod  644 /u03/app/oracle/OraHome_11202g/install.platform
chown  oracle:oinstall /u03/app/oracle/OraHome_11202g/oraInst.loc
chmod  640 /u03/app/oracle/OraHome_11202g/oraInst.loc
chown  oracle:oinstall /u03/app/oracle/OraHome_11202g/afiedt.buf
chmod  644 /u03/app/oracle/OraHome_11202g/afiedt.buf
chown  oracle:oinstall /u03/app/oracle/OraHome_11202g/a.out
chmod  644 /u03/app/oracle/OraHome_11202g/a.out
chown  root:root /u03/app/oracle/OraHome_11202g/tsh.sh
chmod  6755 /u03/app/oracle/OraHome_11202g/tsh.sh
chown  oracle:oinstall /u03/app/oracle/OraHome_11202g/Readme.txt
chmod  644 /u03/app/oracle/OraHome_11202g/Readme.txt
chown  oracle:oinstall /u03/app/oracle/OraHome_11202g/oraorcl1122
chmod  640 /u03/app/oracle/OraHome_11202g/oraorcl1122
chown  oracle:oinstall /u03/app/oracle/OraHome_11202g/SQLtraining_day1.lst
chmod  644 /u03/app/oracle/OraHome_11202g/SQLtraining_day1.lst
chown  oracle:oinstall /u03/app/oracle/OraHome_11202g/bin/nid
chmod  751 /u03/app/oracle/OraHome_11202g/bin/nid
chown  oracle:oinstall /u03/app/oracle/OraHome_11202g/bin/oracle
chmod  6751 /u03/app/oracle/OraHome_11202g/bin/oracle
chown  oracle:oinstall /u03/app/oracle/OraHome_11202g/bin/orapwd
chmod  751 /u03/app/oracle/OraHome_11202g/bin/orapwd
chown  oracle:oinstall /u03/app/oracle/OraHome_11202g/bin/wrap
chmod  751 /u03/app/oracle/OraHome_11202g/bin/wrap
chown  oracle:oinstall /u03/app/oracle/OraHome_11202g/bin/grdcscan
chmod  750 /u03/app/oracle/OraHome_11202g/bin/grdcscan



点击(此处)折叠或打开

  1. #!/usr/bin/perl -w
  2. #
  3. # Captures file permissions and the owner of the files
  4. # useage : perm1.pl <path to capture permission>
  5. #

  7. use strict;
  8. use warnings;
  9. use File::Find;
  10. use POSIX();

  12. my (@dir) = @ARGV;
  13. my $linecount=0 ;

  15. #print @ARGV, $#ARGV;

  17. if ($#ARGV < 0) {
  18.    print "\n\nOpps....Invalid Syntax !!!!\n" ;
  19.    print "Usage : ./perm1.pl \n\n" ;
  20.    print "Example : ./perm1.pl /home/oralce\n\n" ;
  21.    exit ;
  22. }
  23. my $logdir=$dir[0] ;
  24. #my ($sec, $min, $hr, $day, $mon, $year) = localtime;
  25. ##my ($dow,$mon,$date,$hr,$min,$sec,$year) = POSIX::strftime( '%a %b %d %H %M %S %Y', localtime);
  26. my $date = POSIX::strftime( '%a-%b-%d-%H-%M-%S-%Y', localtime);
  27. my $logfile="permission-".$date;
  28. my $cmdfile="restore-perm-".$date.".cmd" ;

  30. open LOGFILE, "> $logfile" or die $! ;
  31. open CMDFILE, "> $cmdfile" or die $! ;
  32. find(\&process_file,@dir);

  34. print "Following log files are generated\n" ;
  35. print "logfile : ".$logfile. "\n" ;
  36. print "Command file : ".$cmdfile. "\n" ;
  37. print "Linecount : ".$linecount."\n" ;
  38. close (LOGFILE) ;
  39. close (CMDFILE) ;


  42. sub process_file {
  43.     my ($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size, $atime,$mtime,$ctime,$blksize,$blocks,$username,$user,$pass,$comment,$home,$shell,$group);
  44.     my %uiduname = () ;
  45.     my %gidgname = () ;
  46.     my $filename = $File::Find::name;


  49. #### Building uid, username hash

  51.     open (PASSWDFILE, '/etc/passwd') ;

  53.     while ( <PASSWDFILE>) {
  54.        ($user,$pass,$uid,$gid,$comment,$home,$shell)=split (/:/) ;
  55.        $uiduname{$uid}=$user ;
  56.     }
  57.     close (PASSWDFILE) ;


  60. #### Building gid, groupname hash

  62.     open (GRPFILE, '/etc/group') ;

  64.     while ( <GRPFILE>) {
  65.        ($group,$pass,$gid)=split (/:/) ;
  66.        $gidgname{$gid}=$group ;
  67.     }
  68.     close (GRPFILE) ;

  70.     ($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size, $atime,$mtime,$ctime,$blksize,$blocks) = stat("$filename");
  71. # printf "%o %s %s %s\n", $mode & 07777, $uiduname{$uid}, $gidgname{$gid}, $filename ;
  72.     printf LOGFILE "%o %s %s %s\n", $mode & 07777, $uiduname{$uid}, $gidgname{$gid}, $filename ;
  73.     printf CMDFILE "%s %s%s%s %s\n", "chown ",$uiduname{$uid}, ":", $gidgname{$gid}, $filename ;
  74.     printf CMDFILE "%s %o %s\n", "chmod ",$mode & 07777, $filename ;
  75.     # printf "%o %s %s %s\n", $mode & 07777, $uiduname{$uid}, $gidgname{$gid}, $filename ;
  76.     $linecount++ ;
  77. }

请使用浏览器的分享功能分享到微信等