AltME groups: search

donno but it does what i need  =)  and it looks "easy" hmmm I can 
see why someone can get addicted to rebol. I need to study more about 
bind and parse.

I don't know exactly what you can accept and what not, but this will 
work:

seasonings: [salt pepper]


seasoning?: func [value [any-type!]] [found? find/only seasonings 
get/any 'value]
seasoning? 'salt

the only advantage of having a real type in that case is type checking 
in fuction arguments; you don't get that with my custom-types (i 
don't think it is worth redefining FUNC etc. just for this), and 
it's not a big deal actually.

ah, but the console would have to get that command (wait 4) - do 
you think it is passed to it?

Volker: but usually you don't get console access, only ftp to copy 
your web to ...

My deduction is that somehow google is tracking his movements, and 
submitted the form themselves to get the content ...

Graham: was that a GET or a POST form? It makes sense for them to 
record urls with parameters, but it would be disturbing if they where 
recording POST contents.

Graham, that's very interesting. Good to get an update on how clever 
searchbots are getting.

Gabriele, it was supposed to be a POST form, but looking now at the 
source, I see I typed "type=post" instead of "method=post", so it 
turned out to be GET.

I am running XP on my local computer. Out web host's server is running 
Red Hat Linux.


Which version of core should I use on the host server to run the 
cgi scripts?


If I download the proper Linux core interpreter to my  XP computer, 
and uncompress it using WinZip, will it be corrupted by XP?  How 
do I get a clean version of core to the Linux server?

What is wrong with this script?

#!/home/daysprin/public_html/cgi-bin/rebol -cs
REBOL []
print "Content-type: text/html^/"

html: make string! 2000
emit: func [data] [repend html data]

read-cgi: func [
    ;Read CGI data. Return data as string or NONE.
    /local data buffer
][
    switch system/options/cgi/request-method [
        "POST" [
            data: make string! 1020
            buffer: make string! 16380

            while [positive? read-io system/ports/input buffer 16380][
                append data buffer
                clear buffer
            ]
        ]
        "GET" [data: system/options/cgi/query-string]
    ]
    data
    probe data
]

cgi-data: decode-cgi read-cgi
print cgi-data
write/append %nr.txt reform [
	now/date
	system/options/cgi/remote-addr
	mold cgi-data
	newline
]

I asked for mu web service provider to add linux-gate.so.1 to the 
server he did not aprove that he did (actualy I did not get any answer 
yet), but today I found that my test script:

 #!/var/www/cgi-bin/rebview -cs

REBOL [Title: "CGI Basics"]

print ["Content-type: text/html" newline]

print "Heloooooo!!!"

works differently - I am getting following response:

** Near: size-text self

You can check: http://www.jk.serveris.lv/cgi-bin/test

What could it mean?

Well - I found it: http://support.microsoft.com/?id=315122

And Rebol script works well when in Web Service Extensions you set 
as Allowed All Unknown CGI extensions.

But then you will get warning message, that it could be potential 
security threat - then the next question is from dummie:
Is it safe to install rebol in such way?

Do you have a linux box at home to play with ? You could try install 
Rebol/View on it without X running and see what error you get...

I'm using the com+ server at present stil as I wasn't able to get 
your script to work.  When I have time, I'll try again.

although again, I could not get the ole object to work just by registering 
it with regsrvr

well, it's a no go for me. everything has to be bundled into a single 
lightweight package. I think it's a little absurd having to blow 
up the app by a factor of 2-5 in size, just to get pretty thumbnail 
generation for it. I hope a future version of DRAW will allow better 
downscaling.

Oh, OK. I get it. Thanks!

so on the cgi side you get just one file as from one input file field

has anyone made Carls blog script work with webserv.r? I get very 
odd behavior here.

I get an access error when I try to set the IDs, so it seems not 
possible...

google "javascript cookies tutorial" and use rebol to call javascript 
to get the cookies

thanks this will get me going   :-)

In that ML thread, the request was to handle a multipart upload on 
the server side (in rebol). I need to perform a multipart upload 
on the client side (in rebol). As for the seconde link, unfortunately 
I get "Article x60 is no longer available ". Any idea?

Ok, I'll try to hack the http-tools.r, see if I can get anything 
done. I saw a script written in python claiming to do multipart uploads, 
but I hope I can get it working in Rebol, which for me is always 
first choice.

