Matching MySQL data encoding with SOAP data encoding?

If I add authentication data to a MySQL database directly on the
server side and then attempt to compare that data with data from XHTML
forms submitted via SOAP, then the data doesn't match - i.e. the
authentication all works fine at the server side, the only problem is
when the data arrives via SOAP from the web.

Is this an encoding problem?  I guess it would work fine if all the
data was submitted via SOAP (next thing to do), but it would be nice
to be able to work with the data both directly on the server as well
as via SOAP and the web.

Any quick fixes would be appreciated.

Thx in advance,


GSO
http://www.gsowww.uklinux.net/pub

Hi All,

I try to call perl module in @INC from mod_soap perl module (on
Apache) but it looks like I'm not able to call outside perl modules
(which is Net::DNS from my example) Am I missing something? Thanks in
advance.

This is what I've done;

[ SOAP Client ]

#!/usr/bin/perl -w


use SOAP::Lite;


$soap_response = SOAP::Lite
  -> uri('http://server/Demo')
  -> proxy('http://server/SOAP')
  -> hi();

[ SOAP Server using Apache: Demo.pm]

package Demo;


use Net::DNS;

sub hi {
   $ret=Net::DNS->version;
   return "hello, world: $ret";
}

1;

[Apache httpd.conf]

# for mod_soap
<Location /SOAP>
         SetHandler perl-script
         PerlResponseHandler Apache2::SOAP
         PerlSetVar dispatch_to "/var/www/cgi-bin/RPC2/modules,
Module::Demo"
         PerlSetVar options "compress_threshold => 10000"
</Location>

::APPLY JOBS/CALL 4 INTERVIEW/SEND MATRIMONY MSG & WIN MONTHLY GIFTS::

Looking For Better Jobs/Employee??
*************************
-Apply Online/Call 4 Interview FREE And Win Monthly Gift
-Browse Interveiw Calls Free
-Employers Can Post 5 Jobs Free And Also Win Free Gifts
http://www.net4professionals.com


Looking For Bride/Groom
***********************

-Send Matrimony Messages FREE And Win Monthly Gift
-Browse Initiated Contacts Free
http://www.net4matrimonials.com

I just installed soap::lite for apache v.0.60.  I created a simple
hello world script in C# that I need to connect to using perl:


#################################################################
using System;
using System.Collections;
using System.ComponentModel;
using System.Data;
using System.Diagnostics;
using System.Web;
using System.Web.Services;

namespace WebService1
{
	 [WebService(Namespace="http://gv-iis/nih/WebService1")]
	 public class Service1 : System.Web.Services.WebService
	 {
		 public Service1()
		 {
			 //CODEGEN: This call is required by the
ASP.NET Web Services Designer
			 InitializeComponent();
		 }

#region Component Designer generated code
...
...
#endregion


		 [WebMethod]
		 public string HelloWorld()
		 {
			 return "Hello World";
		 }
	 }
}
###############################################################

this is my perl script:
---------------------------------------------------------------
use SOAP::Lite +trace => [transport => \&follow_fault];

my $uri = "http://gv-iis/nih/WebService1";
my $proxy = "$uri/Service1.asmx";

my $soap = SOAP::Lite
    -> uri($uri)
    -> on_action( sub { join '/', $uri, $_[1] })
    -> proxy ($proxy);

my $result = $soap->HelloWorld()->result || die "unable to get
result";

print "returned: $result";

sub follow_fault {
    print '<pre>';
    print_r(\@_);
    print '</pre><br><hr><br>';
}
---------------------------------------------------------------

SOAP sucessfully connects to the web service but there is an error
in transport.  .NET returns a 500
(script) error, the EXACT SAME 500 error as
when I try to view the .asmx file in my web browser.

I am new to .NET so my problem could be there but I really could use
some direction.  Any suggestions would be greatly appreciated.

Any help?

--- In soaplite@yahoogroups.com, Nagarajan M <naga_cit@y...> wrote:

Hi,
How to send multiple request to the SOAP server from
the same client. I tried to invoking two methods using
threads..
Here is the sample code (auto dispatch is used) :
$object->method1(@args); # Running in thread 1
$object->method2(@args); # Running in thread 2
But the method2 executes only after method1 execution is done. But
I want both the methods call to be run in parellel.
Is there way I can make multiple request (simultaneously) from the
same client
by setting some flag on the soap object or by any other means...
Thanks in advance
Nagarajan


---------------------------------
  Enjoy this Diwali with Y! India Click here

--- End forwarded message ---

