tcl-threads — Discussion of threading in Tcl and the Thread extension.

Re: [Tcl-Threads] Tcl thread and expect

[Devin E. <de...@im...>]

http://wiki.tcl.tk/11581

 

________________________________

From: tcl...@li...
[mailto:tcl...@li...] On Behalf Of Indrojit
Paul
Sent: Thursday, July 24, 2008 8:11 AM
To: tcl...@li...
Subject: [Tcl-Threads] Tcl thread and expect

 

Hi,

Basically I am trying to spawn a telnet session from a separate thread.

Following Tcl script is executed on a Windows machine.

 

package require Thread 

set threadId [thread::create]

thread::send $threadId {

    package require Expect

    spawn telnet 10.101.210.200

    expect  {

    "login:"            { send -- "test\n" }

     }

    expect  {

    "Password:"         { send -- "test123\n" }

    }

    send -- "exit\n"

    expect "logout"

}

thread::release $threadId

 

I get the error "FlushChannel: damaged channel list" at the end of
execution.

The telnet session goes well but at the end of execution I get the above
error.

Following packages are used

Tcl8.5.3

Expect5.43

Thread2.6.5

Is there any solution for this?

 

Regards,

Indrojit Paul

 

DISCLAIMER:
------------------------------------------------------------------------
-----------------------------------------------

The contents of this e-mail and any attachment(s) are confidential and
intended for the named recipient(s) only.
It shall not attach any liability on the originator or HCL or its
affiliates. Any views or opinions presented in 
this email are solely those of the author and may not necessarily
reflect the opinions of HCL or its affiliates.
Any form of reproduction, dissemination, copying, disclosure,
modification, distribution and / or publication of 
this message without the prior written consent of the author of this
e-mail is strictly prohibited. If you have
received this email in error please delete it and notify the sender
immediately. Before opening any mail and 
attachments please check them for viruses and defect.

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

[Tcl-Threads] Tcl thread and expect

[Indrojit P. <Ind...@hc...>]

Hi,

Basically I am trying to spawn a telnet session from a separate thread.

Following Tcl script is executed on a Windows machine.

 

package require Thread 

set threadId [thread::create]

thread::send $threadId {

    package require Expect

    spawn telnet 10.101.210.200

    expect  {

    "login:"            { send -- "test\n" }

     }

    expect  {

    "Password:"         { send -- "test123\n" }

    }

    send -- "exit\n"

    expect "logout"

}

thread::release $threadId

 

I get the error "FlushChannel: damaged channel list" at the end of
execution.

The telnet session goes well but at the end of execution I get the above
error.

Following packages are used

Tcl8.5.3

Expect5.43

Thread2.6.5

Is there any solution for this?

 

Regards,

Indrojit Paul

 



DISCLAIMER:
-----------------------------------------------------------------------------------------------------------------------

The contents of this e-mail and any attachment(s) are confidential and intended for the named recipient(s) only.
It shall not attach any liability on the originator or HCL or its affiliates. Any views or opinions presented in 
this email are solely those of the author and may not necessarily reflect the opinions of HCL or its affiliates.
Any form of reproduction, dissemination, copying, disclosure, modification, distribution and / or publication of 
this message without the prior written consent of the author of this e-mail is strictly prohibited. If you have
received this email in error please delete it and notify the sender immediately. Before opening any mail and 
attachments please check them for viruses and defect.

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

Re: [Tcl-Threads] tcl threads vs fork

[Andrew P. <at...@pi...>]

On Mon, Jun 09, 2008 at 10:08:44PM -0600, Manu Venkatachalaiah wrote:
> I am developing a framework to generate traffic to Switch. I have to
> generate parallel traffics like snmpwalk, ping etc. of 100's of
> sessions. Till now I have a framework to do this job serially. Going
> forward I need to generate these traffics in parallel and for hours
> together.

The Tcl Threads Extension has very nice APIs for inter-thread
communication, synchronization, etc.  AFAIK support in Tcl for
multiple processes is much more limited, so I certainly recommend
trying the Threads Extension.  (Depending on the details of what
you're doing, a single process, single thread, event driven model
might also be appropriate.)

Btw, since it uses Tcl's Apartment Threading model, in principle it
should be straightforward to build the exact same Tcl Threads
Extension API on top of multiple processes and shared memory (System
V, POSIX), but no one has ever needed or wanted that enough to build
it.

-- 
Andrew Piskorski <at...@pi...>
http://www.piskorski.com/

Re: [Tcl-Threads] tcl threads vs fork

[Andrew P. <at...@pi...>]

On Mon, Jun 09, 2008 at 06:39:47AM -0600, Manu Venkatachalaiah wrote:

>   I am new to TCL. Just a simple question!  I have to use either fork or
> threads in my framework. Which will be good in long run? Because I will
> be developing many modules on top of this framework.

This is a rather strange question to ask.  If you want useful advice
from us, you'll probably need to actually tell us something about what
you're trying to accomplish in building your "framework", what your
thoughts and plans for solving it are so far, and why you think that
either multiple threads or processes might be a good solution.

-- 
Andrew Piskorski <at...@pi...>
http://www.piskorski.com/