I played with Oldes script a bit, didn't get far. I think there's 
no other option than follow Graham's advice and delve in the http 
scheme. I had hoped to find something in the script archive, oh well... 
I saw that even in the Ruby and Python community there's some confusion 
on how to achieve multipart form submissions with CGI. (Python default 
http library also uses  "application/x-www-form-urlencoded" and not 
""multipart/form-data", but there's a library called HTTPFileUploader 
that does the job). Last time I tried to hack the http scheme I wasn't 
so succesful. This time, if I need help, I'll ask for help.

Or what about building special rebol version using SDK, running by 
default in cgi mode, quitting imediatelly, if there is not get or 
post string?

My understanding is the latter would be slower.  Also, QM (as an 
example) doesn't generally require a get query or post data (primarily 
uses path info).

(it shouldn't be that easy, but you get the idea)

That is why I was trying to suggest to rename rebol to some AAAAAAABBBBBBBCCCC 
name, unpredictable, so it will get hardly noticed, even if someone 
would try ... (unless you do some bug and your shabang line gets 
reported back to browser :-)

petr, the processes are managed by the OS too. *obviously* the os 
will distribute processes among processors. (unless the os has no 
multiprocessor support, that is). distributing threads is more difficult 
(because of the shared memory), however all good threading implementations 
should do it, and if you programs the threads correctly you can get 
the performance boost.

Can anybody give me an exampkle setup + explanation of FastCGI + 
lighttpd with FastCGI; also on the Rebol side. I know Francois mentioned 
it was easy but I don't get how you can do adaptive spawning one 
the same listening port (e.g, 10 Rebol FastCGI processes listening 
on port 1026 or so)

With the avereage memory use fo Rebol < 10Mb you can coompute how 
many users I can concurrently server for complex operations (100-200 
minimum), so every machine I hire can host 500 customers. That means 
that I should earn e0.50 customer to get  a decent margin (roughly).

As a rebol process is only 10 Mb.... I can serve lots of users on 
cheap VPS's, load balance them, data backup in S3.  No others invited 
until I get things stable enough. eed to ge things going

I am sure, as I get cgi script output to the browser window. It just 
fails on the last line - write/lines %index.htm data

no, I can try once I get at home ... that might be more secure solution, 
thanks ...

I have to admit, I'm awed by the size -- is this the least that it 
will take to get a reasonable XML implementation in Rebol?  And how 
to manipulate and store a SAX structure?

How to get started with xml? I know the simple things, kind of object-tree, 
similar to what parse-xml does. What extras would be needed?

// document.getElementsByTagName("H1") returns a NodeList of the 
H1
// elements in the document, and the first is number 0:
var header = document.getElementsByTagName("H1").item(0);

// the firstChild of the header is a Text node, and the data
// property of the text node contains its text:
header.firstChild.data = "A dynamic document";
// now the header is "A dynamic document".

// Get the first P element in the document the same way:
var para = document.getElementsByTagName("P").item(0);
// and change its text too:
para.firstChild.data = "This is the first paragraph.";

// create a new Text node for the second paragraph

var newText = document.createTextNode("This is the second paragraph.");
// create a new Element to be the second paragraph
var newElement = document.createElement("P");
// put the text in the paragraph
newElement.appendChild(newText);

// and put the paragraph on the end of the document by appending 
it to
// the BODY (which is the parent of para)
para.parentNode.appendChild(newElement);

; In REBOL?
header: first document/get-elements-by-tag-name <h1>
set in header/first-child 'data "A dynamic document"

para: first document/get-elements-by-tag-name <p>
set in header/first-child 'data "This is the first paragraph."


new-text: document/create-text-node "This is the second paragraph."
new-element: document/create-element <p>
new-element/append-child new-text

parent: para/parent-node
parent/append-child new-element

the zero based indexing might be a problem here, no? but who knows 
... such functions as "get-element-by-tag-name" etc. I do remember 
from Gabriele's Temple :-)

If the internal representation is an object-base tree, what are the 
barriers to the 'get-elements-by-tag-name function?

If I make those fixes, I get 'false' when I parse my homepage (which 
validates as xhtml)

Chris -- I don't get that problem,

But you did make me look closer, and my earlier statement was wrong.
I'm using

http://www.rebol.org/cgi-bin/cgiwrap/rebol/download-a-script.r?script-name=xml-object.r
Which is similar to xml-parse, but not identical.
Example of usage:
probe: first reduce xml-to-object parse-xml
     {<?xml version="1.0" encoding="ISO-8859-1"?>
      <xxx>11</xxx>
     }

XML is not a silver bullet rebol block are much powerfull than XML, 
thats if you'r dealing REBOL's only deployment, but when ic comes 
to manage interoperability things get a bit messy and confused.

3) -- xml [doc: load %file.xml elmt: doc/get-element-by-id "foo" 
elmt/tag-name: "p" save %file.xml doc] -- just one example of how 
it might work...

