AltME groups: search

Having read about REBOL 3, here is my first request: I would like 
to have console-mode versions of /Core, /Pro and /Command for Windows, 
preferably compiled as relocatable. Although this would help with 
a few projects, the main reason I would like this is to make REBOL 
more compatible with Windows alternatives like SanOS and HX, for 
a single-floppy bootable REBOL server that can run in 16 MB ram or 
less. This may sound silly but I've wanted to do this for a while.

It covers around 95% of win32 services API, if you really need a 
feature that's missing, just ask me privately, I will consider your 
request et maybe add it in a future version.

Same principles should apply to R3 (after all, you're only adding 
a header to each request), but I don't know the R3 HTTP scheme that 
well.

The header is used to sign request parameters, including the parameters 
of the OAuth header.

The handshake is a multi-step process to get a user's credentials: 
request a temporary token, send the user to the site, user comes 
back and enters a code, request a permanent token.

Hello, Long time no talk. Is there a way to tell the request-file 
to open up in a specific directory?

request-file/file %/c/mozillaFirefox/

; I did a dif between the functions in VIEW and those in CORE for 
a default install.  What I get is this ( I hope it is useful to have 
al 106  in one place )

 alert  brightness?  caret-to-offset  center-face  choose  clear-face 
  clear-fields  confine  crypt-strength?

 dbug  deflag-face  desktop  dh-compute-key  dh-generate-key  dh-make-key 
  do-events  do-face  do-face-alt  do-thru  

 draw  dsa-generate-key  dsa-make-key  dsa-make-signature  dsa-verify-signature 
  dump-face  dump-pane  edge-size?  

 editor  emailer  exists-thru?  find-key-face  find-window  flag-face 
  flag-face?  flash  focus  get-face  

 get-net-info  get-style  hide  hide-popup  hilight-all  hilight-text 
  hsv-to-rgb  in-window?  inform  

 insert-event-func  inside?  install  launch-thru  layout  link-relative-path 
  load-image  load-stock  

 load-stock-block  load-thru  local-request-file  make-face  notify 
  offset-to-caret  open-events  outside?  

 overlap?  path-thru  read-net  read-thru  remove-event-func  request 
  request-color  request-date  request-dir  

 request-download  request-file  request-list  request-pass  request-text 
  reset-face  resize-face  rgb-to-hsv  

 rsa-encrypt  rsa-generate-key  rsa-make-key  screen-offset?  scroll-drag 
  scroll-face  scroll-para  set-face  

 set-font  set-para  set-style  set-user  show  show-popup  size-text 
  span?  stylize  textinfo  unfocus  

 uninstall  unlight-text  unview  vbug  view  viewed?  win-offset? 
  within?

source inform  and source request  for a sample of how this can all 
fit together

source inform  and source request - Is this a different forum

to [ aaaa | bbbb] is long time parse enhancement request, which is 
not yet implemented, but is planned for 3.0. It would really make 
lifes of parse beginners much easier. Your parse rule simply means 
- try to find "point-to-point" or the end of the line. But - it looks 
for the point-to-point till it reaches end of the input string.

Put the 'to inside the block, like this:

parse/all {zabc} [ [to "b" | to "y"] copy result thru "c"  (print 
result) ]


IIRC, your syntax has been a long-standing request to improve 'parse

Such functionality is long time request to parse enhancement, and 
is planned to be implemented ...

File open dialog is simple.
  source request-file
:-)

There is a request-dir too, but it is a bit of a joke. Looks like 
the way to go is to use the request-file then extract the directory. 
 Why would request-dir even exist in such a feeble state? Sorry, 
I hope I am  not speaking out of turn, but if anyone had that pop 
up they would think it was a bit odd.

No, request-dir is pretty low standard.

some parts are sub-par, like request-color as well. fortunately it's 
possible to rewrite them.

Excuseme please, but can someone pull me out of the mud here please?

filenames: request-file/title/filter/path {Select all files to read} 
[*.txt] %/D/Rebol/X/!conf/   

