🚀 go-pugleaf

"Peter Nunn" <pnunn@infotetq.com.au> wrote in message
news:44f789ba$1@newsgroups.borland.com...

> I've put together a console app with an attached data module
> following some advice I found searching on here, but for some
> reason the UDP control never gets a message it seems.

Which component(s) are you using exactly?  What does your actual code look
like?

> Am I missing a process loop or something similar?

Maybe, but it is dificult to say for sure until you provide more details.


Gambit

Hi Remy,

thanks for the reply.

I'm using Indy 9 in BCB6 and have an IdUDPServer on a data module.

I've put the following in the UDPRead even handler...

  char *lpszResult = new char[AData->Size + 1];

  AData->ReadBuffer(lpszResult, AData->Size);
  lpszResult[AData->Size] = 0;
  file << lpszResult << endl;
  if(strcmp("die", lpszResult) == 0)
  {
    m_die = true;
  }

  delete lpszResult;


but it never gets called.

The Console app has the following main..

int main(int argc, char* argv[])
{
  // parse environment variables to get file name
  if(argc < 3)
  {
    // something went wrong, no file handle here
    ofstream out("err_log.txt");
    out << "Didn't get enough command line parameters" << endl;
    return 1;
  }

  bool die = false;

  // create data module.
  THiddenDataModule* dm = new THiddenDataModule(NULL, argv[1], die);
  dm->file.open(argv[1]);
  dm->IdUDPServer->Active = false;
  //dm->IdUDPServer->DefaultPort = argv[2];
  dm->IdUDPServer->DefaultPort = 4000;
  dm->IdUDPServer->Active = true;

  // loop
  for(;;)
  {
    Sleep(100);
    if(die)
      break;
  }

  return 0;
}


die is a reference to a bool in the constructor.

Thanks agan.
Peter.


Remy Lebeau (TeamB) wrote:
> "Peter Nunn" <pnunn@infotetq.com.au> wrote in message
> news:44f789ba$1@newsgroups.borland.com...
>
> > I've put together a console app with an attached data module
> > following some advice I found searching on here, but for some
> > reason the UDP control never gets a message it seems.
>
> Which component(s) are you using exactly?  What does your actual code look
> like?
>
> > Am I missing a process loop or something similar?
>
> Maybe, but it is dificult to say for sure until you provide more details.
> 
> 
> Gambit

Remy,

thankyou for this reply, I'm finally back to this (got to love managing 
developers... sigh).

The code I have is as follows...

In the console app..

> ofstream res_file;
> 
> //void __fastcall TimerHandler(TObject *Sender);
> //---------------------------------------------------------------------------
> 
> #pragma argsused
> int main(int argc, char* argv[])
> {
>   // parse environment variables to get file name
>   if(argc < 3)
>   {
>     // something went wrong, no file handle here
>     ofstream out("err_log.txt");
>     out << "Didn't get enough command line parameters" << endl;
>     return 1;
>   }
> 
>   bool die = false;
> 
>   // create data module.
>   THiddenDataModule* dm = new THiddenDataModule(NULL, argv[1], die);
>   dm->file.open(argv[1]);
>   dm->IdUDPServer->Active = false;
>   //dm->IdUDPServer->DefaultPort = argv[2];
>   dm->IdUDPServer->DefaultPort = 4000;
>   dm->IdUDPServer->Active = true;
> 
>   // loop
>   for(;;)
>   {
>     Sleep(100);
>     if(die)
>       break;
>   }
> 
>   return 0;
> }

and in the data module at event handler of
> void __fastcall THiddenDataModule::IdUDPServerUDPRead(TObject *Sender,
>       TStream *AData, TIdSocketHandle *ABinding)
> {
>   char *lpszResult = new char[AData->Size + 1];
> 
>   AData->ReadBuffer(lpszResult, AData->Size);
>   lpszResult[AData->Size] = 0;
>   file << lpszResult << endl;
>   if(strcmp("die", lpszResult) == 0)
>   {
>     m_die = true;
>   }
> 
>   delete lpszResult;
> }

When I run the client with the parameters of file.txt 400 and try and 
send packages to it, the event handler never gets called.

The same code in a window application works fine.

My reason for doing this (if it helps) is to try and decide if I should 
be using stand alone procedures started from a service to do some work 
for me, or just threads launched by the service (which is how its being 
done now).

I want to see if I can make a console app handle udp messages, and then 
I'll try launching it from a service.

Hope that all makes sense.

Hope someone can help me out here.

Ta.

Peter.




Remy Lebeau (TeamB) wrote:
> "Peter Nunn" <pnunn@infotetq.com.au> wrote in message
> news:44f789ba$1@newsgroups.borland.com...
> 
>> I've put together a console app with an attached data module
>> following some advice I found searching on here, but for some
>> reason the UDP control never gets a message it seems.
> 
> Which component(s) are you using exactly?  What does your actual code look
> like?
> 
>> Am I missing a process loop or something similar?
> 
> Maybe, but it is dificult to say for sure until you provide more details.
> 
> 
> Gambit
> 
> 

pnunn wrote:

>>   THiddenDataModule* dm = new THiddenDataModule(NULL, argv[1], die);
>>   dm->file.open(argv[1]);
>>   dm->IdUDPServer->Active = false;
>>   //dm->IdUDPServer->DefaultPort = argv[2];
>>   dm->IdUDPServer->DefaultPort = 4000;
>>   dm->IdUDPServer->Active = true;

Did you set IdUDPServer->ThreadedEvent to true?

>>   for(;;)
>>   {
>>     Sleep(100);
>>     if(die)
>>       break;
>>   }
	while( ! die )
		Sleep(100);

But even better, especially for services, would be to use a WaitFor.

You never closed the file.
	dm->file.close;

Bob,

thankyou so much.. that was what was missing.

Now.. to see if I can start processes from a service and track them easily

Peter.

Bob Gonder wrote:

> pnunn wrote:
> 
>>>   THiddenDataModule* dm = new THiddenDataModule(NULL, argv[1], die);
>>>   dm->file.open(argv[1]);
>>>   dm->IdUDPServer->Active = false;
>>>   //dm->IdUDPServer->DefaultPort = argv[2];
>>>   dm->IdUDPServer->DefaultPort = 4000;
>>>   dm->IdUDPServer->Active = true;
> 
> Did you set IdUDPServer->ThreadedEvent to true?
> 
>>>   for(;;)
>>>   {
>>>     Sleep(100);
>>>     if(die)
>>>       break;
>>>   }
> while( ! die )
> Sleep(100);
> 
> But even better, especially for services, would be to use a WaitFor.
> 
> You never closed the file.
> dm->file.close;