Smalltalk › Instantiations

WinHTTP library

_‹ Previous Topic Next Topic _›

Classic

List

Threaded

13 messages Options

Long Haired David

WinHTTP library

I am building a Riak NoSQL database project which uses http as the interface. I now have all of the Riak methods working so I can add buckets/key:value pairs, amend them, retrieve them and delete them plus all the other thing that it allows you to do. I can't publish this as I have built it around our own Totally Objects SocketSet socket manager (you would need to buy it to get the Riak library to work - unless you already have it, though..

To enable me to make it available, I need to shift all of the http calls to WinHttp - although that won't satisfy the Linux market :-(.

The problem is that I can't make head nor tail WinHttp and can't see where to get started. Can anyone show me the Smalltalk for a standard GET and POST?

--
You received this message because you are subscribed to the Google Groups "VA Smalltalk" group.
To unsubscribe from this group and stop receiving emails from it, send an email to [hidden email].
To post to this group, send email to [hidden email].
Visit this group at https://groups.google.com/group/va-smalltalk.
For more options, visit https://groups.google.com/d/optout.

David
Totally Objects
Doing Smalltalk since 1989

Marten Feldtmann-4

Re: WinHTTP library

I would start with making a subclass of SstHttpClient and then from that you have most of the stuff you need ...

Marten

Am Samstag, 7. Mai 2016 20:41:21 UTC+2 schrieb Totally Objects:

I am building a Riak NoSQL database project which uses http as the interface. I now have all of the Riak methods working so I can add buckets/key:value pairs, amend them, retrieve them and delete them plus all the other thing that it allows you to do. I can't publish this as I have built it around our own <a href="http://www.totallyobjects.com/Sockset.htm" target="_blank" rel="nofollow" onmousedown="this.href='http://www.google.com/url?q\x3dhttp%3A%2F%2Fwww.totallyobjects.com%2FSockset.htm\x26sa\x3dD\x26sntz\x3d1\x26usg\x3dAFQjCNF3OcspcatR9SG7sZiEdQInKW2OGQ';return true;" onclick="this.href='http://www.google.com/url?q\x3dhttp%3A%2F%2Fwww.totallyobjects.com%2FSockset.htm\x26sa\x3dD\x26sntz\x3d1\x26usg\x3dAFQjCNF3OcspcatR9SG7sZiEdQInKW2OGQ';return true;">Totally Objects SocketSet socket manager (you would need to buy it to get the Riak library to work - unless you already have it, though..

To enable me to make it available, I need to shift all of the http calls to WinHttp - although that won't satisfy the Linux market :-(.

The problem is that I can't make head nor tail WinHttp and can't see where to get started. Can anyone show me the Smalltalk for a standard GET and POST?

Long Haired David

Re: WinHTTP library

In reply to this post by Long Haired David

OK, went there and got all of my GET operations sorted using the fetch methods in SstHttpClient. However, I have a problem with the post methods. All of them fail with the same error.

UndefinedObject does not understand transport

The code is here in SstHttpClient:

newTransportMessage

^localEndpoint transport configuration messageClass new

localEndPoint is properly initialised in the fetch methods but not in the post. I can't figure out what to do next.

Any thoughts?

On Saturday, May 7, 2016 at 7:41:21 PM UTC+1, Totally Objects wrote:

I am building a Riak NoSQL database project which uses http as the interface. I now have all of the Riak methods working so I can add buckets/key:value pairs, amend them, retrieve them and delete them plus all the other thing that it allows you to do. I can't publish this as I have built it around our own <a href="http://www.totallyobjects.com/Sockset.htm" target="_blank" rel="nofollow" onmousedown="this.href='http://www.google.com/url?q\x3dhttp%3A%2F%2Fwww.totallyobjects.com%2FSockset.htm\x26sa\x3dD\x26sntz\x3d1\x26usg\x3dAFQjCNF3OcspcatR9SG7sZiEdQInKW2OGQ';return true;" onclick="this.href='http://www.google.com/url?q\x3dhttp%3A%2F%2Fwww.totallyobjects.com%2FSockset.htm\x26sa\x3dD\x26sntz\x3d1\x26usg\x3dAFQjCNF3OcspcatR9SG7sZiEdQInKW2OGQ';return true;">Totally Objects SocketSet socket manager (you would need to buy it to get the Riak library to work - unless you already have it, though..