What have I not understood this time?  Why does the documentation 
have no examples I can find?  Sorry to be always asking :-(

I added an extra string for the title and now get this similar failure

>> filenames: request-file/title/filter/path {Select all files to 
read} {x} [*.txt] %/D/Rebol/X/!conf/

** Script Error: Invalid argument: *.txt * *.r *.reb *.rip *.txt 
*.jpg *.gif *.bmp *.png
** Where: request-file
** Near: done: local-request-file data: reduce

[tt/text ob/text clean-path where picked filt-names filt-values found? 
any [only]...

REBOL []

do %include.r
include %file-list.r


flash-wnd: flash "Finding test files..."

if file: request-file/only [
    files: read first split-path file
]
if none? file [halt]

items: collect/only item [
    foreach file files [item: reduce [file none]]
]

unview/only flash-wnd



;-------------------------------------------------------------------------------
;-- Generic functions

call*: func [cmd] [
    either find first :call /show [call/show cmd] [call cmd]
]

change-each: func [
    [throw]

    "Change each value in the series by applying a function to it"

    'word   [word!] "Word or block of words to set each time (will be 
    local)"
    series  [series!] "The series to traverse"

    body    [block!] "Block to evaluate. Return value to change current 
    item to."
    /local do-body
][
    do-body: func reduce [[throw] word] body
    forall series [change/only series do-body series/1]

    ; The newer FORALL doesn't return the series at the tail like the 
    old one

    ; did, but it will return the result of the block, which is CHANGE's 
    result,
    ; so we need to explicitly return the series here.
    series
]

collect: func [
    "Collects block evaluations." [throw]
    'word
    block [block!] "Block to evaluate."
    /into dest [block!] "Where to append results"
    /only "Insert series results as series"

    /local fn code marker at-marker? marker* mark replace-marker rules
][
    block: copy/deep block
    dest: any [dest make block! []]

    fn: func [val] compose [(pick [insert insert/only] not only) tail 
    dest get/any 'val

        get/any 'val
    ]
    code: 'fn
    marker: to set-word! word
    at-marker?: does [mark/1 = marker]
    replace-marker: does [change/part mark code 1]
    marker*: [mark: set-word! (if at-marker? [replace-marker])]
    parse block rules: [any [marker* | into rules | skip]]
    do block
    head :dest
]

edit-file: func [file] [
    ;print mold file

    call* join "notepad.exe " to-local-file file ;join test-file-dir 
    file
]

flatten: func [block [any-block!]][
    parse block [

        any [block: any-block! (change/part block first block 1) :block | 
        skip]
    ]
    head block
]

logic-to-words: func [block] [

    change-each val block [either logic? val [to word! form val] [:val]]
]

standardize: func [

    "Make sure a block contains standard key-value pairs, using a template 
    block"
    block    [block!] "Block to standardize"
    template [block!] "Key value template pairs"
][
    foreach [key val] template [
        if not found? find/skip block key 2 [
            repend block [key val]
        ]
    ]
]

tally: func [

    "Counts values in the series; returns a block of [value count] sub-blocks."
    series [series!]
    /local result blk
][
    result: make block! length? unique series

    foreach value unique series [repend result [value reduce [value 0]]]
    foreach value series [
        blk: first next find/skip result value 2
        blk/2: blk/2 + 1
    ]
    extract next result 2
]


;-------------------------------------------------------------------------------

counts: none

refresh: has [i] [
    reset-counts
    i: 0
    foreach item items [
        i: i + 1
        set-status reform ["Testing" mold item/1]
        item/2: random/only reduce [true false]
        show main-lst
        set-face f-prog i / length? items
        wait .25
    ]
    update-counts
    set-status mold counts
]

reset-counts: does [counts: copy [total 0 passed 0 failed 0]]

set-status: func [value] [set-face status form value]

update-counts: has [pass-fail] [
    counts/total: length? items

    pass-fail: logic-to-words flatten tally collect res [foreach item 
    items [res: item/2]]
    ;result (e.g.): [true 2012 false 232]
    standardize pass-fail [true 0 false 0]
    counts/passed: pass-fail/true
    counts/failed: pass-fail/false
]

;---------------------------------------------------------------


main-lst: sld: ; The list and slider faces
c-1:           ; A face we use for some sizing calculations
    none
ml-cnt:        ; Used to track the result list slider value.
visible-rows:  ; How many result items are visible at one time.
    0

lay: layout [
    origin 5x5
    space 1x0
    across

    style col-hdr text 100 center black mint - 20

    text 600 navy bold {

        This is a sample using file-list and updating progress as files are
        processed. 
    }
    return
    pad 0x10

    col-hdr "Result"  col-hdr 400 "File" col-hdr 100
    return
    pad -2x0

    ; The first block for a LIST specifies the sub-layout of a "row",

    ; which can be any valid layout, not just a simple "line" of data.

    ; The SUPPLY block for a list is the code that gets called to display

    ; data, in this case as the list is scrolled. Here COUNT tells us

    ; which ~visible~ row data is being requested for. We add that to 
    the

    ; offset (ML-CNT) set as the slider is moved. INDEX tells us which
    ; ~face~ in the sub-layout the data is going to.

    ; COUNT is defined in the list style itself, as a local variable 
    in
    ; the 'pane function.
    main-lst: list 607x300 [
        across space 1x0 origin 0x0
        style cell text 100x20 black mint + 25 center middle
        c-1: cell  cell 400 left   cell [edit-file item/1]
    ] supply [
        count: count + ml-cnt
        item: pick items count
        face/text: either item [
            switch index [
                1 [

                    face/color: switch item/2 reduce [none [gray] false [red] true [green]]
                    item/2
                ]
                2 [mold item/1]
                3 ["Edit"]
            ]
        ] [none]
    ]

    sld: scroller 16x298 [ ; use SLIDER for older versions of View

        if ml-cnt <> (val: to-integer value * subtract length? items visible-rows) 
        [
            ml-cnt: val
            show main-lst
        ]
    ]
    return
    pad 0x20
    f-prog: progress 600x16
    return
    status: text 500 return
    button 200 "Run" [refresh  show lay]
    pad 200
    button "Quit" #"^q" [quit]
]

visible-rows: to integer! (main-lst/size/y / c-1/size/y)

either visible-rows >= length? items [
    sld/step: 0
    sld/redrag 1
][
    sld/step: 1 / ((length? items) - visible-rows)
    sld/redrag (max 1 visible-rows) / length? items
]

view lay

Hi Graham,  this version ignores my =url request and look at the 
source http://www.rebol.org/cgi-bin/cgiwrap/rebol/view-script.r?script=makedoc2.r
  I can't find any URL text string in that source.

I think this version does not support =url at any column position.

New MySQL release 1.1.3 beta : http://softinnov.org/tmp/mysql-protocol.r

	o Fix for parsing correctly quoted empty strings. (Fix by Oldes)
		

 o Fixed an issue in case of automatic reconnection, the driver looses 
 local
	  flags like 'flat, auto-ping?, etc...(thanks to Will Arp)


 o Fix a remanence issue on /flat and /raw flags in 'send-sql after
	  automatic reconnection. (thanks to Will Arp)


 o Improved port recovery support after a failed request upon a shutdown 
 server.
	  Now the port will resume working once the server is up again.


 o An init SQL string can now be specified for an opened port. That 
 init string

   will be executed after automatic reconnections. (Useful to set, e.g., 
   a
	  specific charset value). Example : 

		  db-port/locals/init: "SET NAMES 'latin2'"

MySQL driver release v.1.2.0 - Download at : http://rebol.softinnov.org/mysql
- Changed behaviour and syntax of the READ function.
- Fix for parsing correctly quoted empty strings. (Fix by Oldes)

- Fix for the driver loosing local flags, like 'flat, 'auto-ping?,... 
when reconnecting (thanks to Will Arp)

- Fix a remanence issue on /flat and /raw flags in 'send-sql after 
automatic reconnection. (thanks to Will Arp)

- Improved port recovery support after a failed request upon a shutdown 
server.
- An init SQL string can now be specified for an opened port.

New version 1.3 of new MySQL driver released as beta. (same URL).

Changes:


- Fixed the multiple result sets end-of-stream issue. Now an extra 
COPY will
  return NONE, marking the end of the data stream.

- Fixed error message parsing for protocol 4.1.


- Added SQL request delimiter property to port/locals/delimiter (default: 
#";")

I might drop out the SQL requests splitting code (and also the delimiter 
option) from the driver as now everything is sent as-is to the server. 
It might still be useful for big SQL files, not sure what the best 
strategy should be in such case (send file as one big packet, or 
split it and send each request one by one) ?

amacleod, CGI, yes or use rebservice if you allowed to start a port 
and forward the sql request to doc's mysql sheme as localhost 

or switch to a virtual server with linode or slicehost for full control.

amacleod, CGI, yes or use rebservice if you allowed to start a port 
and forward the sql request to doc's mysql sheme as localhost 

or switch to a virtual server with linode or slicehost for full control.

Peter, thanks. Is the shebang line absolutely necessary? Here is 
what I had in mind for the crontab line:

0 * * * * /usr/bin/rebview -s -script /home/lat/r/dar/backup.r


When I use a shebang line a permissions request dialog pops up even 
though I have secure set to allow.

not seeing this request to write a cofiguration file at present

Sent request to him, but he's not online right now ...

One of the details I left out in the above overview is how clients 
actually render under wayland. By removing the X server from the 
picture we also removed the mechanism by which X clients typically 
render. But there's another mechanism that we're already using with 
DRI2 under X: direct rendering. With direct rendering, the client 
and the server share a video memory buffer. The client links to a 
rendering library such as OpenGL that knows how to program the hardware 
and renders directly into the buffer. The compositor in turn can 
take the buffer and use it as a texture when it composites the desktop. 
After the initial setup, the client only needs to tell the compositor 
which buffer to use and when and where it has rendered new content 
into it.


This leaves an application with two ways to update its window contents:


   1. Render the new content into a new buffer and tell the compositor 
   to use that instead of the old buffer. The application can allocate 
   a new buffer every time it needs to update the window contents or 
   it can keep two (or more) buffers around and cycle between them. 
   The buffer management is entirely under application control.

   2. Render the new content into the buffer that it previously told 
   the compositor to to use. While it's possible to just render directly 
   into the buffer shared with the compositor, this might race with 
   the compositor. What can happen is that repainting the window contents 
   could be interrupted by the compositor repainting the desktop. If 
   the application gets interrupted just after clearing the window but 
   before rendering the contents, the compositor will texture from a 
   blank buffer. The result is that the application window will flicker 
   between a blank window or half-rendered content. The traditional 
   way to avoid this is to render the new content into a back buffer 
   and then copy from there into the compositor surface. The back buffer 
   can be allocated on the fly and just big enough to hold the new content, 
   or the application can keep a buffer around. Again, this is under 
   application control.


In either case, the application must tell the compositor which area 
of the surface holds new contents. When the application renders directly 
the to shared buffer, the compositor needs to be noticed that there 
is new content. But also when exchanging buffers, the compositor 
doesn't assume anything changed, and needs a request from the application 
before it will repaint the desktop. The idea that even if an application 
passes a new buffer to the compositor, only a small part of the buffer 
may be different, like a blinking cursor or a spinner.

no I'm talking about treeview and dir-requestor for rebgui based 
on your work on the request-dir.r as you yet have a good experience 
and some inovent ideas over this topic  I think it's natural to push 
you to contribute but I you doesn't want to I will take some weeks 
soon to do it  but it could be more painfull for me and less inventiv 
that the work you can do DideC

no I'm talking about treeview and dir-requestor for rebgui based 
on your work on the request-dir.r as you yet have a good experience 
and some inovent ideas over this topic  I think it's natural to push 
you to contribute but I you doesn't want to push you. I will take 
some weeks soon to do it  but it could be more painfull for me and 
less inventiv that the work you can do DideC

it was simulated in rebol level, was found being slow, so Carl reacted 
upon the request and made those functions native, as they became 
usable for us ...

Those are exactly the questions/request, which I would expect to 
be answered by RT

shadwolf - have you put your request into rambo?

So that looks good. Unless anyone has any objections I will post 
it to RAMBO as a feature request.

I notice a bug in the CONNECT request from REBOL to the proxy. Ethereal 
reports:

[Dissector bug, protocol HTTP: "Request Version" - "http.request.version" 
invalid length: -32 (proto.c:2104)]
!?

OK - got it - virtual() sends request to server - so:
virtual("cgi-bin/myscript.r");

maybe kind of caching could be introduced to speed things, not needing 
to parse template with each request ...

often those things can be speedd upby caching/compiling. You parse 
the pagew, store this find-by-class data in a file and use that on 
request.

of course if only one channel to db exists, you have to come-up with 
request serialisation, or siply for each request you can open new 
data channel, no?

I just downloaded Serveit .. but it comes up with a gui :(  And if 
I try it in quiet mode, --quiet, it comes up with a license code 
request :(

I'm administrating some pages where is a lot of text articles published. 
And because 50% of the trafic is done by robots as Google crawler, 
I'm thinking about that I could give the content of the page in Rebol 
format (block). Robot will get the text for indexing and I will lower 
the data amount which is transfered with each robots request, because 
I don't need to generate designs and some webparts, which are not 
important for the robot. What do you think, should I include Rebol 
header?

Etags should work like this: client requests a resource, server returns 
resource and etag header.  Client again requests resource, but this 
time sends if-none-match header with etag value and server can then 
decide whether to process the request or send 304 not changed.  I 
haven't explored this much so don't know how well it's supported 
-- I'm not sure how appropriate the solution is, but would involve 
the least server activity.

yes, I am sending it each time, but for some reason it seems to only 
like the first request, after that it expires , or something else 
is going wrong ... Id really like to see a client with transparent 
support for cookies

I asked a broad question because I didn't know what answer I need 
... ;-)


Specifically, this comes out of Opera and when I parse it to HTTP, 
I don't know if I should make a Request of:

Host: sitecheck2.opera.com
Path: /
Target: ?host=www.rebol.net&hdn=SDbXzuPvK4tsiGnHOia5dA==


or some other way, like perhaps Path: none ? and Target: /?host=www.rebol.net&hdn=SDbXzuPvK4tsiGnHOia5dA==

Please keep in mind, you can create a private group, and invite whom 
ever you like to it.  Everyone else will not see this group.


You will see this group as private (sun glasses on little people 
in the group icon).


You may also request to be removed from any group.  Which means the 
group needs to be made private.


The down side is that currently we don't have a method to have a 
public group that you can opt out of.  Something that it is clear 
is now needed.


I you have any questions, feel free to post in group/ann-reply, or 
to speak to me privately.

REBOL [
    Title:   "Slideshow"
    Date:    12-Oct-2006
    Name:    'SLIDESHOW  ; For window title bar
    Version: 1.0.0
    File:    %slideshow.r
    Author:  "Louis A. Turk"
    Rights:  "Public Domain; use at your own risk."
    Needs:   "A version of REBOL/VIEW supporting sound"

    Purpose: {To make possible simple, easy to make narrated slide shows.

              Hopefully can be used with the REBOL plugin to show narriated slides
              on a web site.

              Hopefully can an effective tool to teach REBOL programming.
    }
    Note: {
        The concept and design originated with Louis A. Turk.

        DideC helped considerably by answering programming questions and 
        giving bits of code;
        it would not have been possible without his help.
	Josh also answered programming questions.


        You can make wav files using the free program Audacity. http://audacity.sourceforge.net


        Advanced JEPG Compressor does and excellent job compressing graphics 
        files so they load 
        faster, but is not free.
    }
    History: [
        1.0.0 [ "First release." "Louis"]
    ]

    Language: 'English
]

;Requires a data file named %slides.r containing lines of blocks 
in the following format:

;Each block must contain: (1) slidename, (2) overlay, (3) caption, 
(4) sound.

;Example block: [%slide1.jpg "Overlay text." "A caption!" %sound.wav]
;Use "" for no overlay or caption.


;file: request-file/title/only "Select the slides data file to use." 
"Select Data File"

file: %slides.txt ;uncomment the above line, and comment this one 
to select data files with different names.
slides: load file
narrate: func [talk] [ ;--- Manage the sound
    sound-port: open sound://
    insert sound-port load talk
    wait sound-port
    close sound-port
]

view/new win: layout/size [] 650x650 ;<= Set the max size you need
wait 0  ;---Initialize REBOL's internal event handler.
foreach slide  slides [ ;--- Start the slide show
    set [graphic overlay caption narration] slide
    lay: layout [
        origin 0

        banner center bold red "A REBOL Produced Narriated Slide Show" 
        image graphic overlay 500x400 frame black [unview] [quit]
        text 500 bold caption
        button "Quit" center [quit]
    ]
    center-face/with lay win
    append clear win/pane lay
    show win
    narrate narration
]
do-events

Introducing QuarterMaster: Yet Another Web Framework that I'm probably 
going to have to take time to document properly: http://www.ross-gill.com/QM/


In short, it is designed around the MVC pattern.  It is open source 
(license tbd).  Tries to be lightweight, but could use some work. 
 Tries to be as thin a wrapper to Rebol (/Core, /Base, whatever) 
while providing key functions for creating web sites/applications. 
 Includes a flat-file dbms out the box, which generally works.  Currently 
coded to work with Apache (needs mod-rewrite and 'request-uri' env 
variable), but should eventually be httpd agnostic.  Please try, 
please test.  I will answer all and every question (within reason). 
 All suggestions considered with an open mind...

Group: !QM

Using QM with Cheyenne -- instructions now included in the documentation:
http://www.ross-gill.com/QM/introduction.html


All mod-QM should do is intercept 404s and redirect the request to 
QM.  I don't think this affects existing setups (please tell me if 
I'm wrong).  QM 404s by default are handled in files://system/views/errors/notfound.rsp

New 'opt-in' group created for the Cheyenne - Framewerks Project


This FOSS project is a port of Redwerks CMS system (http://redwerks.org) 
to use Cheyenne rather than Apache. Continued exploration of AI / 
NLP using LFReD, AtomDB and other techs with Cheyenne to build the 
next generation of web servers.

Send me a request to me directly if you would like to join.

(send me a request to me?... sheesh :)

< QM > Version 0.3.9

http://www.ross-gill.com/QM/


Fixes a context issue with QuickTags (bug fix).  Minor change to 
the Cheyenne 'request/content' handling (bug fix).  And thanks to 
Ammon for giving it testdrive, helps greatly in sorting out priorities!

Almost there: Twitter API client using OAuth (Basic Auth is being 
turned off).  Only thing I can't get working is signing a POST request 
with a body (which sucks for sending updates):

	http://www.ross-gill.com/page/Twitter_API_and_REBOL


I've tried using my rest:// protocol and the currently published 
version uses Graham's HTTP modifications (regular HTTP does not work 
as you can't use custom headers with a GET request).


Aside from that, the GET requests work, as does the authorization 
process.  Any observations welcome.

I think the error only occurs if you use request-download or similar

I did have an include with request-download but I removed it as I 
thought that might be causing a prob...
But I'm getting other errors related to the includes

Getting an error on an ecapped script...works fine as script though:

** Script Error: base-effect has no value
** Where: do-facets
** Near: base-effect
** Press enter to quit...

Sounds like I'm missing an include but I have:
#INCLUDE %"../../../rebol-sdk-276/source/mezz.r"
#INCLUDE %"../../../rebol-sdk-276/source/prot.r"
#INCLUDE %"../../../rebol-sdk-276/source/view.r"
and just in case I tried adding:
#INCLUDE %"../../../rebol-sdk-276/source/gfx-colors.r"
#INCLUDE %"../../../rebol-sdk-276/source/gfx-funcs.r"

It crashes when I request-dir

If I substitute request-file it opens hte requester and continues 
throughthe code but request-dir gives me the error before the requestor 
opens..

Found the error in the view-request.r source code:
backeffect base-effect
Not sure what it does but commneting it out fixes the problem..

Graham mentioned it was a bug with "request-download" or similar...

Not sure where to put this so asking here:


I downloaded a web script and it has a  snippet I don't understand:
buffer: make string! 1024         ;; contains the browser request
file: "index.html"
parse buffer ["get" ["http"  |   "/ "  |  copy file to " " ]]

what does:

copy file to " "

mean or do?
tia

Ok now I found the URL to download SDK 2.7.8. There is download URL 
for 2.7.7 in the email that RT send me when I purchase. I changed 
the url and find the 2.7.8.

But I got 404 not found when I try 2.7.6. I'll send a msg to RT. 
Thank you.

May I use my license file for all of them? 2.7.6 to 2.7.8, or do 
I need to request a new license file as well?

you can just to a small ping to detect changes... it can even be 
a boolean request, thus really tiny and fast.

I've written a patch to the assembler that implements a working OFFSET 
directive and label value fixups. I will submit it to RAMBO as an 
enhancement request.

There is something in the rebcode docs about a special case behavior 
for BRAB that would enable calculated branches, but that special 
case hasn't been implemented yet. I have just made a RAMBO request 
that this behavior be implemented, so we'll see how that goes.

graph-layout: I won't have the time to get deeper into rebcode in 
the moment. So, here is a request, for something that gives a nice 
demo: I have the old graph-layout code, which uses the TouchGraph 
idea. Anyone interested to port it to rebcode and see howmany nodes 
we can handle?

The power in Rebol is different. I think Rebol is good for KISS, 
where simple things are simple, hard things are hard. Like adding 
co-routines. We added this feature to BEER. It works but they require 
careful programming of your routines. Otherwise you get blocking. 
The solutions is R3 tasks. Similarly situation has happend with other 
features, like the FastCGI request that I see sometimes, or callbacks 
for C routines which was dormant inside the interpreter for years 
until discover by cyphre and later released.

It puts them in a very comfortable zone and in a head space where 
they can think
about and request very specific options and outcomes.

Feature request:  I propose SELECT's arguments should reversed, to 
be like SWITCH. I remember SWITCH being implemented and arguing to 
put the VALUE argument before the CASES block to make it easy to 
find.

but changes like Anton's SELECT request invalidate MOST of REBOL 
code in one sweeping ARC.

Jaime, could you please voice your multimethod request to blog comments 
section? I think that Carl is not checking Altme here anymore .....

many things are added to other languages, not because they are usefull, 
or where included by design.  but because the language eventually 
outgrew its original design or because new users request feature 
XYZ so many times it felt like a good idea to add it.

request for R3   rebcode access to struct! types.

look at the request object

Global 'request is a view  function -- QM has it's own request object...

<HTML>
<HEAD>
	<TITLE>RSP Test Page</TITLE>
</HEAD>
<BODY bgcolor="white">
<a href="/">Back</a><br><br>
<FONT FACE="Arial" SIZE='-1'>
<B>Timestamp: </B><%=now %>
<BR><BR>
<H4>Request parameters :</H4>
<UL>
	<LI><B>HTTP Method: </B> <%=mold request/method%></LI>
	<LI><B>HTTP Port: </B> <%=mold request/server-port%></LI>
	<LI><B>Client IP address: </B> <%=mold request/client-ip%></LI>
</UL>
<H4>Request headers :</H4>
<UL><%
	foreach [name value] request/headers [
		print [<LI><B> name ":"</B> mold value </LI>]
	]
%></UL>
<H4>Request variables :</H4>
<UL><%
	either empty? request/content [
		print "<LI>No variable passed</LI>"
	][
		foreach [name value] request/content [
			print [<LI><B> name ":"</B> mold value </LI>]
		]
	]
%></UL>
<H4>Session :</H4>
<%either session/content [%>
<UL>
	<LI><B>SID: </B> <%=session/id%></LI><%
		either empty? session/content [
			print "<LI>No session variables</LI>"
		][
			foreach [name value] session/content [
				print [<LI><B> name ":"</B> mold value </LI>]
			]
		]
%></UL>
<%][%>
	<UL><LI>No session</LI></UL>
<%]%>

</FONT>
</BODY>
</HTML>

We have some trouble with our provider, it hasn't yet answer to our 
HD replace request :-/. So still down...I'll set up a temporary download 
page on our softinnov.com server.

HOW-TO make Cheyenne work with PHP for non-Windows OS


The purpose of the following patch is to make FastCGI in PHP work 
the same on all OSes.


1) If you have PHP v5.2.1 or higher with sources, you can skip 2) 
& 3) else :

2) Download latest PHP sources from http://www.php.net/downloads.php
3) Untar the archive anywhere yo want
4) Go to PHP install folder
5) Patching PHP source :

	Open a REBOL console, then :