Hypothetically, we stick to Gavin's block format -- how much work 
will it be to implement, say 'get-tags-by-name' , 'get-element-by-id', 
'parent-node'?

node-prototype: context [
    node-name: tag-name: ""
    node-value: ""
    node-type: 0
    child-nodes: []
]

foobar: make node-prototype [
    node-name: tag-name: "foobar"
    node-type: 1
]

bar: make node-prototype [
    node-name: tag-name: "foo:bar"
    prefix: "foo" local-name: "bar"
    node-type: 1
    parent-node: :foo
]

append foobar/child-nodes bar

text: make node-prototype [
    node-name: #text
    node-value: "Some Text"
    parent-node: :bar
]

append bar/child-nodes text

document: context [
    get-elements-by-tag-name: func [tag-name][
        remove-each element copy nodes [
            not equal? tag-name element/tag-name
        ]
    ]
    nodes: reduce [foo bar text]
]

Remember that objects in REBOL have a lot more overhead than blocks, 
and that XML documents can get quite large. Unless you are using 
an event-driven parser, every bit of memory you can save is a good 
thing.

node-prototype: reduce [
    'type      0
    'namespace none
    'tag       none
    'children  []
    'value     none
    'parent    none
]

foobar: copy/deep node-prototype
foobar/type: 1
foobar/tag: "foobar"

bar: copy/deep node-prototype
bar/type: 1
bar/namespace "foo"
bar/tag: "bar"
bar/parent: :foobar

append foobar/children bar

text: copy/deep node-prototype
text/type: 3
text/value: "Some Text"
text/parent: :bar

append bar/children text

document: context [
    get-elements-by-tag-name: func [tag-name][
        remove-each element copy nodes [
            not equal? tag-name element/tag
        ]
    ]
    nodes: reduce [foobar bar text]
]

Probably -- I am just following convention (easier to get the concept 
straight first than the specifics...)

With the block position format, you can just test the first member 
to get the type of the data item, and then do something like this 
to access it:

    set a: context [name: namespace: attributes: contents: none] elem
or perhaps this
    set [name namespace attributes contents] elem

Ok, on a nested structure -- you do get-elements-by-tag-name, this 
returns a any-block! of elements with that tag name.  How do you 
take any one of these elements and get the parent element?

First, the values returned by get-elements-by-tag-name doesn't have 
to be in the same format as the internal block structure. It can 
be a list of objects that contain references to the original nested 
structure, or objects that contain fields that correspond to the 
information items that you want, including properties that are constructed 
at runtime like parent.

; Something like this, semantically at least, and would need adjustment 
based on the actuall block structure
get-element-by-name: func [x n /local l t c] [
    worker: func [x p w] [
        if n = t: first x [
            l: insert l context [elem: x parent: p where: w]
        ]
        t: fourth x
        forall t [worker first t x t]
    ]
    l: make list! 0
    t: fourth x
    forall t [worker first t x t]
    head l
]

FYI, I have set 2 ppl working on an implementation of XPath into 
our XML function lib (temporary called "EasyXML"). Basically, we'll 
have 5 functions encapsulated into a context: 'load-xml file!, 'save-xml 
file!, 'get-data path! or block!, 'set-attribute string!, 'set-content 
string!

Doing my first steps with REBOL I tried to do something with XML

(reading/eventually modifing/writing). I looked for some scripts 
helping
me to do this and found:

1. xml2rebxml/rebxml2xml:
    I got the following problems:
    - missing/loosing comments
    - missing/loosing elements - that's realy serious
    my steps were:
      my-doc: xml2rebxml read %simple.xml
      write %simple2.xml rebxml2xml my-doc


    The second documents finishes outputting elements after some comment
    block in
     the source xml doc.

 2. xml-parse/xml-object:

     The versions I found on the reb library didn't work, I used some

     older versions from rebXR-1.3.0, I've got my objects, but it would 
     be

     nice to have a third module like xml-write to get the object tree
     back to xml. Is somebody developing something like this?

 3. mt.r:

     I tried to figure out how it works. Basically I can write some XML

     based on a REBOL block but I couldn't figure out how to define the

     rules about elements and attributes. Where can I find an example

     about writing for instance svg with mt.r, how looks the coresponding
     REBOL block and the rules for svg?


