Re: [BLACKBOX] DNS reverse name lookup

From: [at]} <Robert>
Date: Thu, 21 May 2009 18:35:36 +0100

----boundary-LibPST-iamunique-220483453_-_-
Content-type: text/plain

Aubrey

2) - Try this ?

Cheers

Robert



CONST
   bufBytes = 40;
VAR
   bufSize : INTEGER;
   computerShort : ARRAY [untagged] bufBytes OF SHORTCHAR;
   computerName : ARRAY bufBytes OF CHAR;
BEGIN
   bufSize := bufBytes;
   IF WinApi.GetComputerName (computerShort, bufSize) = WinApi.TRUE THEN
     computerName := LONG (computerShort)
   END;


Aubrey.McIntosh{([at]})nowhere.xy
> I have moved my SMTP email receiver from Bluebottle to Blackbox. It
> is connecting and receiving emails, and producing two files, a .RCP
> file and a .MSG file, that could be used for an SMTP mailbox delivery
> package. Overnight it received about 385 email that were forwarded
> from Google mail, and gave encouraging performance.
>
> It is not completely ported, however. There are at least 3 issues:
>
> 1. Do a reverse DNS name lookup. Anyone have a code snippet to do that?
> 2. Get the current machine's name.
> 3. Produce the current date in proper eMail format, set to GMT.
> Anyone have that?
> e.g. Thu, 21 May 2009 08:13:42 -0700 (PDT)
> 4. The procedure GetCh that delivers the next incoming character
> blocks. I haven't figured out a way around this. I would like ideas.
>
>
>
> ------------------------------------------------------------------------
>
>
> No virus found in this incoming message.
> Checked by AVG - www.avg.com
> Version: 8.5.339 / Virus Database: 270.12.35/2124 - Release Date: 05/20/09 06:22:00
>

