Changeset 852 for trunk/cgi-bin
- Timestamp:
- 04/13/16 18:18:54 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/cgi-bin/ipdb-rpc.cgi
r851 r852 88 88 'ipdb.getCityList' => \&rpc_getCityList, 89 89 'ipdb.getAvailableStatics' => \&rpc_getAvailableStatics, 90 'ipdb.getBackupList' => \&rpc_getBackupList, 90 91 }; 91 92 … … 409 410 return $ret; 410 411 } # rpc_getAvailableStatics() 412 413 414 sub rpc_getBackupList { 415 my %args = @_; 416 417 _commoncheck(\%args, 'n'); 418 419 # grab the whole waffle. 420 my $sql = "SELECT backup_id, bkbrand, bkmodel, bktype, bkport, bksrc, bkuser, bkvpass, bkepass, ip FROM backuplist"; 421 my $result = $ip_dbh->selectall_arrayref($sql, { Slice => {} }); 422 die $ip_dbh->errstr if !$result; 423 424 return $result; 425 } # rpc_getBackupList()
Note:
See TracChangeset
for help on using the changeset viewer.