Rename mason.server to webapps.mason.backend, rename mason.version to webapps.mason.version, for cleaner client-server separation
parent
c4d717a49a
commit
f013f9aa2f
|
@ -1,6 +1,6 @@
|
||||||
USING: continuations db db.sqlite io.directories io.files.temp
|
USING: continuations db db.sqlite io.directories io.files.temp
|
||||||
mason.server tools.test ;
|
webapps.mason.backend tools.test ;
|
||||||
IN: mason.server.tests
|
IN: webapps.mason.backend.tests
|
||||||
|
|
||||||
[ "test.db" temp-file delete-file ] ignore-errors
|
[ "test.db" temp-file delete-file ] ignore-errors
|
||||||
|
|
|
@ -2,7 +2,7 @@
|
||||||
! See http://factorcode.org/license.txt for BSD license.
|
! See http://factorcode.org/license.txt for BSD license.
|
||||||
USING: accessors calendar db db.sqlite db.tuples db.types kernel
|
USING: accessors calendar db db.sqlite db.tuples db.types kernel
|
||||||
math math.order sequences combinators.short-circuit ;
|
math math.order sequences combinators.short-circuit ;
|
||||||
IN: mason.server
|
IN: webapps.mason.backend
|
||||||
|
|
||||||
CONSTANT: +idle+ "idle"
|
CONSTANT: +idle+ "idle"
|
||||||
CONSTANT: +starting+ "starting"
|
CONSTANT: +starting+ "starting"
|
|
@ -1,8 +1,8 @@
|
||||||
! Copyright (C) 2010 Slava Pestov.
|
! Copyright (C) 2010 Slava Pestov.
|
||||||
! See http://factorcode.org/license.txt for BSD license.
|
! See http://factorcode.org/license.txt for BSD license.
|
||||||
USING: kernel math mason.email mason.server math.parser sequences
|
USING: kernel math math.parser sequences xml.syntax xml.writer
|
||||||
xml.syntax xml.writer ;
|
mason.email webapps.mason.backend ;
|
||||||
IN: mason.server.watchdog
|
IN: webapps.mason.backend.watchdog
|
||||||
|
|
||||||
: crashed-builder-body ( crashed-builders -- string content-type )
|
: crashed-builder-body ( crashed-builders -- string content-type )
|
||||||
[ os/cpu [XML <li><-></li> XML] ] map
|
[ os/cpu [XML <li><-></li> XML] ] map
|
|
@ -1,7 +1,7 @@
|
||||||
! Copyright (C) 2010 Slava Pestov.
|
! Copyright (C) 2010 Slava Pestov.
|
||||||
! See http://factorcode.org/license.txt for BSD license.
|
! See http://factorcode.org/license.txt for BSD license.
|
||||||
USING: accessors furnace.actions http.server.responses
|
USING: accessors furnace.actions http.server.responses
|
||||||
mason.server math.parser ;
|
webapps.mason.backend math.parser ;
|
||||||
IN: webapps.mason.counter
|
IN: webapps.mason.counter
|
||||||
|
|
||||||
: <counter-action> ( -- action )
|
: <counter-action> ( -- action )
|
||||||
|
|
|
@ -1,7 +1,7 @@
|
||||||
! Copyright (C) 2010 Slava Pestov.
|
! Copyright (C) 2010 Slava Pestov.
|
||||||
! See http://factorcode.org/license.txt for BSD license.
|
! See http://factorcode.org/license.txt for BSD license.
|
||||||
USING: accessors kernel mason.server furnace.actions
|
USING: accessors kernel furnace.actions html.forms sequences
|
||||||
html.forms sequences xml.syntax webapps.mason.utils ;
|
xml.syntax webapps.mason.backend webapps.mason.utils ;
|
||||||
IN: webapps.mason.downloads
|
IN: webapps.mason.downloads
|
||||||
|
|
||||||
: builder-list ( seq -- xml )
|
: builder-list ( seq -- xml )
|
||||||
|
|
|
@ -1,8 +1,8 @@
|
||||||
! Copyright (C) 2010 Slava Pestov.
|
! Copyright (C) 2010 Slava Pestov.
|
||||||
! See http://factorcode.org/license.txt for BSD license.
|
! See http://factorcode.org/license.txt for BSD license.
|
||||||
USING: accessors furnace.actions html.components html.forms
|
USING: accessors furnace.actions html.components html.forms
|
||||||
kernel mason.server mason.version.data webapps.mason.grids
|
kernel webapps.mason.backend webapps.mason.version.data
|
||||||
webapps.mason.utils ;
|
webapps.mason.grids webapps.mason.utils ;
|
||||||
IN: webapps.mason.downloads
|
IN: webapps.mason.downloads
|
||||||
|
|
||||||
: stable-release ( version -- link )
|
: stable-release ( version -- link )
|
||||||
|
|
|
@ -1,9 +1,9 @@
|
||||||
! Copyright (C) 2010 Slava Pestov.
|
! Copyright (C) 2010 Slava Pestov.
|
||||||
! See http://factorcode.org/license.txt for BSD license.
|
! See http://factorcode.org/license.txt for BSD license.
|
||||||
USING: accessors assocs db.tuples furnace.actions
|
USING: accessors assocs db.tuples furnace.actions
|
||||||
furnace.utilities http.server.responses kernel locals
|
furnace.utilities http.server.responses kernel locals sequences
|
||||||
mason.server mason.version.data sequences splitting urls
|
splitting urls xml.syntax xml.writer webapps.mason.backend
|
||||||
webapps.mason.utils xml.syntax xml.writer ;
|
webapps.mason.version.data webapps.mason.utils ;
|
||||||
IN: webapps.mason.grids
|
IN: webapps.mason.grids
|
||||||
|
|
||||||
: render-grid-cell ( cpu os quot -- xml )
|
: render-grid-cell ( cpu os quot -- xml )
|
||||||
|
|
|
@ -1,7 +1,7 @@
|
||||||
! Copyright (C) 2010 Slava Pestov.
|
! Copyright (C) 2010 Slava Pestov.
|
||||||
! See http://factorcode.org/license.txt for BSD license.
|
! See http://factorcode.org/license.txt for BSD license.
|
||||||
USING: accessors furnace.actions math.parser
|
USING: accessors furnace.actions math.parser
|
||||||
http.server.responses mason.server ;
|
http.server.responses webapps.mason.backend ;
|
||||||
IN: webapps.mason.increment-counter
|
IN: webapps.mason.increment-counter
|
||||||
|
|
||||||
: <increment-counter-action> ( -- action )
|
: <increment-counter-action> ( -- action )
|
||||||
|
|
|
@ -1,7 +1,8 @@
|
||||||
! Copyright (C) 2010 Slava Pestov.
|
! Copyright (C) 2010 Slava Pestov.
|
||||||
! See http://factorcode.org/license.txt for BSD license.
|
! See http://factorcode.org/license.txt for BSD license.
|
||||||
USING: accessors furnace.actions html.forms
|
USING: accessors furnace.actions html.forms
|
||||||
http.server.responses mason.server mason.version validators ;
|
http.server.responses validators webapps.mason.backend
|
||||||
|
webapps.mason.version ;
|
||||||
IN: webapps.mason.make-release
|
IN: webapps.mason.make-release
|
||||||
|
|
||||||
: <make-release-action> ( -- action )
|
: <make-release-action> ( -- action )
|
||||||
|
|
|
@ -1,7 +1,7 @@
|
||||||
! Copyright (C) 2009, 2010 Slava Pestov.
|
! Copyright (C) 2009, 2010 Slava Pestov.
|
||||||
! See http://factorcode.org/license.txt for BSD license.
|
! See http://factorcode.org/license.txt for BSD license.
|
||||||
USING: accessors furnace.actions furnace.auth furnace.db
|
USING: accessors furnace.actions furnace.auth furnace.db
|
||||||
http.server.dispatchers mason.server webapps.mason.grids
|
http.server.dispatchers webapps.mason.backend webapps.mason.grids
|
||||||
webapps.mason.package webapps.mason.release webapps.mason.report
|
webapps.mason.package webapps.mason.release webapps.mason.report
|
||||||
webapps.mason.downloads webapps.mason.counter
|
webapps.mason.downloads webapps.mason.counter
|
||||||
webapps.mason.status-update webapps.mason.docs-update
|
webapps.mason.status-update webapps.mason.docs-update
|
||||||
|
|
|
@ -1,10 +1,10 @@
|
||||||
! Copyright (C) 2010 Slava Pestov.
|
! Copyright (C) 2010 Slava Pestov.
|
||||||
! See http://factorcode.org/license.txt for BSD license.
|
! See http://factorcode.org/license.txt for BSD license.
|
||||||
USING: accessors arrays combinators furnace.actions html.forms
|
USING: accessors arrays combinators furnace.actions html.forms
|
||||||
kernel mason.platform mason.report mason.server present
|
kernel xml.syntax mason.platform mason.report present
|
||||||
sequences webapps.mason webapps.mason.report webapps.mason.utils
|
sequences webapps.mason webapps.mason.report
|
||||||
xml.syntax ;
|
webapps.mason.backend webapps.mason.utils ;
|
||||||
FROM: mason.version.files => platform ;
|
FROM: webapps.mason.version.files => platform ;
|
||||||
IN: webapps.mason.package
|
IN: webapps.mason.package
|
||||||
|
|
||||||
: building ( builder string -- xml )
|
: building ( builder string -- xml )
|
||||||
|
|
|
@ -1,8 +1,8 @@
|
||||||
! Copyright (C) 2010 Slava Pestov.
|
! Copyright (C) 2010 Slava Pestov.
|
||||||
! See http://factorcode.org/license.txt for BSD license.
|
! See http://factorcode.org/license.txt for BSD license.
|
||||||
USING: accessors furnace.actions html.forms kernel
|
USING: accessors furnace.actions html.forms io.pathnames kernel
|
||||||
mason.platform mason.report mason.server sequences webapps.mason
|
mason.platform mason.report sequences webapps.mason
|
||||||
webapps.mason.utils io.pathnames ;
|
webapps.mason.backend webapps.mason.utils ;
|
||||||
IN: webapps.mason.release
|
IN: webapps.mason.release
|
||||||
|
|
||||||
: release-link ( builder -- xml )
|
: release-link ( builder -- xml )
|
||||||
|
|
|
@ -1,7 +1,7 @@
|
||||||
! Copyright (C) 2010 Slava Pestov.
|
! Copyright (C) 2010 Slava Pestov.
|
||||||
! See http://factorcode.org/license.txt for BSD license.
|
! See http://factorcode.org/license.txt for BSD license.
|
||||||
USING: accessors furnace.actions http.server.responses kernel
|
USING: accessors furnace.actions http.server.responses kernel
|
||||||
urls mason.server webapps.mason.utils xml.syntax ;
|
urls xml.syntax webapps.mason.backend webapps.mason.utils ;
|
||||||
IN: webapps.mason.report
|
IN: webapps.mason.report
|
||||||
|
|
||||||
: <build-report-action> ( -- action )
|
: <build-report-action> ( -- action )
|
||||||
|
|
|
@ -2,7 +2,7 @@
|
||||||
! See http://factorcode.org/license.txt for BSD license.
|
! See http://factorcode.org/license.txt for BSD license.
|
||||||
USING: accessors calendar combinators db.tuples furnace.actions
|
USING: accessors calendar combinators db.tuples furnace.actions
|
||||||
furnace.redirection html.forms http.server.responses io kernel
|
furnace.redirection html.forms http.server.responses io kernel
|
||||||
mason.server namespaces validators webapps.mason.utils ;
|
namespaces validators webapps.mason.utils webapps.mason.backend ;
|
||||||
IN: webapps.mason.status-update
|
IN: webapps.mason.status-update
|
||||||
|
|
||||||
: find-builder ( host-name os cpu -- builder )
|
: find-builder ( host-name os cpu -- builder )
|
||||||
|
|
|
@ -1,9 +1,9 @@
|
||||||
! Copyright (C) 2010 Slava Pestov.
|
! Copyright (C) 2010 Slava Pestov.
|
||||||
! See http://factorcode.org/license.txt for BSD license.
|
! See http://factorcode.org/license.txt for BSD license.
|
||||||
USING: accessors arrays assocs db.tuples furnace.actions
|
USING: accessors arrays assocs db.tuples furnace.actions
|
||||||
furnace.utilities html.forms kernel mason.config mason.server
|
furnace.utilities html.forms kernel namespaces sequences
|
||||||
mason.version.data namespaces sequences validators xml.syntax
|
validators xml.syntax urls mason.config
|
||||||
urls ;
|
webapps.mason.version.data webapps.mason.backend ;
|
||||||
IN: webapps.mason.utils
|
IN: webapps.mason.utils
|
||||||
|
|
||||||
: link ( url label -- xml )
|
: link ( url label -- xml )
|
||||||
|
|
|
@ -1,8 +1,8 @@
|
||||||
! Copyright (C) 2010 Slava Pestov.
|
! Copyright (C) 2010 Slava Pestov.
|
||||||
! See http://factorcode.org/license.txt for BSD license.
|
! See http://factorcode.org/license.txt for BSD license.
|
||||||
USING: io kernel make mason.version.common mason.version.files
|
USING: io kernel make sequences webapps.mason.version.common
|
||||||
sequences ;
|
webapps.mason.version.files ;
|
||||||
IN: mason.version.binary
|
IN: webapps.mason.version.binary
|
||||||
|
|
||||||
: binary-release-command ( version builder -- command )
|
: binary-release-command ( version builder -- command )
|
||||||
[
|
[
|
|
@ -2,7 +2,7 @@
|
||||||
! See http://factorcode.org/license.txt for BSD license.
|
! See http://factorcode.org/license.txt for BSD license.
|
||||||
USING: accessors calendar io io.encodings.ascii io.launcher
|
USING: accessors calendar io io.encodings.ascii io.launcher
|
||||||
kernel make mason.config namespaces ;
|
kernel make mason.config namespaces ;
|
||||||
IN: mason.version.common
|
IN: webapps.mason.version.common
|
||||||
|
|
||||||
: execute-on-server ( string -- )
|
: execute-on-server ( string -- )
|
||||||
[ "ssh" , upload-host get , "-l" , upload-username get , ] { } make
|
[ "ssh" , upload-host get , "-l" , upload-username get , ] { } make
|
|
@ -1,8 +1,8 @@
|
||||||
! Copyright (C) 2010 Slava Pestov.
|
! Copyright (C) 2010 Slava Pestov.
|
||||||
! See http://factorcode.org/license.txt for BSD license.
|
! See http://factorcode.org/license.txt for BSD license.
|
||||||
USING: accessors calendar db db.tuples db.types kernel locals
|
USING: accessors calendar db db.tuples db.types kernel locals
|
||||||
mason.version.files sequences ;
|
webapps.mason.version.files sequences ;
|
||||||
IN: mason.version.data
|
IN: webapps.mason.version.data
|
||||||
|
|
||||||
TUPLE: release
|
TUPLE: release
|
||||||
host-name os cpu
|
host-name os cpu
|
|
@ -2,7 +2,7 @@
|
||||||
! See http://factorcode.org/license.txt for BSD license.
|
! See http://factorcode.org/license.txt for BSD license.
|
||||||
USING: accessors fry kernel make mason.config mason.platform
|
USING: accessors fry kernel make mason.config mason.platform
|
||||||
mason.release.archive namespaces sequences ;
|
mason.release.archive namespaces sequences ;
|
||||||
IN: mason.version.files
|
IN: webapps.mason.version.files
|
||||||
|
|
||||||
: release-directory ( string version -- string )
|
: release-directory ( string version -- string )
|
||||||
[ "releases/" % % "/" % % ] "" make ;
|
[ "releases/" % % "/" % % ] "" make ;
|
|
@ -2,9 +2,9 @@
|
||||||
! See http://factorcode.org/license.txt for BSD license.
|
! See http://factorcode.org/license.txt for BSD license.
|
||||||
USING: bootstrap.image bootstrap.image.download io
|
USING: bootstrap.image bootstrap.image.download io
|
||||||
io.directories io.directories.hierarchy io.files.unique
|
io.directories io.directories.hierarchy io.files.unique
|
||||||
io.launcher io.pathnames kernel mason.common mason.config
|
io.launcher io.pathnames kernel namespaces sequences
|
||||||
mason.version.files namespaces sequences ;
|
mason.common mason.config webapps.mason.version.files ;
|
||||||
IN: mason.version.source
|
IN: webapps.mason.version.source
|
||||||
|
|
||||||
: clone-factor ( -- )
|
: clone-factor ( -- )
|
||||||
{ "git" "clone" "git://factorcode.org/git/factor.git" } try-process ;
|
{ "git" "clone" "git://factorcode.org/git/factor.git" } try-process ;
|
|
@ -1,11 +1,12 @@
|
||||||
! Copyright (C) 2010 Slava Pestov.
|
! Copyright (C) 2010 Slava Pestov.
|
||||||
! See http://factorcode.org/license.txt for BSD license.
|
! See http://factorcode.org/license.txt for BSD license.
|
||||||
USING: accessors bit.ly combinators db.tuples debugger fry
|
USING: accessors bit.ly combinators db.tuples debugger fry
|
||||||
grouping io io.streams.string kernel locals make mason.email
|
grouping io io.streams.string kernel locals make sequences
|
||||||
mason.server mason.twitter mason.version.binary
|
threads mason.email mason.twitter webapps.mason.backend
|
||||||
mason.version.common mason.version.data mason.version.files
|
webapps.mason.version.common webapps.mason.version.data
|
||||||
mason.version.source sequences threads ;
|
webapps.mason.version.files webapps.mason.version.source
|
||||||
IN: mason.version
|
webapps.mason.version.binary ;
|
||||||
|
IN: webapps.mason.version
|
||||||
|
|
||||||
: check-releases ( builders -- )
|
: check-releases ( builders -- )
|
||||||
[ release-git-id>> ] map all-equal?
|
[ release-git-id>> ] map all-equal?
|
|
@ -26,7 +26,7 @@ webapps.wiki
|
||||||
webapps.user-admin
|
webapps.user-admin
|
||||||
webapps.help
|
webapps.help
|
||||||
webapps.mason
|
webapps.mason
|
||||||
mason.server ;
|
webapps.mason.backend ;
|
||||||
IN: websites.concatenative
|
IN: websites.concatenative
|
||||||
|
|
||||||
: test-db ( -- db ) "resource:test.db" <sqlite-db> ;
|
: test-db ( -- db ) "resource:test.db" <sqlite-db> ;
|
||||||
|
|
Loading…
Reference in New Issue