----
To unsubscribe, send a message with body "SIGNOFF BLACKBOX" to LISTSERV{([at]})nowhere.xy----boundary-LibPST-iamunique-220483453_-_-
Content-type: application/rtf
Content-transfer-encoding: base64
Content-Disposition: attachment; filename="rtf-body.rtf"
e1xydGYxXGFuc2lcYW5zaWNwZzEyNTJcZnJvbXRleHQgXGRlZmYwe1xmb250dGJsDQp7XGYwXGZz
d2lzcyBBcmlhbDt9DQp7XGYxXGZtb2Rlcm4gQ291cmllciBOZXc7fQ0Ke1xmMlxmbmlsXGZjaGFy
c2V0MiBTeW1ib2w7fQ0Ke1xmM1xmbW9kZXJuXGZjaGFyc2V0MCBDb3VyaWVyIE5ldzt9fQ0Ke1xj
b2xvcnRibFxyZWQwXGdyZWVuMFxibHVlMDtccmVkMFxncmVlbjBcYmx1ZTI1NTt9DQpcdWMxXHBh
cmRccGxhaW5cZGVmdGFiMzYwIFxmMFxmczIwIEF1YnJleVxwYXINClxwYXINCjIpIC0gVHJ5IHRo
aXMgP1xwYXINClxwYXINCkNoZWVyc1xwYXINClxwYXINClJvYmVydFxwYXINClxwYXINClxwYXIN
ClxwYXINCkNPTlNUXHBhcg0KICAgYnVmQnl0ZXMgID0gIDQwO1xwYXINClZBUlxwYXINCiAgIGJ1
ZlNpemUgICAgICAgIDogIElOVEVHRVI7XHBhcg0KICAgY29tcHV0ZXJTaG9ydCAgOiAgQVJSQVkg
W3VudGFnZ2VkXSBidWZCeXRlcyAgT0YgIFNIT1JUQ0hBUjtccGFyDQogICBjb21wdXRlck5hbWUg
ICA6ICBBUlJBWSAgYnVmQnl0ZXMgIE9GICBDSEFSO1xwYXINCkJFR0lOXHBhcg0KICAgYnVmU2l6
ZSAgOj0gIGJ1ZkJ5dGVzO1xwYXINCiAgIElGICBXaW5BcGkuR2V0Q29tcHV0ZXJOYW1lIChjb21w
dXRlclNob3J0LCBidWZTaXplKSAgPSAgV2luQXBpLlRSVUUgIFRIRU5ccGFyDQogICAgIGNvbXB1
dGVyTmFtZSAgOj0gIExPTkcgKGNvbXB1dGVyU2hvcnQpXHBhcg0KICAgRU5EO1xwYXINClxwYXIN
ClxwYXINCkF1YnJleS5NY0ludG9zaEBBTFVNTkkuVVRFWEFTLk5FVCB3cm90ZTpccGFyDQo+IEkg
aGF2ZSBtb3ZlZCBteSBTTVRQIGVtYWlsIHJlY2VpdmVyIGZyb20gQmx1ZWJvdHRsZSB0byBCbGFj
a2JveC4gIEl0XHBhcg0KPiBpcyBjb25uZWN0aW5nIGFuZCByZWNlaXZpbmcgZW1haWxzLCBhbmQg
cHJvZHVjaW5nIHR3byBmaWxlcywgYSAuUkNQXHBhcg0KPiBmaWxlIGFuZCBhIC5NU0cgZmlsZSwg
dGhhdCBjb3VsZCBiZSB1c2VkIGZvciBhbiBTTVRQIG1haWxib3ggZGVsaXZlcnlccGFyDQo+IHBh
Y2thZ2UuICBPdmVybmlnaHQgaXQgcmVjZWl2ZWQgYWJvdXQgMzg1IGVtYWlsIHRoYXQgd2VyZSBm
b3J3YXJkZWRccGFyDQo+IGZyb20gR29vZ2xlIG1haWwsIGFuZCBnYXZlIGVuY291cmFnaW5nIHBl
cmZvcm1hbmNlLlxwYXINCj4gXHBhcg0KPiBJdCBpcyBub3QgY29tcGxldGVseSBwb3J0ZWQsIGhv
d2V2ZXIuICBUaGVyZSBhcmUgYXQgbGVhc3QgMyBpc3N1ZXM6XHBhcg0KPiBccGFyDQo+IDEuICBE
byBhIHJldmVyc2UgRE5TIG5hbWUgbG9va3VwLiAgQW55b25lIGhhdmUgYSBjb2RlIHNuaXBwZXQg
dG8gZG8gdGhhdD9ccGFyDQo+IDIuICBHZXQgdGhlIGN1cnJlbnQgbWFjaGluZSdzIG5hbWUuXHBh
cg0KPiAzLiAgUHJvZHVjZSB0aGUgY3VycmVudCBkYXRlIGluIHByb3BlciBlTWFpbCBmb3JtYXQs
IHNldCB0byBHTVQuXHBhcg0KPiBBbnlvbmUgaGF2ZSB0aGF0P1xwYXINCj4gICAgICAgICAgICAg
ICAgZS5nLiBUaHUsIDIxIE1heSAyMDA5IDA4OjEzOjQyIC0wNzAwIChQRFQpXHBhcg0KPiA0LiAg
VGhlIHByb2NlZHVyZSBHZXRDaCB0aGF0IGRlbGl2ZXJzIHRoZSBuZXh0IGluY29taW5nIGNoYXJh
Y3RlclxwYXINCj4gYmxvY2tzLiAgSSBoYXZlbid0IGZpZ3VyZWQgb3V0IGEgd2F5IGFyb3VuZCB0
aGlzLiAgSSB3b3VsZCBsaWtlIGlkZWFzLlxwYXINCj4gXHBhcg0KPiBccGFyDQo+IFxwYXINCj4g
LS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0tLS0t
LS0tLS0tLS0tLS0tLS0tXHBhcg0KPiBccGFyDQo+IFxwYXINCj4gTm8gdmlydXMgZm91bmQgaW4g
dGhpcyBpbmNvbWluZyBtZXNzYWdlLlxwYXINCj4gQ2hlY2tlZCBieSBBVkcgLSB3d3cuYXZnLmNv
bSBccGFyDQo+IFZlcnNpb246IDguNS4zMzkgLyBWaXJ1cyBEYXRhYmFzZTogMjcwLjEyLjM1LzIx
MjQgLSBSZWxlYXNlIERhdGU6IDA1LzIwLzA5IDA2OjIyOjAwXHBhcg0KPiBccGFyDQpccGFyDQpc
cGFyDQotLS0tXHBhcg0KVG8gdW5zdWJzY3JpYmUsIHNlbmQgYSBtZXNzYWdlIHdpdGggYm9keSAi
U0lHTk9GRiBCTEFDS0JPWCIgdG8gTElTVFNFUlZATElTVFMuT0JFUk9OLkNIfX0AQQAAAA==
----boundary-LibPST-iamunique-220483453_-_---

Received on Thu May 21 2009 - 19:35:36 UTC