Skip to content
GitLab
Explore
Sign in
Register
Primary navigation
Search or go to…
Project
SeaMonkey Website
Manage
Activity
Members
Code
Repository
Branches
Commits
Tags
Repository graph
Compare revisions
Snippets
Deploy
Releases
Package Registry
Model registry
Operate
Terraform modules
Analyze
Contributor analytics
Repository analytics
Model experiments
Help
Help
Support
GitLab documentation
Compare GitLab plans
Community forum
Contribute to GitLab
Provide feedback
Terms and privacy
Keyboard shortcuts
?
Snippets
Groups
Projects
Show more breadcrumbs
SeaMonkey
SeaMonkey Website
Commits
a6d3a6691452
Commit
a6d3a6691452
authored
17 years ago
by
justdave
Browse files
Options
Downloads
Patches
Plain Diff
Adding additional files required for the current version of the build system
parent
0f512edd95ca
No related branches found
Branches containing commit
No related tags found
No related merge requests found
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
bin/build_full
+7
-0
7 additions, 0 deletions
bin/build_full
bin/build_full-exclusive.pl
+59
-0
59 additions, 0 deletions
bin/build_full-exclusive.pl
with
66 additions
and
0 deletions
bin/build_full
0 → 100755
+
7
−
0
View file @
a6d3a669
cd /data/build/seamonkeyproject-org && \
cvs -q up -dAP > /dev/null || exit 1
rm -f dest &&
ttree -f etc/ttree.cfg $@
rsync -a --delete dest/ /data/static/www/www.seamonkeyproject.org/
rm -rf dest && \
ln -s /data/static/www/www.seamonkeyproject.org dest
This diff is collapsed.
Click to expand it.
bin/build_full-exclusive.pl
0 → 100755
+
59
−
0
View file @
a6d3a669
#!/usr/bin/perl -w
# Builds the website, acquiring a lock first so builds don't collide with
# each other. Run this from the website root directory. Pass command line
# options to the build script by first putting "--" on the command line,
# i.e. "build-exclusive.pl -- -v foo.html" runs "bin/build -v foo.html".
use
strict
;
# The number of seconds to wait before trying again if another build is going.
# Set this with the --wait command line option.
my
$WAIT
=
15
;
# The maximum amount of time in seconds to wait for a lock before dying.
# Set this with the --maxwait command line option.
#
# If this script is being run periodically by cron, set this low (ideally less
# than the interval between cron runs; f.e. 30 seconds for a run that happens
# every minute) to prevent processes from building up.
#
# If this script gets run by CVS upon commit, set this high (f.e. 450 seconds,
# i.e. 15 minutes) so that multiple simultaneous commits all go through
# one after the other even if some of them have to wait a while.
#
my
$MAX_WAIT
=
30
;
# Get any options passed on the command line, like --wait and --maxwait.
use
Getopt::
Long
;
my
$result
=
GetOptions
("
wait=i
"
=>
\
$WAIT
,
"
maxwait=i
"
=>
\
$MAX_WAIT
);
# Use Proc::PID::File to handle the locking.
use
Proc::PID::
File
;
my
$LOCK_OPTS
=
{
dir
=>
"
/tmp
",
name
=>
"
smprojorg-build
",
debug
=>
0
};
# Try to get a lock.
my
$started
=
time
();
my
$waited
=
0
;
while
(
Proc::PID::
File
->
running
(
$LOCK_OPTS
)
&&
((
time
()
-
$started
)
<=
$MAX_WAIT
))
{
print
STDERR
"
Couldn't get build lock; waiting another
$WAIT
seconds...
\n
";
$waited
=
1
;
sleep
$WAIT
;
}
# Die if we couldn't get a lock.
if
(
Proc::PID::
File
->
running
(
$LOCK_OPTS
))
{
die
"
Couldn't get build lock.
";
}
elsif
(
$waited
)
{
print
STDERR
"
Got build lock after
"
.
(
time
()
-
$started
)
.
"
seconds.
\n
";
}
# Build the website.
#print STDERR "Building site.\n";
system
("
bin/build_full
",
@ARGV
);
This diff is collapsed.
Click to expand it.
Preview
0%
Loading
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Save comment
Cancel
Please
register
or
sign in
to comment