;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2019, 2020 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2019 Tobias Geerinckx-Rice <me@tobias.gr>
;;;
;;; 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 mastodon)
  #:use-module (guix packages)
  #:use-module (guix download)
  #:use-module (guix build-system python)
  #:use-module ((guix licenses) #:prefix license:)
  #:use-module (gnu packages check)
  #:use-module (gnu packages time)
  #:use-module (gnu packages python-check)
  #:use-module (gnu packages python-crypto)
  #:use-module (gnu packages python-web)
  #:use-module (gnu packages python-xyz))

(define-public toot
  (package
    (name "toot")
    (version "0.27.0")
    (source
      (origin
        (method url-fetch)
        (uri (pypi-uri "toot" version))
        (sha256
         (base32 "1mfbqmgna7046d134pc5qx1vyfd60vwcn0xr9lxzlmc5rjdbmz8x"))))
    (build-system python-build-system)
    (arguments
     '(#:phases
       (modify-phases %standard-phases
         (replace 'check
           (lambda* (#:key inputs outputs #:allow-other-keys)
             (add-installed-pythonpath inputs outputs)
             (invoke "py.test"))))))
    (native-inputs
     `(("python-pytest" ,python-pytest)))
    (inputs
     `(("python-beautifulsoup4" ,python-beautifulsoup4)
       ("python-requests" ,python-requests)
       ("python-urwid" ,python-urwid)
       ("python-wcwidth" ,python-wcwidth)))
    (home-page "https://github.com/ihabunek/toot/")
    (synopsis "Mastodon CLI client")
    (description "Interact with Mastodon social network from the command line.
Features include:
@itemize
@item Posting, replying, deleting statuses
@item Support for media uploads, spoiler text, sensitive content
@item Search by account or hash tag
@item Following, muting and blocking accounts
@item Simple switching between authenticated in Mastodon accounts
@end itemize")
    (license license:gpl3)))

(define-public python-mastodon-py
  (package
    (name "python-mastodon-py")
    (version "1.5.1")
    (source
      (origin
        (method url-fetch)
        (uri (pypi-uri "Mastodon.py" version))
        (sha256
         (base32
          "1vikvkzcij2gd730cssigxi38vlmzqmwdy58r3y2cwsxifnxpz9a"))))
    (build-system python-build-system)
    (propagated-inputs
     `(("python-blurhash" ,python-blurhash)
       ("python-dateutil" ,python-dateutil)
       ("python-decorator" ,python-decorator)
       ("python-magic" ,python-magic)
       ("python-pytz" ,python-pytz)
       ("python-requests" ,python-requests)
       ("python-six" ,python-six)))
    (native-inputs
     `(("python-blurhash" ,python-blurhash)
       ("python-cryptography" ,python-cryptography)
       ("python-http-ece" ,python-http-ece)
       ("python-pytest" ,python-pytest)
       ("python-pytest-cov" ,python-pytest-cov)
       ("python-pytest-mock" ,python-pytest-mock)
       ("python-pytest-runner" ,python-pytest-runner)
       ("python-pytest-vcr" ,python-pytest-vcr)
       ("python-requests-mock" ,python-requests-mock)
       ("python-vcrpy" ,python-vcrpy)))
    (home-page "https://github.com/halcy/Mastodon.py")
    (synopsis "Python wrapper for the Mastodon API")
    (description
     "This package provides a python wrapper for the Mastodon API.")
    (license license:expat)))
final.scm?id=7730f41afd90a9c3c83a56adfee09069da66a8e5'>installer: final: Add some extra logging.</a><span class='msg-avail'>...</span></td><td>Mathieu Othacehe</td></tr>
<tr><td><span title='2020-03-23 18:46:40 +0100'>2020-03-23</span></td><td><a href='/guix/commit/gnu/installer/final.scm?id=f9b6f75d1c387acbedfb27962d5dbd34bc3c1492'>installer: Fix cow-store umount issue.</a><span class='msg-avail'>...</span></td><td>Mathieu Othacehe</td></tr>
<tr><td><span title='2020-03-05 23:40:24 +0100'>2020-03-05</span></td><td><a href='/guix/commit/gnu/installer/final.scm?id=64704be417ab6f2788e8e3bc36fede1db35470e7'>installer: Fix cow-store umount.</a><span class='msg-avail'>...</span></td><td>Mathieu Othacehe</td></tr>
<tr><td><span title='2020-03-05 23:40:23 +0100'>2020-03-05</span></td><td><a href='/guix/commit/gnu/installer/final.scm?id=e458726ab47a3748d80eb69c3c2545b414a73836'>installer: Honor /tmp/installer-system-init-options.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2020-03-05 23:40:23 +0100'>2020-03-05</span></td><td><a href='/guix/commit/gnu/installer/final.scm?id=8a4b11c6a911effddf4cac4b33f5c3c70392b797'>installer: Run commands without hopping through the shell.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2020-02-12 10:49:48 +0100'>2020-02-12</span></td><td><a href='/guix/commit/gnu/installer/final.scm?id=1d02052067e04d7dd8fd1ec17557ca02a30b9bcf'>installer: Remove the cow-store overlay after system installation.</a><span class='msg-avail'>...</span></td><td>Mathieu Othacehe</td></tr>
<tr><td><span title='2019-12-29 18:24:55 +0100'>2019-12-29</span></td><td><a href='/guix/commit/gnu/installer/final.scm?id=a4ee6ac444ca71a93101b48bc1e6a5710026266c'>installer: Pass '--fallback' to 'guix system init'.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2019-04-28 22:57:07 +0200'>2019-04-28</span></td><td><a href='/guix/commit/gnu/installer/final.scm?id=0e8e963d73e61c7666f9ec4efa98c1a277c72af9'>installer: User accounts can now have a "real name."</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2019-04-26 14:19:36 +0200'>2019-04-26</span></td><td><a href='/guix/commit/gnu/installer/final.scm?id=9529f7850e3ae91cce70620e684fc6d0dc25e815'>installer: Take 'guix system init' exit code into account.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2019-04-25 00:45:35 +0200'>2019-04-25</span></td><td><a href='/guix/commit/gnu/installer/final.scm?id=91a7c4998fe4f5a2a63f2ddb4bfeeef81c68b6d7'>installer: Ask for the root account password.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2019-04-25 00:45:34 +0200'>2019-04-25</span></td><td><a href='/guix/commit/gnu/installer/final.scm?id=898677ed17672130d20434cd88575d620c97c553'>installer: Ask for user password and initialize /etc/shadow.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2019-04-23 00:34:47 +0200'>2019-04-23</span></td><td><a href='/guix/commit/gnu/installer/final.scm?id=7611074f677f1c3cfe5da426f387eeda1b6ad825'>installer: Run 'guix system init' with the right locale.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>