forked from arti/vt1200
feat(termtris): vendor source and VT1200 Xlib XG smoke test
This commit is contained in:
1 parent
2c80547cc3
commit
a8612681ba
20 files changed
+2970
No files matched your search
@@ -69,3 +69,6 @@ ghidra/vt1200.lock
|
||||
tools/tms34010-sdk/Docs/
|
||||
tools/tms34010-sdk/Patents/
|
||||
tools/tms34010-sdk/1991-07 TIGA Promo Kit and Art Software/
|
||||
|
||||
# termtris build scratch (TI tools + 2ine libs)
|
||||
apps/termtris/work/
|
||||
@@ -0,0 +1,674 @@
|
||||
GNU GENERAL PUBLIC LICENSE
|
||||
Version 3, 29 June 2007
|
||||
|
||||
Copyright (C) 2007 Free Software Foundation, Inc. <https://fsf.org/>
|
||||
Everyone is permitted to copy and distribute verbatim copies
|
||||
of this license document, but changing it is not allowed.
|
||||
|
||||
Preamble
|
||||
|
||||
The GNU General Public License is a free, copyleft license for
|
||||
software and other kinds of works.
|
||||
|
||||
The licenses for most software and other practical works are designed
|
||||
to take away your freedom to share and change the works. By contrast,
|
||||
the GNU General Public License is intended to guarantee your freedom to
|
||||
share and change all versions of a program--to make sure it remains free
|
||||
software for all its users. We, the Free Software Foundation, use the
|
||||
GNU General Public License for most of our software; it applies also to
|
||||
any other work released this way by its authors. You can apply it to
|
||||
your programs, too.
|
||||
|
||||
When we speak of free software, we are referring to freedom, not
|
||||
price. Our General Public Licenses are designed to make sure that you
|
||||
have the freedom to distribute copies of free software (and charge for
|
||||
them if you wish), that you receive source code or can get it if you
|
||||
want it, that you can change the software or use pieces of it in new
|
||||
free programs, and that you know you can do these things.
|
||||
|
||||
To protect your rights, we need to prevent others from denying you
|
||||
these rights or asking you to surrender the rights. Therefore, you have
|
||||
certain responsibilities if you distribute copies of the software, or if
|
||||
you modify it: responsibilities to respect the freedom of others.
|
||||
|
||||
For example, if you distribute copies of such a program, whether
|
||||
gratis or for a fee, you must pass on to the recipients the same
|
||||
freedoms that you received. 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.
|
||||
|
||||
Developers that use the GNU GPL protect your rights with two steps:
|
||||
(1) assert copyright on the software, and (2) offer you this License
|
||||
giving you legal permission to copy, distribute and/or modify it.
|
||||
|
||||
For the developers' and authors' protection, the GPL clearly explains
|
||||
that there is no warranty for this free software. For both users' and
|
||||
authors' sake, the GPL requires that modified versions be marked as
|
||||
changed, so that their problems will not be attributed erroneously to
|
||||
authors of previous versions.
|
||||
|
||||
Some devices are designed to deny users access to install or run
|
||||
modified versions of the software inside them, although the manufacturer
|
||||
can do so. This is fundamentally incompatible with the aim of
|
||||
protecting users' freedom to change the software. The systematic
|
||||
pattern of such abuse occurs in the area of products for individuals to
|
||||
use, which is precisely where it is most unacceptable. Therefore, we
|
||||
have designed this version of the GPL to prohibit the practice for those
|
||||
products. If such problems arise substantially in other domains, we
|
||||
stand ready to extend this provision to those domains in future versions
|
||||
of the GPL, as needed to protect the freedom of users.
|
||||
|
||||
Finally, every program is threatened constantly by software patents.
|
||||
States should not allow patents to restrict development and use of
|
||||
software on general-purpose computers, but in those that do, we wish to
|
||||
avoid the special danger that patents applied to a free program could
|
||||
make it effectively proprietary. To prevent this, the GPL assures that
|
||||
patents cannot be used to render the program non-free.
|
||||
|
||||
The precise terms and conditions for copying, distribution and
|
||||
modification follow.
|
||||
|
||||
TERMS AND CONDITIONS
|
||||
|
||||
0. Definitions.
|
||||
|
||||
"This License" refers to version 3 of the GNU General Public License.
|
||||
|
||||
"Copyright" also means copyright-like laws that apply to other kinds of
|
||||
works, such as semiconductor masks.
|
||||
|
||||
"The Program" refers to any copyrightable work licensed under this
|
||||
License. Each licensee is addressed as "you". "Licensees" and
|
||||
"recipients" may be individuals or organizations.
|
||||
|
||||
To "modify" a work means to copy from or adapt all or part of the work
|
||||
in a fashion requiring copyright permission, other than the making of an
|
||||
exact copy. The resulting work is called a "modified version" of the
|
||||
earlier work or a work "based on" the earlier work.
|
||||
|
||||
A "covered work" means either the unmodified Program or a work based
|
||||
on the Program.
|
||||
|
||||
To "propagate" a work means to do anything with it that, without
|
||||
permission, would make you directly or secondarily liable for
|
||||
infringement under applicable copyright law, except executing it on a
|
||||
computer or modifying a private copy. Propagation includes copying,
|
||||
distribution (with or without modification), making available to the
|
||||
public, and in some countries other activities as well.
|
||||
|
||||
To "convey" a work means any kind of propagation that enables other
|
||||
parties to make or receive copies. Mere interaction with a user through
|
||||
a computer network, with no transfer of a copy, is not conveying.
|
||||
|
||||
An interactive user interface displays "Appropriate Legal Notices"
|
||||
to the extent that it includes a convenient and prominently visible
|
||||
feature that (1) displays an appropriate copyright notice, and (2)
|
||||
tells the user that there is no warranty for the work (except to the
|
||||
extent that warranties are provided), that licensees may convey the
|
||||
work under this License, and how to view a copy of this License. If
|
||||
the interface presents a list of user commands or options, such as a
|
||||
menu, a prominent item in the list meets this criterion.
|
||||
|
||||
1. Source Code.
|
||||
|
||||
The "source code" for a work means the preferred form of the work
|
||||
for making modifications to it. "Object code" means any non-source
|
||||
form of a work.
|
||||
|
||||
A "Standard Interface" means an interface that either is an official
|
||||
standard defined by a recognized standards body, or, in the case of
|
||||
interfaces specified for a particular programming language, one that
|
||||
is widely used among developers working in that language.
|
||||
|
||||
The "System Libraries" of an executable work include anything, other
|
||||
than the work as a whole, that (a) is included in the normal form of
|
||||
packaging a Major Component, but which is not part of that Major
|
||||
Component, and (b) serves only to enable use of the work with that
|
||||
Major Component, or to implement a Standard Interface for which an
|
||||
implementation is available to the public in source code form. A
|
||||
"Major Component", in this context, means a major essential component
|
||||
(kernel, window system, and so on) of the specific operating system
|
||||
(if any) on which the executable work runs, or a compiler used to
|
||||
produce the work, or an object code interpreter used to run it.
|
||||
|
||||
The "Corresponding Source" for a work in object code form means all
|
||||
the source code needed to generate, install, and (for an executable
|
||||
work) run the object code and to modify the work, including scripts to
|
||||
control those activities. However, it does not include the work's
|
||||
System Libraries, or general-purpose tools or generally available free
|
||||
programs which are used unmodified in performing those activities but
|
||||
which are not part of the work. For example, Corresponding Source
|
||||
includes interface definition files associated with source files for
|
||||
the work, and the source code for shared libraries and dynamically
|
||||
linked subprograms that the work is specifically designed to require,
|
||||
such as by intimate data communication or control flow between those
|
||||
subprograms and other parts of the work.
|
||||
|
||||
The Corresponding Source need not include anything that users
|
||||
can regenerate automatically from other parts of the Corresponding
|
||||
Source.
|
||||
|
||||
The Corresponding Source for a work in source code form is that
|
||||
same work.
|
||||
|
||||
2. Basic Permissions.
|
||||
|
||||
All rights granted under this License are granted for the term of
|
||||
copyright on the Program, and are irrevocable provided the stated
|
||||
conditions are met. This License explicitly affirms your unlimited
|
||||
permission to run the unmodified Program. The output from running a
|
||||
covered work is covered by this License only if the output, given its
|
||||
content, constitutes a covered work. This License acknowledges your
|
||||
rights of fair use or other equivalent, as provided by copyright law.
|
||||
|
||||
You may make, run and propagate covered works that you do not
|
||||
convey, without conditions so long as your license otherwise remains
|
||||
in force. You may convey covered works to others for the sole purpose
|
||||
of having them make modifications exclusively for you, or provide you
|
||||
with facilities for running those works, provided that you comply with
|
||||
the terms of this License in conveying all material for which you do
|
||||
not control copyright. Those thus making or running the covered works
|
||||
for you must do so exclusively on your behalf, under your direction
|
||||
and control, on terms that prohibit them from making any copies of
|
||||
your copyrighted material outside their relationship with you.
|
||||
|
||||
Conveying under any other circumstances is permitted solely under
|
||||
the conditions stated below. Sublicensing is not allowed; section 10
|
||||
makes it unnecessary.
|
||||
|
||||
3. Protecting Users' Legal Rights From Anti-Circumvention Law.
|
||||
|
||||
No covered work shall be deemed part of an effective technological
|
||||
measure under any applicable law fulfilling obligations under article
|
||||
11 of the WIPO copyright treaty adopted on 20 December 1996, or
|
||||
similar laws prohibiting or restricting circumvention of such
|
||||
measures.
|
||||
|
||||
When you convey a covered work, you waive any legal power to forbid
|
||||
circumvention of technological measures to the extent such circumvention
|
||||
is effected by exercising rights under this License with respect to
|
||||
the covered work, and you disclaim any intention to limit operation or
|
||||
modification of the work as a means of enforcing, against the work's
|
||||
users, your or third parties' legal rights to forbid circumvention of
|
||||
technological measures.
|
||||
|
||||
4. Conveying Verbatim Copies.
|
||||
|
||||
You may convey 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;
|
||||
keep intact all notices stating that this License and any
|
||||
non-permissive terms added in accord with section 7 apply to the code;
|
||||
keep intact all notices of the absence of any warranty; and give all
|
||||
recipients a copy of this License along with the Program.
|
||||
|
||||
You may charge any price or no price for each copy that you convey,
|
||||
and you may offer support or warranty protection for a fee.
|
||||
|
||||
5. Conveying Modified Source Versions.
|
||||
|
||||
You may convey a work based on the Program, or the modifications to
|
||||
produce it from the Program, in the form of source code under the
|
||||
terms of section 4, provided that you also meet all of these conditions:
|
||||
|
||||
a) The work must carry prominent notices stating that you modified
|
||||
it, and giving a relevant date.
|
||||
|
||||
b) The work must carry prominent notices stating that it is
|
||||
released under this License and any conditions added under section
|
||||
7. This requirement modifies the requirement in section 4 to
|
||||
"keep intact all notices".
|
||||
|
||||
c) You must license the entire work, as a whole, under this
|
||||
License to anyone who comes into possession of a copy. This
|
||||
License will therefore apply, along with any applicable section 7
|
||||
additional terms, to the whole of the work, and all its parts,
|
||||
regardless of how they are packaged. This License gives no
|
||||
permission to license the work in any other way, but it does not
|
||||
invalidate such permission if you have separately received it.
|
||||
|
||||
d) If the work has interactive user interfaces, each must display
|
||||
Appropriate Legal Notices; however, if the Program has interactive
|
||||
interfaces that do not display Appropriate Legal Notices, your
|
||||
work need not make them do so.
|
||||
|
||||
A compilation of a covered work with other separate and independent
|
||||
works, which are not by their nature extensions of the covered work,
|
||||
and which are not combined with it such as to form a larger program,
|
||||
in or on a volume of a storage or distribution medium, is called an
|
||||
"aggregate" if the compilation and its resulting copyright are not
|
||||
used to limit the access or legal rights of the compilation's users
|
||||
beyond what the individual works permit. Inclusion of a covered work
|
||||
in an aggregate does not cause this License to apply to the other
|
||||
parts of the aggregate.
|
||||
|
||||
6. Conveying Non-Source Forms.
|
||||
|
||||
You may convey a covered work in object code form under the terms
|
||||
of sections 4 and 5, provided that you also convey the
|
||||
machine-readable Corresponding Source under the terms of this License,
|
||||
in one of these ways:
|
||||
|
||||
a) Convey the object code in, or embodied in, a physical product
|
||||
(including a physical distribution medium), accompanied by the
|
||||
Corresponding Source fixed on a durable physical medium
|
||||
customarily used for software interchange.
|
||||
|
||||
b) Convey the object code in, or embodied in, a physical product
|
||||
(including a physical distribution medium), accompanied by a
|
||||
written offer, valid for at least three years and valid for as
|
||||
long as you offer spare parts or customer support for that product
|
||||
model, to give anyone who possesses the object code either (1) a
|
||||
copy of the Corresponding Source for all the software in the
|
||||
product that is covered by this License, on a durable physical
|
||||
medium customarily used for software interchange, for a price no
|
||||
more than your reasonable cost of physically performing this
|
||||
conveying of source, or (2) access to copy the
|
||||
Corresponding Source from a network server at no charge.
|
||||
|
||||
c) Convey individual copies of the object code with a copy of the
|
||||
written offer to provide the Corresponding Source. This
|
||||
alternative is allowed only occasionally and noncommercially, and
|
||||
only if you received the object code with such an offer, in accord
|
||||
with subsection 6b.
|
||||
|
||||
d) Convey the object code by offering access from a designated
|
||||
place (gratis or for a charge), and offer equivalent access to the
|
||||
Corresponding Source in the same way through the same place at no
|
||||
further charge. You need not require recipients to copy the
|
||||
Corresponding Source along with the object code. If the place to
|
||||
copy the object code is a network server, the Corresponding Source
|
||||
may be on a different server (operated by you or a third party)
|
||||
that supports equivalent copying facilities, provided you maintain
|
||||
clear directions next to the object code saying where to find the
|
||||
Corresponding Source. Regardless of what server hosts the
|
||||
Corresponding Source, you remain obligated to ensure that it is
|
||||
available for as long as needed to satisfy these requirements.
|
||||
|
||||
e) Convey the object code using peer-to-peer transmission, provided
|
||||
you inform other peers where the object code and Corresponding
|
||||
Source of the work are being offered to the general public at no
|
||||
charge under subsection 6d.
|
||||
|
||||
A separable portion of the object code, whose source code is excluded
|
||||
from the Corresponding Source as a System Library, need not be
|
||||
included in conveying the object code work.
|
||||
|
||||
A "User Product" is either (1) a "consumer product", which means any
|
||||
tangible personal property which is normally used for personal, family,
|
||||
or household purposes, or (2) anything designed or sold for incorporation
|
||||
into a dwelling. In determining whether a product is a consumer product,
|
||||
doubtful cases shall be resolved in favor of coverage. For a particular
|
||||
product received by a particular user, "normally used" refers to a
|
||||
typical or common use of that class of product, regardless of the status
|
||||
of the particular user or of the way in which the particular user
|
||||
actually uses, or expects or is expected to use, the product. A product
|
||||
is a consumer product regardless of whether the product has substantial
|
||||
commercial, industrial or non-consumer uses, unless such uses represent
|
||||
the only significant mode of use of the product.
|
||||
|
||||
"Installation Information" for a User Product means any methods,
|
||||
procedures, authorization keys, or other information required to install
|
||||
and execute modified versions of a covered work in that User Product from
|
||||
a modified version of its Corresponding Source. The information must
|
||||
suffice to ensure that the continued functioning of the modified object
|
||||
code is in no case prevented or interfered with solely because
|
||||
modification has been made.
|
||||
|
||||
If you convey an object code work under this section in, or with, or
|
||||
specifically for use in, a User Product, and the conveying occurs as
|
||||
part of a transaction in which the right of possession and use of the
|
||||
User Product is transferred to the recipient in perpetuity or for a
|
||||
fixed term (regardless of how the transaction is characterized), the
|
||||
Corresponding Source conveyed under this section must be accompanied
|
||||
by the Installation Information. But this requirement does not apply
|
||||
if neither you nor any third party retains the ability to install
|
||||
modified object code on the User Product (for example, the work has
|
||||
been installed in ROM).
|
||||
|
||||
The requirement to provide Installation Information does not include a
|
||||
requirement to continue to provide support service, warranty, or updates
|
||||
for a work that has been modified or installed by the recipient, or for
|
||||
the User Product in which it has been modified or installed. Access to a
|
||||
network may be denied when the modification itself materially and
|
||||
adversely affects the operation of the network or violates the rules and
|
||||
protocols for communication across the network.
|
||||
|
||||
Corresponding Source conveyed, and Installation Information provided,
|
||||
in accord with this section must be in a format that is publicly
|
||||
documented (and with an implementation available to the public in
|
||||
source code form), and must require no special password or key for
|
||||
unpacking, reading or copying.
|
||||
|
||||
7. Additional Terms.
|
||||
|
||||
"Additional permissions" are terms that supplement the terms of this
|
||||
License by making exceptions from one or more of its conditions.
|
||||
Additional permissions that are applicable to the entire Program shall
|
||||
be treated as though they were included in this License, to the extent
|
||||
that they are valid under applicable law. If additional permissions
|
||||
apply only to part of the Program, that part may be used separately
|
||||
under those permissions, but the entire Program remains governed by
|
||||
this License without regard to the additional permissions.
|
||||
|
||||
When you convey a copy of a covered work, you may at your option
|
||||
remove any additional permissions from that copy, or from any part of
|
||||
it. (Additional permissions may be written to require their own
|
||||
removal in certain cases when you modify the work.) You may place
|
||||
additional permissions on material, added by you to a covered work,
|
||||
for which you have or can give appropriate copyright permission.
|
||||
|
||||
Notwithstanding any other provision of this License, for material you
|
||||
add to a covered work, you may (if authorized by the copyright holders of
|
||||
that material) supplement the terms of this License with terms:
|
||||
|
||||
a) Disclaiming warranty or limiting liability differently from the
|
||||
terms of sections 15 and 16 of this License; or
|
||||
|
||||
b) Requiring preservation of specified reasonable legal notices or
|
||||
author attributions in that material or in the Appropriate Legal
|
||||
Notices displayed by works containing it; or
|
||||
|
||||
c) Prohibiting misrepresentation of the origin of that material, or
|
||||
requiring that modified versions of such material be marked in
|
||||
reasonable ways as different from the original version; or
|
||||
|
||||
d) Limiting the use for publicity purposes of names of licensors or
|
||||
authors of the material; or
|
||||
|
||||
e) Declining to grant rights under trademark law for use of some
|
||||
trade names, trademarks, or service marks; or
|
||||
|
||||
f) Requiring indemnification of licensors and authors of that
|
||||
material by anyone who conveys the material (or modified versions of
|
||||
it) with contractual assumptions of liability to the recipient, for
|
||||
any liability that these contractual assumptions directly impose on
|
||||
those licensors and authors.
|
||||
|
||||
All other non-permissive additional terms are considered "further
|
||||
restrictions" within the meaning of section 10. If the Program as you
|
||||
received it, or any part of it, contains a notice stating that it is
|
||||
governed by this License along with a term that is a further
|
||||
restriction, you may remove that term. If a license document contains
|
||||
a further restriction but permits relicensing or conveying under this
|
||||
License, you may add to a covered work material governed by the terms
|
||||
of that license document, provided that the further restriction does
|
||||
not survive such relicensing or conveying.
|
||||
|
||||
If you add terms to a covered work in accord with this section, you
|
||||
must place, in the relevant source files, a statement of the
|
||||
additional terms that apply to those files, or a notice indicating
|
||||
where to find the applicable terms.
|
||||
|
||||
Additional terms, permissive or non-permissive, may be stated in the
|
||||
form of a separately written license, or stated as exceptions;
|
||||
the above requirements apply either way.
|
||||
|
||||
8. Termination.
|
||||
|
||||
You may not propagate or modify a covered work except as expressly
|
||||
provided under this License. Any attempt otherwise to propagate or
|
||||
modify it is void, and will automatically terminate your rights under
|
||||
this License (including any patent licenses granted under the third
|
||||
paragraph of section 11).
|
||||
|
||||
However, if you cease all violation of this License, then your
|
||||
license from a particular copyright holder is reinstated (a)
|
||||
provisionally, unless and until the copyright holder explicitly and
|
||||
finally terminates your license, and (b) permanently, if the copyright
|
||||
holder fails to notify you of the violation by some reasonable means
|
||||
prior to 60 days after the cessation.
|
||||
|
||||
Moreover, your license from a particular copyright holder is
|
||||
reinstated permanently if the copyright holder notifies you of the
|
||||
violation by some reasonable means, this is the first time you have
|
||||
received notice of violation of this License (for any work) from that
|
||||
copyright holder, and you cure the violation prior to 30 days after
|
||||
your receipt of the notice.
|
||||
|
||||
Termination of your rights under this section does not terminate the
|
||||
licenses of parties who have received copies or rights from you under
|
||||
this License. If your rights have been terminated and not permanently
|
||||
reinstated, you do not qualify to receive new licenses for the same
|
||||
material under section 10.
|
||||
|
||||
9. Acceptance Not Required for Having Copies.
|
||||
|
||||
You are not required to accept this License in order to receive or
|
||||
run a copy of the Program. Ancillary propagation of a covered work
|
||||
occurring solely as a consequence of using peer-to-peer transmission
|
||||
to receive a copy likewise does not require acceptance. However,
|
||||
nothing other than this License grants you permission to propagate or
|
||||
modify any covered work. These actions infringe copyright if you do
|
||||
not accept this License. Therefore, by modifying or propagating a
|
||||
covered work, you indicate your acceptance of this License to do so.
|
||||
|
||||
10. Automatic Licensing of Downstream Recipients.
|
||||
|
||||
Each time you convey a covered work, the recipient automatically
|
||||
receives a license from the original licensors, to run, modify and
|
||||
propagate that work, subject to this License. You are not responsible
|
||||
for enforcing compliance by third parties with this License.
|
||||
|
||||
An "entity transaction" is a transaction transferring control of an
|
||||
organization, or substantially all assets of one, or subdividing an
|
||||
organization, or merging organizations. If propagation of a covered
|
||||
work results from an entity transaction, each party to that
|
||||
transaction who receives a copy of the work also receives whatever
|
||||
licenses to the work the party's predecessor in interest had or could
|
||||
give under the previous paragraph, plus a right to possession of the
|
||||
Corresponding Source of the work from the predecessor in interest, if
|
||||
the predecessor has it or can get it with reasonable efforts.
|
||||
|
||||
You may not impose any further restrictions on the exercise of the
|
||||
rights granted or affirmed under this License. For example, you may
|
||||
not impose a license fee, royalty, or other charge for exercise of
|
||||
rights granted under this License, and you may not initiate litigation
|
||||
(including a cross-claim or counterclaim in a lawsuit) alleging that
|
||||
any patent claim is infringed by making, using, selling, offering for
|
||||
sale, or importing the Program or any portion of it.
|
||||
|
||||
11. Patents.
|
||||
|
||||
A "contributor" is a copyright holder who authorizes use under this
|
||||
License of the Program or a work on which the Program is based. The
|
||||
work thus licensed is called the contributor's "contributor version".
|
||||
|
||||
A contributor's "essential patent claims" are all patent claims
|
||||
owned or controlled by the contributor, whether already acquired or
|
||||
hereafter acquired, that would be infringed by some manner, permitted
|
||||
by this License, of making, using, or selling its contributor version,
|
||||
but do not include claims that would be infringed only as a
|
||||
consequence of further modification of the contributor version. For
|
||||
purposes of this definition, "control" includes the right to grant
|
||||
patent sublicenses in a manner consistent with the requirements of
|
||||
this License.
|
||||
|
||||
Each contributor grants you a non-exclusive, worldwide, royalty-free
|
||||
patent license under the contributor's essential patent claims, to
|
||||
make, use, sell, offer for sale, import and otherwise run, modify and
|
||||
propagate the contents of its contributor version.
|
||||
|
||||
In the following three paragraphs, a "patent license" is any express
|
||||
agreement or commitment, however denominated, not to enforce a patent
|
||||
(such as an express permission to practice a patent or covenant not to
|
||||
sue for patent infringement). To "grant" such a patent license to a
|
||||
party means to make such an agreement or commitment not to enforce a
|
||||
patent against the party.
|
||||
|
||||
If you convey a covered work, knowingly relying on a patent license,
|
||||
and the Corresponding Source of the work is not available for anyone
|
||||
to copy, free of charge and under the terms of this License, through a
|
||||
publicly available network server or other readily accessible means,
|
||||
then you must either (1) cause the Corresponding Source to be so
|
||||
available, or (2) arrange to deprive yourself of the benefit of the
|
||||
patent license for this particular work, or (3) arrange, in a manner
|
||||
consistent with the requirements of this License, to extend the patent
|
||||
license to downstream recipients. "Knowingly relying" means you have
|
||||
actual knowledge that, but for the patent license, your conveying the
|
||||
covered work in a country, or your recipient's use of the covered work
|
||||
in a country, would infringe one or more identifiable patents in that
|
||||
country that you have reason to believe are valid.
|
||||
|
||||
If, pursuant to or in connection with a single transaction or
|
||||
arrangement, you convey, or propagate by procuring conveyance of, a
|
||||
covered work, and grant a patent license to some of the parties
|
||||
receiving the covered work authorizing them to use, propagate, modify
|
||||
or convey a specific copy of the covered work, then the patent license
|
||||
you grant is automatically extended to all recipients of the covered
|
||||
work and works based on it.
|
||||
|
||||
A patent license is "discriminatory" if it does not include within
|
||||
the scope of its coverage, prohibits the exercise of, or is
|
||||
conditioned on the non-exercise of one or more of the rights that are
|
||||
specifically granted under this License. You may not convey a covered
|
||||
work if you are a party to an arrangement with a third party that is
|
||||
in the business of distributing software, under which you make payment
|
||||
to the third party based on the extent of your activity of conveying
|
||||
the work, and under which the third party grants, to any of the
|
||||
parties who would receive the covered work from you, a discriminatory
|
||||
patent license (a) in connection with copies of the covered work
|
||||
conveyed by you (or copies made from those copies), or (b) primarily
|
||||
for and in connection with specific products or compilations that
|
||||
contain the covered work, unless you entered into that arrangement,
|
||||
or that patent license was granted, prior to 28 March 2007.
|
||||
|
||||
Nothing in this License shall be construed as excluding or limiting
|
||||
any implied license or other defenses to infringement that may
|
||||
otherwise be available to you under applicable patent law.
|
||||
|
||||
12. No Surrender of Others' Freedom.
|
||||
|
||||
If conditions are imposed on you (whether by court order, agreement or
|
||||
otherwise) that contradict the conditions of this License, they do not
|
||||
excuse you from the conditions of this License. If you cannot convey a
|
||||
covered work so as to satisfy simultaneously your obligations under this
|
||||
License and any other pertinent obligations, then as a consequence you may
|
||||
not convey it at all. For example, if you agree to terms that obligate you
|
||||
to collect a royalty for further conveying from those to whom you convey
|
||||
the Program, the only way you could satisfy both those terms and this
|
||||
License would be to refrain entirely from conveying the Program.
|
||||
|
||||
13. Use with the GNU Affero General Public License.
|
||||
|
||||
Notwithstanding any other provision of this License, you have
|
||||
permission to link or combine any covered work with a work licensed
|
||||
under version 3 of the GNU Affero General Public License into a single
|
||||
combined work, and to convey the resulting work. The terms of this
|
||||
License will continue to apply to the part which is the covered work,
|
||||
but the special requirements of the GNU Affero General Public License,
|
||||
section 13, concerning interaction through a network will apply to the
|
||||
combination as such.
|
||||
|
||||
14. Revised Versions of this License.
|
||||
|
||||
The Free Software Foundation may publish revised and/or new versions of
|
||||
the GNU General Public License from time to time. Such new versions will
|
||||
be similar in spirit to the present version, but may differ in detail to
|
||||
address new problems or concerns.
|
||||
|
||||
Each version is given a distinguishing version number. If the
|
||||
Program specifies that a certain numbered version of the GNU General
|
||||
Public License "or any later version" applies to it, you have the
|
||||
option of following the terms and conditions either of that numbered
|
||||
version or of any later version published by the Free Software
|
||||
Foundation. If the Program does not specify a version number of the
|
||||
GNU General Public License, you may choose any version ever published
|
||||
by the Free Software Foundation.
|
||||
|
||||
If the Program specifies that a proxy can decide which future
|
||||
versions of the GNU General Public License can be used, that proxy's
|
||||
public statement of acceptance of a version permanently authorizes you
|
||||
to choose that version for the Program.
|
||||
|
||||
Later license versions may give you additional or different
|
||||
permissions. However, no additional obligations are imposed on any
|
||||
author or copyright holder as a result of your choosing to follow a
|
||||
later version.
|
||||
|
||||
15. Disclaimer of Warranty.
|
||||
|
||||
THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY
|
||||
APPLICABLE LAW. EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT
|
||||
HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY
|
||||
OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO,
|
||||
THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
|
||||
PURPOSE. THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM
|
||||
IS WITH YOU. SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF
|
||||
ALL NECESSARY SERVICING, REPAIR OR CORRECTION.
|
||||
|
||||
16. Limitation of Liability.
|
||||
|
||||
IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
|
||||
WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MODIFIES AND/OR CONVEYS
|
||||
THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY
|
||||
GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE
|
||||
USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF
|
||||
DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD
|
||||
PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER PROGRAMS),
|
||||
EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF
|
||||
SUCH DAMAGES.
|
||||
|
||||
17. Interpretation of Sections 15 and 16.
|
||||
|
||||
If the disclaimer of warranty and limitation of liability provided
|
||||
above cannot be given local legal effect according to their terms,
|
||||
reviewing courts shall apply local law that most closely approximates
|
||||
an absolute waiver of all civil liability in connection with the
|
||||
Program, unless a warranty or assumption of liability accompanies a
|
||||
copy of the Program in return for a fee.
|
||||
|
||||
END OF TERMS AND CONDITIONS
|
||||
|
||||
How to Apply These Terms to Your New Programs
|
||||
|
||||
If you develop a new program, and you want it to be of the greatest
|
||||
possible use to the public, the best way to achieve this is to make it
|
||||
free software which everyone can redistribute and change under these terms.
|
||||
|
||||
To do so, attach the following notices to the program. It is safest
|
||||
to attach them to the start of each source file to most effectively
|
||||
state the exclusion of warranty; and each file should have at least
|
||||
the "copyright" line and a pointer to where the full notice is found.
|
||||
|
||||
<one line to give the program's name and a brief idea of what it does.>
|
||||
Copyright (C) <year> <name of author>
|
||||
|
||||
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 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 General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License
|
||||
along with this program. If not, see <https://www.gnu.org/licenses/>.
|
||||
|
||||
Also add information on how to contact you by electronic and paper mail.
|
||||
|
||||
If the program does terminal interaction, make it output a short
|
||||
notice like this when it starts in an interactive mode:
|
||||
|
||||
<program> Copyright (C) <year> <name of author>
|
||||
This program comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
|
||||
This is free software, and you are welcome to redistribute it
|
||||
under certain conditions; type `show c' for details.
|
||||
|
||||
The hypothetical commands `show w' and `show c' should show the appropriate
|
||||
parts of the General Public License. Of course, your program's commands
|
||||
might be different; for a GUI interface, you would use an "about box".
|
||||
|
||||
You should also get your employer (if you work as a programmer) or school,
|
||||
if any, to sign a "copyright disclaimer" for the program, if necessary.
|
||||
For more information on this, and how to apply and follow the GNU GPL, see
|
||||
<https://www.gnu.org/licenses/>.
|
||||
|
||||
The GNU General Public License does not permit incorporating your program
|
||||
into proprietary programs. If your program is a subroutine library, you
|
||||
may consider it more useful to permit linking proprietary applications with
|
||||
the library. If this is what you want to do, use the GNU Lesser General
|
||||
Public License instead of this License. But first, please read
|
||||
<https://www.gnu.org/licenses/why-not-lgpl.html>.
|
||||
@@ -0,0 +1,150 @@
|
||||
Termtris - tetris game for terminals
|
||||
====================================
|
||||
|
||||

