Re: Ada networking (Adagio)

["Álex R. Mosteo" <alejandro@mosteo.com>]

Shark8 wrote:

> On Monday, August 20, 2012 2:59:00 AM UTC-6, Álex R. Mosteo wrote:
>> Shark8 wrote:
>> 
>> > Hey, I was hoping to get a bit more familiar with using Ada for
>> > networking programs; I found referenced to Adagio, which is supposed to
>> > be (or have been, it's inactive now) a Gnutella2 program.
>> > 
>> > The project is inactive and none of the files appear to have been
>> > archived/downloadable. The last known source was contained in a zipfile
>> > adagio-src.2.1.e.zip, which I cannot find for download either.
>> > 
>> > I was wondering if anyone on this thread might have a copy laying
>> > around on their HD.
>> 
>> 
>> I'm the author and I'm pretty sure I keep the whole history in some
>> archived SVN. If you're interested I could try to dig it out. Also,
>> perhaps I could simply convert it to git and put it in github.
> 
> Ah, that would be nice; I did get the zip from Martin though.
> 
> 
>> I'm not sure how good a resource it is for learning from; I did learn a
>> lot about blocking and non-blocking sockets when programming that (I
>> experimented with both approaches -- IIRC a stack size related thread
>> limit in Windows prompted me to abandon blocking IO in the end), but the
>> code more or less grew up with little foreplanning.
> 
> Ah, I know how that is. The thing that's bugging me about it right now is
> the gnatpatch and runtime-configuration errors. (Still trying to figure
> them out.)

Ah, right. There was a Calendar bug in the windows GNAT version at the time 
that caused random thread lock-ups in delays. That caused me a lot of 
headaches to track down; I managed with the help of people here:

https://groups.google.com/d/msg/comp.lang.ada/cdHjb8qqm5A/U8buGZrldhIJ

Also there were some other problems with unbounded strings IIRC.

I'm pretty sure that with recent Gnat versions you can dispense with the 
patching of the compiler. OTOH, perhaps the code won't readily compile with 
Gnat GPL 2012, but fixing whatever is now rejected might be easy.

I'm going to try to find it and put it in GitHub, and we can work from there 
to put it in shape, if you want. 

Alex.