[Tcl-Threads] tcl threads vs fork

[Manu V. <mve...@br...>]

Hi,

  I am new to TCL. Just a simple question!  I have to use either fork or
threads in my framework. Which will be good in long run? Because I will
be developing many modules on top of this framework.

Please suggest me the solution?

Thanks,

 Manu

Re: [Tcl-Threads] Implementing an IVR system - Menu with several choices - TCL and some questions.

[Jeff H. <je...@ac...>]

Hi Ricardo,

BananaMaster wrote:
> I've got a few questions i would like to place.
> 
> I'm beginning to learn TCL and there are a few things i've yet to
> understand. Namely, FSM and EVENT / STATUS codes.
	...

These seem generally Tcl oriented, bu this is the list for discussion 
about Tcl's Thread extension and threads in Tcl, which don't apply here. 
  I think you are better off asking on news:comp.lang.tcl.

Regards,

Jeff

[Tcl-Threads] Implementing an IVR system - Menu with several choices - TCL and some questions.

[BananaMaster <mon...@gm...>]

Hello all!

How are you today?

I've got a few questions i would like to place.

I'm beginning to learn TCL and there are a few things i've yet to
understand. Namely, FSM and EVENT / STATUS codes.

About the FSM, someone showed me a drawing that explained the work of the
FSM, comparing it to a automatic door action: states like in open and close,
state transitions like in opening door because i click the sensor or close
door and the end states like in door opened or closed.

So, i want to implement a simple ivr menu where a person would call and
liste: "choose your option. 1 or 2". Then the person would choose the option
and hear, according to its choice, the corresponding prompt - "you choose 1"
or "you choose 2".

Is this better done with FSM ? I mean, i was thinking of having a proc
called PLAY_DIGIT_MESSAGE and inside it a cycle with IFS, so IF CHOISE WAS 1
PLAY THIS..something like this.

I think i didnt fully understand the correct function of the FSM nor its
states. Can anyone point me in the right direction?

What i currently have is this:


(...)

media play leg_incoming "tftp://192.168.255.10/ptFantasporto01.au"
leg collectdigits leg_incoming param

and

set fsm(any_state,ev_collectdigits_done) "act_GotDest same_state"

that calls

proc act_GotDest { } {
puts "Entrei no proc act_GotDest"    
global dest
global status

set status [infotag get evt_status]
if { $status == "cd_005" } {
set dest [infotag get evt_dcdigits]
puts "$dest"

    if { $dest == 1 } {
        media play leg_incoming "tftp://192.168.255.10/som1.au"    
    }
    if { $dest == 2 } {
        media play leg_incoming "tftp://192.168.255.10/som2.au"    
    }
    if { $dest == 3 } {
        media play leg_incoming "tftp://192.168.255.10/som3.au"    
    }
} else {
call close
}
}


is this a good way to start? I've been told i choose use FSM  to manage this
type of calls. I will have lots of traffic and a second menu. Is this a good
start?




--- got some help and comments, so i changed to this ---

Hello again.
I'm been told i could do something like this ( and it would be a lot better
)

proc init { } {
      
    global param
   
    set param(maxDigits) 1
    set param(initialDigitTimeout) 5
    set param(dialPlan) true
 
    array set transition {
        Start,1 {Review_submenu Play_review_prompt}
        Start,2 {Send_submenu Play_send_prompt}
        Review_submenu,1 {Play_menu Play_first_message}
    }
 
}
 
proc act_Setup { } {
 
    puts "enter act_Setup"
    global ani
    global dnis
    global param
 
    #ani - number from where user is calling
    set ani [infotag get leg_ani]
    #dnis - number to where user is calling
    set dnis [infotag get leg_dnis]
 
    leg setupack leg_incoming
    leg proceeding leg_incoming
    leg connect leg_incoming
 
    media play leg_incoming "tftp://192.168.255.10/sominicio.au"
    leg collectdigits leg_incoming param
 
}
 

#=========================================================================

 I want to implement this

proc act_GotDest { } {

puts "Entrei no proc act_GotDest"       

global dest
global status
 
set status [infotag get evt_status]
 if { $status == "cd_005" } {
set dest [infotag get evt_dcdigits]
puts "$dest"
 
        if { $dest == 1 } {
                media play leg_incoming
"tftp://192.168.255.10/ptFantasporto02.au"     
        }
        if { $dest == 2 } {
                media play leg_incoming
"tftp://192.168.255.10/ptCruzVermelha01.au"     
        }
        if { $dest == 3 } {
                media play leg_incoming
"tftp://192.168.255.10/ptCaixaForteAcertou.au"
        }
} else {
call close
}
}

using the fsm system implemented witht the array.
#=========================================================================
 
init
requiredversion 2.0

set fsm(CALL_INIT,ev_setup_indication) "act_Setup MEDIAPLAY"
fsm define fsm CALL_INIT

Any ideas? Inside the === are my questions!

How does the array system work? I mean, i need some kind of cycle to say
"hey, keep reading doing this routine until it ends" in order the array to
be read everytime or somehing..

And how would i ADD something to the array? and which format....? im
completely lost!!

THANKS

