Changed license to GPLv2

The virality of the GPL is a feature, not a bug. This is really, really, really not going to be part of anyone's proprietary software. If you want to use any of this as part of anything else, that thing must also be free.
This commit is contained in:
Simon Brooke 2022-12-19 16:05:27 +00:00
parent a599d133f4
commit 032dcb7536
5 changed files with 314 additions and 256 deletions

480
LICENSE
View file

@ -1,280 +1,288 @@
Eclipse Public License - v 2.0 # GNU GENERAL PUBLIC LICENSE
THE ACCOMPANYING PROGRAM IS PROVIDED UNDER THE TERMS OF THIS ECLIPSE Version 2, June 1991
PUBLIC LICENSE ("AGREEMENT"). ANY USE, REPRODUCTION OR DISTRIBUTION
OF THE PROGRAM CONSTITUTES RECIPIENT'S ACCEPTANCE OF THIS AGREEMENT.
1. DEFINITIONS Copyright (C) 1989, 1991 Free Software Foundation, Inc.
51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA
Everyone is permitted to copy and distribute verbatim copies
of this license document, but changing it is not allowed.
"Contribution" means: ## Preamble
a) in the case of the initial Contributor, the initial content The licenses for most software are designed to take away your freedom
Distributed under this Agreement, and to share and change it. By contrast, the GNU General Public License is
intended to guarantee your freedom to share and change free
software--to make sure the software is free for all its users. This
General Public License applies to most of the Free Software
Foundation's software and to any other program whose authors commit to
using it. (Some other Free Software Foundation software is covered by
the GNU Lesser General Public License instead.) You can apply it to
your programs, too.
b) in the case of each subsequent Contributor: When we speak of free software, we are referring to freedom, not
i) changes to the Program, and price. Our General Public Licenses are designed to make sure that you
ii) additions to the Program; have the freedom to distribute copies of free software (and charge for
where such changes and/or additions to the Program originate from this service if you wish), that you receive source code or can get it
and are Distributed by that particular Contributor. A Contribution if you want it, that you can change the software or use pieces of it
"originates" from a Contributor if it was added to the Program by in new free programs; and that you know you can do these things.
such Contributor itself or anyone acting on such Contributor's behalf.
Contributions do not include changes or additions to the Program that
are not Modified Works.
"Contributor" means any person or entity that Distributes the Program. To protect your rights, we need to make restrictions that forbid
anyone to deny you these rights or to ask you to surrender the rights.
These restrictions translate to certain responsibilities for you if
you distribute copies of the software, or if you modify it.
"Licensed Patents" mean patent claims licensable by a Contributor which For example, if you distribute copies of such a program, whether
are necessarily infringed by the use or sale of its Contribution alone gratis or for a fee, you must give the recipients all the rights that
or when combined with the Program. you have. You must make sure that they, too, receive or can get the
source code. And you must show them these terms so they know their
rights.
"Program" means the Contributions Distributed in accordance with this We protect your rights with two steps: (1) copyright the software, and
Agreement. (2) offer you this license which gives you legal permission to copy,
distribute and/or modify the software.
"Recipient" means anyone who receives the Program under this Agreement Also, for each author's protection and ours, we want to make certain
or any Secondary License (as applicable), including Contributors. that everyone understands that there is no warranty for this free
software. If the software is modified by someone else and passed on,
we want its recipients to know that what they have is not the
original, so that any problems introduced by others will not reflect
on the original authors' reputations.
"Derivative Works" shall mean any work, whether in Source Code or other Finally, any free program is threatened constantly by software
form, that is based on (or derived from) the Program and for which the patents. We wish to avoid the danger that redistributors of a free
editorial revisions, annotations, elaborations, or other modifications program will individually obtain patent licenses, in effect making the
represent, as a whole, an original work of authorship. program proprietary. To prevent this, we have made it clear that any
patent must be licensed for everyone's free use or not licensed at
all.
"Modified Works" shall mean any work in Source Code or other form that The precise terms and conditions for copying, distribution and
results from an addition to, deletion from, or modification of the modification follow.
contents of the Program, including, for purposes of clarity any new file
in Source Code form that contains any contents of the Program. Modified
Works shall not include works that contain only declarations,
interfaces, types, classes, structures, or files of the Program solely
in each case in order to link to, bind by name, or subclass the Program
or Modified Works thereof.
"Distribute" means the acts of a) distributing or b) making available ## TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
in any manner that enables the transfer of a copy.
"Source Code" means the form of a Program preferred for making **0.** This License applies to any program or other work which
modifications, including but not limited to software source code, contains a notice placed by the copyright holder saying it may be
documentation source, and configuration files. distributed under the terms of this General Public License. The
"Program", below, refers to any such program or work, and a "work
based on the Program" means either the Program or any derivative work
under copyright law: that is to say, a work containing the Program or
a portion of it, either verbatim or with modifications and/or
translated into another language. (Hereinafter, translation is
included without limitation in the term "modification".) Each licensee
is addressed as "you".
"Secondary License" means either the GNU General Public License, Activities other than copying, distribution and modification are not
Version 2.0, or any later versions of that license, including any covered by this License; they are outside its scope. The act of
exceptions or additional permissions as identified by the initial running the Program is not restricted, and the output from the Program
Contributor. is covered only if its contents constitute a work based on the Program
(independent of having been made by running the Program). Whether that
is true depends on what the Program does.
2. GRANT OF RIGHTS **1.** You may copy and distribute verbatim copies of the Program's
source code as you receive it, in any medium, provided that you
conspicuously and appropriately publish on each copy an appropriate
copyright notice and disclaimer of warranty; keep intact all the
notices that refer to this License and to the absence of any warranty;
and give any other recipients of the Program a copy of this License
along with the Program.
a) Subject to the terms of this Agreement, each Contributor hereby You may charge a fee for the physical act of transferring a copy, and
grants Recipient a non-exclusive, worldwide, royalty-free copyright you may at your option offer warranty protection in exchange for a
license to reproduce, prepare Derivative Works of, publicly display, fee.
publicly perform, Distribute and sublicense the Contribution of such
Contributor, if any, and such Derivative Works.
b) Subject to the terms of this Agreement, each Contributor hereby **2.** You may modify your copy or copies of the Program or any
grants Recipient a non-exclusive, worldwide, royalty-free patent portion of it, thus forming a work based on the Program, and copy and
license under Licensed Patents to make, use, sell, offer to sell, distribute such modifications or work under the terms of Section 1
import and otherwise transfer the Contribution of such Contributor, above, provided that you also meet all of these conditions:
if any, in Source Code or other form. This patent license shall
apply to the combination of the Contribution and the Program if, at
the time the Contribution is added by the Contributor, such addition
of the Contribution causes such combination to be covered by the
Licensed Patents. The patent license shall not apply to any other
combinations which include the Contribution. No hardware per se is
licensed hereunder.
c) Recipient understands that although each Contributor grants the **a)** You must cause the modified files to carry prominent notices
licenses to its Contributions set forth herein, no assurances are stating that you changed the files and the date of any change.
provided by any Contributor that the Program does not infringe the
patent or other intellectual property rights of any other entity.
Each Contributor disclaims any liability to Recipient for claims
brought by any other entity based on infringement of intellectual
property rights or otherwise. As a condition to exercising the
rights and licenses granted hereunder, each Recipient hereby
assumes sole responsibility to secure any other intellectual
property rights needed, if any. For example, if a third party
patent license is required to allow Recipient to Distribute the
Program, it is Recipient's responsibility to acquire that license
before distributing the Program.
d) Each Contributor represents that to its knowledge it has **b)** You must cause any work that you distribute or publish, that in
sufficient copyright rights in its Contribution, if any, to grant whole or in part contains or is derived from the Program or any part
the copyright license set forth in this Agreement. thereof, to be licensed as a whole at no charge to all third parties
under the terms of this License.
e) Notwithstanding the terms of any Secondary License, no **c)** If the modified program normally reads commands interactively
Contributor makes additional grants to any Recipient (other than when run, you must cause it, when started running for such interactive
those set forth in this Agreement) as a result of such Recipient's use in the most ordinary way, to print or display an announcement
receipt of the Program under the terms of a Secondary License including an appropriate copyright notice and a notice that there is
(if permitted under the terms of Section 3). no warranty (or else, saying that you provide a warranty) and that
users may redistribute the program under these conditions, and telling
the user how to view a copy of this License. (Exception: if the
Program itself is interactive but does not normally print such an
announcement, your work based on the Program is not required to print
an announcement.)
3. REQUIREMENTS These requirements apply to the modified work as a whole. If
identifiable sections of that work are not derived from the Program,
and can be reasonably considered independent and separate works in
themselves, then this License, and its terms, do not apply to those
sections when you distribute them as separate works. But when you
distribute the same sections as part of a whole which is a work based
on the Program, the distribution of the whole must be on the terms of
this License, whose permissions for other licensees extend to the
entire whole, and thus to each and every part regardless of who wrote
it.
3.1 If a Contributor Distributes the Program in any form, then: Thus, it is not the intent of this section to claim rights or contest
your rights to work written entirely by you; rather, the intent is to
exercise the right to control the distribution of derivative or
collective works based on the Program.
a) the Program must also be made available as Source Code, in In addition, mere aggregation of another work not based on the Program
accordance with section 3.2, and the Contributor must accompany with the Program (or with a work based on the Program) on a volume of
the Program with a statement that the Source Code for the Program a storage or distribution medium does not bring the other work under
is available under this Agreement, and informs Recipients how to the scope of this License.
obtain it in a reasonable manner on or through a medium customarily
used for software exchange; and
b) the Contributor may Distribute the Program under a license **3.** You may copy and distribute the Program (or a work based on it,
different than this Agreement, provided that such license: under Section 2) in object code or executable form under the terms of
i) effectively disclaims on behalf of all other Contributors all Sections 1 and 2 above provided that you also do one of the following:
warranties and conditions, express and implied, including
warranties or conditions of title and non-infringement, and
implied warranties or conditions of merchantability and fitness
for a particular purpose;
ii) effectively excludes on behalf of all other Contributors all **a)** Accompany it with the complete corresponding machine-readable
liability for damages, including direct, indirect, special, source code, which must be distributed under the terms of Sections 1
incidental and consequential damages, such as lost profits; and 2 above on a medium customarily used for software interchange; or,
iii) does not attempt to limit or alter the recipients' rights **b)** Accompany it with a written offer, valid for at least three
in the Source Code under section 3.2; and years, to give any third party, for a charge no more than your cost of
physically performing source distribution, a complete machine-readable
copy of the corresponding source code, to be distributed under the
terms of Sections 1 and 2 above on a medium customarily used for
software interchange; or,
iv) requires any subsequent distribution of the Program by any **c)** Accompany it with the information you received as to the offer
party to be under a license that satisfies the requirements to distribute corresponding source code. (This alternative is allowed
of this section 3. only for noncommercial distribution and only if you received the
program in object code or executable form with such an offer, in
accord with Subsection b above.)
3.2 When the Program is Distributed as Source Code: The source code for a work means the preferred form of the work for
making modifications to it. For an executable work, complete source
code means all the source code for all modules it contains, plus any
associated interface definition files, plus the scripts used to
control compilation and installation of the executable. However, as a
special exception, the source code distributed need not include
anything that is normally distributed (in either source or binary
form) with the major components (compiler, kernel, and so on) of the
operating system on which the executable runs, unless that component
itself accompanies the executable.
a) it must be made available under this Agreement, or if the If distribution of executable or object code is made by offering
Program (i) is combined with other material in a separate file or access to copy from a designated place, then offering equivalent
files made available under a Secondary License, and (ii) the initial access to copy the source code from the same place counts as
Contributor attached to the Source Code the notice described in distribution of the source code, even though third parties are not
Exhibit A of this Agreement, then the Program may be made available compelled to copy the source along with the object code.
under the terms of such Secondary Licenses, and
b) a copy of this Agreement must be included with each copy of **4.** You may not copy, modify, sublicense, or distribute the Program
the Program. except as expressly provided under this License. Any attempt otherwise
to copy, modify, sublicense or distribute the Program is void, and
will automatically terminate your rights under this License. However,
parties who have received copies, or rights, from you under this
License will not have their licenses terminated so long as such
parties remain in full compliance.
3.3 Contributors may not remove or alter any copyright, patent, **5.** You are not required to accept this License, since you have not
trademark, attribution notices, disclaimers of warranty, or limitations signed it. However, nothing else grants you permission to modify or
of liability ("notices") contained within the Program from any copy of distribute the Program or its derivative works. These actions are
the Program which they Distribute, provided that Contributors may add prohibited by law if you do not accept this License. Therefore, by
their own appropriate notices. modifying or distributing the Program (or any work based on the
Program), you indicate your acceptance of this License to do so, and
all its terms and conditions for copying, distributing or modifying
the Program or works based on it.
4. COMMERCIAL DISTRIBUTION **6.** Each time you redistribute the Program (or any work based on
the Program), the recipient automatically receives a license from the
original licensor to copy, distribute or modify the Program subject to
these terms and conditions. You may not impose any further
restrictions on the recipients' exercise of the rights granted herein.
You are not responsible for enforcing compliance by third parties to
this License.
Commercial distributors of software may accept certain responsibilities **7.** If, as a consequence of a court judgment or allegation of
with respect to end users, business partners and the like. While this patent infringement or for any other reason (not limited to patent
license is intended to facilitate the commercial use of the Program, issues), conditions are imposed on you (whether by court order,
the Contributor who includes the Program in a commercial product agreement or otherwise) that contradict the conditions of this
offering should do so in a manner which does not create potential License, they do not excuse you from the conditions of this License.
liability for other Contributors. Therefore, if a Contributor includes If you cannot distribute so as to satisfy simultaneously your
the Program in a commercial product offering, such Contributor obligations under this License and any other pertinent obligations,
("Commercial Contributor") hereby agrees to defend and indemnify every then as a consequence you may not distribute the Program at all. For
other Contributor ("Indemnified Contributor") against any losses, example, if a patent license would not permit royalty-free
damages and costs (collectively "Losses") arising from claims, lawsuits redistribution of the Program by all those who receive copies directly
and other legal actions brought by a third party against the Indemnified or indirectly through you, then the only way you could satisfy both it
Contributor to the extent caused by the acts or omissions of such and this License would be to refrain entirely from distribution of the
Commercial Contributor in connection with its distribution of the Program Program.
in a commercial product offering. The obligations in this section do not
apply to any claims or Losses relating to any actual or alleged
intellectual property infringement. In order to qualify, an Indemnified
Contributor must: a) promptly notify the Commercial Contributor in
writing of such claim, and b) allow the Commercial Contributor to control,
and cooperate with the Commercial Contributor in, the defense and any
related settlement negotiations. The Indemnified Contributor may
participate in any such claim at its own expense.
For example, a Contributor might include the Program in a commercial If any portion of this section is held invalid or unenforceable under
product offering, Product X. That Contributor is then a Commercial any particular circumstance, the balance of the section is intended to
Contributor. If that Commercial Contributor then makes performance apply and the section as a whole is intended to apply in other
claims, or offers warranties related to Product X, those performance circumstances.
claims and warranties are such Commercial Contributor's responsibility
alone. Under this section, the Commercial Contributor would have to
defend claims against the other Contributors related to those performance
claims and warranties, and if a court requires any other Contributor to
pay any damages as a result, the Commercial Contributor must pay
those damages.
5. NO WARRANTY It is not the purpose of this section to induce you to infringe any
patents or other property right claims or to contest validity of any
such claims; this section has the sole purpose of protecting the
integrity of the free software distribution system, which is
implemented by public license practices. Many people have made
generous contributions to the wide range of software distributed
through that system in reliance on consistent application of that
system; it is up to the author/donor to decide if he or she is willing
to distribute software through any other system and a licensee cannot
impose that choice.
EXCEPT AS EXPRESSLY SET FORTH IN THIS AGREEMENT, AND TO THE EXTENT This section is intended to make thoroughly clear what is believed to
PERMITTED BY APPLICABLE LAW, THE PROGRAM IS PROVIDED ON AN "AS IS" be a consequence of the rest of this License.
BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, EITHER EXPRESS OR
IMPLIED INCLUDING, WITHOUT LIMITATION, ANY WARRANTIES OR CONDITIONS OF
TITLE, NON-INFRINGEMENT, MERCHANTABILITY OR FITNESS FOR A PARTICULAR
PURPOSE. Each Recipient is solely responsible for determining the
appropriateness of using and distributing the Program and assumes all
risks associated with its exercise of rights under this Agreement,
including but not limited to the risks and costs of program errors,
compliance with applicable laws, damage to or loss of data, programs
or equipment, and unavailability or interruption of operations.
6. DISCLAIMER OF LIABILITY **8.** If the distribution and/or use of the Program is restricted in
certain countries either by patents or by copyrighted interfaces, the
original copyright holder who places the Program under this License
may add an explicit geographical distribution limitation excluding
those countries, so that distribution is permitted only in or among
countries not thus excluded. In such case, this License incorporates
the limitation as if written in the body of this License.
EXCEPT AS EXPRESSLY SET FORTH IN THIS AGREEMENT, AND TO THE EXTENT **9.** The Free Software Foundation may publish revised and/or new
PERMITTED BY APPLICABLE LAW, NEITHER RECIPIENT NOR ANY CONTRIBUTORS versions of the General Public License from time to time. Such new
SHALL HAVE ANY LIABILITY FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, versions will be similar in spirit to the present version, but may
EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING WITHOUT LIMITATION LOST differ in detail to address new problems or concerns.
PROFITS), HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
ARISING IN ANY WAY OUT OF THE USE OR DISTRIBUTION OF THE PROGRAM OR THE
EXERCISE OF ANY RIGHTS GRANTED HEREUNDER, EVEN IF ADVISED OF THE
POSSIBILITY OF SUCH DAMAGES.
7. GENERAL Each version is given a distinguishing version number. If the Program
specifies a version number of this License which applies to it and
"any later version", you have the option of following the terms and
conditions either of that version or of any later version published by
the Free Software Foundation. If the Program does not specify a
version number of this License, you may choose any version ever
published by the Free Software Foundation.
If any provision of this Agreement is invalid or unenforceable under **10.** If you wish to incorporate parts of the Program into other
applicable law, it shall not affect the validity or enforceability of free programs whose distribution conditions are different, write to
the remainder of the terms of this Agreement, and without further the author to ask for permission. For software which is copyrighted by
action by the parties hereto, such provision shall be reformed to the the Free Software Foundation, write to the Free Software Foundation;
minimum extent necessary to make such provision valid and enforceable. we sometimes make exceptions for this. Our decision will be guided by
the two goals of preserving the free status of all derivatives of our
free software and of promoting the sharing and reuse of software
generally.
If Recipient institutes patent litigation against any entity **NO WARRANTY**
(including a cross-claim or counterclaim in a lawsuit) alleging that the
Program itself (excluding combinations of the Program with other software
or hardware) infringes such Recipient's patent(s), then such Recipient's
rights granted under Section 2(b) shall terminate as of the date such
litigation is filed.
All Recipient's rights under this Agreement shall terminate if it **11.** BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO
fails to comply with any of the material terms or conditions of this WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW.
Agreement and does not cure such failure in a reasonable period of EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR
time after becoming aware of such noncompliance. If all Recipient's OTHER PARTIES PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY
rights under this Agreement terminate, Recipient agrees to cease use KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE
and distribution of the Program as soon as reasonably practicable. IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
However, Recipient's obligations under this Agreement and any licenses PURPOSE. THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE
granted by Recipient relating to the Program shall continue and survive. PROGRAM IS WITH YOU. SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME
THE COST OF ALL NECESSARY SERVICING, REPAIR OR CORRECTION.
Everyone is permitted to copy and distribute copies of this Agreement, **12.** IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN
but in order to avoid inconsistency the Agreement is copyrighted and WRITING WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY
may only be modified in the following manner. The Agreement Steward AND/OR REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU
reserves the right to publish new versions (including revisions) of FOR DAMAGES, INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR
this Agreement from time to time. No one other than the Agreement CONSEQUENTIAL DAMAGES ARISING OUT OF THE USE OR INABILITY TO USE THE
Steward has the right to modify this Agreement. The Eclipse Foundation PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF DATA OR DATA BEING
is the initial Agreement Steward. The Eclipse Foundation may assign the RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD PARTIES OR A
responsibility to serve as the Agreement Steward to a suitable separate FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER PROGRAMS), EVEN IF
entity. Each new version of the Agreement will be given a distinguishing SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH
version number. The Program (including Contributions) may always be DAMAGES.
Distributed subject to the version of the Agreement under which it was
received. In addition, after a new version of the Agreement is published,
Contributor may elect to Distribute the Program (including its
Contributions) under the new version.
Except as expressly stated in Sections 2(a) and 2(b) above, Recipient ## END OF TERMS AND CONDITIONS
receives no rights or licenses to the intellectual property of any
Contributor under this Agreement, whether expressly, by implication,
estoppel or otherwise. All rights in the Program not expressly granted
under this Agreement are reserved. Nothing in this Agreement is intended
to be enforceable by any entity that is not a Contributor or Recipient.
No third-party beneficiary rights are created under this Agreement.
Exhibit A - Form of Secondary Licenses Notice
"This Source Code may also be made available under the following
Secondary Licenses when the conditions for such availability set forth
in the Eclipse Public License, v. 2.0 are satisfied: GNU General Public
License as published by the Free Software Foundation, either version 2
of the License, or (at your option) any later version, with the GNU
Classpath Exception which is available at
https://www.gnu.org/software/classpath/license.html."
Simply including a copy of this Agreement, including this Exhibit A
is not sufficient to license the Source Code under Secondary Licenses.
If it is not possible or desirable to put the notice in a particular
file, then You may include the notice in a location (such as a LICENSE
file in a relevant directory) where a recipient would be likely to
look for such a notice.
You may add additional accurate notices of copyright ownership.

