Sorry for not understanding the owtcl module before posting this....
The "get" command supports a flag called "-list", and this results into a
space-separated list instead.
Like this:      set list [ ::OW::get / -list ]
        puts [ lindex $list 0 ]
This returns "structure/" only...


[EMAIL PROTECTED] example]# tclsh test.tcl
Version information:
owtcl:  0.1
libow:  2.6p5

Directory-listing of / (return string)
structure/,bus.0/,bus.1/,uncached/,settings/,system/,statistics/,28.4AEC29CD
BAAB/,10.67C6697351FF/,alarm/,simultaneous/

Directory-listing of / (return list)
structure/ bus.0/ bus.1/ uncached/ settings/ system/ statistics/
28.4AEC29CDBAAB/ 10.67C6697351FF/ alarm/ simultaneous/

First object in directory list
structure/

/Christian


> -----Original Message-----
> From: [EMAIL PROTECTED] [mailto:owfs-
> [EMAIL PROTECTED] On Behalf Of Christian
> Magnusson
> Sent: den 5 juni 2007 10:58
> To: owfs-developers@lists.sourceforge.net
> Subject: Re: [Owfs-developers] FW: Re: SV: Re: Tcl on OpenWRT
> 
> 
> I just made some test... and isn't it possible to use "split" to split
> the
> output to separate objects?
> This behavior isn't perhaps correct, but it seems to work. I guess it
> should
> be returned with spaces at once.
> 
> # tclsh
> % package require ow
> 0.1
> % ::OW::init --fake 10 --fake 28
> % puts [ split [ ::OW::get / ] ',' ]
> structure/ bus.0/ bus.1/ uncached/ settings/ system/ statistics/
> 10.4AEC29CDBAAB/ 28.67C6697351FF/ alarm/ simultaneous/
> 
> % set a [ ::OW::get / ]
> % puts [ lindex $a 0]
> structure/,bus.0/,bus.1/,uncached/,settings/,system/,statistics/,10.4AE
> C29CD
> BAAB/,28.67C6697351FF/,alarm/,simultaneous/
> 
> % set list [ split [ ::OW::get / ] ',' ]
> structure/ bus.0/ bus.1/ uncached/ settings/ system/ statistics/
> 10.4AEC29CDBAAB/ 28.67C6697351FF/ alarm/ simultaneous/
> % puts [ lindex $list 0 ]
> structure/
> 
> /Christian
> 
> 
> > -----Original Message-----
> > From: [EMAIL PROTECTED] [mailto:owfs-
> > [EMAIL PROTECTED] On Behalf Of Christian
> > Magnusson
> > Sent: den 5 juni 2007 10:46
> > To: owfs-developers@lists.sourceforge.net
> > Subject: [Owfs-developers] FW: Re: SV: Re: Tcl on OpenWRT
> >
> > I found an old article I wrote 2005, and that tcl-code returned
> spaces
> > between the directories.
> > Should we change owcapi to return spaces instead of "," for the tcl-
> > module?
> >
> > /Christian
> >
> >
> > -----Original Message-----
> > From: [EMAIL PROTECTED]
> > [mailto:[EMAIL PROTECTED] On Behalf Of
> > Christian
> > Magnusson
> > Sent: den 30 november 2005 22:22
> > To: owfs-developers@lists.sourceforge.net
> > Subject: SV: [Owfs-developers] Re: SV: Re: Tcl on OpenWRT
> >
> >
> > I have created new packages for you... owfs package is now split into
> 3
> > different packages. owlib, owfs, owtcl.  I will probably be able to
> > create
> > owphp later.
> >
> > Edit /etc/ipkg.conf and add my repository:
> > ---
> > src magcx http://home.mag.cx/openwrt/packages
> > ---
> >
> > > ipkg update
> > > ipkg install tcl8
> >   (This will also install libpthread)
> > > ipkg install owlib
> >   (This will also install libpthread, libusb)
> > > ipkg install owfs
> >   (This will also install libpthread, owlib, kmod-fuse, libfuse,
> fuse-
> > utils,
> > libusb)
> > > ipkg install owtcl
> >   (This will also install owlib, tcl8)
> >
> >
> > [EMAIL PROTECTED]:~# run-owfs
> > [EMAIL PROTECTED]:~# tclsh
> > % package require ow
> > 0.1
> > % ::OW::init localhost:3002
> > % ::OW::get
> > 10.A22840000800/ 10.E2C746000800/ 10.1A9246000800/ 10.061847000800/
> > 10.762047000800/ 10.E54347000800/ 10.4D8746000800/ 10.6D0150000800/
> > 10.5D1947000800/ 10.233B40000800/ 10.B3E166000800/ 10.2BD346000800/
> > 1F.7DC202000000/ FF.720200000100/ alarm/ simultaneous/
> >
> >
> > I hope you can try those packages and tell me if they work for you.
> > I think the tcl-module need some updates to fix /bus.x hierarchy and
> > /uncached.
> >
> > /Christian
> >
> >
> >
> >
> >
> > ---------------------------------------------------------------------
> --
> > --
> > This SF.net email is sponsored by DB2 Express
> > Download DB2 Express C - the FREE version of DB2 express and take
> > control of your XML. No limits. Just data. Click to get it now.
> > http://sourceforge.net/powerbar/db2/
> > _______________________________________________
> > Owfs-developers mailing list
> > Owfs-developers@lists.sourceforge.net
> > https://lists.sourceforge.net/lists/listinfo/owfs-developers
> 
> 
> -----------------------------------------------------------------------
> --
> This SF.net email is sponsored by DB2 Express
> Download DB2 Express C - the FREE version of DB2 express and take
> control of your XML. No limits. Just data. Click to get it now.
> http://sourceforge.net/powerbar/db2/
> _______________________________________________
> Owfs-developers mailing list
> Owfs-developers@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/owfs-developers


-------------------------------------------------------------------------
This SF.net email is sponsored by DB2 Express
Download DB2 Express C - the FREE version of DB2 express and take
control of your XML. No limits. Just data. Click to get it now.
http://sourceforge.net/powerbar/db2/
_______________________________________________
Owfs-developers mailing list
Owfs-developers@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/owfs-developers

Reply via email to