Ricardo
-- 
View this message in context: http://www.nabble.com/Implementing-an-IVR-system---Menu-with-several-choices---TCL-and-some-questions.-tp16825389p16825389.html
Sent from the tcl-threads mailing list archive at Nabble.com.

Re: [Tcl-Threads] Ivr implementation - need of TCL ?

[Jeff H. <je...@ac...>]

Hi Banana,

While you are correct that Cisco IVR scripts are Tcl scripts with some 
extra procedures, this isn't the right venue for answering those 
questions.  This list if for discussion of Tcl threaded programming.

For an intro to Tcl, start at http://www.tcl.tk/ which leads to a couple 
of intro pages, and then lots more at http://wiki.tcl.tk/.

Regards,

Jeff

BananaMaster wrote:
> Hello all
> 
> I've got several questions and read a lot of things, including manuals on
> Cisco sites, Tcl programming tutorials ( etc ).
> 
> Let me get to the point.
> 
> 1 - i need to implement an IVR application, like in To support press 1, to
> information press 2, etc etc. Of course some of the options redirects the
> caller to a sub-menu where a new set of options would be displayed.
> 
> I think this can be done fairly easy with TCL, and, as i've been told, TCL
> is the recommend way to do this since if the IVR options are "coded" in the
> routers, i wouldnt be able to save any of the information regarding the
> calls received - like number of calls, what is the most choosed option, etc.
> 
> I download some scripts ( and software ) from Active State so i could start
> developing and debuging some scripts but i'me getting some errors..for
> instance, 
> 
> "init
> requiredversion 2.0
> 
> set fsm(any_state,ev_disconnected) "act_Doe same_state..."
> 
> have this on a script ( that works ) and im getting the invlaid command name
> "requiredversion" error..
> 
> I really need to implement this and i've been given a surreal deadline...and
> almost impossible.
> 
> Really need any help i can get. I don't know TCL, i admit, but i'm a fairly
> good developer who learns fast.
> 
> Just need the "intro". 
> 
> Thank you very very very much!

[Tcl-Threads] Ivr implementation - need of TCL ?

[BananaMaster <mon...@gm...>]

Hello all

I've got several questions and read a lot of things, including manuals on
Cisco sites, Tcl programming tutorials ( etc ).

Let me get to the point.

1 - i need to implement an IVR application, like in To support press 1, to
information press 2, etc etc. Of course some of the options redirects the
caller to a sub-menu where a new set of options would be displayed.

I think this can be done fairly easy with TCL, and, as i've been told, TCL
is the recommend way to do this since if the IVR options are "coded" in the
routers, i wouldnt be able to save any of the information regarding the
calls received - like number of calls, what is the most choosed option, etc.

I download some scripts ( and software ) from Active State so i could start
developing and debuging some scripts but i'me getting some errors..for
instance, 

"init
requiredversion 2.0

set fsm(any_state,ev_disconnected) "act_Doe same_state..."

have this on a script ( that works ) and im getting the invlaid command name
"requiredversion" error..

I really need to implement this and i've been given a surreal deadline...and
almost impossible.

Really need any help i can get. I don't know TCL, i admit, but i'm a fairly
good developer who learns fast.

Just need the "intro". 

Thank you very very very much!
-- 
View this message in context: http://www.nabble.com/Ivr-implementation---need-of-TCL---tp16700145p16700145.html
Sent from the tcl-threads mailing list archive at Nabble.com.

[Tcl-Threads] Core dump when using 'clock format ...' in a thread

[Stefan E. <se...@fr...>]

Hi,

on HP-UX 11 with Tcl 8.5.1 I get a core dump when using any kind of 
'clock format ...' within a thread.
On Linux I lost my KDE 'control bar' when running the script.

Stefan

Re: [Tcl-Threads] no children error while executing the script

[calsum <cal...@gm...>]

Sorry Jeff and thanks for the reply.



Jeff Hobbs wrote:
> 
> It means you asked to wait, but there was nothing to wait for ...
> 
> Why did you send this to tcl-threads though?
> 
> Jeff
> 
> calsum wrote:
>> Can anyone tell me what does this error message mean?.
>> 
>> 
>> no children
>>     while executing
>> "exp_wait -nowait -i -1"
>>     (procedure "logOptions" line 45)
>>     invoked from within
>> "logOptions"
>>     (procedure "doExecute" line 98)
>>     invoked from within
>> "doExecute"
>>     (procedure "main" line 32)
>>     invoked from within
>> "main $argc $argv"
> 
> 
> -------------------------------------------------------------------------
> This SF.net email is sponsored by: Microsoft
> Defy all challenges. Microsoft(R) Visual Studio 2008.
> http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
> _______________________________________________
> Tcl-Threads mailing list
> Tcl...@li...
> https://lists.sourceforge.net/lists/listinfo/tcl-threads
> 
> 

-- 
View this message in context: http://www.nabble.com/no-children-error-while-executing-the-script-tp16275102p16286974.html
Sent from the tcl-threads mailing list archive at Nabble.com.

Re: [Tcl-Threads] no children error while executing the script

[Jeff H. <je...@ac...>]

It means you asked to wait, but there was nothing to wait for ...

Why did you send this to tcl-threads though?

