mirror of
https://git.in.rschanz.org/ryan77627/guix.git
synced 2024-11-16 19:57:39 -05:00
89 lines
3.5 KiB
Scheme
89 lines
3.5 KiB
Scheme
;;; GNU Guix --- Functional package management for GNU
|
|
;;; Copyright © 2020 Danny Milosavljevic <dannym@scratchpost.org>
|
|
;;;
|
|
;;; This file is part of GNU Guix.
|
|
;;;
|
|
;;; GNU Guix is free software; you can redistribute it and/or modify it
|
|
;;; under the terms of the GNU General Public License as published by
|
|
;;; the Free Software Foundation; either version 3 of the License, or (at
|
|
;;; your option) any later version.
|
|
;;;
|
|
;;; GNU Guix 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 General Public License for more details.
|
|
;;;
|
|
;;; You should have received a copy of the GNU General Public License
|
|
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
(define-module (gnu packages raspberry-pi)
|
|
#:use-module (gnu packages)
|
|
#:use-module (gnu packages admin)
|
|
#:use-module (gnu packages algebra)
|
|
#:use-module (gnu packages base)
|
|
#:use-module (gnu packages documentation)
|
|
#:use-module (gnu packages embedded)
|
|
#:use-module (guix build-system gnu)
|
|
#:use-module (guix download)
|
|
#:use-module (guix git-download)
|
|
#:use-module ((guix licenses) #:prefix license:)
|
|
#:use-module (guix packages)
|
|
#:use-module (guix gexp)
|
|
#:use-module (guix store)
|
|
#:use-module (guix monads)
|
|
#:use-module (guix utils)
|
|
#:use-module (srfi srfi-1)
|
|
#:use-module (srfi srfi-2)
|
|
#:use-module (srfi srfi-26)
|
|
#:use-module (ice-9 match))
|
|
|
|
(define-public bcm2835
|
|
(package
|
|
(name "bcm2835")
|
|
(version "1.64")
|
|
(source (origin
|
|
(method url-fetch)
|
|
(uri (string-append
|
|
"http://www.airspayce.com/mikem/bcm2835/bcm2835-"
|
|
version ".tar.gz"))
|
|
(sha256
|
|
(base32
|
|
"06s81540iz4vsh0cm6jwah2x0hih79v42pfa4pgr8kcbv56158h6"))))
|
|
(build-system gnu-build-system)
|
|
(arguments
|
|
`(#:tests? #f)) ; Would need to be root
|
|
;; doc/html docs would not be installed anyway.
|
|
;(native-inputs
|
|
; `(("doxygen", doxygen)))
|
|
(synopsis "C library for Broadcom BCM 2835 as used in Raspberry Pi")
|
|
(description "This package provides a C library for Broadcom BCM 2835 as
|
|
used in the Raspberry Pi")
|
|
(home-page "http://www.airspayce.com/mikem/bcm2835/")
|
|
(supported-systems '("armhf-linux" "aarch64-linux"))
|
|
(license license:gpl3)))
|
|
|
|
(define raspi-gpio
|
|
(let ((commit "6d0769ac04760b6e9f33b4aa1f11c682237bf368")
|
|
(revision "1"))
|
|
(package
|
|
(name "raspi-gpio")
|
|
(version (git-version "0.1" revision commit))
|
|
(source (origin
|
|
(method git-fetch)
|
|
(uri (git-reference
|
|
(url "https://github.com/RPi-Distro/raspi-gpio.git")
|
|
(commit commit)))
|
|
(file-name (git-file-name name version))
|
|
(sha256
|
|
(base32
|
|
"1fia1ma586hwhpda0jz86j6i55andq0wncbhzhzvhf7yc773cpi4"))))
|
|
(build-system gnu-build-system)
|
|
(synopsis "State dumper for BCM270x GPIOs")
|
|
(description "Tool to help debug / hack at the BCM283x GPIO. You can dump
|
|
the state of a GPIO or (all GPIOs). You can change a GPIO mode and pulls (and
|
|
level if set as an output). Beware this tool writes directly to the BCM283x
|
|
GPIO reisters, ignoring anything else that may be using them (like Linux
|
|
drivers).")
|
|
(home-page "https://github.com/RPi-Distro/raspi-gpio")
|
|
(supported-systems '("armhf-linux" "aarch64-linux"))
|
|
(license license:bsd-3))))
|