line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
package CDP; |
2
|
|
|
|
|
|
|
our $VERSION = '0.032'; |
3
|
|
|
|
|
|
|
|
4
|
1
|
|
|
1
|
|
28637
|
use 5.008006; |
|
1
|
|
|
|
|
6
|
|
|
1
|
|
|
|
|
52
|
|
5
|
1
|
|
|
1
|
|
6
|
use strict; |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
43
|
|
6
|
1
|
|
|
1
|
|
7
|
use warnings; |
|
1
|
|
|
|
|
7
|
|
|
1
|
|
|
|
|
58
|
|
7
|
|
|
|
|
|
|
|
8
|
1
|
|
|
1
|
|
901
|
use CDP::backupTask qw /:ALL/; |
|
0
|
|
|
|
|
|
|
|
0
|
|
|
|
|
|
|
9
|
|
|
|
|
|
|
use CDP::diskSafe qw /:ALL/; |
10
|
|
|
|
|
|
|
use CDP::mySQL qw /:ALL/; |
11
|
|
|
|
|
|
|
use CDP::taskRun qw /:ALL/; |
12
|
|
|
|
|
|
|
use CDP::volume qw /:ALL/; |
13
|
|
|
|
|
|
|
use CDP::Connect qw /:ALL/; |
14
|
|
|
|
|
|
|
use CDP::host qw /:ALL/; |
15
|
|
|
|
|
|
|
use CDP::storagepool qw /:ALL/; |
16
|
|
|
|
|
|
|
use CDP::user qw /:ALL/; |
17
|
|
|
|
|
|
|
use CDP::Dump qw /:ALL/; |
18
|
|
|
|
|
|
|
|
19
|
|
|
|
|
|
|
our (@ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS, ); |
20
|
|
|
|
|
|
|
|
21
|
|
|
|
|
|
|
require Exporter; |
22
|
|
|
|
|
|
|
require DynaLoader; |
23
|
|
|
|
|
|
|
require AutoLoader; |
24
|
|
|
|
|
|
|
|
25
|
|
|
|
|
|
|
@ISA = qw(Exporter DynaLoader AutoLoader); |
26
|
|
|
|
|
|
|
# Items to export into callers namespace by default. Note: do not export |
27
|
|
|
|
|
|
|
# names by default without a very good reason. Use EXPORT_OK instead. |
28
|
|
|
|
|
|
|
# Do not simply export all your public functions/methods/constants. |
29
|
|
|
|
|
|
|
|
30
|
|
|
|
|
|
|
# This allows declaration use CDP ':ALL'; |
31
|
|
|
|
|
|
|
# If you do not need this, moving things directly into @EXPORT or @EXPORT_OK |
32
|
|
|
|
|
|
|
# will save memory. |
33
|
|
|
|
|
|
|
@EXPORT = qw/ |
34
|
|
|
|
|
|
|
|
35
|
|
|
|
|
|
|
/; |
36
|
|
|
|
|
|
|
|
37
|
|
|
|
|
|
|
@EXPORT_OK = qw/ |
38
|
|
|
|
|
|
|
OpenCDP |
39
|
|
|
|
|
|
|
dumpARef |
40
|
|
|
|
|
|
|
dumpHRef |
41
|
|
|
|
|
|
|
|
42
|
|
|
|
|
|
|
editBackupTask |
43
|
|
|
|
|
|
|
getScheduledTaskIdsByHost |
44
|
|
|
|
|
|
|
runNow |
45
|
|
|
|
|
|
|
scheduleBackupTask |
46
|
|
|
|
|
|
|
scheduleMinutelyBackupTask |
47
|
|
|
|
|
|
|
|
48
|
|
|
|
|
|
|
addDiskSafe |
49
|
|
|
|
|
|
|
addDiskSafeWithEncryption |
50
|
|
|
|
|
|
|
deleteDiskSafe |
51
|
|
|
|
|
|
|
getActiveDiskSafe |
52
|
|
|
|
|
|
|
getActiveDiskSafeAsMap |
53
|
|
|
|
|
|
|
getActiveDiskSafeID |
54
|
|
|
|
|
|
|
getCompressionLevel |
55
|
|
|
|
|
|
|
getDiskSafe |
56
|
|
|
|
|
|
|
getDiskSafeAsMap |
57
|
|
|
|
|
|
|
getDiskSafeIDs |
58
|
|
|
|
|
|
|
getMaxFreeSpace |
59
|
|
|
|
|
|
|
getStorageDiskID |
60
|
|
|
|
|
|
|
getTimeCreated |
61
|
|
|
|
|
|
|
isEncryptionInitDone |
62
|
|
|
|
|
|
|
runEncryptionSetup |
63
|
|
|
|
|
|
|
setCompressionLevel |
64
|
|
|
|
|
|
|
setPassphrase |
65
|
|
|
|
|
|
|
|
66
|
|
|
|
|
|
|
addAdmin |
67
|
|
|
|
|
|
|
addBackupUser |
68
|
|
|
|
|
|
|
addFullControlUser |
69
|
|
|
|
|
|
|
addHost |
70
|
|
|
|
|
|
|
addHostWithDescription |
71
|
|
|
|
|
|
|
addLinuxControlPanelHost |
72
|
|
|
|
|
|
|
addLinuxHost |
73
|
|
|
|
|
|
|
addLinuxHostWithDescription |
74
|
|
|
|
|
|
|
addRestoreUser |
75
|
|
|
|
|
|
|
addUnknownHost |
76
|
|
|
|
|
|
|
addUnknownHostWithDescription |
77
|
|
|
|
|
|
|
addUser |
78
|
|
|
|
|
|
|
addWindowsHost |
79
|
|
|
|
|
|
|
addWindowsHostWithDescription |
80
|
|
|
|
|
|
|
deleteHost |
81
|
|
|
|
|
|
|
getDescription |
82
|
|
|
|
|
|
|
getHost |
83
|
|
|
|
|
|
|
getHostAsMap |
84
|
|
|
|
|
|
|
getHostByDescription |
85
|
|
|
|
|
|
|
getHostByHostname |
86
|
|
|
|
|
|
|
getHostIds |
87
|
|
|
|
|
|
|
getHostIdsByVolume |
88
|
|
|
|
|
|
|
getHostname |
89
|
|
|
|
|
|
|
getHostType |
90
|
|
|
|
|
|
|
getLastFinishedBackupTaskInfo |
91
|
|
|
|
|
|
|
getQuota |
92
|
|
|
|
|
|
|
getRemotePort |
93
|
|
|
|
|
|
|
getTimeout |
94
|
|
|
|
|
|
|
isCdpForMySqlAddonEnabled |
95
|
|
|
|
|
|
|
isControlPanelModuleEnabled |
96
|
|
|
|
|
|
|
isEnabled |
97
|
|
|
|
|
|
|
isHostDiscoveryFinished |
98
|
|
|
|
|
|
|
removeUser |
99
|
|
|
|
|
|
|
runHostDiscovery |
100
|
|
|
|
|
|
|
setDescription |
101
|
|
|
|
|
|
|
setEnabled |
102
|
|
|
|
|
|
|
setHostname |
103
|
|
|
|
|
|
|
setHostType |
104
|
|
|
|
|
|
|
setLinuxHostType |
105
|
|
|
|
|
|
|
setQuota |
106
|
|
|
|
|
|
|
setRemotePort |
107
|
|
|
|
|
|
|
setsCdpForMySqlAddonEnabled |
108
|
|
|
|
|
|
|
setsControlPanelModuleEnabled |
109
|
|
|
|
|
|
|
setTimeout |
110
|
|
|
|
|
|
|
setWindowsHostType |
111
|
|
|
|
|
|
|
|
112
|
|
|
|
|
|
|
addLocalMySQLInstance |
113
|
|
|
|
|
|
|
addRemoteMySQLInstance |
114
|
|
|
|
|
|
|
deleteMySQLInstance |
115
|
|
|
|
|
|
|
getMySQLInstance |
116
|
|
|
|
|
|
|
getMySQLInstanceIds |
117
|
|
|
|
|
|
|
setCustomInnoDBDataDirectory |
118
|
|
|
|
|
|
|
setCustomInnoDBLogDirectory |
119
|
|
|
|
|
|
|
setCustomMySQLDataDirectory |
120
|
|
|
|
|
|
|
setDescription |
121
|
|
|
|
|
|
|
setMySQLHost |
122
|
|
|
|
|
|
|
setMySQLPass |
123
|
|
|
|
|
|
|
setMySQLPort |
124
|
|
|
|
|
|
|
setMySQLSocketPath |
125
|
|
|
|
|
|
|
setMySQLUser |
126
|
|
|
|
|
|
|
|
127
|
|
|
|
|
|
|
getStoragePool |
128
|
|
|
|
|
|
|
getStoragePoolByName |
129
|
|
|
|
|
|
|
getStoragePoolIDByName |
130
|
|
|
|
|
|
|
getStoragePoolIDs |
131
|
|
|
|
|
|
|
|
132
|
|
|
|
|
|
|
getTaskLogs |
133
|
|
|
|
|
|
|
getTaskRun |
134
|
|
|
|
|
|
|
|
135
|
|
|
|
|
|
|
addAdmin |
136
|
|
|
|
|
|
|
addBasicUser |
137
|
|
|
|
|
|
|
addSuperUser |
138
|
|
|
|
|
|
|
addUser |
139
|
|
|
|
|
|
|
deleteUser |
140
|
|
|
|
|
|
|
getMe |
141
|
|
|
|
|
|
|
getMyId |
142
|
|
|
|
|
|
|
getUser |
143
|
|
|
|
|
|
|
getUserByUsername |
144
|
|
|
|
|
|
|
getUserIds |
145
|
|
|
|
|
|
|
removeAdmin |
146
|
|
|
|
|
|
|
removeAllUserAdminPrivileges |
147
|
|
|
|
|
|
|
setCanAddHost |
148
|
|
|
|
|
|
|
setCanAddUser |
149
|
|
|
|
|
|
|
setCanChangePassword |
150
|
|
|
|
|
|
|
setEmailAddress |
151
|
|
|
|
|
|
|
setEnabled |
152
|
|
|
|
|
|
|
setIsSuperUser |
153
|
|
|
|
|
|
|
setMustChangePassword |
154
|
|
|
|
|
|
|
setPassword |
155
|
|
|
|
|
|
|
setUsername |
156
|
|
|
|
|
|
|
|
157
|
|
|
|
|
|
|
addUser |
158
|
|
|
|
|
|
|
addVolume |
159
|
|
|
|
|
|
|
deleteVolume |
160
|
|
|
|
|
|
|
getAllowedScheduleFrequencies |
161
|
|
|
|
|
|
|
getVolume |
162
|
|
|
|
|
|
|
getVolumeByName |
163
|
|
|
|
|
|
|
getVolumeIds |
164
|
|
|
|
|
|
|
removeUser |
165
|
|
|
|
|
|
|
setAllowedScheduleFrequencies |
166
|
|
|
|
|
|
|
setControlPanelModuleEnabled |
167
|
|
|
|
|
|
|
setMaxCdpForMySqlAddons |
168
|
|
|
|
|
|
|
setMaxLinuxHosts |
169
|
|
|
|
|
|
|
setMaxWindowsHosts |
170
|
|
|
|
|
|
|
setQuota |
171
|
|
|
|
|
|
|
setStoragePool |
172
|
|
|
|
|
|
|
setVolumeName |
173
|
|
|
|
|
|
|
/; |
174
|
|
|
|
|
|
|
|
175
|
|
|
|
|
|
|
|
176
|
|
|
|
|
|
|
%EXPORT_TAGS = ( |
177
|
|
|
|
|
|
|
'ALL' => \@EXPORT_OK, |
178
|
|
|
|
|
|
|
'CONST' => [qw//], |
179
|
|
|
|
|
|
|
); |
180
|
|
|
|
|
|
|
|
181
|
|
|
|
|
|
|
|
182
|
|
|
|
|
|
|
# Preloaded methods go here. |
183
|
|
|
|
|
|
|
|
184
|
|
|
|
|
|
|
# Autoload methods go after =cut, and are processed by the autosplit program. |
185
|
|
|
|
|
|
|
|
186
|
|
|
|
|
|
|
1; |
187
|
|
|
|
|
|
|
__END__ |