Jeff

calsum wrote:
> Can anyone tell me what does this error message mean?.
> 
> 
> no children
>     while executing
> "exp_wait -nowait -i -1"
>     (procedure "logOptions" line 45)
>     invoked from within
> "logOptions"
>     (procedure "doExecute" line 98)
>     invoked from within
> "doExecute"
>     (procedure "main" line 32)
>     invoked from within
> "main $argc $argv"

[Tcl-Threads] no children error while executing the script

[calsum <cal...@gm...>]

Can anyone tell me what does this error message mean?.


no children
    while executing
"exp_wait -nowait -i -1"
    (procedure "logOptions" line 45)
    invoked from within
"logOptions"
    (procedure "doExecute" line 98)
    invoked from within
"doExecute"
    (procedure "main" line 32)
    invoked from within
"main $argc $argv"


-- 
View this message in context: http://www.nabble.com/no-children-error-while-executing-the-script-tp16275102p16275102.html
Sent from the tcl-threads mailing list archive at Nabble.com.

[Tcl-Threads] CVS rel-2-6-5-branch vs. thread-2-6-5-branch

[Andrew P. <at...@pi...>]

Zoran, in the Tcl Threads Package CVS, what's the difference between
rel-2-6-5-branch and thread-2-6-5-branch?

$ cvs stat -v README
Existing Tags:
     core-8-4-14                     (revision: 1.13)
     rel-2-6-5                       (revision: 1.13)
     rel-2-6-5-branch                (branch: 1.13.6)
     thread-2-6-5-branch             (branch: 1.13.4)
     thread-2-6-5                    (revision: 1.13)
     thread-2-6-4-branch             (branch: 1.13.2)
     thread-2-6-4                    (revision: 1.13)

Thanks!

-- 
Andrew Piskorski <at...@pi...>
http://www.piskorski.com/

Re: [Tcl-Threads] Tcl - Threads.

[Jeff H. <je...@ac...>]

rathin raj wrote:
> I am new to Tcl-Threads. So guys, so please can u give me some good 
> sites which have some theory and some sample programs.

Start here:
	http://www.tcl.tk/doc/howto/thread_model.html

and then refer to whatever the wiki has.

Jeff

[Tcl-Threads] Tcl - Threads.

[rathin r. <mee...@ya...>]

Hai ,

I am new to Tcl-Threads. So guys, so please can u give me some good sites which have some theory and some sample programs.

Regards,
Rathin

       
---------------------------------
Yahoo! oneSearch: Finally,  mobile search that gives answers, not web links. 

Re: [Tcl-Threads] Issues installing 8.4 with pthread enabled

[Dibyajyoti G. <dib...@gm...>]

Hi all,
 Everything was fine, moment I installed expect using apt-get install, when
I do package require Thread, it gives me "can't find package thread". Do yo=
u
have expect compatible with Thread2.6.5 and Tcl8.5.15?? If yes please point
me to that expect package. And do I need to install TCL,Thread 2.6.5 and
then expect in this order?

Thanks in adavance,
 -DJ

On 9/7/07, Dibyajyoti Guha <dib...@gm...> wrote:
>
> Hi Devin,
>  Thanks a lot for your response. Finally I am able to enable thread in
> TCL. I was facing issue this issue for last 3 days. Finally able to insta=
ll.
> Will catch you if I face any critical issue when I implement it.
>
> Thanks and regards,
>  -DJ
>
> On 9/6/07, Devin Eyre <de...@im...> wrote:
> >
> >  It needs to be in a sibling directory to the tcl source directory.
> >
> > cd /usr/local/src
> >
> > tar xvzf "path_to_tgz_file"
> >
> > cd thread-2.6.5
> >
> > ./configure =96enable-pthreads
> >
> > make
> >
> > make install
> >
> >
> >
> > Devin Eyre
> >
> > Lead Software Developer
> >
> > ImpactWeather, Inc.
> >
> > 713 948-6018
> >
> > www.impactweather.com
> >
> > *Your Weather Department*
> >   ------------------------------
> >
> > *From:* Dibyajyoti Guha [mailto:dib...@gm...]
> > *Sent:* Thursday, September 06, 2007 8:09 AM
> > *To:* Devin Eyre
> > *Cc:* tcl...@li...
> > *Subject:* Re: [Tcl-Threads] Issues installing 8.4 with pthread enabled
> >
> >
> >
> > Hi,
> >  Thanks a lot for your response. Could you please point me out for
> > compilation and installation. I got one tar.gz from
> > http://downloads.sourceforge.net/tcl/thread2.6.5.tar.gz?modtime=3D11602=
21454&big_mirror=3D1but not able to compile it. Do I need to copy this
> > tar.gz in some particular directory?
> >
> > Thanks and regards,
> >  -DJ
> >
> > On 9/6/07, *Devin Eyre* <de...@im...> wrote:
> >
> > There's another package that you'll have to download, compile, and
> > install called thread. It's available from the Tcl Foundry at sourcefor=
ge.
> >
> > -----Original Message-----
> > From: tcl...@li... <tcl-threads-bounces@li=
sts.sourceforge.net
> > >
> > To: tcl...@li... <tcl...@li...=
t
> > >
> > Sent: Thu Sep 06 03:08:39 2007
> > Subject: [Tcl-Threads] Issues installing 8.4 with pthread enabled
> >
> > Hi,
> >  I am new to using thread in TCL . I am trying to install tcl8.4.15 wit=
h
> > --enable-pthreads on Debian. I did follwing steps :
> > 1. downloaded from http://prdownloads.sourceforge.net/tcl/tcl8.4.15-src=
.tar.gz
> > <http://prdownloads.sourceforge.net/tcl/tcl8.4.15-src.tar.gz>
> > 2. copied to /usr/local/src
> > 3. untared and cd /usr/local/src/tcl8.4.15/unix/
> >  ./configure --enable-pthreads
> > 4. make
> > 5. make test
> > 6. make install
> >
> > In my tcl script whenever I give "package require Thread" , it gives me
> > ::
> > can't find package Thread
> > while executing
> > "package require Thread"
> > (file "./sample.tcl" line 2)
> >
> > It will be really helpful if someone helps me to install tcl8.4 with
> > thread enabled.
> >
> > Thanks and regards,
> > --
> > Dibyajyoti Guha
> > Senior Software Engineer
> > Sipera Systems Inc., Hyderabad-82
> >
> >
> >
> >
> > --
> > Dibyajyoti Guha
> > Mob : 09989428949
> > Senior Software Engineer
> > Sipera Systems Inc., Hyderabad-82
> >
>
>
>
> --
> Dibyajyoti Guha
> Mob : 09989428949
> Senior Software Engineer
> Sipera Systems Inc., Hyderabad-82
>



