Skip to content
GitLab
Explore
Sign in
Primary navigation
Search or go to…
Project
F
freedombone
Manage
Activity
Members
Labels
Plan
Issues
Issue boards
Milestones
Iterations
Wiki
Requirements
Code
Merge requests
Repository
Branches
Commits
Tags
Repository graph
Compare revisions
Locked files
Build
Pipelines
Jobs
Pipeline schedules
Test cases
Artifacts
Deploy
Releases
Package Registry
Container Registry
Model registry
Operate
Environments
Terraform modules
Monitor
Incidents
Service Desk
Analyze
Value stream analytics
Contributor analytics
CI/CD analytics
Repository analytics
Code review analytics
Issue analytics
Insights
Model experiments
Help
Help
Support
GitLab documentation
Compare GitLab plans
Community forum
Contribute to GitLab
Provide feedback
Keyboard shortcuts
?
Snippets
Groups
Projects
Show more breadcrumbs
Context Sensitive Group
freedombone
Commits
3cdf3e45
Commit
3cdf3e45
authored
7 years ago
by
Bob Mottram
Browse files
Options
Downloads
Patches
Plain Diff
Beginning of guile support
parent
36d73b2a
No related branches found
Branches containing commit
No related tags found
No related merge requests found
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
src/freedombone-utils-guile
+89
-0
89 additions, 0 deletions
src/freedombone-utils-guile
with
89 additions
and
0 deletions
src/freedombone-utils-guile
0 → 100755
+
89
−
0
View file @
3cdf3e45
#!/bin/bash
#
# .---. . .
# | | |
# |--- .--. .-. .-. .-.| .-. .--.--. |.-. .-. .--. .-.
# | | (.-' (.-' ( | ( )| | | | )( )| | (.-'
# ' ' --' --' -' - -' ' ' -' -' -' ' - --'
#
# Freedom in the Cloud
#
# Recent version of guile
#
# License
# =======
#
# Copyright (C) 2017 Bob Mottram <bob@freedombone.net>
#
# This program is free software: you can redistribute it and/or modify
# it under the terms of the GNU Affero General Public License as published by
# the Free Software Foundation, either version 3 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU Affero General Public License for more details.
#
# You should have received a copy of the GNU Affero General Public License
# along with this program. If not, see <http://www.gnu.org/licenses/>.
GUILE_VERSION
=
'2.2.0'
GUILE_HASH
=
'c707b9cf6f97ecca3a4e3e704e62b83f95f1aec28ed1535f5d0a1d36af07a015'
EIGHTSYNC_REPO
=
"git://git.savannah.gnu.org/8sync.git"
EIGHTSYNC_COMMIT
=
''
function
install_8sync
{
apt-get
-qy
install
flex libunistring-dev libgc-dev autoconf texinfo
if
[
!
-d
$INSTALL_DIR
]
;
then
mkdir
$INSTALL_DIR
fi
cd
$INSTALL_DIR
git_clone
$EIGHTSYNC_REPO
$INSTALL_DIR
/eightsync
cd
$INSTALL_DIR
/eightsync
git checkout
${
EIGHTSYNC_COMMIT
}
-b
${
EIGHTSYNC_COMMIT
}
GUILE_PATH
=
/opt/guile-
${
GUILE_VERSION
}
PATH
=
${
GUILE_PATH
}
/bin:
$PATH
export
GUILE_CFLAGS
=
"-I
${
GUILE_PATH
}
/include"
export
GUILE_LIBS
=
"-L
${
GUILE_PATH
}
/lib"
./bootstrap.sh
configure
make
make
install
}
function
install_guile
{
# Currently this only works for x86_64
read_config_param ARCHITECTURE
if
[[
${
ARCHITECTURE
}
!=
"x86_64"
]]
;
then
return
fi
GUILE_ARCH
=
'x86_64'
apt-get
-qy
install
flex libunistring-dev libgc-dev autoconf texinfo lzip wget
if
[
!
-d
$INSTALL_DIR
]
;
then
mkdir
$INSTALL_DIR
fi
cd
$INSTALL_DIR
if
[
!
-f
guile-
${
GUILE_VERSION
}
-pack-
${
GUILE_ARCH
}
-linux-gnu
.tar.lz
]
;
then
wget https://ftp.gnu.org/gnu/guile/guile-
${
GUILE_VERSION
}
-pack-
${
GUILE_ARCH
}
-linux-gnu
.tar.lz
fi
if
[
!
-f
guile-
${
GUILE_VERSION
}
-pack-
${
GUILE_ARCH
}
-linux-gnu
.tar.lz
]
;
then
echo
'Unable to download guile pack'
exit
6735238
fi
CURR_GUILE_HASH
=
$(
sha256sum
guile-
${
GUILE_VERSION
}
-pack-
${
GUILE_ARCH
}
-linux-gnu
.tar.lz |
awk
-F
' '
'{print $1}'
)
if
[[
"
$CURR_GUILE_HASH
"
!=
"
$GUILE_HASH
"
]]
;
then
echo
'Guile hash does not match'
exit
7237625
fi
cd
/
tar
xvf
$INSTALL_DIR
/guile-
${
GUILE_VERSION
}
-pack-
${
GUILE_ARCH
}
-linux-gnu
.tar.lz
}
# NOTE: deliberately no exit 0
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