Skip to content
体验新版
项目
组织
正在加载...
登录
切换导航
打开侧边栏
李少辉-开发者
git
提交
d767d59c
G
git
项目概览
李少辉-开发者
/
git
与 Fork 源项目一致
从无法访问的项目Fork
通知
2
Star
1
Fork
0
代码
文件
提交
分支
Tags
贡献者
分支图
Diff
Issue
0
列表
看板
标记
里程碑
合并请求
0
Wiki
0
Wiki
分析
仓库
DevOps
项目成员
Pages
G
git
项目概览
项目概览
详情
发布
仓库
仓库
文件
提交
分支
标签
贡献者
分支图
比较
Issue
0
Issue
0
列表
看板
标记
里程碑
合并请求
0
合并请求
0
Pages
分析
分析
仓库分析
DevOps
Wiki
0
Wiki
成员
成员
收起侧边栏
关闭侧边栏
动态
分支图
创建新Issue
提交
Issue看板
体验新版 GitCode,发现更多精彩内容 >>
提交
d767d59c
编写于
8月 07, 2005
作者:
K
Kay Sievers
浏览文件
操作
浏览文件
下载
电子邮件补丁
差异文件
v031
上级
8ed23e1b
变更
1
隐藏空白更改
内联
并排
Showing
1 changed file
with
36 addition
and
19 deletion
+36
-19
gitweb.pl
gitweb.pl
+36
-19
未找到文件。
gitweb.pl
浏览文件 @
d767d59c
...
...
@@ -2,7 +2,7 @@
# gitweb.pl - simple web interface to track changes in git repositories
#
# Version 0
27
# Version 0
31
#
# (C) 2005, Kay Sievers <kay.sievers@vrfy.org>
# (C) 2005, Christian Gierke <ch@gierke.de>
...
...
@@ -32,40 +32,40 @@
my
$view_back
=
1
;
# get values from url
if
(
$my_url_parm
=~
m#/
(.+)/commit/
([0-9a-fA-F]+)$#
)
{
if
(
$my_url_parm
=~
m#/
+(.+)/+commit/+
([0-9a-fA-F]+)$#
)
{
$project
=
$
1
;
$action
=
"
commit
";
$hash
=
$
2
;
}
elsif
(
$my_url_parm
=~
m#/
(.+)/commitdiff/
([0-9a-fA-F]+)$#
)
{
}
elsif
(
$my_url_parm
=~
m#/
+(.+)/+commitdiff/+
([0-9a-fA-F]+)$#
)
{
$project
=
$
1
;
$action
=
"
commitdiff
";
$hash
=
$
2
;
}
elsif
(
$my_url_parm
=~
m#/
(.+)/blobdiff/
([0-9a-fA-F]+)/([0-9a-fA-F]+)$#
)
{
}
elsif
(
$my_url_parm
=~
m#/
+(.+)/+blobdiff/+
([0-9a-fA-F]+)/([0-9a-fA-F]+)$#
)
{
$project
=
$
1
;
$action
=
"
blobdiff
";
$hash
=
$
2
;
$hash_parent
=
$
3
;
}
elsif
(
$my_url_parm
=~
m#/
(.+)/blob/
([0-9a-fA-F]+)$#
)
{
}
elsif
(
$my_url_parm
=~
m#/
+(.+)/+blob/+
([0-9a-fA-F]+)$#
)
{
$project
=
$
1
;
$action
=
"
blob
";
$hash
=
$
2
;
}
elsif
(
$my_url_parm
=~
m#/
(.+)/tree/
([0-9a-fA-F]+)$#
)
{
}
elsif
(
$my_url_parm
=~
m#/
+(.+)/+tree/+
([0-9a-fA-F]+)$#
)
{
$project
=
$
1
;
$action
=
"
tree
";
$hash
=
$
2
;
}
elsif
(
$my_url_parm
=~
m#/
(.+)/log/
([0-9]+)$#
)
{
}
elsif
(
$my_url_parm
=~
m#/
+(.+)/+log/+
([0-9]+)$#
)
{
$project
=
$
1
;
$action
=
"
log
";
$view_back
=
$
2
;
}
elsif
(
$my_url_parm
=~
m#/
(.+)/
log$#
)
{
}
elsif
(
$my_url_parm
=~
m#/
+(.+)/+
log$#
)
{
$project
=
$
1
;
$action
=
"
log
";
$view_back
=
1
;
}
elsif
(
$my_url_parm
=~
m#/(.+)/rss$#
)
{
}
elsif
(
$my_url_parm
=~
m#/
+
(.+)/rss$#
)
{
$project
=
$
1
;
$action
=
"
rss
";
$view_back
=
1
;
}
elsif
(
$my_url_parm
=~
m#/git-logo.png$#
)
{
}
elsif
(
$my_url_parm
=~
m#/
+
git-logo.png$#
)
{
print
$cgi
->
header
(
-
type
=>
'
image/png
',
-
expires
=>
'
+1d
');
print
"
\
211
\
120
\
116
\
107
\015\012\032\012\000\000\000\015\
111
\
110
\
104
\
122
"
.
"
\000\000\000\
110
\000\000\000\033\004\003\000\000\000\055\
331
\
324
"
.
...
...
@@ -151,8 +151,8 @@ sub git_header_html {
}
sub
git_footer_html
{
print
"
</div>
";
print
$cgi
->
end_html
()
;
print
"
</div>
\n
";
print
"
</body>
\n
</html>
"
;
}
sub
git_head
{
...
...
@@ -263,6 +263,20 @@ sub git_diff_html {
}
}
sub
mode_str
{
my
$perms
=
oct
shift
;
my
$modestr
;
if
(
$perms
&
040000
)
{
$modestr
.=
'
d
'
}
else
{
$modestr
.=
'
-
'
};
for
(
my
$i
=
0
;
$i
<
3
;
$i
++
)
{
if
(
$perms
&
0400
)
{
$modestr
.=
'
r
'
}
else
{
$modestr
.=
'
-
'
};
if
(
$perms
&
0200
)
{
$modestr
.=
'
w
'
}
else
{
$modestr
.=
'
-
'
};
if
(
$perms
&
0100
)
{
$modestr
.=
'
x
'
}
else
{
$modestr
.=
'
-
'
};
$perms
<<=
3
;
}
return
$modestr
;
}
# show list of default projects
if
(
$project
eq
"")
{
opendir
(
my
$fd
,
"
$projectroot
/
$defaultprojects
");
my
(
@path
)
=
grep
(
!
/^\./
,
readdir
(
$fd
));
...
...
@@ -307,13 +321,14 @@ sub git_diff_html {
foreach
my
$line
(
@entries
)
{
#'100644 blob 0fa3f3a66fb6a137f6ec2c19351ed4d807070ffa panic.c'
$line
=~
m/^([0-9]+)\t(.*)\t(.*)\t(.*)$/
;
my
$t_mode
=
$
1
;
my
$t_type
=
$
2
;
my
$t_hash
=
$
3
;
my
$t_name
=
$
4
;
if
(
$t_type
eq
"
blob
")
{
print
"
BLOB
\t
"
.
$cgi
->
a
({
-
href
=>
"
$my_uri
/
$project
/blob/$3
"},
$
4
)
.
"
\n
";
print
mode_str
(
$t_mode
)
.
"
"
.
$cgi
->
a
({
-
href
=>
"
$my_uri
/
$project
/blob/
$t_hash
"},
$t_name
)
.
"
\n
";
}
elsif
(
$t_type
eq
"
tree
")
{
print
"
TREE
\t
"
.
$cgi
->
a
({
-
href
=>
"
$my_uri
/
$project
/tree/$3
"},
$
4
)
.
"
\n
";
print
mode_str
(
$t_mode
)
.
"
"
.
$cgi
->
a
({
-
href
=>
"
$my_uri
/
$project
/tree/
$t_hash
"},
$t_name
)
.
"
\n
";
}
}
print
"
</pre>
\n
";
...
...
@@ -400,7 +415,7 @@ sub git_diff_html {
print
"
<td>
\n
";
my
$comment
=
$co
{'
comment
'};
foreach
my
$line
(
@$comment
)
{
if
(
$line
=~
m/
signed-off
-by:/i
)
{
if
(
$line
=~
m/
^(signed-off|acked)
-by:/i
)
{
print
'
<div class="signed_off">
'
.
escapeHTML
(
$line
)
.
"
<br/></div>
\n
";
}
else
{
print
escapeHTML
(
$line
)
.
"
<br/>
\n
";
...
...
@@ -461,7 +476,7 @@ sub git_diff_html {
print
"
<td>
\n
";
my
$comment
=
$co
{'
comment
'};
foreach
my
$line
(
@$comment
)
{
if
(
$line
=~
m/
signed-off
-by:/i
)
{
if
(
$line
=~
m/
(signed-off|acked)
-by:/i
)
{
print
'
<div class="signed_off">
'
.
escapeHTML
(
$line
)
.
"
<br/></div>
\n
";
}
else
{
print
escapeHTML
(
$line
)
.
"
<br/>
\n
";
...
...
@@ -482,16 +497,18 @@ sub git_diff_html {
my
$type
=
$
3
;
my
$id
=
$
4
;
my
$file
=
$
5
;
$mode
=~
m/^([0-7]{6})/
;
my
$modestr
=
mode_str
(
$
1
);
if
(
$type
eq
"
blob
")
{
if
(
$op
eq
"
+
")
{
print
"
added
\t
"
.
$cgi
->
a
({
-
href
=>
"
$my_uri
/
$project
/blob/
$id
"},
$file
)
.
"
\n
";
print
"
added
\t
$modestr
"
.
$cgi
->
a
({
-
href
=>
"
$my_uri
/
$project
/blob/
$id
"},
$file
)
.
"
\n
";
}
elsif
(
$op
eq
"
-
")
{
print
"
removed
\t
"
.
$cgi
->
a
({
-
href
=>
"
$my_uri
/
$project
/blob/
$id
"},
$file
)
.
"
\n
";
print
"
removed
\t
$modestr
"
.
$cgi
->
a
({
-
href
=>
"
$my_uri
/
$project
/blob/
$id
"},
$file
)
.
"
\n
";
}
elsif
(
$op
eq
"
*
")
{
$id
=~
m/([0-9a-fA-F]+)->([0-9a-fA-F]+)/
;
my
$old
=
$
1
;
my
$new
=
$
2
;
print
"
changed
\t
"
.
$cgi
->
a
({
-
href
=>
"
$my_uri
/
$project
/blobdiff/
$old
/
$new
"},
$file
)
.
"
\n
";
print
"
changed
\t
$modestr
"
.
$cgi
->
a
({
-
href
=>
"
$my_uri
/
$project
/blobdiff/
$old
/
$new
"},
$file
)
.
"
\n
";
}
}
}
...
...
编辑
预览
Markdown
is supported
0%
请重试
或
添加新附件
.
添加附件
取消
You are about to add
0
people
to the discussion. Proceed with caution.
先完成此消息的编辑!
取消
想要评论请
注册
或
登录