--=20
Dibyajyoti Guha
Mob : 09989428949
Senior Software Engineer
Sipera Systems Inc., Hyderabad-82

Re: [Tcl-Threads] Issues installing 8.4 with pthread enabled

[Dibyajyoti G. <dib...@gm...>]

Hi Devin,
 Thanks a lot for your response. Finally I am able to enable thread in TCL.
I was facing issue this issue for last 3 days. Finally able to install. Wil=
l
catch you if I face any critical issue when I implement it.

Thanks and regards,
 -DJ

On 9/6/07, Devin Eyre <de...@im...> wrote:
>
>  It needs to be in a sibling directory to the tcl source directory.
>
> cd /usr/local/src
>
> tar xvzf "path_to_tgz_file"
>
> cd thread-2.6.5
>
> ./configure =96enable-pthreads
>
> make
>
> make install
>
>
>
> Devin Eyre
>
> Lead Software Developer
>
> ImpactWeather, Inc.
>
> 713 948-6018
>
> www.impactweather.com
>
> *Your Weather Department*
>   ------------------------------
>
> *From:* Dibyajyoti Guha [mailto:dib...@gm...]
> *Sent:* Thursday, September 06, 2007 8:09 AM
> *To:* Devin Eyre
> *Cc:* tcl...@li...
> *Subject:* Re: [Tcl-Threads] Issues installing 8.4 with pthread enabled
>
>
>
> Hi,
>  Thanks a lot for your response. Could you please point me out for
> compilation and installation. I got one tar.gz from
> http://downloads.sourceforge.net/tcl/thread2.6.5.tar.gz?modtime=3D1160221=
454&big_mirror=3D1but not able to compile it. Do I need to copy this
> tar.gz in some particular directory?
>
> Thanks and regards,
>  -DJ
>
> On 9/6/07, *Devin Eyre* <de...@im...> wrote:
>
> There's another package that you'll have to download, compile, and instal=
l
> called thread. It's available from the Tcl Foundry at sourceforge.
>
> -----Original Message-----
> From: tcl...@li... <tcl-threads-bounces@list=
s.sourceforge.net
> >
> To: tcl...@li... < tcl...@li...=
>
> Sent: Thu Sep 06 03:08:39 2007
> Subject: [Tcl-Threads] Issues installing 8.4 with pthread enabled
>
> Hi,
>  I am new to using thread in TCL . I am trying to install tcl8.4.15 with
> --enable-pthreads on Debian. I did follwing steps :
> 1. downloaded from
> http://prdownloads.sourceforge.net/tcl/tcl8.4.15-src.tar.gz <
> http://prdownloads.sourceforge.net/tcl/tcl8.4.15-src.tar.gz>
> 2. copied to /usr/local/src
> 3. untared and cd /usr/local/src/tcl8.4.15/unix/
>  ./configure --enable-pthreads
> 4. make
> 5. make test
> 6. make install
>
> In my tcl script whenever I give "package require Thread" , it gives me :=
:
> can't find package Thread
> while executing
> "package require Thread"
> (file "./sample.tcl" line 2)
>
> It will be really helpful if someone helps me to install tcl8.4 with
> thread enabled.
>
> Thanks and regards,
> --
> Dibyajyoti Guha
> Senior Software Engineer
> Sipera Systems Inc., Hyderabad-82
>
>
>
>
> --
> Dibyajyoti Guha
> Mob : 09989428949
> Senior Software Engineer
> Sipera Systems Inc., Hyderabad-82
>



--=20
Dibyajyoti Guha
Mob : 09989428949
Senior Software Engineer
Sipera Systems Inc., Hyderabad-82