;---- cut'n paste the following code in REBOL's console ----

patch-php: has [buffer pos][
	target: %sapi/cgi/fastcgi.c
	if none? attempt [buffer: read target][
		print "unable to find the file to patch!!"
		exit
	]
	either parse buffer [
		thru "int fcgi_accept_request("
		to "if (req->fd >= 0) {"
		pos: to end
	][
		insert pos "^/^-^-^-^-break;^/^-^-^-^-"
		write target buffer
		print "patch applied."
	][
		print "failed to locate the line to patch!!"
	]
]

patch-php
;---- end of code ----
		
6) Once the patch is applied :

	> ./configure --enable-fastcgi
	> make
	> sudo make install
	
7) Check if everything is ok :

	> php-cgi -h
	...
	you should see a -b option listed meaning you got proper
	FastCGI support.
	
	If it fails (occured on OSX), try with a full path instead :
	
	> /usr/local/bin/php-cgi -h
	

8) Edit Cheyenne's config file (httpd.cfg) to set the correct option 
in the PHP section. Non-Windows users have to also set the new 'delay 
option.

woops -- just attempted to register a new acct w/ yr bugtracker -- 
got the email confirming, went to the indicated url -- found a bug 
;-) --> > RSP Error Trapped<

Error Code : 	310
Description : 	script error !
validate-user has no refinement called update
Near : 	[if not validate-user/update request/content [err?: yes]]
Where : 	protected-exec

