Merge branch 'master' into iconnor_video
This commit is contained in:
Isaac Connor
commit
82b32578ec
|
|
@ -15,7 +15,7 @@ ADD `EncoderParameters` TEXT NOT NULL AFTER `VideoWriter` ;
|
|||
ALTER TABLE `Events` ADD `DefaultVideo` VARCHAR( 64 ) NOT NULL AFTER `AlarmFrames` ;
|
||||
```
|
||||
|
||||
All documentation for ZoneMinder is now online at http://www.zoneminder.com/wiki/index.php/Documentation
|
||||
All documentation for ZoneMinder is now online at https://zoneminder.readthedocs.org
|
||||
|
||||
## Overview
|
||||
|
||||
|
|
|
|||
|
|
@ -42,7 +42,7 @@ New installs
|
|||
mysqladmin -uroot -p reload
|
||||
|
||||
The database account credentials, zmuser/zmpass, are arbitrary. Set them to
|
||||
anything that suits your envinroment.
|
||||
anything that suits your environment.
|
||||
|
||||
3. If you have chosen to change the zoneminder database account credentials to
|
||||
something other than zmuser/zmpass, you must now edit /etc/zm/zm.conf.
|
||||
|
|
|
|||
|
|
@ -34,7 +34,7 @@ New installs
|
|||
mysqladmin -uroot -p reload
|
||||
|
||||
The database account credentials, zmuser/zmpass, are arbitrary. Set them to
|
||||
anything that suits your envinroment.
|
||||
anything that suits your environment.
|
||||
|
||||
3. If you have chosen to change the zoneminder mysql credentials to something
|
||||
other than zmuser/zmpass then you must now edit /etc/zm.conf. Change
|
||||
|
|
|
|||
|
|
@ -40,7 +40,7 @@ New installs
|
|||
mysqladmin -uroot -p reload
|
||||
|
||||
The database account credentials, zmuser/zmpass, are arbitrary. Set them to
|
||||
anything that suits your envinroment.
|
||||
anything that suits your environment.
|
||||
|
||||
3. If you have chosen to change the zoneminder database account credentials to
|
||||
something other than zmuser/zmpass, you must now edit /etc/zm/zm.conf.
|
||||
|
|
|
|||
|
|
@ -1,3 +1,9 @@
|
|||
zoneminder (1.29.0+h264-wily-SNAPSHOT2016033101) wily; urgency=medium
|
||||
|
||||
*
|
||||
|
||||
-- Isaac Connor <iconnor@connortechnology.com> Thu, 31 Mar 2016 10:29:41 -0400
|
||||
|
||||
zoneminder (1.28.1+1-vivid-SNAPSHOT2015081701) vivid; urgency=medium
|
||||
|
||||
* include api, switch to cmake build
|
||||
|
|
|
|||
|
|
@ -1,37 +0,0 @@
|
|||
Debian
|
||||
======
|
||||
|
||||
A fresh build based on master branch running Debian 7 (wheezy)\:
|
||||
::
|
||||
|
||||
root@host:~# aptitude install -y apache2 mysql-server php5 php5-mysql build-essential libmysqlclient-dev libssl-dev libbz2-dev libpcre3-dev libdbi-perl libarchive-zip-perl libdate-manip-perl libdevice-serialport-perl libmime-perl libpcre3 libwww-perl libdbd-mysql-perl libsys-mmap-perl yasm automake autoconf libjpeg8-dev libjpeg8 apache2-mpm-prefork libapache2-mod-php5 php5-cli libphp-serialization-perl libgnutls-dev libjpeg8-dev libavcodec-dev libavformat-dev libswscale-dev libavutil-dev libv4l-dev libtool ffmpeg libnetpbm10-dev libavdevice-dev libmime-lite-perl dh-autoreconf dpatch;
|
||||
|
||||
root@host:~# git clone https://github.com/ZoneMinder/ZoneMinder.git zoneminder;
|
||||
root@host:~# cd zoneminder;
|
||||
root@host:~# ln -s distros/debian;
|
||||
root@host:~# dpkg-checkbuilddeps;
|
||||
root@host:~# dpkg-buildpackage;
|
||||
|
||||
One level above you'll now find a deb package matching the architecture of the build host:
|
||||
::
|
||||
|
||||
root@host:~# ls -1 ~/zoneminder*;
|
||||
/root/zoneminder_1.26.4-1_amd64.changes
|
||||
/root/zoneminder_1.26.4-1_amd64.deb
|
||||
/root/zoneminder_1.26.4-1.dsc
|
||||
/root/zoneminder_1.26.4-1.tar.gz
|
||||
|
||||
The dpkg command itself does not resolve dependencies. That's what high-level interfaces like aptitude and apt-get are normally for. Unfortunately, unlike RPM, there's no easy way to install a separate deb package not contained with any repository.
|
||||
|
||||
To overcome this "limitation" we'll use dpkg only to install the zoneminder package and apt-get to fetch all needed dependencies afterwards. Running dpkg-reconfigure in the end will ensure that the setup scripts e.g. for database provisioning were executed.
|
||||
::
|
||||
|
||||
root@host:~# dpkg -i /root/zoneminder_1.26.4-1_amd64.deb; apt-get install -f;
|
||||
root@host:~# dpkg-reconfigure zoneminder;
|
||||
|
||||
Alternatively you may also use gdebi to automatically resolve dependencies during installation:
|
||||
::
|
||||
|
||||
root@host:~# aptitude install -y gdebi;
|
||||
root@host:~# gdebi /root/zoneminder_1.26.4-1_amd64.deb;
|
||||
|
||||
Binary file not shown.
|
Before Width: | Height: | Size: 38 KiB |
|
|
@ -1 +0,0 @@
|
|||
<mxfile type="dropbox" userAgent="Mozilla/5.0 (X11; Ubuntu; Linux x86_64; rv:43.0) Gecko/20100101 Firefox/43.0" version="5.2.7.3" editor="www.draw.io"><diagram>7Vvfb+I4F/1rkHYfFpEEQnlsmXZ2pXZUqaPd/fZlZIib+JsQs44pZf76uU6uEydOgELoUgkeELn+fc/JuddO6HnTxetnQZbRAw9o3HMHwWvP+9Rz3SvfhW9l2OSGsTfKDaFgQW5ySsMT+0HROEDrigU0rVSUnMeSLavGOU8SOpcVGxGCr6vVnnlcHXVJQj1iaXiak9i2/sUCGeGyXL+0/05ZGOmRHX+Sl8zI/Hso+CrB8Xqu95x98uIF0X1lC/VuwYeCc+hG/Vq8Tmms/Kh9lHvjrqW0mKSgCU5kRwMHUXgh8QpX+g9P6ANLAirA/rACF//2RMVLdvmFyjUX3+HXV77kMQ83PdePYaibGRT7ofqVd5jKjXZdtniqRnSgeB0xSZ+WZK5K18AVsEVyEWNxKgX/TqfQtwBLAnMB4zOL45op4oL94IkkuiFMUDLA6zpmYQI2yVXPz1AFyeRcFZMzHYQ+U80pkjUzocM+U76gUsA6B1jqISORyB52sC5ZMR5jlchgxFgzmSATw6LnEiD4gRi14OWOLbweSALkW6gF7cYC1qjsBzicoF/nMBBwwXb4ggWBGqYRYQ61n2O+BksE9Sg0MLFR0AguiWRcdeWCA2Fm0AVLQnVdXgHvwKCKVXM9R7ipBgPfn067gdgZDCsYu+MrC+QR3jkmxg7e88dBjJ0YEN+zBO65C7jdgKtRKsAd9xHLHfCimB4Fr2aSARsNINLgJRcy4iFPSHxbWsF7WkGVbwx8aRJcq+BWIgmWO8AXq/6fSrlBGMhKcgVWMcI9z9yt+ml1a8pXIoM6cxzGcElESLHeCAVJLWKr9wWNgQEv1XDa5MmsKayKqFa6wpKzRKZGz4/KYIhyTZUdDMwlKnmPza2dQa31EMO6Hj53A7aqgV2scS/8J+jDjvB/ZfJvZe57Pl7+L7scT/DykQoG01M3ddb4XRnjoYyeIWFGflXia4Sx6g8neOPuQ7ADeKHdYqj+n5DxcjDdX3+xOGNwwJRzkMpp9rG0H0r8qyvnxoOSUJCAAW61IKDNn5iADDoX60SBX3SmM99MsiOyVJNZvEK7ZdRP8tQw7c9WAMEhY9Q0H7Nk72ZpUFhl0zPoyqD1jbYha0GlMfyguxqy4jcHDb8qEOBMO+vTCV7XIWOEzDOo8SS5UBuWCznOkBzDyTuSowjKtnDk+WLAXnTCOI2Vd6HuL183S5Xd/dqUVOYWGNdoaVGsLT9r3oVp6z2Z0fiRpwzBnXEp+QIqxLWCIg+1EtMz5vZyfgJuOTVyTeztZpG9VLabnXALifzfJSswY7OJujbbqOt6o5NnMNrWXQazPyD23tBGyMrwUpi9rNnM+6h2RpJVN1LCaoLY6rad7jB3Vw2M1ba35X12Lj9sUeMdufzOjootoe4o50QXmwJfy8IWWNUZYnGihWac4D4CU5yMkpnusTxwbBKeSTU/9jT1TOFpCmqF8aiUp4nneWBS689Wo+Xd/3eljkuBmN7dnQcf05SHrzJd0ieZW8JePsAl7u0d99Lcp7VTHKXXO4JhQfvd0dBg3aSJdDoEHkM6HWm33YUGDPuBe1Mc/zdlr820afB9K7StZIhIkOm90uyApFERkes4Mp6O+wzUIe2rpyIZkkdhpbPi6oZ5bCfFQ/SviaQ+xznuCHUPPT3bMInuc8cYborwYztwWxjdP2LWRxpO8CzirRGzdcrdR0zd8xsDxGAwnSqpqAeITwTiIkntCGHFA2tTdcywb4hDl13ZUdHpW4opQPc7NHgKXM2U9La+skVrelqkjcdpnb3//3BaN3QgaWtKtTvXuvpIB+8OWqd8gt3B9kf0WrAuWrB/ptq1Bng+hsxCA2wCnyxvdVyk4keWgNGwnjucSgLqIx0sAa1T7l4C7IdDFwk4MwkYTqqvFbyzBOBpzUeWAP/ddjz1kQ7e8bROuXsJsB8CXiTgzCTAr78a+J4SoJ9KNOyIZ3rD+McjVJiSBRXE3nru91Cw6OtCtb2oNl8JJjff5rnTO3mBbTSqbj2KR8AGzTQTO3/crDu+vIB6yncUXa/+jqL99OVkL6DqN5ovL6CeCNyR9Xbx6V5Ahcvy7wR52lH+P8O7/Qk=</diagram></mxfile>
|
||||
Binary file not shown.
|
Before Width: | Height: | Size: 67 KiB |
|
|
@ -1,12 +0,0 @@
|
|||
Installation Guide
|
||||
======================================
|
||||
|
||||
Contents:
|
||||
|
||||
.. toctree::
|
||||
:maxdepth: 2
|
||||
|
||||
ubuntu
|
||||
debian
|
||||
redhat
|
||||
multiserver
|
||||
|
|
@ -1,55 +0,0 @@
|
|||
Multi-Server Install
|
||||
====================
|
||||
|
||||
It is possible to run multiple ZoneMinder servers and manage them from a single interface. To achieve this each zoneminder server is connected to a single shared database server and shares file storage for event data.
|
||||
|
||||
.. image:: images/zm-multiserver.png
|
||||
|
||||
Topology Design Notes
|
||||
---------------------
|
||||
|
||||
1. Device symbols represent separate logical functions, not necessarily separate hardware. For example, the Database Server and a ZoneMinder Server, can reside on the same physical hardware.
|
||||
|
||||
2. Configure each ZoneMinder Server to use the same, remote Database Server (Green).
|
||||
|
||||
3. The Storage Server (Red) represents shared storage, accessible by all ZoneMinder Servers, mounted under each server’s events folder.
|
||||
|
||||
4. Create at least two networks for best performance. Dedicate a Storage LAN for communication with the Storage and Database Servers. Make use of multipath and jumbo frames if possible. Keep all other traffic off the Storage LAN! Dedicate the second LAN, called the Video LAN in the diagram, for all other traffic.
|
||||
|
||||
New installs
|
||||
------------
|
||||
|
||||
1. Follow the normal instructions for your distro for installing ZoneMinder onto all the ZoneMinder servers in the normal fashion. Only a single database will be needed either as standalone, or on one of the ZoneMinder Servers.
|
||||
|
||||
2. On each ZoneMinder server, edit zm.conf. Find the ZM_DB_HOST variable and set it to the name or ip address of your Database Server. Find the ZM_SERVER_HOST and enter a name for this ZoneMinder server. Use a name easily recognizable by you. This name is not used by ZoneMinder for dns or any other form of network conectivity.
|
||||
|
||||
3. Copy the file /usr/share/zoneminder/db/zm_create.sql from one of the ZoneMinder Servers to the machine targeted as the Database Server.
|
||||
|
||||
4. Install mysql/mariadb server onto the Database Server.
|
||||
|
||||
5. It is advised to run "mysql_secure_installation" to help secure the server.
|
||||
|
||||
6. Using the password for the root account set during the previous step, create the ZoneMinder database and configure a database account for ZoneMinder to use:
|
||||
|
||||
::
|
||||
|
||||
mysql -u root -p < zm_create.sql
|
||||
mysql -uroot -p -e "grant all on zm.* to 'zmuser'@localhost identified by 'zmpass';"
|
||||
mysqladmin -u root -p reload
|
||||
|
||||
The database account credentials, zmuser/zmpass, are arbitrary. Set them to anything that suits your environment.
|
||||
Note that these commands are just an example and might not be secure enough for your environment.
|
||||
|
||||
7. If you have chosen to change the ZoneMinder database account credentials to something other than zmuser/zmpass, you must now update zm.conf on each ZoneMinder Server. Change ZM_DB_USER and ZM_DB_PASS to the values you created in the previous step.
|
||||
|
||||
Additionally, you must also edit /usr/share/zoneminder/www/api/app/Config/database.php in a similar manner on each ZoneMinder Server. Scroll down and change login and password to the values you created in the previous step.
|
||||
|
||||
8. All ZoneMinders Servers must share a common events folder. This can be done in any manner supported by the underlying operating system. From the Storage Server, share/export a folder to be used for ZoneMinder events.
|
||||
|
||||
9. From each ZoneMinder Server, mount the shared events folder on the Storage Server to the events folder on the local ZoneMinder Server.
|
||||
|
||||
NOTE: The location of this folder varies by distro. This folder is often found under "/var/lib/zoneminder/events" for RedHat based distros and "/var/cache/zoneminder/events" for Debain based distros. This folder is NOT a Symbolic Link!
|
||||
|
||||
10. Open your browser and point it to the web console on any of the ZoneMinder Servers (they will all be the same). Open Options, click the Servers tab,and populate this screen with all of your ZoneMinder Servers. Each server has a field for its name and its hostname. The name is what you used for ZM_SERVER_HOST in step 2. The hostname is the network name or ip address ZoneMinder should use.
|
||||
|
||||
11. When creating a new Monitor, remember to select the server the camera will be assigned to from the Server drop down box.
|
||||
|
|
@ -17,7 +17,7 @@ The ZoneMinder team will not provide support for systems which have had any core
|
|||
Background: Fedora
|
||||
------------------------------------
|
||||
|
||||
One can think of Fedora as RHEL or CentOS Beta. This is in fact, what it is. Fedora is primarily geared towards development and testing of newer, sometimes bleeding edge, packages. The ZoneMinder team uses this distro to determine the interoperability of ZoneMinder with the latest and greatest versions of packages like mysql, apache, systemd, and others. If a problem is detected, it will be addressed long before it makes it way into RHEL.
|
||||
One can think of Fedora as RHEL or CentOS Beta. This is, in fact, what it is. Fedora is primarily geared towards development and testing of newer, sometimes bleeding edge, packages. The ZoneMinder team uses this distro to determine the interoperability of ZoneMinder with the latest and greatest versions of packages like mysql, apache, systemd, and others. If a problem is detected, it will be addressed long before it makes it way into RHEL.
|
||||
|
||||
Fedora has a short life-cycle of just 6 months. However, Fedora, and consequently ZoneMinder, is available on armv7 architecture. Rejoice, Raspberry Pi users!
|
||||
|
||||
|
|
@ -28,17 +28,17 @@ Zmrepo – A ZoneMinder RPM Repository
|
|||
|
||||
Zmrepo is a turn key solution. It will install all of ZoneMinder's dependencies for you. This is the easiest and the recommended way to install ZoneMinder on any system running a Redhat based distribution.
|
||||
|
||||
Zmrepo supports the two most recent, major, releases of each Redhat based distro.
|
||||
Zmrepo supports the two most recent, major releases of each Redhat based distro.
|
||||
|
||||
The following notes are based on real problems which have occurred:
|
||||
|
||||
- Zmrepo assumes you have installed the underlying distrubution **using the official installation media for that distro**. Third party "Spins" are not supported and may not work correctly.
|
||||
|
||||
- ZoneMinder is intended to be installed in an environment dedicated to ZoneMinder. While ZoneMinder will play well with many applications, some invariably will not. Astericks is one such example.
|
||||
- ZoneMinder is intended to be installed in an environment dedicated to ZoneMinder. While ZoneMinder will play well with many applications, some invariably will not. Asterisk is one such example.
|
||||
|
||||
- Be advised that you need to start with a clean system before using zmrepo.
|
||||
|
||||
- If you have previously installed ZoneMinder from-source, then your system is **NOT** clean. You must manually search for and delete all ZoneMinder related files before using zmrepo (look under /usr/local). Make uninstall helps, but it will not do this for you correctly. You WILL have problems if you ignore this step.
|
||||
- If you have previously installed ZoneMinder from-source, then your system is **NOT** clean. You must manually search for and delete all ZoneMinder related files before using zmrepo (look under /usr/local). Make uninstall helps, but it will not do this for you correctly. You **WILL** have problems if you ignore this step.
|
||||
|
||||
- It is not necessary, and not recommended, to install a LAMP stack ahead of time.
|
||||
|
||||
|
|
@ -196,8 +196,8 @@ Now build a new src.rpm:
|
|||
|
||||
rpmbuild -bs --nodeps ~/rpmbuild/SPECS/zoneminder.el7.spec
|
||||
|
||||
This step will overwrite the SRPM you originally downloaded, so you may want to back it up prior to completing this step. Note that the name of the specfile will vary slightly depending on what distro you are building for.
|
||||
This step will overwrite the SRPM you originally downloaded, so you may want to back it up prior to completing this step. Note that the name of the specfile will vary slightly depending on the target distro.
|
||||
|
||||
You should now have a a new SRPM under ~/rpmbuild/SRPMS. In our example, the SRPM is called zoneminder-1.28.1-2.el7.centos.src.rpm. Now follow the previous instructions that describe how to use the buildzm script, using ~/rpmbuild/SRPMS/zoneminder-1.28.1-2.el7.centos.src.rpm as the path to your SRPM.
|
||||
You should now have a new SRPM under ~/rpmbuild/SRPMS. In our example, the SRPM is called zoneminder-1.28.1-2.el7.centos.src.rpm. Now follow the previous instructions that describe how to use the buildzm script, using ~/rpmbuild/SRPMS/zoneminder-1.28.1-2.el7.centos.src.rpm as the path to your SRPM.
|
||||
|
||||
|
||||
|
|
|
|||
|
|
@ -181,7 +181,7 @@ Easy Way: Install ZoneMinder from a package (Ubuntu 14.x)
|
|||
|
||||
**Step 4:**:Some tweaks that will be needed:
|
||||
|
||||
Edit /etc/init.d/zoneminder:
|
||||
Edit ``/etc/init.d/zoneminder``:
|
||||
|
||||
add a ``sleep 10`` right after line 25 that reads ``echo -n "Starting $prog:"``
|
||||
(The reason we need this sleep is to make sure ZM starts after mysqld starts)
|
||||
|
|
@ -198,7 +198,7 @@ As of Oct 3 2015, zm.conf is not readable by ZM. This is likely a bug and will g
|
|||
|
||||
If you changed the DB password **after** installing ZM, the APIs will not be able to connect to the DB.
|
||||
|
||||
If you have, go to zoneminder/www/api/app/Config & Edit ``database.php``
|
||||
If you have, go to ``/usr/share/zoneminder/www/api/app/Config`` & Edit ``database.php``
|
||||
|
||||
There is a class there called ``DATABASE_CONFIG`` - change the ``$default`` array to reflect your new details. Example:
|
||||
|
||||
|
|
@ -224,7 +224,7 @@ We also need to install php5-gd (as of 1.28.107, this is not installed)
|
|||
|
||||
**Step 6**: Edit Timezone in PHP
|
||||
|
||||
vi /etc/php5/apache2/php.ini
|
||||
``sudo vi /etc/php5/apache2/php.ini``
|
||||
Look for [Date] and inside it you will see a date.timezone
|
||||
that is commented. remove the comment and specific your timezone.
|
||||
Please make sure the timezone is valid (see [this](http://php.net/manual/en/timezones.php))
|
||||
|
|
@ -247,7 +247,7 @@ restart:
|
|||
::
|
||||
|
||||
sudo service apache2 restart
|
||||
/etc/init.d/zoneminder restart
|
||||
sudo service zoneminder restart
|
||||
|
||||
**Step 8**: Making sure ZM and APIs work: (optional - only if you need APIs)
|
||||
|
||||
|
|
|
|||
|
|
@ -0,0 +1,29 @@
|
|||
zmc_m[[:digit:]]+\[[[:digit:]]+\]: INF \[[[:alnum:]]+: [[:digit:]]+ - Capturing at [.[:digit:]]+ fps\]$
|
||||
zma_m[[:digit:]]+\[[[:digit:]]+\]: INF \[[[:alnum:]]+: [[:digit:]]+ - Processing at [.[:digit:]]+ fps\]$
|
||||
zmc_m[[:digit:]]+\[[[:digit:]]+\]: INF \[Got signal 15 \(Terminated\), exiting\]$
|
||||
zmc_m[[:digit:]]+\[[[:digit:]]+\]: INF \[Starting Capture\]$
|
||||
zmc_m[[:digit:]]+\[[[:digit:]]+\]: ERR \[(Connection dropped by remote end|Unable to read (sub)?header|Unable to get response(, disconnecting)?|Select error: Interrupted system call|Can't connect to remote camera: Interrupted system call|Unable to connect to (the remote )?camera(, aborting)?)\]$
|
||||
zmc_m[[:digit:]]+\[[[:digit:]]+\]: WAR \[(Unable to capture image, retrying|Select timed out)\]$
|
||||
zmaudit\[[[:digit:]]+\]: INF \[Deleted [[:digit:]]+ log table entries by time\]$
|
||||
zmdc\[[[:digit:]]+\]: INF \[Starting pending process, [. [:alnum:]-]+\]$
|
||||
zmdc\[[[:digit:]]+\]: INF \['[. [:alnum:]-]+' start(ed|ing) at [/: [:digit:]]+(, pid = [[:digit:]]+)?\]$
|
||||
zmwatch\[[[:digit:]]+\]: INF \[Watchdog starting\]$
|
||||
zmwatch\[[[:digit:]]+\]: INF \[Watchdog pausing for 30 seconds\]$
|
||||
zmc_m3\[[[:digit:]]+\]: ERR \[Can't connect to remote camera: (No route to host|Connection refused)\]$
|
||||
zmdc\[[[:digit:]]+\]: ERR \['zmc -m 3' exited abnormally, exit status 255\]$
|
||||
zmc_m1\[[[:digit:]]+\]: ERR-zm_remote_camera_rtsp.cpp/302 \[Error while decoding frame 0\]$
|
||||
zmc_m1\[[[:digit:]]+\]: ERR-zm_remote_camera_rtsp.cpp/303 \[256: [ [:xdigit:]]+\]$
|
||||
zma_m[[:digit:]]+\[[[:digit:]]+\]: INF \[[[:alnum:]]+: [[:digit:]]+ - Gone into alarm state\]$
|
||||
zma_m[[:digit:]]+\[[[:digit:]]+\]: INF \[[[:alnum:]]+: [[:digit:]]+ - Opening new event [[:digit:]]+, alarm start\]$
|
||||
zma_m[[:digit:]]+\[[[:digit:]]+\]: INF \[[[:alnum:]]+: [[:digit:]]+ - Gone into alert state\]$
|
||||
zma_m[[:digit:]]+\[[[:digit:]]+\]: WAR \[Waiting for capture daemon\]$
|
||||
zma_m[[:digit:]]+\[[[:digit:]]+\]: INF \[[[:alnum:]]+: [[:digit:]]+ - Gone back into alarm state\]$
|
||||
zma_m[[:digit:]]+\[[[:digit:]]+\]: INF \[[[:alnum:]]+: [[:digit:]]+ - Left alarm state \([[:digit:]]+\) - [[:digit:]]+\([[:digit:]]+\) images\]$
|
||||
zma_m[[:digit:]]+\[[[:digit:]]+\]: INF \[[[:alnum:]]+: [[:digit:]]+ - Closing event [[:digit:]]+, alarm end\]$
|
||||
zmaudit\[[[:digit:]]+\]: INF \[Filesystem event '[[:digit:]]+/[[:digit:]]+' does not exist in database\]$
|
||||
zmaudit\[[[:digit:]]+\]: INF \[deleting\]$
|
||||
zmaudit\[[[:digit:]]+\]: INF \[Found orphaned frame records for event '[[:digit:]]+'\]$
|
||||
zmfilter\[[[:digit:]]+\]: INF \[Deleting event [[:digit:]]+\]$
|
||||
zmtelemetry\[[[:digit:]]+\]: INF \[Telemetry data uploaded successfully.\]$
|
||||
zmtelemetry\[[[:digit:]]+\]: INF \[Sending data to ZoneMinder Telemetry server.\]$
|
||||
zmtelemetry\[[[:digit:]]+\]: INF \[Collec?ting data to send to ZoneMinder Telemetry server.\]$
|
||||
|
|
@ -1,63 +0,0 @@
|
|||
|
||||
package WSDiscovery::Elements::EndpointReference;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://www.w3.org/2005/08/addressing' }
|
||||
|
||||
__PACKAGE__->__set_name('EndpointReference');
|
||||
__PACKAGE__->__set_nillable();
|
||||
__PACKAGE__->__set_minOccurs();
|
||||
__PACKAGE__->__set_maxOccurs();
|
||||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery::Types::EndpointReferenceType
|
||||
);
|
||||
|
||||
}
|
||||
|
||||
1;
|
||||
|
||||
|
||||
=pod
|
||||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::EndpointReference
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
EndpointReference from the namespace http://www.w3.org/2005/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
=head1 METHODS
|
||||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::EndpointReference->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::EndpointReferenceType
|
||||
Address => { value => $some_value },
|
||||
ReferenceParameters => { # WSDiscovery::Types::ReferenceParametersType
|
||||
},
|
||||
Metadata => { # WSDiscovery::Types::MetadataType
|
||||
},
|
||||
},
|
||||
|
||||
=head1 AUTHOR
|
||||
|
||||
Generated by SOAP::WSDL
|
||||
|
||||
=cut
|
||||
|
||||
|
|
@ -1,63 +0,0 @@
|
|||
|
||||
package WSDiscovery::Elements::FaultTo;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://www.w3.org/2005/08/addressing' }
|
||||
|
||||
__PACKAGE__->__set_name('FaultTo');
|
||||
__PACKAGE__->__set_nillable();
|
||||
__PACKAGE__->__set_minOccurs();
|
||||
__PACKAGE__->__set_maxOccurs();
|
||||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery::Types::EndpointReferenceType
|
||||
);
|
||||
|
||||
}
|
||||
|
||||
1;
|
||||
|
||||
|
||||
=pod
|
||||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::FaultTo
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
FaultTo from the namespace http://www.w3.org/2005/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
=head1 METHODS
|
||||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::FaultTo->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::EndpointReferenceType
|
||||
Address => { value => $some_value },
|
||||
ReferenceParameters => { # WSDiscovery::Types::ReferenceParametersType
|
||||
},
|
||||
Metadata => { # WSDiscovery::Types::MetadataType
|
||||
},
|
||||
},
|
||||
|
||||
=head1 AUTHOR
|
||||
|
||||
Generated by SOAP::WSDL
|
||||
|
||||
=cut
|
||||
|
||||
|
|
@ -1,63 +0,0 @@
|
|||
|
||||
package WSDiscovery::Elements::From;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://www.w3.org/2005/08/addressing' }
|
||||
|
||||
__PACKAGE__->__set_name('From');
|
||||
__PACKAGE__->__set_nillable();
|
||||
__PACKAGE__->__set_minOccurs();
|
||||
__PACKAGE__->__set_maxOccurs();
|
||||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery::Types::EndpointReferenceType
|
||||
);
|
||||
|
||||
}
|
||||
|
||||
1;
|
||||
|
||||
|
||||
=pod
|
||||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::From
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
From from the namespace http://www.w3.org/2005/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
=head1 METHODS
|
||||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::From->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::EndpointReferenceType
|
||||
Address => { value => $some_value },
|
||||
ReferenceParameters => { # WSDiscovery::Types::ReferenceParametersType
|
||||
},
|
||||
Metadata => { # WSDiscovery::Types::MetadataType
|
||||
},
|
||||
},
|
||||
|
||||
=head1 AUTHOR
|
||||
|
||||
Generated by SOAP::WSDL
|
||||
|
||||
=cut
|
||||
|
||||
|
|
@ -1,58 +0,0 @@
|
|||
|
||||
package WSDiscovery::Elements::Metadata;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://www.w3.org/2005/08/addressing' }
|
||||
|
||||
__PACKAGE__->__set_name('Metadata');
|
||||
__PACKAGE__->__set_nillable();
|
||||
__PACKAGE__->__set_minOccurs();
|
||||
__PACKAGE__->__set_maxOccurs();
|
||||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery::Types::MetadataType
|
||||
);
|
||||
|
||||
}
|
||||
|
||||
1;
|
||||
|
||||
|
||||
=pod
|
||||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::Metadata
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
Metadata from the namespace http://www.w3.org/2005/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
=head1 METHODS
|
||||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::Metadata->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::MetadataType
|
||||
},
|
||||
|
||||
=head1 AUTHOR
|
||||
|
||||
Generated by SOAP::WSDL
|
||||
|
||||
=cut
|
||||
|
||||
|
|
@ -1,60 +0,0 @@
|
|||
|
||||
package WSDiscovery::Elements::ProblemAction;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://www.w3.org/2005/08/addressing' }
|
||||
|
||||
__PACKAGE__->__set_name('ProblemAction');
|
||||
__PACKAGE__->__set_nillable();
|
||||
__PACKAGE__->__set_minOccurs();
|
||||
__PACKAGE__->__set_maxOccurs();
|
||||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery::Types::ProblemActionType
|
||||
);
|
||||
|
||||
}
|
||||
|
||||
1;
|
||||
|
||||
|
||||
=pod
|
||||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::ProblemAction
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
ProblemAction from the namespace http://www.w3.org/2005/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
=head1 METHODS
|
||||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::ProblemAction->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::ProblemActionType
|
||||
Action => { value => $some_value },
|
||||
SoapAction => $some_value, # anyURI
|
||||
},
|
||||
|
||||
=head1 AUTHOR
|
||||
|
||||
Generated by SOAP::WSDL
|
||||
|
||||
=cut
|
||||
|
||||
|
|
@ -1,57 +0,0 @@
|
|||
|
||||
package WSDiscovery::Elements::ProblemHeaderQName;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://www.w3.org/2005/08/addressing' }
|
||||
|
||||
__PACKAGE__->__set_name('ProblemHeaderQName');
|
||||
__PACKAGE__->__set_nillable();
|
||||
__PACKAGE__->__set_minOccurs();
|
||||
__PACKAGE__->__set_maxOccurs();
|
||||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery::Types::AttributedQNameType
|
||||
);
|
||||
|
||||
}
|
||||
|
||||
1;
|
||||
|
||||
|
||||
=pod
|
||||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::ProblemHeaderQName
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
ProblemHeaderQName from the namespace http://www.w3.org/2005/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
=head1 METHODS
|
||||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::ProblemHeaderQName->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ value => $some_value },
|
||||
|
||||
=head1 AUTHOR
|
||||
|
||||
Generated by SOAP::WSDL
|
||||
|
||||
=cut
|
||||
|
||||
|
|
@ -1,58 +0,0 @@
|
|||
|
||||
package WSDiscovery::Elements::ReferenceParameters;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://www.w3.org/2005/08/addressing' }
|
||||
|
||||
__PACKAGE__->__set_name('ReferenceParameters');
|
||||
__PACKAGE__->__set_nillable();
|
||||
__PACKAGE__->__set_minOccurs();
|
||||
__PACKAGE__->__set_maxOccurs();
|
||||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery::Types::ReferenceParametersType
|
||||
);
|
||||
|
||||
}
|
||||
|
||||
1;
|
||||
|
||||
|
||||
=pod
|
||||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::ReferenceParameters
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
ReferenceParameters from the namespace http://www.w3.org/2005/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
=head1 METHODS
|
||||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::ReferenceParameters->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::ReferenceParametersType
|
||||
},
|
||||
|
||||
=head1 AUTHOR
|
||||
|
||||
Generated by SOAP::WSDL
|
||||
|
||||
=cut
|
||||
|
||||
|
|
@ -1,63 +0,0 @@
|
|||
|
||||
package WSDiscovery::Elements::ReplyTo;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://www.w3.org/2005/08/addressing' }
|
||||
|
||||
__PACKAGE__->__set_name('ReplyTo');
|
||||
__PACKAGE__->__set_nillable();
|
||||
__PACKAGE__->__set_minOccurs();
|
||||
__PACKAGE__->__set_maxOccurs();
|
||||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery::Types::EndpointReferenceType
|
||||
);
|
||||
|
||||
}
|
||||
|
||||
1;
|
||||
|
||||
|
||||
=pod
|
||||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::ReplyTo
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
ReplyTo from the namespace http://www.w3.org/2005/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
=head1 METHODS
|
||||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::ReplyTo->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::EndpointReferenceType
|
||||
Address => { value => $some_value },
|
||||
ReferenceParameters => { # WSDiscovery::Types::ReferenceParametersType
|
||||
},
|
||||
Metadata => { # WSDiscovery::Types::MetadataType
|
||||
},
|
||||
},
|
||||
|
||||
=head1 AUTHOR
|
||||
|
||||
Generated by SOAP::WSDL
|
||||
|
||||
=cut
|
||||
|
||||
|
|
@ -1,65 +0,0 @@
|
|||
|
||||
package WSDiscovery::Elements::Resolve;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01' }
|
||||
|
||||
__PACKAGE__->__set_name('Resolve');
|
||||
__PACKAGE__->__set_nillable();
|
||||
__PACKAGE__->__set_minOccurs();
|
||||
__PACKAGE__->__set_maxOccurs();
|
||||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery::Types::ResolveType
|
||||
);
|
||||
|
||||
}
|
||||
|
||||
1;
|
||||
|
||||
|
||||
=pod
|
||||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::Resolve
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
Resolve from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
=head1 METHODS
|
||||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::Resolve->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::ResolveType
|
||||
EndpointReference => { # WSDiscovery::Types::EndpointReferenceType
|
||||
Address => { value => $some_value },
|
||||
ReferenceParameters => { # WSDiscovery::Types::ReferenceParametersType
|
||||
},
|
||||
Metadata => { # WSDiscovery::Types::MetadataType
|
||||
},
|
||||
},
|
||||
},
|
||||
|
||||
=head1 AUTHOR
|
||||
|
||||
Generated by SOAP::WSDL
|
||||
|
||||
=cut
|
||||
|
||||
|
|
@ -1,59 +0,0 @@
|
|||
|
||||
package WSDiscovery::Typemaps::WSDiscovery;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
our $typemap_1 = {
|
||||
'ProbeMatches/ProbeMatch/XAddrs' => 'WSDiscovery::Types::UriListType',
|
||||
'ProbeMatches/ProbeMatch' => 'WSDiscovery::Types::ProbeMatchType',
|
||||
'Fault/detail' => 'SOAP::WSDL::XSD::Typelib::Builtin::string',
|
||||
'ProbeMatches/ProbeMatch/EndpointReference/Metadata' => 'WSDiscovery::Types::MetadataType',
|
||||
'ProbeMatches/ProbeMatch/Scopes' => 'WSDiscovery::Types::ScopesType',
|
||||
'ProbeMatches/ProbeMatch/EndpointReference/Address' => 'WSDiscovery::Types::AttributedURIType',
|
||||
'Probe/Types' => 'WSDiscovery::Types::QNameListType',
|
||||
'Probe' => 'WSDiscovery::Elements::Probe',
|
||||
'Fault/faultstring' => 'SOAP::WSDL::XSD::Typelib::Builtin::string',
|
||||
'ProbeMatches/ProbeMatch/MetadataVersion' => 'SOAP::WSDL::XSD::Typelib::Builtin::unsignedInt',
|
||||
'Probe/Scopes' => 'WSDiscovery::Types::ScopesType',
|
||||
'Fault/faultactor' => 'SOAP::WSDL::XSD::Typelib::Builtin::token',
|
||||
'Fault/faultcode' => 'SOAP::WSDL::XSD::Typelib::Builtin::anyURI',
|
||||
'ProbeMatches/ProbeMatch/Types' => 'WSDiscovery::Types::QNameListType',
|
||||
'ProbeMatches/ProbeMatch/EndpointReference/ReferenceParameters' => 'WSDiscovery::Types::ReferenceParametersType',
|
||||
'ProbeMatches/ProbeMatch/EndpointReference' => 'WSDiscovery::Types::EndpointReferenceType',
|
||||
'Fault' => 'SOAP::WSDL::SOAP::Typelib::Fault11',
|
||||
'ProbeMatches' => 'WSDiscovery::Elements::ProbeMatches',
|
||||
'MessageID' => 'WSDiscovery::Elements::MessageID',
|
||||
'RelatesTo' => '__SKIP__',
|
||||
'To' => '__SKIP__',
|
||||
'Action' => '__SKIP__',
|
||||
'AppSequence' => '__SKIP__',
|
||||
};
|
||||
;
|
||||
|
||||
sub get_class {
|
||||
my $name = join '/', @{ $_[1] };
|
||||
return $typemap_1->{ $name };
|
||||
}
|
||||
|
||||
sub get_typemap {
|
||||
return $typemap_1;
|
||||
}
|
||||
|
||||
1;
|
||||
|
||||
__END__
|
||||
|
||||
__END__
|
||||
|
||||
=pod
|
||||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Typemaps::WSDiscovery - typemap for WSDiscovery
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Typemap created by SOAP::WSDL for map-based SOAP message parsers.
|
||||
|
||||
=cut
|
||||
|
||||
|
|
@ -1,137 +0,0 @@
|
|||
package WSDiscovery::Types::EndpointReferenceType;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
|
||||
__PACKAGE__->_set_element_form_qualified(0);
|
||||
|
||||
sub get_xmlns { 'http://www.w3.org/2005/08/addressing' };
|
||||
|
||||
our $XML_ATTRIBUTE_CLASS;
|
||||
undef $XML_ATTRIBUTE_CLASS;
|
||||
|
||||
sub __get_attr_class {
|
||||
return $XML_ATTRIBUTE_CLASS;
|
||||
}
|
||||
|
||||
use Class::Std::Fast::Storable constructor => 'none';
|
||||
use base qw(SOAP::WSDL::XSD::Typelib::ComplexType);
|
||||
|
||||
Class::Std::initialize();
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
my %Address_of :ATTR(:get<Address>);
|
||||
my %ReferenceParameters_of :ATTR(:get<ReferenceParameters>);
|
||||
my %Metadata_of :ATTR(:get<Metadata>);
|
||||
|
||||
__PACKAGE__->_factory(
|
||||
[ qw( Address
|
||||
ReferenceParameters
|
||||
Metadata
|
||||
|
||||
) ],
|
||||
{
|
||||
'Address' => \%Address_of,
|
||||
'ReferenceParameters' => \%ReferenceParameters_of,
|
||||
'Metadata' => \%Metadata_of,
|
||||
},
|
||||
{
|
||||
'Address' => 'WSDiscovery::Types::AttributedURIType',
|
||||
'ReferenceParameters' => 'WSDiscovery::Elements::ReferenceParameters',
|
||||
|
||||
'Metadata' => 'WSDiscovery::Elements::Metadata',
|
||||
|
||||
},
|
||||
{
|
||||
|
||||
'Address' => 'Address',
|
||||
'ReferenceParameters' => '',
|
||||
'Metadata' => '',
|
||||
}
|
||||
);
|
||||
|
||||
} # end BLOCK
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
1;
|
||||
|
||||
|
||||
=pod
|
||||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Types::EndpointReferenceType
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined complexType
|
||||
EndpointReferenceType from the namespace http://www.w3.org/2005/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
=head2 PROPERTIES
|
||||
|
||||
The following properties may be accessed using get_PROPERTY / set_PROPERTY
|
||||
methods:
|
||||
|
||||
=over
|
||||
|
||||
=item * Address
|
||||
|
||||
|
||||
=item * ReferenceParameters
|
||||
|
||||
Note: The name of this property has been altered, because it didn't match
|
||||
perl's notion of variable/subroutine names. The altered name is used in
|
||||
perl code only, XML output uses the original name:
|
||||
|
||||
|
||||
|
||||
|
||||
=item * Metadata
|
||||
|
||||
Note: The name of this property has been altered, because it didn't match
|
||||
perl's notion of variable/subroutine names. The altered name is used in
|
||||
perl code only, XML output uses the original name:
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
=back
|
||||
|
||||
|
||||
=head1 METHODS
|
||||
|
||||
=head2 new
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::EndpointReferenceType
|
||||
Address => { value => $some_value },
|
||||
ReferenceParameters => { # WSDiscovery::Types::ReferenceParametersType
|
||||
},
|
||||
Metadata => { # WSDiscovery::Types::MetadataType
|
||||
},
|
||||
},
|
||||
|
||||
|
||||
|
||||
|
||||
=head1 AUTHOR
|
||||
|
||||
Generated by SOAP::WSDL
|
||||
|
||||
=cut
|
||||
|
||||
|
|
@ -1,119 +0,0 @@
|
|||
package WSDiscovery::Types::ProblemActionType;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
|
||||
__PACKAGE__->_set_element_form_qualified(0);
|
||||
|
||||
sub get_xmlns { 'http://www.w3.org/2005/08/addressing' };
|
||||
|
||||
our $XML_ATTRIBUTE_CLASS;
|
||||
undef $XML_ATTRIBUTE_CLASS;
|
||||
|
||||
sub __get_attr_class {
|
||||
return $XML_ATTRIBUTE_CLASS;
|
||||
}
|
||||
|
||||
use Class::Std::Fast::Storable constructor => 'none';
|
||||
use base qw(SOAP::WSDL::XSD::Typelib::ComplexType);
|
||||
|
||||
Class::Std::initialize();
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
my %Action_of :ATTR(:get<Action>);
|
||||
my %SoapAction_of :ATTR(:get<SoapAction>);
|
||||
|
||||
__PACKAGE__->_factory(
|
||||
[ qw( Action
|
||||
SoapAction
|
||||
|
||||
) ],
|
||||
{
|
||||
'Action' => \%Action_of,
|
||||
'SoapAction' => \%SoapAction_of,
|
||||
},
|
||||
{
|
||||
'Action' => 'WSDiscovery::Elements::Action',
|
||||
|
||||
'SoapAction' => 'SOAP::WSDL::XSD::Typelib::Builtin::anyURI',
|
||||
},
|
||||
{
|
||||
|
||||
'Action' => '',
|
||||
'SoapAction' => 'SoapAction',
|
||||
}
|
||||
);
|
||||
|
||||
} # end BLOCK
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
1;
|
||||
|
||||
|
||||
=pod
|
||||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Types::ProblemActionType
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined complexType
|
||||
ProblemActionType from the namespace http://www.w3.org/2005/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
=head2 PROPERTIES
|
||||
|
||||
The following properties may be accessed using get_PROPERTY / set_PROPERTY
|
||||
methods:
|
||||
|
||||
=over
|
||||
|
||||
=item * Action
|
||||
|
||||
Note: The name of this property has been altered, because it didn't match
|
||||
perl's notion of variable/subroutine names. The altered name is used in
|
||||
perl code only, XML output uses the original name:
|
||||
|
||||
|
||||
|
||||
|
||||
=item * SoapAction
|
||||
|
||||
|
||||
|
||||
|
||||
=back
|
||||
|
||||
|
||||
=head1 METHODS
|
||||
|
||||
=head2 new
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::ProblemActionType
|
||||
Action => { value => $some_value },
|
||||
SoapAction => $some_value, # anyURI
|
||||
},
|
||||
|
||||
|
||||
|
||||
|
||||
=head1 AUTHOR
|
||||
|
||||
Generated by SOAP::WSDL
|
||||
|
||||
=cut
|
||||
|
||||
|
|
@ -1,76 +0,0 @@
|
|||
package WSDiscovery::Types::RelationshipTypeOpenEnum;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
sub get_xmlns { 'http://www.w3.org/2005/08/addressing'};
|
||||
|
||||
# derivation by union
|
||||
# union is not fully supported yet - value space constraints are not
|
||||
# checked yet.
|
||||
# This implementation of union resorts to the simplest possible base, which
|
||||
# is: "If the <list> or <union> alternative is chosen, then the
|
||||
# simple ur-type definition·."
|
||||
#
|
||||
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Builtin::anySimpleType
|
||||
);
|
||||
|
||||
|
||||
|
||||
1;
|
||||
|
||||
__END__
|
||||
|
||||
=pod
|
||||
|
||||
=head1 NAME
|
||||
|
||||
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined simpleType
|
||||
RelationshipTypeOpenEnum from the namespace http://www.w3.org/2005/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
This type class is derived by union.
|
||||
|
||||
Derivation by union is not fully supported yet - value space constraints are
|
||||
not checked yet.
|
||||
|
||||
The current implementation of union resorts to inheriting from the base type,
|
||||
which means (quoted from the XML Schema specs): "If the <list> or <union>
|
||||
alternative is chosen, then the simple ur-type definition·."
|
||||
|
||||
|
||||
|
||||
=head1 METHODS
|
||||
|
||||
=head2 new
|
||||
|
||||
Constructor.
|
||||
|
||||
=head2 get_value / set_value
|
||||
|
||||
Getter and setter for the simpleType's value.
|
||||
|
||||
=head1 OVERLOADING
|
||||
|
||||
Depending on the simple type's base type, the following operations are overloaded
|
||||
|
||||
Stringification
|
||||
Numerification
|
||||
Boolification
|
||||
|
||||
Check L<SOAP::WSDL::XSD::Typelib::Builtin> for more information.
|
||||
|
||||
=head1 AUTHOR
|
||||
|
||||
Generated by SOAP::WSDL
|
||||
|
||||
=cut
|
||||
|
||||
|
|
@ -1,17 +1,17 @@
|
|||
|
||||
package WSDiscovery::Attributes::IsReferenceParameter;
|
||||
package WSDiscovery10::Attributes::Action;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://www.w3.org/2005/08/addressing' }
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2004/08/addressing' }
|
||||
|
||||
__PACKAGE__->__set_name('IsReferenceParameter');
|
||||
__PACKAGE__->__set_name('Action');
|
||||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Attribute
|
||||
SOAP::WSDL::XSD::Typelib::Builtin::boolean
|
||||
SOAP::WSDL::XSD::Typelib::Builtin::anyURI
|
||||
);
|
||||
|
||||
}
|
||||
|
|
@ -23,12 +23,12 @@ use base qw(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Attributes::IsReferenceParameter
|
||||
WSDiscovery10::Attributes::Action
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined attribute
|
||||
IsReferenceParameter from the namespace http://www.w3.org/2005/08/addressing.
|
||||
Action from the namespace http://schemas.xmlsoap.org/ws/2004/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
|
@ -40,7 +40,7 @@ IsReferenceParameter from the namespace http://www.w3.org/2005/08/addressing.
|
|||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Attributes::IsReferenceParameter->new($data);
|
||||
my $element = WSDiscovery10::Attributes::Action->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
|
||||
package WSDiscovery::Attributes::Id;
|
||||
package WSDiscovery10::Attributes::Id;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01' }
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery' }
|
||||
|
||||
__PACKAGE__->__set_name('Id');
|
||||
__PACKAGE__->__set_ref();
|
||||
|
|
@ -23,12 +23,12 @@ use base qw(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Attributes::Id
|
||||
WSDiscovery10::Attributes::Id
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined attribute
|
||||
Id from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
Id from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -40,7 +40,7 @@ Id from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
|||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Attributes::Id->new($data);
|
||||
my $element = WSDiscovery10::Attributes::Id->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
|
||||
package WSDiscovery::Elements::Action;
|
||||
package WSDiscovery10::Elements::Action;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://www.w3.org/2005/08/addressing' }
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2004/08/addressing' }
|
||||
|
||||
__PACKAGE__->__set_name('Action');
|
||||
__PACKAGE__->__set_nillable();
|
||||
|
|
@ -14,7 +14,7 @@ __PACKAGE__->__set_maxOccurs();
|
|||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery::Types::AttributedURIType
|
||||
WSDiscovery10::Types::AttributedURI
|
||||
);
|
||||
|
||||
}
|
||||
|
|
@ -26,12 +26,12 @@ use base qw(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::Action
|
||||
WSDiscovery10::Elements::Action
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
Action from the namespace http://www.w3.org/2005/08/addressing.
|
||||
Action from the namespace http://schemas.xmlsoap.org/ws/2004/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
|
@ -43,7 +43,7 @@ Action from the namespace http://www.w3.org/2005/08/addressing.
|
|||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::Action->new($data);
|
||||
my $element = WSDiscovery10::Elements::Action->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
|
||||
package WSDiscovery::Elements::AppSequence;
|
||||
package WSDiscovery10::Elements::AppSequence;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01' }
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery' }
|
||||
|
||||
__PACKAGE__->__set_name('AppSequence');
|
||||
__PACKAGE__->__set_nillable();
|
||||
|
|
@ -14,7 +14,7 @@ __PACKAGE__->__set_maxOccurs();
|
|||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery::Types::AppSequenceType
|
||||
WSDiscovery10::Types::AppSequenceType
|
||||
);
|
||||
|
||||
}
|
||||
|
|
@ -26,12 +26,12 @@ use base qw(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::AppSequence
|
||||
WSDiscovery10::Elements::AppSequence
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
AppSequence from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
AppSequence from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -43,11 +43,11 @@ AppSequence from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/200
|
|||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::AppSequence->new($data);
|
||||
my $element = WSDiscovery10::Elements::AppSequence->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::AppSequenceType
|
||||
{ # WSDiscovery10::Types::AppSequenceType
|
||||
},
|
||||
|
||||
=head1 AUTHOR
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
|
||||
package WSDiscovery::Elements::Bye;
|
||||
package WSDiscovery10::Elements::Bye;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01' }
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery' }
|
||||
|
||||
__PACKAGE__->__set_name('Bye');
|
||||
__PACKAGE__->__set_nillable();
|
||||
|
|
@ -14,7 +14,7 @@ __PACKAGE__->__set_maxOccurs();
|
|||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery::Types::ByeType
|
||||
WSDiscovery10::Types::ByeType
|
||||
);
|
||||
|
||||
}
|
||||
|
|
@ -26,12 +26,12 @@ use base qw(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::Bye
|
||||
WSDiscovery10::Elements::Bye
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
Bye from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
Bye from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -43,17 +43,19 @@ Bye from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
|||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::Bye->new($data);
|
||||
my $element = WSDiscovery10::Elements::Bye->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::ByeType
|
||||
EndpointReference => { # WSDiscovery::Types::EndpointReferenceType
|
||||
{ # WSDiscovery10::Types::ByeType
|
||||
EndpointReference => { # WSDiscovery10::Types::EndpointReferenceType
|
||||
Address => { value => $some_value },
|
||||
ReferenceParameters => { # WSDiscovery::Types::ReferenceParametersType
|
||||
ReferenceProperties => { # WSDiscovery10::Types::ReferencePropertiesType
|
||||
},
|
||||
Metadata => { # WSDiscovery::Types::MetadataType
|
||||
ReferenceParameters => { # WSDiscovery10::Types::ReferenceParametersType
|
||||
},
|
||||
PortType => { value => $some_value },
|
||||
ServiceName => { value => $some_value },
|
||||
},
|
||||
Types => $some_value, # QNameListType
|
||||
Scopes => { value => $some_value },
|
||||
|
|
@ -0,0 +1,65 @@
|
|||
|
||||
package WSDiscovery10::Elements::EndpointReference;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2004/08/addressing' }
|
||||
|
||||
__PACKAGE__->__set_name('EndpointReference');
|
||||
__PACKAGE__->__set_nillable();
|
||||
__PACKAGE__->__set_minOccurs();
|
||||
__PACKAGE__->__set_maxOccurs();
|
||||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery10::Types::EndpointReferenceType
|
||||
);
|
||||
|
||||
}
|
||||
|
||||
1;
|
||||
|
||||
|
||||
=pod
|
||||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery10::Elements::EndpointReference
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
EndpointReference from the namespace http://schemas.xmlsoap.org/ws/2004/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
=head1 METHODS
|
||||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery10::Elements::EndpointReference->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery10::Types::EndpointReferenceType
|
||||
Address => { value => $some_value },
|
||||
ReferenceProperties => { # WSDiscovery10::Types::ReferencePropertiesType
|
||||
},
|
||||
ReferenceParameters => { # WSDiscovery10::Types::ReferenceParametersType
|
||||
},
|
||||
PortType => { value => $some_value },
|
||||
ServiceName => { value => $some_value },
|
||||
},
|
||||
|
||||
=head1 AUTHOR
|
||||
|
||||
Generated by SOAP::WSDL
|
||||
|
||||
=cut
|
||||
|
||||
|
|
@ -0,0 +1,65 @@
|
|||
|
||||
package WSDiscovery10::Elements::FaultTo;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2004/08/addressing' }
|
||||
|
||||
__PACKAGE__->__set_name('FaultTo');
|
||||
__PACKAGE__->__set_nillable();
|
||||
__PACKAGE__->__set_minOccurs();
|
||||
__PACKAGE__->__set_maxOccurs();
|
||||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery10::Types::EndpointReferenceType
|
||||
);
|
||||
|
||||
}
|
||||
|
||||
1;
|
||||
|
||||
|
||||
=pod
|
||||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery10::Elements::FaultTo
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
FaultTo from the namespace http://schemas.xmlsoap.org/ws/2004/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
=head1 METHODS
|
||||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery10::Elements::FaultTo->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery10::Types::EndpointReferenceType
|
||||
Address => { value => $some_value },
|
||||
ReferenceProperties => { # WSDiscovery10::Types::ReferencePropertiesType
|
||||
},
|
||||
ReferenceParameters => { # WSDiscovery10::Types::ReferenceParametersType
|
||||
},
|
||||
PortType => { value => $some_value },
|
||||
ServiceName => { value => $some_value },
|
||||
},
|
||||
|
||||
=head1 AUTHOR
|
||||
|
||||
Generated by SOAP::WSDL
|
||||
|
||||
=cut
|
||||
|
||||
|
|
@ -0,0 +1,65 @@
|
|||
|
||||
package WSDiscovery10::Elements::From;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2004/08/addressing' }
|
||||
|
||||
__PACKAGE__->__set_name('From');
|
||||
__PACKAGE__->__set_nillable();
|
||||
__PACKAGE__->__set_minOccurs();
|
||||
__PACKAGE__->__set_maxOccurs();
|
||||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery10::Types::EndpointReferenceType
|
||||
);
|
||||
|
||||
}
|
||||
|
||||
1;
|
||||
|
||||
|
||||
=pod
|
||||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery10::Elements::From
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
From from the namespace http://schemas.xmlsoap.org/ws/2004/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
=head1 METHODS
|
||||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery10::Elements::From->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery10::Types::EndpointReferenceType
|
||||
Address => { value => $some_value },
|
||||
ReferenceProperties => { # WSDiscovery10::Types::ReferencePropertiesType
|
||||
},
|
||||
ReferenceParameters => { # WSDiscovery10::Types::ReferenceParametersType
|
||||
},
|
||||
PortType => { value => $some_value },
|
||||
ServiceName => { value => $some_value },
|
||||
},
|
||||
|
||||
=head1 AUTHOR
|
||||
|
||||
Generated by SOAP::WSDL
|
||||
|
||||
=cut
|
||||
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
|
||||
package WSDiscovery::Elements::Hello;
|
||||
package WSDiscovery10::Elements::Hello;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01' }
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery' }
|
||||
|
||||
__PACKAGE__->__set_name('Hello');
|
||||
__PACKAGE__->__set_nillable();
|
||||
|
|
@ -14,7 +14,7 @@ __PACKAGE__->__set_maxOccurs();
|
|||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery::Types::HelloType
|
||||
WSDiscovery10::Types::HelloType
|
||||
);
|
||||
|
||||
}
|
||||
|
|
@ -26,12 +26,12 @@ use base qw(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::Hello
|
||||
WSDiscovery10::Elements::Hello
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
Hello from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
Hello from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -43,17 +43,19 @@ Hello from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
|||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::Hello->new($data);
|
||||
my $element = WSDiscovery10::Elements::Hello->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::HelloType
|
||||
EndpointReference => { # WSDiscovery::Types::EndpointReferenceType
|
||||
{ # WSDiscovery10::Types::HelloType
|
||||
EndpointReference => { # WSDiscovery10::Types::EndpointReferenceType
|
||||
Address => { value => $some_value },
|
||||
ReferenceParameters => { # WSDiscovery::Types::ReferenceParametersType
|
||||
ReferenceProperties => { # WSDiscovery10::Types::ReferencePropertiesType
|
||||
},
|
||||
Metadata => { # WSDiscovery::Types::MetadataType
|
||||
ReferenceParameters => { # WSDiscovery10::Types::ReferenceParametersType
|
||||
},
|
||||
PortType => { value => $some_value },
|
||||
ServiceName => { value => $some_value },
|
||||
},
|
||||
Types => $some_value, # QNameListType
|
||||
Scopes => { value => $some_value },
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
|
||||
package WSDiscovery::Elements::MessageID;
|
||||
package WSDiscovery10::Elements::MessageID;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://www.w3.org/2005/08/addressing' }
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2004/08/addressing' }
|
||||
|
||||
__PACKAGE__->__set_name('MessageID');
|
||||
__PACKAGE__->__set_nillable();
|
||||
|
|
@ -14,7 +14,7 @@ __PACKAGE__->__set_maxOccurs();
|
|||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery::Types::AttributedURIType
|
||||
WSDiscovery10::Types::AttributedURI
|
||||
);
|
||||
|
||||
}
|
||||
|
|
@ -26,12 +26,12 @@ use base qw(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::MessageID
|
||||
WSDiscovery10::Elements::MessageID
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
MessageID from the namespace http://www.w3.org/2005/08/addressing.
|
||||
MessageID from the namespace http://schemas.xmlsoap.org/ws/2004/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
|
@ -43,7 +43,7 @@ MessageID from the namespace http://www.w3.org/2005/08/addressing.
|
|||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::MessageID->new($data);
|
||||
my $element = WSDiscovery10::Elements::MessageID->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
|
||||
package WSDiscovery::Elements::MetadataVersion;
|
||||
package WSDiscovery10::Elements::MetadataVersion;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01' }
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery' }
|
||||
|
||||
__PACKAGE__->__set_name('MetadataVersion');
|
||||
__PACKAGE__->__set_nillable();
|
||||
|
|
@ -26,12 +26,12 @@ use base qw(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::MetadataVersion
|
||||
WSDiscovery10::Elements::MetadataVersion
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
MetadataVersion from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
MetadataVersion from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -43,7 +43,7 @@ MetadataVersion from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery
|
|||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::MetadataVersion->new($data);
|
||||
my $element = WSDiscovery10::Elements::MetadataVersion->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
|
||||
package WSDiscovery::Elements::Probe;
|
||||
package WSDiscovery10::Elements::Probe;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01' }
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery' }
|
||||
|
||||
__PACKAGE__->__set_name('Probe');
|
||||
__PACKAGE__->__set_nillable();
|
||||
|
|
@ -14,7 +14,7 @@ __PACKAGE__->__set_maxOccurs();
|
|||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery::Types::ProbeType
|
||||
WSDiscovery10::Types::ProbeType
|
||||
);
|
||||
|
||||
}
|
||||
|
|
@ -26,12 +26,12 @@ use base qw(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::Probe
|
||||
WSDiscovery10::Elements::Probe
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
Probe from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
Probe from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -43,11 +43,11 @@ Probe from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
|||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::Probe->new($data);
|
||||
my $element = WSDiscovery10::Elements::Probe->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::ProbeType
|
||||
{ # WSDiscovery10::Types::ProbeType
|
||||
Types => $some_value, # QNameListType
|
||||
Scopes => { value => $some_value },
|
||||
},
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
|
||||
package WSDiscovery::Elements::ProbeMatches;
|
||||
package WSDiscovery10::Elements::ProbeMatches;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01' }
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery' }
|
||||
|
||||
__PACKAGE__->__set_name('ProbeMatches');
|
||||
__PACKAGE__->__set_nillable();
|
||||
|
|
@ -14,7 +14,7 @@ __PACKAGE__->__set_maxOccurs();
|
|||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery::Types::ProbeMatchesType
|
||||
WSDiscovery10::Types::ProbeMatchesType
|
||||
);
|
||||
|
||||
}
|
||||
|
|
@ -26,12 +26,12 @@ use base qw(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::ProbeMatches
|
||||
WSDiscovery10::Elements::ProbeMatches
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
ProbeMatches from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
ProbeMatches from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -43,18 +43,20 @@ ProbeMatches from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/20
|
|||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::ProbeMatches->new($data);
|
||||
my $element = WSDiscovery10::Elements::ProbeMatches->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::ProbeMatchesType
|
||||
ProbeMatch => { # WSDiscovery::Types::ProbeMatchType
|
||||
EndpointReference => { # WSDiscovery::Types::EndpointReferenceType
|
||||
{ # WSDiscovery10::Types::ProbeMatchesType
|
||||
ProbeMatch => { # WSDiscovery10::Types::ProbeMatchType
|
||||
EndpointReference => { # WSDiscovery10::Types::EndpointReferenceType
|
||||
Address => { value => $some_value },
|
||||
ReferenceParameters => { # WSDiscovery::Types::ReferenceParametersType
|
||||
ReferenceProperties => { # WSDiscovery10::Types::ReferencePropertiesType
|
||||
},
|
||||
Metadata => { # WSDiscovery::Types::MetadataType
|
||||
ReferenceParameters => { # WSDiscovery10::Types::ReferenceParametersType
|
||||
},
|
||||
PortType => { value => $some_value },
|
||||
ServiceName => { value => $some_value },
|
||||
},
|
||||
Types => $some_value, # QNameListType
|
||||
Scopes => { value => $some_value },
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
|
||||
package WSDiscovery::Elements::RelatesTo;
|
||||
package WSDiscovery10::Elements::RelatesTo;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://www.w3.org/2005/08/addressing' }
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2004/08/addressing' }
|
||||
|
||||
__PACKAGE__->__set_name('RelatesTo');
|
||||
__PACKAGE__->__set_nillable();
|
||||
|
|
@ -14,7 +14,7 @@ __PACKAGE__->__set_maxOccurs();
|
|||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery::Types::RelatesToType
|
||||
WSDiscovery10::Types::Relationship
|
||||
);
|
||||
|
||||
}
|
||||
|
|
@ -26,12 +26,12 @@ use base qw(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::RelatesTo
|
||||
WSDiscovery10::Elements::RelatesTo
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
RelatesTo from the namespace http://www.w3.org/2005/08/addressing.
|
||||
RelatesTo from the namespace http://schemas.xmlsoap.org/ws/2004/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
|
@ -43,7 +43,7 @@ RelatesTo from the namespace http://www.w3.org/2005/08/addressing.
|
|||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::RelatesTo->new($data);
|
||||
my $element = WSDiscovery10::Elements::RelatesTo->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
|
|
@ -1,20 +1,20 @@
|
|||
|
||||
package WSDiscovery::Elements::ProblemIRI;
|
||||
package WSDiscovery10::Elements::ReplyAfter;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://www.w3.org/2005/08/addressing' }
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2004/08/addressing' }
|
||||
|
||||
__PACKAGE__->__set_name('ProblemIRI');
|
||||
__PACKAGE__->__set_name('ReplyAfter');
|
||||
__PACKAGE__->__set_nillable();
|
||||
__PACKAGE__->__set_minOccurs();
|
||||
__PACKAGE__->__set_maxOccurs();
|
||||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery::Types::AttributedURIType
|
||||
WSDiscovery10::Types::ReplyAfterType
|
||||
);
|
||||
|
||||
}
|
||||
|
|
@ -26,12 +26,12 @@ use base qw(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::ProblemIRI
|
||||
WSDiscovery10::Elements::ReplyAfter
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
ProblemIRI from the namespace http://www.w3.org/2005/08/addressing.
|
||||
ReplyAfter from the namespace http://schemas.xmlsoap.org/ws/2004/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
|
@ -43,7 +43,7 @@ ProblemIRI from the namespace http://www.w3.org/2005/08/addressing.
|
|||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::ProblemIRI->new($data);
|
||||
my $element = WSDiscovery10::Elements::ReplyAfter->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
|
|
@ -0,0 +1,65 @@
|
|||
|
||||
package WSDiscovery10::Elements::ReplyTo;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2004/08/addressing' }
|
||||
|
||||
__PACKAGE__->__set_name('ReplyTo');
|
||||
__PACKAGE__->__set_nillable();
|
||||
__PACKAGE__->__set_minOccurs();
|
||||
__PACKAGE__->__set_maxOccurs();
|
||||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery10::Types::EndpointReferenceType
|
||||
);
|
||||
|
||||
}
|
||||
|
||||
1;
|
||||
|
||||
|
||||
=pod
|
||||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery10::Elements::ReplyTo
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
ReplyTo from the namespace http://schemas.xmlsoap.org/ws/2004/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
=head1 METHODS
|
||||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery10::Elements::ReplyTo->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery10::Types::EndpointReferenceType
|
||||
Address => { value => $some_value },
|
||||
ReferenceProperties => { # WSDiscovery10::Types::ReferencePropertiesType
|
||||
},
|
||||
ReferenceParameters => { # WSDiscovery10::Types::ReferenceParametersType
|
||||
},
|
||||
PortType => { value => $some_value },
|
||||
ServiceName => { value => $some_value },
|
||||
},
|
||||
|
||||
=head1 AUTHOR
|
||||
|
||||
Generated by SOAP::WSDL
|
||||
|
||||
=cut
|
||||
|
||||
|
|
@ -0,0 +1,67 @@
|
|||
|
||||
package WSDiscovery10::Elements::Resolve;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery' }
|
||||
|
||||
__PACKAGE__->__set_name('Resolve');
|
||||
__PACKAGE__->__set_nillable();
|
||||
__PACKAGE__->__set_minOccurs();
|
||||
__PACKAGE__->__set_maxOccurs();
|
||||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery10::Types::ResolveType
|
||||
);
|
||||
|
||||
}
|
||||
|
||||
1;
|
||||
|
||||
|
||||
=pod
|
||||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery10::Elements::Resolve
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
Resolve from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
=head1 METHODS
|
||||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery10::Elements::Resolve->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery10::Types::ResolveType
|
||||
EndpointReference => { # WSDiscovery10::Types::EndpointReferenceType
|
||||
Address => { value => $some_value },
|
||||
ReferenceProperties => { # WSDiscovery10::Types::ReferencePropertiesType
|
||||
},
|
||||
ReferenceParameters => { # WSDiscovery10::Types::ReferenceParametersType
|
||||
},
|
||||
PortType => { value => $some_value },
|
||||
ServiceName => { value => $some_value },
|
||||
},
|
||||
},
|
||||
|
||||
=head1 AUTHOR
|
||||
|
||||
Generated by SOAP::WSDL
|
||||
|
||||
=cut
|
||||
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
|
||||
package WSDiscovery::Elements::ResolveMatches;
|
||||
package WSDiscovery10::Elements::ResolveMatches;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01' }
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery' }
|
||||
|
||||
__PACKAGE__->__set_name('ResolveMatches');
|
||||
__PACKAGE__->__set_nillable();
|
||||
|
|
@ -14,7 +14,7 @@ __PACKAGE__->__set_maxOccurs();
|
|||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery::Types::ResolveMatchesType
|
||||
WSDiscovery10::Types::ResolveMatchesType
|
||||
);
|
||||
|
||||
}
|
||||
|
|
@ -26,12 +26,12 @@ use base qw(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::ResolveMatches
|
||||
WSDiscovery10::Elements::ResolveMatches
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
ResolveMatches from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
ResolveMatches from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -43,18 +43,20 @@ ResolveMatches from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/
|
|||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::ResolveMatches->new($data);
|
||||
my $element = WSDiscovery10::Elements::ResolveMatches->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::ResolveMatchesType
|
||||
ResolveMatch => { # WSDiscovery::Types::ResolveMatchType
|
||||
EndpointReference => { # WSDiscovery::Types::EndpointReferenceType
|
||||
{ # WSDiscovery10::Types::ResolveMatchesType
|
||||
ResolveMatch => { # WSDiscovery10::Types::ResolveMatchType
|
||||
EndpointReference => { # WSDiscovery10::Types::EndpointReferenceType
|
||||
Address => { value => $some_value },
|
||||
ReferenceParameters => { # WSDiscovery::Types::ReferenceParametersType
|
||||
ReferenceProperties => { # WSDiscovery10::Types::ReferencePropertiesType
|
||||
},
|
||||
Metadata => { # WSDiscovery::Types::MetadataType
|
||||
ReferenceParameters => { # WSDiscovery10::Types::ReferenceParametersType
|
||||
},
|
||||
PortType => { value => $some_value },
|
||||
ServiceName => { value => $some_value },
|
||||
},
|
||||
Types => $some_value, # QNameListType
|
||||
Scopes => { value => $some_value },
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
|
||||
package WSDiscovery::Elements::RetryAfter;
|
||||
package WSDiscovery10::Elements::RetryAfter;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://www.w3.org/2005/08/addressing' }
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2004/08/addressing' }
|
||||
|
||||
__PACKAGE__->__set_name('RetryAfter');
|
||||
__PACKAGE__->__set_nillable();
|
||||
|
|
@ -14,7 +14,7 @@ __PACKAGE__->__set_maxOccurs();
|
|||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery::Types::AttributedUnsignedLongType
|
||||
WSDiscovery10::Types::RetryAfterType
|
||||
);
|
||||
|
||||
}
|
||||
|
|
@ -26,12 +26,12 @@ use base qw(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::RetryAfter
|
||||
WSDiscovery10::Elements::RetryAfter
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
RetryAfter from the namespace http://www.w3.org/2005/08/addressing.
|
||||
RetryAfter from the namespace http://schemas.xmlsoap.org/ws/2004/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
|
@ -43,7 +43,7 @@ RetryAfter from the namespace http://www.w3.org/2005/08/addressing.
|
|||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::RetryAfter->new($data);
|
||||
my $element = WSDiscovery10::Elements::RetryAfter->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
|
||||
package WSDiscovery::Elements::Scopes;
|
||||
package WSDiscovery10::Elements::Scopes;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01' }
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery' }
|
||||
|
||||
__PACKAGE__->__set_name('Scopes');
|
||||
__PACKAGE__->__set_nillable();
|
||||
|
|
@ -14,7 +14,7 @@ __PACKAGE__->__set_maxOccurs();
|
|||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery::Types::ScopesType
|
||||
WSDiscovery10::Types::ScopesType
|
||||
);
|
||||
|
||||
}
|
||||
|
|
@ -26,12 +26,12 @@ use base qw(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::Scopes
|
||||
WSDiscovery10::Elements::Scopes
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
Scopes from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
Scopes from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -43,7 +43,7 @@ Scopes from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
|||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::Scopes->new($data);
|
||||
my $element = WSDiscovery10::Elements::Scopes->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
|
||||
package WSDiscovery::Elements::Security;
|
||||
package WSDiscovery10::Elements::Security;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01' }
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery' }
|
||||
|
||||
__PACKAGE__->__set_name('Security');
|
||||
__PACKAGE__->__set_nillable();
|
||||
|
|
@ -14,7 +14,7 @@ __PACKAGE__->__set_maxOccurs();
|
|||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery::Types::SecurityType
|
||||
WSDiscovery10::Types::SecurityType
|
||||
);
|
||||
|
||||
}
|
||||
|
|
@ -26,12 +26,12 @@ use base qw(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::Security
|
||||
WSDiscovery10::Elements::Security
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
Security from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
Security from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -43,12 +43,12 @@ Security from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/0
|
|||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::Security->new($data);
|
||||
my $element = WSDiscovery10::Elements::Security->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::SecurityType
|
||||
Sig => { # WSDiscovery::Types::SigType
|
||||
{ # WSDiscovery10::Types::SecurityType
|
||||
Sig => { # WSDiscovery10::Types::SigType
|
||||
},
|
||||
},
|
||||
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
|
||||
package WSDiscovery::Elements::Sig;
|
||||
package WSDiscovery10::Elements::Sig;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01' }
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery' }
|
||||
|
||||
__PACKAGE__->__set_name('Sig');
|
||||
__PACKAGE__->__set_nillable();
|
||||
|
|
@ -14,7 +14,7 @@ __PACKAGE__->__set_maxOccurs();
|
|||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery::Types::SigType
|
||||
WSDiscovery10::Types::SigType
|
||||
);
|
||||
|
||||
}
|
||||
|
|
@ -26,12 +26,12 @@ use base qw(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::Sig
|
||||
WSDiscovery10::Elements::Sig
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
Sig from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
Sig from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -43,11 +43,11 @@ Sig from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
|||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::Sig->new($data);
|
||||
my $element = WSDiscovery10::Elements::Sig->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::SigType
|
||||
{ # WSDiscovery10::Types::SigType
|
||||
},
|
||||
|
||||
=head1 AUTHOR
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
|
||||
package WSDiscovery::Elements::SupportedMatchingRules;
|
||||
package WSDiscovery10::Elements::SupportedMatchingRules;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01' }
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery' }
|
||||
|
||||
__PACKAGE__->__set_name('SupportedMatchingRules');
|
||||
__PACKAGE__->__set_nillable();
|
||||
|
|
@ -14,7 +14,7 @@ __PACKAGE__->__set_maxOccurs();
|
|||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery::Types::UriListType
|
||||
WSDiscovery10::Types::UriListType
|
||||
);
|
||||
|
||||
}
|
||||
|
|
@ -26,12 +26,12 @@ use base qw(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::SupportedMatchingRules
|
||||
WSDiscovery10::Elements::SupportedMatchingRules
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
SupportedMatchingRules from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
SupportedMatchingRules from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -43,7 +43,7 @@ SupportedMatchingRules from the namespace http://docs.oasis-open.org/ws-dd/ns/di
|
|||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::SupportedMatchingRules->new($data);
|
||||
my $element = WSDiscovery10::Elements::SupportedMatchingRules->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
|
||||
package WSDiscovery::Elements::To;
|
||||
package WSDiscovery10::Elements::To;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://www.w3.org/2005/08/addressing' }
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2004/08/addressing' }
|
||||
|
||||
__PACKAGE__->__set_name('To');
|
||||
__PACKAGE__->__set_nillable();
|
||||
|
|
@ -14,7 +14,7 @@ __PACKAGE__->__set_maxOccurs();
|
|||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery::Types::AttributedURIType
|
||||
WSDiscovery10::Types::AttributedURI
|
||||
);
|
||||
|
||||
}
|
||||
|
|
@ -26,12 +26,12 @@ use base qw(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::To
|
||||
WSDiscovery10::Elements::To
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
To from the namespace http://www.w3.org/2005/08/addressing.
|
||||
To from the namespace http://schemas.xmlsoap.org/ws/2004/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
|
@ -43,7 +43,7 @@ To from the namespace http://www.w3.org/2005/08/addressing.
|
|||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::To->new($data);
|
||||
my $element = WSDiscovery10::Elements::To->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
|
||||
package WSDiscovery::Elements::Types;
|
||||
package WSDiscovery10::Elements::Types;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01' }
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery' }
|
||||
|
||||
__PACKAGE__->__set_name('Types');
|
||||
__PACKAGE__->__set_nillable();
|
||||
|
|
@ -14,7 +14,7 @@ __PACKAGE__->__set_maxOccurs();
|
|||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery::Types::QNameListType
|
||||
WSDiscovery10::Types::QNameListType
|
||||
);
|
||||
|
||||
}
|
||||
|
|
@ -26,12 +26,12 @@ use base qw(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::Types
|
||||
WSDiscovery10::Elements::Types
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
Types from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
Types from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -43,7 +43,7 @@ Types from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
|||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::Types->new($data);
|
||||
my $element = WSDiscovery10::Elements::Types->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
|
||||
package WSDiscovery::Elements::XAddrs;
|
||||
package WSDiscovery10::Elements::XAddrs;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01' }
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery' }
|
||||
|
||||
__PACKAGE__->__set_name('XAddrs');
|
||||
__PACKAGE__->__set_nillable();
|
||||
|
|
@ -14,7 +14,7 @@ __PACKAGE__->__set_maxOccurs();
|
|||
__PACKAGE__->__set_ref();
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Element
|
||||
WSDiscovery::Types::UriListType
|
||||
WSDiscovery10::Types::UriListType
|
||||
);
|
||||
|
||||
}
|
||||
|
|
@ -26,12 +26,12 @@ use base qw(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Elements::XAddrs
|
||||
WSDiscovery10::Elements::XAddrs
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined element
|
||||
XAddrs from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
XAddrs from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -43,7 +43,7 @@ XAddrs from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
|||
|
||||
=head2 new
|
||||
|
||||
my $element = WSDiscovery::Elements::XAddrs->new($data);
|
||||
my $element = WSDiscovery10::Elements::XAddrs->new($data);
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
|
|
@ -1,4 +1,4 @@
|
|||
package WSDiscovery::Interfaces::WSDiscovery::WSDiscoveryPort;
|
||||
package WSDiscovery10::Interfaces::WSDiscovery::WSDiscoveryPort;
|
||||
use strict;
|
||||
use warnings;
|
||||
use Class::Std::Fast::Storable;
|
||||
|
|
@ -6,12 +6,12 @@ use Scalar::Util qw(blessed);
|
|||
use base qw(SOAP::WSDL::Client::Base);
|
||||
|
||||
# only load if it hasn't been loaded before
|
||||
require WSDiscovery::Typemaps::WSDiscovery
|
||||
if not WSDiscovery::Typemaps::WSDiscovery->can('get_class');
|
||||
require WSDiscovery10::Typemaps::WSDiscovery
|
||||
if not WSDiscovery10::Typemaps::WSDiscovery->can('get_class');
|
||||
|
||||
sub START {
|
||||
$_[0]->set_proxy('soap.udp://239.255.255.250:3702/') if not $_[2]->{proxy};
|
||||
$_[0]->set_class_resolver('WSDiscovery::Typemaps::WSDiscovery')
|
||||
$_[0]->set_class_resolver('WSDiscovery10::Typemaps::WSDiscovery')
|
||||
if not $_[2]->{class_resolver};
|
||||
|
||||
$_[0]->set_prefix($_[2]->{use_prefix}) if exists $_[2]->{use_prefix};
|
||||
|
|
@ -22,7 +22,7 @@ sub ProbeOp {
|
|||
die "ProbeOp must be called as object method (\$self is <$self>)" if not blessed($self);
|
||||
return $self->SUPER::call({
|
||||
operation => 'ProbeOp',
|
||||
soap_action => 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01/Probe',
|
||||
soap_action => 'http://schemas.xmlsoap.org/ws/2005/04/discovery/Probe',
|
||||
style => 'document',
|
||||
body => {
|
||||
|
||||
|
|
@ -30,7 +30,7 @@ sub ProbeOp {
|
|||
'use' => 'literal',
|
||||
namespace => 'http://schemas.xmlsoap.org/wsdl/soap/',
|
||||
encodingStyle => '',
|
||||
parts => [qw( WSDiscovery::Elements::Probe )],
|
||||
parts => [qw( WSDiscovery10::Elements::Probe )],
|
||||
|
||||
},
|
||||
header => {
|
||||
|
|
@ -55,12 +55,12 @@ __END__
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Interfaces::WSDiscovery::WSDiscoveryPort - SOAP Interface for the WSDiscovery Web Service
|
||||
WSDiscovery10::Interfaces::WSDiscovery::WSDiscoveryPort - SOAP Interface for the WSDiscovery Web Service
|
||||
|
||||
=head1 SYNOPSIS
|
||||
|
||||
use WSDiscovery::Interfaces::WSDiscovery::WSDiscoveryPort;
|
||||
my $interface = WSDiscovery::Interfaces::WSDiscovery::WSDiscoveryPort->new();
|
||||
use WSDiscovery10::Interfaces::WSDiscovery::WSDiscoveryPort;
|
||||
my $interface = WSDiscovery10::Interfaces::WSDiscovery::WSDiscoveryPort->new();
|
||||
|
||||
my $response;
|
||||
$response = $interface->ProbeOp();
|
||||
|
|
@ -114,9 +114,9 @@ hash refs. See the respective class' documentation for additional information.
|
|||
|
||||
|
||||
|
||||
Returns a L<WSDiscovery::Elements::ProbeMatches|WSDiscovery::Elements::ProbeMatches> object.
|
||||
Returns a L<WSDiscovery10::Elements::ProbeMatches|WSDiscovery10::Elements::ProbeMatches> object.
|
||||
|
||||
$response = $interface->ProbeOp( { # WSDiscovery::Types::ProbeType
|
||||
$response = $interface->ProbeOp( { # WSDiscovery10::Types::ProbeType
|
||||
Types => $some_value, # QNameListType
|
||||
Scopes => { value => $some_value },
|
||||
},,
|
||||
|
|
@ -126,6 +126,6 @@ Returns a L<WSDiscovery::Elements::ProbeMatches|WSDiscovery::Elements::ProbeMatc
|
|||
|
||||
=head1 AUTHOR
|
||||
|
||||
Generated by SOAP::WSDL on Wed Jul 2 11:45:24 2014
|
||||
Generated by SOAP::WSDL on Sat Mar 19 18:11:58 2016
|
||||
|
||||
=cut
|
||||
|
|
@ -0,0 +1,56 @@
|
|||
|
||||
package WSDiscovery10::Typemaps::WSDiscovery;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
our $typemap_1 = {
|
||||
'Fault/faultactor' => 'SOAP::WSDL::XSD::Typelib::Builtin::token',
|
||||
'Fault' => 'SOAP::WSDL::SOAP::Typelib::Fault11',
|
||||
'Probe/Types' => 'WSDiscovery10::Types::QNameListType',
|
||||
'ProbeMatches/ProbeMatch/EndpointReference/ReferenceParameters' => 'WSDiscovery10::Types::ReferenceParametersType',
|
||||
'Fault/faultstring' => 'SOAP::WSDL::XSD::Typelib::Builtin::string',
|
||||
'Fault/detail' => 'SOAP::WSDL::XSD::Typelib::Builtin::string',
|
||||
'Probe/Scopes' => 'WSDiscovery10::Types::ScopesType',
|
||||
'Fault/faultcode' => 'SOAP::WSDL::XSD::Typelib::Builtin::anyURI',
|
||||
'ProbeMatches/ProbeMatch' => 'WSDiscovery10::Types::ProbeMatchType',
|
||||
'ProbeMatches/ProbeMatch/MetadataVersion' => 'SOAP::WSDL::XSD::Typelib::Builtin::unsignedInt',
|
||||
'ProbeMatches/ProbeMatch/Scopes' => 'WSDiscovery10::Types::ScopesType',
|
||||
'ProbeMatches' => 'WSDiscovery10::Elements::ProbeMatches',
|
||||
'ProbeMatches/ProbeMatch/EndpointReference/ServiceName' => 'WSDiscovery10::Types::ServiceNameType',
|
||||
'Probe' => 'WSDiscovery10::Elements::Probe',
|
||||
'ProbeMatches/ProbeMatch/EndpointReference/Address' => 'WSDiscovery10::Types::AttributedURI',
|
||||
'ProbeMatches/ProbeMatch/XAddrs' => 'WSDiscovery10::Types::UriListType',
|
||||
'ProbeMatches/ProbeMatch/Types' => 'WSDiscovery10::Types::QNameListType',
|
||||
'ProbeMatches/ProbeMatch/EndpointReference' => 'WSDiscovery10::Types::EndpointReferenceType',
|
||||
'ProbeMatches/ProbeMatch/EndpointReference/ReferenceProperties' => 'WSDiscovery10::Types::ReferencePropertiesType',
|
||||
'ProbeMatches/ProbeMatch/EndpointReference/PortType' => 'WSDiscovery10::Types::AttributedQName'
|
||||
};
|
||||
;
|
||||
|
||||
sub get_class {
|
||||
my $name = join '/', @{ $_[1] };
|
||||
return $typemap_1->{ $name };
|
||||
}
|
||||
|
||||
sub get_typemap {
|
||||
return $typemap_1;
|
||||
}
|
||||
|
||||
1;
|
||||
|
||||
__END__
|
||||
|
||||
__END__
|
||||
|
||||
=pod
|
||||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery10::Typemaps::WSDiscovery - typemap for WSDiscovery
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Typemap created by SOAP::WSDL for map-based SOAP message parsers.
|
||||
|
||||
=cut
|
||||
|
||||
|
|
@ -1,13 +1,13 @@
|
|||
package WSDiscovery::Types::AppSequenceType;
|
||||
package WSDiscovery10::Types::AppSequenceType;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
|
||||
__PACKAGE__->_set_element_form_qualified(0);
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01' };
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery' };
|
||||
|
||||
our $XML_ATTRIBUTE_CLASS = 'WSDiscovery::Types::AppSequenceType::_AppSequenceType::XmlAttr';
|
||||
our $XML_ATTRIBUTE_CLASS = 'WSDiscovery10::Types::AppSequenceType::_AppSequenceType::XmlAttr';
|
||||
|
||||
sub __get_attr_class {
|
||||
return $XML_ATTRIBUTE_CLASS;
|
||||
|
|
@ -15,7 +15,7 @@ sub __get_attr_class {
|
|||
|
||||
use base qw();
|
||||
|
||||
package WSDiscovery::Types::AppSequenceType::_AppSequenceType::XmlAttr;
|
||||
package WSDiscovery10::Types::AppSequenceType::_AppSequenceType::XmlAttr;
|
||||
use base qw(SOAP::WSDL::XSD::Typelib::AttributeSet);
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
|
@ -57,12 +57,12 @@ __PACKAGE__->_factory(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Types::AppSequenceType
|
||||
WSDiscovery10::Types::AppSequenceType
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined complexType
|
||||
AppSequenceType from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
AppSequenceType from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -87,7 +87,7 @@ methods:
|
|||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::AppSequenceType
|
||||
{ # WSDiscovery10::Types::AppSequenceType
|
||||
},
|
||||
|
||||
|
||||
|
|
@ -99,7 +99,7 @@ See the correspondent WSDL/XML Schema if in question.
|
|||
|
||||
This class has additional attributes, accessibly via the C<attr()> method.
|
||||
|
||||
attr() returns an object of the class WSDiscovery::Types::AppSequenceType::_AppSequenceType::XmlAttr.
|
||||
attr() returns an object of the class WSDiscovery10::Types::AppSequenceType::_AppSequenceType::XmlAttr.
|
||||
|
||||
The following attributes can be accessed on this object via the corresponding
|
||||
get_/set_ methods:
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
package WSDiscovery::Types::AttributedQNameType;
|
||||
package WSDiscovery10::Types::AttributedQName;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
|
||||
__PACKAGE__->_set_element_form_qualified(0);
|
||||
|
||||
sub get_xmlns { 'http://www.w3.org/2005/08/addressing' };
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2004/08/addressing' };
|
||||
|
||||
our $XML_ATTRIBUTE_CLASS;
|
||||
undef $XML_ATTRIBUTE_CLASS;
|
||||
|
|
@ -30,12 +30,12 @@ use base qw(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Types::AttributedQNameType
|
||||
WSDiscovery10::Types::AttributedQName
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined complexType
|
||||
AttributedQNameType from the namespace http://www.w3.org/2005/08/addressing.
|
||||
AttributedQName from the namespace http://schemas.xmlsoap.org/ws/2004/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
package WSDiscovery::Types::AttributedURIType;
|
||||
package WSDiscovery10::Types::AttributedURI;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
|
||||
__PACKAGE__->_set_element_form_qualified(0);
|
||||
|
||||
sub get_xmlns { 'http://www.w3.org/2005/08/addressing' };
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2004/08/addressing' };
|
||||
|
||||
our $XML_ATTRIBUTE_CLASS;
|
||||
undef $XML_ATTRIBUTE_CLASS;
|
||||
|
|
@ -30,12 +30,12 @@ use base qw(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Types::AttributedURIType
|
||||
WSDiscovery10::Types::AttributedURI
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined complexType
|
||||
AttributedURIType from the namespace http://www.w3.org/2005/08/addressing.
|
||||
AttributedURI from the namespace http://schemas.xmlsoap.org/ws/2004/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
package WSDiscovery::Types::ByeType;
|
||||
package WSDiscovery10::Types::ByeType;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
|
||||
__PACKAGE__->_set_element_form_qualified(0);
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01' };
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery' };
|
||||
|
||||
our $XML_ATTRIBUTE_CLASS;
|
||||
undef $XML_ATTRIBUTE_CLASS;
|
||||
|
|
@ -43,15 +43,15 @@ __PACKAGE__->_factory(
|
|||
'MetadataVersion' => \%MetadataVersion_of,
|
||||
},
|
||||
{
|
||||
'EndpointReference' => 'WSDiscovery::Elements::EndpointReference',
|
||||
'EndpointReference' => 'WSDiscovery10::Elements::EndpointReference',
|
||||
|
||||
'Types' => 'WSDiscovery::Elements::Types',
|
||||
'Types' => 'WSDiscovery10::Elements::Types',
|
||||
|
||||
'Scopes' => 'WSDiscovery::Elements::Scopes',
|
||||
'Scopes' => 'WSDiscovery10::Elements::Scopes',
|
||||
|
||||
'XAddrs' => 'WSDiscovery::Elements::XAddrs',
|
||||
'XAddrs' => 'WSDiscovery10::Elements::XAddrs',
|
||||
|
||||
'MetadataVersion' => 'WSDiscovery::Elements::MetadataVersion',
|
||||
'MetadataVersion' => 'WSDiscovery10::Elements::MetadataVersion',
|
||||
|
||||
},
|
||||
{
|
||||
|
|
@ -80,12 +80,12 @@ __PACKAGE__->_factory(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Types::ByeType
|
||||
WSDiscovery10::Types::ByeType
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined complexType
|
||||
ByeType from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
ByeType from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -155,13 +155,15 @@ perl code only, XML output uses the original name:
|
|||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::ByeType
|
||||
EndpointReference => { # WSDiscovery::Types::EndpointReferenceType
|
||||
{ # WSDiscovery10::Types::ByeType
|
||||
EndpointReference => { # WSDiscovery10::Types::EndpointReferenceType
|
||||
Address => { value => $some_value },
|
||||
ReferenceParameters => { # WSDiscovery::Types::ReferenceParametersType
|
||||
ReferenceProperties => { # WSDiscovery10::Types::ReferencePropertiesType
|
||||
},
|
||||
Metadata => { # WSDiscovery::Types::MetadataType
|
||||
ReferenceParameters => { # WSDiscovery10::Types::ReferenceParametersType
|
||||
},
|
||||
PortType => { value => $some_value },
|
||||
ServiceName => { value => $some_value },
|
||||
},
|
||||
Types => $some_value, # QNameListType
|
||||
Scopes => { value => $some_value },
|
||||
|
|
@ -0,0 +1,141 @@
|
|||
package WSDiscovery10::Types::EndpointReferenceType;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
|
||||
__PACKAGE__->_set_element_form_qualified(0);
|
||||
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2004/08/addressing' };
|
||||
|
||||
our $XML_ATTRIBUTE_CLASS;
|
||||
undef $XML_ATTRIBUTE_CLASS;
|
||||
|
||||
sub __get_attr_class {
|
||||
return $XML_ATTRIBUTE_CLASS;
|
||||
}
|
||||
|
||||
use Class::Std::Fast::Storable constructor => 'none';
|
||||
use base qw(SOAP::WSDL::XSD::Typelib::ComplexType);
|
||||
|
||||
Class::Std::initialize();
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
my %Address_of :ATTR(:get<Address>);
|
||||
my %ReferenceProperties_of :ATTR(:get<ReferenceProperties>);
|
||||
my %ReferenceParameters_of :ATTR(:get<ReferenceParameters>);
|
||||
my %PortType_of :ATTR(:get<PortType>);
|
||||
my %ServiceName_of :ATTR(:get<ServiceName>);
|
||||
|
||||
__PACKAGE__->_factory(
|
||||
[ qw( Address
|
||||
ReferenceProperties
|
||||
ReferenceParameters
|
||||
PortType
|
||||
ServiceName
|
||||
|
||||
) ],
|
||||
{
|
||||
'Address' => \%Address_of,
|
||||
'ReferenceProperties' => \%ReferenceProperties_of,
|
||||
'ReferenceParameters' => \%ReferenceParameters_of,
|
||||
'PortType' => \%PortType_of,
|
||||
'ServiceName' => \%ServiceName_of,
|
||||
},
|
||||
{
|
||||
'Address' => 'WSDiscovery10::Types::AttributedURI',
|
||||
'ReferenceProperties' => 'WSDiscovery10::Types::ReferencePropertiesType',
|
||||
'ReferenceParameters' => 'WSDiscovery10::Types::ReferenceParametersType',
|
||||
'PortType' => 'WSDiscovery10::Types::AttributedQName',
|
||||
'ServiceName' => 'WSDiscovery10::Types::ServiceNameType',
|
||||
},
|
||||
{
|
||||
|
||||
'Address' => 'Address',
|
||||
'ReferenceProperties' => 'ReferenceProperties',
|
||||
'ReferenceParameters' => 'ReferenceParameters',
|
||||
'PortType' => 'PortType',
|
||||
'ServiceName' => 'ServiceName',
|
||||
}
|
||||
);
|
||||
|
||||
} # end BLOCK
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
1;
|
||||
|
||||
|
||||
=pod
|
||||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery10::Types::EndpointReferenceType
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined complexType
|
||||
EndpointReferenceType from the namespace http://schemas.xmlsoap.org/ws/2004/08/addressing.
|
||||
|
||||
If "Policy" elements from namespace "http://schemas.xmlsoap.org/ws/2002/12/policy#policy" are used, they must appear first (before any extensibility elements).
|
||||
|
||||
|
||||
|
||||
|
||||
=head2 PROPERTIES
|
||||
|
||||
The following properties may be accessed using get_PROPERTY / set_PROPERTY
|
||||
methods:
|
||||
|
||||
=over
|
||||
|
||||
=item * Address
|
||||
|
||||
|
||||
=item * ReferenceProperties
|
||||
|
||||
|
||||
=item * ReferenceParameters
|
||||
|
||||
|
||||
=item * PortType
|
||||
|
||||
|
||||
=item * ServiceName
|
||||
|
||||
|
||||
|
||||
|
||||
=back
|
||||
|
||||
|
||||
=head1 METHODS
|
||||
|
||||
=head2 new
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery10::Types::EndpointReferenceType
|
||||
Address => { value => $some_value },
|
||||
ReferenceProperties => { # WSDiscovery10::Types::ReferencePropertiesType
|
||||
},
|
||||
ReferenceParameters => { # WSDiscovery10::Types::ReferenceParametersType
|
||||
},
|
||||
PortType => { value => $some_value },
|
||||
ServiceName => { value => $some_value },
|
||||
},
|
||||
|
||||
|
||||
|
||||
|
||||
=head1 AUTHOR
|
||||
|
||||
Generated by SOAP::WSDL
|
||||
|
||||
=cut
|
||||
|
||||
|
|
@ -1,8 +1,8 @@
|
|||
package WSDiscovery::Types::FaultCodeOpenType;
|
||||
package WSDiscovery10::Types::FaultCodeOpenType;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01'};
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery'};
|
||||
|
||||
# derivation by union
|
||||
# union is not fully supported yet - value space constraints are not
|
||||
|
|
@ -31,7 +31,7 @@ __END__
|
|||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined simpleType
|
||||
FaultCodeOpenType from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
FaultCodeOpenType from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -1,8 +1,8 @@
|
|||
package WSDiscovery::Types::FaultCodeType;
|
||||
package WSDiscovery10::Types::FaultCodeType;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01'};
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery'};
|
||||
|
||||
# derivation by restriction
|
||||
use base qw(
|
||||
|
|
@ -23,7 +23,7 @@ __END__
|
|||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined simpleType
|
||||
FaultCodeType from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
FaultCodeType from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -1,12 +1,12 @@
|
|||
package WSDiscovery::Types::RelationshipType;
|
||||
package WSDiscovery10::Types::FaultSubcodeValues;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
sub get_xmlns { 'http://www.w3.org/2005/08/addressing'};
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2004/08/addressing'};
|
||||
|
||||
# derivation by restriction
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Builtin::anyURI);
|
||||
SOAP::WSDL::XSD::Typelib::Builtin::QName);
|
||||
|
||||
|
||||
|
||||
|
|
@ -23,14 +23,14 @@ __END__
|
|||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined simpleType
|
||||
RelationshipType from the namespace http://www.w3.org/2005/08/addressing.
|
||||
FaultSubcodeValues from the namespace http://schemas.xmlsoap.org/ws/2004/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
This clase is derived from
|
||||
SOAP::WSDL::XSD::Typelib::Builtin::anyURI
|
||||
SOAP::WSDL::XSD::Typelib::Builtin::QName
|
||||
. SOAP::WSDL's schema implementation does not validate data, so you can use it exactly
|
||||
like it's base type.
|
||||
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
package WSDiscovery::Types::HelloType;
|
||||
package WSDiscovery10::Types::HelloType;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
|
||||
__PACKAGE__->_set_element_form_qualified(0);
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01' };
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery' };
|
||||
|
||||
our $XML_ATTRIBUTE_CLASS;
|
||||
undef $XML_ATTRIBUTE_CLASS;
|
||||
|
|
@ -43,15 +43,15 @@ __PACKAGE__->_factory(
|
|||
'MetadataVersion' => \%MetadataVersion_of,
|
||||
},
|
||||
{
|
||||
'EndpointReference' => 'WSDiscovery::Elements::EndpointReference',
|
||||
'EndpointReference' => 'WSDiscovery10::Elements::EndpointReference',
|
||||
|
||||
'Types' => 'WSDiscovery::Elements::Types',
|
||||
'Types' => 'WSDiscovery10::Elements::Types',
|
||||
|
||||
'Scopes' => 'WSDiscovery::Elements::Scopes',
|
||||
'Scopes' => 'WSDiscovery10::Elements::Scopes',
|
||||
|
||||
'XAddrs' => 'WSDiscovery::Elements::XAddrs',
|
||||
'XAddrs' => 'WSDiscovery10::Elements::XAddrs',
|
||||
|
||||
'MetadataVersion' => 'WSDiscovery::Elements::MetadataVersion',
|
||||
'MetadataVersion' => 'WSDiscovery10::Elements::MetadataVersion',
|
||||
|
||||
},
|
||||
{
|
||||
|
|
@ -80,12 +80,12 @@ __PACKAGE__->_factory(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Types::HelloType
|
||||
WSDiscovery10::Types::HelloType
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined complexType
|
||||
HelloType from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
HelloType from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -155,13 +155,15 @@ perl code only, XML output uses the original name:
|
|||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::HelloType
|
||||
EndpointReference => { # WSDiscovery::Types::EndpointReferenceType
|
||||
{ # WSDiscovery10::Types::HelloType
|
||||
EndpointReference => { # WSDiscovery10::Types::EndpointReferenceType
|
||||
Address => { value => $some_value },
|
||||
ReferenceParameters => { # WSDiscovery::Types::ReferenceParametersType
|
||||
ReferenceProperties => { # WSDiscovery10::Types::ReferencePropertiesType
|
||||
},
|
||||
Metadata => { # WSDiscovery::Types::MetadataType
|
||||
ReferenceParameters => { # WSDiscovery10::Types::ReferenceParametersType
|
||||
},
|
||||
PortType => { value => $some_value },
|
||||
ServiceName => { value => $some_value },
|
||||
},
|
||||
Types => $some_value, # QNameListType
|
||||
Scopes => { value => $some_value },
|
||||
|
|
@ -1,8 +1,8 @@
|
|||
package WSDiscovery::Types::FaultCodesOpenEnumType;
|
||||
package WSDiscovery10::Types::OpenRelationshipType;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
sub get_xmlns { 'http://www.w3.org/2005/08/addressing'};
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery'};
|
||||
|
||||
# derivation by union
|
||||
# union is not fully supported yet - value space constraints are not
|
||||
|
|
@ -31,7 +31,7 @@ __END__
|
|||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined simpleType
|
||||
FaultCodesOpenEnumType from the namespace http://www.w3.org/2005/08/addressing.
|
||||
OpenRelationshipType from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
package WSDiscovery::Types::ProbeMatchType;
|
||||
package WSDiscovery10::Types::ProbeMatchType;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
|
||||
__PACKAGE__->_set_element_form_qualified(0);
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01' };
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery' };
|
||||
|
||||
our $XML_ATTRIBUTE_CLASS;
|
||||
undef $XML_ATTRIBUTE_CLASS;
|
||||
|
|
@ -43,15 +43,15 @@ __PACKAGE__->_factory(
|
|||
'MetadataVersion' => \%MetadataVersion_of,
|
||||
},
|
||||
{
|
||||
'EndpointReference' => 'WSDiscovery::Elements::EndpointReference',
|
||||
'EndpointReference' => 'WSDiscovery10::Elements::EndpointReference',
|
||||
|
||||
'Types' => 'WSDiscovery::Elements::Types',
|
||||
'Types' => 'WSDiscovery10::Elements::Types',
|
||||
|
||||
'Scopes' => 'WSDiscovery::Elements::Scopes',
|
||||
'Scopes' => 'WSDiscovery10::Elements::Scopes',
|
||||
|
||||
'XAddrs' => 'WSDiscovery::Elements::XAddrs',
|
||||
'XAddrs' => 'WSDiscovery10::Elements::XAddrs',
|
||||
|
||||
'MetadataVersion' => 'WSDiscovery::Elements::MetadataVersion',
|
||||
'MetadataVersion' => 'WSDiscovery10::Elements::MetadataVersion',
|
||||
|
||||
},
|
||||
{
|
||||
|
|
@ -80,12 +80,12 @@ __PACKAGE__->_factory(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Types::ProbeMatchType
|
||||
WSDiscovery10::Types::ProbeMatchType
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined complexType
|
||||
ProbeMatchType from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
ProbeMatchType from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -155,13 +155,15 @@ perl code only, XML output uses the original name:
|
|||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::ProbeMatchType
|
||||
EndpointReference => { # WSDiscovery::Types::EndpointReferenceType
|
||||
{ # WSDiscovery10::Types::ProbeMatchType
|
||||
EndpointReference => { # WSDiscovery10::Types::EndpointReferenceType
|
||||
Address => { value => $some_value },
|
||||
ReferenceParameters => { # WSDiscovery::Types::ReferenceParametersType
|
||||
ReferenceProperties => { # WSDiscovery10::Types::ReferencePropertiesType
|
||||
},
|
||||
Metadata => { # WSDiscovery::Types::MetadataType
|
||||
ReferenceParameters => { # WSDiscovery10::Types::ReferenceParametersType
|
||||
},
|
||||
PortType => { value => $some_value },
|
||||
ServiceName => { value => $some_value },
|
||||
},
|
||||
Types => $some_value, # QNameListType
|
||||
Scopes => { value => $some_value },
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
package WSDiscovery::Types::ProbeMatchesType;
|
||||
package WSDiscovery10::Types::ProbeMatchesType;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
|
||||
__PACKAGE__->_set_element_form_qualified(0);
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01' };
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery' };
|
||||
|
||||
our $XML_ATTRIBUTE_CLASS;
|
||||
undef $XML_ATTRIBUTE_CLASS;
|
||||
|
|
@ -31,7 +31,7 @@ __PACKAGE__->_factory(
|
|||
'ProbeMatch' => \%ProbeMatch_of,
|
||||
},
|
||||
{
|
||||
'ProbeMatch' => 'WSDiscovery::Types::ProbeMatchType',
|
||||
'ProbeMatch' => 'WSDiscovery10::Types::ProbeMatchType',
|
||||
},
|
||||
{
|
||||
|
||||
|
|
@ -55,12 +55,12 @@ __PACKAGE__->_factory(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Types::ProbeMatchesType
|
||||
WSDiscovery10::Types::ProbeMatchesType
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined complexType
|
||||
ProbeMatchesType from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
ProbeMatchesType from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -88,14 +88,16 @@ methods:
|
|||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::ProbeMatchesType
|
||||
ProbeMatch => { # WSDiscovery::Types::ProbeMatchType
|
||||
EndpointReference => { # WSDiscovery::Types::EndpointReferenceType
|
||||
{ # WSDiscovery10::Types::ProbeMatchesType
|
||||
ProbeMatch => { # WSDiscovery10::Types::ProbeMatchType
|
||||
EndpointReference => { # WSDiscovery10::Types::EndpointReferenceType
|
||||
Address => { value => $some_value },
|
||||
ReferenceParameters => { # WSDiscovery::Types::ReferenceParametersType
|
||||
ReferenceProperties => { # WSDiscovery10::Types::ReferencePropertiesType
|
||||
},
|
||||
Metadata => { # WSDiscovery::Types::MetadataType
|
||||
ReferenceParameters => { # WSDiscovery10::Types::ReferenceParametersType
|
||||
},
|
||||
PortType => { value => $some_value },
|
||||
ServiceName => { value => $some_value },
|
||||
},
|
||||
Types => $some_value, # QNameListType
|
||||
Scopes => { value => $some_value },
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
package WSDiscovery::Types::ProbeType;
|
||||
package WSDiscovery10::Types::ProbeType;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
|
||||
__PACKAGE__->_set_element_form_qualified(0);
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01' };
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery' };
|
||||
|
||||
our $XML_ATTRIBUTE_CLASS;
|
||||
undef $XML_ATTRIBUTE_CLASS;
|
||||
|
|
@ -34,9 +34,9 @@ __PACKAGE__->_factory(
|
|||
'Scopes' => \%Scopes_of,
|
||||
},
|
||||
{
|
||||
'Types' => 'WSDiscovery::Elements::Types',
|
||||
'Types' => 'WSDiscovery10::Elements::Types',
|
||||
|
||||
'Scopes' => 'WSDiscovery::Elements::Scopes',
|
||||
'Scopes' => 'WSDiscovery10::Elements::Scopes',
|
||||
|
||||
},
|
||||
{
|
||||
|
|
@ -62,12 +62,12 @@ __PACKAGE__->_factory(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Types::ProbeType
|
||||
WSDiscovery10::Types::ProbeType
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined complexType
|
||||
ProbeType from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
ProbeType from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -110,7 +110,7 @@ perl code only, XML output uses the original name:
|
|||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::ProbeType
|
||||
{ # WSDiscovery10::Types::ProbeType
|
||||
Types => $some_value, # QNameListType
|
||||
Scopes => { value => $some_value },
|
||||
},
|
||||
|
|
@ -1,8 +1,8 @@
|
|||
package WSDiscovery::Types::QNameListType;
|
||||
package WSDiscovery10::Types::QNameListType;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01'};
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery'};
|
||||
|
||||
|
||||
# list derivation
|
||||
|
|
@ -28,7 +28,7 @@ __END__
|
|||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined simpleType
|
||||
QNameListType from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
QNameListType from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
package WSDiscovery::Types::ReferenceParametersType;
|
||||
package WSDiscovery10::Types::ReferenceParametersType;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
|
||||
__PACKAGE__->_set_element_form_qualified(0);
|
||||
|
||||
sub get_xmlns { 'http://www.w3.org/2005/08/addressing' };
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2004/08/addressing' };
|
||||
|
||||
our $XML_ATTRIBUTE_CLASS;
|
||||
undef $XML_ATTRIBUTE_CLASS;
|
||||
|
|
@ -50,12 +50,12 @@ __PACKAGE__->_factory(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Types::ReferenceParametersType
|
||||
WSDiscovery10::Types::ReferenceParametersType
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined complexType
|
||||
ReferenceParametersType from the namespace http://www.w3.org/2005/08/addressing.
|
||||
ReferenceParametersType from the namespace http://schemas.xmlsoap.org/ws/2004/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
|
@ -80,7 +80,7 @@ methods:
|
|||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::ReferenceParametersType
|
||||
{ # WSDiscovery10::Types::ReferenceParametersType
|
||||
},
|
||||
|
||||
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
package WSDiscovery::Types::MetadataType;
|
||||
package WSDiscovery10::Types::ReferencePropertiesType;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
|
||||
__PACKAGE__->_set_element_form_qualified(0);
|
||||
|
||||
sub get_xmlns { 'http://www.w3.org/2005/08/addressing' };
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2004/08/addressing' };
|
||||
|
||||
our $XML_ATTRIBUTE_CLASS;
|
||||
undef $XML_ATTRIBUTE_CLASS;
|
||||
|
|
@ -50,12 +50,12 @@ __PACKAGE__->_factory(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Types::MetadataType
|
||||
WSDiscovery10::Types::ReferencePropertiesType
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined complexType
|
||||
MetadataType from the namespace http://www.w3.org/2005/08/addressing.
|
||||
ReferencePropertiesType from the namespace http://schemas.xmlsoap.org/ws/2004/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
|
@ -80,7 +80,7 @@ methods:
|
|||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::MetadataType
|
||||
{ # WSDiscovery10::Types::ReferencePropertiesType
|
||||
},
|
||||
|
||||
|
||||
|
|
@ -1,13 +1,13 @@
|
|||
package WSDiscovery::Types::RelatesToType;
|
||||
package WSDiscovery10::Types::Relationship;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
|
||||
__PACKAGE__->_set_element_form_qualified(0);
|
||||
|
||||
sub get_xmlns { 'http://www.w3.org/2005/08/addressing' };
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2004/08/addressing' };
|
||||
|
||||
our $XML_ATTRIBUTE_CLASS = 'WSDiscovery::Types::RelatesToType::_RelatesToType::XmlAttr';
|
||||
our $XML_ATTRIBUTE_CLASS = 'WSDiscovery10::Types::Relationship::_Relationship::XmlAttr';
|
||||
|
||||
sub __get_attr_class {
|
||||
return $XML_ATTRIBUTE_CLASS;
|
||||
|
|
@ -18,7 +18,7 @@ use base qw(
|
|||
SOAP::WSDL::XSD::Typelib::Builtin::anyURI
|
||||
);
|
||||
|
||||
package WSDiscovery::Types::RelatesToType::_RelatesToType::XmlAttr;
|
||||
package WSDiscovery10::Types::Relationship::_Relationship::XmlAttr;
|
||||
use base qw(SOAP::WSDL::XSD::Typelib::AttributeSet);
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
|
@ -34,7 +34,7 @@ __PACKAGE__->_factory(
|
|||
RelationshipType => \%RelationshipType_of,
|
||||
},
|
||||
{
|
||||
RelationshipType => 'WSDiscovery::Types::RelationshipTypeOpenEnum',
|
||||
RelationshipType => 'SOAP::WSDL::XSD::Typelib::Builtin::QName',
|
||||
}
|
||||
);
|
||||
|
||||
|
|
@ -50,12 +50,12 @@ __PACKAGE__->_factory(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Types::RelatesToType
|
||||
WSDiscovery10::Types::Relationship
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined complexType
|
||||
RelatesToType from the namespace http://www.w3.org/2005/08/addressing.
|
||||
Relationship from the namespace http://schemas.xmlsoap.org/ws/2004/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
|
@ -91,7 +91,7 @@ See the correspondent WSDL/XML Schema if in question.
|
|||
|
||||
This class has additional attributes, accessibly via the C<attr()> method.
|
||||
|
||||
attr() returns an object of the class WSDiscovery::Types::RelatesToType::_RelatesToType::XmlAttr.
|
||||
attr() returns an object of the class WSDiscovery10::Types::Relationship::_Relationship::XmlAttr.
|
||||
|
||||
The following attributes can be accessed on this object via the corresponding
|
||||
get_/set_ methods:
|
||||
|
|
@ -102,7 +102,7 @@ get_/set_ methods:
|
|||
|
||||
|
||||
|
||||
This attribute is of type L<WSDiscovery::Types::RelationshipTypeOpenEnum|WSDiscovery::Types::RelationshipTypeOpenEnum>.
|
||||
This attribute is of type L<SOAP::WSDL::XSD::Typelib::Builtin::QName|SOAP::WSDL::XSD::Typelib::Builtin::QName>.
|
||||
|
||||
|
||||
=back
|
||||
|
|
@ -1,8 +1,8 @@
|
|||
package WSDiscovery::Types::FaultCodesType;
|
||||
package WSDiscovery10::Types::RelationshipType;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
sub get_xmlns { 'http://www.w3.org/2005/08/addressing'};
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery'};
|
||||
|
||||
# derivation by restriction
|
||||
use base qw(
|
||||
|
|
@ -23,7 +23,7 @@ __END__
|
|||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined simpleType
|
||||
FaultCodesType from the namespace http://www.w3.org/2005/08/addressing.
|
||||
RelationshipType from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -0,0 +1,65 @@
|
|||
package WSDiscovery10::Types::RelationshipTypeValues;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2004/08/addressing'};
|
||||
|
||||
# derivation by restriction
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::Builtin::QName);
|
||||
|
||||
|
||||
|
||||
1;
|
||||
|
||||
__END__
|
||||
|
||||
=pod
|
||||
|
||||
=head1 NAME
|
||||
|
||||
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined simpleType
|
||||
RelationshipTypeValues from the namespace http://schemas.xmlsoap.org/ws/2004/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
This clase is derived from
|
||||
SOAP::WSDL::XSD::Typelib::Builtin::QName
|
||||
. SOAP::WSDL's schema implementation does not validate data, so you can use it exactly
|
||||
like it's base type.
|
||||
|
||||
# Description of restrictions not implemented yet.
|
||||
|
||||
|
||||
=head1 METHODS
|
||||
|
||||
=head2 new
|
||||
|
||||
Constructor.
|
||||
|
||||
=head2 get_value / set_value
|
||||
|
||||
Getter and setter for the simpleType's value.
|
||||
|
||||
=head1 OVERLOADING
|
||||
|
||||
Depending on the simple type's base type, the following operations are overloaded
|
||||
|
||||
Stringification
|
||||
Numerification
|
||||
Boolification
|
||||
|
||||
Check L<SOAP::WSDL::XSD::Typelib::Builtin> for more information.
|
||||
|
||||
=head1 AUTHOR
|
||||
|
||||
Generated by SOAP::WSDL
|
||||
|
||||
=cut
|
||||
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
package WSDiscovery::Types::AttributedUnsignedLongType;
|
||||
package WSDiscovery10::Types::ReplyAfterType;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
|
||||
__PACKAGE__->_set_element_form_qualified(0);
|
||||
|
||||
sub get_xmlns { 'http://www.w3.org/2005/08/addressing' };
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2004/08/addressing' };
|
||||
|
||||
our $XML_ATTRIBUTE_CLASS;
|
||||
undef $XML_ATTRIBUTE_CLASS;
|
||||
|
|
@ -16,7 +16,7 @@ sub __get_attr_class {
|
|||
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::ComplexType
|
||||
SOAP::WSDL::XSD::Typelib::Builtin::unsignedLong
|
||||
SOAP::WSDL::XSD::Typelib::Builtin::nonNegativeInteger
|
||||
);
|
||||
|
||||
|
||||
|
|
@ -30,12 +30,12 @@ use base qw(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Types::AttributedUnsignedLongType
|
||||
WSDiscovery10::Types::ReplyAfterType
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined complexType
|
||||
AttributedUnsignedLongType from the namespace http://www.w3.org/2005/08/addressing.
|
||||
ReplyAfterType from the namespace http://schemas.xmlsoap.org/ws/2004/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
package WSDiscovery::Types::ResolveMatchType;
|
||||
package WSDiscovery10::Types::ResolveMatchType;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
|
||||
__PACKAGE__->_set_element_form_qualified(0);
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01' };
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery' };
|
||||
|
||||
our $XML_ATTRIBUTE_CLASS;
|
||||
undef $XML_ATTRIBUTE_CLASS;
|
||||
|
|
@ -43,15 +43,15 @@ __PACKAGE__->_factory(
|
|||
'MetadataVersion' => \%MetadataVersion_of,
|
||||
},
|
||||
{
|
||||
'EndpointReference' => 'WSDiscovery::Elements::EndpointReference',
|
||||
'EndpointReference' => 'WSDiscovery10::Elements::EndpointReference',
|
||||
|
||||
'Types' => 'WSDiscovery::Elements::Types',
|
||||
'Types' => 'WSDiscovery10::Elements::Types',
|
||||
|
||||
'Scopes' => 'WSDiscovery::Elements::Scopes',
|
||||
'Scopes' => 'WSDiscovery10::Elements::Scopes',
|
||||
|
||||
'XAddrs' => 'WSDiscovery::Elements::XAddrs',
|
||||
'XAddrs' => 'WSDiscovery10::Elements::XAddrs',
|
||||
|
||||
'MetadataVersion' => 'WSDiscovery::Elements::MetadataVersion',
|
||||
'MetadataVersion' => 'WSDiscovery10::Elements::MetadataVersion',
|
||||
|
||||
},
|
||||
{
|
||||
|
|
@ -80,12 +80,12 @@ __PACKAGE__->_factory(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Types::ResolveMatchType
|
||||
WSDiscovery10::Types::ResolveMatchType
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined complexType
|
||||
ResolveMatchType from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
ResolveMatchType from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -155,13 +155,15 @@ perl code only, XML output uses the original name:
|
|||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::ResolveMatchType
|
||||
EndpointReference => { # WSDiscovery::Types::EndpointReferenceType
|
||||
{ # WSDiscovery10::Types::ResolveMatchType
|
||||
EndpointReference => { # WSDiscovery10::Types::EndpointReferenceType
|
||||
Address => { value => $some_value },
|
||||
ReferenceParameters => { # WSDiscovery::Types::ReferenceParametersType
|
||||
ReferenceProperties => { # WSDiscovery10::Types::ReferencePropertiesType
|
||||
},
|
||||
Metadata => { # WSDiscovery::Types::MetadataType
|
||||
ReferenceParameters => { # WSDiscovery10::Types::ReferenceParametersType
|
||||
},
|
||||
PortType => { value => $some_value },
|
||||
ServiceName => { value => $some_value },
|
||||
},
|
||||
Types => $some_value, # QNameListType
|
||||
Scopes => { value => $some_value },
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
package WSDiscovery::Types::ResolveMatchesType;
|
||||
package WSDiscovery10::Types::ResolveMatchesType;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
|
||||
__PACKAGE__->_set_element_form_qualified(0);
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01' };
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery' };
|
||||
|
||||
our $XML_ATTRIBUTE_CLASS;
|
||||
undef $XML_ATTRIBUTE_CLASS;
|
||||
|
|
@ -31,7 +31,7 @@ __PACKAGE__->_factory(
|
|||
'ResolveMatch' => \%ResolveMatch_of,
|
||||
},
|
||||
{
|
||||
'ResolveMatch' => 'WSDiscovery::Types::ResolveMatchType',
|
||||
'ResolveMatch' => 'WSDiscovery10::Types::ResolveMatchType',
|
||||
},
|
||||
{
|
||||
|
||||
|
|
@ -55,12 +55,12 @@ __PACKAGE__->_factory(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Types::ResolveMatchesType
|
||||
WSDiscovery10::Types::ResolveMatchesType
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined complexType
|
||||
ResolveMatchesType from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
ResolveMatchesType from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -88,14 +88,16 @@ methods:
|
|||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::ResolveMatchesType
|
||||
ResolveMatch => { # WSDiscovery::Types::ResolveMatchType
|
||||
EndpointReference => { # WSDiscovery::Types::EndpointReferenceType
|
||||
{ # WSDiscovery10::Types::ResolveMatchesType
|
||||
ResolveMatch => { # WSDiscovery10::Types::ResolveMatchType
|
||||
EndpointReference => { # WSDiscovery10::Types::EndpointReferenceType
|
||||
Address => { value => $some_value },
|
||||
ReferenceParameters => { # WSDiscovery::Types::ReferenceParametersType
|
||||
ReferenceProperties => { # WSDiscovery10::Types::ReferencePropertiesType
|
||||
},
|
||||
Metadata => { # WSDiscovery::Types::MetadataType
|
||||
ReferenceParameters => { # WSDiscovery10::Types::ReferenceParametersType
|
||||
},
|
||||
PortType => { value => $some_value },
|
||||
ServiceName => { value => $some_value },
|
||||
},
|
||||
Types => $some_value, # QNameListType
|
||||
Scopes => { value => $some_value },
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
package WSDiscovery::Types::ResolveType;
|
||||
package WSDiscovery10::Types::ResolveType;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
|
||||
__PACKAGE__->_set_element_form_qualified(0);
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01' };
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery' };
|
||||
|
||||
our $XML_ATTRIBUTE_CLASS;
|
||||
undef $XML_ATTRIBUTE_CLASS;
|
||||
|
|
@ -31,7 +31,7 @@ __PACKAGE__->_factory(
|
|||
'EndpointReference' => \%EndpointReference_of,
|
||||
},
|
||||
{
|
||||
'EndpointReference' => 'WSDiscovery::Elements::EndpointReference',
|
||||
'EndpointReference' => 'WSDiscovery10::Elements::EndpointReference',
|
||||
|
||||
},
|
||||
{
|
||||
|
|
@ -56,12 +56,12 @@ __PACKAGE__->_factory(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Types::ResolveType
|
||||
WSDiscovery10::Types::ResolveType
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined complexType
|
||||
ResolveType from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
ResolveType from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -95,13 +95,15 @@ perl code only, XML output uses the original name:
|
|||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::ResolveType
|
||||
EndpointReference => { # WSDiscovery::Types::EndpointReferenceType
|
||||
{ # WSDiscovery10::Types::ResolveType
|
||||
EndpointReference => { # WSDiscovery10::Types::EndpointReferenceType
|
||||
Address => { value => $some_value },
|
||||
ReferenceParameters => { # WSDiscovery::Types::ReferenceParametersType
|
||||
ReferenceProperties => { # WSDiscovery10::Types::ReferencePropertiesType
|
||||
},
|
||||
Metadata => { # WSDiscovery::Types::MetadataType
|
||||
ReferenceParameters => { # WSDiscovery10::Types::ReferenceParametersType
|
||||
},
|
||||
PortType => { value => $some_value },
|
||||
ServiceName => { value => $some_value },
|
||||
},
|
||||
},
|
||||
|
||||
|
|
@ -0,0 +1,73 @@
|
|||
package WSDiscovery10::Types::RetryAfterType;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
|
||||
__PACKAGE__->_set_element_form_qualified(0);
|
||||
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2004/08/addressing' };
|
||||
|
||||
our $XML_ATTRIBUTE_CLASS;
|
||||
undef $XML_ATTRIBUTE_CLASS;
|
||||
|
||||
sub __get_attr_class {
|
||||
return $XML_ATTRIBUTE_CLASS;
|
||||
}
|
||||
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::ComplexType
|
||||
SOAP::WSDL::XSD::Typelib::Builtin::nonNegativeInteger
|
||||
);
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
1;
|
||||
|
||||
|
||||
=pod
|
||||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery10::Types::RetryAfterType
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined complexType
|
||||
RetryAfterType from the namespace http://schemas.xmlsoap.org/ws/2004/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
=head2 PROPERTIES
|
||||
|
||||
The following properties may be accessed using get_PROPERTY / set_PROPERTY
|
||||
methods:
|
||||
|
||||
=over
|
||||
|
||||
|
||||
|
||||
=back
|
||||
|
||||
|
||||
=head1 METHODS
|
||||
|
||||
=head2 new
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ value => $some_value },
|
||||
|
||||
|
||||
|
||||
|
||||
=head1 AUTHOR
|
||||
|
||||
Generated by SOAP::WSDL
|
||||
|
||||
=cut
|
||||
|
||||
|
|
@ -1,13 +1,13 @@
|
|||
package WSDiscovery::Types::ScopesType;
|
||||
package WSDiscovery10::Types::ScopesType;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
|
||||
__PACKAGE__->_set_element_form_qualified(0);
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01' };
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery' };
|
||||
|
||||
our $XML_ATTRIBUTE_CLASS = 'WSDiscovery::Types::ScopesType::_ScopesType::XmlAttr';
|
||||
our $XML_ATTRIBUTE_CLASS = 'WSDiscovery10::Types::ScopesType::_ScopesType::XmlAttr';
|
||||
|
||||
sub __get_attr_class {
|
||||
return $XML_ATTRIBUTE_CLASS;
|
||||
|
|
@ -15,10 +15,10 @@ sub __get_attr_class {
|
|||
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::ComplexType
|
||||
WSDiscovery::Types::UriListType
|
||||
WSDiscovery10::Types::UriListType
|
||||
);
|
||||
|
||||
package WSDiscovery::Types::ScopesType::_ScopesType::XmlAttr;
|
||||
package WSDiscovery10::Types::ScopesType::_ScopesType::XmlAttr;
|
||||
use base qw(SOAP::WSDL::XSD::Typelib::AttributeSet);
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
|
@ -50,12 +50,12 @@ __PACKAGE__->_factory(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Types::ScopesType
|
||||
WSDiscovery10::Types::ScopesType
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined complexType
|
||||
ScopesType from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
ScopesType from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -91,7 +91,7 @@ See the correspondent WSDL/XML Schema if in question.
|
|||
|
||||
This class has additional attributes, accessibly via the C<attr()> method.
|
||||
|
||||
attr() returns an object of the class WSDiscovery::Types::ScopesType::_ScopesType::XmlAttr.
|
||||
attr() returns an object of the class WSDiscovery10::Types::ScopesType::_ScopesType::XmlAttr.
|
||||
|
||||
The following attributes can be accessed on this object via the corresponding
|
||||
get_/set_ methods:
|
||||
|
|
@ -1,11 +1,11 @@
|
|||
package WSDiscovery::Types::SecurityType;
|
||||
package WSDiscovery10::Types::SecurityType;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
|
||||
__PACKAGE__->_set_element_form_qualified(0);
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01' };
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery' };
|
||||
|
||||
our $XML_ATTRIBUTE_CLASS;
|
||||
undef $XML_ATTRIBUTE_CLASS;
|
||||
|
|
@ -31,7 +31,7 @@ __PACKAGE__->_factory(
|
|||
'Sig' => \%Sig_of,
|
||||
},
|
||||
{
|
||||
'Sig' => 'WSDiscovery::Elements::Sig',
|
||||
'Sig' => 'WSDiscovery10::Elements::Sig',
|
||||
|
||||
},
|
||||
{
|
||||
|
|
@ -56,12 +56,12 @@ __PACKAGE__->_factory(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Types::SecurityType
|
||||
WSDiscovery10::Types::SecurityType
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined complexType
|
||||
SecurityType from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
SecurityType from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -95,8 +95,8 @@ perl code only, XML output uses the original name:
|
|||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::SecurityType
|
||||
Sig => { # WSDiscovery::Types::SigType
|
||||
{ # WSDiscovery10::Types::SecurityType
|
||||
Sig => { # WSDiscovery10::Types::SigType
|
||||
},
|
||||
},
|
||||
|
||||
|
|
@ -0,0 +1,118 @@
|
|||
package WSDiscovery10::Types::ServiceNameType;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
|
||||
__PACKAGE__->_set_element_form_qualified(0);
|
||||
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2004/08/addressing' };
|
||||
|
||||
our $XML_ATTRIBUTE_CLASS = 'WSDiscovery10::Types::ServiceNameType::_ServiceNameType::XmlAttr';
|
||||
|
||||
sub __get_attr_class {
|
||||
return $XML_ATTRIBUTE_CLASS;
|
||||
}
|
||||
|
||||
use base qw(
|
||||
SOAP::WSDL::XSD::Typelib::ComplexType
|
||||
SOAP::WSDL::XSD::Typelib::Builtin::QName
|
||||
);
|
||||
|
||||
package WSDiscovery10::Types::ServiceNameType::_ServiceNameType::XmlAttr;
|
||||
use base qw(SOAP::WSDL::XSD::Typelib::AttributeSet);
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
||||
my %PortName_of :ATTR(:get<PortName>);
|
||||
|
||||
__PACKAGE__->_factory(
|
||||
[ qw(
|
||||
PortName
|
||||
) ],
|
||||
{
|
||||
|
||||
PortName => \%PortName_of,
|
||||
},
|
||||
{
|
||||
PortName => 'SOAP::WSDL::XSD::Typelib::Builtin::NCName',
|
||||
}
|
||||
);
|
||||
|
||||
} # end BLOCK
|
||||
|
||||
|
||||
|
||||
|
||||
1;
|
||||
|
||||
|
||||
=pod
|
||||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery10::Types::ServiceNameType
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined complexType
|
||||
ServiceNameType from the namespace http://schemas.xmlsoap.org/ws/2004/08/addressing.
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
=head2 PROPERTIES
|
||||
|
||||
The following properties may be accessed using get_PROPERTY / set_PROPERTY
|
||||
methods:
|
||||
|
||||
=over
|
||||
|
||||
|
||||
|
||||
=back
|
||||
|
||||
|
||||
=head1 METHODS
|
||||
|
||||
=head2 new
|
||||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ value => $some_value },
|
||||
|
||||
|
||||
|
||||
=head2 attr
|
||||
|
||||
NOTE: Attribute documentation is experimental, and may be inaccurate.
|
||||
See the correspondent WSDL/XML Schema if in question.
|
||||
|
||||
This class has additional attributes, accessibly via the C<attr()> method.
|
||||
|
||||
attr() returns an object of the class WSDiscovery10::Types::ServiceNameType::_ServiceNameType::XmlAttr.
|
||||
|
||||
The following attributes can be accessed on this object via the corresponding
|
||||
get_/set_ methods:
|
||||
|
||||
=over
|
||||
|
||||
=item * PortName
|
||||
|
||||
|
||||
|
||||
This attribute is of type L<SOAP::WSDL::XSD::Typelib::Builtin::NCName|SOAP::WSDL::XSD::Typelib::Builtin::NCName>.
|
||||
|
||||
|
||||
=back
|
||||
|
||||
|
||||
|
||||
|
||||
=head1 AUTHOR
|
||||
|
||||
Generated by SOAP::WSDL
|
||||
|
||||
=cut
|
||||
|
||||
|
|
@ -1,13 +1,13 @@
|
|||
package WSDiscovery::Types::SigType;
|
||||
package WSDiscovery10::Types::SigType;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
|
||||
__PACKAGE__->_set_element_form_qualified(0);
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01' };
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery' };
|
||||
|
||||
our $XML_ATTRIBUTE_CLASS = 'WSDiscovery::Types::SigType::_SigType::XmlAttr';
|
||||
our $XML_ATTRIBUTE_CLASS = 'WSDiscovery10::Types::SigType::_SigType::XmlAttr';
|
||||
|
||||
sub __get_attr_class {
|
||||
return $XML_ATTRIBUTE_CLASS;
|
||||
|
|
@ -38,7 +38,7 @@ __PACKAGE__->_factory(
|
|||
|
||||
|
||||
|
||||
package WSDiscovery::Types::SigType::_SigType::XmlAttr;
|
||||
package WSDiscovery10::Types::SigType::_SigType::XmlAttr;
|
||||
use base qw(SOAP::WSDL::XSD::Typelib::AttributeSet);
|
||||
|
||||
{ # BLOCK to scope variables
|
||||
|
|
@ -85,12 +85,12 @@ __PACKAGE__->_factory(
|
|||
|
||||
=head1 NAME
|
||||
|
||||
WSDiscovery::Types::SigType
|
||||
WSDiscovery10::Types::SigType
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined complexType
|
||||
SigType from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
SigType from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -115,7 +115,7 @@ methods:
|
|||
|
||||
Constructor. The following data structure may be passed to new():
|
||||
|
||||
{ # WSDiscovery::Types::SigType
|
||||
{ # WSDiscovery10::Types::SigType
|
||||
},
|
||||
|
||||
|
||||
|
|
@ -127,7 +127,7 @@ See the correspondent WSDL/XML Schema if in question.
|
|||
|
||||
This class has additional attributes, accessibly via the C<attr()> method.
|
||||
|
||||
attr() returns an object of the class WSDiscovery::Types::SigType::_SigType::XmlAttr.
|
||||
attr() returns an object of the class WSDiscovery10::Types::SigType::_SigType::XmlAttr.
|
||||
|
||||
The following attributes can be accessed on this object via the corresponding
|
||||
get_/set_ methods:
|
||||
|
|
@ -1,8 +1,8 @@
|
|||
package WSDiscovery::Types::UriListType;
|
||||
package WSDiscovery10::Types::UriListType;
|
||||
use strict;
|
||||
use warnings;
|
||||
|
||||
sub get_xmlns { 'http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01'};
|
||||
sub get_xmlns { 'http://schemas.xmlsoap.org/ws/2005/04/discovery'};
|
||||
|
||||
|
||||
# list derivation
|
||||
|
|
@ -28,7 +28,7 @@ __END__
|
|||
=head1 DESCRIPTION
|
||||
|
||||
Perl data type class for the XML Schema defined simpleType
|
||||
UriListType from the namespace http://docs.oasis-open.org/ws-dd/ns/discovery/2009/01.
|
||||
UriListType from the namespace http://schemas.xmlsoap.org/ws/2005/04/discovery.
|
||||
|
||||
|
||||
|
||||
|
|
@ -28,9 +28,9 @@ use Getopt::Std;
|
|||
|
||||
require ONVIF::Client;
|
||||
|
||||
require WSDiscovery::Interfaces::WSDiscovery::WSDiscoveryPort;
|
||||
require WSDiscovery::Elements::Types;
|
||||
require WSDiscovery::Elements::Scopes;
|
||||
require WSDiscovery10::Interfaces::WSDiscovery::WSDiscoveryPort;
|
||||
require WSDiscovery10::Elements::Types;
|
||||
require WSDiscovery10::Elements::Scopes;
|
||||
|
||||
require WSDiscovery::TransportUDP;
|
||||
|
||||
|
|
@ -95,7 +95,7 @@ sub deserialize_message
|
|||
|
||||
sub interpret_messages
|
||||
{
|
||||
my ($svc_discover, @responses, %services) = @_;
|
||||
my ($svc_discover, $services, @responses ) = @_;
|
||||
|
||||
foreach my $response ( @responses ) {
|
||||
|
||||
|
|
@ -106,7 +106,7 @@ sub interpret_messages
|
|||
my $result = deserialize_message($svc_discover, $response);
|
||||
if(not $result) {
|
||||
if($verbose) {
|
||||
print "Error deserializing message:\n" . $result . "\n";
|
||||
print "Error deserializing message. No message returned from deserializer.\n";
|
||||
}
|
||||
next;
|
||||
}
|
||||
|
|
@ -114,15 +114,23 @@ sub interpret_messages
|
|||
my $xaddr;
|
||||
foreach my $l_xaddr (split ' ', $result->get_ProbeMatch()->get_XAddrs()) {
|
||||
# find IPv4 address
|
||||
if($l_xaddr =~ m|//[0-9]+\.[0-9]+\.[0-9]+\.[0-9]+/|) {
|
||||
if($verbose) {
|
||||
print "l_xaddr = $l_xaddr\n";
|
||||
}
|
||||
if($l_xaddr =~ m|//[0-9]+\.[0-9]+\.[0-9]+\.[0-9]+[:/]|) {
|
||||
$xaddr = $l_xaddr;
|
||||
last;
|
||||
} else {
|
||||
print STDERR "Unable to find IPv4 address from xaddr $l_xaddr\n";
|
||||
}
|
||||
}
|
||||
|
||||
# No usable address found
|
||||
next if not $xaddr;
|
||||
|
||||
# ignore multiple responses from one service
|
||||
next if defined $services{$xaddr};
|
||||
$services{$xaddr} = 1;
|
||||
next if defined $services->{$xaddr};
|
||||
$services->{$xaddr} = 1;
|
||||
|
||||
print "$xaddr, " . $svc_discover->get_soap_version() . ", ";
|
||||
|
||||
|
|
@ -163,7 +171,7 @@ sub discover
|
|||
if($verbose) {
|
||||
print "Probing for SOAP 1.1\n"
|
||||
}
|
||||
my $svc_discover = WSDiscovery::Interfaces::WSDiscovery::WSDiscoveryPort->new({
|
||||
my $svc_discover = WSDiscovery10::Interfaces::WSDiscovery::WSDiscoveryPort->new({
|
||||
# no_dispatch => '1',
|
||||
});
|
||||
$svc_discover->set_soap_version('1.1');
|
||||
|
|
@ -176,13 +184,13 @@ sub discover
|
|||
);
|
||||
# print $result . "\n";
|
||||
|
||||
interpret_messages($svc_discover, \@responses, \%services);
|
||||
interpret_messages($svc_discover, \%services, @responses);
|
||||
@responses = ();
|
||||
|
||||
if($verbose) {
|
||||
print "Probing for SOAP 1.2\n"
|
||||
}
|
||||
$svc_discover = WSDiscovery::Interfaces::WSDiscovery::WSDiscoveryPort->new({
|
||||
$svc_discover = WSDiscovery10::Interfaces::WSDiscovery::WSDiscoveryPort->new({
|
||||
# no_dispatch => '1',
|
||||
});
|
||||
$svc_discover->set_soap_version('1.2');
|
||||
|
|
@ -195,7 +203,7 @@ sub discover
|
|||
);
|
||||
# print $result . "\n";
|
||||
|
||||
interpret_messages($svc_discover, @responses, \%services);
|
||||
interpret_messages($svc_discover, \%services, @responses);
|
||||
}
|
||||
|
||||
|
||||
|
|
@ -224,16 +232,21 @@ sub profiles
|
|||
$profile->get_VideoEncoderConfiguration()->get_RateControl()->get_FrameRateLimit() .
|
||||
", ";
|
||||
|
||||
$result = $client->get_endpoint('media')->GetStreamUri( {
|
||||
StreamSetup => { # ONVIF::Media::Types::StreamSetup
|
||||
Stream => 'RTP_unicast', # StreamType
|
||||
Transport => { # ONVIF::Media::Types::Transport
|
||||
Protocol => 'RTSP', # TransportProtocol
|
||||
},
|
||||
},
|
||||
ProfileToken => $token, # ReferenceToken
|
||||
} ,, );
|
||||
die $result if not $result;
|
||||
# Specification gives conflicting values for unicast stream types, try both.
|
||||
# http://www.onvif.org/onvif/ver10/media/wsdl/media.wsdl#op.GetStreamUri
|
||||
foreach my $streamtype ( 'RTP_unicast', 'RTP-Unicast' ) {
|
||||
$result = $client->get_endpoint('media')->GetStreamUri( {
|
||||
StreamSetup => { # ONVIF::Media::Types::StreamSetup
|
||||
Stream => $streamtype, # StreamType
|
||||
Transport => { # ONVIF::Media::Types::Transport
|
||||
Protocol => 'RTSP', # TransportProtocol
|
||||
},
|
||||
},
|
||||
ProfileToken => $token, # ReferenceToken
|
||||
} ,, );
|
||||
last if $result;
|
||||
}
|
||||
die $result if not $result;
|
||||
# print $result . "\n";
|
||||
|
||||
print $result->get_MediaUri()->get_Uri() .
|
||||
|
|
|
|||
|
|
@ -345,10 +345,10 @@ our @options =
|
|||
already logged in. As authentication hashes are time and,
|
||||
optionally, IP limited this can allow short-term access to
|
||||
ZoneMinder screens from other web pages etc. In order to use
|
||||
this the calling application will hae to generate the
|
||||
this the calling application will have to generate the
|
||||
authentication hash itself and ensure it is valid. If you use
|
||||
this option you should ensure that you have modified the
|
||||
ZM_AUTH_HASH_SECRET to somethign unique to your system.
|
||||
ZM_AUTH_HASH_SECRET to something unique to your system.
|
||||
"),
|
||||
requires => [
|
||||
{ name=>"ZM_OPT_USE_AUTH", value=>"yes" },
|
||||
|
|
|
|||
|
|
@ -935,10 +935,12 @@ sub uploadArchFile
|
|||
if $Config{ZM_UPLOAD_PORT};
|
||||
$sftpOptions{timeout} = $Config{ZM_UPLOAD_TIMEOUT}
|
||||
if $Config{ZM_UPLOAD_TIMEOUT};
|
||||
$sftpOptions{more} = [ '-o'=>'StrictHostKeyChecking=no' ]
|
||||
my @more_ssh_args;
|
||||
push @more_ssh_args, ['-o'=>'StrictHostKeyChecking=no']
|
||||
if ! $Config{ZM_UPLOAD_STRICT};
|
||||
$Net::SFTP::Foreign::debug = -1
|
||||
push @more_ssh_args, ['-v']
|
||||
if $Config{ZM_UPLOAD_DEBUG};
|
||||
$sftpOptions{more} = [@more_ssh_args];
|
||||
my $sftp = Net::SFTP::Foreign->new( $Config{ZM_UPLOAD_HOST}, %sftpOptions );
|
||||
if ( $sftp->error )
|
||||
{
|
||||
|
|
|
|||
|
|
@ -76,7 +76,7 @@ if ( $Config{ZM_TELEMETRY_DATA} )
|
|||
while( 1 ) {
|
||||
my $now = time();
|
||||
if ( ($now-$lastCheck) > CHECK_INTERVAL ) {
|
||||
Info( "Colleting data to send to ZoneMinder Telemetry server." );
|
||||
Info( "Collecting data to send to ZoneMinder Telemetry server." );
|
||||
my $dbh = zmDbConnect();
|
||||
# Build the telemetry hash
|
||||
# We should keep *BSD systems in mind when calling system commands
|
||||
|
|
|
|||
|
|
@ -122,13 +122,16 @@ Event::Event( Monitor *p_monitor, struct timeval p_start_time, const std::string
|
|||
|
||||
struct stat statbuf;
|
||||
errno = 0;
|
||||
stat( path, &statbuf );
|
||||
if ( errno == ENOENT || errno == ENOTDIR )
|
||||
{
|
||||
if ( mkdir( path, 0755 ) )
|
||||
{
|
||||
Fatal( "Can't mkdir %s: %s", path, strerror(errno));
|
||||
}
|
||||
if ( stat( path, &statbuf ) ) {
|
||||
if ( errno == ENOENT || errno == ENOTDIR )
|
||||
{
|
||||
if ( mkdir( path, 0755 ) )
|
||||
{
|
||||
Fatal( "Can't mkdir %s: %s", path, strerror(errno));
|
||||
}
|
||||
} else {
|
||||
Warning( "Error stat'ing %s, may be fatal. error is %s", path, strerror(errno));
|
||||
}
|
||||
}
|
||||
if ( i == 2 )
|
||||
strncpy( date_path, path, sizeof(date_path) );
|
||||
|
|
|
|||
|
|
@ -262,6 +262,10 @@ int FfmpegCamera::OpenFfmpeg() {
|
|||
}
|
||||
|
||||
}
|
||||
else
|
||||
{
|
||||
Warning( "Unable to parse ffmpeg option %d '%s', expecting key=value", i, opVect[i].c_str() );
|
||||
}
|
||||
}
|
||||
Debug ( 1, "Calling avformat_open_input" );
|
||||
|
||||
|
|
@ -277,6 +281,11 @@ int FfmpegCamera::OpenFfmpeg() {
|
|||
return -1;
|
||||
}
|
||||
|
||||
AVDictionaryEntry *e;
|
||||
if ((e = av_dict_get(opts, "", NULL, AV_DICT_IGNORE_SUFFIX)) != NULL) {
|
||||
Warning( "Option %s not recognized by ffmpeg", e->key);
|
||||
}
|
||||
|
||||
mIsOpening = false;
|
||||
Debug ( 1, "Opened input" );
|
||||
|
||||
|
|
|
|||
|
|
@ -324,10 +324,10 @@ Monitor::Monitor(
|
|||
images( 0 ),
|
||||
privacy_bitmask( NULL )
|
||||
{
|
||||
strncpy( name, p_name, sizeof(name) );
|
||||
strncpy( name, p_name, sizeof(name)-1 );
|
||||
|
||||
strncpy( event_prefix, p_event_prefix, sizeof(event_prefix) );
|
||||
strncpy( label_format, p_label_format, sizeof(label_format) );
|
||||
strncpy( event_prefix, p_event_prefix, sizeof(event_prefix)-1 );
|
||||
strncpy( label_format, p_label_format, sizeof(label_format)-1 );
|
||||
|
||||
// Change \n to actual line feeds
|
||||
char *token_ptr = label_format;
|
||||
|
|
|
|||
|
|
@ -310,9 +310,6 @@ protected:
|
|||
|
||||
const unsigned char *privacy_bitmask;
|
||||
|
||||
|
||||
int iDoNativeMotDet;
|
||||
|
||||
int n_linked_monitors;
|
||||
MonitorLink **linked_monitors;
|
||||
|
||||
|
|
|
|||
|
|
@ -201,8 +201,8 @@ std::string Authenticator::computeDigestResponse(std::string &method, std::strin
|
|||
return md5HexBuf;
|
||||
#else // HAVE_DECL_MD5
|
||||
Error( "You need to build with gnutls or openssl installed to use digest authentication" );
|
||||
#endif // HAVE_DECL_MD5
|
||||
return( 0 );
|
||||
#endif // HAVE_DECL_MD5
|
||||
}
|
||||
|
||||
void Authenticator::checkAuthResponse(std::string &response) {
|
||||
|
|
|
|||
|
|
@ -294,7 +294,12 @@ void StreamBase::openComms()
|
|||
snprintf( sock_path_lock, sizeof(sock_path_lock), "%s/zms-%06d.lock", config.path_socks, connkey);
|
||||
|
||||
lock_fd = open(sock_path_lock, O_CREAT|O_WRONLY, S_IRUSR | S_IWUSR);
|
||||
if (lock_fd <= 0 || flock(lock_fd, LOCK_EX) != 0)
|
||||
if ( lock_fd <= 0 )
|
||||
{
|
||||
Error("Unable to open sock lock file %s: %s", sock_path_lock, strerror(errno) );
|
||||
lock_fd = 0;
|
||||
}
|
||||
else if ( flock(lock_fd, LOCK_EX) != 0 )
|
||||
{
|
||||
Error("Unable to lock sock lock file %s: %s", sock_path_lock, strerror(errno) );
|
||||
|
||||
|
|
|
|||
|
|
@ -1,33 +0,0 @@
|
|||
# Define the line ending behavior of the different file extensions
|
||||
# Set default behaviour, in case users don't have core.autocrlf set.
|
||||
* text=auto
|
||||
|
||||
# Explicitly declare text files we want to always be normalized and converted
|
||||
# to native line endings on checkout.
|
||||
*.php text
|
||||
*.default text
|
||||
*.ctp text
|
||||
*.sql text
|
||||
*.md text
|
||||
*.po text
|
||||
*.js text
|
||||
*.css text
|
||||
*.ini text
|
||||
*.properties text
|
||||
*.txt text
|
||||
*.xml text
|
||||
*.yml text
|
||||
.htaccess text
|
||||
|
||||
# Declare files that will always have CRLF line endings on checkout.
|
||||
*.bat eol=crlf
|
||||
|
||||
# Declare files that will always have LF line endings on checkout.
|
||||
*.pem eol=lf
|
||||
|
||||
# Denote all files that are truly binary and should not be modified.
|
||||
*.png binary
|
||||
*.jpg binary
|
||||
*.gif binary
|
||||
*.ico binary
|
||||
*.mo binary
|
||||
|
|
@ -1,21 +0,0 @@
|
|||
# User specific & automatically generated files #
|
||||
#################################################
|
||||
/app/Config/database.php
|
||||
/app/tmp
|
||||
/lib/Cake/Console/Templates/skel/tmp/
|
||||
/plugins
|
||||
/vendors
|
||||
/build
|
||||
/dist
|
||||
/tags
|
||||
|
||||
# OS generated files #
|
||||
######################
|
||||
.DS_Store
|
||||
.DS_Store?
|
||||
._*
|
||||
.Spotlight-V100
|
||||
.Trashes
|
||||
Icon?
|
||||
ehthumbs.db
|
||||
Thumbs.db
|
||||
|
|
@ -890,14 +890,14 @@ function zmVlang( $langVarArray, $count )
|
|||
// So for example, to override the help text for ZM_LANG_DEFAULT do
|
||||
$OLANG = array(
|
||||
'OPTIONS_FFMPEG' => array(
|
||||
'Help' => "Parameters in this field are passwd on to FFmpeg. Multiple parameters can be separated by ,~~ ".
|
||||
'Help' => "Parameters in this field are passed on to FFmpeg. Multiple parameters can be separated by ,~~ ".
|
||||
"Examples (do not enter quotes)~~~~".
|
||||
"\"allowed_media_types=video\" Set datatype to request fromcam (audio, video, data)~~~~".
|
||||
"\"reorder_queue_size=nnn\" Set number of packets to buffer for handling of reordered packets~~~~".
|
||||
"\"loglevel=debug\" Set verbosiy of FFmpeg (quiet, panic, fatal, error, warning, info, verbose, debug)"
|
||||
"\"loglevel=debug\" Set verbosity of FFmpeg (quiet, panic, fatal, error, warning, info, verbose, debug)"
|
||||
),
|
||||
'OPTIONS_LIBVLC' => array(
|
||||
'Help' => "Parameters in this field are passwd on to libVLC. Multiple parameters can be separated by ,~~ ".
|
||||
'Help' => "Parameters in this field are passed on to libVLC. Multiple parameters can be separated by ,~~ ".
|
||||
"Examples (do not enter quotes)~~~~".
|
||||
"\"--rtp-client-port=nnn\" Set local port to use for rtp data~~~~".
|
||||
"\"--verbose=2\" Set verbosity of libVLC"
|
||||
|
|
|
|||
|
|
@ -885,14 +885,14 @@ function zmVlang( $langVarArray, $count )
|
|||
// So for example, to override the help text for ZM_LANG_DEFAULT do
|
||||
$OLANG = array(
|
||||
'OPTIONS_FFMPEG' => array(
|
||||
'Help' => "Parameters in this field are passwd on to FFmpeg. Multiple parameters can be separated by ,~~ ".
|
||||
'Help' => "Parameters in this field are passed on to FFmpeg. Multiple parameters can be separated by ,~~ ".
|
||||
"Examples (do not enter quotes)~~~~".
|
||||
"\"allowed_media_types=video\" Set datatype to request fromcam (audio, video, data)~~~~".
|
||||
"\"reorder_queue_size=nnn\" Set number of packets to buffer for handling of reordered packets~~~~".
|
||||
"\"loglevel=debug\" Set verbosiy of FFmpeg (quiet, panic, fatal, error, warning, info, verbose, debug)"
|
||||
"\"loglevel=debug\" Set verbosity of FFmpeg (quiet, panic, fatal, error, warning, info, verbose, debug)"
|
||||
),
|
||||
'OPTIONS_LIBVLC' => array(
|
||||
'Help' => "Parameters in this field are passwd on to libVLC. Multiple parameters can be separated by ,~~ ".
|
||||
'Help' => "Parameters in this field are passed on to libVLC. Multiple parameters can be separated by ,~~ ".
|
||||
"Examples (do not enter quotes)~~~~".
|
||||
"\"--rtp-client-port=nnn\" Set local port to use for rtp data~~~~".
|
||||
"\"--verbose=2\" Set verbosity of libVLC"
|
||||
|
|
|
|||
|
|
@ -886,14 +886,14 @@ function zmVlang( $langVarArray, $count )
|
|||
// So for example, to override the help text for ZM_LANG_DEFAULT do
|
||||
$OLANG = array(
|
||||
'OPTIONS_FFMPEG' => array(
|
||||
'Help' => "Parameters in this field are passwd on to FFmpeg. Multiple parameters can be separated by ,~~ ".
|
||||
'Help' => "Parameters in this field are passed on to FFmpeg. Multiple parameters can be separated by ,~~ ".
|
||||
"Examples (do not enter quotes)~~~~".
|
||||
"\"allowed_media_types=video\" Set datatype to request fromcam (audio, video, data)~~~~".
|
||||
"\"reorder_queue_size=nnn\" Set number of packets to buffer for handling of reordered packets~~~~".
|
||||
"\"loglevel=debug\" Set verbosiy of FFmpeg (quiet, panic, fatal, error, warning, info, verbose, debug)"
|
||||
"\"loglevel=debug\" Set verbosity of FFmpeg (quiet, panic, fatal, error, warning, info, verbose, debug)"
|
||||
),
|
||||
'OPTIONS_LIBVLC' => array(
|
||||
'Help' => "Parameters in this field are passwd on to libVLC. Multiple parameters can be separated by ,~~ ".
|
||||
'Help' => "Parameters in this field are passed on to libVLC. Multiple parameters can be separated by ,~~ ".
|
||||
"Examples (do not enter quotes)~~~~".
|
||||
"\"--rtp-client-port=nnn\" Set local port to use for rtp data~~~~".
|
||||
"\"--verbose=2\" Set verbosity of libVLC"
|
||||
|
|
|
|||
|
|
@ -146,7 +146,7 @@ $SLANG = array(
|
|||
'BadLabelY' => 'Die y-Koordinate der Bezeichnung muss ganzzahlig 0 oder größer sein',
|
||||
'BadMaxFPS' => 'Maximum-FPS muss eine positive Ganzzahl oder eine Gleitkommazahl sein',
|
||||
'BadMotionFrameSkip' => 'Bewegungsrahmen Skip-Zählung muß eine ganze Zahl von null oder mehr betragen,',
|
||||
'BadNameChars' => 'Namen dürfen nur aus Buchstaben, Zahlen und Trenn- oder Unterstrichen bestehen',
|
||||
'BadNameChars' => 'Namen dürfen nur aus Buchstaben, Zahlen, Leerzeichen und Trenn- oder Unterstrichen bestehen',
|
||||
'BadPalette' => 'Palette muss auf einen gültigen Wert gesetzt sein', // Added - 2009-03-31
|
||||
'BadPath' => 'Der Pfad muss auf einen gültigen Wert eingestellt sein',
|
||||
'BadPort' => 'Der Port muss auf eine gültige Zahl eingestellt sein',
|
||||
|
|
@ -889,14 +889,14 @@ function zmVlang( $langVarArray, $count )
|
|||
// So for example, to override the help text for ZM_LANG_DEFAULT do
|
||||
$OLANG = array(
|
||||
'OPTIONS_FFMPEG' => array(
|
||||
'Help' => "Parameters in this field are passwd on to FFmpeg. Multiple parameters can be separated by ,~~ ".
|
||||
'Help' => "Parameters in this field are passed on to FFmpeg. Multiple parameters can be separated by ,~~ ".
|
||||
"Examples (do not enter quotes)~~~~".
|
||||
"\"allowed_media_types=video\" Set datatype to request fromcam (audio, video, data)~~~~".
|
||||
"\"reorder_queue_size=nnn\" Set number of packets to buffer for handling of reordered packets~~~~".
|
||||
"\"loglevel=debug\" Set verbosiy of FFmpeg (quiet, panic, fatal, error, warning, info, verbose, debug)"
|
||||
"\"loglevel=debug\" Set verbosity of FFmpeg (quiet, panic, fatal, error, warning, info, verbose, debug)"
|
||||
),
|
||||
'OPTIONS_LIBVLC' => array(
|
||||
'Help' => "Parameters in this field are passwd on to libVLC. Multiple parameters can be separated by ,~~ ".
|
||||
'Help' => "Parameters in this field are passed on to libVLC. Multiple parameters can be separated by ,~~ ".
|
||||
"Examples (do not enter quotes)~~~~".
|
||||
"\"--rtp-client-port=nnn\" Set local port to use for rtp data~~~~".
|
||||
"\"--verbose=2\" Set verbosity of libVLC"
|
||||
|
|
|
|||
Some files were not shown because too many files have changed in this diff Show More
Loading…
Reference in New Issue