Re: [Tcl-Threads] Issues installing 8.4 with pthread enabled

[Jeff H. <je...@ac...>]

Dibyajyoti Guha wrote:
	[re: Thread package]
>  Thanks a lot for your response. Could you please point me out for 
> compilation and installation. I got one tar.gz from 
> http://downloads.sourceforge.net/tcl/thread2.6.5.tar.gz?modtime=1160221454&big_mirror=1 
> but not able to compile it. Do I need to copy this tar.gz in some 
> particular directory?

Can you expand on the problems you had compiling it?

Jeff

Re: [Tcl-Threads] Issues installing 8.4 with pthread enabled

[Devin E. <de...@im...>]

It needs to be in a sibling directory to the tcl source directory.

cd /usr/local/src

tar xvzf "path_to_tgz_file"

cd thread-2.6.5

./configure -enable-pthreads

make

make install

=20

Devin Eyre

Lead Software Developer

ImpactWeather, Inc.

713 948-6018

www.impactweather.com

Your Weather Department

________________________________

From: Dibyajyoti Guha [mailto:dib...@gm...]=20
Sent: Thursday, September 06, 2007 8:09 AM
To: Devin Eyre
Cc: tcl...@li...
Subject: Re: [Tcl-Threads] Issues installing 8.4 with pthread enabled

=20

Hi,
 Thanks a lot for your response. Could you please point me out for
compilation and installation. I got one tar.gz from
http://downloads.sourceforge.net/tcl/thread2.6.5.tar.gz?modtime=3D1160221=
4
54&big_mirror=3D1 but not able to compile it. Do I need to copy this
tar.gz in some particular directory?

Thanks and regards,
 -DJ

On 9/6/07, Devin Eyre <de...@im...> wrote:

There's another package that you'll have to download, compile, and
install called thread. It's available from the Tcl Foundry at
sourceforge.

-----Original Message-----
From: tcl...@li... <
tcl...@li...
<mailto:tcl...@li...> >
To: tcl...@li... <
tcl...@li...
<mailto:tcl...@li...> >
Sent: Thu Sep 06 03:08:39 2007
Subject: [Tcl-Threads] Issues installing 8.4 with pthread enabled

Hi,
 I am new to using thread in TCL . I am trying to install tcl8.4.15 with
--enable-pthreads on Debian. I did follwing steps :
1. downloaded from
http://prdownloads.sourceforge.net/tcl/tcl8.4.15-src.tar.gz
<http://prdownloads.sourceforge.net/tcl/tcl8.4.15-src.tar.gz>=20
2. copied to /usr/local/src
3. untared and cd /usr/local/src/tcl8.4.15/unix/
 ./configure --enable-pthreads
4. make
5. make test
6. make install

In my tcl script whenever I give "package require Thread" , it gives me
::
can't find package Thread
while executing
"package require Thread"
(file "./sample.tcl" line 2)

It will be really helpful if someone helps me to install tcl8.4 with
thread enabled.

Thanks and regards,
--
Dibyajyoti Guha
Senior Software Engineer
Sipera Systems Inc., Hyderabad-82




--=20
Dibyajyoti Guha
Mob : 09989428949
Senior Software Engineer
Sipera Systems Inc., Hyderabad-82=20

Re: [Tcl-Threads] Issues installing 8.4 with pthread enabled

[Dibyajyoti G. <dib...@gm...>]

Hi,
 Thanks a lot for your response. Could you please point me out for
compilation and installation. I got one tar.gz from
http://downloads.sourceforge.net/tcl/thread2.6.5.tar.gz?modtime=1160221454&big_mirror=1but
not able to compile it. Do I need to copy this
tar.gz in some particular directory?

Thanks and regards,
 -DJ

On 9/6/07, Devin Eyre <de...@im...> wrote:
>
>  There's another package that you'll have to download, compile, and
> install called thread. It's available from the Tcl Foundry at sourceforge.
>
> -----Original Message-----
> From: tcl...@li... <
> tcl...@li...>
> To: tcl...@li... <tcl...@li...>
> Sent: Thu Sep 06 03:08:39 2007
> Subject: [Tcl-Threads] Issues installing 8.4 with pthread enabled
>
> Hi,
>  I am new to using thread in TCL . I am trying to install tcl8.4.15 with
> --enable-pthreads on Debian. I did follwing steps :
> 1. downloaded from
> http://prdownloads.sourceforge.net/tcl/tcl8.4.15-src.tar.gz <
> http://prdownloads.sourceforge.net/tcl/tcl8.4.15-src.tar.gz>
> 2. copied to /usr/local/src
> 3. untared and cd /usr/local/src/tcl8.4.15/unix/
>  ./configure --enable-pthreads
> 4. make
> 5. make test
> 6. make install
>
> In my tcl script whenever I give "package require Thread" , it gives me ::
> can't find package Thread
> while executing
> "package require Thread"
> (file "./sample.tcl" line 2)
>
> It will be really helpful if someone helps me to install tcl8.4 with
> thread enabled.
>
> Thanks and regards,
> --
> Dibyajyoti Guha
> Senior Software Engineer
> Sipera Systems Inc., Hyderabad-82
>