To enable me to make it available, I need to shift all of the http calls to WinHttp - although that won't satisfy the Linux market :-(.

The problem is that I can't make head nor tail WinHttp and can't see where to get started. Can anyone show me the Smalltalk for a standard GET and POST?

David
Totally Objects
Doing Smalltalk since 1989

Marten Feldtmann-4

Re: WinHTTP library

Perhaps you can write a very small example how you call the httpclient ?

Marten

Am Sonntag, 8. Mai 2016 16:36:43 UTC+2 schrieb Totally Objects:

OK, went there and got all of my GET operations sorted using the fetch methods in SstHttpClient. However, I have a problem with the post methods. All of them fail with the same error.

UndefinedObject does not understand transport

The code is here in SstHttpClient:

newTransportMessage

^localEndpoint transport configuration messageClass new

localEndPoint is properly initialised in the fetch methods but not in the post. I can't figure out what to do next.

Any thoughts?

On Saturday, May 7, 2016 at 7:41:21 PM UTC+1, Totally Objects wrote:
I am building a Riak NoSQL database project which uses http as the interface. I now have all of the Riak methods working so I can add buckets/key:value pairs, amend them, retrieve them and delete them plus all the other thing that it allows you to do. I can't publish this as I have built it around our own <a href="http://www.totallyobjects.com/Sockset.htm" rel="nofollow" target="_blank" onmousedown="this.href='http://www.google.com/url?q\x3dhttp%3A%2F%2Fwww.totallyobjects.com%2FSockset.htm\x26sa\x3dD\x26sntz\x3d1\x26usg\x3dAFQjCNF3OcspcatR9SG7sZiEdQInKW2OGQ';return true;" onclick="this.href='http://www.google.com/url?q\x3dhttp%3A%2F%2Fwww.totallyobjects.com%2FSockset.htm\x26sa\x3dD\x26sntz\x3d1\x26usg\x3dAFQjCNF3OcspcatR9SG7sZiEdQInKW2OGQ';return true;">Totally Objects SocketSet socket manager (you would need to buy it to get the Riak library to work - unless you already have it, though..

To enable me to make it available, I need to shift all of the http calls to WinHttp - although that won't satisfy the Linux market :-(.

The problem is that I can't make head nor tail WinHttp and can't see where to get started. Can anyone show me the Smalltalk for a standard GET and POST?

Long Haired David

Re: WinHTTP library

In reply to this post by Long Haired David

This is my call for a standard get

| fetch |

fetch := (SstHttpClient fetch: 'http://www.totallyobjects.com'). self halt.

^ fetch contents reference

That's it. But, when using a PUT, I get an error from localEndpoint which is an instance variable without a setter that I can see.

David

On Saturday, May 7, 2016 at 7:41:21 PM UTC+1, Totally Objects wrote:

I am building a Riak NoSQL database project which uses http as the interface. I now have all of the Riak methods working so I can add buckets/key:value pairs, amend them, retrieve them and delete them plus all the other thing that it allows you to do. I can't publish this as I have built it around our own <a href="http://www.totallyobjects.com/Sockset.htm" target="_blank" rel="nofollow" onmousedown="this.href='http://www.google.com/url?q\x3dhttp%3A%2F%2Fwww.totallyobjects.com%2FSockset.htm\x26sa\x3dD\x26sntz\x3d1\x26usg\x3dAFQjCNF3OcspcatR9SG7sZiEdQInKW2OGQ';return true;" onclick="this.href='http://www.google.com/url?q\x3dhttp%3A%2F%2Fwww.totallyobjects.com%2FSockset.htm\x26sa\x3dD\x26sntz\x3d1\x26usg\x3dAFQjCNF3OcspcatR9SG7sZiEdQInKW2OGQ';return true;">Totally Objects SocketSet socket manager (you would need to buy it to get the Riak library to work - unless you already have it, though..

To enable me to make it available, I need to shift all of the http calls to WinHttp - although that won't satisfy the Linux market :-(.

The problem is that I can't make head nor tail WinHttp and can't see where to get started. Can anyone show me the Smalltalk for a standard GET and POST?

David
Totally Objects
Doing Smalltalk since 1989

jtuchel

