;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2014 Nikita Karetnikov <nikita@karetnikov.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 (test-base64)
  #:use-module (guix base64)
  #:use-module (rnrs bytevectors)
  #:use-module (srfi srfi-64))

(define (string->base64 str)
  (base64-encode (string->utf8 str)))

;;; Test vectors from <https://tools.ietf.org/rfc/rfc4648.txt>.

(test-begin "base64")

(test-equal "empty string"
  (string->base64 "")
  "")

(test-equal "f"
  (string->base64 "f")
  "Zg==")

(test-equal "fo"
  (string->base64 "fo")
  "Zm8=")

(test-equal "foo"
  (string->base64 "foo")
  "Zm9v")

(test-equal "foob"
  (string->base64 "foob")
  "Zm9vYg==")

(test-equal "fooba"
  (string->base64 "fooba")
  "Zm9vYmE=")

(test-equal "foobar"
  (string->base64 "foobar")
  "Zm9vYmFy")

(test-end "base64")guix/diff/gnu/packages/kde-plasma.scm?id=f74305a011ad43c3c53b34ed9514b27aca7e2c30'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/gnu/packages/kde-plasma.scm'>
<input type='hidden' name='id' value='f74305a011ad43c3c53b34ed9514b27aca7e2c30'/><select name='qt'>
<option value='grep'>log msg</option>
<option value='author'>author</option>
<option value='committer'>committer</option>
<option value='range'>range</option>
</select>
<input class='txt' type='search' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/guix/log/?id=f74305a011ad43c3c53b34ed9514b27aca7e2c30'>root</a>/<a href='/guix/log/gnu?id=f74305a011ad43c3c53b34ed9514b27aca7e2c30'>gnu</a>/<a href='/guix/log/gnu/packages?id=f74305a011ad43c3c53b34ed9514b27aca7e2c30'>packages</a>/<a href='/guix/log/gnu/packages/kde-plasma.scm?id=f74305a011ad43c3c53b34ed9514b27aca7e2c30'>kde-plasma.scm</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/gnu/packages/kde-plasma.scm?id=f74305a011ad43c3c53b34ed9514b27aca7e2c30&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2020-12-30 12:37:56 +0200'>2020-12-30</span></td><td><a href='/guix/commit/gnu/packages/kde-plasma.scm?id=c386de05fbcebf7c178327ca98326be20ba6ccb5'>gnu: Add ksshaskpass.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/kde-plasma.scm (ksshaskpass): New variable.

Signed-off-by: Efraim Flashner &lt;efraim@flashner.co.il&gt;
</span></span></td><td>Z572</td></tr>
<tr><td><span title='2020-12-18 19:17:11 +0100'>2020-12-18</span></td><td><a href='/guix/commit/gnu/packages/kde-plasma.scm?id=d3f1ef380cee870a7ae5b4f3aee5fad94cb5ad07'>gnu: breeze: Split from breeze-icons.</a><span class='msg-avail'>...<span class='msg-tooltip'>KDE breeze is separate from breeze-icons, as it can bee seen by
version, download path and git repository path being all different.
Thus a package containing both beeze and the breeze-icons contradicts
with this upstream separation.

* gnu/package/kde.scm (breeze-assets): Remove variable. (breeze): Move to ...
* gnu/package/kde-plasme.scm (breeze): here.
  [version, source]: Copy from former breeze-assets.
  [build-system]: Make explicit (was inherited even from breeze-icons).
  [arguments]: Remove.
  [native-inputs]: New element.
  [inputs]: Copy from former breeze-assets; add some optional packages.
  [home-page]: Fix and change to invent.kde.org.
  [snopysis, description]: Adjust to de-unified package.
  [licence]: Remove gpl3+, which came from breeze-icons.
</span></span></td><td>Hartmut Goebel</td></tr>
<tr><td><span title='2020-12-12 18:25:00 +0100'>2020-12-12</span></td><td><a href='/guix/commit/gnu/packages/kde-plasma.scm?id=b828057ea4c096898da8c9810e7a6607359f2aa3'>gnu: KDE: Fix old cgit home-pages.</a><span class='msg-avail'>...<span class='msg-tooltip'>Fix all home-pages pointing to git-repos a cgit.kde.org, which is
gone, to now use the correct repo at invent.kde.org.

* gnu/packages/kde.scm (grantleetheme, kdiagram): Update home-page.
* gnu/packages/kde-frameworks.scm (kholidays): Likewise.
* gnu/packages/kde-internet.scm (libgravatar, libktorrent): Likewise.
* gnu/packages/kde-multimedia.scm (libkcddb, libkcompactdisc): Likewise.
* gnu/packages/kde-pim.scm (kblog, kdav, kdepim-apps-libs,
  kdepim-runtime, keventviews, kincidenceeditor, kmailcommon,
  kmailimporter, kmessagelib, kpimcommon, ksmtp, libkdepim, libkgapi,
  libkleo, libksieve): Likewise.
* gnu/packages/kde-plasma.scm (kdecoration, kscreenlocker): Likewise.
</span></span></td><td>Hartmut Goebel</td></tr>
<tr><td><span title='2020-10-27 20:14:05 +0100'>2020-10-27</span></td><td><a href='/guix/commit/gnu/packages/kde-plasma.scm?id=0f4c320c2c831aa1ce38fc908c86a8dc79316811'>gnu: kscreenlocker: Use qt-build-system.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/kde-plasma.scm (kscreeenlocker)[buoild-system]: Change to
  qt-build-system. [arguments]{phases}&lt;check&gt; Remove unsued code; Actually
  disable running the tests.
</span></span></td><td>Hartmut Goebel</td></tr>
<tr><td><span title='2020-10-27 20:14:05 +0100'>2020-10-27</span></td><td><a href='/guix/commit/gnu/packages/kde-plasma.scm?id=fc6bced6c5d325aeb8c748464cf9addfd61c71c8'>gnu: KDE Plasma: Update to 5.19.5.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/kde-plasma.scm (kdecoration, kscreenlocker,
  libkscreen, libksysguard): Update to 5.19.5.
</span></span></td><td>Hartmut Goebel</td></tr>