FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-04-28 17:12:32 +00:00
Code Issues Releases Wiki Activity

49_SSCAM: new version 1.42, minor fixes

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@13787 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
nasseeder1 2017-03-24 13:21:40 +00:00
parent 876a2c6420
commit ab1ff60fbd
2 changed files with 8 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
fhem/CHANGED
View File

@ -1,5 +1,6 @@
# Add changes at the top of the list. Keep it in ASCII, and 80-char wide. # Add changes at the top of the list. Keep it in ASCII, and 80-char wide.
# Do not insert empty lines here, update check depends on it. # Do not insert empty lines here, update check depends on it.
- update: 49_SSCAM new version 1.42, minor fixes
- update: 88_HMCCU: Optimized code - update: 88_HMCCU: Optimized code
- update: 88_HMCCURPC: Optimized error handling - update: 88_HMCCURPC: Optimized error handling
- feature: 74_XiaomiFlowerSens: 1.0.0, add Attribut ssh Support for remote - feature: 74_XiaomiFlowerSens: 1.0.0, add Attribut ssh Support for remote

8
fhem/FHEM/49_SSCam.pm
View File

@ -27,6 +27,8 @@
######################################################################################################################### #########################################################################################################################
# Versions History: # Versions History:
# #
# 1.42 15.03.2017 camop_nonbl changed to get all cam id's and names
# 1.41 15.03.2017 minor bugfix of blank character in state "disabled" (row 3383)
# 1.40 21.01.2017 downgrade of API apicammaxver in SVS 8.0.0 # 1.40 21.01.2017 downgrade of API apicammaxver in SVS 8.0.0
# 1.39 20.01.2017 compatibility to SVS 8.0.0, Version in Internals, execute getsvsinfo after set credentials # 1.39 20.01.2017 compatibility to SVS 8.0.0, Version in Internals, execute getsvsinfo after set credentials
# 1.37 10.10.2016 bugfix Experimental keys on scalar is now forbidden (Perl >= 5.23) # 1.37 10.10.2016 bugfix Experimental keys on scalar is now forbidden (Perl >= 5.23)
@ -156,7 +158,7 @@ use Time::HiRes;
use HttpUtils; use HttpUtils;
# no if $] >= 5.017011, warnings => 'experimental'; # no if $] >= 5.017011, warnings => 'experimental';
my $SSCamVersion = "1.40"; my $SSCamVersion = "1.42";
# Aufbau Errorcode-Hashes (siehe Surveillance Station Web API) # Aufbau Errorcode-Hashes (siehe Surveillance Station Web API)
my %SSCam_errauthlist = ( my %SSCam_errauthlist = (
@ -2554,13 +2556,11 @@ sub camop_nonbl ($) {
if ($success) # die Liste aller Kameras konnte ausgelesen werden, Anzahl der definierten Kameras ist in Var "total" if ($success) # die Liste aller Kameras konnte ausgelesen werden, Anzahl der definierten Kameras ist in Var "total"
{ {
$camcount = $data->{'data'}->{'total'};
$i = 0; $i = 0;
# Namen aller installierten Kameras mit Id's in Assoziatives Array einlesen # Namen aller installierten Kameras mit Id's in Assoziatives Array einlesen
%allcams = (); %allcams = ();
while ($i < $camcount) while ($data->{'data'}->{'cameras'}->[$i]) {
{
if ($apicammaxver <= 8) { if ($apicammaxver <= 8) {
$n = $data->{'data'}->{'cameras'}->[$i]->{'name'}; $n = $data->{'data'}->{'cameras'}->[$i]->{'name'};
} else { } else {