Where can I find more about xml and REBOL, I think it would be very 
nice
to have some REBOL scripts, doing things like 
   some-elem: xml-create [ elem "foo" namespace "myns" attribs [
                                     bar "something"
                                     xyz "123"]
                                     ]
   xml-modify [ elem another-elem append some-elem ]
and finally
   xml-write %mynewxml.xml my-doc


Is somebody developing something like this with REBOL? Some scripts 
giving

me the same comfort in REBOL like maybe XOM (http://www.xom.nu) is 
giving
for XML in Java. Of course done with some nice REBOL dialects?

What is the above mentioned "EasyXML" - is it available for use/testing?

Thank you for any tips, carsten

Carsten, yes, I get the same problem here. I'll look into it.

Carsten, ok I found a bug related to multiple comments after each 
other. Get fixed script here: http://home.tiscali.dk/john.niclasen/rebxml/xml2rebxml.r

Would it make sense to have XML files be represented as a port like 
xml:// . This could make sense for DOM and for SAX. But please correct 
me if that's stupid. For SAX this would enable one to copy from the 
port and get events by copying, for some one could navigate with 
some dialect and position the cursor in the document. A copy would 
read the data at the current positon - but then a block or something 
which represents an element could be returned. But I guess that's 
not well thought out. :-)

Geomol: you've done a great job with your rebxml. But we really need 
some kind a dialect to easilly acces nested data.

Like Xpath... I need to be able to say get-data [//*/bbb/ccc[@id='geek']] 
 and get the info. I think xpath have a great notation for that (and 
a standard). So e have to find the format wich best fit this dialect...

I do not get where you gain in performance? Or do i get it wrong 
?

The powerpack has Carl's blessing. The idea is to provide a quality 
assured set of libraries that can help (semi-)professional developers 
to get things done.

informatical documentation in general are very close to math ones. 
You can't aquiere new concept in geometry without have the spacial 
illustration of what you get explained more longer in the text. :)

ScottH - choosing one of two ways. either passing the freedom by 
giving your changes away, or to pay the GPL-part coder with some 
of the money you get. As you would do if you hired a coder to do 
that part.

A question about nenads original pgsql (0.90),


I have a database using UNICODE as the encoding, and try to connect 
via pgsql.
Characters get encoded as, e.g.  \010 ( #"^/" ) etc. 

I tried to change the client encoding within postgresql to winxxxx, 
or latinxxx, but it made no difference.

any ideas?

just installed postgesql 8 on windows 2003, but can't seem to create 
tables.  Get syntax errors reported.

It seems for me too the best aproach too.

One another case where to use encoding funcions could be PDF maker 
- I had trouble to get pdf output into special characters of my language.

I am trying some of the code from mySQL and get a PgSQL error "** 
Script Error: Invalid argument: TABLE
** Where: forever
** Near: to integer! trim pos"

Will REBOL/View support MacOS for Intel? I plan to get a MacBook 
Pro (Intel) Notebook. I would love to work on my REBOL projects in 
MacBook Pro.

Did any of Gregg's installer code get migrated into the new RT installer?

do-uninstall: does [
	attempt [delete data-path/bypass-install]
	if get-face ckd [

  if confirm reform ["Please confirm that you want to delete all files 
  in" to-local-file data-path][
			attempt [delete-dir data-path]
		]
	]
	found? all [
		attempt [unlink-rebol form system/product true]
		attempt [unassociate-file true]
		attempt [unregister "REBOL" form system/product true]
	]
]

Te goal i would like to archive, is to have a dialect to "talk" to 
COM objects. is this to hard to do ? do we realy need this ? all 
cuestions are welcome 

To start i've wrapped a Library called DispHelper, make it a .dll 
and try to see i we can get any thing to work. you can find some 
alpha releases in this link http://www.geocities.com/benjaminmaggi/data/COMLib.zip, 
and some documentation here http://www.geocities.com/benjaminmaggi/doc/comlib.html

It is wise, because it allows integration with what is out there 
right now (as opposed to two years time). Microsoft itself showed 
the importance of Word being able to integrate some years ago - helps 
people make a switch when they can still get to their legacy data.

We should take a look at Monad to get the feeling for how the CLI 
will be intended to be scripted in the future.

Im atending to CaFeLUG it's an open source 3 days long conference 
with various speakers and discutions, yesterday we have ms "maddog" 
hall, and today i get the chance to listen Roberto Di Cosmo, many 
french and italian people may know im, its has been a truly eye opening 
experience, i guess Argentina like many other countrys who use Privative 
Soft like MS windows (only because we can make the copy) its going 
to make a switch, the ability to copy windows will no longer exist, 
and the only real option is Open source because of the $$$ right 
now i think this will happen in no more than 5 years from now, i 
do not agree with the general idea o MS but i found COM to be a quite 
intresting thing its to sad to see how it's bloated by VB or C# but 
any whay its a nice thing they have. 

So in conclution its a good idea to have COM yes and no... yes because 
it will open a door for rebol and many programers (maybe) and no 
because the thecnology could become useless in 5 years (at least 
to me and people around me) 

I think it will take a few changes to make rebol COM compatible so 
it isn't a great deal programing it for a couple of years it may 
be a good thing to have.

But today there are some great things to do imagine REBOL's capabilityes 
integrated in the desktop a true desktop not the rebol one, REBOL 
stands in the middle between documents messaging information exchange 
etc... etc... just because it can integrate COM ....

BTW i found the rebol desktop verry userful in some tasks its geat 
i IOS is even better but the leack ability of interaction with aplications 
and elements out there make it a bit "closed" to my taste, dont get 
me wrong here, i just mean it for those people we use to call "useres" 
the weenies :-) we dont need that :-)