As this group might be followed by our French friends, I have one 
off-topic request ... if here is anyone from Paris area, I would 
like him to msg me privately. Our Company is opening subsidiary in 
Paris area, and I need to find local partner, who would eventually 
take care of some local IT related duties :-)

Are you sure you want to set url, path, target and ext inside parse-request-line? 
If you do that, you cannot simply rewrite using mods.

impressed! 8) I finally gave another try at php support in cheyenne 
and after patching fastcgi.c as suggested it now works like a charm.

If you are on os x and use macports, here is a way to patch and compile:

sudo port install php5 +mysql5 +fastcgi
sudo port uninstall php5
cd /opt/local/var/macports/distfiles/php5/
sudo tar -xjf php-5.2.6.tar.bz2
>> run patch below
tar -cjf php-5.2.6.tar.bz2 php-5.2.6
sudo port install php5 +mysql5 +fastcgi checksum.skip=yes

copy of Dockimbel's patch with path fixed for this example

;---- cut'n paste the following code in REBOL's console ----

patch-php: has [buffer pos][ target: %php-5.2.6/sapi/cgi/fastcgi.c 
if none? attempt [buffer: read target][ print "unable to find the 
file to patch!!" exit ] either parse buffer [ thru "int fcgi_accept_request(" 
to "if (req->fd >= 0) {" pos: to end ][ insert pos "^/^-^-^-^-break;^/^-^-^-^-" 
write target buffer print "patch applied." ][ print "failed to locate 
the line to patch!!" ] ]
patch-php ;---- end of code ----

This bench looks a little odd to me. First, how can Yaws supports 
80,000 parallel connections when running on a single server (TCP/IP 
stack limit is at 65535 AFAIK) ? Second, the load is generated by 
sending request byte per byte with a delay of 10s between each bytes 
and getting in response a file of 1 byte...This isn't a web server 
real load test, it just compares the scalability of OS threads vs 
"soft threads". You don't need a benchmark to know which one scales 
better on a mono-CPU server, it's obvious. How Erlang handles multi-core 
CPU ?

I'm back at asking this -- how do I obtain the original request string 
-- e.g.  "/wiki/show/This_Page" within the CGI environment?  'path-info 
only gives me the translated filename (always '/qm.r' for my app)

I'm not sure what is Terry doing, but of course you can use Rebol 
to connect from Flash to services on servers from not allowed domain 
as with Rebol you can change the request header easily.

DocKimbel, small request: Would it be possible to post the rsp guide, 
cheatsheet and docs as separate pages directly on the site? It's 
unpractical to have to download Cheyenne every time I switch machine, 
just to read the docs. Thanks.

about variable overwrite I would check first any of those present 
here http://cheyenne-server.org/docs/rsp-api.htmlspecifically "session" 
"resonse" and "request"

REST: The starting point is to authorize all HTTP methods by adding 
them in mod-static/method-support callback. Then, if Cheyenne doesn't 
choke on them (should be treated by default as a GET, but untested), 
you can write a dispatching RSP page that will basically do a : switch 
request/method [GET [...] POST [...] DELETE [...] ...]. The upcoming 
v0.9.19 release will bring a URL aliasing feature that will allow 
nicer and more RESTful URL.

so, how would one determine if it's a REST request or just a ordinary 
other request?

REST = HTTP request, so it depends on which handler will respond 
to the HTTP request. If your URL point to a .rsp => RSP handler.

from RSP, you just have to look in request/headers to get custom 
headers.

A question about post/put

Here's my little test file

<html><title> RSP PUT test </title>
<%= request/posted
%>
</html>

OTOH, you could also make a more simpler mod-rest acting as a REST 
wrapper and just rewriting the URL to point to a simple ressource 
(CGI or RSP) and saving the REST url inside a custom HTTP header. 
That way, you could easily redirect a REST call to a RSP dispatcher. 
If you go that way, I would recommend to write a module with a single 
callback early in the Cheyenne's request processing pipeline.

So I can't request the files from them that way.

either 'sess, 'validate or 'request is none where they shouldn't 
be

0/8-09:28:22.596130-[RSP] ##RSP Script Error: 

        URL  = /bugs/index.rsp
        File = www/bugs/index.rsp

        ** Script Error : Cannot use path on none! value 
        ** Where: rsp-script 
        ** Near:  [if all [
not sess/login? 
none? validate/full [action word! *] 
'identify = request/content/action
] [
either invalid: validate/full [
login - * 
pass - *
] [
err?: yes
] [
.... more stuff after that

now I'm trying to add a project, but on the index.rsp page in the 
manage section, I get:

URL  = /bugs/manage/index.rsp
        File = www/bugs/manage/links.rsp

        ** Script Error : Invalid path value: clear 
        ** Where: rsp-script 
        ** Near:  [response/clear 
response/redirect request/web-app
]

send-confirmation: func [
	spec [block!] vkey [string!]
	/local url login pass template
][
	system/user/name: "REBOL3 Tracker" 
	set-net reduce [[no-reply-:-curecode-:-org] "softinnov.com"]
	url: rejoin [
		request/headers/Host

  either request/server-port = 80 [""][join ":" request/server-port]
		request/web-app
		"/validate.rsp?id=" url-encode spec/login 
		"&key=" vkey
	]
	login: spec/login
	pass: spec/pass
	template: read join locale/get-path %email-activation.tpl
	replace template "$url" url
	replace template "$login" login
	replace template "$pass" pass
	
	send/subject spec/email template
		rejoin ["[REBOL3 Tracker] " say "Account activation"]
]

Pekr, I don't understand your request, the first item is already 
preselected.