#!/usr/bin/perl
use strict;
use lib '/var/www/perl/vbsite/packages';
my @out = `cd /var/www/test_repo; strace git commit -m 'msg' 2>&1`;
print "Content-type: text/plain\n\n";
print "ENVIRONMENT VARIABLES:\n\n ";
foreach( keys %ENV ){
print "$_: $ENV{$_}\n";
}
print "OUTPUT:\n\n";
print "@out\n\n";
####
ENVIRONMENT VARIABLES: SCRIPT_NAME: /perl/site/git_test/test_commit2.pl
SERVER_NAME: xxx.xxx.xxx.xxx
SERVER_ADMIN: root@localhost
HTTP_ACCEPT_ENCODING: gzip, deflate
HTTP_CONNECTION: keep-alive
REQUEST_METHOD: GET
HTTP_ACCEPT: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8
SCRIPT_URI: http://xxx.xxx.xxx.xxx/perl/site/git_test/test_commit2.pl
SCRIPT_FILENAME: /var/www/perl/site/git_test/test_commit2.pl
SERVER_SOFTWARE: Apache/2.2.15 (CentOS)
QUERY_STRING:
REMOTE_PORT: 57313
HTTP_USER_AGENT: Mozilla/5.0 (X11; Ubuntu; Linux i686; rv:21.0) Gecko/20100101 Firefox/21.0
SERVER_PORT: 80
SERVER_SIGNATURE: Apache/2.2.15 (CentOS) Server at xxx.xxx.xxx.xxx Port 80
HTTP_ACCEPT_LANGUAGE: en-US,en;q=0.5
REMOTE_ADDR: xxx.xxx.xxx.xxx
SERVER_PROTOCOL: HTTP/1.1
MOD_PERL_API_VERSION: 2
PATH: /sbin:/usr/sbin:/bin:/usr/bin
REQUEST_URI: /perl/site/git_test/test_commit2.pl
GATEWAY_INTERFACE: CGI/1.1
SCRIPT_URL: /perl/site/git_test/test_commit2.pl
SERVER_ADDR: xxx.xxx.xxx.xxx
DOCUMENT_ROOT: /var/www/html/
HTTP_HOST: xxx.xxx.xxx.xxx
MOD_PERL: mod_perl/2.0.4
####
ENVIRONMENT VARIABLES: SCRIPT_NAME: /perl/site/git_test/test_commit2.pl
SERVER_NAME: xxx.xxx.xxx.xxx
SERVER_ADMIN: root@localhost
HTTP_ACCEPT_ENCODING: gzip, deflate
HTTP_CONNECTION: keep-alive
REQUEST_METHOD: GET
HTTP_ACCEPT: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8
SCRIPT_URI: http://xxx.xxx.xxx.xxx/perl/site/git_test/test_commit2.pl
SCRIPT_FILENAME: /var/www/perl/site/git_test/test_commit2.pl
SERVER_SOFTWARE: Apache/2.2.15 (CentOS)
QUERY_STRING:
REMOTE_PORT: 57332
HTTP_USER_AGENT: Mozilla/5.0 (X11; Ubuntu; Linux i686; rv:21.0) Gecko/20100101 Firefox/21.0
SERVER_PORT: 80
SERVER_SIGNATURE: Apache/2.2.15 (CentOS) Server at xxx.xxx.xxx.xxx Port 80
HTTP_ACCEPT_LANGUAGE: en-US,en;q=0.5
REMOTE_ADDR: xxx.xxx.xxx.xxx
SERVER_PROTOCOL: HTTP/1.1
PATH: /sbin:/usr/sbin:/bin:/usr/bin
MOD_PERL_API_VERSION: 2
REQUEST_URI: /perl/site/git_test/test_commit2.pl
GATEWAY_INTERFACE: CGI/1.1
SCRIPT_URL: /perl/site/git_test/test_commit2.pl
SERVER_ADDR: xxx.xxx.xxx.xxx
DOCUMENT_ROOT: /var/www/html/
HTTP_HOST: xxx.xxx.xxx.xxx
MOD_PERL: mod_perl/2.0.4
####
SCRIPT_NAME: /cgi-bin/test_commit2.pl
SERVER_NAME: xxx.xxx.xxx.xxx
SERVER_ADMIN: root@localhost
HTTP_ACCEPT_ENCODING: gzip, deflate
HTTP_CONNECTION: keep-alive
REQUEST_METHOD: GET
HTTP_ACCEPT: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8
SCRIPT_URI: http://xxx.xxx.xxx.xxx/cgi-bin/test_commit2.pl
SCRIPT_FILENAME: /var/www/cgi-bin/test_commit2.pl
SERVER_SOFTWARE: Apache/2.2.15 (CentOS)
QUERY_STRING:
REMOTE_PORT: 57336
HTTP_USER_AGENT: Mozilla/5.0 (X11; Ubuntu; Linux i686; rv:21.0) Gecko/20100101 Firefox/21.0
SERVER_PORT: 80
SERVER_SIGNATURE: Apache/2.2.15 (CentOS) Server at xxx.xxx.xxx.xxx Port 80
HTTP_ACCEPT_LANGUAGE: en-US,en;q=0.5
REMOTE_ADDR: xxx.xxx.xxx.xxx
SERVER_PROTOCOL: HTTP/1.1
PATH: /sbin:/usr/sbin:/bin:/usr/bin
REQUEST_URI: /cgi-bin/test_commit2.pl
GATEWAY_INTERFACE: CGI/1.1
SCRIPT_URL: /cgi-bin/test_commit2.pl
SERVER_ADDR: xxx.xxx.xxx.xxx
DOCUMENT_ROOT: /var/www/html/
HTTP_HOST: xxx.xxx.xxx.xxx
####
execve("/usr/bin/git", ["git", "commit", "-m", "msg"], [/* 16 vars */]) = 0
brk(0) = 0x26ee000
mmap(NULL, 4096, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0) = 0x7f26e51ae000
access("/etc/ld.so.preload", R_OK) = -1 ENOENT (No such file or directory)
open("/etc/ld.so.cache", O_RDONLY) = 0
fstat(0, {st_mode=S_IFREG|0644, st_size=32187, ...}) = 0
mmap(NULL, 32187, PROT_READ, MAP_PRIVATE, 0, 0) = 0x7f26e51a6000
close(0) = 0
open("/lib64/libz.so.1", O_RDONLY) = 0
read(0, "\177ELF\2\1\1\0\0\0\0\0\0\0\0\0\3\0>\0\1\0\0\0 !\0\0\0\0\0\0"..., 832) = 832
fstat(0, {st_mode=S_IFREG|0755, st_size=88600, ...}) = 0
####
execve("/usr/bin/git", ["git", "commit", "-m", "msg"], [/* 16 vars */]) = 0
brk(0) = 0x1daf000
mmap(NULL, 4096, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0) = 0x7f9b43975000
access("/etc/ld.so.preload", R_OK) = -1 ENOENT (No such file or directory)
open("/etc/ld.so.cache", O_RDONLY) = 3
fstat(3, {st_mode=S_IFREG|0644, st_size=32187, ...}) = 0
mmap(NULL, 32187, PROT_READ, MAP_PRIVATE, 3, 0) = 0x7f9b4396d000
close(3) = 0
open("/lib64/libz.so.1", O_RDONLY) = 3
read(3, "\177ELF\2\1\1\0\0\0\0\0\0\0\0\0\3\0>\0\1\0\0\0 !\0\0\0\0\0\0"..., 832) = 832
fstat(3, {st_mode=S_IFREG|0755, st_size=88600, ...}) = 0
####
execve("/usr/bin/git", ["git", "commit", "-m", "msg"], [/* 29 vars */]) = 0
brk(0) = 0x935000
mmap(NULL, 4096, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0) = 0x7f9969bd7000
access("/etc/ld.so.preload", R_OK) = -1 ENOENT (No such file or directory)
open("/etc/ld.so.cache", O_RDONLY) = 3
fstat(3, {st_mode=S_IFREG|0644, st_size=32187, ...}) = 0
mmap(NULL, 32187, PROT_READ, MAP_PRIVATE, 3, 0) = 0x7f9969bcf000
close(3) = 0
open("/lib64/libz.so.1", O_RDONLY) = 3
read(3, "\177ELF\2\1\1\0\0\0\0\0\0\0\0\0\3\0>\0\1\0\0\0 !\0\0\0\0\0\0"..., 832) = 832
fstat(3, {st_mode=S_IFREG|0755, st_size=88600, ...}) = 0
####
close(0) = 0
open(".git/objects/info/alternates", O_RDONLY|O_NOATIME) = -1 ENOENT (No such file or directory)
access(".git/objects/99/564f15c5a06c44e372d03489c59a32ebcf9ec9", F_OK) = 0
access(".git/hooks/prepare-commit-msg", X_OK) = -1 ENOENT (No such file or directory)
access(".git/hooks/commit-msg", X_OK) = -1 ENOENT (No such file or directory)
open(".git/COMMIT_EDITMSG", O_RDONLY) = 0
read(0, "msg\n", 8192) = 4
read(0, "", 12308) = 0
close(0) = 0
open(".git/objects/99/564f15c5a06c44e372d03489c59a32ebcf9ec9", O_RDONLY|O_NOATIME) = 0
fstat(0, {st_mode=S_IFREG|0444, st_size=52, ...}) = 0
mmap(NULL, 52, PROT_READ, MAP_PRIVATE, 0, 0) = 0x7f26e51ad000
close(0) = 0
munmap(0x7f26e51ad000, 52) = 0
access(".git/objects/f8/8d4f7df95a7c0b3842bf98533e01472efab496", F_OK) = -1 ENOENT (No such file or directory)
open(".git/objects/f8/tmp_obj_pW5OIL", O_RDWR|O_CREAT|O_EXCL, 0444) = -1 ENOENT (No such file or directory)
mkdir(".git/objects/f8", 0777) = 0
open(".git/objects/f8/tmp_obj_pkqRHL", O_RDWR|O_CREAT|O_EXCL, 0444) = 0
write(2, "error: unable to create temporar"..., 66error: unable to create temporary file: No such file or directory
) = 66
write(2, "fatal: failed to write commit ob"..., 37fatal: failed to write commit object
) = 37
exit_group(128) = ?
####
close(3) = 0
munmap(0x7f9b43974000, 137) = 0
access(".git/objects/99/564f15c5a06c44e372d03489c59a32ebcf9ec9", F_OK) = 0
access(".git/hooks/prepare-commit-msg", X_OK) = -1 ENOENT (No such file or directory)
access(".git/hooks/commit-msg", X_OK) = -1 ENOENT (No such file or directory)
open(".git/COMMIT_EDITMSG", O_RDONLY) = 3
read(3, "msg\n", 8192) = 4
read(3, "", 12308) = 0
close(3) = 0
open(".git/objects/99/564f15c5a06c44e372d03489c59a32ebcf9ec9", O_RDONLY|O_NOATIME) = 3
fstat(3, {st_mode=S_IFREG|0444, st_size=52, ...}) = 0
mmap(NULL, 52, PROT_READ, MAP_PRIVATE, 3, 0) = 0x7f9b43974000
close(3) = 0
munmap(0x7f9b43974000, 52) = 0
access(".git/objects/0f/7f57fee43d1fa25cfc7f0d7fd1bf5826b22fcc", F_OK) = -1 ENOENT (No such file or directory)
open(".git/objects/0f/tmp_obj_RAN8sj", O_RDWR|O_CREAT|O_EXCL, 0444) = -1 ENOENT (No such file or directory)
mkdir(".git/objects/0f", 0777) = 0
open(".git/objects/0f/tmp_obj_rnREwj", O_RDWR|O_CREAT|O_EXCL, 0444) = 3
brk(0x1df9000) = 0x1df9000
write(3, "x\1\255\216I\n\3030\f\0{\366+\374\201\4/R\22A(\355STUY\16\216C\354\26\372"..., 138) = 138
brk(0x1de9000) = 0x1de9000
brk(0x1dd9000) = 0x1dd9000
brk(0x1dd7000) = 0x1dd7000