+++ /dev/null
-<?xml version="1.0" encoding="UTF-8"?>
-<projectDescription>
- <name>gaim-citadel</name>
- <comment></comment>
- <projects>
- </projects>
- <buildSpec>
- </buildSpec>
- <natures>
- </natures>
-</projectDescription>
+++ /dev/null
- GNU GENERAL PUBLIC LICENSE
- Version 3, 29 June 2007
-
- Copyright (C) 2007 Free Software Foundation, Inc. <http://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
+++ /dev/null
- CITADEL GAIM PLUGIN V0.3.1
- ==========================
-
- Copyright © 2006 David Given
-
-INTRODUCTION
-============
-
-Gaim-Citadel is a plugin for Gaim that allows you to connect to the Citadel
-groupware suite. It enables you to see who else is logged in to the Citadel
-server, and to communicate with them via instant messages (pages in Citadel
-terminology).
-
-Needless to say, you need Gaim to make this work. You also need access to
-a Citadel server to connect to.
-
-INSTALLATION
-============
-
-Gaim-Citadel depends on the following software:
-
- gaim: currently, Gaim-Citadel only works on Gaim 1.5. It may work on
- 2.0, but it has not been tested.
-
- lua 5.0: available from http://www.lua.org/download.html.
-
- tolua 5.0: available from http://www.tecgraf.puc-rio.br/~celes/tolua.
-
-Gaim-Citadel uses Prime Mover as its build tool. To build, do:
-
- ./pm
-
-This will compile Gaim-Citadel and install it into your ~/.gaim directory.
-The installation directory and other aspects of the build process are
-configurable by editing pmfile; the configuration variables are defined
-near the top and should be self-explanatory.
-
-USING GAIM-CITADEL
-==================
-
-Once installed, Gaim should see the plugin automatically. You can now tell
-Gaim about your Citadel account.
-
-There are three special settings (in the Extra Options section of the
-account preferences page):
-
- Use TLS
- Tells the plugin to use encryption when connecting to the Citadel
- server. Defaults to on. STRONGLY RECOMMENDED! If you don't have
- this set, your password will be sent in the clear across the
- internet.
-
- Everyone's a buddy
- Citadel is commonly used for fairly small groups of people, all
- of whom know each other. Setting this option causes everybody
- seen on the Citadel server to be automatically added to your
- buddy list.
-
- Polling interval
- The Citadel server protocol does not directly support
- asynchronous presence updates. This means that Gaim has to repeatedly
- poll the server to find out who's currently online. This setting
- lets you control how often this happens (in seconds). For LAN
- environments, 30 is probably appropriate. For servers across the
- internet, leave it at 60 (the default).
-
-SUPPORT
-=======
-
-Gaim-Citadel was written by me, David Given and is not officially endorsed by
-the authors of the Citadel groupware suite. However, the best place to get
-support is probably on the official Citadel Support forum. This can be found
-on the Uncensored Citadel BBS. You can sign up for free by visiting:
-
- http://uncensored.citadel.org
-
-My handle there is hjalfi. And yes, Gaim-Citadel works on Uncensored.
-
-LICENSE
-=======
-
-Gaim-Citadel is © 2006 by David Given and is distributed under a version 2 of
-the General Public License. You can find the full license text in the file
-'COPYING', supplied with this source package.
-
------------------------------------------------------------------------------
-David Given
-dg@cowlark.com
-2006-02-19
-
-/* $Id$ */
\ No newline at end of file
+++ /dev/null
--- Prime Mover C plugin.
--- © 2006 David Given.
---
--- This code is part of Prime Mover and is licensed under the MIT public
--- license.
-
--- pm includefile to compile *host* C programs.
-
--- Standard Lua boilerplate.
-
-local io_open = io.open
-local string_gsub = string.gsub
-local string_gfind = string.gfind
-local table_insert = table.insert
-local table_getn = table.getn
-local filetime = pm.filetime
-
--- Define some variables.
-
-CC = "gcc %CBUILDFLAGS% %CDYNINCLUDES% %CINCLUDES% %CEXTRAFLAGS% -c -o %out% %in%"
-CPROGRAM = "gcc %CBUILDFLAGS% %CLINKFLAGS% %CEXTRAFLAGS% -o %out% %in% %CLIBRARIES%"
-CDEPENDS = "gcc %CBUILDFLAGS% %CDYNINCLUDES% %CINCLUDES% %CEXTRAFLAGS% -MM -MG -MF %out% %in%"
-AR = "%RM% %out% && ar cr %out% %in%"
-
-CBUILDFLAGS = "-g -Os"
-CINCLUDES = {}
-CEXTRAFLAGS = ""
-CLINKFLAGS = ""
-CDYNINCLUDES = ""
-CLIBRARIES = ""
-
---- Manage C file dependencies ----------------------------------------------
-
-local dependency_cache = {}
-local function load_dependency_file(fn)
- local o = dependency_cache[fn]
- if o then
- return o
- end
-
- -- Read in the dependency file.
-
- local f = io_open(fn)
- if not f then
- print("failed to open "..fn)
- return nil
- end
- f = f:read("*a")
-
- -- Massage the dependency file into a string containing one unescaped
- -- filename per line.
-
- f = string_gsub(f, "^.*[^\\]: *", "")
- f = string_gsub(f, "\\\r?\n", "")
- f = string_gsub(f, "([^\\]) +", "%1\n")
- f = string_gsub(f, "\\", "")
-
- -- Parse the string.
-
- o = {}
- for l in string_gfind(f, "[^\n]+") do
- table_insert(o, l)
- end
-
- dependency_cache[fn] = o
- return o
-end
-
--- This clause specialises 'simple' to add support for smart dependencies of C
--- files.
-
-simple_with_clike_dependencies = simple {
- class = "simple_with_clike_dependencies",
- makedepends = {"%CDEPENDS%"},
-
- __init = function(self, p)
- simple.__init(self, p)
-
- -- If we're a class, don't verify.
-
- if ((type(p) == "table") and p.class) then
- return
- end
-
- -- If dynamicheaders is an object, turn it into a singleton list.
-
- if self.dynamicheaders then
- if (type(self.dynamicheaders) ~= "table") then
- self:__error("doesn't know what to do with dynamicheaders, which ",
- "should be a list or an object but was a ", type(self.dynamicheaders))
- end
- if self.dynamicheaders.class then
- self.dynamicheaders = {self.dynamicheaders}
- end
- end
- end,
-
- __dependencies = function(self, inputs, outputs)
- local obj = simple {
- CDYNINCLUDES = self.CDYNINCLUDES,
- command = self.makedepends,
- outputs = {"%U%-%I%.d"},
- unpack(inputs)
- }
- local o = obj:__build()
- local depends = load_dependency_file(o[1])
- if not depends then
- self:__error("could not determine the dependencies for ",
- pm.rendertable(inputs))
- end
- return depends
- end,
-
- __buildadditionalchildren = function(self)
- self.CDYNINCLUDES = ""
- if self.dynamicheaders then
- for _, i in ipairs(self.dynamicheaders) do
- local o = i:__build()
- if o[1] then
- self.CDYNINCLUDES = self.CDYNINCLUDES..' "-I'..string_gsub(o[1], "/[^/]*$", "")..'"'
- end
- end
- end
- end
-}
-
--- These are the publically useful clauses.
-
-cfile = simple_with_clike_dependencies {
- class = "cfile",
- command = {"%CC%"},
- outputs = {"%U%-%I%.o"},
-}
-
-cprogram = simple {
- class = "cprogram",
- command = {"%CPROGRAM%"},
- outputs = {"%U%-%I%"},
-}
-
-clibrary = simple {
- class = "clibrary",
- command = {
- "%AR%"
- },
- outputs = {"%U%-%I%.a"},
-}
+++ /dev/null
-/* citadel.c
- * Gaim Citadel plugin.
- *
- * © 2006 David Given.
- * This code is licensed under the GPL v3. See the file COPYING in this
- * directory for the full license text.
- *
- * $Id:citadel.c 4326 2006-02-18 12:26:22Z hjalfi $
- */
-
-#define GAIM_PLUGINS
-#include "internal.h"
-#include "accountopt.h"
-#include "blist.h"
-#include "conversation.h"
-#include "debug.h"
-#include "notify.h"
-#include "prpl.h"
-#include "plugin.h"
-#include "util.h"
-#include "version.h"
-#include "sslconn.h"
-
-#include "lua.h"
-#include "lualib.h"
-#include "lauxlib.h"
-
-#include "interface.h"
-
-extern int tolua_gaim_open(lua_State* L);
-extern void tolua_gaim_close(lua_State* L);
-
-#define VERSION "0.2"
-#define CITADEL_DEFAULT_SERVER "uncensored.citadel.org"
-#define CITADEL_DEFAULT_PORT 504
-#define CITADEL_POLL_INTERVAL 60
-#define LUA_MICROCODE "/plugindata/citadel.lua"
-
-struct citadel {
- GaimAccount* ga;
- GaimConnection* gc;
- GaimSslConnection* gsc;
- int fd;
- lua_State* L;
-};
-
-static GaimConnection* hackgc;
-
-/* ======================================================================= */
-/* LUA CALLIN */
-/* ======================================================================= */
-
-static void wrappedcall(lua_State* L, int inparams, int outparams)
-{
- int i;
-
- i = lua_pcall(L, inparams, outparams, 0);
- if (i)
- {
- gaim_debug(GAIM_DEBUG_MISC, "citadel", "lua error: %s\n",
- lua_tostring(L, -1));
- gaim_connection_error(hackgc, _("Internal error in plugin"));
- return;
- }
-
- lua_getglobal(L, "citadel_schedule_now");
- i = lua_pcall(L, 0, 0, 0);
- if (i)
- {
- gaim_debug(GAIM_DEBUG_MISC, "citadel", "lua error in scheduler: %s\n",
- lua_tostring(L, -1));
- gaim_connection_error(hackgc, _("Internal error in plugin"));
- return;
- }
-}
-
-/* ======================================================================= */
-/* LUA CALLOUT */
-/* ======================================================================= */
-
-/* --- Input ------------------------------------------------------------- */
-
-static void input_cb(gpointer data, gint fd, GaimInputCondition cond)
-{
- GaimConnection* gc = data;
- lua_State* L = gc->proto_data;
-
- lua_getglobal(L, "citadel_input");
- wrappedcall(L, 0, 0);
-}
-
-static void input_ssl_cb(gpointer data, GaimSslConnection* gsc, GaimInputCondition cond)
-{
- GaimConnection* gc = data;
- lua_State* L = gc->proto_data;
-
- lua_getglobal(L, "citadel_input");
- wrappedcall(L, 0, 0);
-}
-
-char* interface_readdata(int fd, GaimSslConnection* gsc)
-{
- static char buffer[1024];
- int len;
-
- /* Read in some data. */
-
- if (gsc)
- len = gaim_ssl_read(gsc, buffer, sizeof(buffer)-1);
- else
- len = read(fd, buffer, sizeof(buffer)-1);
-
- if (len <= 0)
- return NULL;
-
- buffer[len] = '\0';
- return buffer;
-}
-
-int interface_writedata(int fd, GaimSslConnection* gsc, char* buffer)
-{
- int len = strlen(buffer);
- char* p = buffer;
-
- while (len > 0)
- {
- int i;
-
- if (gsc)
- i = gaim_ssl_write(gsc, p, len);
- else
- i = write(fd, p, len);
-
- if (i < 0)
- return 1;
-
- p += i;
- len -= i;
- }
-
- return 0;
-}
-
-/* --- Connection -------------------------------------------------------- */
-
-static void login_cb(gpointer data, gint fd, GaimInputCondition cond)
-{
- GaimConnection* gc = data;
- lua_State* L = gc->proto_data;
-
- if (fd < 0)
- {
- gaim_connection_error(gc, _("Couldn't connect to host"));
- return;
- }
-
- if (!g_list_find(gaim_connections_get_all(), gc))
- {
- close(fd);
- return;
- }
-
- /* Register the input event handler. */
-
- gc->inpa = gaim_input_add(fd, GAIM_INPUT_READ, input_cb, gc);
-
- /* Register this file descriptor and tell Lua. */
-
- lua_getglobal(L, "citadel_setfd");
- lua_pushnumber(L, fd);
- wrappedcall(L, 1, 0);
-}
-
-int interface_connect(GaimAccount* ga, GaimConnection* gc,
- char* server, int port)
-{
- return gaim_proxy_connect(ga, server, port, login_cb, gc);
-}
-
-void interface_disconnect(int fd, GaimSslConnection* gsc)
-{
- if (gsc)
- gaim_ssl_close(gsc);
- else if (fd >= 0)
- close(fd);
-}
-
-/* --- TLS setup --------------------------------------------------------- */
-
-static void ssl_setup_cb(gpointer data, GaimSslConnection* gsc,
- GaimInputCondition cond)
-{
- GaimConnection* gc = data;
- lua_State* L = gc->proto_data;
-
- if (!g_list_find(gaim_connections_get_all(), gc))
- {
- gaim_ssl_close(gsc);
- return;
- }
-
- gaim_debug(GAIM_DEBUG_MISC, "citadel", "using gsc %p\n", gsc);
- gaim_ssl_input_add(gsc, input_ssl_cb, gc);
-
- /* Register this file descriptor and tell Lua. */
-
- lua_getglobal(L, "citadel_setgsc");
- {
- GaimSslConnection** o = lua_newuserdata(L, sizeof(GaimSslConnection));
- *o = gsc;
- }
- wrappedcall(L, 1, 0);
-}
-
-static void ssl_failure_cb(GaimSslConnection *gsc, GaimSslErrorType error,
- gpointer data)
-{
- GaimConnection* gc = data;
-
- switch(error)
- {
- case GAIM_SSL_CONNECT_FAILED:
- gaim_connection_error(gc, _("Connection Failed"));
- break;
-
- case GAIM_SSL_HANDSHAKE_FAILED:
- gaim_connection_error(gc, _("SSL Handshake Failed"));
- break;
- }
-}
-
-void interface_tlson(GaimConnection* gc, GaimAccount* ga, int fd)
-{
- gaim_input_remove(gc->inpa);
- gc->inpa = 0;
- gaim_ssl_connect_fd(ga, fd, ssl_setup_cb, ssl_failure_cb, gc);
-}
-
-/* --- Timer ------------------------------------------------------------- */
-
-static gboolean timer_cb(gpointer data)
-{
- struct lua_State* L = data;
-
- lua_getglobal(L, "citadel_timer");
- wrappedcall(L, 0, 0);
- return TRUE;
-}
-
-int interface_timeron(GaimConnection* gc, time_t interval)
-{
- return gaim_timeout_add(interval, timer_cb, gc->proto_data);
-}
-
-void interface_timeroff(GaimConnection* gc, int timerhandle)
-{
- gaim_timeout_remove(timerhandle);
-}
-
-/* ======================================================================= */
-/* CONNECT/DISCONNECT */
-/* ======================================================================= */
-
-static void citadel_login(GaimAccount *account)
-{
- GaimConnection* gc;
- lua_State* L;
- int i;
-
- /* Set up account settings. */
-
- hackgc = gc = gaim_account_get_connection(account);
- gc->flags |= GAIM_CONNECTION_NO_BGCOLOR
- | GAIM_CONNECTION_FORMATTING_WBFO
- | GAIM_CONNECTION_NO_FONTSIZE
- | GAIM_CONNECTION_NO_URLDESC
- | GAIM_CONNECTION_NO_IMAGES;
-
- /* Initialise our private data. */
-
- gc->proto_data = L = lua_open();
- luaopen_base(L);
- luaopen_table(L);
- luaopen_string(L);
- luaopen_math(L);
- luaopen_debug(L);
- luaopen_io(L);
- tolua_gaim_open(L);
-
- /* Register our private library. */
-
-// luaL_openlib(L, "gaimi", gaim_library, 0);
-
- /* Load in our 'microcode'. */
-
- {
- GString* microcode = g_string_new(gaim_user_dir());
- g_string_append(microcode, LUA_MICROCODE);
-
-
- gaim_debug(GAIM_DEBUG_MISC, "citadel", "loading %s\n", microcode->str);
- i = luaL_loadfile(L, microcode->str) ||
- lua_pcall(L, 0, 0, 0);
- g_string_free(microcode, TRUE);
-
- if (i)
- {
- gaim_debug(GAIM_DEBUG_MISC, "citadel", "lua error on load: %s\n",
- lua_tostring(L, -1));
- gaim_connection_error(gc, _("Unable to initialise plugin"));
- return;
- }
- }
-
- /* Set the reentrancy counter. */
-
- lua_pushnumber(L, 0);
- lua_setglobal(L, " entrycount");
-
- /* Tell the script to start connecting. */
-
- lua_getglobal(L, "citadel_connect");
- {
- GaimAccount** o = lua_newuserdata(L, sizeof(GaimAccount*));
- *o = account;
- }
- wrappedcall(L, 1, 0);
-}
-
-static void citadel_close(GaimConnection* gc)
-{
- lua_State* L = gc->proto_data;
-
- if (gc->inpa)
- {
- gaim_input_remove(gc->inpa);
- gc->inpa = 0;
- }
-
- if (L)
- {
- gaim_debug(GAIM_DEBUG_MISC, "citadel", "telling lua to disconnect\n");
- lua_getglobal(L, "citadel_close");
- wrappedcall(L, 0, 0);
- }
-
- gaim_debug(GAIM_DEBUG_MISC, "citadel", "destroying lua VM\n");
- lua_close(L);
-}
-
-/* ======================================================================= */
-/* MESSAGING */
-/* ======================================================================= */
-
-static int citadel_send_im(GaimConnection* gc, const char* who,
- const char* what, GaimConvImFlags flags)
-{
- lua_State* L = gc->proto_data;
-
- lua_getglobal(L, "citadel_send_im");
- lua_pushstring(L, who);
- lua_pushstring(L, what);
- lua_pushnumber(L, flags);
- wrappedcall(L, 3, 0);
-
- return 1;
-}
-
-/* ======================================================================= */
-/* PRESENCE */
-/* ======================================================================= */
-
-void citadel_add_buddy(GaimConnection* gc, GaimBuddy* buddy, GaimGroup* group)
-{
- lua_State* L = gc->proto_data;
-
- lua_getglobal(L, "citadel_add_buddy");
- lua_pushstring(L, buddy->name);
- wrappedcall(L, 1, 0);
-}
-
-void citadel_remove_buddy(GaimConnection* gc, GaimBuddy* buddy, GaimGroup* group)
-{
- lua_State* L = gc->proto_data;
-
- lua_getglobal(L, "citadel_remove_buddy");
- lua_pushstring(L, buddy->name);
- wrappedcall(L, 1, 0);
-}
-
-void citadel_alias_buddy(GaimConnection* gc, const char* who, const char* alias)
-{
- lua_State* L = gc->proto_data;
-
- lua_getglobal(L, "citadel_alias_buddy");
- lua_pushstring(L, who);
- wrappedcall(L, 1, 0);
-}
-
-void citadel_group_buddy(GaimConnection* gc, const char *who,
- const char *old_group, const char *new_group)
-{
- lua_State* L = gc->proto_data;
-
- lua_getglobal(L, "citadel_group_buddy");
- lua_pushstring(L, who);
- lua_pushstring(L, old_group);
- lua_pushstring(L, new_group);
- wrappedcall(L, 3, 0);
-}
-
-/* This is really just to fill out a hole in the gaim API. */
-
-const char* gaim_group_get_name(GaimGroup* group)
-{
- return group->name;
-}
-
-/* ======================================================================= */
-/* USER INFO */
-/* ======================================================================= */
-
-void citadel_get_info(GaimConnection* gc, const char* name)
-{
- lua_State* L = gc->proto_data;
-
- lua_getglobal(L, "citadel_get_info");
- lua_pushstring(L, name);
- wrappedcall(L, 1, 0);
-}
-
-/* ======================================================================= */
-/* MISCELLANEOUS */
-/* ======================================================================= */
-
-static void citadel_keepalive(GaimConnection* gc)
-{
- lua_State* L = gc->proto_data;
-
- lua_getglobal(L, "citadel_keepalive");
- wrappedcall(L, 0, 0);
-}
-
-static const char* citadel_list_icon(GaimAccount* a, GaimBuddy* b)
-{
- return "citadel";
-}
-
-static void citadel_list_emblems(GaimBuddy* b, char** se, char** sw,
- char** nw, char** ne)
-{
- if (b->present == GAIM_BUDDY_OFFLINE)
- *se = "offline";
-}
-
-/* ======================================================================= */
-/* PLUGIN SETUP */
-/* ======================================================================= */
-
-static GaimPluginProtocolInfo protocol =
-{
- OPT_PROTO_CHAT_TOPIC,
- NULL, /* user_splits */
- NULL, /* protocol_options */
- NO_BUDDY_ICONS, /* icon_spec */
- citadel_list_icon, /* list_icon */
- citadel_list_emblems, /* list_emblems */
- NULL, /* status_text */
- NULL, /* tooltip_text */
- NULL, //irc_away_states, /* away_states */
- NULL, /* blist_node_menu */
- NULL, //irc_chat_join_info, /* chat_info */
- NULL, //irc_chat_info_defaults, /* chat_info_defaults */
- citadel_login, /* login */
- citadel_close, /* close */
- citadel_send_im, /* send_im */
- NULL, /* set_info */
- NULL, /* send_typing */
- citadel_get_info, /* get_info */
- NULL, //irc_set_away, /* set_away */
- NULL, /* set_idle */
- NULL, /* change_passwd */
- citadel_add_buddy, /* add_buddy */
- NULL, /* add_buddies */
- citadel_remove_buddy, /* remove_buddy */
- NULL, /* remove_buddies */
- NULL, /* add_permit */
- NULL, /* add_deny */
- NULL, /* rem_permit */
- NULL, /* rem_deny */
- NULL, /* set_permit_deny */
- NULL, /* warn */
- NULL, //irc_chat_join, /* join_chat */
- NULL, /* reject_chat */
- NULL, //irc_get_chat_name, /* get_chat_name */
- NULL, //irc_chat_invite, /* chat_invite */
- NULL, //irc_chat_leave, /* chat_leave */
- NULL, /* chat_whisper */
- NULL, //irc_chat_send, /* chat_send */
- citadel_keepalive, /* keepalive */
- NULL, /* register_user */
- NULL, /* get_cb_info */
- NULL, /* get_cb_away */
- citadel_alias_buddy, /* alias_buddy */
- citadel_group_buddy, /* group_buddy */
- NULL, /* rename_group */
- NULL, /* buddy_free */
- NULL, /* convo_closed */
- gaim_normalize_nocase, /* normalize */
- NULL, /* set_buddy_icon */
- NULL, /* remove_group */
- NULL, /* get_cb_real_name */
- NULL, //irc_chat_set_topic, /* set_chat_topic */
- NULL, /* find_blist_chat */
- NULL, //irc_roomlist_get_list, /* roomlist_get_list */
- NULL, //irc_roomlist_cancel, /* roomlist_cancel */
- NULL, /* roomlist_expand_category */
- NULL, /* can_receive_file */
- NULL, //irc_dccsend_send_file /* send_file */
-};
-
-static GaimPluginInfo info =
-{
- GAIM_PLUGIN_MAGIC,
- GAIM_MAJOR_VERSION,
- GAIM_MINOR_VERSION,
- GAIM_PLUGIN_PROTOCOL, /**< type */
- NULL, /**< ui_requirement */
- 0, /**< flags */
- NULL, /**< dependencies */
- GAIM_PRIORITY_DEFAULT, /**< priority */
-
- "prpl-citadel", /**< id */
- "Citadel", /**< name */
- VERSION, /**< version */
- N_("Citadel Protocol Plugin"), /** summary */
- N_("Instant Messaging via Citadel"), /** description */
- NULL, /**< author */
- GAIM_WEBSITE, /**< homepage */
-
- NULL, /**< load */
- NULL, /**< unload */
- NULL, /**< destroy */
-
- NULL, /**< ui_info */
- &protocol, /**< extra_info */
- NULL, /**< prefs_info */
- NULL
-};
-
-static void _init_plugin(GaimPlugin *plugin)
-{
- GaimAccountUserSplit *split;
- GaimAccountOption *option;
-
- split = gaim_account_user_split_new(_("Server"), CITADEL_DEFAULT_SERVER, '@');
- protocol.user_splits = g_list_append(protocol.user_splits, split);
-
- option = gaim_account_option_int_new(_("Port"), "port", CITADEL_DEFAULT_PORT);
- protocol.protocol_options = g_list_append(protocol.protocol_options, option);
-
- option = gaim_account_option_bool_new(_("Everyone here's a buddy"), "no_blist", FALSE);
- protocol.protocol_options = g_list_append(protocol.protocol_options, option);
-
- option = gaim_account_option_bool_new(_("Use TLS"), "use_tls", TRUE);
- protocol.protocol_options = g_list_append(protocol.protocol_options, option);
-
- option = gaim_account_option_int_new(_("Polling interval"), "interval", CITADEL_POLL_INTERVAL);
- protocol.protocol_options = g_list_append(protocol.protocol_options, option);
-
- gaim_prefs_add_none("/plugins/prpl/citadel");
-}
-
-GAIM_INIT_PLUGIN(citadel, _init_plugin, info);
+++ /dev/null
--- citadel.lua
--- Gaim Citadel plugin.
---
--- © 2006 David Given.
--- This code is licensed under the GPL v3. See the file COPYING in this
--- directory for the full license text.
---
--- $Id:citadel.lua 4326 2006-02-18 12:26:22Z hjalfi $
-
------------------------------------------------------------------------------
--- GLOBALS --
------------------------------------------------------------------------------
-
-local _
-local username, servername, port
-local serverfriendlyname
-local ga, gc
-local fd, gsc
-local timerhandle
-local noblist
-local buddies = {}
-
------------------------------------------------------------------------------
--- CONSTANTS --
------------------------------------------------------------------------------
-
--- Our version number. Remember to update!
-
-local VERSION_NUMBER = "0.3.1"
-
--- Special values returned as Citadel's response codes.
-
-local LISTING_FOLLOWS = 100
-local CIT_OK = 200
-local MORE_DATA = 300
-local SEND_LISTING = 400
-local ERROR = 500
-local BINARY_FOLLOWS = 600
-local SEND_BINARY = 700
-local START_CHAT_MODE = 800
-
-local INTERNAL_ERROR = 10
-local TOO_BIG = 11
-local ILLEGAL_VALUE = 12
-local NOT_LOGGED_IN = 20
-local CMD_NOT_SUPPORTED = 30
-local PASSWORD_REQUIRED = 40
-local ALREADY_LOGGED_IN = 41
-local USERNAME_REQUIRED = 42
-local HIGHER_ACCESS_REQUIRED = 50
-local MAX_SESSIONS_EXCEEDED = 51
-local RESOURCE_BUSY = 52
-local RESOURCE_NOT_OPEN = 53
-local NOT_HERE = 60
-local INVALID_FLOOR_OPERATION = 61
-local NO_SUCH_USER = 70
-local FILE_NOT_FOUND = 71
-local ROOM_NOT_FOUND = 72
-local NO_SUCH_SYSTEM = 73
-local ALREADY_EXISTS = 74
-local MESSAGE_NOT_FOUND = 75
-
-local ASYNC_MSG = 900
-local ASYNC_GEXP = 02
-
--- Other Citadel settings.
-
-local CITADEL_DEFAULT_PORT = 504
-local CITADEL_CONFIG_ROOM = "My Citadel Config"
-local WAITING_ROOM = "Sent/Received Pages"
-local CITADEL_BUDDY_MSG = "__ Buddy List __"
-local CITADEL_POLL_INTERVAL = 60
-
------------------------------------------------------------------------------
--- UTILITIES --
------------------------------------------------------------------------------
-
---local stderr = io.stderr
-
-local function log(...)
- local s = {}
- for _, i in ipairs(arg) do
- table.insert(s, tostring(i))
- end
- s = table.concat(s)
- gaim_debug_info("citadel", string.gsub(s, "%%", "%%").."\n")
-end
-
-local function unexpectederror()
- error("The Citadel server said something unexpected. Giving up.")
-end
-
-local function warning(...)
- local s = {}
- for _, i in ipairs(arg) do
- table.insert(s, tostring(i))
- end
- gaim_connection_notice(gc, s)
-end
-
-local olderror = error
-error = function(e)
- log("error: ", e)
- log("traceback: ", debug.traceback())
- olderror(e)
-end
-
------------------------------------------------------------------------------
--- SCHEDULER --
------------------------------------------------------------------------------
-
-local taskqueue = {}
-local idle
-local inscheduler = false
-
-local yield = coroutine.yield
-
-local function schedule_now()
- if not inscheduler then
- inscheduler = true
-
- while taskqueue[1] do
- -- Pull the first task off the queue, creating it if necessary.
-
- local task = taskqueue[1]
- if (type(task) == "function") then
- task = coroutine.create(task)
- taskqueue[1] = task
- end
-
- -- Run it.
-
- local s, e = coroutine.resume(task)
- if not s then
- log("error: ", e)
- log("traceback: ", debug.traceback())
- gaim_connection_error(gc, e)
- end
-
- -- If it's not dead, then it must have yielded --- return back to C.
-
- if (coroutine.status(task) ~= "dead") then
- break
- end
-
- -- Otherwise, remove it from the queue and go again.
-
- table.remove(taskqueue, 1)
- end
-
- inscheduler = false
- end
-end
-
-local function queue(func)
- table.insert(taskqueue, func)
---[[
- table.insert(taskqueue, function()
- local i, e = pcall(func)
- if not i then
- log("coroutine died with error! ", e)
- gaim_connection_error(gc, e)
- end
- end)
---]]
-end
-
-local queued = {}
-local function lazyqueue(func)
- if not queued[func] then
- queued[func] = true
- queue(
- function()
- queued[func] = nil
- func()
- end)
- end
-end
-
------------------------------------------------------------------------------
--- INPUT MANGLING --
------------------------------------------------------------------------------
-
-local inputbuffer = ""
-
--- Read a single line of text from the server, maing Lua's coroutines do the
--- vast bulk of the work of managing Gaim's state machine for us. Woo!
-
-local function readline()
- -- Always yield at least once. Otherwise, Lua hogs all the CPU time.
-
- yield()
-
- while true do
- if fd then
- -- Read some data from the remote server, if any's
- -- available.
-
- local i = interface_readdata(fd, gsc)
- if not i then
- error("Unexpected disconnection from Citadel server")
- end
-
- inputbuffer = inputbuffer..i
-
- -- Have we read a complete line of text?
-
- local s, e, l = string.find(inputbuffer, "^([^\n]*)\n")
- if l then
- -- If so, return it.
-
- inputbuffer = string.sub(inputbuffer, e+1)
- return l
- end
- end
-
- -- Otherwise, wait some more.
-
- yield()
- end
-end
-
-local function unpack_citadel_data_line(s, a)
- a = a or {}
- for i in string.gfind(s, "([^|]*)|?") do
- table.insert(a, i)
- end
- return a
-end
-
--- Read in an parse a packet from the Citadel server.
-
-local function get_response()
- local message = {}
-
- -- The first line of a message is of the format:
- -- 123 String|String|String
- --
- -- The 123 is a response code.
-
- local s = readline()
- message.response = tonumber(string.sub(s, 1, 3))
-
- s = string.sub(s, 5)
- unpack_citadel_data_line(s, message)
-
- -- If the response code is LISTING_FOLLOWS, then there's more data
- -- coming.
-
- if (message.response == LISTING_FOLLOWS) then
- message.xargs = {}
-
- while true do
- s = readline()
- if (s == "000") then
- break
- end
- --log("Got xarg: ", s)
- table.insert(message.xargs, s)
- end
- end
-
- -- If the response code is BINARY_FOLLOWS, there's a big binary chunk
- -- coming --- which we don't support.
-
- if (message.response == BINARY_FOLLOWS) then
- error("Server sent a binary chunk, which we don't support yet")
- end
-
- return message
-end
-
------------------------------------------------------------------------------
--- OUTPUT MANGLING --
------------------------------------------------------------------------------
-
-local function writeline(...)
- local s = table.concat(arg)
-
- log("send: ", s)
- interface_writedata(fd, gsc, s)
- interface_writedata(fd, gsc, "\n")
-end
-
------------------------------------------------------------------------------
--- PRESENCE MANAGEMENT --
------------------------------------------------------------------------------
-
-local function cant_save_buddy_list()
- warning("Unable to send buddy list to server.")
-end
-
-local function save_buddy_list()
- writeline("GOTO "..CITADEL_CONFIG_ROOM.."||1")
- local m = get_response()
- if (m.response ~= CIT_OK) then
- cant_save_buddy_list()
- return
- end
-
- -- Search and destroy any old buddy list.
-
- writeline("MSGS ALL|0|1")
- m = get_response()
- if (m.response ~= START_CHAT_MODE) then
- cant_save_buddy_list()
- return
- end
-
- writeline("subj|"..CITADEL_BUDDY_MSG)
- writeline("000")
- m = nil
- while true do
- local s = readline()
- if (s == "000") then
- break
- end
- if (not m) and (s ~= "000") then
- m = s
- end
- end
-
- if m then
- writeline("DELE "..m)
- m = get_response()
- if (m.response ~= CIT_OK) then
- cant_save_buddy_list()
- return
- end
- end
-
- -- Save our buddy list.
-
- writeline("ENT0 1||0|1|"..CITADEL_BUDDY_MSG.."|")
- m = get_response()
- if (m.response ~= SEND_LISTING) then
- cant_save_buddy_list()
- return
- end
-
- for name, _ in pairs(buddies) do
- local b = gaim_find_buddy(ga, name)
- if b then
- local alias = gaim_buddy_get_alias(b) or ""
- local group = gaim_find_buddys_group(b)
- local groupname = gaim_group_get_name(group)
- writeline(name.."|"..alias.."|"..groupname)
- end
- end
- writeline("000")
-
- -- Go back to the lobby.
-
- writeline("GOTO "..WAITING_ROOM)
- get_response()
-end
-
-local function update_buddy_status()
- writeline("RWHO")
- local m = get_response()
- if (m.response ~= LISTING_FOLLOWS) then
- return
- end
- log("attempting to scan and update buddies")
-
- local onlinebuddies = {}
- for _, s in ipairs(m.xargs) do
- local name = unpack_citadel_data_line(s)[2]
- if (name ~= "(not logged in)") then
- onlinebuddies[name] = true
- end
- end
-
- -- Anyone who's not online is offline.
-
- for s, _ in pairs(buddies) do
- if not onlinebuddies[s] then
- serv_got_update(gc, s, false, 0, 0, 0, 0)
- end
- end
-
- -- Anyone who's online is, er, online.
-
- for s, _ in pairs(onlinebuddies) do
- -- If we're in no-buddy-list mode and this buddy isn't on our
- -- list, add them automatically.
-
- if noblist then
- if not gaim_find_buddy(ga, s) then
- log("trying to add new buddy ", s)
- local buddy = gaim_buddy_new(ga, s, s)
- if buddy then
- -- buddy is not garbage collected! This must succeed!
- local group = gaim_find_group(serverfriendlyname)
- if not group then
- group = gaim_group_new(serverfriendlyname)
- gaim_blist_add_group(group, nil)
- end
-
- gaim_blist_add_buddy(buddy, nil, group, nil)
- else
- warning("Unable to add "..s.." to your buddy list. This error should never happen.")
- break
- end
- end
- end
-
- serv_got_update(gc, s, true, 0, 0, 0, 0)
- end
-end
-
------------------------------------------------------------------------------
--- ENTRYPOINTS --
------------------------------------------------------------------------------
-
-function citadel_schedule_now()
- schedule_now()
-end
-
-function citadel_input()
- -- If there's no task, create one to handle this input.
-
- if not taskqueue[1] then
- queue(idle)
- end
-end
-
-function citadel_setfd(_fd)
- fd = _fd
- log("fd = ", tonumber(fd))
-end
-
-function citadel_setgsc(_gsc)
- gsc = tolua.cast(_gsc, "GaimSslConnection")
- log("gsc registered")
-end
-
-function citadel_connect(_ga)
- ga = tolua.cast(_ga, "GaimAccount")
- gc = gaim_account_get_connection(ga)
-
- queue(function()
- local STEPS = 14
-
- username = gaim_account_get_username(ga)
- _, _, username, servername = string.find(username, "^(.*)@(.*)$")
- serverfriendlyname = servername
- port = gaim_account_get_int(ga, "port", CITADEL_DEFAULT_PORT)
- noblist = gaim_account_get_bool(ga, "no_blist", false)
-
- log("connect to ", username, " on server ", servername, " port ", port)
-
- -- Make connection.
-
- gaim_connection_update_progress(gc, "Connecting", 1, STEPS)
- local i = interface_connect(ga, gc, servername, port)
- if (i ~= 0) then
- error("Unable to create socket")
- end
-
- local m = get_response()
- if (m.response ~= CIT_OK) then
- error("Unexpected response from server")
- end
-
- -- Switch to TLS mode, if desired.
-
- if gaim_account_get_bool(ga, "use_tls", true) then
- gaim_connection_update_progress(gc, "Requesting TLS", 2, STEPS)
- writeline("STLS")
- m = get_response()
- if (m.response ~= 200) then
- error("This Citadel server does not support TLS.")
- end
-
- -- This will always work. If the handshake fails, Lua will be
- -- shot and we don't need to worry about cleaning up.
-
- gaim_connection_update_progress(gc, "TLS handshake", 3, STEPS)
- interface_tlson(gc, ga, fd)
-
- -- Wait for the gsc to be hooked up.
-
- while not gsc do
- yield()
- end
- end
-
- -- Send username.
-
- gaim_connection_update_progress(gc, "Sending username", 4, STEPS)
- writeline("USER "..username)
- m = get_response()
- if (m.response == (ERROR+NO_SUCH_USER)) then
- error("There is no user with name '", username, "' on this server.")
- end
- if (m.response ~= MORE_DATA) then
- unexpectederror()
- end
-
- -- Send password.
-
- gaim_connection_update_progress(gc, "Sending password", 5, STEPS)
- writeline("PASS "..gaim_account_get_password(ga))
- m = get_response()
- if (m.response ~= CIT_OK) then
- error("Incorrect password.")
- end
-
- -- Tell Citadel who we are.
-
- gaim_connection_update_progress(gc, "Setting up", 6, STEPS)
- writeline("IDEN 226|0|"..VERSION_NUMBER.."|Gaim Citadel plugin|")
- m = get_response()
-
- -- Get information about the Citadel server.
-
- gaim_connection_update_progress(gc, "Setting up", 7, STEPS)
- writeline("INFO")
- m = get_response()
- serverfriendlyname = m.xargs[3]
-
- -- Set asynchronous mode.
-
- gaim_connection_update_progress(gc, "Setting up", 8, STEPS)
- writeline("ASYN 1")
- m = get_response()
- if (m.response ~= CIT_OK) then
- error("This Citadel server does not support instant messaging.")
- end
-
- (function()
- -- Switch to private configuration room.
-
- gaim_connection_update_progress(gc, "Setting up", 9, STEPS)
- writeline("GOTO "..CITADEL_CONFIG_ROOM.."||1")
- m = get_response()
- if (m.response ~= CIT_OK) then
- warning("Unable to fetch buddy list from server.")
- return
- end
-
- -- Look for our preferences.
-
- gaim_connection_update_progress(gc, "Setting up", 10, STEPS)
- writeline("MSGS ALL|0|1")
- m = get_response()
- if (m.response ~= START_CHAT_MODE) then
- warning("Unable to fetch buddy list from server.")
- return
- end
-
- writeline("subj|"..CITADEL_BUDDY_MSG)
- writeline("000")
- m = nil
- while true do
- local s = readline()
- if (s == "000") then
- break
- end
- if (not m) and (s ~= "000") then
- m = s
- end
- end
-
- log("preference message in #", m)
- if not m then
- return
- end
-
- gaim_connection_update_progress(gc, "Setting up", 11, STEPS)
- writeline("MSG0 "..m)
- while true do
- local s = readline()
- if (s == "000") then
- return
- end
- if (s == "text") then
- break
- end
- end
- while true do
- local s = readline()
- if (s == "000") then
- break
- end
-
- local name, alias, groupname = unpack(unpack_citadel_data_line(s))
- if not gaim_find_buddy(ga, name) then
- local buddy = gaim_buddy_new(ga, name, alias)
- local group = gaim_group_new(groupname)
- log("adding new buddy ", name)
- if buddy then
- -- buddy is not garbage collected! This must succeed!
- gaim_blist_add_buddy(buddy, nil, group, nil)
- end
- end
- end
- end)()
-
- -- Update buddy list with who's online.
-
- gaim_connection_update_progress(gc, "Setting up", 12, STEPS)
- update_buddy_status()
-
- -- Go back to the Lobby.
-
- gaim_connection_update_progress(gc, "Setting up", 13, STEPS)
- writeline("GOTO "..WAITING_ROOM)
- get_response()
-
- -- Switch on the timer.
-
- timerhandle = interface_timeron(gc,
- gaim_account_get_int(ga, "interval", CITADEL_POLL_INTERVAL)*1000)
-
- -- Done!
-
- gaim_connection_update_progress(gc, "Connected", 14, STEPS)
- gaim_connection_set_state(gc, GAIM_CONNECTED)
- end)
-end
-
-function citadel_close()
- interface_disconnect(fd or -1, gsc)
- if timerhandle then
- interface_timeroff(gc, timerhandle)
- end
- schedule_now = function() end
-end
-
-function citadel_send_im(who, what, flags)
- queue(function()
- writeline("SEXP ", who, "|-")
- local m = get_response()
- if (m.response ~= SEND_LISTING) then
- serv_got_im(gc, "Citadel", "Unable to send message", GAIM_MESSAGE_ERROR, 0);
- return
- end
- writeline(what)
- writeline("000")
- end)
-end
-
-function citadel_fetch_pending_messages()
- queue(function()
- while true do
- writeline("GEXP")
- local m = get_response()
- if (m.response ~= LISTING_FOLLOWS) then
- break
- end
-
- local s = table.concat(m.xargs)
- --log("got message from ", m[4], " at ", m[2], ": ", s)
- serv_got_im(gc, m[4], s, GAIM_MESSAGE_RECV, m[2])
- end
- end)
-end
-
-function citadel_get_info(name)
- queue(function()
- writeline("RBIO "..name)
- local m = get_response()
- if (m.response ~= LISTING_FOLLOWS) then
- m = "That user has been boojumed."
- else
- m = table.concat(m.xargs, "<br>")
- end
-
- gaim_notify_userinfo(gc, name, name.."'s biography",
- name, "Biography", m, nil, nil)
- end)
-end
-
------------------------------------------------------------------------------
--- BUDDY LIST --
------------------------------------------------------------------------------
-
-function citadel_add_buddy(name)
- if not buddies[name] then
- buddies[name] = true
- lazyqueue(update_buddy_status)
- lazyqueue(save_buddy_list)
- end
-end
-
-function citadel_remove_buddy(name)
- if buddies[name] then
- buddies[name] = nil
- lazyqueue(save_buddy_list)
- end
-end
-
-function citadel_alias_buddy(name)
- if buddies[name] then
- lazyqueue(save_buddy_list)
- end
-end
-
-function citadel_group_buddy(name, oldgroup, newgroup)
- if buddies[name] then
- lazyqueue(save_buddy_list)
- end
-end
-
-function citadel_timer()
- log("tick!")
- lazyqueue(update_buddy_status)
-end
-
------------------------------------------------------------------------------
--- IDLE --
------------------------------------------------------------------------------
-
-idle = function()
- queue(function()
- local m = get_response()
- if (m.response == (ASYNC_MSG+ASYNC_GEXP)) then
- citadel_fetch_pending_messages()
- end
- end)
-end
+++ /dev/null
-/* gaim.pkg
- * Gaim Citadel plugin.
- *
- * © 2006 David Given.
- * This code is licensed under the GPL v3. See the file COPYING in this
- * directory for the full license text.
- *
- * $Id:gaim.pkg 4326 2006-02-18 12:26:22Z hjalfi $
- */
-
-typedef unsigned int size_t;
-typedef bool gboolean;
-typedef long time_t;
-typedef void* GCallback;
-
-$typedef int bool;
-$#include "connection.h"
-$#include "sslconn.h"
-$#include "account.h"
-$#include "conversation.h"
-$#include "server.h"
-$#include "notify.h"
-$#include "util.h"
-$#include "debug.h"
-
-$#include "interface.h"
-
-/* Private entrypoints */
-
-char* interface_readdata(int fd, GaimSslConnection* gsc);
-int interface_writedata(int fd, GaimSslConnection* gsc, char* data);
-int interface_connect(GaimAccount* ga, GaimConnection* gc, char* server, int port);
-void interface_disconnect(int fd, GaimSslConnection* gsc);
-void interface_tlson(GaimConnection* gc, GaimAccount* ga, int fd);
-int interface_timeron(GaimConnection* gc, time_t timeout);
-void interface_timeroff(GaimConnection* gc, int handle);
-
-/* --- connection.h ------------------------------------------------------ */
-
-typedef enum
-{
- GAIM_CONNECTION_HTML = 0x0001, /**< Connection sends/receives in 'HTML'. */
- GAIM_CONNECTION_NO_BGCOLOR = 0x0002, /**< Connection does not send/receive
- background colors. */
- GAIM_CONNECTION_AUTO_RESP = 0x0004, /**< Send auto responses when away. */
- GAIM_CONNECTION_FORMATTING_WBFO = 0x0008, /**< The text buffer must be formatted as a whole */
- GAIM_CONNECTION_NO_NEWLINES = 0x0010, /**< No new lines are allowed in outgoing messages */
- GAIM_CONNECTION_NO_FONTSIZE = 0x0020, /**< Connection does not send/receive font sizes */
- GAIM_CONNECTION_NO_URLDESC = 0x0040, /**< Connection does not support descriptions with links */
- GAIM_CONNECTION_NO_IMAGES = 0x0080 /**< Connection does not support sending of images */
-} GaimConnectionFlags;
-
-typedef enum
-{
- GAIM_DISCONNECTED = 0, /**< Disconnected. */
- GAIM_CONNECTED, /**< Connected. */
- GAIM_CONNECTING /**< Connecting. */
-
-} GaimConnectionState;
-
-void gaim_connection_set_state(GaimConnection *gc, GaimConnectionState state);
-void gaim_connection_set_account(GaimConnection *gc, GaimAccount *account);
-void gaim_connection_set_display_name(GaimConnection *gc, char *name);
-GaimConnectionState gaim_connection_get_state(GaimConnection *gc);
-GaimAccount *gaim_connection_get_account(GaimConnection *gc);
-char *gaim_connection_get_display_name(GaimConnection *gc);
-void gaim_connection_update_progress(GaimConnection *gc, char *text,
- size_t step, size_t count);
-void gaim_connection_notice(GaimConnection *gc, char *text);
-void gaim_connection_error(GaimConnection *gc, char *reason);
-
-/* --- account.h --------------------------------------------------------- */
-
-void gaim_account_request_change_password(GaimAccount *account);
-void gaim_account_request_change_user_info(GaimAccount *account);
-void gaim_account_set_username(GaimAccount *account, char *username);
-void gaim_account_set_password(GaimAccount *account, char *password);
-void gaim_account_set_alias(GaimAccount *account, char *alias);
-void gaim_account_set_user_info(GaimAccount *account, char *user_info);
-void gaim_account_set_buddy_icon(GaimAccount *account, char *icon);
-void gaim_account_set_protocol_id(GaimAccount *account,
- char *protocol_id);
-void gaim_account_set_remember_password(GaimAccount *account, gboolean value);
-void gaim_account_set_check_mail(GaimAccount *account, gboolean value);
-void gaim_account_set_auto_login(GaimAccount *account, char *ui,
- gboolean value);
-void gaim_account_set_proxy_info(GaimAccount *account, GaimProxyInfo *info);
-void gaim_account_clear_settings(GaimAccount *account);
-void gaim_account_set_int(GaimAccount *account, char *name, int value);
-void gaim_account_set_string(GaimAccount *account, char *name,
- char *value);
-void gaim_account_set_bool(GaimAccount *account, char *name,
- gboolean value);
-void gaim_account_set_ui_int(GaimAccount *account, char *ui,
- char *name, int value);
-void gaim_account_set_ui_string(GaimAccount *account, char *ui,
- char *name, char *value);
-void gaim_account_set_ui_bool(GaimAccount *account, char *ui,
- char *name, gboolean value);
-gboolean gaim_account_is_connected(GaimAccount *account);
-char *gaim_account_get_username(GaimAccount *account);
-char *gaim_account_get_password(GaimAccount *account);
-char *gaim_account_get_alias(GaimAccount *account);
-char *gaim_account_get_user_info(GaimAccount *account);
-char *gaim_account_get_buddy_icon(GaimAccount *account);
-char *gaim_account_get_protocol_id(GaimAccount *account);
-char *gaim_account_get_protocol_name(GaimAccount *account);
-GaimConnection *gaim_account_get_connection(GaimAccount *account);
-gboolean gaim_account_get_remember_password(GaimAccount *account);
-gboolean gaim_account_get_check_mail(GaimAccount *account);
-gboolean gaim_account_get_auto_login(GaimAccount *account, char *ui);
-int gaim_account_get_int(GaimAccount *account, char *name, int default_value);
-char *gaim_account_get_string(GaimAccount *account, char *name, char *default_value);
-gboolean gaim_account_get_bool(GaimAccount *account, char *name, gboolean default_value);
-int gaim_account_get_ui_int(GaimAccount *account, char *ui, char *name, int default_value);
-char *gaim_account_get_ui_string(GaimAccount *account, char *ui, char *name, char *default_value);
-gboolean gaim_account_get_ui_bool(GaimAccount *account, char *ui, char *name, gboolean default_value);
-
-/* --- server.h ---------------------------------------------------------- */
-
-void serv_login(GaimAccount *);
-void serv_close(GaimConnection *);
-void serv_touch_idle(GaimConnection *);
-int serv_send_im(GaimConnection *, const char *, const char *, GaimConvImFlags);
-void serv_get_info(GaimConnection *, const char *);
-void serv_set_idle(GaimConnection *, int);
-void serv_set_info(GaimConnection *, const char *);
-void serv_set_away(GaimConnection *, const char *, const char *);
-void serv_set_away_all(const char *);
-int serv_send_typing(GaimConnection *, const char *, int);
-void serv_change_passwd(GaimConnection *, const char *, const char *);
-void serv_add_buddy(GaimConnection *, GaimBuddy *);
-void serv_add_buddies(GaimConnection *, GList *);
-void serv_remove_buddy(GaimConnection *, GaimBuddy *, GaimGroup *);
-void serv_remove_buddies(GaimConnection *, GList *, GList *);
-void serv_remove_group(GaimConnection *, GaimGroup *);
-void serv_move_buddy(GaimBuddy *, GaimGroup *, GaimGroup *);
-void serv_rename_group(GaimConnection *, const char *, GaimGroup *, GList *);
-void serv_add_permit(GaimConnection *, const char *);
-void serv_add_deny(GaimConnection *, const char *);
-void serv_rem_permit(GaimConnection *, const char *);
-void serv_rem_deny(GaimConnection *, const char *);
-void serv_set_permit_deny(GaimConnection *);
-void serv_warn(GaimConnection *, const char *, gboolean);
-void serv_join_chat(GaimConnection *, GHashTable *);
-void serv_reject_chat(GaimConnection *, GHashTable *);
-void serv_chat_invite(GaimConnection *, int, const char *, const char *);
-void serv_chat_leave(GaimConnection *, int);
-void serv_chat_whisper(GaimConnection *, int, const char *, const char *);
-int serv_chat_send(GaimConnection *, int, const char *);
-void serv_alias_buddy(GaimBuddy *);
-void serv_got_alias(GaimConnection *gc, const char *who, const char *alias);
-void serv_got_eviled(GaimConnection *gc, const char *name, int lev);
-void serv_got_typing(GaimConnection *gc, const char *name, int timeout,
- GaimTypingState state);
-void serv_set_buddyicon(GaimConnection *gc, const char *filename);
-void serv_got_typing_stopped(GaimConnection *gc, const char *name);
-void serv_got_im(GaimConnection *gc, const char *who, const char *msg,
- GaimConvImFlags imflags, time_t mtime);
-void serv_got_update(GaimConnection *gc, const char *name, gboolean loggedin,
- int evil, time_t signon, time_t idle, int type);
-void serv_finish_login(GaimConnection *gc);
-void serv_got_chat_invite(GaimConnection *gc, const char *name,
- const char *who, const char *message,
- GHashTable *data);
-GaimConversation *serv_got_joined_chat(GaimConnection *gc,
- int id, const char *name);
-void serv_got_chat_left(GaimConnection *g, int id);
-void serv_got_chat_in(GaimConnection *g, int id, const char *who,
- GaimConvChatFlags chatflags, const char *message, time_t mtime);
-void serv_send_file(GaimConnection *gc, const char *who, const char *file);
-
-/* --- conversation.h ---------------------------------------------------- */
-
-typedef enum
-{
- GAIM_CONV_UNKNOWN = 0, /**< Unknown conversation type. */
- GAIM_CONV_IM, /**< Instant Message. */
- GAIM_CONV_CHAT, /**< Chat room. */
- GAIM_CONV_MISC /**< A misc. conversation. */
-
-} GaimConversationType;
-
-typedef enum
-{
- GAIM_UNSEEN_NONE = 0, /**< No unseen text in the conversation. */
- GAIM_UNSEEN_TEXT, /**< Unseen text in the conversation. */
- GAIM_UNSEEN_NICK, /**< Unseen text and the nick was said. */
- GAIM_UNSEEN_EVENT /**< Unseen events in the conversation. */
-
-} GaimUnseenState;
-
-typedef enum
-{
- GAIM_CONV_UPDATE_ADD = 0, /**< The buddy associated with the conversation
- was added. */
- GAIM_CONV_UPDATE_REMOVE, /**< The buddy associated with the conversation
- was removed. */
- GAIM_CONV_UPDATE_ACCOUNT, /**< The gaim_account was changed. */
- GAIM_CONV_UPDATE_TYPING, /**< The typing state was updated. */
- GAIM_CONV_UPDATE_UNSEEN, /**< The unseen state was updated. */
- GAIM_CONV_UPDATE_LOGGING, /**< Logging for this conversation was
- enabled or disabled. */
- GAIM_CONV_UPDATE_TOPIC, /**< The topic for a chat was updated. */
- /*
- * XXX These need to go when we implement a more generic core/UI event
- * system.
- */
- GAIM_CONV_ACCOUNT_ONLINE, /**< One of the user's accounts went online. */
- GAIM_CONV_ACCOUNT_OFFLINE, /**< One of the user's accounts went offline. */
- GAIM_CONV_UPDATE_AWAY, /**< The other user went away. */
- GAIM_CONV_UPDATE_ICON, /**< The other user's buddy icon changed. */
- GAIM_CONV_UPDATE_TITLE,
- GAIM_CONV_UPDATE_CHATLEFT,
-
- GAIM_CONV_UPDATE_FEATURES /**< The features for a chat have changed */
-
-} GaimConvUpdateType;
-
-typedef enum
-{
- GAIM_NOT_TYPING = 0, /**< Not typing. */
- GAIM_TYPING, /**< Currently typing. */
- GAIM_TYPED /**< Stopped typing momentarily. */
-
-} GaimTypingState;
-
-typedef enum
-{
- GAIM_MESSAGE_SEND = 0x0001, /**< Outgoing message. */
- GAIM_MESSAGE_RECV = 0x0002, /**< Incoming message. */
- GAIM_MESSAGE_SYSTEM = 0x0004, /**< System message. */
- GAIM_MESSAGE_AUTO_RESP = 0x0008, /**< Auto response. */
- GAIM_MESSAGE_COLORIZE = 0x0010, /**< Colorize nicks. */
- GAIM_MESSAGE_NICK = 0x0020, /**< Contains your nick. */
- GAIM_MESSAGE_NO_LOG = 0x0040, /**< Do not log. */
- GAIM_MESSAGE_WHISPER = 0x0080, /**< Whispered message. */
- GAIM_MESSAGE_ERROR = 0x0200, /**< Error message. */
- GAIM_MESSAGE_DELAYED = 0x0400 /**< Delayed message. */
-} GaimMessageFlags;
-
-typedef enum
-{
- GAIM_CBFLAGS_NONE = 0x0000, /**< No flags */
- GAIM_CBFLAGS_VOICE = 0x0001, /**< Voiced user or "Participant" */
- GAIM_CBFLAGS_HALFOP = 0x0002, /**< Half-op */
- GAIM_CBFLAGS_OP = 0x0004, /**< Channel Op or Moderator */
- GAIM_CBFLAGS_FOUNDER = 0x0008 /**< Channel Founder */
-} GaimConvChatBuddyFlags;
-
-/* --- prpl.h ------------------------------------------------------------ */
-
-typedef enum
-{
- GAIM_CONV_IM_AUTO_RESP = 0x0001, /**< Auto response. */
- GAIM_CONV_IM_IMAGES = 0x0002 /**< Contains images. */
-} GaimConvImFlags;
-
-typedef enum
-{
- GAIM_CONV_CHAT_WHISPER = 0x0001, /**< Whispered message.*/
- GAIM_CONV_CHAT_DELAYED = 0x0002 /**< Delayed message. */
-
-} GaimConvChatFlags;
-
-typedef enum {
- GAIM_ICON_SCALE_DISPLAY = 0x01, /**< We scale the icon when we display it */
- GAIM_ICON_SCALE_SEND = 0x02 /**< We scale the icon before we send it to the server */
-} GaimIconScaleRules;
-
-/* --- blist.h ----------------------------------------------------------- */
-
-typedef enum
-{
- GAIM_BLIST_GROUP_NODE,
- GAIM_BLIST_CONTACT_NODE,
- GAIM_BLIST_BUDDY_NODE,
- GAIM_BLIST_CHAT_NODE,
- GAIM_BLIST_OTHER_NODE
-
-} GaimBlistNodeType;
-
-typedef enum
-{
- GAIM_BUDDY_SIGNING_OFF = -1,
- GAIM_BUDDY_OFFLINE = 0,
- GAIM_BUDDY_ONLINE,
- GAIM_BUDDY_SIGNING_ON
-
-} GaimBuddyPresenceState;
-
-GaimGroup *gaim_group_new(const char *name);
-GaimGroup *gaim_find_group(const char *name);
-GaimGroup *gaim_find_buddys_group(GaimBuddy *buddy);
-GaimBuddy *gaim_buddy_new(GaimAccount *account, const char *screenname, const char *alias);
-const char *gaim_group_get_name(GaimGroup *group); // fake --- added by plugin
-const char *gaim_buddy_get_alias_only(GaimBuddy *buddy);
-const char *gaim_buddy_get_contact_alias(GaimBuddy *buddy);
-const char *gaim_buddy_get_alias(GaimBuddy *buddy);
-GaimBuddy *gaim_find_buddy(GaimAccount *account, const char *name);
-void gaim_blist_add_buddy(GaimBuddy *buddy, GaimContact *contact, GaimGroup *group, GaimBlistNode *node);
-void gaim_blist_add_group(GaimGroup* group, GaimBlistNode* node);
-
-/* --- notify.h ---------------------------------------------------------- */
-
-typedef enum
-{
- GAIM_NOTIFY_MESSAGE = 0, /**< Message notification. */
- GAIM_NOTIFY_EMAIL, /**< Single e-mail notification. */
- GAIM_NOTIFY_EMAILS, /**< Multiple e-mail notification. */
- GAIM_NOTIFY_FORMATTED, /**< Formatted text. */
- GAIM_NOTIFY_USERINFO, /**< Formatted userinfo text. */
- GAIM_NOTIFY_URI /**< URI notification or display. */
-
-} GaimNotifyType;
-
-typedef enum
-{
- GAIM_NOTIFY_MSG_ERROR = 0, /**< Error notification. */
- GAIM_NOTIFY_MSG_WARNING, /**< Warning notification. */
- GAIM_NOTIFY_MSG_INFO /**< Information notification. */
-
-} GaimNotifyMsgType;
-
-void *gaim_notify_message(void *handle, GaimNotifyMsgType type,
- const char *title, const char *primary,
- const char *secondary, GCallback cb,
- void *user_data);
-void *gaim_notify_email(void *handle, const char *subject,
- const char *from, const char *to,
- const char *url, GCallback cb,
- void *user_data);
-void *gaim_notify_emails(void *handle, size_t count, gboolean detailed,
- const char **subjects, const char **froms,
- const char **tos, const char **urls,
- GCallback cb, void *user_data);
-void *gaim_notify_formatted(void *handle, const char *title,
- const char *primary, const char *secondary,
- const char *text, GCallback cb, void *user_data);
-void *gaim_notify_userinfo(GaimConnection *gc, const char *who,
- const char *title, const char *primary,
- const char *secondary, const char *text,
- GCallback cb, void *user_data);
-void *gaim_notify_uri(void *handle, const char *uri);
-
-/* --- util.h ------------------------------------------------------------ */
-
-void gaim_quotedp_decode (const char *str, char **ret_str, int *ret_len);
-char *gaim_mime_decode_field (const char *str);
-const char *gaim_date(void);
-const char *gaim_date_full(void);
-time_t gaim_time_build(int year, int month, int day, int hour, int min, int sec);
-time_t gaim_str_to_time(const char *timestamp, gboolean utc);
-
-const gchar *gaim_home_dir(void);
-char *gaim_user_dir(void);
-void set_gaim_user_dir(const char *dir);
-int gaim_build_dir(const char *path, int mode);
-gboolean gaim_program_is_valid(const char *program);
-
-const char *gaim_normalize(const GaimAccount *account, const char *str);
-const char *gaim_normalize_nocase(const GaimAccount *account, const char *str);
-
-/* --- debug.h ----------------------------------------------------------- */
-
-typedef enum
-{
- GAIM_DEBUG_ALL = 0, /**< All debug levels. */
- GAIM_DEBUG_MISC, /**< General chatter. */
- GAIM_DEBUG_INFO, /**< General operation Information. */
- GAIM_DEBUG_WARNING, /**< Warnings. */
- GAIM_DEBUG_ERROR, /**< Errors. */
- GAIM_DEBUG_FATAL /**< Fatal errors. */
-
-} GaimDebugLevel;
-
-void gaim_debug(GaimDebugLevel level, const char *category,
- const char *format);
-void gaim_debug_misc(const char *category, const char *format);
-void gaim_debug_info(const char *category, const char *format);
-void gaim_debug_warning(const char *category, const char *format);
-void gaim_debug_error(const char *category, const char *format);
-void gaim_debug_fatal(const char *category, const char *format);
-
+++ /dev/null
-/* interface.h
- * Gaim Citadel plugin.
- *
- * © 2006 David Given.
- * This code is licensed under the GPL v3. See the file COPYING in this
- * directory for the full license text.
- *
- * $Id:interface.h 4326 2006-02-18 12:26:22Z hjalfi $
- */
-
-#ifndef INTERFACE_H
-#define INTERFACE_H
-
-extern char* interface_readdata(int fd, GaimSslConnection* gsc);
-extern int interface_writedata(int fd, GaimSslConnection* gsc, char* data);
-extern int interface_connect(GaimAccount* ga, GaimConnection* gc, char* server, int port);
-extern void interface_disconnect(int fd, GaimSslConnection* gsc);
-extern void interface_tlson(GaimConnection* gc, GaimAccount* ga, int fd);
-extern int interface_timeron(GaimConnection* gc, time_t timeout);
-extern void interface_timeroff(GaimConnection* gc, int timerhandle);
-
-extern const char* gaim_group_get_name(GaimGroup* group);
-
-#endif
+++ /dev/null
-#!/bin/sh
-# $Id$
-#
-# Script to build a distribution package.
-
-APPNAME=gaim-citadel
-
-set -e
-
-if [ "$1" = "" ]; then
- echo "Please specify a version number!"
- exit 1
-fi
-
-if [ -d ../$APPNAME-$1 ]; then
- echo "I think you've already generated version $1."
- exit 1
-fi
-
-mkdir ../$APPNAME-$1
-cp -a --parents \
- pm \
- c.pm \
- pmfile \
- citadel.c \
- citadel.lua \
- gaim.pkg \
- interface.h \
- README \
- COPYING \
-\
- ../gaim-citadel-$1
-
-(cd .. && tar cvf $APPNAME-$1.tar.bz2 --bzip2 $APPNAME-$1)
-
-echo ""
-echo "Done --- but did you remember to update the version number?"
+++ /dev/null
--- pmfile
--- Gaim Citadel plugin.
--- © 2006 David Given.
--- This code is licensed under the GPL v3. See the file COPYING in this
--- directory for the full license text.
---
--- $Id:pmfile 4326 2006-02-18 12:26:22Z hjalfi $
-
-include "c.pm"
-
-GAIMINCLUDES = "-I/usr/include/gaim"
-GLIBINCLUDES = "-I/usr/include/glib-2.0 -I/usr/lib/glib-2.0/include"
-LUAINCLUDES = "-I/usr/include/lua50"
-LUALIBRARIES = "-llualib50 -llua50"
-
-INSTALLTO = "%HOME%/.gaim"
-
-HOME = os.getenv("HOME")
-
-csharedlibrary = simple {
- class = "csharedlibrary",
- CBUILDFLAGS = "-g -O0 -Wall -fPIC -shared",
-
- command = {
- "%CPROGRAM%"
- },
- outputs = {"%U%-%I%.so"},
-}
-
-default = csharedlibrary {
- CEXTRAFLAGS="-DLUA_USE_POSIX",
- CINCLUDES="-I. %GAIMINCLUDES% %GLIBINCLUDES% %LUAINCLUDES%",
- CLIBRARIES="%LUALIBRARIES% -ltolua",
-
- cfile "citadel.c",
-
- cfile {
- simple {
- outputs = {"%U%-%I%.c"},
- command = {
- "tolua -n gaim -o %out% %in%"
- },
-
- file "gaim.pkg"
- }
- },
-
- install = {
- pm.install("%INSTALLTO%/plugins/citadel.so"),
- pm.install("citadel.lua", "%INSTALLTO%/plugindata/citadel.lua")
- }
-}
projects / citadel.git / commitdiff