View file

@ -57,15 +57,8 @@ FIXME
## License ## License
Copyright © 2022 FIXME Copyright © Simon Brooke, 2022
This program and the accompanying materials are made available under the This program and the accompanying materials are made available under the
terms of the Eclipse Public License 2.0 which is available at terms of the GNU General Public License as published by the Free Software Foundation, either version 2 of the License, or (at your
http://www.eclipse.org/legal/epl-2.0. option) any later version.
This Source Code may also be made available under the following Secondary
Licenses when the conditions for such availability set forth in the Eclipse
Public License, v. 2.0 are satisfied: GNU General Public License as published by
the Free Software Foundation, either version 2 of the License, or (at your
option) any later version, with the GNU Classpath Exception which is available
at https://www.gnu.org/software/classpath/license.html.

View file

@ -3,6 +3,22 @@
;;(:require [clojure.spec.alpha as s]) ;;(:require [clojure.spec.alpha as s])
(:import [java.net URI URISyntaxException])) (:import [java.net URI URISyntaxException]))
;;; Copyright (C) Simon Brooke, 2022
;;; This program 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 2
;;; 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 General Public License for more details.
;;; You should have received a copy of the GNU General Public License
;;; along with this program; if not, write to the Free Software
;;; Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
(defn object? (defn object?
"Return `true` iff `x` is recognisably an ActivityStreams object. "Return `true` iff `x` is recognisably an ActivityStreams object.

View file

@ -1,20 +1,45 @@
(ns dog-and-duck.scratch.parser (ns dog-and-duck.scratch.parser
(:require [clojure.walk :refer [keywordize-keys]] (:require [clojure.java.io :refer [file]]
[clojure.string :refer [ends-with?]]
[clojure.walk :refer [keywordize-keys]]
[clojure.data.json :as json] [clojure.data.json :as json]
[dog-and-duck.quack.quack :as q])) [dog-and-duck.quack.quack :as q]))
(defn clean ;;; Copyright (C) Simon Brooke, 2022
;;; This program 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 2
;;; 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 General Public License for more details.
;;; You should have received a copy of the GNU General Public License
;;; along with this program; if not, write to the Free Software
;;; Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
(defn clean
"Take this `json` input, and return a sequence of ActivityPub objects "Take this `json` input, and return a sequence of ActivityPub objects
represented by it." represented by it."
[json] [json]
(let [feed (json/read-str json)] (let [feed (json/read-str json)]
(filter (map
q/object? keywordize-keys
(cond (map? feed) (list (keywordize-keys feed)) (filter
(coll? feed) (map keywordize-keys feed))))) q/object?
(cond (map? feed) (list (keywordize-keys feed))
(coll? feed) (map keywordize-keys feed))))))
(map :type (map keywordize-keys (json/read-str (slurp "resources/feed.json")))) (clean (slurp "resources/activitystreams-test-documents/core-ex1-jsonld.json"))
(keys (first (map keywordize-keys (json/read-str (slurp "resources/feed.json"))))) (map
#(when
(q/object? (first (map keywordize-keys (json/read-str (slurp "resources/feed.json"))))) (ends-with? (str %) ".json")
(let [objects (clean (slurp %))]
(list (str %)
(count objects)
(map :type objects))))
(file-seq (file "resources/activitystreams-test-documents")))

View file

@ -8,6 +8,22 @@
[clojure.walk :refer [keywordize-keys]] [clojure.walk :refer [keywordize-keys]]
[clojure.pprint :refer [pprint]])) [clojure.pprint :refer [pprint]]))
;;; Copyright (C) Simon Brooke, 2022
;;; This program 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 2
;;; 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 General Public License for more details.
;;; You should have received a copy of the GNU General Public License
;;; along with this program; if not, write to the Free Software
;;; Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
;;; Use any ActivityPub account handle you like - for example, your own ;;; Use any ActivityPub account handle you like - for example, your own
(def account-handle "@simon_brooke@mastodon.scot") (def account-handle "@simon_brooke@mastodon.scot")