-- 
Dibyajyoti Guha
Mob : 09989428949
Senior Software Engineer
Sipera Systems Inc., Hyderabad-82

Re: [Tcl-Threads] Issues installing 8.4 with pthread enabled

[Devin E. <de...@im...>]

VGhlcmUncyBhbm90aGVyIHBhY2thZ2UgdGhhdCB5b3UnbGwgaGF2ZSB0byBkb3dubG9hZCwgY29t
cGlsZSwgYW5kIGluc3RhbGwgY2FsbGVkIHRocmVhZC4gSXQncyBhdmFpbGFibGUgZnJvbSB0aGUg
VGNsIEZvdW5kcnkgYXQgc291cmNlZm9yZ2UuIA0KDQotLS0tLU9yaWdpbmFsIE1lc3NhZ2UtLS0t
LQ0KRnJvbTogdGNsLXRocmVhZHMtYm91bmNlc0BsaXN0cy5zb3VyY2Vmb3JnZS5uZXQgPHRjbC10
aHJlYWRzLWJvdW5jZXNAbGlzdHMuc291cmNlZm9yZ2UubmV0Pg0KVG86IHRjbC10aHJlYWRzQGxp
c3RzLnNvdXJjZWZvcmdlLm5ldCA8dGNsLXRocmVhZHNAbGlzdHMuc291cmNlZm9yZ2UubmV0Pg0K
U2VudDogVGh1IFNlcCAwNiAwMzowODozOSAyMDA3DQpTdWJqZWN0OiBbVGNsLVRocmVhZHNdIElz
c3VlcyBpbnN0YWxsaW5nIDguNCB3aXRoIHB0aHJlYWQgZW5hYmxlZA0KDQpIaSwgDQogSSBhbSBu
ZXcgdG8gdXNpbmcgdGhyZWFkIGluIFRDTCAuIEkgYW0gdHJ5aW5nIHRvIGluc3RhbGwgdGNsOC40
LjE1IHdpdGggLS1lbmFibGUtcHRocmVhZHMgb24gRGViaWFuLiBJIGRpZCBmb2xsd2luZyBzdGVw
cyA6IA0KMS4gZG93bmxvYWRlZCBmcm9tIGh0dHA6Ly9wcmRvd25sb2Fkcy5zb3VyY2Vmb3JnZS5u
ZXQvdGNsL3RjbDguNC4xNS1zcmMudGFyLmd6IDxodHRwOi8vcHJkb3dubG9hZHMuc291cmNlZm9y
Z2UubmV0L3RjbC90Y2w4LjQuMTUtc3JjLnRhci5nej4gIA0KMi4gY29waWVkIHRvIC91c3IvbG9j
YWwvc3JjIA0KMy4gdW50YXJlZCBhbmQgY2QgL3Vzci9sb2NhbC9zcmMvdGNsOC40LjE1L3VuaXgv
DQogLi9jb25maWd1cmUgLS1lbmFibGUtcHRocmVhZHMNCjQuIG1ha2UgDQo1LiBtYWtlIHRlc3Qg
DQo2LiBtYWtlIGluc3RhbGwgDQogDQpJbiBteSB0Y2wgc2NyaXB0IHdoZW5ldmVyIEkgZ2l2ZSAi
cGFja2FnZSByZXF1aXJlIFRocmVhZCIgLCBpdCBnaXZlcyBtZSA6OiANCmNhbid0IGZpbmQgcGFj
a2FnZSBUaHJlYWQgDQp3aGlsZSBleGVjdXRpbmcgDQoicGFja2FnZSByZXF1aXJlIFRocmVhZCIg
DQooZmlsZSAiLi9zYW1wbGUudGNsIiBsaW5lIDIpIA0KIA0KSXQgd2lsbCBiZSByZWFsbHkgaGVs
cGZ1bCBpZiBzb21lb25lIGhlbHBzIG1lIHRvIGluc3RhbGwgdGNsOC40IHdpdGggdGhyZWFkIGVu
YWJsZWQuDQoNClRoYW5rcyBhbmQgcmVnYXJkcywNCi0tIA0KRGlieWFqeW90aSBHdWhhDQpTZW5p
b3IgU29mdHdhcmUgRW5naW5lZXINClNpcGVyYSBTeXN0ZW1zIEluYy4sIEh5ZGVyYWJhZC04MiAN
Cg==

[Tcl-Threads] Issues installing 8.4 with pthread enabled

[Dibyajyoti G. <dib...@gm...>]

 Hi,
 I am new to using thread in TCL . I am trying to install tcl8.4.15 with
--enable-pthreads on Debian. I did follwing steps :
1. downloaded from
http://prdownloads.sourceforge.net/tcl/tcl8.4.15-src.tar.gz
2. copied to /usr/local/src
3. untared and cd /usr/local/src/tcl8.4.15/unix/
 ./configure --enable-pthreads
4. make
5. make test
6. make install

In my tcl script whenever I give "package require Thread" , it gives me ::
can't find package Thread
while executing
"package require Thread"
(file "./sample.tcl" line 2)

It will be really helpful if someone helps me to install tcl8.4 with thread
enabled.

