World: r4wp

Wow, my hard disk runs that hot

It was 44C today but it is starting to cool off.

My official C book doesn't mention null ending for strcat, but it 
does for all the other string functions, so it would be a very malevolent 
C library that doesn't implement it

Is this a good way to add that null marker?

	tmp: make-c-string 1
	append-string file1 first-line
	tmp: file1 + length? file1
	tmp/1: #"^(00)"

No, you have to ask for the length before the append, because LENGTH? 
depends on the marker

OK.

Here's my code now...still not working:

	tmp: make-c-string 1
	file1: make-c-string 128
	copy-string "to-process/" file1 ;reversed
	print-line [length? file1 " " length? first-line]
	file1len: (length? file1) + (length? first-line)
	append-string file1 first-line
	tmp: file1 + file1len
	tmp/1: #"^(00)"

	print-line [file1 " " length? file1]
	append-string file1 "/img00.bin"
	print-line [file1 " " length? file1]

Here's the output

	11 25
	 36process/2013-06-29-20-20-09.h264
	/img00.bin 4613-06-29-20-20-09.h264

length? is correct

Aha, that means there's an extra character at the end of your first-line

Yes.

Judging by the printing, that must be a CR

So you probably copied a Windows text file to Linux

So the problem is in the only piece of the code you didn't show :-)

I could have pasted the whole program in here, but I thought that 
might have been excessive! :-)

Sorry for the false alarm and all the trouble.

Is first-line a literal or does it come from a text file?

Here's the troubling bit of code:

	dirs: make-c-string 1024
	dirs: read-file "to-process/dirs.txt"

	eol: make-c-string 1024
	eol: find-char dirs #"^/" ;Finds the first end-of-line character

 line-len: as-integer eol - dirs + 1 ;Add one byte for the end-of-string 
 character
	first-line: make-c-string line-len
	copy-string-part dirs first-line as-integer eol - dirs ;reversed
	first-line/line-len: #"^(00)"

Shouldn't 'find-char dirs #"^/" return the first newline byte?

Yes, you're looking for the LF, so you're including the CR

On Windows, the C library that executes the read-file converts DOS 
newlines to Unix LF format. I've had trouble with that before in 
the binding

The C library on Unix just assumes it's a native file, so if there 
are extra CRs in there, it doesn't touch them

It's best to standardise on LF format, even on Windows, with a capable 
editor

The dirs.txt file is being written to the Pi using Rebol on Windows.

Yes, it uses local Windows convention

You must do the conversion somewhere in the chain

So, I'd have to form the file in Rebol, convert it to binary (in 
Rebol) and remove the CRs from the binary, then use write/binary 
to write it out.

Doesn't REBOL have a refinement to force it?

The other option is to convert it in Red/System

write/with

R2 only

I'll just use write/append/binary with #{0A} as the terminator.

It's working now.  Thanks for all your detective work!  I don't know 
how you can find bugs so fast.

I didn't think it was very fast. :-) I had a hunch in the direction 
of corrupted printing all the time, but didn't think of CR

What I meant was "fast compared to me."

:-)

It still sucks to loose hours to this issue fourty years after it 
was perpetrated

I suppose it would be useful if I made read-file more like REBOL, 
like it already behaves on Windows. I'll look into that tomorrow

You're awesome!

Thanks

For anyone interested, I just published a JPG in the Files section 
under Misc called MotionDetect.jpg showing real-time motion detection 
performed by the Raspberry Pi running Red/System.  The top two frames 
are the actual camera video (shot at dusk) and the bottom frame highlights 
the areas of motion.  Thanks in huge part goes to Kaj for helping 
me finish this first project!

Cool to see it displayed like that

What do you mean by "displayed like that"?

By the way, the bottom image is completely built by Red/System.

Well, displayed at all. :-) So far I had only seen isolated code 
snippets

Have to protect my intellectual property. :-P

I really can't thank you enough, Kaj, for all your help!

Yes, but that's not what I mean. It's all very abstract and seems 
like any other code, but now it comes to life

I love the feeling that I get when I see my software working!  Especially 
something I've been struggling with for days/weeks/months.

My original prototype written in R2 was started 3-Aug-2012 and finished 
9-Sep-2012.  It's taken this long to get it running on the Pi natively.

Was that fast enough?

The development cycle?  Or the speed of the software?