I won't have a chance to try it out till tomorrow when I get a printer 
attached.

better to get it all right now ...

IMO if people really have a use for this COM stuff (which is by using 
dialects on top of it), I think it's OK for them to get a /Pro version. 
If it's of value than $99 isn't that much.

What's the problem? Get the SDK and sponsor RT a bit for their work.

time-limitation? YOu get as many 5-minutes-encapps as you want for 
free?

Sounds good, any chance to get my hands on it? I have ported an Excel 
dialect to ComLib and would get it in sync than.

I just found a nice way to simplify the usage, so the demos are going 
to get a little bit shorter.

Is there any way to get around the fact that Rebol faces are not 
native Windows "windows"? (i.e. don't have a handle on the system). 
Speech recognition command & control does not work with Rebol apps 
as long as that is the case and I need that...

of course, maybe it just depends, how professional you intend to 
be, but as I showed you, completly OS compatible look is not so important. 
What is imo more important is the feel. If we can't get visual representation 
of accelerator keys, ctrl tab, rich text, key precise behavior for 
ui elements, that is what I see as a problem ....

I wonder how much money Carl gets from Pro Rebol tools versus end 
user products like IOS. I think there should be more products like 
IOS for Rebol Tech to sell, in order to get income from there instead 
of from developers. You can get really far on other solutions without 
paying a dime.

Henrik: agree...you are surely payed by someone for your cool widgets 
and it is great you can share it with us. So the same can be with 
other dev products. This all depends on the 'sponsor'. People usually 
provide something to comunity in case they really need/use it for 
their own work and IMO in our case that is the only way we can get 
more complex solutions 'for free'.

If you know the names of the drugs in the system can't you just generate 
the html/get?


http://www.drugdigest.org/DD/Interaction/InteractionResults?drug=&drugList=551938&cD=6355&cD=551938&dN=%2220%2F20+Tears%22+%223-beta%2C5-alpha-stigmastan-3-ol%22+&CheckFDA=1

you will got your rebcode, as well as new object model = faces more 
resource savy ... and new gobs (graphics objects), resource savvy 
too ... what you will also get is - faster blitting and access to 
buffers (not sure i understand it correctly), but surely plug-ins 
for View ...

add an AI to this and you can get pretty cool long term solo playing 
with an infinite range of playability.

I haven't had a lot to time to put on the development side of that 
concept.  so I never really tried to go into such detail.  I have 
to much to do these days, but as part of the time I put on "fun" 
coding, I eventually will get to it... especially since most of my 
low-level apis are comming to fruition  :-)

hmm, maybe think links. thereis no real map, only relations. when 
someone browses, the page is picked by chance too, not only choice. 
when something good happens and you have high statistics, you may 
 get it.

I just checked the code. I made it under Linux, and it gives an error 
regarding a "dirty?" variable with View 2.7 under OS X. I can get 
it running with 2.6.

:) i'll see what i can do - no promises until I get Mahjong fully 
finished :)

i think altme has wonderful potential as a lobby site - we just need 
to get an altme approved api interface before making games

if i can get them to load - im getting 404 errors here

ideally ill dust off terragen and make my own backdrops when i get 
a little more time

RebTower Demo available at: http://rebol.mustard.co.nz/rebtower-demo.zip
   - non demo version should hopefully be out in a couple of days 
once I get the artwork finalised and the AI beaten into shape.  Current 
demo plays computer vs computer in simulation mode.

all cards are there but mini-image art is missing from the last 19 
:(   took 8 hours to get the first 19 sorted..