Thanks and regards,
-- 
Dibyajyoti Guha
Senior Software Engineer
Sipera Systems Inc., Hyderabad-82

[Tcl-Threads] telnet + proc + file operation(s)

[deepakd <dee...@gm...>]

Hi,

I am new to Tcl/tk language. I am writing a program, which will telnet to a
lilnux machine as root and will open a file located in "/etc/" directory
(normal text file - no extension) and reads the file. The output of the file
(will have either 0 (or) 1) will be copied to a local variable.

When i execute this script, i get error when it tries to open a file on the
remote machine. Even if the file is present the given directory, "cannot
find the file" error will be printed.

This is my procedure.

proc actstdby {} {
   #set dir {/etc}
   set filename deepak
   #set f [open $dir/$filename r ]
   set f [open $filename r ]
   set data [read $f]
   close $f

   if {$f < 0} {
       puts "ACTIVE"
       return 0
   } else {
       puts "STAND-BY"
       return 1
   }
}

The above procedure is called after i login to the remote machine.

It is called ,
set value [actstdby]

Please help me in solving this problem. Is this because of root permission 
? Anything wrong with the syntax of the procedure ?

Thanks & Regards.

Deepak
-- 
View this message in context: http://www.nabble.com/telnet-%2B-proc-%2B-file-operation%28s%29-tf4357642.html#a12418689
Sent from the tcl-threads mailing list archive at Nabble.com.

[Tcl-Threads] hi plz help me debug this code

[yamini_mit <yam...@ya...>]

#dynamic topology creation in ns2

set ns [new Simulator]

set nf [open out.nam w]
$ns namtrace-all $nf

#define the finish procedure

proc finish {} {
 global ns nf
 $ns flush-trace
 close $nf
 exec nam out.nam &
 exit 0
 }
 
 #create bottleneck nodes
 
 set n2 [$ns node]
 set n3 [$ns node]
 $ns duplex-link $n2 $n3 0.7Mb 20ms DropTail
 
 set NumbSrc 5
 set Duration 10
 
 #create Source Nodes
 
 for {set j 1} {$j<=$NumbSrc} {incr j} {
 set s($j) [$ns node]
 }
 
 #create a random starting the ftp and for the bottle neck link delays
 set rng [new RNG]
 $rng seed 0
 
 #parameters for the random variables for delays
 
 set RVdly [new RandomVariable/Uniform]
 $RVdly set min_ 1
 $RVdly set max_ 5
 $RVdly use-rng $rng
 
 #parameters for the random variables for begining of ftp transactions
 
 set RVstart [new RandomVariable/Uniform]
 $RVstart set min_ 1
 $RVstart set max_ 7
 $RVstart use-rng $rng
 
 #define two random parameters for each connection
 
 for {set i 1} {$i<=$NumbSrc} {incr i} {
 set startT($i) [expr [$RVstart value]]
 set dly($i) [expr [$RVdly value]]
 }
 
 #links between the source and the destination
 for {set j 1} {$j<$NumbSrc} {incr j} {
 $ns duplex-link $s($j) $n2 10Mb $dly($j) DropTail
 $ns queue-limit $s($j) $n2 100
 }
 
#Monitor the queue for link (n2-n3) for NAM
$ns duplex-link-op $n2 $n3 queuePos 0.5

#Set Queue Size of link (n2-n3) to 10
$ns queue-limit $n2 $n3 10

#TCP Sources
for {set j 1} {$j<=$NumbSrc} {incr j} {
set tcp_src($j) [new Agent/TCP/Reno]
}

#TCP destinations or Sinks
for {set j 1} {$j<=$NumbSrc} {incr j} {
set tcp_snk($j) [new Agent/TCPSink]
}

#connections
for {set j 1} {$j<=$NumbSrc} {incr j} {
$ns attach-agent $s($j) $tcp_src($j)
$ns attach-agent $n3 $tcp_snk($j)
$ns connect $tcp_src($j) $tcp_snk($j)
$tcp_src($j) set packetSize_ 552
}

#FTP sources
for {set j 1} {$j<=$NumbSrc} {incr j} {
set ftp($j) [$tcp_src($j) attach-source FTP]
}
#schedule events for The ftp agents
for {set i 1} {$i<=$NumbSrc} {incr i} {
$ns at $startT($i) "$ftp($i) start"
$ns at $Duration "$ftp($i) stop"
}

$ns at [expr $Duration] "finish"
$ns run
 
 
 The following is the error

$ ns dynamic.tcl
--- Classfier::no-slot{} default handler (tcl/lib/ns-lib.tcl) ---
        _o50: no target for slot -1
        _o50 type: Classifier/Hash/Dest
content dump:
classifier _o50
        0 offset
        0 shift
        2147483647 mask
        1 slots
                slot 6: _o149 (Classifier/Port)
        -1 default
---------- Finished standard no-slot{} default handler ----------


Plz help me soon.....
 
 
 
 
 
 
 
 
 
 
 
-- 
View this message in context: http://www.nabble.com/hi-plz-help-me-debug-this-code-tf4328496.html#a12327758
Sent from the tcl-threads mailing list archive at Nabble.com.