~ubuntu-branches/ubuntu/saucy/zoneminder/saucy-proposed

« back to all changes in this revision

Viewing changes to scripts/zmcontrol.pl.in

  • Committer: Bazaar Package Importer
  • Author(s): Vagrant Cascadian, Peter Howard, Vagrant Cascadian
  • Date: 2011-07-24 16:44:30 UTC
  • mfrom: (15.1.7 sid)
  • Revision ID: james.westby@ubuntu.com-20110724164430-yibtwwjqlqb7hv1o
Tags: 1.24.4-1
[ Peter Howard ]
* Initial release of 1.24.4 (Closes: #634985).
  - Fix 32/64-bit type declarations (Closes: #614404).
* Update patches.

[ Vagrant Cascadian ]
* Add patch to fix FTBFS by using libv4l1-videodev.h from libv4l-dev.
  Thanks to Andreas Metzler for reporting the issue. 
  (Closes: #619813). 
* Document adding the www-data user to the video group in README.Debian.
  (Closes: #611324)
* Depend on libsys-mmap-perl to enable mapped memory support.
  (Closes: #607331)
* Update libjs-mootools patch to use -nc variants (Closes: #635075).
* Depend on javascript-common, to ensure that /javascript is available in 
  the web server.
* Set the upstream version in postinst at build time.
* Use dh-autoreconf to properly clean up autogenerated files during build.
* Add Vcs-HG to debian/control. 
* Add Build-Depends: libv4l-dev, libbz2-dev, dh-autoreconf, libsys-mmap-perl.

Show diffs side-by-side

added added

removed removed

Lines of Context:
2
2
#
3
3
# ==========================================================================
4
4
#
5
 
# ZoneMinder Control Script, $Date: 2009-06-08 10:11:56 +0100 (Mon, 08 Jun 2009) $, $Revision: 2908 $
 
5
# ZoneMinder Control Script, $Date: 2011-05-23 17:18:18 +0100 (Mon, 23 May 2011) $, $Revision: 3357 $
6
6
# Copyright (C) 2001-2008 Philip Coombes
7
7
#
8
8
# This program is free software; you can redistribute it and/or
45
45
use Socket;
46
46
use Data::Dumper;
47
47
use Module::Load;
48
 
use PHP::Serialization qw(serialize unserialize);
49
48
 
50
49
use constant MAX_CONNECT_DELAY => 10;
51
50
use constant MAX_COMMAND_WAIT => 1800;
198
197
 
199
198
                    next if ( !$message );
200
199
 
201
 
                    my $params = unserialize( $message );
 
200
                    my $params = jsonDecode( $message );
202
201
                    #Debug( Dumper( $params ) );
203
202
 
204
203
                    my $command = $params->{command};
242
241
#print( "Writing commands\n" );
243
242
CLIENT->autoflush();
244
243
 
245
 
my $message = serialize( \%options );
 
244
my $message = jsonEncode( \%options );
246
245
print( CLIENT $message );
247
246
shutdown( CLIENT, 1 );
248
247