|
||||
|
||||
About
|
||||
-----
|
||||
|
||||
Termtris is a text-based tetris game, initially written for UNIX systems and
|
||||
ANSI/VT100-compatible terminals, but later extended to support more terminal
|
||||
types, operating systems, and text-mode video hardware.
|
||||
|
||||
I always liked the GameBoy tetris best. So I made termtris as close as possible
|
||||
to that version gameplay-wise.
|
||||
|
||||
Termtris can run in color or monochrome mode, and can load custom character sets
|
||||
for graphical blocks, if there is support for that.
|
||||
|
||||
There are two main flavors of termtris which can be compiled from the same
|
||||
source tree:
|
||||
|
||||
1. The original **UNIX version** which runs on terminals, and can also be
|
||||
compiled for windows using a POSIX emulation layer such as *msys2* or
|
||||
*cygwin*. It has been tested on multiple UNIX systems (GNU/Linux, FreeBSD, IRIX,
|
||||
Solaris, MacOSX), and multiple terminals (VT52, VT100, VT220, VT420,
|
||||
MS 6102), and terminal emulators (xterm, linux console, kermit, iTerm2).
|
||||
|
||||
2. The **DOS version** which uses the PC BIOS to access display and keyboard,
|
||||
but can also optionally work with the same terminals supported by the UNIX
|
||||
version.
|
||||
|
||||
### Links
|
||||
- website: http://nuclear.mutantstargoat.com/sw/termtris
|
||||
- source repository: https://github.com/jtsiomb/termtris
|
||||
|
||||
|
||||
Controls
|
||||
--------
|
||||
- `A` or *left arrow* moves the block left.
|
||||
- `D` or *right arrow* moves the block right.
|
||||
- `S` or *down arrow* drops the block faster.
|
||||
- `W`, *up arrow*, or *space* rotates the block.
|
||||
- *enter*, *tab*, or `0` drops the block immediately.
|
||||
- `P` pauses and unpauses the game.
|
||||
- *backspace*, or *delete* starts a new game.
|
||||
- `Q` or hitting escape twice, quits immediately.
|
||||
- `H` shows or hides the help panel which lists these keybindings.
|
||||
- `R` shows or hides the high score table.
|
||||
|
||||
Additionally on GNU/Linux systems any joystick can be used to control the game.
|
||||
The first available joystick is used automatically, or you can specify a
|
||||
joystick device with the `-j` commandline option. If you'd rather disable
|
||||
joystick control, use the option `-j /dev/null`.
|
||||
|
||||
When using a joystick, even axes are mapped to left/right, Odd axes are mapped
|
||||
to up/down, the first four buttons rotate, and the rest of the buttons pause
|
||||
and unpause.
|
||||
|
||||
There is no way to remap the controls without changing the source code at this
|
||||
time.
|
||||
|
||||
|
||||
Custom character set
|
||||
--------------------
|
||||
For terminals with support for custom loadable character sets, you can instruct
|
||||
termtris to use graphical blocks instead of the bracket characters with the `-g`
|
||||
command-line argument. If `TERM` is set to a known supported terminal, graphical
|
||||
blocks are enabled automatically, use the `-T` option to disable and inhibit
|
||||
auto-detection.
|
||||
|
||||
Different terminals have different capabilities when it comes to soft character
|
||||
sets. Termtris will try to detect the terminal type and choose the correct soft
|
||||
font to load, but if it fails or you want to force a different terminal type,
|
||||
make sure to define the `TERM` environent variable. If `TERM` is undefined, or
|
||||
an unknown or unsupported terminal type, termtris will try to interrogate the
|
||||
terminal itself about its capabilities.
|
||||
|
||||
The DOS version of termtris will automatically enable graphical blocks when it
|
||||
detects an EGA or VGA/SVGA graphics card. Use `-g` or `-T` to enable or disable
|
||||
it explicitly.
|
||||
|
||||
|
||||
License
|
||||
-------
|
||||
Copyright (C) 2019-2023 John Tsiombikas <nuclear@mutantstargoat.com>
|
||||
|
||||
This program is free software. Feel free to use, modify, and/or redistribute it
|
||||
under the terms of the GNU General Public License version 3, or at your option,
|
||||
any later version published by the Free Software Foundation. See COPYING for
|
||||
details.
|
||||
|
||||
|
||||
Download
|
||||
--------
|
||||
### Source code
|
||||
Current release (1.9): http://nuclear.mutantstargoat.com/sw/termtris/termtris-1.9.tar.gz
|
||||
|
||||
Releases are also mirrored on github: https://github.com/jtsiomb/termtris/releases
|
||||
|
||||
Alternatively you may clone the latest version of the source code from the git
|
||||
repository:
|
||||
|
||||
git clone https://github.com/jtsiomb/termtris
|
||||
|
||||
### Pre-compiled
|
||||
Building from source is highly recommended. If however you want to try a
|
||||
pre-compiled binary, you might be able to find something for your system in:
|
||||
http://nuclear.mutantstargoat.com/sw/termtris/bin
|
||||
Not all releases are compiled for all platforms. Any binaries available here are
|
||||
provided purely for convenience. Do not open bug reports about a pre-compiled
|
||||
binary not running, or misbehaving on your system; compile it yourself first.
|
||||
|
||||
Another source of binaries, is the github automated builds. Head over to the
|
||||
"actions" page (https://github.com/jtsiomb/termtris/actions), choose the latest
|
||||
successful build for your platform, and download the binary from the "artifacts"
|
||||
section at the bottom.
|
||||
|
||||
Pre-compiled binaries might also be available in your package management system of
|
||||
choice, but please do not submit any bug reports without first trying to build
|
||||
termtris yourself from the latest git source code.
|
||||
- Debian/Ubuntu/Mint: `apt-get install termtris`
|
||||
|
||||
The latest pre-compiled DOS binary (currently 1.9) is always available at:
|
||||
http://nuclear.mutantstargoat.com/sw/termtris/termtris.com
|
||||
|
||||
Build (UNIX)
|
||||
------------
|
||||
There are no external dependencies. Simply type `make` to build, and `make
|
||||
install` if you wish to install termtris.
|
||||
|
||||
Default installation prefix is `/usr/local`. Change the first line of the
|
||||
`Makefile` if you'd rather install somewhere else, or simply invoke the install
|
||||
rule like so:
|
||||
|
||||
make PREFIX=/some/other/prefix install
|
||||
|
||||
If you don't have GNU make and GCC installed, or you'd rather use the default
|
||||
make utility and C compiler on your UNIX system, you can use `Makefile.sgi`:
|
||||
|
||||
make -f Makefile.sgi
|
||||
|
||||
(originally included for building on SGI IRIX with MIPSPro and the native make).
|
||||
|
||||
|
||||
Build (DOS)
|
||||
-----------
|
||||
To build the DOS version of termtris you'll need some version of the Watcom or
|
||||
OpenWatcom C compiler, and the NASM assembler:
|
||||
|
||||
make -f Makefile.wat
|
||||
@@ -0,0 +1 @@
|
||||
7c5435dd4e93ffc10f3b5c68fe1ae9718a365258
|
||||
Executable
+175
@@ -0,0 +1,175 @@
|
||||
#!/bin/sh
|
||||
# build.sh -- build a VT1200 COFF with TI TMS34010 r5.01 under 2ine.
|
||||
#
|
||||
# apps/termtris/build.sh SOURCE.c [SOURCE.c ...] [EXTRA.obj ...]
|
||||
#
|
||||
# The first .c is the main program; the output is build/<main>.coff. entry.asm
|
||||
# and cinit.asm are always assembled and linked. The 2ine loader is outside the
|
||||
# repo: point NINE at its build directory (default /home/arti/os2-work/2ine/build).
|
||||
set -eu
|
||||
|
||||
DIR=$(cd "$(dirname "$0")" && pwd)
|
||||
ROOT=$(cd "$DIR/../.." && pwd)
|
||||
WORK="$DIR/work"
|
||||
OUT="$DIR/build"
|
||||
NINE="${NINE:-/home/arti/os2-work/2ine/build}"
|
||||
LX="$NINE/lx_loader"
|
||||
SDK="$ROOT/tools/tms34010-sdk/1990-11 TMS340 Family SDK"
|
||||
Z1="$SDK/1990-11-19 TMS340 Family Code Generation Tools (1 of 2) r5.01 rev2564062-1641.zip"
|
||||
Z2="$SDK/1990-11-19 TMS340 Family Code Generation Tools (2 of 2) r5.01 rev2564062-1641.zip"
|
||||
|
||||
if [ ! -x "$LX" ]; then
|
||||
echo "build.sh: no 2ine lx_loader at $LX (set NINE=...)" >&2
|
||||
exit 1
|
||||
fi
|
||||
if [ ! -f "$Z1" ] || [ ! -f "$Z2" ]; then
|
||||
echo "build.sh: r5.01 SDK zips not found under $SDK" >&2
|
||||
exit 1
|
||||
fi
|
||||
|
||||
mkdir -p "$WORK" "$OUT"
|
||||
if [ ! -x "$WORK/gspac.exe" ]; then
|
||||
unzip -oq "$Z1" -d "$WORK"
|
||||
unzip -oq "$Z2" -d "$WORK"
|
||||
fi
|
||||
for so in "$NINE"/lib*.so; do
|
||||
[ -e "$so" ] && ln -sf "$so" "$WORK/"
|
||||
done
|
||||
cp "$DIR/src/vt1200/"*.h "$WORK/" 2>/dev/null || true
|
||||
cp "$DIR/src/"*.h "$WORK/" 2>/dev/null || true
|
||||
cp "$DIR/src/vt1200/entry.asm" "$DIR/src/vt1200/cinit.asm" "$DIR/src/vt1200/cinitz.asm" "$WORK/"
|
||||
|
||||
# Collect objects. C sources are copied under their uppercase basename because
|
||||
# the OS/2 tools are case-sensitive on this host.
|
||||
OBJS=""
|
||||
MAIN=""
|
||||
for arg in "$@"; do
|
||||
case "$arg" in
|
||||
*.c)
|
||||
base=$(basename "$arg" .c | tr 'a-z' 'A-Z')
|
||||
[ -n "$MAIN" ] || MAIN="$base"
|
||||
cp "$arg" "$WORK/$base.C"
|
||||
OBJS="$OBJS $base"
|
||||
;;
|
||||
*.obj)
|
||||
cp "$arg" "$WORK/"
|
||||
OBJS="$OBJS $(basename "$arg")"
|
||||
;;
|
||||
*.asm)
|
||||
base=$(basename "$arg" .asm | tr 'a-z' 'A-Z')
|
||||
cp "$arg" "$WORK/$base.ASM"
|
||||
OBJS="$OBJS $base"
|
||||
;;
|
||||
*)
|
||||
echo "build.sh: unsupported input: $arg" >&2
|
||||
exit 1
|
||||
;;
|
||||
esac
|
||||
done
|
||||
if [ -z "$MAIN" ]; then
|
||||
echo "build.sh: give at least one .c source" >&2
|
||||
exit 1
|
||||
fi
|
||||
|
||||
# The 2ine-hosted tools frequently crash during teardown after doing their work
|
||||
# (exit 139 / 134). Treat an output file as success, and retry a missing one.
|
||||
run() {
|
||||
_out=$1
|
||||
shift
|
||||
i=0
|
||||
while [ "$i" -lt 5 ]; do
|
||||
( cd "$WORK" && "$LX" "$@" ) >/dev/null 2>&1 || true
|
||||
if [ -f "$WORK/$_out" ]; then
|
||||
return 0
|
||||
fi
|
||||
i=$((i + 1))
|
||||
done
|
||||
echo "build.sh: stage failed to produce $WORK/$_out: $*" >&2
|
||||
return 1
|
||||
}
|
||||
|
||||
compile_c() {
|
||||
base=$1
|
||||
rm -f "$WORK/$base.IF" "$WORK/$base.OPT" "$WORK/$base.ASM" "$WORK/$base.obj"
|
||||
run "$base.IF" ./gspac.exe -k "$base.C" "$base.IF"
|
||||
run "$base.OPT" ./gspopt.exe -k -O2 "$base.IF" "$base.OPT"
|
||||
run "$base.ASM" ./gspcg.exe -m "$base.OPT" "$base.ASM" "$base.TMP"
|
||||
run "$base.obj" ./gspa.exe "$base.ASM"
|
||||
}
|
||||
|
||||
compile_asm() {
|
||||
base=$1
|
||||
rm -f "$WORK/$base.obj"
|
||||
run "$base.obj" ./gspa.exe "$base.ASM"
|
||||
}
|
||||
|
||||
for base in $OBJS; do
|
||||
case " $* " in
|
||||
*" $base "*) ;; # handled below by extension scan
|
||||
esac
|
||||
done
|
||||
|
||||
# Compile every collected object exactly once, in the order given.
|
||||
for arg in "$@"; do
|
||||
case "$arg" in
|
||||
*.c) compile_c "$(basename "$arg" .c | tr 'a-z' 'A-Z')" ;;
|
||||
*.asm) compile_asm "$(basename "$arg" .asm | tr 'a-z' 'A-Z')" ;;
|
||||
esac
|
||||
done
|
||||
compile_asm ENTRY
|
||||
compile_asm CINIT
|
||||
compile_asm CINITZ
|
||||
|
||||
OUTNAME=$(printf '%s' "$MAIN" | tr 'A-Z' 'a-z')
|
||||
CMD="$WORK/$MAIN.CMD"
|
||||
{
|
||||
printf '%s\n' '-a'
|
||||
printf '%s\n' "-o $MAIN.out"
|
||||
printf '%s\n' "-m $MAIN.map"
|
||||
printf '%s\n' '-e _start'
|
||||
printf '%s\n' 'CINIT.obj'
|
||||
printf '%s\n' 'ENTRY.obj'
|
||||
for arg in "$@"; do
|
||||
case "$arg" in
|
||||
*.c) printf '%s\n' "$(basename "$arg" .c | tr 'a-z' 'A-Z').obj" ;;
|
||||
*.asm) printf '%s\n' "$(basename "$arg" .asm | tr 'a-z' 'A-Z').obj" ;;
|
||||
*.obj) printf '%s\n' "$(basename "$arg")" ;;
|
||||
esac
|
||||
done
|
||||
printf '%s\n' '-l rts.lib'
|
||||
printf '%s\n' 'MEMORY'
|
||||
printf '%s\n' '{'
|
||||
printf '%s\n' ' prog: origin = 018A0000h, length = 20000h'
|
||||
printf '%s\n' ' ram: origin = 01A00000h, length = 40000h'
|
||||
printf '%s\n' '}'
|
||||
printf '%s\n' 'SECTIONS'
|
||||
printf '%s\n' '{'
|
||||
printf '%s\n' ' .text: {} > prog'
|
||||
printf '%s\n' ' .data: {} > prog'
|
||||
printf '%s\n' ' .cinit: {} > prog'
|
||||
printf '%s\n' ' .bss: {} > ram'
|
||||
printf '%s\n' '}'
|
||||
} > "$CMD"
|
||||
sed -i 's/$/\r/' "$CMD"
|
||||
|
||||
rm -f "$WORK/$MAIN.out" "$WORK/$MAIN.map"
|
||||
run "$MAIN.out" ./gsplnk.exe "$MAIN.CMD"
|
||||
if [ ! -f "$WORK/$MAIN.map" ]; then
|
||||
echo "build.sh: no link map" >&2
|
||||
exit 1
|
||||
fi
|
||||
|
||||
# An empty .cinit makes the linker's `cinit` symbol point at .text; the entry's
|
||||
# cinit walker would then treat an instruction as a record count. Relink with
|
||||
# a one-word terminator when the map says the section is empty.
|
||||
CSIZE=$(awk '$1 == ".cinit" {print $4; exit}' "$WORK/$MAIN.map")
|
||||
if [ "$CSIZE" = "00000000" ]; then
|
||||
sed -i 's/CINIT\.obj/CINITZ.obj/' "$CMD"
|
||||
rm -f "$WORK/$MAIN.out" "$WORK/$MAIN.map"
|
||||
run "$MAIN.out" ./gsplnk.exe "$MAIN.CMD"
|
||||
fi
|
||||
|
||||
cp "$WORK/$MAIN.out" "$OUT/$OUTNAME.coff"
|
||||
sed 's/\r$//' "$WORK/$MAIN.map" > "$OUT/$OUTNAME.map"
|
||||
echo "build.sh: $OUT/$OUTNAME.coff ($(wc -c < "$OUT/$OUTNAME.coff") bytes)"
|
||||
sed -n '1,40p' "$OUT/$OUTNAME.map"
|
||||
Binary file not shown.
@@ -0,0 +1,56 @@
|
||||
*****************************************************
|
||||
TMS340 COFF Linker Version 5.01
|
||||
*****************************************************
|
||||
Tue Nov 03 18:49:07 2026
|
||||
|
||||
OUTPUT FILE NAME: <SMOKE.out>
|
||||
ENTRY POINT SYMBOL: "_start" address: 018a0000
|
||||
|
||||
|
||||
MEMORY CONFIGURATION
|
||||
|
||||
name origin length attributes
|
||||
-------- -------- --------- ----------
|
||||
prog 018a0000 000020000 RWIX
|
||||
ram 01a00000 000040000 RWIX
|
||||
|
||||
|
||||
SECTION ALLOCATION MAP
|
||||
|
||||
output attributes/
|
||||
section page origin length input sections
|
||||
-------- ---- ---------- ---------- ----------------
|
||||
.text 0 018a0000 00000d40
|
||||
018a0000 00000150 ENTRY.obj (.text)
|
||||
018a0150 000009e0 SMOKE.obj (.text)
|
||||
018a0b30 00000210 XGFIX.obj (.text)
|
||||
|
||||
.cinit 0 018a0d40 00000010
|
||||
018a0d40 00000010 CINITZ.obj (.cinit)
|
||||
|
||||
.bss 0 01a00000 0000a700 UNINITIALIZED
|
||||
01a00000 00008000 ENTRY.obj (.bss)
|
||||
01a08000 00000700 SMOKE.obj (.bss)
|
||||
01a08700 00002000 XGFIX.obj (.bss)
|
||||
|
||||
.data 0 018a0000 00000000 UNINITIALIZED
|
||||
|
||||
|
||||
GLOBAL SYMBOLS
|
||||
|
||||
address name address name
|
||||
-------- ---- -------- ----
|
||||
01a00000 .bss 018a0000 .text
|
||||
018a0000 .data 018a0000 .data
|
||||
018a0000 .text 018a0000 edata
|
||||
01a08400 _evbuf 018a0000 _start
|
||||
018a0150 _main 018a0150 _main
|
||||
01a08000 _mark 018a0b30 _vt_install_xg
|
||||
018a0000 _start 018a0d40 cinit
|
||||
018a0b30 _vt_install_xg 018a0d40 etext
|
||||
018a0d40 cinit 01a00000 .bss
|
||||
018a0000 edata 01a08000 _mark
|
||||
01a0a700 end 01a08400 _evbuf
|
||||
018a0d40 etext 01a0a700 end
|
||||
|
||||
[12 symbols]
|
||||
File diff suppressed because it is too large.
Load diff
@@ -0,0 +1,43 @@
|
||||
/*
|
||||
Termtris - a tetris game for ANSI/VT100 terminals
|
||||
Copyright (C) 2019-2023 John Tsiombikas <nuclear@member.fsf.org>
|
||||
|
||||
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 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 General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License
|
||||
along with this program. If not, see <https://www.gnu.org/licenses/>.
|
||||
*/
|
||||
#ifndef GAME_H_
|
||||
#define GAME_H_
|
||||
|
||||
extern int quit;
|
||||
extern long tick_interval;
|
||||
extern int use_bell;
|
||||
extern int monochrome;
|
||||
extern int use_gfxchar;
|
||||
extern int onlyascii;
|
||||
extern int blackpf;
|
||||
extern int rotstep;
|
||||
|
||||
extern int term_width, term_height;
|
||||
|
||||
int init_game(void);
|
||||
void cleanup_game(void);
|
||||
|
||||
long update(long msec);
|
||||
void game_input(int c);
|
||||
|
||||
/* wait for any pending drawing to be completed before proceeding
|
||||
* implemented in main.c
|
||||
*/
|
||||
void wait_display(void);
|
||||
|
||||
#endif /* GAME_H_ */
|
||||
@@ -0,0 +1,84 @@
|
||||
/*
|
||||
Termtris - a tetris game for ANSI/VT100 terminals
|
||||
Copyright (C) 2019-2022 John Tsiombikas <nuclear@member.fsf.org>
|
||||
|
||||
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 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 General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License
|
||||
along with this program. If not, see <https://www.gnu.org/licenses/>.
|
||||
*/
|
||||
#ifndef PIECES_H_
|
||||
#define PIECES_H_
|
||||
|
||||
#define BLK(x, y) ((x) | ((y) << 4))
|
||||
#define BLKX(c) ((unsigned char)(c) & 0xf)
|
||||
#define BLKY(c) ((unsigned char)(c) >> 4)
|
||||
|
||||
#define NUM_PIECES 7
|
||||
|
||||
static unsigned char pieces[NUM_PIECES][4][4] = {
|
||||
/* L block */
|
||||
{
|
||||
{BLK(0, 1), BLK(0, 2), BLK(1, 1), BLK(2, 1)},
|
||||
{BLK(0, 0), BLK(1, 0), BLK(1, 1), BLK(1, 2)},
|
||||
{BLK(0, 1), BLK(1, 1), BLK(2, 1), BLK(2, 0)},
|
||||
{BLK(1, 0), BLK(1, 1), BLK(1, 2), BLK(2, 2)}
|
||||
},
|
||||
/* J block */
|
||||
{
|
||||
{BLK(0, 1), BLK(1, 1), BLK(2, 1), BLK(2, 2)},
|
||||
{BLK(1, 0), BLK(1, 1), BLK(1, 2), BLK(0, 2)},
|
||||
{BLK(0, 0), BLK(0, 1), BLK(1, 1), BLK(2, 1)},
|
||||
{BLK(1, 0), BLK(2, 0), BLK(1, 1), BLK(1, 2)}
|
||||
},
|
||||
/* I block */
|
||||
{
|
||||
{BLK(0, 2), BLK(1, 2), BLK(2, 2), BLK(3, 2)},
|
||||
{BLK(1, 0), BLK(1, 1), BLK(1, 2), BLK(1, 3)},
|
||||
{BLK(0, 2), BLK(1, 2), BLK(2, 2), BLK(3, 2)},
|
||||
{BLK(1, 0), BLK(1, 1), BLK(1, 2), BLK(1, 3)}
|
||||
},
|
||||
/* O block */
|
||||
{
|
||||
{BLK(1, 1), BLK(2, 1), BLK(1, 2), BLK(2, 2)},
|
||||
{BLK(1, 1), BLK(2, 1), BLK(1, 2), BLK(2, 2)},
|
||||
{BLK(1, 1), BLK(2, 1), BLK(1, 2), BLK(2, 2)},
|
||||
{BLK(1, 1), BLK(2, 1), BLK(1, 2), BLK(2, 2)}
|
||||
},
|
||||
/* Z block */
|
||||
{
|
||||
{BLK(0, 1), BLK(1, 1), BLK(1, 2), BLK(2, 2)},
|
||||
{BLK(0, 1), BLK(1, 1), BLK(1, 0), BLK(0, 2)},
|
||||
{BLK(0, 1), BLK(1, 1), BLK(1, 2), BLK(2, 2)},
|
||||
{BLK(0, 1), BLK(1, 1), BLK(1, 0), BLK(0, 2)}
|
||||
},
|
||||
/* S block */
|
||||
{
|
||||
{BLK(1, 1), BLK(2, 1), BLK(0, 2), BLK(1, 2)},
|
||||
{BLK(0, 0), BLK(0, 1), BLK(1, 1), BLK(1, 2)},
|
||||
{BLK(1, 1), BLK(2, 1), BLK(0, 2), BLK(1, 2)},
|
||||
{BLK(0, 0), BLK(0, 1), BLK(1, 1), BLK(1, 2)}
|
||||
},
|
||||
/* T block */
|
||||
{
|
||||
{BLK(0, 1), BLK(1, 1), BLK(2, 1), BLK(1, 2)},
|
||||
{BLK(1, 0), BLK(1, 1), BLK(1, 2), BLK(0, 1)},
|
||||
{BLK(0, 1), BLK(1, 1), BLK(2, 1), BLK(1, 0)},
|
||||
{BLK(1, 0), BLK(1, 1), BLK(1, 2), BLK(2, 1)}
|
||||
}
|
||||
};
|
||||
|
||||
static int piece_spawnpos[NUM_PIECES][2] = {
|
||||
{-1, -2}, {-1, -2}, {-2, -2}, {-1, -2}, {-1, -2}, {-1, -2}, {-1, -2}
|
||||
};
|
||||
|
||||
|
||||
#endif /* PIECES_H_ */
|
||||
@@ -0,0 +1,45 @@
|
||||
/*
|
||||
Termtris - a tetris game for ANSI/VT100 terminals
|
||||
Copyright (C) 2019-2023 John Tsiombikas <nuclear@member.fsf.org>
|
||||
|
||||
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 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 General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License
|
||||
along with this program. If not, see <https://www.gnu.org/licenses/>.
|
||||
*/
|
||||
#ifndef SCOREDB_H_
|
||||
#define SCOREDB_H_
|
||||
|
||||
#include <stdio.h>
|
||||
|
||||
#if defined(MSDOS) || defined(__COM__)
|
||||
/* the DOS version of score_entry is simpler, because scores are embedded in
|
||||
* the executable itself in binary format.
|
||||
*/
|
||||
#define MAX_NAME 36
|
||||
struct score_entry {
|
||||
char user[MAX_NAME];
|
||||
long score, lines, level;
|
||||
struct score_entry *next;
|
||||
};
|
||||
#else
|
||||
struct score_entry {
|
||||
char *user;
|
||||
long score, lines, level;
|
||||
struct score_entry *next;
|
||||
};
|
||||
#endif
|
||||
|
||||
struct score_entry *read_scores(FILE *fp, int max_scores);
|
||||
int save_score(struct score_entry *sc);
|
||||
int print_scores(int num);
|
||||
|
||||
#endif /* SCOREDB_H_ */
|
||||
@@ -0,0 +1,62 @@
|
||||
/*
|
||||
Termtris - a tetris game for TERM/VT100 terminals
|
||||
Copyright (C) 2019-2022 John Tsiombikas <nuclear@member.fsf.org>
|
||||
|
||||
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 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 General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License
|
||||
along with this program. If not, see <https://www.gnu.org/licenses/>.
|
||||
*/
|
||||
#ifndef TERM_H_
|
||||
#define TERM_H_
|
||||
|
||||
enum {
|
||||
G_DIAMOND = 0x04,
|
||||
G_CHECKER = 0xb1,
|
||||
G_LR_CORNER = 0xd9,
|
||||
G_UR_CORNER = 0xbf,
|
||||
G_UL_CORNER = 0xda,
|
||||
G_LL_CORNER = 0xc0,
|
||||
G_CROSS = 0xc5,
|
||||
G_HLINE = 0xc4,
|
||||
G_L_TEE = 0xc3,
|
||||
G_R_TEE = 0xb4,
|
||||
G_B_TEE = 0xc1,
|
||||
G_T_TEE = 0xc2,
|
||||
G_VLINE = 0xb3,
|
||||
G_CDOT = 0xf8
|
||||
};
|
||||
|
||||
enum { BLACK, BLUE, GREEN, CYAN, RED, MAGENTA, YELLOW, WHITE };
|
||||
#define BOLD 8
|
||||
|
||||
enum {
|
||||
TERM_ANSI,
|
||||
TERM_VT52,
|
||||
TERM_ADM3,
|
||||
TERM_PCBIOS = 0xb105
|
||||
};
|
||||
|
||||
extern char *termenv;
|
||||
extern int term_type;
|
||||
|
||||
extern void (*term_reset)(void);
|
||||
extern void (*term_clearscr)(void);
|
||||
extern void (*term_setcursor)(int row, int col);
|
||||
extern void (*term_cursor)(int show);
|
||||
extern void (*term_setcolor)(int fg, int bg);
|
||||
/* convert a PC cga/ega/vga char+attr to an TERM sequence and write it to stdout */
|
||||
extern void (*term_ibmchar)(unsigned char c, unsigned char attr);
|
||||
|
||||
void term_init(void);
|
||||
void term_putstr(const char *s, unsigned char attr);
|
||||
|
||||
#endif /* TERM_H_ */
|
||||
@@ -0,0 +1,4 @@
|
||||
.sect ".cinit"
|
||||
.globl cinit
|
||||
cinit:
|
||||
.end
|
||||
@@ -0,0 +1,5 @@
|
||||
.sect ".cinit"
|
||||
.globl cinit
|
||||
cinit:
|
||||
.word 0
|
||||
.end
|
||||
@@ -0,0 +1,28 @@
|
||||
.text
|
||||
.globl _start
|
||||
.globl _main
|
||||
.globl cinit
|
||||
_start:
|
||||
setf 32,0,1
|
||||
movi _cstack,a14
|
||||
move a14,a13
|
||||
|
||||
; process the .cinit table: u16 word count, u32 destination, data words
|
||||
movi cinit,a9
|
||||
ci_loop:
|
||||
setf 16,0,0
|
||||
move *a9+,a11
|
||||
jrz ci_done
|
||||
move *a9+,a10,1
|
||||
ci_copy:
|
||||
move *a9+,*a10+
|
||||
dsjs a11,ci_copy
|
||||
jruc ci_loop
|
||||
ci_done:
|
||||
setf 32,0,1
|
||||
move a13,a14
|
||||
calla _main
|
||||
rets
|
||||
|
||||
.bss _cstack,32768,16
|
||||
.end
|
||||
@@ -0,0 +1,30 @@
|
||||
/*
|
||||
* xgfix.c -- install a per-process Xlib context before XOpenDisplay.
|
||||
*
|
||||
* `create_process` leaves the per-process user word at *(proc+0x100) pointing
|
||||
* at a zeroed cell. The ROM Xlib's _XEnq does
|
||||
*
|
||||
* XG = *(*(proc+0x100));
|
||||
* free_list = *(XG + 0x198 bytes);
|
||||
*
|
||||
* so a loader child with XG == NULL reads low-RAM garbage as a queue-node
|
||||
* pointer and XNextEvent copies unmapped zeros. Giving it a zeroed block
|
||||
* makes the event queue real. This is a RAM write only; the ROM is untouched.
|
||||
*/
|
||||
typedef unsigned long vt_u32;
|
||||
|
||||
static vt_u32 vt_xg[256]; /* 1 KiB: > the 0x198-byte free-list field */
|
||||
|
||||
int vt_install_xg(void)
|
||||
{
|
||||
vt_u32 proc, pp;
|
||||
|
||||
proc = *(volatile vt_u32 *)0x001B3900UL;
|
||||
if(proc < 0x100UL || proc > 0x01FFFFFFUL)
|
||||
return 0;
|
||||
pp = *(volatile vt_u32 *)(proc + 0x100UL);
|
||||
if(pp < 0x100UL || pp > 0x01FFFFFFUL)
|
||||
return 0;
|
||||
*(volatile vt_u32 *)pp = (vt_u32)vt_xg;
|
||||
return 1;
|
||||
}
|
||||
@@ -0,0 +1,51 @@
|
||||
/*
|
||||
* xlib.h -- the VT1200 ROM Xlib entry points, called with the TI C ABI.
|
||||
*
|
||||
* Addresses are TMS34010 bit addresses. The caller reserves the A14 slot and
|
||||
* pushes arguments last-to-first; the callee `rets 2` restores A14. The C
|
||||
* compiler emits exactly this sequence for a call through a function pointer.
|
||||
*/
|
||||
#ifndef VT_XLIB_H_
|
||||
#define VT_XLIB_H_
|
||||
|
||||
typedef unsigned long vt_u32;
|
||||
|
||||
typedef void *(*vt_xopen_t)(const char *);
|
||||
typedef vt_u32 (*vt_xcreate_t)(void *, vt_u32, int, int, unsigned int,
|
||||
unsigned int, unsigned int, vt_u32, vt_u32);
|
||||
typedef int (*vt_xselect_t)(void *, vt_u32, long);
|
||||
typedef int (*vt_xmap_t)(void *, vt_u32);
|
||||
typedef int (*vt_xsync_t)(void *, int);
|
||||
typedef int (*vt_xflush_t)(void *);
|
||||
typedef int (*vt_xnext_t)(void *, void *);
|
||||
typedef int (*vt_xlookup_t)(void *, char *, int, vt_u32 *, void *);
|
||||
typedef vt_u32 (*vt_xgc_t)(void *, vt_u32, vt_u32, vt_u32 *);
|
||||
typedef int (*vt_xsetfg_t)(void *, vt_u32, vt_u32);
|
||||
typedef int (*vt_xfill_t)(void *, vt_u32, vt_u32, int, int,
|
||||
unsigned int, unsigned int);
|
||||
typedef int (*vt_xdraw_t)(void *, vt_u32, vt_u32, int, int,
|
||||
const char *, int);
|
||||
typedef int (*vt_sleep_t)(int);
|
||||
|
||||
#define VT_XOPEN ((vt_xopen_t)0x3F9C2570UL)
|
||||
#define VT_XCREATE ((vt_xcreate_t)0x3FD41B90UL)
|
||||
#define VT_XSELECT ((vt_xselect_t)0x3FD97D50UL)
|
||||
#define VT_XMAP ((vt_xmap_t)0x3FD64F60UL)
|
||||
#define VT_XSYNC ((vt_xsync_t)0x3FD9F6B0UL)
|
||||
#define VT_XFLUSH ((vt_xflush_t)0x3F9B1030UL)
|
||||
#define VT_XNEXT ((vt_xnext_t)0x3F9C1CF0UL)
|
||||
#define VT_XLOOKUP ((vt_xlookup_t)0x3F9A9C30UL)
|
||||
#define VT_XGC ((vt_xgc_t)0x3F997000UL)
|
||||
#define VT_XSETFG ((vt_xsetfg_t)0x3FD99A60UL)
|
||||
#define VT_XFILL ((vt_xfill_t)0x3F99E8F0UL)
|
||||
#define VT_XDRAW ((vt_xdraw_t)0x3FDA0000UL)
|
||||
#define VT_XPENDING ((int (*)(void *))0x3FD67620UL)
|
||||
#define VT_SLEEP ((vt_sleep_t)0x3FB33A20UL)
|
||||
|
||||
/* display->screens[] is at bit 0x480 / byte 0x90; screen->root at bit 0x40 /
|
||||
* byte 8 (see dwt/notes/GUI_APPS.md and dwt/gui/xhello.asm). */
|
||||
vt_u32 vt_root_window(void *dpy);
|
||||
|
||||
int vt_install_xg(void);
|
||||
|
||||
#endif /* VT_XLIB_H_ */
|
||||
@@ -0,0 +1,53 @@
|
||||
/*
|
||||
* smoke.c -- Task 1 acceptance: a local Xlib client installs the per-process
|
||||
* Xlib context, opens the display, maps a window, and receives a real KeyPress.
|
||||
*/
|
||||
#include "xlib.h"
|
||||
|
||||
extern int vt_install_xg(void);
|
||||
|
||||
volatile vt_u32 mark[32];
|
||||
volatile vt_u32 evbuf[24];
|
||||
|
||||
int main(void)
|
||||
{
|
||||
void *dpy;
|
||||
vt_u32 root, win;
|
||||
vt_u32 ks;
|
||||
char buf[8];
|
||||
int n;
|
||||
|
||||
mark[0] = 0x534D4F4BUL; /* SMOK */
|
||||
if(!vt_install_xg()) return 1;
|
||||
dpy = VT_XOPEN("0::0");
|
||||
mark[1] = (vt_u32)dpy;
|
||||
if(!dpy) return 2;
|
||||
|
||||
root = *(vt_u32 *)((char *)dpy + 0x90);
|
||||
root = *(vt_u32 *)((char *)root + 8);
|
||||
win = VT_XCREATE(dpy, root, 80, 80, 480, 312, 2, 1, 0);
|
||||
mark[2] = win;
|
||||
if(!win) return 3;
|
||||
|
||||
VT_XSELECT(dpy, win, 0x22000FUL);
|
||||
VT_XMAP(dpy, win);
|
||||
VT_XSYNC(dpy, 0);
|
||||
mark[3] = 0;
|
||||
|
||||
for(;;) {
|
||||
VT_XNEXT(dpy, (void *)evbuf);
|
||||
mark[3] = mark[3] + 1;
|
||||
mark[4] = evbuf[0];
|
||||
mark[5] = evbuf[13];
|
||||
if(evbuf[0] == 2) {
|
||||
ks = 0;
|
||||
n = VT_XLOOKUP((void *)evbuf, buf, 8, &ks, 0);
|
||||
mark[6] = (vt_u32)n;
|
||||
mark[7] = (vt_u32)(unsigned char)buf[0];
|
||||
mark[8] = ks;
|
||||
mark[9] = 0x4B455950UL; /* KEYP */
|
||||
break;
|
||||
}
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
@@ -0,0 +1,355 @@
|
||||
-- loader.lua -- debugger-assisted COFF loader acceptance harness.
|
||||
--
|
||||
-- Boots the firmware with VT1200_SKIP_LEVEL1=1 (the documented divergence) to
|
||||
-- the OS, then at frame LOADER_AT pokes:
|
||||
-- * the loader payload at bit 0x01880000 (raw dwt/loader/build/loader.bin)
|
||||
-- * a GSPLNK COFF image at LOADER_BUF (default bit 0x01900000)
|
||||
-- * the loader descriptor at 0x01882C00
|
||||
-- and sets PC = 0x01880000. It does not use the network, the rdebug service
|
||||
-- or any firmware transport: this is the debugger-assisted milestone.
|
||||
--
|
||||
-- The loader itself copies the COFF sections to their linked bit addresses and
|
||||
-- calls create_process(entry, "LOADER", 0x6000, 1, 0). This script only pokes
|
||||
-- the input and reads the result; it never writes the app's code or markers.
|
||||
--
|
||||
-- Env:
|
||||
-- LOADER_BIN loader payload (default dwt/loader/build/loader.bin)
|
||||
-- LOADER_COFF app COFF (default dwt/loader/build/marker.coff)
|
||||
-- LOADER_BUF COFF buffer bit address (default 0x01900000)
|
||||
-- LOADER_AT injection frame (default 2500)
|
||||
-- LOADER_END inspection/exit frame (default 2700)
|
||||
-- LOADER_OUT evidence directory (default dwt/loader/evidence)
|
||||
-- LOADER_SNAP 1 = write a PNG at LOADER_END (default 0)
|
||||
-- LOADER_VERBOSE 1 = print the result block every 25 frames
|
||||
|
||||
local function hex(v, w) return string.format("%0" .. (w or 8) .. "X", v) end
|
||||
|
||||
local machine = manager.machine
|
||||
local MARK = tonumber(os.getenv("SMOKE_MARK") or "0x01A00000")
|
||||
local ports = machine.ioport.ports
|
||||
local key_a = ports[":lk401:K26"].fields["A"]
|
||||
local tabx = ports[":tablet:TABLET_X"].fields["Tablet X"]
|
||||
local taby = ports[":tablet:TABLET_Y"].fields["Tablet Y"]
|
||||
local tabb = ports[":tablet:TABLET_BTN"].fields["P1 Button 1"]
|
||||
local cpu = machine.devices[':maincpu']
|
||||
local dbg = machine.debugger
|
||||
local prog = cpu.spaces['program']
|
||||
|
||||
if not dbg then
|
||||
print("LOADER: debugger not enabled; pass -debug")
|
||||
machine:exit()
|
||||
return
|
||||
end
|
||||
|
||||
local AT = tonumber(os.getenv("LOADER_AT") or "2500")
|
||||
local ENDF = tonumber(os.getenv("LOADER_END") or "2700")
|
||||
local BIN = os.getenv("LOADER_BIN") or "dwt/loader/build/loader.bin"
|
||||
local COFF = os.getenv("LOADER_COFF") or "dwt/loader/build/marker.coff"
|
||||
local BUF = tonumber(os.getenv("LOADER_BUF") or "0x01900000")
|
||||
local OUT = os.getenv("LOADER_OUT") or "dwt/loader/evidence"
|
||||
local SNAP = os.getenv("LOADER_SNAP") == "1"
|
||||
local MODE = tonumber(os.getenv("LOADER_MODE") or "0")
|
||||
local A8DESC = os.getenv("LOADER_A8_DESC") == "1"
|
||||
local VERBOSE = os.getenv("LOADER_VERBOSE") == "1"
|
||||
|
||||
local LOADER_BASE = 0x01880000
|
||||
local DESC = 0x01882C00
|
||||
local RESULT = 0x01882D00
|
||||
local RETURN_STUB = 0x01883100
|
||||
local RETURN_SP = 0x01883110
|
||||
|
||||
local function rd(p) return io.open(p, "rb") end
|
||||
local function slurp(p)
|
||||
local f, err = rd(p)
|
||||
if not f then error("cannot open " .. p .. ": " .. tostring(err)) end
|
||||
local s = f:read("*a")
|
||||
f:close()
|
||||
return s
|
||||
end
|
||||
|
||||
local function u16(s, o)
|
||||
return s:byte(o + 1) + s:byte(o + 2) * 256
|
||||
end
|
||||
|
||||
local function u32(s, o)
|
||||
return s:byte(o + 1) + s:byte(o + 2) * 256
|
||||
+ s:byte(o + 3) * 65536 + s:byte(o + 4) * 16777216
|
||||
end
|
||||
|
||||
local function parse_coff(d)
|
||||
local c = { data = d }
|
||||
c.magic = u16(d, 0)
|
||||
c.nscns = u16(d, 2)
|
||||
c.opthdr = u16(d, 16)
|
||||
c.sections = {}
|
||||
if c.opthdr > 0 then
|
||||
c.optmagic = u16(d, 20)
|
||||
c.entry = u32(d, 20 + 16)
|
||||
c.textstart = u32(d, 20 + 20)
|
||||
c.datastart = u32(d, 20 + 24)
|
||||
end
|
||||
local base = 20 + c.opthdr
|
||||
for i = 0, c.nscns - 1 do
|
||||
local o = base + i * 40
|
||||
local name = d:sub(o + 1, o + 8):gsub("%z", "")
|
||||
c.sections[#c.sections + 1] = {
|
||||
name = name,
|
||||
paddr = u32(d, o + 8),
|
||||
size = u32(d, o + 16), -- bits
|
||||
scnptr = u32(d, o + 20),
|
||||
flags = u32(d, o + 36),
|
||||
}
|
||||
end
|
||||
return c
|
||||
end
|
||||
|
||||
local function poke_bytes(bitaddr, data)
|
||||
local n = math.floor((#data + 1) / 2)
|
||||
for i = 0, n - 1 do
|
||||
local lo = data:byte(i * 2 + 1) or 0
|
||||
local hi = data:byte(i * 2 + 2) or 0
|
||||
prog:write_u16(bitaddr + i * 16, lo + hi * 256)
|
||||
end
|
||||
return n
|
||||
end
|
||||
|
||||
local function verify_bytes(bitaddr, data)
|
||||
local n = math.floor((#data + 1) / 2)
|
||||
local bad = 0
|
||||
for i = 0, n - 1 do
|
||||
local lo = data:byte(i * 2 + 1) or 0
|
||||
local hi = data:byte(i * 2 + 2) or 0
|
||||
if prog:read_u16(bitaddr + i * 16) ~= lo + hi * 256 then
|
||||
bad = bad + 1
|
||||
end
|
||||
end
|
||||
return n, bad
|
||||
end
|
||||
|
||||
local function w32(a, v) prog:write_u32(a, v) end
|
||||
local function r32(a)
|
||||
local ok, v = pcall(function() return prog:read_u32(a) end)
|
||||
if ok then return v end
|
||||
return 0xDEADBEEF
|
||||
end
|
||||
|
||||
local loader = slurp(BIN)
|
||||
local coff = slurp(COFF)
|
||||
local app = parse_coff(coff)
|
||||
|
||||
print(string.format("LOADER: payload %s (%d B) -> bit %s", BIN, #loader, hex(LOADER_BASE)))
|
||||
print(string.format("LOADER: COFF %s (%d B) -> bit %s", COFF, #coff, hex(BUF)))
|
||||
print(string.format("LOADER: file magic=%04X nscns=%d opthdr=%d optmagic=%s entry=%s textstart=%s",
|
||||
app.magic, app.nscns, app.opthdr,
|
||||
app.optmagic and string.format("%04X", app.optmagic) or "none",
|
||||
hex(app.entry or 0), hex(app.textstart or 0)))
|
||||
for _, s in ipairs(app.sections) do
|
||||
print(string.format("LOADER: sec %-8s paddr=%s size=%d bits (%d B) scnptr=%#x flags=%#x",
|
||||
s.name, hex(s.paddr), s.size, math.floor(s.size / 8), s.scnptr, s.flags))
|
||||
end
|
||||
|
||||
local TRACE = os.getenv("LOADER_TRACE") == "1"
|
||||
|
||||
local frames = 0
|
||||
local injected = false
|
||||
local done = false
|
||||
local last_count = -1
|
||||
|
||||
local function status_name(v)
|
||||
local t = {
|
||||
[0] = "OK",
|
||||
[1] = "bad descriptor",
|
||||
[2] = "truncated COFF / section headers",
|
||||
[3] = "bad COFF magic",
|
||||
[4] = "section size not whole words",
|
||||
[5] = "target outside RAM",
|
||||
[6] = "target overlaps loader page or COFF buffer",
|
||||
[7] = "relocation records present (unsupported)",
|
||||
[8] = "target not in a free-list block",
|
||||
[9] = "no entry point",
|
||||
}
|
||||
return t[v] or ("error " .. tostring(v))
|
||||
end
|
||||
|
||||
local function result_dump()
|
||||
local st = r32(RESULT + 0x000)
|
||||
print(string.format(
|
||||
"LOADER: result status=%d (%s) entry=%s text=%s/%d bits data=%s/%d bits bss=%s/%d bits relocs=%d pcb=%s nscns=%d len=%d",
|
||||
st, status_name(st), hex(r32(RESULT + 0x020)),
|
||||
hex(r32(RESULT + 0x040)), r32(RESULT + 0x060),
|
||||
hex(r32(RESULT + 0x080)), r32(RESULT + 0x0A0),
|
||||
hex(r32(RESULT + 0x0C0)), r32(RESULT + 0x0E0),
|
||||
r32(RESULT + 0x100), hex(r32(RESULT + 0x120)),
|
||||
r32(RESULT + 0x140), r32(RESULT + 0x160)))
|
||||
end
|
||||
|
||||
local function inject()
|
||||
-- 1. loader itself
|
||||
local n, bad = 0, 0
|
||||
poke_bytes(LOADER_BASE, loader)
|
||||
n, bad = verify_bytes(LOADER_BASE, loader)
|
||||
print(string.format("LOADER: loader poked %d words, readback %d bad at %s",
|
||||
n, bad, hex(LOADER_BASE)))
|
||||
|
||||
-- 2. COFF image
|
||||
poke_bytes(BUF, coff)
|
||||
n, bad = verify_bytes(BUF, coff)
|
||||
print(string.format("LOADER: COFF poked %d words, readback %d bad at %s",
|
||||
n, bad, hex(BUF)))
|
||||
|
||||
-- 3. pre-fill every .bss section with A5A5, so a loaded zero is meaningful
|
||||
for _, s in ipairs(app.sections) do
|
||||
if s.flags & 0x80 ~= 0 then
|
||||
for i = 0, math.floor(s.size / 16) - 1 do
|
||||
prog:write_u16(s.paddr + i * 16, 0xA5A5)
|
||||
end
|
||||
print(string.format("LOADER: pre-filled .bss %s..%s with A5A5",
|
||||
hex(s.paddr), hex(s.paddr + s.size)))
|
||||
end
|
||||
end
|
||||
|
||||
-- 4. descriptor: magic "LD" "R1", buf, len, mode=0 (spin)
|
||||
w32(DESC + 0x00, 0)
|
||||
prog:write_u16(DESC + 0x00, 0x4C44)
|
||||
prog:write_u16(DESC + 0x10, 0x5231)
|
||||
w32(DESC + 0x20, BUF)
|
||||
w32(DESC + 0x40, #coff)
|
||||
w32(DESC + 0x60, MODE)
|
||||
print(string.format("LOADER: descriptor @%s magic=%04X/%04X buf=%s len=%d mode=%d",
|
||||
hex(DESC), prog:read_u16(DESC + 0x00), prog:read_u16(DESC + 0x10),
|
||||
hex(r32(DESC + 0x20)), r32(DESC + 0x40), r32(DESC + 0x60)))
|
||||
|
||||
-- 5. return stub. mode 0 ignores it (the loader jumps to ORIG_PC
|
||||
-- itself); mode 1 returns here, and the stub resumes the interrupted
|
||||
-- PC so the caller yields and the scheduler can run the child.
|
||||
local orig_pc = cpu.state['PC'].value
|
||||
if MODE == 1 then
|
||||
prog:write_u16(RETURN_STUB, 0xC080) -- jauc <orig_pc>
|
||||
prog:write_u16(RETURN_STUB + 0x10, orig_pc & 0xFFFF)
|
||||
prog:write_u16(RETURN_STUB + 0x20, math.floor(orig_pc / 0x10000) & 0xFFFF)
|
||||
else
|
||||
prog:write_u16(RETURN_STUB, 0xC0FF) -- jruc self
|
||||
end
|
||||
|
||||
-- 6. enter the loader. A8=0 selects the fixed descriptor; SP points at
|
||||
-- the return slot so mode=1 would return to the spin stub.
|
||||
-- Leave SP alone for mode 0: the loader pushes onto the current
|
||||
-- process stack, then restores it and resumes at ORIG_PC. (mode 1
|
||||
-- would use the return stub.)
|
||||
w32(0x01882A20, orig_pc) -- LD_ORIG_PC
|
||||
print(string.format("LOADER: will resume at %s after create_process", hex(orig_pc)))
|
||||
cpu.state['A8'].value = A8DESC and DESC or 0
|
||||
if MODE == 1 then
|
||||
-- Simulate a CALLA from the current process: push the return
|
||||
-- address on the *firmware* stack (a real transport would do this).
|
||||
local sp = cpu.state['SP'].value - 0x20
|
||||
w32(sp, RETURN_STUB)
|
||||
cpu.state['SP'].value = sp
|
||||
end
|
||||
cpu.state['PC'].value = LOADER_BASE
|
||||
injected = true
|
||||
print(string.format("LOADER: frame %d: entered loader at %s (caller SP=%s)",
|
||||
frames, hex(LOADER_BASE), hex(cpu.state['SP'].value)))
|
||||
end
|
||||
|
||||
local function inspect()
|
||||
result_dump()
|
||||
|
||||
-- Verify the placement from RAM: .text/.data must equal the file bytes.
|
||||
for _, s in ipairs(app.sections) do
|
||||
if s.scnptr ~= 0 and s.size > 0 then
|
||||
local nb = math.floor(s.size / 8)
|
||||
local bytes = coff:sub(s.scnptr + 1, s.scnptr + nb)
|
||||
local _, bad = verify_bytes(s.paddr, bytes)
|
||||
print(string.format("LOADER: placed %s at %s: %d bytes, %d differing",
|
||||
s.name, hex(s.paddr), nb, bad))
|
||||
end
|
||||
end
|
||||
|
||||
local base = COFF:match("([^/]+)$") or COFF
|
||||
if base:find("marker") then
|
||||
print(string.format("LOADER: marker app: start=%s data=%s data2=%s bss=%s count=%d",
|
||||
hex(r32(0x018E0000)), hex(r32(0x018E0020)), hex(r32(0x018E0040)),
|
||||
hex(r32(0x018E0060)), r32(0x018E0080)))
|
||||
elseif base:find("xhello") then
|
||||
print(string.format("LOADER: xhello: stage=%d strlen=%d display=%s root=%s window=%s sync=%s",
|
||||
r32(0x01890140), r32(0x01890160), hex(r32(0x01890100)),
|
||||
hex(r32(0x01890110)), hex(r32(0x01890120)), hex(r32(0x01890130))))
|
||||
end
|
||||
if base:find("smoke") then
|
||||
print(string.format("SMOKE: magic=%08X dpy=%08X win=%08X n=%d type=%d keycode=%d lookup_n=%d ch=%02X ks=%04X keymark=%08X",
|
||||
r32(MARK + 0x00), r32(MARK + 0x20), r32(MARK + 0x40), r32(MARK + 0x60),
|
||||
r32(MARK + 0x80), r32(MARK + 0xA0), r32(MARK + 0xC0), r32(MARK + 0xE0),
|
||||
r32(MARK + 0x100), r32(MARK + 0x120)))
|
||||
end
|
||||
print(string.format("LOADER: PC at inspection = %s", hex(cpu.state['PC'].value)))
|
||||
end
|
||||
|
||||
emu.register_frame_done(function()
|
||||
frames = frames + 1
|
||||
if frames == 2900 then tabx:set_value(700); taby:set_value(500); print("SMOKE: tablet move") end
|
||||
if frames == 3000 then tabb:set_value(1); print("SMOKE: click down") end
|
||||
if frames == 3020 then tabb:set_value(0); print("SMOKE: click up") end
|
||||
if frames == 3100 then key_a:set_value(1); print("SMOKE: A down") end
|
||||
if frames == 3120 then key_a:set_value(0); print("SMOKE: A up") end
|
||||
if frames == AT and not injected then
|
||||
inject()
|
||||
if TRACE then dbg:command("trace /tmp/opencode/ld1.tr") end
|
||||
end
|
||||
if injected and TRACE and frames == AT + 1 then
|
||||
dbg:command("trace off")
|
||||
print("LOADER: trace written to /tmp/opencode/ld.tr")
|
||||
end
|
||||
if injected and not done then
|
||||
if TRACE and frames <= AT + 40 then
|
||||
print(string.format("LOADER: trace f=%d PC=%s SP=%s A14=%s status=%s entry=%s",
|
||||
frames, hex(cpu.state['PC'].value), hex(cpu.state['SP'].value),
|
||||
hex(cpu.state['A14'].value), hex(r32(RESULT + 0x000)),
|
||||
hex(r32(RESULT + 0x020))))
|
||||
end
|
||||
local st = r32(RESULT + 0x000)
|
||||
-- status 0 means OK; nonzero is final too once parsing has begun
|
||||
if st ~= 0xFFFFFFFF and not done then
|
||||
-- The loader writes 0 on success. A nonzero status is final
|
||||
-- only after it has been written once (it is 0 from power-on,
|
||||
-- so require the loader to have run: PC no longer at entry or
|
||||
-- the app counter moved).
|
||||
end
|
||||
if VERBOSE and frames % 25 == 0 then
|
||||
result_dump()
|
||||
end
|
||||
if base_contains_marker then
|
||||
local c = r32(0x018E0080)
|
||||
if c ~= last_count then
|
||||
if last_count ~= -1 then
|
||||
print(string.format("LOADER: marker counter %d -> %d (child running)",
|
||||
last_count, c))
|
||||
end
|
||||
last_count = c
|
||||
end
|
||||
end
|
||||
end
|
||||
if frames >= ENDF then
|
||||
if injected then
|
||||
done = true
|
||||
inspect()
|
||||
if SNAP then
|
||||
local screen = nil
|
||||
for _, s in pairs(machine.screens) do screen = s break end
|
||||
if screen then
|
||||
local out = OUT .. "/loader_frame" .. frames .. ".png"
|
||||
local ok, err = pcall(function() return screen:snapshot(out) end)
|
||||
print(string.format("LOADER: snapshot %s ok=%s %s",
|
||||
out, tostring(ok), tostring(err or "")))
|
||||
end
|
||||
end
|
||||
end
|
||||
machine:exit()
|
||||
end
|
||||
end, "vt1200-loader")
|
||||
|
||||
-- (Lua has no forward use of a name defined later; set a small flag here.)
|
||||
base_contains_marker = (COFF:match("([^/]+)$") or ""):find("marker") ~= nil
|
||||
|
||||
dbg.visible_cpu = cpu
|
||||
dbg.execution_state = 'run'
|
||||
Executable
+37
@@ -0,0 +1,37 @@
|
||||
#!/bin/sh
|
||||
# smoke.sh -- Task 1 acceptance. Builds the local Xlib smoke payload, loads it
|
||||
# into the emulated VT1200 RAM, clicks the window, presses A, and requires a
|
||||
# real KeyPress + XLookupString('a').
|
||||
set -eu
|
||||
|
||||
DIR=$(cd "$(dirname "$0")" && pwd)
|
||||
APP=$(cd "$DIR/.." && pwd)
|
||||
ROOT=$(cd "$APP/../.." && pwd)
|
||||
M=${MAME:-/home/arti/code/k-space/mame0289/vt1200}
|
||||
LOG="$APP/build/smoke.log"
|
||||
|
||||
mkdir -p "$APP/build"
|
||||
"$APP/build.sh" "$DIR/smoke.c" "$APP/src/vt1200/xgfix.c" >"$APP/build/smoke-build.log" 2>&1
|
||||
|
||||
MARK=$(awk '/_mark/ {print $1; exit}' "$APP/build/smoke.map")
|
||||
VT1200_SKIP_LEVEL1=1 SMOKE_MARK="0x$MARK" \
|
||||
LOADER_AT=2500 LOADER_END=3400 \
|
||||
LOADER_BIN="$ROOT/dwt/loader/build/loader.bin" \
|
||||
LOADER_COFF="$APP/build/smoke.coff" \
|
||||
LOADER_OUT="$APP/build" \
|
||||
"$M" vt1200 -rompath "$ROOT/harness/mame/roms" \
|
||||
-video none -sound none -nothrottle -skip_gameinfo \
|
||||
-debug -debugger none \
|
||||
-autoboot_script "$DIR/smoke.lua" -autoboot_delay 0 \
|
||||
>"$LOG" 2>&1 || true
|
||||
|
||||
grep 'SMOKE:' "$LOG" | tail -5
|
||||
grep -q 'SMOKE: .*type=2 .*keymark=4B455950' "$LOG" || {
|
||||
echo "smoke.sh: no real KeyPress (see $LOG)" >&2
|
||||
exit 1
|
||||
}
|
||||
grep -q 'SMOKE: .*lookup_n=1 ch=61 ks=0061' "$LOG" || {
|
||||
echo "smoke.sh: XLookupString did not return 'a' (see $LOG)" >&2
|
||||
exit 1
|
||||
}
|
||||
echo "smoke: PASS"
|
||||
Reference in new issue
Block a user