| line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
|
1
|
|
|
|
|
|
|
MODULE = Git::Raw PACKAGE = Git::Raw::Packbuilder |
|
2
|
|
|
|
|
|
|
|
|
3
|
|
|
|
|
|
|
INCLUDE: const-xs-packbuilder.inc |
|
4
|
|
|
|
|
|
|
|
|
5
|
|
|
|
|
|
|
SV * |
|
6
|
|
|
|
|
|
|
new(class, repo) |
|
7
|
|
|
|
|
|
|
SV *class |
|
8
|
|
|
|
|
|
|
SV *repo |
|
9
|
|
|
|
|
|
|
|
|
10
|
|
|
|
|
|
|
PREINIT: |
|
11
|
|
|
|
|
|
|
int rc; |
|
12
|
|
|
|
|
|
|
|
|
13
|
|
|
|
|
|
|
Repository repo_ptr; |
|
14
|
|
|
|
|
|
|
Packbuilder pb; |
|
15
|
|
|
|
|
|
|
|
|
16
|
|
|
|
|
|
|
CODE: |
|
17
|
2
|
|
|
|
|
|
repo_ptr = GIT_SV_TO_PTR(Repository, repo); |
|
18
|
|
|
|
|
|
|
|
|
19
|
2
|
|
|
|
|
|
Newxz(pb, 1, git_raw_packbuilder); |
|
20
|
|
|
|
|
|
|
|
|
21
|
2
|
|
|
|
|
|
rc = git_packbuilder_new(&pb -> packbuilder, repo_ptr -> repository); |
|
22
|
2
|
|
|
|
|
|
git_check_error(rc); |
|
23
|
|
|
|
|
|
|
|
|
24
|
2
|
|
|
|
|
|
GIT_NEW_OBJ_WITH_MAGIC( |
|
25
|
|
|
|
|
|
|
RETVAL, "Git::Raw::Packbuilder", pb, SvRV(repo) |
|
26
|
|
|
|
|
|
|
); |
|
27
|
|
|
|
|
|
|
|
|
28
|
|
|
|
|
|
|
OUTPUT: RETVAL |
|
29
|
|
|
|
|
|
|
|
|
30
|
|
|
|
|
|
|
void |
|
31
|
|
|
|
|
|
|
insert(self, object, recursive=&PL_sv_yes) |
|
32
|
|
|
|
|
|
|
Packbuilder self |
|
33
|
|
|
|
|
|
|
SV *object |
|
34
|
|
|
|
|
|
|
SV *recursive |
|
35
|
|
|
|
|
|
|
|
|
36
|
|
|
|
|
|
|
PREINIT: |
|
37
|
5
|
|
|
|
|
|
int rc = GIT_OK; |
|
38
|
|
|
|
|
|
|
|
|
39
|
|
|
|
|
|
|
CODE: |
|
40
|
5
|
100
|
|
|
|
|
if (!sv_isobject(object)) |
|
41
|
1
|
|
|
|
|
|
croak_usage("Invalid type for 'object', expected an object"); |
|
42
|
|
|
|
|
|
|
|
|
43
|
4
|
100
|
|
|
|
|
if (sv_derived_from(object, "Git::Raw::Walker")) { |
|
44
|
1
|
|
|
|
|
|
Walker walker = GIT_SV_TO_PTR(Walker, object); |
|
45
|
1
|
|
|
|
|
|
rc = git_packbuilder_insert_walk(self -> packbuilder, walker); |
|
46
|
|
|
|
|
|
|
} else { |
|
47
|
3
|
|
|
|
|
|
git_object *o = git_sv_to_obj(object); |
|
48
|
3
|
100
|
|
|
|
|
if (o == NULL) |
|
49
|
1
|
|
|
|
|
|
croak_usage("Unsupported object type"); |
|
50
|
|
|
|
|
|
|
|
|
51
|
2
|
50
|
|
|
|
|
if (SvTRUE(recursive)) |
|
|
|
50
|
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
|
|
50
|
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
|
|
100
|
|
|
|
|
|
|
|
|
50
|
|
|
|
|
|
|
|
|
50
|
|
|
|
|
|
|
|
|
50
|
|
|
|
|
|
|
|
|
50
|
|
|
|
|
|
|
|
|
50
|
|
|
|
|
|
|
|
|
50
|
|
|
|
|
|
|
|
|
50
|
|
|
|
|
|
|
|
|
50
|
|
|
|
|
|
|
|
|
50
|
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
|
|
50
|
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
52
|
1
|
|
|
|
|
|
rc = git_packbuilder_insert_recur(self -> packbuilder, git_object_id(o), NULL); |
|
53
|
|
|
|
|
|
|
else |
|
54
|
1
|
|
|
|
|
|
rc = git_packbuilder_insert(self -> packbuilder, git_object_id(o), NULL); |
|
55
|
|
|
|
|
|
|
} |
|
56
|
|
|
|
|
|
|
|
|
57
|
3
|
|
|
|
|
|
git_check_error(rc); |
|
58
|
|
|
|
|
|
|
|
|
59
|
|
|
|
|
|
|
|
|
60
|
|
|
|
|
|
|
void |
|
61
|
|
|
|
|
|
|
write(self, path) |
|
62
|
|
|
|
|
|
|
Packbuilder self |
|
63
|
|
|
|
|
|
|
SV *path |
|
64
|
|
|
|
|
|
|
|
|
65
|
|
|
|
|
|
|
PREINIT: |
|
66
|
|
|
|
|
|
|
int rc; |
|
67
|
|
|
|
|
|
|
|
|
68
|
|
|
|
|
|
|
const char *p; |
|
69
|
|
|
|
|
|
|
static const char cbname[] = "transfer_progress"; |
|
70
|
|
|
|
|
|
|
|
|
71
|
|
|
|
|
|
|
CODE: |
|
72
|
2
|
|
|
|
|
|
p = git_ensure_pv(path, "path"); |
|
73
|
|
|
|
|
|
|
|
|
74
|
2
|
100
|
|
|
|
|
if (self -> callbacks && hv_exists(self -> callbacks, cbname, sizeof(cbname)-1)) |
|
|
|
50
|
|
|
|
|
|
|
75
|
1
|
|
|
|
|
|
rc = git_packbuilder_write(self -> packbuilder, p, 0, |
|
76
|
1
|
|
|
|
|
|
git_transfer_progress_cbb, self -> callbacks); |
|
77
|
|
|
|
|
|
|
else |
|
78
|
1
|
|
|
|
|
|
rc = git_packbuilder_write(self -> packbuilder, p, 0, |
|
79
|
|
|
|
|
|
|
NULL, NULL); |
|
80
|
2
|
|
|
|
|
|
git_check_error(rc); |
|
81
|
|
|
|
|
|
|
|
|
82
|
|
|
|
|
|
|
SV * |
|
83
|
|
|
|
|
|
|
object_count(self) |
|
84
|
|
|
|
|
|
|
Packbuilder self |
|
85
|
|
|
|
|
|
|
|
|
86
|
|
|
|
|
|
|
CODE: |
|
87
|
5
|
|
|
|
|
|
size_t count = git_packbuilder_object_count(self -> packbuilder); |
|
88
|
5
|
|
|
|
|
|
RETVAL = newSVuv(count); |
|
89
|
|
|
|
|
|
|
|
|
90
|
|
|
|
|
|
|
OUTPUT: RETVAL |
|
91
|
|
|
|
|
|
|
|
|
92
|
|
|
|
|
|
|
SV * |
|
93
|
|
|
|
|
|
|
written(self) |
|
94
|
|
|
|
|
|
|
Packbuilder self |
|
95
|
|
|
|
|
|
|
|
|
96
|
|
|
|
|
|
|
CODE: |
|
97
|
4
|
|
|
|
|
|
size_t written = git_packbuilder_written(self -> packbuilder); |
|
98
|
4
|
|
|
|
|
|
RETVAL = newSVuv(written); |
|
99
|
|
|
|
|
|
|
|
|
100
|
|
|
|
|
|
|
OUTPUT: RETVAL |
|
101
|
|
|
|
|
|
|
|
|
102
|
|
|
|
|
|
|
void |
|
103
|
|
|
|
|
|
|
threads(self, count) |
|
104
|
|
|
|
|
|
|
Packbuilder self |
|
105
|
|
|
|
|
|
|
SV *count |
|
106
|
|
|
|
|
|
|
|
|
107
|
|
|
|
|
|
|
PREINIT: |
|
108
|
|
|
|
|
|
|
I32 c; |
|
109
|
|
|
|
|
|
|
CODE: |
|
110
|
2
|
|
|
|
|
|
c = git_ensure_iv(count, "count"); |
|
111
|
2
|
100
|
|
|
|
|
if (c < 0) |
|
112
|
1
|
|
|
|
|
|
croak_usage("thread count should be >= 0"); |
|
113
|
|
|
|
|
|
|
|
|
114
|
1
|
|
|
|
|
|
git_packbuilder_set_threads(self -> packbuilder, (unsigned int)c); |
|
115
|
|
|
|
|
|
|
|
|
116
|
|
|
|
|
|
|
SV * |
|
117
|
|
|
|
|
|
|
hash(self) |
|
118
|
|
|
|
|
|
|
Packbuilder self |
|
119
|
|
|
|
|
|
|
|
|
120
|
|
|
|
|
|
|
CODE: |
|
121
|
2
|
|
|
|
|
|
RETVAL = git_oid_to_sv(git_packbuilder_hash(self -> packbuilder)); |
|
122
|
|
|
|
|
|
|
|
|
123
|
|
|
|
|
|
|
OUTPUT: RETVAL |
|
124
|
|
|
|
|
|
|
|
|
125
|
|
|
|
|
|
|
void |
|
126
|
|
|
|
|
|
|
callbacks(self, callbacks) |
|
127
|
|
|
|
|
|
|
Packbuilder self |
|
128
|
|
|
|
|
|
|
HV *callbacks |
|
129
|
|
|
|
|
|
|
|
|
130
|
|
|
|
|
|
|
PREINIT: |
|
131
|
|
|
|
|
|
|
int rc; |
|
132
|
|
|
|
|
|
|
SV *cb; |
|
133
|
|
|
|
|
|
|
|
|
134
|
|
|
|
|
|
|
CODE: |
|
135
|
1
|
50
|
|
|
|
|
if (!self -> callbacks) |
|
136
|
1
|
|
|
|
|
|
self -> callbacks = newHV(); |
|
137
|
|
|
|
|
|
|
|
|
138
|
1
|
50
|
|
|
|
|
if ((cb = get_callback_option(callbacks, "pack_progress"))) { |
|
139
|
1
|
|
|
|
|
|
hv_stores(self -> callbacks, "pack_progress", cb); |
|
140
|
1
|
|
|
|
|
|
rc = git_packbuilder_set_callbacks(self -> packbuilder, |
|
141
|
1
|
|
|
|
|
|
git_packbuilder_progress_cbb, self -> callbacks); |
|
142
|
1
|
|
|
|
|
|
git_check_error(rc); |
|
143
|
|
|
|
|
|
|
} |
|
144
|
|
|
|
|
|
|
|
|
145
|
1
|
50
|
|
|
|
|
if ((cb = get_callback_option(callbacks, "transfer_progress"))) |
|
146
|
1
|
|
|
|
|
|
hv_stores(self -> callbacks, "transfer_progress", cb); |
|
147
|
|
|
|
|
|
|
|
|
148
|
|
|
|
|
|
|
void |
|
149
|
|
|
|
|
|
|
DESTROY(self) |
|
150
|
|
|
|
|
|
|
SV *self |
|
151
|
|
|
|
|
|
|
|
|
152
|
|
|
|
|
|
|
PREINIT: |
|
153
|
|
|
|
|
|
|
Packbuilder pb; |
|
154
|
|
|
|
|
|
|
|
|
155
|
|
|
|
|
|
|
CODE: |
|
156
|
2
|
|
|
|
|
|
pb = GIT_SV_TO_PTR(Packbuilder, self); |
|
157
|
2
|
100
|
|
|
|
|
if (pb -> callbacks) |
|
158
|
1
|
|
|
|
|
|
hv_undef(pb -> callbacks); |
|
159
|
2
|
|
|
|
|
|
git_packbuilder_free(pb -> packbuilder); |
|
160
|
2
|
|
|
|
|
|
SvREFCNT_dec(GIT_SV_TO_MAGIC(self)); |
|
161
|
2
|
|
|
|
|
|
Safefree(pb); |
|
162
|
|
|
|
|
|
|
|