Re: WinHTTP library

David

fetch: sends a GET.

PUT is not implemented in SstHttpClient. but it's not too hard...

    newMsg := SstByteMessage new.
    newMsg header: (SstHttpRequestHeader new
                command: 'PUT';
                url: url;
                version: HttpVersion11;
                contentLength: 0;
                host: url ;
                yourself).

and then you can use an SstHttpClient instance to send: newMsg to: aUrl

That's basically it.

On a side note:
I wish Instantiations brushed the dust off the Sst frameworks to make things easier and support all (or at least the most important) HTTP methods with an easy API. But before that, a lot of global state and stuff has to be removed from Sst.. it's really hard to work with the HTTP clients and servers and such, just because the code is really ugly and dusty. It constantly fetches some info from some more or less global variable instead of just providing methods/parameters to just pass this info in. Same is true for SMTP and stuff... Unnecessarily hard to detangle...

Joachim

Am Dienstag, 10. Mai 2016 21:36:35 UTC+2 schrieb Totally Objects:

This is my call for a standard get

| fetch |

fetch := (SstHttpClient fetch: '<a href="http://www.totallyobjects.com" target="_blank" rel="nofollow" onmousedown="this.href='http://www.google.com/url?q\x3dhttp%3A%2F%2Fwww.totallyobjects.com\x26sa\x3dD\x26sntz\x3d1\x26usg\x3dAFQjCNHbGjjTASxAWDj7h-stWkPhie9Vrw';return true;" onclick="this.href='http://www.google.com/url?q\x3dhttp%3A%2F%2Fwww.totallyobjects.com\x26sa\x3dD\x26sntz\x3d1\x26usg\x3dAFQjCNHbGjjTASxAWDj7h-stWkPhie9Vrw';return true;">http://www.totallyobjects.com'). self halt.
^ fetch contents reference

That's it. But, when using a PUT, I get an error from localEndpoint which is an instance variable without a setter that I can see.

David

On Saturday, May 7, 2016 at 7:41:21 PM UTC+1, Totally Objects wrote:
I am building a Riak NoSQL database project which uses http as the interface. I now have all of the Riak methods working so I can add buckets/key:value pairs, amend them, retrieve them and delete them plus all the other thing that it allows you to do. I can't publish this as I have built it around our own <a href="http://www.totallyobjects.com/Sockset.htm" rel="nofollow" target="_blank" onmousedown="this.href='http://www.google.com/url?q\x3dhttp%3A%2F%2Fwww.totallyobjects.com%2FSockset.htm\x26sa\x3dD\x26sntz\x3d1\x26usg\x3dAFQjCNF3OcspcatR9SG7sZiEdQInKW2OGQ';return true;" onclick="this.href='http://www.google.com/url?q\x3dhttp%3A%2F%2Fwww.totallyobjects.com%2FSockset.htm\x26sa\x3dD\x26sntz\x3d1\x26usg\x3dAFQjCNF3OcspcatR9SG7sZiEdQInKW2OGQ';return true;">Totally Objects SocketSet socket manager (you would need to buy it to get the Riak library to work - unless you already have it, though..

To enable me to make it available, I need to shift all of the http calls to WinHttp - although that won't satisfy the Linux market :-(.

The problem is that I can't make head nor tail WinHttp and can't see where to get started. Can anyone show me the Smalltalk for a standard GET and POST?

Long Haired David

Re: WinHTTP library

In reply to this post by Long Haired David

Thanks for the help but Nope. I don't get it. Here is my code (with false data so don't try this - my Riak database is open so I can't publish the access details).

It still stops in SstHttpClient basicSend:to:ignoringResponseContent: at this point

(remoteEndpoint := localEndpoint send: httpMessage to: remoteEndpoint) isSstError

because localEndpoint is still not initialised.

riakSstPost: aString content: content

Suppose the URL is http://totallyobjects.com and it is listening on port 8098.

Suppose that I am trying to put a JSON = '{""nickname"" : ""Henry"", ""breed"" : ""Golden Retriever""}'

into a bucket called 'myAnimals'.

Suppose that the data to be sent is as follows:

| newMsg url host content path|

content := '''{""nickname"" : ""Henry"", ""breed"" : ""Golden Retriever""}'''.

path := '/riak/myAnimals/Henry/'.

url := SstIpUrl fromString: 'http://totallyobjects.com:8098',path,content..

host := SstIpUrl fromString: 'http://totallyobjects.com:8098'.

newMsg := SstByteMessage new.

newMsg header: (SstHttpRequestHeader new

command: 'PUT';

url: url;

version: 'HttpVersion11';

contentLength: 0;

host: host ;

yourself).

SstHttpClient new send: newMsg to: host

On Saturday, May 7, 2016 at 7:41:21 PM UTC+1, Totally Objects wrote:

I am building a Riak NoSQL database project which uses http as the interface. I now have all of the Riak methods working so I can add buckets/key:value pairs, amend them, retrieve them and delete them plus all the other thing that it allows you to do. I can't publish this as I have built it around our own <a href="http://www.totallyobjects.com/Sockset.htm" target="_blank" rel="nofollow" onmousedown="this.href='http://www.google.com/url?q\x3dhttp%3A%2F%2Fwww.totallyobjects.com%2FSockset.htm\x26sa\x3dD\x26sntz\x3d1\x26usg\x3dAFQjCNF3OcspcatR9SG7sZiEdQInKW2OGQ';return true;" onclick="this.href='http://www.google.com/url?q\x3dhttp%3A%2F%2Fwww.totallyobjects.com%2FSockset.htm\x26sa\x3dD\x26sntz\x3d1\x26usg\x3dAFQjCNF3OcspcatR9SG7sZiEdQInKW2OGQ';return true;">Totally Objects SocketSet socket manager (you would need to buy it to get the Riak library to work - unless you already have it, though..

To enable me to make it available, I need to shift all of the http calls to WinHttp - although that won't satisfy the Linux market :-(.

The problem is that I can't make head nor tail WinHttp and can't see where to get started. Can anyone show me the Smalltalk for a standard GET and POST?

David
Totally Objects
Doing Smalltalk since 1989

Long Haired David

Re: WinHTTP library

In reply to this post by Long Haired David

Just to be clear, you can run this piece of code - it will never connect because there is no riak server on the end at totallyobjects.com but it will progress far enough to throw the error I am talking about.

| newMsg url host json path |

json := '''{""nickname"" : ""Henry"", ""breed"" : ""Golden Retriever""}'''.

path := '/riak/myAnimals/Henry/'.

url := SstIpUrl fromString: 'http://totallyobjects.com:8098',path,json..

host := SstIpUrl fromString: 'http://totallyobjects.com:8098'.

newMsg := SstByteMessage new.

newMsg header: (SstHttpRequestHeader new

command: 'PUT';

url: url;

version: 'HttpVersion11';

contentLength: 0;

host: host ;

yourself).

SstHttpClient new send: newMsg to: host

David
Totally Objects
Doing Smalltalk since 1989

Marten Feldtmann-4

Re: WinHTTP library

Though not tested, I would try something like:

|  url  json  tmpClient |

json :=  '''{""nickname"" : ""Henry"", ""breed"" : ""Golden Retriever""}'''.
url := SstIpUrl  fromString: 'http://totallyobjects.com:8098/riak/myAnimals/Henry'.

tmpClient := (SstHttpClient forTransportScheme: 'httpl') startUp. 
tmpClient 
  post: json typed: 'application/json' at: url

Marten Feldtmann-4

Re: WinHTTP library

I noticed, that your example used PUT. Well - subclass SstHttpClient and add support for PUT there. You may look at the code how POST has been implemented ...

Marten

Marten Feldtmann <[hidden email]> hat am 12. Mai 2016 um 11:19 geschrieben:

Though not tested, I would try something like:

|  url  json  tmpClient |

json :=  '''{""nickname"" : ""Henry"", ""breed"" : ""Golden Retriever""}'''.
url := SstIpUrl  fromString: 'http://totallyobjects.com:8098/riak/myAnimals/Henry'.

tmpClient := (SstHttpClient forTransportScheme: 'httpl') startUp. 
tmpClient 
  post: json typed: 'application/json' at: url

--
You received this message because you are subscribed to the Google Groups "VA Smalltalk" group.
To unsubscribe from this group and stop receiving emails from it, send an email to [hidden email].
To post to this group, send email to [hidden email].
Visit this group at https://groups.google.com/group/va-smalltalk.
For more options, visit https://groups.google.com/d/optout.

Long Haired David

Re: WinHTTP library

That worked fine. Many thanks Marten. Just thinking - you and I - must be 20 years now?

David

Totally Objects

On Thursday, May 12, 2016 at 10:22:50 AM UTC+1, Marten Feldtmann wrote:

I noticed, that your example used PUT. Well - subclass SstHttpClient and add support for PUT there. You may look at the code how POST has been implemented ...

Marten
Marten Feldtmann hat am 12. Mai 2016 um 11:19 geschrieben:

Though not tested, I would try something like:
|  url  json  tmpClient |

json :=  '''{""nickname"" : ""Henry"", ""breed"" : ""Golden Retriever""}'''.
url := SstIpUrl  fromString: '<a href="http://totallyobjects.com:8098/riak/myAnimals/Henry" target="_blank" rel="nofollow" onmousedown="this.href=&#39;http://www.google.com/url?q\x3dhttp%3A%2F%2Ftotallyobjects.com%3A8098%2Friak%2FmyAnimals%2FHenry\x26sa\x3dD\x26sntz\x3d1\x26usg\x3dAFQjCNEwlyLoWigyY4Nvgv2lX5swDjnLvg&#39;;return true;" onclick="this.href=&#39;http://www.google.com/url?q\x3dhttp%3A%2F%2Ftotallyobjects.com%3A8098%2Friak%2FmyAnimals%2FHenry\x26sa\x3dD\x26sntz\x3d1\x26usg\x3dAFQjCNEwlyLoWigyY4Nvgv2lX5swDjnLvg&#39;;return true;">http://totallyobjects.com:8098/riak/myAnimals/Henry'.

tmpClient := (SstHttpClient forTransportScheme: 'httpl') startUp. 
tmpClient 
  post: json typed: 'application/json' at: url
--
You received this message because you are subscribed to the Google Groups "VA Smalltalk" group.
To unsubscribe from this group and stop receiving emails from it, send an email to <a href="javascript:" target="_blank" gdf-obfuscated-mailto="xhJleptjBQAJ" rel="nofollow" onmousedown="this.href='javascript:';return true;" onclick="this.href='javascript:';return true;">va-smalltalk...@googlegroups.com.
To post to this group, send email to <a href="javascript:" target="_blank" gdf-obfuscated-mailto="xhJleptjBQAJ" rel="nofollow" onmousedown="this.href='javascript:';return true;" onclick="this.href='javascript:';return true;">va-sma...@....
Visit this group at <a href="https://groups.google.com/group/va-smalltalk" target="_blank" rel="nofollow" onmousedown="this.href='https://groups.google.com/group/va-smalltalk';return true;" onclick="this.href='https://groups.google.com/group/va-smalltalk';return true;">https://groups.google.com/group/va-smalltalk.
For more options, visit <a href="https://groups.google.com/d/optout" target="_blank" rel="nofollow" onmousedown="this.href='https://groups.google.com/d/optout';return true;" onclick="this.href='https://groups.google.com/d/optout';return true;">https://groups.google.com/d/optout.

David
Totally Objects
Doing Smalltalk since 1989

Instantiations mailing list

Re: WinHTTP library

Am 12.05.2016 um 13:32 schrieb Totally Objects:
> That worked fine. Many thanks Marten. Just thinking - you and I - must
> be 20 years now?

Well, around 18 years now - starting 1998 with VASmalltalk 4.02 ... :-)

--
You received this message because you are subscribed to the Google Groups "VA Smalltalk" group.
To unsubscribe from this group and stop receiving emails from it, send an email to [hidden email].
To post to this group, send email to [hidden email].
Visit this group at https://groups.google.com/group/va-smalltalk.
For more options, visit https://groups.google.com/d/optout.

Long Haired David

Re: WinHTTP library

Happy days!

On Thursday, May 12, 2016 at 12:36:30 PM UTC+1, Marten Feldtmann wrote:

Am 12.05.2016 um 13:32 schrieb Totally Objects:
> That worked fine. Many thanks Marten. Just thinking - you and I - must
> be 20 years now?

Well, around 18 years now - starting 1998 with VASmalltalk 4.02 ... :-)

David
Totally Objects
Doing Smalltalk since 1989