I am trying to communicate with a .NET web service using soap::lite
for apache v0.60.
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
$soap = SOAP::Lite->new(
    uri => $uri,
    on_action => ( sub { join '/', "$uri", $_[1] }),
    proxy => $proxy);
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
I am calling a HelloWorld method that takes in no parameters and
returns "Hello World!"
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
my $response = $soap->HelloWorld();
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
When I turn off debugging the script just stops processing when it
tries to call the method, when I turn on debugging for transport I
get this:

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
POST http://172.20.140.116/prissmwebinterface/prissmweb.asmx HTTP/1.1
Accept: text/xml
Accept: multipart/*
Content-Length: 470
Content-Type: text/xml; charset=utf-8
SOAPAction: http://172.20.140.116/prissmwebinterface/HelloWorld

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

HTTP/1.1 200 OK
Cache-Control: private, max-age=0
Connection: close
Date: Thu, 08 Dec 2005 20:34:20 GMT
Server: Microsoft-IIS/5.0
Content-Length: 385
Content-Type: text/xml; charset=utf-8
Client-Date: Thu, 08 Dec 2005 20:34:20 GMT
Client-Peer: 172.20.140.116:80
Client-Response-Num: 1
X-AspNet-Version: 1.1.4322
X-Powered-By: ASP.NET

Hello World!

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
So the web service does indeed return hello world but for some reason
the script stops running.  I don't even get a chance to invoke:
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
my $result = $response->result
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~



I'm so close!!! Someone please help!  Thanks in advance.

Hello,

I have spent alot of time and effort reading documentation, looking at
source code, googling and scanning the list archives but have not been
able to discover the answer.

While it is clear how to establish names and types for your function
parameters on the client side for interoperability with other soap
apis, I have not been able to discover how to extract that information
back from the request on the server side.

For example, lets say I wanted to submit a job which could have any
number of optional parameters.

I could do something like:

my @attrs = ();
push @attrs, SOAP::Data->type('string')->name('user')->value('scott');
push @attrs, SOAP::Data->type('int')->name('cpus')->value(12);
SOAP::Lite->uri($uri)->proxy($proxy)-jobSubmit(@attrs)->result;

I can see with a trace that the names and types are making it to the
server:

<?xml version="1.0" encoding="UTF-8"?><SOAP-ENV:Envelope
xmlns:xsi="http://www.w3.org/1999/XMLSchema-instance"
xmlns:SOAP-ENC="http://schemas.xmlsoap.org/soap/encoding/"
xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/"
xmlns:xsd="http://www.w3.org/1999/XMLSchema"
SOAP-ENV:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"><SOAP-ENV:Bod\
y><namesp1:jobSubmit
xmlns:namesp1="http://www.clusterresources.com/Moab/WebServices"><user
xsi:type="xsd:string">scottmo</user><cpus
xsi:type="xsd:int">12</cpus></namesp1:jobStart></SOAP-ENV:Body></SOAP-ENV:Envelo\
pe>

The question is -- now how can I extract the names from the variables
programmatically on the server side without resorting to parsing the
body xml myself (i.e. the scottmo value has the name user and the type
string, etc.)?

I realize there would be ways to encode the name, values into strings,
or use perl data structures like hashes, etc, but I believe the way I
am attempting to use this would be the most direct way to use the SOAP
protocol and would enable a non-perl server to respond to a perl
client request in a straighforward manner.

Thank you for any help you can give me on this,

Scott Jackson

At 2005-12-08, 23:34:30 you wrote:

>Hello,
>
>I have spent alot of time and effort reading documentation, looking at
>source code, googling and scanning the list archives but have not been
>able to discover the answer.
>
>While it is clear how to establish names and types for your function
>parameters on the client side for interoperability with other soap
>apis, I have not been able to discover how to extract that information
>back from the request on the server side.
>
>For example, lets say I wanted to submit a job which could have any
>number of optional parameters.
>
>I could do something like:
>
>my @attrs = ();
>push @attrs, SOAP::Data->type('string')->name('user')->value('scott');
>push @attrs, SOAP::Data->type('int')->name('cpus')->value(12);
>SOAP::Lite->uri($uri)->proxy($proxy)-jobSubmit(@attrs)->result;
>
>I can see with a trace that the names and types are making it to the
>server:
>
><?xml version="1.0" encoding="UTF-8"?><SOAP-ENV:Envelope
>xmlns:xsi="http://www.w3.org/1999/XMLSchema-instance"
>xmlns:SOAP-ENC="http://schemas.xmlsoap.org/soap/encoding/"
>xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/"
>xmlns:xsd="http://www.w3.org/1999/XMLSchema"
>SOAP-ENV:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"><SOAP-ENV:Bo\
dy><namesp1:jobSubmit
>xmlns:namesp1="http://www.clusterresources.com/Moab/WebServices"><user
>xsi:type="xsd:string">scottmo</user><cpus
>xsi:type="xsd:int">12</cpus></namesp1:jobStart></SOAP-ENV:Body></SOAP-ENV:Envel\
ope>
>
>The question is -- now how can I extract the names from the variables
>programmatically on the server side without resorting to parsing the
>body xml myself (i.e. the scottmo value has the name user and the type
>string, etc.)?
>
>I realize there would be ways to encode the name, values into strings,
>or use perl data structures like hashes, etc, but I believe the way I
>am attempting to use this would be the most direct way to use the SOAP
>protocol and would enable a non-perl server to respond to a perl
>client request in a straighforward manner.
>
>Thank you for any help you can give me on this,
>
>Scott Jackson
>
See the section ACCESSING HEADERS AND ENVELOPE ON SERVER SIDE in the docs for
how to get hold of the SOAP envelope.
You can then use the SOAP::SOM methods to navigate through the child elements of
the jobSubmit element and pick out the name, type and value.

Something like this might be what you need

my $j = $som->match('/Envelope/Body/[1]');

for (my $i = 1; my $e = $j->dataof("[$i]"); $i++) {
     print $e->name , ' ', $e->type, ' ', $e->value, "\n";
};


Duncan

> See the section ACCESSING HEADERS AND ENVELOPE ON SERVER SIDE in the docs for
how to get hold of the SOAP envelope.
> You can then use the SOAP::SOM methods to navigate through the child elements
of the jobSubmit element and pick out the name, type and value.
>
> Something like this might be what you need
>
> my $j = $som->match('/Envelope/Body/[1]');
>
> for (my $i = 1; my $e = $j->dataof("[$i]"); $i++) {
>     print $e->name , ' ', $e->type, ' ', $e->value, "\n";
> };

Duncan,

Thanks for the reference. In the section you referred me to I discovered
that I can get direct access to the envelope by inheriting from
SOAP::Server::Parameters. That was the key I was missing. Since all I
really needed in this instance were the names (and not the types), it
was a simple matter to extract the names and values with the 'method'
call on the SOAP::SOM object popped from the extended parameters.


package Moab::WebServices;

use Data::Dumper;
use Exporter;
@ISA    = qw(Exporter SOAP::Server::Parameters);
@EXPORT = qw
   (
   &jobStart
);

# Start a job
sub jobStart
{
     my $som = pop;

     my %args = %{$som->method};
     return "jobStart received: " . Data::Dumper->Dump([\%args]);
}

1;

####

I get a response like:

jobStart received: $VAR1 = {
           'NAME' => 'PBS.1234.0',
           'UNAME' => 'scottmo',
           'TASKLIST' => 'node01,node02',
           'WCTIME' => '12:00:00',
           'EXEC' => '/bin/hostname'
         };

####


Thank you so much for your help!

Scott

Hi

Im trying to upload a file to a XMLRPC::Lite using base64.

Im uploading the file from .NET and have got the file as an array of
bytes, this is serialised into the base64 type using the cookcomputing
xmlrpc library (www.xml-rpc.net).

Looking at a trace of the request being sent from my computer to the
server it all looks ok but when i get the value from the struct in the
server and write it to the logfile it writes garbage. Vim has real
problems opening the file because the contents are so weird.

Do i need to do something special with the base64 type?

Thanks
Ben Crinion

HI all,  I m new to perl..can any body help me regarding stubmaker.pl,
I want to know how i use this stubmaker.pl..

can this is right approch that making a perl client thorugh stubmaker

waiting for relpy

thanks
Sudhakar Sharma

Hi,

I'm trying to write a SOAP:lite client for an Axis service which needs
authenticating with a
UsernameToken containing a username, password digest, nonce and timestamp. The
header (as
generated by a working axis client) should be of this form:

<soapenv:Header>
          <wsse:Security
xmlns:wsse="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-s\
ecext-1.0.xsd"
soapenv:mustUnderstand="1">
             <wsse:UsernameToken>
                <wsse:Username>wss4j</wsse:Username>
                <wsse:Password
Type="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-username-token-pro\
file-1.0#PasswordDigest">G97l0WOVZXKTtBKoFrJipS30dG4=</wsse:Password>
                <wsse:Nonce>FPMItH9S62hwtk0w6VWBmg==</wsse:Nonce>
                <wsu:Created
xmlns:wsu="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-ut\
ility-1.0.xsd">2005-12-13T15:32:38.319Z</wsu:Created>
             </wsse:UsernameToken>
          </wsse:Security>
       </soapenv:Header>

I spent 2 days hunting round this list and the web in general trying to find a
way of doing this
with no success - just posts from other people having problems but nothing in
the way of guidance
as to how to do it. Therefore I'm wondering if this is actually possible with
SOAP:lite. If it is,
any help would be really appreciated.

Thanks in advance.

Richard.



___________________________________________________________
Yahoo! Exclusive Xmas Game, help Santa with his celebrity party -
http://santas-christmas-party.yahoo.net/

On Tue, Dec 13, 2005 at 04:34:03PM +0000, Richard Gregory wrote:
> Hi,
>
> I'm trying to write a SOAP:lite client for an Axis service which needs
authenticating with a
> UsernameToken containing a username, password digest, nonce and timestamp. The
header (as
> generated by a working axis client) should be of this form:
>

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnsql90/html/so\
apscenarios.asp

seems to have some examples that may be of use.


--
Our mission is to seamlessly build quality deliverables so that we may
synergistically pursue emerging solutions to set us apart from the competition

Thanks for the link, Peter. I've pretty much got it solved, I think, but I just
have one small
problem, that is I can't figure out how to add the "wsse" prefix to the
UsernameToken element:

<soapenv:Header>
          <wsse:Security
xmlns:wsse="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-s\
ecext-1.0.xsd"
soapenv:mustUnderstand="1">
             <UsernameToken>
                <wsse:Username>wss4j</wsse:Username>
                <wsse:Password
Type="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-username-token-pro\
file-1.0#PasswordDigest">Cq22uI3TX3XASvn2kIQkU0ITA0s=</wsse:Password>
                <wsse:Nonce>i1UwBPCCWbUoI9Duh80D7w==</wsse:Nonce>
                <wsu:Created
xmlns:wsu="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-ut\
ility-1.0.xsd">2005-12-09T10:09:19.656Z</wsu:Created>
             </UsernameToken>
          </wsse:Security>
       </soapenv:Header>

Here is the code of my client which generates the header.

my $wsse =
"http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.x\
sd";
my $wsu =
"http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.\
xsd";
my $passworddigest =
"http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-username-token-profile-\
1.0#PasswordDigest";

my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = gmtime(time);
my $timestamp = sprintf "%4d-%02d-%02dT%02d:%02d:%02dZ\n",
$year+1900,$mon+1,$mday,$hour,$min,$sec;

my $username = "wss4j";
my $password = "security";
my $nonce = "4djRSlpeyWeGzcNgatneSA==";
my $digest = MIME::Base64::encode_base64(Digest::SHA1::sha1($nonce . $created .
$password), '');

my $header = SOAP::Header->name(Security => {
		 UsernameToken => {
		 Username => SOAP::Data->type('' => $username)->prefix('wsse'),
		 Password => SOAP::Data->type('' =>
$digest)->attr({'Type'=>$passworddigest})->prefix('wsse'),
		 Nonce => SOAP::Data->type('' => $nonce)->prefix('wsse'),
		 Created => SOAP::Data->type('' => $timestamp)->uri($wsu)->prefix('wsu')
		 }
})->uri($wsse)->prefix('wsse');

$header->mustUnderstand(1);

If I try to change it to:

my $header = SOAP::Header->name(Security => {
		 UsernameToken => {
		 Username => SOAP::Data->type('' => $username)->prefix('wsse'),
		 Password => SOAP::Data->type('' =>
$digest)->attr({'Type'=>$passworddigest})->prefix('wsse'),
		 Nonce => SOAP::Data->type('' => $nonce)->prefix('wsse'),
		 Created => SOAP::Data->type('' => $timestamp)->uri($wsu)->prefix('wsu')
		 }->prefix('wsse')
})->uri($wsse)->prefix('wsse');

I get a message "Can't call method "prefix" on unblessed reference at ....."

I feel like I'm really close here, so if anyone can help me out I'd be really
grteful. Sorry if
this is something really basic, but my only perl experience is trying to write
clients for my Axis
web servcies to test interoperability.

Thanks,

Richard.


--- Peter Sinnott <psinnottie@...> wrote:


---------------------------------
On Tue, Dec 13, 2005 at 04:34:03PM +0000, Richard Gregory wrote:
> Hi,
>
> I'm trying to write a SOAP:lite client for an Axis service which needs
authenticating with a
> UsernameToken containing a username, password digest, nonce and timestamp. The
header (as
> generated by a working axis client) should be of this form:
>

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnsql90/html/so\
apscenarios.asp

seems to have some examples that may be of use.


--
Our mission is to seamlessly build quality deliverables so that we may
synergistically pursue emerging solutions to set us apart from the competition


---------------------------------
   YAHOO! GROUPS LINKS


     Visit your group "soaplite" on the web.

     To unsubscribe from this group, send an email to:
  soaplite-unsubscribe@yahoogroups.com

     Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.


---------------------------------






___________________________________________________________
To help you stay safe and secure online, we've developed the all new Yahoo!
Security Centre. http://uk.security.yahoo.com

Thanks for the link, Peter. I've pretty much got it solved, I think, but I just
have one small
problem, that is I can't figure out how to add the "wsse" prefix to the
UsernameToken element:

<soapenv:Header>
          <wsse:Security
xmlns:wsse="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-s\
ecext-1.0.xsd"
soapenv:mustUnderstand="1">
             <UsernameToken>
                <wsse:Username>wss4j</wsse:Username>
                <wsse:Password
Type="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-username-token-pro\
file-1.0#PasswordDigest">Cq22uI3TX3XASvn2kIQkU0ITA0s=</wsse:Password>
                <wsse:Nonce>i1UwBPCCWbUoI9Duh80D7w==</wsse:Nonce>
                <wsu:Created
xmlns:wsu="http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-ut\
ility-1.0.xsd">2005-12-09T10:09:19.656Z</wsu:Created>
             </UsernameToken>
          </wsse:Security>
       </soapenv:Header>

Here is the code of my client which generates the header.

my $wsse =
"http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-secext-1.0.x\
sd";
my $wsu =
"http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-wssecurity-utility-1.0.\
xsd";
my $passworddigest =
"http://docs.oasis-open.org/wss/2004/01/oasis-200401-wss-username-token-profile-\
1.0#PasswordDigest";

my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = gmtime(time);
my $timestamp = sprintf "%4d-%02d-%02dT%02d:%02d:%02dZ\n",
$year+1900,$mon+1,$mday,$hour,$min,$sec;

my $username = "wss4j";
my $password = "security";
my $nonce = "4djRSlpeyWeGzcNgatneSA==";
my $digest = MIME::Base64::encode_base64(Digest::SHA1::sha1($nonce . $created .
$password), '');

my $header = SOAP::Header->name(Security => {
UsernameToken => {
Username => SOAP::Data->type('' => $username)->prefix('wsse'),
Password => SOAP::Data->type('' =>
$digest)->attr({'Type'=>$passworddigest})->prefix('wsse'),
Nonce => SOAP::Data->type('' => $nonce)->prefix('wsse'),
Created => SOAP::Data->type('' => $timestamp)->uri($wsu)->prefix('wsu')
}
})->uri($wsse)->prefix('wsse');

$header->mustUnderstand(1);

If I try to change it to:

my $header = SOAP::Header->name(Security => {
UsernameToken => {
Username => SOAP::Data->type('' => $username)->prefix('wsse'),
Password => SOAP::Data->type('' =>
$digest)->attr({'Type'=>$passworddigest})->prefix('wsse'),
Nonce => SOAP::Data->type('' => $nonce)->prefix('wsse'),
Created => SOAP::Data->type('' => $timestamp)->uri($wsu)->prefix('wsu')
}->prefix('wsse')
})->uri($wsse)->prefix('wsse');

I get a message "Can't call method "prefix" on unblessed reference at ....."

I feel like I'm really close here, so if anyone can help me out I'd be really
grteful. Sorry if
this is something really basic, but my only perl experience is trying to write
clients for my Axis
web servcies to test interoperability.

Thanks,

Richard.


--- Peter Sinnott <psinnottie@...> wrote:


---------------------------------
On Tue, Dec 13, 2005 at 04:34:03PM +0000, Richard Gregory wrote:
> Hi,
>
> I'm trying to write a SOAP:lite client for an Axis service which needs
authenticating with a
> UsernameToken containing a username, password digest, nonce and timestamp. The
header (as
> generated by a working axis client) should be of this form:
>

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnsql90/html/so\
apscenarios.asp

seems to have some examples that may be of use.


--
Our mission is to seamlessly build quality deliverables so that we may
synergistically pursue emerging solutions to set us apart from the competition


---------------------------------
   YAHOO! GROUPS LINKS


     Visit your group "soaplite" on the web.

     To unsubscribe from this group, send an email to:
  soaplite-unsubscribe@yahoogroups.com

     Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.


---------------------------------






___________________________________________________________
NEW Yahoo! Cars - sell your car and browse thousands of new and used cars
online! http://uk.cars.yahoo.com/

I am trying to implement a simple SOAP client/server and stumble on
parameter passing - in my case how do I read an array.

I am using Apache2::Soap via mod_perl. Basic no-parameter calling
works fine. Below is the source I wrote.




--------- httpd.conf ---------

<Location /soap>
  SetHandler perl-script
  PerlResponseHandler Apache2::SOAP
  PerlSetVar dispatch_to "/soap"
  PerlSetVar options "compress_threshold => 10000"
</Location>


--------- /soap/Calculator.pl ---------

package Calculator;

sub version {
  return "v1.0";
}

sub add {
  my @x = shift;
  my $y = 0;
  while(@x) {
   $y = $y + shift(@x);
  }
  return $y;
}

1;

-------- testsoap.pl ---------
use SOAP::Lite;

my $soap = SOAP::Lite
   -> uri('/Calculator')
   -> proxy('http://localhost/soap')
   -> on_fault(sub { my($soap, $res) = @_;
     die ref $res ? $res->faultdetail : $soap->transport->status, "\n";
   });

my $result = $soap -> version();
print $result->result;
print "\n";

my $result = $soap -> add(3,4);
print $result->result;
print "\n";

------- perl testsoap.pl --------

v1.0
0

__________________________________________________
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail.yahoo.com

__________________________________________________
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail.yahoo.com

Hello,

Recently we move our project from RedHat 9.0 to Fedora
Core 4. I installed the newest SOAP-Lite tarball
SOAP-Lite-0.65_6.tar.gz and found that
SOAP::Transport::HTTP.pm still looking for
Apache/Constants.pm module.
The problem is Apache 2.0 and mod_perl 2.0 are
installed with Fedora Core 4 CDs, and I also found
that Apache 2.0 doesn't support Apache/Constants.pm
anymore.

It seems that SOAP Lite cannot incorporate Apache2. Is
this conclusion right?




jing


__________________________________________________
Do You Yahoo!?
Tired of spam?  Yahoo! Mail has the best spam protection around
http://mail.yahoo.com

Hello,

I meet a problem with SOAP::Transport::HTTP and
Apache2 in Fedora Core 4 environment.

I installed httpd-2.0.54-10.i386.rpm and
mod_perl-2.0.0-0.rc5.3.i386.rpm with Fedora Core 4
CDs. And then I downloaded and installed
perl-SOAP-Lite-0.60a-3.rhfc4.at.noarch.rpm.

I edited /etc/httpd/conf/httpd.conf to add our own
perl handler
as:

<Location /NM2Soap>
     setHandler perl-script
     perlHandler SOAPApache
</Location>


In SOAPApache module, I have: use
SOAP::Transport::HTTP;

I use a web services application to make a request to
my customized SOAPDaemon via SOAPApache. The request
is not successful. I go to /etc/httpd/logs/ directory
and check error_log message. The error_log message
looks like follows:

Client failed to resolve handler 'SOAPApache': Can't
locate Apache.pm in @INC.......... at
/usr/lib/perl5/vendor-perl5/5.8.6/SOAP/Transport/HTTP.pm
line 444 ............

I checked HTTP.pm file, line 444 is:

sub new {require Apache; require Apache::Constants;


How can I make SOAP::Transport::HTTP look for Apache2
instead of Apache?

Any answer will be greatly appreciated.



jing






__________________________________________________
Do You Yahoo!?
Tired of spam?  Yahoo! Mail has the best spam protection around
http://mail.yahoo.com

I've written a simple/test SOAP server which looks like this:

package wrapper;

use strict;
use SOAP::Lite;
use core;

sub test { shift @_; return SOAP::Data->name('handle', core::test(@_)); }

1;

core::test() does nothing more than warn("I'm here") and return a
number. It really is just a test. The client looks like this:

#!/usr/bin/perl

use strict;
use SOAP::Lite;
my $s = new SOAP::Lite(
   'proxy' => 'http://address:8007',
   'uri' => 'wrapper'
);
my $response = $s->test('apple');
print $response->result . "\n";

This works perfectly. It prints the value returned by core::test() and
"I'm here" appears in apache's error_log, as expected.

Trouble is, the VBScript client (using the low-level API as described
in the MSSOAP Toolkit documentation) dies a horrible death. The only
clue shows up in error_log:

Invalid URI in request POST  HTTP/1.1

The soap server uses Apache::SOAP via these httpd.conf entries:

   SetHandler perl-script
   PerlHandler Apache::SOAP
   PerlSetVar dispatch_to "wrapper"

When I use SOAP::Transport::HTTP::CGI then both the perl and VBS
clients work. The VBS client only seems to fail when I use this
method. I'm at a complete loss. I wish I was smarter.

Charlie

This call...

   $client->call('check_login' =>
      SOAP::Data->name('auth' =>
        \SOAP::Data->name('email',=>'testemail'),
        \SOAP::Data->name('pword',=>'testpassword')
      )
   )->result;

Generates (cleaned up a bit):
<auth>
    <email xsi:type="xsd:string">testemail</email>
</auth>
<auth>
    <pword xsi:type="xsd:string">testpassword</pword>
</auth>

When what I want is:
   <auth>
     <email>testemail</email>
     <pword>testpassword</pword>
   </auth>

  (notice the two <auth> tags?!)

The difference on the server side is dramatic of course. With what is
happening, I get two hashrefs, one containing 'email' and one containing
'pword'. When I pass in the raw XML, I get what I should get, which is a
hashref containing 'email' and 'pword'.

I've tried passing the parameters in as hashrefs, listrefs, etc but so
far no luck. This really doesn't seem like proper behaviour! Help!

(I'm using SOAP::Lite 0.65_6)








-----------------------------------------------------------
This message may contain confidential and/or privileged
information. This information is intended to be read only
by the individual or entity to whom it is addressed. If
you are not the intended recipient, you are on notice that
any review, disclosure, copying, distribution or use of
the contents of this message is strictly prohibited. If
you have received this message in error, please notify the
sender immediately and delete or destroy any copy of this
message.

Jesse,

I may be naive here, but at first glance it looks unusual for you to
have both a comma "," and a pair operator "=>" in a hash element such
as:
'email',=>'testemail'

I would think you would want one or the other such as:

'email', 'testemail'

or probably more appropriately

'email' =>'testemail'
.

Scott

On Tue, 2005-12-20 at 10:36 -0800, Jesse Brown wrote:
> This call...
>
>   $client->call('check_login' =>
>      SOAP::Data->name('auth' =>
>        \SOAP::Data->name('email',=>'testemail'),
>        \SOAP::Data->name('pword',=>'testpassword')
>      )
>   )->result;
>
> Generates (cleaned up a bit):
> <auth>
>    <email xsi:type="xsd:string">testemail</email>
> </auth>
> <auth>
>    <pword xsi:type="xsd:string">testpassword</pword>
> </auth>
>
> When what I want is:
>   <auth>
>     <email>testemail</email>
>     <pword>testpassword</pword>
>   </auth>
>
>  (notice the two <auth> tags?!)
>
> The difference on the server side is dramatic of course. With what is
> happening, I get two hashrefs, one containing 'email' and one containing
> 'pword'. When I pass in the raw XML, I get what I should get, which is a
> hashref containing 'email' and 'pword'.
>
> I've tried passing the parameters in as hashrefs, listrefs, etc but so
> far no luck. This really doesn't seem like proper behaviour! Help!
>
> (I'm using SOAP::Lite 0.65_6)
>
>
>
>
>
>
>
>
> -----------------------------------------------------------
> This message may contain confidential and/or privileged
> information. This information is intended to be read only
> by the individual or entity to whom it is addressed. If
> you are not the intended recipient, you are on notice that
> any review, disclosure, copying, distribution or use of
> the contents of this message is strictly prohibited. If
> you have received this message in error, please notify the
> sender immediately and delete or destroy any copy of this
> message.
>
>
>
>
>
> Yahoo! Groups Links
>
>
>
>
>
>
>

It looks weird (was a typo), but removing it makes zero difference. (I
tried!)

The data generated is identical.


On Tue, 2005-12-20 at 12:37 -0700, Scott Jackson wrote:
> Jesse,
>
> I may be naive here, but at first glance it looks unusual for you to
> have both a comma "," and a pair operator "=>" in a hash element such
> as:
> 'email',=>'testemail'
>
> I would think you would want one or the other such as:
>
> 'email', 'testemail'
>
> or probably more appropriately
>
> 'email' =>'testemail'
> .
>
> Scott
>
> On Tue, 2005-12-20 at 10:36 -0800, Jesse Brown wrote:
> > This call...
> >
> >   $client->call('check_login' =>
> >      SOAP::Data->name('auth' =>
> >        \SOAP::Data->name('email',=>'testemail'),
> >        \SOAP::Data->name('pword',=>'testpassword')
> >      )
> >   )->result;
> >
> > Generates (cleaned up a bit):
> > <auth>
> >    <email xsi:type="xsd:string">testemail</email>
> > </auth>
> > <auth>
> >    <pword xsi:type="xsd:string">testpassword</pword>
> > </auth>
> >
> > When what I want is:
> >   <auth>
> >     <email>testemail</email>
> >     <pword>testpassword</pword>
> >   </auth>
> >
> >  (notice the two <auth> tags?!)
> >
> > The difference on the server side is dramatic of course. With what is
> > happening, I get two hashrefs, one containing 'email' and one containing
> > 'pword'. When I pass in the raw XML, I get what I should get, which is a
> > hashref containing 'email' and 'pword'.
> >
> > I've tried passing the parameters in as hashrefs, listrefs, etc but so
> > far no luck. This really doesn't seem like proper behaviour! Help!
> >
> > (I'm using SOAP::Lite 0.65_6)
> >
> >
> >
> >
> >
> >
> >
> >
> > -----------------------------------------------------------
> > This message may contain confidential and/or privileged
> > information. This information is intended to be read only
> > by the individual or entity to whom it is addressed. If
> > you are not the intended recipient, you are on notice that
> > any review, disclosure, copying, distribution or use of
> > the contents of this message is strictly prohibited. If
> > you have received this message in error, please notify the
> > sender immediately and delete or destroy any copy of this
> > message.
> >
> >
> >
> >
> >
> > Yahoo! Groups Links
> >
> >
> >
> >
> >
> >
> >
>






-----------------------------------------------------------
This message may contain confidential and/or privileged
information. This information is intended to be read only
by the individual or entity to whom it is addressed. If
you are not the intended recipient, you are on notice that
any review, disclosure, copying, distribution or use of
the contents of this message is strictly prohibited. If
you have received this message in error, please notify the
sender immediately and delete or destroy any copy of this
message.

I am using soap::lite to call .NET methods, all of a sudden .NET will
not pickup any of the variables I pass to it.  If I call a method with
no variables it returns just fine, otherwise it spits back an error
saying that variable foo is required.

Here is my code:
###########################################################3
my $ns = "http://www.1234.com"; ##this should NOT end with a /
my $url = "http://123.123.123.123/test.asmx";

my ($soap, $result, $output);
$soap = SOAP::Lite
    -> uri($ns)
    -> on_action( sub { join '/', $ns, $_[1] })
    -> proxy ($url);

my $method = SOAP::Data->name('HelloWorldEcho')->attr( {xmlns => $ns});
my @params = (
    SOAP::Data->name('schema')->value('schema string')->type(''),
    SOAP::Data->name('deployment')->value('deployment string')->type(''),
    SOAP::Data->name('session')->value('session string')->type(''),
    SOAP::Data->name('input')->value('input string')->type('')
);

my $test = $soap->call($method => @params);
if ($test->fault) {
    print "faultcode = " . $test->faultcode .
       "<br> faultstring = " . $test->faultstring .
       "<br> faultactor = " . $test->faultactor .
       "<br> faultdetail = " . $test->faultdetail;
} else {
    print "the result is: " . $test->result;
}

#####################################################
There aren't any faults, it's just that the method doesn't recognize
that I passed it any variables.  With debugging on here is my request
header:

#####################################################
POST http://172.20.120.120/prissmwebinterface/prissmweb.asmx
Accept: text/xml
Accept: multipart/*
Content-Length: 585
Content-Type: text/xml; charset=utf-8
SOAPAction: http://www.ppdi.com/HelloWorldEcho

<?xml version="1.0" encoding="UTF-8"?>
<SOAP-ENV:Envelope xmlns:xsi="http://www.w3.org/1999/XMLSchema-instance"
xmlns:SOAP-ENC="http://schemas.xmlsoap.org/soap/encoding/"
xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/"
xmlns:xsd="http://www.w3.org/1999/XMLSchema"
SOAP-ENV:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/">
<SOAP-ENV:Body>
<HelloWorldEcho xmlns="http://www.ppdi.com">
<schema>schema string</schema>
<deployment>deployment string</deployment>
<session>session string</session>
<input>input string</input>
</HelloWorldEcho>
</SOAP-ENV:Body>
</SOAP-ENV:Envelope>
################################################################

ANY HELP/SUGGESTIONS WOULD BE GREATLY APPRECIATED!!!!

THANKS IN ADVANCE,
JAY

my $myRes = SOAP::Data->name("createSessionResponse" => \SOAP::Data->value(
              SOAP::Data->name("status" => $result_hash{'status'}),               SOAP::Data->name("sessionID" => $result_hash{'sessionID'}),
              SOAP::Data->name("redirectURL" => $result_hash{'redirectURL'})
              )
             )->attr({ xmlns => 'http://dpg.dialogue.net/WAP_Soap' });
$myRes->prefix('');    return($myRes);

Robin,

I believe that there is something in the SOAP::Lite man page to this effect, or at least for working with .Net in general. for my web service, which was written solely for working with .Net clients, i dicovered that .Net didn't like the prefix stuff tha SOAP::Lite includes, an example of one of my responses is:

<?xml version="1.0" encoding="UTF-8"?>
<soap:Envelope xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" soap:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/">
<soap:Body>
<LogoutResponse xmlns="http://blahblahblah/ClientLogin/">
<LogoutResult>0</LogoutResult>
<errorMessage>SUCCESS</errorMessage>
</LogoutResponse>
</soap:Body></soap:Envelope>

 I had to remove the gensym and namesp tags.

There *should* be a way to do this when you initialize SOAP::Lite, but i could never get it quite right, so i always end up hacking the .pm to correct it, if someone can show me an example of setting up the prefixes for .Net without hacking the module, that would be cool.

In any case robin, i hope this helps.

On 12/21/05, robin_keech1 <robin@...> wrote:

Hi all,

I have written a SOAP server using SOAP::Lite. It has a wsdl file at http://dpg.dialogue.net/WAP_Soap.wsdl

I have tested the service with both perl and php clients. We have a new customer that is coding in .Net and having trouble integrating the method calls. The server logs show a method request and a result being sent back, but the client can't seem to get at the results. Initially they only received a string with "status", so I changed the wsdl to include a complex type as the return parameter. The actual perl server code just returns a hash.

The client has said that "the .Net framework cannot parse the XML being returned from the createSession SOAP call as one of the namespaces is declared within the node using the namespace.  .NET needs it to be declared before it is used or it throws an error."

Firstly, is this conclusion correct? Has anyone experienced a problem like this with .Net? And if it is, can anyone help with suggestions on suppressing/removing the namespace part.

So the SOAP body looks like:
 <SOAP-ENV:Body>
 <namesp35:createSessionResponse xmlns:namesp35=" http://dpg.dialogue.net/WAP_Soap">
       <s-gensym283 xsi:type="xsd:string">status</s-gensym283>
       <s-gensym285 xsi:type="xsd:int">00</s-gensym285>
       <s-gensym287 xsi:type="xsd:string">sessionID</s-gensym287>
       <s-gensym289 xsi:type="xsd:string">42053C6A714211DA909B8DCE9602641D</s-gensym289>
       <s-gensym291 xsi:type="xsd:string">redirectURL</s-gensym291>
       <s-gensym293 xsi:type="xsd:string">http://myurl.com?s=42053C6A714211DA909B8DCE9602641D</s-gensym293>
 </namesp35:createSessionResponse>
 </SOAP-ENV:Body>
 </SOAP-ENV:Envelope>
 
But this won't work unless the namesp35 namespace is declared before it is used.  Taking out the section in bold should work, according to the customer.

The other thing I though it might be was not encoding the result hash as a correct SOAPata type object that matches the wsdl description. Or maybe I should be looking at overriding the serialiser.

As you can probably tell, I have no idea what to do to get this working. I don't have access to any .Net technology to play with. Any suggestions would be greatly appreciated.

Robin

---

YAHOO! GROUPS LINKS

•  Visit your group "soaplite" on the web.
   
•  To unsubscribe from this group, send an email to:
   soaplite-unsubscribe@yahoogroups.com
   
•  Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.

--
Brad Miele                                                                                                                        
Technology Director                                                                                                                
IPNStock                                                                                                                          
(866) 476-7862 x902                                                                                                                
bmiele@...

I am a newbie to SOAPLite. Below is my code and I am getting
"Can't call method "value" on an undefined value at (eval 10) line
38.". Please help.

---

use strict;
use SOAP::Lite;
use Data::Dumper;


my $prop ="\<Properties>\

<Property><Name>_AssemblyFile</Name><Value>abc.Agent.dll</Value></Prop
erty>\

<Property><Name>_AssemblyType</Name><Value>abc.Agent.ExternalProcessAg
ent</Value></Property>\
  <Property><Name>_EPId</Name><Value>2001</Value></Property>\
  <Property><Name>_Action</Name><Value>Initialize</Value></Property>\
         </Properties>";

my $status = SOAP::Data->type(string=>'');
my $reason= SOAP::Data->type(string=>'');
my $inputData=SOAP::Data->type(int=>'');
my $propertiesStr =SOAP::Data->type(string=>"none");


my $soap =  SOAP::Lite
           -> service('http://myiisserver:8080/abc/Task.asmx?wsdl')
           -> Process($propertiesStr,$status, $reason,$inputData);

__________________________________________________
Do You Yahoo!?
Tired of spam? Yahoo! Mail has the best spam protection around
http://mail.yahoo.com