FModExRaw (empty) → 0.1.0.0
raw patch · 19 files changed
+2860/−0 lines, 19 filesdep +basesetup-changed
Dependencies added: base
Files
- FModExRaw.cabal +80/−0
- LICENSE +675/−0
- Setup.hs +2/−0
- Sound/FModEx/Raw.hs +24/−0
- Sound/FModEx/Raw/Codec.hs +18/−0
- Sound/FModEx/Raw/Codec/Types.hsc +75/−0
- Sound/FModEx/Raw/Core.hs +19/−0
- Sound/FModEx/Raw/Core/Functions.hsc +641/−0
- Sound/FModEx/Raw/Core/Types.hsc +720/−0
- Sound/FModEx/Raw/DSP.hs +18/−0
- Sound/FModEx/Raw/DSP/Types.hsc +278/−0
- Sound/FModEx/Raw/Errors.hs +18/−0
- Sound/FModEx/Raw/Errors/Functions.hsc +22/−0
- Sound/FModEx/Raw/Linux.hs +18/−0
- Sound/FModEx/Raw/Linux/Types.hsc +24/−0
- Sound/FModEx/Raw/Memory.hs +18/−0
- Sound/FModEx/Raw/Memory/Types.hsc +135/−0
- Sound/FModEx/Raw/Output.hs +18/−0
- Sound/FModEx/Raw/Output/Types.hsc +57/−0
+ FModExRaw.cabal view
@@ -0,0 +1,80 @@+-- Initial FModEx.cabal generated by cabal init. For further +-- documentation, see http://haskell.org/cabal/users-guide/++-- The name of the package.+name: FModExRaw++-- The package version. See the Haskell package versioning policy (PVP) +-- for standards guiding when and how versions should be incremented.+-- http://www.haskell.org/haskellwiki/Package_versioning_policy+-- PVP summary: +-+------- breaking API changes+-- | | +----- non-breaking API additions+-- | | | +--- code changes with no API change+version: 0.1.0.0++-- A short (one-line) description of the package.+synopsis: The Haskell FModEx raw API.++-- A longer description of the package.+description: Haskell FModEx raw API. It’s a 1:1 Haskell binding over the famous C API.++ For now, I use version 0.0.* for uncomplete API binding. The complete API will be released just in time.++-- URL for the project homepage or repository.+homepage: https://github.com/skypers/hsFModEx++-- The license under which the package is released.+license: GPL-3++-- The file containing the license text.+license-file: LICENSE++-- The package author(s).+author: DimitriSabadie++-- An email address to which users can send suggestions, bug reports, and +-- patches.+maintainer: dimitri.sabadie@gmail.com++-- A copyright notice.+-- copyright: ++category: Sound++build-type: Simple++-- Constraint on the version of Cabal needed to build this package.+cabal-version: >=1.8++library+ -- Compilation line+ ghc-options: -Wall+ -- Extra libraries+ extra-libraries: fmodex+ -- Modules exported by the library.+ exposed-modules: Sound.FModEx.Raw+ , Sound.FModEx.Raw.Codec+ , Sound.FModEx.Raw.Codec.Types+ , Sound.FModEx.Raw.Core+ , Sound.FModEx.Raw.Core.Functions+ , Sound.FModEx.Raw.Core.Types+ , Sound.FModEx.Raw.DSP+ , Sound.FModEx.Raw.DSP.Types+ , Sound.FModEx.Raw.Errors+ , Sound.FModEx.Raw.Errors.Functions+ , Sound.FModEx.Raw.Linux+ , Sound.FModEx.Raw.Linux.Types+ , Sound.FModEx.Raw.Memory+ , Sound.FModEx.Raw.Memory.Types+ , Sound.FModEx.Raw.Output+ , Sound.FModEx.Raw.Output.Types+ + -- Modules included in this library but not exported.+ -- other-modules: + + -- Other library packages from which modules are imported.+ build-depends: base ==4.6.*+ + -- Extra tools (e.g. alex, hsc2hs, ...) needed to build the source.+ build-tools: hsc2hs+
+ LICENSE view
@@ -0,0 +1,675 @@+ 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++ 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 <http://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+<http://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+<http://www.gnu.org/philosophy/why-not-lgpl.html>.+
+ Setup.hs view
@@ -0,0 +1,2 @@+import Distribution.Simple+main = defaultMain
+ Sound/FModEx/Raw.hs view
@@ -0,0 +1,24 @@+{- |+Module : Sound.FModEx.Raw+Description : FModEx library Haskell raw binding+Copyright : (c) Dimitri Sabadie+License : GPL-3++Maintainer : dimitri.sabadie@gmail.com+Stability : experimental+Portability : Linux only for now++FModEx raw Haskell API.+-}++module Sound.FModEx.Raw (+ module X+ ) where++import Sound.FModEx.Raw.Codec as X+import Sound.FModEx.Raw.Core as X+import Sound.FModEx.Raw.DSP as X+import Sound.FModEx.Raw.Errors as X+import Sound.FModEx.Raw.Linux as X+import Sound.FModEx.Raw.Memory as X+import Sound.FModEx.Raw.Output as X
+ Sound/FModEx/Raw/Codec.hs view
@@ -0,0 +1,18 @@+{- |+Module : Sound.FModEx.Raw.Codec+Description : Codec FModEx library Haskell raw binding+Copyright : (c) Dimitri Sabadie+License : GPL-3++Maintainer : dimitri.sabadie@gmail.com+Stability : experimental+Portability : Linux only for now++Codec FModEx raw Haskell API.+-}++module Sound.FModEx.Raw.Codec (+ module X+ ) where++import Sound.FModEx.Raw.Codec.Types as X
+ Sound/FModEx/Raw/Codec/Types.hsc view
@@ -0,0 +1,75 @@+{-# LANGUAGE CPP, ForeignFunctionInterface #-}++{- |+Module : Sound.FModEx.Raw.Codec.Types+Description : FModEx library C codec types binding+Copyright : (c) Dimitri Sabadie+License : GPL-3++Maintainer : dimitri.sabadie@gmail.com+Stability : experimental+Portability : Linux only for now++FModEx API C codec types raw Haskell binding.+-}++module Sound.FModEx.Raw.Codec.Types where++import Foreign.C.String+import Foreign.C.Types+import Foreign.Ptr+import Sound.FModEx.Raw.Core.Types++-- Codec callbacks+type FModCodecOpenCallback = FunPtr (Ptr FModCodecState -> FModMode -> Ptr FModCreateSoundExInfo -> IO FModResult)+type FModCodecCloseCallback = FunPtr (Ptr FModCodecState -> IO FModResult)+type FModCodecReadCallback = FunPtr (Ptr FModCodecState -> Ptr () -> CUInt -> Ptr CUInt -> IO FModResult)+type FModCodecGetLengthCallback = FunPtr (Ptr FModCodecState -> Ptr CUInt -> FModTimeUnit -> IO FModResult)+type FModCodecSetPositionCallback = FunPtr (Ptr FModCodecState -> CInt -> CUInt -> FModTimeUnit -> IO FModResult)+type FModCodecGetPositionCallback = FunPtr (Ptr FModCodecState -> Ptr CUInt -> FModTimeUnit -> IO FModResult)+type FModCodecSoundCreateCallback = FunPtr (Ptr FModCodecState -> CInt -> Ptr FModSound -> IO FModResult)+type FModCodecMetaDataCallback = FunPtr (Ptr FModCodecState -> FModTagType -> CString -> Ptr () -> CUInt -> FModTagDataType -> CInt -> IO FModResult)+type FModCodecGetWaveFormat = FunPtr (Ptr FModCodecState -> CInt -> Ptr FModCodecWaveFormat -> IO FModResult)++-- FMOD_CODEC_DESCRIPTION+data FModCodecDescription = FModCodecDescription {+ fmod_CodecDescriptionName :: CString+ , fmod_CodecDescriptionVersion :: CUInt+ , fmod_CodecDescriptionDefaultAsStream :: CInt+ , fmod_CodecDescriptionTimeUnits :: FModTimeUnit+ , fmod_CodecDescriptionOpen :: FModCodecOpenCallback+ , fmod_CodecDescriptionClose :: FModCodecCloseCallback+ , fmod_CodecDescriptionRead :: FModCodecReadCallback+ , fmod_CodecDescriptionGetLength :: FModCodecGetLengthCallback+ , fmod_CodecDescriptionSetPosition :: FModCodecSetPositionCallback+ , fmod_CodecDescriptionGetPosition :: FModCodecGetPositionCallback+ , fmod_CodecDescriptionSoundCreate :: FModCodecSoundCreateCallback+ , fmod_CodecDescriptionGetWaveFormat :: FModCodecGetWaveFormat+ } deriving (Eq,Show)++-- FMOD_CODEC_WAVEFORMAT+data FModCodecWaveFormat = FModCodecWaveFormat {+ fmod_CodecWaveFormatName :: CString+ , fmod_CodecWaveFormatFormat :: FModSoundFormat+ , fmod_CodecWaveFormatChannels :: CInt+ , fmod_CodecWaveFormatFrequency :: CInt+ , fmod_CodecWaveFormatLengthBytes :: CUInt+ , fmod_CodecWaveFormatLengthPCM :: CUInt+ , fmod_CodecWaveFormatBlockAlign :: CInt+ , fmod_CodecWaveFormatLoopStart :: CInt+ , fmod_CodecWaveFormatLoopEnd :: CInt+ , fmod_CodecWaveFormatMode :: FModMode+ , fmod_CodecWaveFormatChannelMask :: CUInt+ } deriving (Eq,Show)++-- FMOD_CODEC_STATE+data FModCodecState = FModCodecState {+ fmod_CodecStateNumSubSounds :: CInt+ , fmod_CodecStateWaveFormat :: Ptr FModCodecWaveFormat+ , fmod_CodecStatePluginData :: Ptr ()+ , fmod_CodecStateFileHandle :: Ptr ()+ , fmod_CodecStateFileSize :: CUInt+ , fmod_CodecStateFileRead :: FModFileReadCallback+ , fmod_CodecStateFileSeek :: FModFileSeekCallback+ , fmod_CodecStateMetaData :: FModCodecMetaDataCallback+ } deriving (Eq,Show)
+ Sound/FModEx/Raw/Core.hs view
@@ -0,0 +1,19 @@+{- |+Module : Sound.FModEx.Raw.Core+Description : Core FModEx library Haskell raw binding+Copyright : (c) Dimitri Sabadie+License : GPL-3++Maintainer : dimitri.sabadie@gmail.com+Stability : experimental+Portability : Linux only for now++Core FModEx raw Haskell API.+-}++module Sound.FModEx.Raw.Core (+ module X+ ) where++import Sound.FModEx.Raw.Core.Functions as X+import Sound.FModEx.Raw.Core.Types as X
+ Sound/FModEx/Raw/Core/Functions.hsc view
@@ -0,0 +1,641 @@+{-# LANGUAGE ForeignFunctionInterface #-}++{- |+Module : Sound.FModEx.Raw.Core.Functions+Description : FModEx library C functions binding+Copyright : (c) Dimitri Sabadie+License : GPL-3++Maintainer : dimitri.sabadie@gmail.com+Stability : experimental+Portability : Linux only for now++FModEx API C core functions raw Haskell binding.+-}++module Sound.FModEx.Raw.Core.Functions where++import Foreign.C.String+import Foreign.C.Types+import Foreign.Ptr+import Sound.FModEx.Raw.Codec.Types+import Sound.FModEx.Raw.Core.Types+import Sound.FModEx.Raw.DSP.Types+import Sound.FModEx.Raw.Memory.Types++-- macro, TODO+-- // #define FMOD_64BIT_ADD(_hi1, _lo1, _hi2, _lo2) _hi1 += ((_hi2) + ((((_lo1) + (_lo2)) < (_lo1)) ? 1 : 0)); (_lo1) += (_lo2);+-- // #define FMOD_64BIT_SUB(_hi1, _lo1, _hi2, _lo2) _hi1 -= ((_hi2) + ((((_lo1) - (_lo2)) > (_lo1)) ? 1 : 0)); (_lo1) -= (_lo2);++-- FMOD global system functions+foreign import ccall "FMOD_Memory_Initialize" fmod_MemoryInitialize :: Ptr () -> CInt -> FModMemoryAllocCallback -> FModMemoryReallocCallback -> FModMemoryFreeCallback -> FModMemoryType -> IO FModResult+foreign import ccall "FMOD_Memory_GetStats" fmod_MemoryGetStats :: Ptr CInt -> Ptr CInt -> FModBool -> IO FModResult+foreign import ccall "FMOD_Debug_SetLevel" fmod_DebugSetLevel :: FModDebugLevel -> IO FModResult+foreign import ccall "FMOD_Debug_GetLevel" fmod_DebugGetLevel :: Ptr FModDebugLevel -> IO FModResult+foreign import ccall "FMOD_File_SetDiskBusy" fmod_FileSetDiskBusy :: CInt -> IO FModResult+foreign import ccall "FMOD_File_GetDiskBusy" fmod_FileGetDiskBusy :: Ptr Int -> IO FModResult++-- FMOD System factory functions.+foreign import ccall "FMOD_System_Create" fmod_SystemCreate :: Ptr (Ptr FModSystem) -> IO FModResult+foreign import ccall "FMOD_System_Release" fmod_SystemRelease :: Ptr FModSystem -> IO FModResult++-- System API+foreign import ccall "FMOD_System_SetOutput" fmod_SystemSetOutput :: Ptr FModSystem -> FModOutputType -> IO FModResult+foreign import ccall "FMOD_System_GetOutput" fmod_SystemGetOutput :: Ptr FModSystem -> Ptr FModOutputType -> IO FModResult+foreign import ccall "FMOD_System_GetNumDrivers" fmod_SystemGetNumDrivers :: Ptr FModSystem -> Ptr CInt -> IO FModResult+foreign import ccall "FMOD_System_GetDriverInfo" fmod_SystemGetDriverInfo :: Ptr FModSystem -> CInt -> CString -> CInt -> Ptr FModGUID -> IO FModResult+foreign import ccall "FMOD_System_GetDriverInfoW" fmod_SystemGetDriverInfoW :: Ptr FModSystem -> CInt -> CString -> CInt -> Ptr FModGUID -> IO FModResult+foreign import ccall "FMOD_System_GetDriverCaps" fmod_SystemGetDriverCaps :: Ptr FModSystem -> CInt -> Ptr FModCaps -> Ptr CInt -> Ptr FModSpeakerMode -> IO FModResult+foreign import ccall "FMOD_System_SetDriver" fmod_SystemSetDriver :: Ptr FModSystem -> CInt -> IO FModResult+foreign import ccall "FMOD_System_GetDriver" fmod_SystemGetDriver :: Ptr FModSystem -> Ptr CInt -> IO FModResult+foreign import ccall "FMOD_System_SetHardwareChannels" fmod_SystemSetHardwareChannels :: Ptr FModSystem -> CInt -> IO FModResult+foreign import ccall "FMOD_System_SetSoftwareChannels" fmod_SystemSetSoftwareChannels :: Ptr FModSystem -> CInt -> IO FModResult+foreign import ccall "FMOD_System_GetSoftwareChannels" fmod_SystemGetSoftwareChannels :: Ptr FModSystem -> CInt -> IO FModResult+foreign import ccall "FMOD_System_SetSoftwareFormat" fmod_SystemSetSoftwareFormat :: Ptr FModSystem -> CInt -> FModSoundFormat -> CInt -> CInt -> FModDSPResampler -> IO FModResult+foreign import ccall "FMOD_System_GetSoftwareFormat" fmod_SystemGetSoftwareFormat :: Ptr FModSystem -> Ptr CInt -> Ptr FModSoundFormat -> Ptr CInt -> Ptr CInt -> Ptr FModDSPResampler -> Ptr CInt -> IO FModResult+foreign import ccall "FMOD_System_SetDSPBufferSize" fmod_SystemSetDSPBufferSize :: Ptr FModSystem -> CUInt -> CInt -> IO FModResult+foreign import ccall "FMOD_System_GetDSPBufferSize" fmod_SystemGetDSPBufferSize :: Ptr FModSystem -> Ptr CUInt -> Ptr CInt -> IO FModResult+foreign import ccall "FMOD_System_SetFileSystem" fmod_SystemSetFileSystem :: Ptr FModSystem -> FModFileOpenCallback -> FModFileCloseCallback -> FModFileReadCallback -> FModFileSeekCallback -> FModFileAsyncReadCallback -> FModFileAsyncCancelCallback -> CInt -> IO FModResult+foreign import ccall "FMOD_System_AttachFileSystem" fmod_SystemAttachFileSystem :: Ptr FModSystem -> FModFileOpenCallback -> FModFileCloseCallback -> FModFileReadCallback -> FModFileSeekCallback -> IO FModResult+foreign import ccall "FMOD_System_SetAdvancedSettings" fmod_SystemSetAdvancedSettings :: Ptr FModSystem -> Ptr FModAdvancedSettings -> IO FModResult+foreign import ccall "FMOD_System_GetAdvancedSettings" fmod_SystemGetAdvancedSettings :: Ptr FModSystem -> Ptr FModAdvancedSettings -> IO FModResult+foreign import ccall "FMOD_System_SetSpeakerMode" fmod_SystemSetSpeakerMode :: Ptr FModSystem -> FModSpeakerMode -> IO FModResult+foreign import ccall "FMOD_Syste_GetSpeakerMode" fmod_SystemGetSpeakerMode :: Ptr FModSystem -> Ptr FModSpeakerMode -> IO FModResult+foreign import ccall "FMOD_System_SetCallback" fmod_SystemSetCallbcak :: Ptr FModSystem -> FModSystemCallback -> IO FModResult++-- Plugin support+foreign import ccall "FMOD_System_SetPluginPath" fmod_SystemSetPluginPath :: Ptr FModSystem -> CString -> IO FModResult+foreign import ccall "FMOD_System_LoadPlugin" fmod_SystemLoadPlugin :: Ptr FModSystem -> CString -> Ptr CUInt -> CUInt -> IO FModResult+foreign import ccall "FMOD_System_UnloadPlugin" fmod_SystemUnloadPlugin :: Ptr FModSystem -> CUInt -> IO FModResult+foreign import ccall "FMOD_System_GetNumPlugins" fmod_SystemGetNumPlugins :: Ptr FModSystem -> FModPluginType -> Ptr CInt -> IO FModResult+foreign import ccall "FMOD_System_GetPluginHandle" fmod_SystemGetPluginHandle :: Ptr FModSystem -> FModPluginType -> CInt -> Ptr CUInt -> IO FModResult+foreign import ccall "FMOD_System_GetPluginInfo" fmod_SystemGetPluginInfo :: Ptr FModSystem -> CUInt -> Ptr FModPluginType -> CString -> CInt -> Ptr CUInt -> IO FModResult+foreign import ccall "FMOD_System_SetOutputByPlugin" fmod_SystemSetOutputByPlugin :: Ptr FModSystem -> CUInt -> IO FModResult+foreign import ccall "FMOD_System_GetOutputByPlugin" fmod_SystemGetOutputByPlugin :: Ptr FModSystem -> Ptr CUInt -> IO FModResult+foreign import ccall "FMOD_System_CreateDSPByPlugin" fmod_SystemCreateDSPByPlugin :: Ptr FModSystem -> CUInt -> Ptr (Ptr FModDSP) -> IO FModResult+foreign import ccall "FMOD_System_RegisterCodec" fmod_SystemRegisterCodec :: Ptr FModSystem -> Ptr FModCodecDescription -> Ptr CUInt -> CUInt -> IO FModResult+foreign import ccall "FMOD_System_RegisterDSP" fmod_SystemRegisterDSP :: Ptr FModSystem -> Ptr FModDSPDescription -> Ptr CUInt -> IO FModResult++-- Init / close+foreign import ccall "FMOD_System_Init" fmod_SystemInit :: Ptr FModSystem -> CInt -> FModInitFlags -> Ptr () -> IO FModResult+foreign import ccall "FMOD_System_Close" fmod_SystemClose :: Ptr FModSystem -> IO FModResult++-- General post-init system functions +foreign import ccall "FMOD_System_Update" fmod_SystemUpdate :: Ptr FModSystem -> IO FModResult+foreign import ccall "FMOD_System_Set3DSettings" fmod_SystemSet3DSettings :: Ptr FModSystem -> CFloat -> CFloat -> CFloat -> IO FModResult+foreign import ccall "FMOD_System_Get3DSettings" fmod_SystemGet3DSettings :: Ptr FModSystem -> Ptr CFloat -> Ptr CFloat -> Ptr CFloat -> IO FModResult+foreign import ccall "FMOD_System_Set3DNumListeners" fmod_SystemSet3DNumListeners :: Ptr FModSystem -> CInt -> IO FModResult+foreign import ccall "FMOD_System_Get3DNumListeners" fmod_SystemGet3DNumListeners :: Ptr FModSystem -> Ptr CInt -> IO FModResult+foreign import ccall "FMOD_System_Set3DListenerAttributes" fmod_SystemSet3DListenerAttributes :: Ptr FModSystem -> CInt -> Ptr FModVector -> Ptr FModVector -> Ptr FModVector -> Ptr FModVector -> IO FModResult+foreign import ccall "FMOD_System_Get3DListenerAttributes" fmod_SystemGet3DListenerAttributes :: Ptr FModSystem -> CInt -> Ptr FModVector -> Ptr FModVector -> Ptr FModVector -> Ptr FModVector -> IO FModResult+foreign import ccall "FMOD_System_Set3DRolloffcallback" fmod_SystemSet3DRolloffCallback :: Ptr FModSystem -> FMod3DRollOffCallback -> IO FModResult+foreign import ccall "FMOD_System_Set3DSpeakerPosition" fmod_SystemSet3DSpeakerPosition :: Ptr FModSystem -> FModSpeaker -> CFloat -> CFloat -> FModBool -> IO FModResult+foreign import ccall "FMOD_System_Get3DSpeakerPosition" fmod_SystemGet3DSpeakerPosition :: Ptr FModSystem -> FModSpeaker -> Ptr CFloat -> Ptr CFloat -> Ptr FModBool -> IO FModResult+foreign import ccall "FMOD_System_SetStreamBufferSize" fmod_SystemSetStreamBufferSize :: Ptr FModSystem -> CUInt -> FModTimeUnit -> IO FModResult+foreign import ccall "FMOD_System_GetStreamBufferSize" fmod_SystemGetStreamBufferSize :: Ptr FModSystem -> Ptr CUInt -> Ptr FModTimeUnit -> IO FModResult++#if 0+/*+ System information functions. +*/++FMOD_RESULT F_API FMOD_System_GetVersion (FMOD_SYSTEM *system, unsigned int *version);+FMOD_RESULT F_API FMOD_System_GetOutputHandle (FMOD_SYSTEM *system, void **handle);+FMOD_RESULT F_API FMOD_System_GetChannelsPlaying (FMOD_SYSTEM *system, int *channels);+FMOD_RESULT F_API FMOD_System_GetHardwareChannels (FMOD_SYSTEM *system, int *numhardwarechannels);+FMOD_RESULT F_API FMOD_System_GetCPUUsage (FMOD_SYSTEM *system, float *dsp, float *stream, float *geometry, float *update, float *total);+FMOD_RESULT F_API FMOD_System_GetSoundRAM (FMOD_SYSTEM *system, int *currentalloced, int *maxalloced, int *total);+FMOD_RESULT F_API FMOD_System_GetNumCDROMDrives (FMOD_SYSTEM *system, int *numdrives);+FMOD_RESULT F_API FMOD_System_GetCDROMDriveName (FMOD_SYSTEM *system, int drive, char *drivename, int drivenamelen, char *scsiname, int scsinamelen, char *devicename, int devicenamelen);+FMOD_RESULT F_API FMOD_System_GetSpectrum (FMOD_SYSTEM *system, float *spectrumarray, int numvalues, int channeloffset, FMOD_DSP_FFT_WINDOW windowtype);+FMOD_RESULT F_API FMOD_System_GetWaveData (FMOD_SYSTEM *system, float *wavearray, int numvalues, int channeloffset);++/*+ Sound/DSP/Channel/FX creation and retrieval. +*/++FMOD_RESULT F_API FMOD_System_CreateSound (FMOD_SYSTEM *system, const char *name_or_data, FMOD_MODE mode, FMOD_CREATESOUNDEXINFO *exinfo, FMOD_SOUND **sound);+#endif+foreign import ccall "FMOD_System_CreateStream" fmod_SystemCreateStream :: Ptr FModSystem -> CString -> FModMode -> Ptr FModCreateSoundExInfo -> Ptr (Ptr FModSound) -> IO FModResult+#if 0+FMOD_RESULT F_API FMOD_System_CreateDSP (FMOD_SYSTEM *system, FMOD_DSP_DESCRIPTION *description, FMOD_DSP **dsp);+FMOD_RESULT F_API FMOD_System_CreateDSPByType (FMOD_SYSTEM *system, FMOD_DSP_TYPE type, FMOD_DSP **dsp);+FMOD_RESULT F_API FMOD_System_CreateChannelGroup (FMOD_SYSTEM *system, const char *name, FMOD_CHANNELGROUP **channelgroup);+FMOD_RESULT F_API FMOD_System_CreateSoundGroup (FMOD_SYSTEM *system, const char *name, FMOD_SOUNDGROUP **soundgroup);+FMOD_RESULT F_API FMOD_System_CreateReverb (FMOD_SYSTEM *system, FMOD_REVERB **reverb);++#endif+foreign import ccall "FMOD_System_PlaySound" fmod_SystemPlaySound :: Ptr FModSystem -> FModChannelIndex -> Ptr FModSound -> FModBool -> Ptr (Ptr FModChannel) -> IO FModResult+#if 0+FMOD_RESULT F_API FMOD_System_PlayDSP (FMOD_SYSTEM *system, FMOD_CHANNELINDEX channelid, FMOD_DSP *dsp, FMOD_BOOL paused, FMOD_CHANNEL **channel);+FMOD_RESULT F_API FMOD_System_GetChannel (FMOD_SYSTEM *system, int channelid, FMOD_CHANNEL **channel);+FMOD_RESULT F_API FMOD_System_GetMasterChannelGroup (FMOD_SYSTEM *system, FMOD_CHANNELGROUP **channelgroup);+FMOD_RESULT F_API FMOD_System_GetMasterSoundGroup (FMOD_SYSTEM *system, FMOD_SOUNDGROUP **soundgroup);++/*+ Reverb API +*/++FMOD_RESULT F_API FMOD_System_SetReverbProperties (FMOD_SYSTEM *system, const FMOD_REVERB_PROPERTIES *prop);+FMOD_RESULT F_API FMOD_System_GetReverbProperties (FMOD_SYSTEM *system, FMOD_REVERB_PROPERTIES *prop);+FMOD_RESULT F_API FMOD_System_SetReverbAmbientProperties(FMOD_SYSTEM *system, FMOD_REVERB_PROPERTIES *prop);+FMOD_RESULT F_API FMOD_System_GetReverbAmbientProperties(FMOD_SYSTEM *system, FMOD_REVERB_PROPERTIES *prop);++/*+ System level DSP access.+*/++FMOD_RESULT F_API FMOD_System_GetDSPHead (FMOD_SYSTEM *system, FMOD_DSP **dsp);+FMOD_RESULT F_API FMOD_System_AddDSP (FMOD_SYSTEM *system, FMOD_DSP *dsp, FMOD_DSPCONNECTION **connection);+FMOD_RESULT F_API FMOD_System_LockDSP (FMOD_SYSTEM *system);+FMOD_RESULT F_API FMOD_System_UnlockDSP (FMOD_SYSTEM *system);+FMOD_RESULT F_API FMOD_System_GetDSPClock (FMOD_SYSTEM *system, unsigned int *hi, unsigned int *lo);++/*+ Recording API.+*/++FMOD_RESULT F_API FMOD_System_GetRecordNumDrivers (FMOD_SYSTEM *system, int *numdrivers);+FMOD_RESULT F_API FMOD_System_GetRecordDriverInfo (FMOD_SYSTEM *system, int id, char *name, int namelen, FMOD_GUID *guid);+FMOD_RESULT F_API FMOD_System_GetRecordDriverInfoW (FMOD_SYSTEM *system, int id, short *name, int namelen, FMOD_GUID *guid);+FMOD_RESULT F_API FMOD_System_GetRecordDriverCaps (FMOD_SYSTEM *system, int id, FMOD_CAPS *caps, int *minfrequency, int *maxfrequency);+FMOD_RESULT F_API FMOD_System_GetRecordPosition (FMOD_SYSTEM *system, int id, unsigned int *position);++FMOD_RESULT F_API FMOD_System_RecordStart (FMOD_SYSTEM *system, int id, FMOD_SOUND *sound, FMOD_BOOL loop);+FMOD_RESULT F_API FMOD_System_RecordStop (FMOD_SYSTEM *system, int id);+FMOD_RESULT F_API FMOD_System_IsRecording (FMOD_SYSTEM *system, int id, FMOD_BOOL *recording);++/*+ Geometry API.+*/++FMOD_RESULT F_API FMOD_System_CreateGeometry (FMOD_SYSTEM *system, int maxpolygons, int maxvertices, FMOD_GEOMETRY **geometry);+FMOD_RESULT F_API FMOD_System_SetGeometrySettings (FMOD_SYSTEM *system, float maxworldsize);+FMOD_RESULT F_API FMOD_System_GetGeometrySettings (FMOD_SYSTEM *system, float *maxworldsize);+FMOD_RESULT F_API FMOD_System_LoadGeometry (FMOD_SYSTEM *system, const void *data, int datasize, FMOD_GEOMETRY **geometry);+FMOD_RESULT F_API FMOD_System_GetGeometryOcclusion (FMOD_SYSTEM *system, const FMOD_VECTOR *listener, const FMOD_VECTOR *source, float *direct, float *reverb);++/*+ Network functions.+*/++FMOD_RESULT F_API FMOD_System_SetNetworkProxy (FMOD_SYSTEM *system, const char *proxy);+FMOD_RESULT F_API FMOD_System_GetNetworkProxy (FMOD_SYSTEM *system, char *proxy, int proxylen);+FMOD_RESULT F_API FMOD_System_SetNetworkTimeout (FMOD_SYSTEM *system, int timeout);+FMOD_RESULT F_API FMOD_System_GetNetworkTimeout (FMOD_SYSTEM *system, int *timeout);++/*+ Userdata set/get.+*/++FMOD_RESULT F_API FMOD_System_SetUserData (FMOD_SYSTEM *system, void *userdata);+FMOD_RESULT F_API FMOD_System_GetUserData (FMOD_SYSTEM *system, void **userdata);++FMOD_RESULT F_API FMOD_System_GetMemoryInfo (FMOD_SYSTEM *system, unsigned int memorybits, unsigned int event_memorybits, unsigned int *memoryused, FMOD_MEMORY_USAGE_DETAILS *memoryused_details);++/*+ 'Sound' API+*/++#endif+foreign import ccall "FMOD_Sound_Release" fmod_SoundRelease :: Ptr FModSound -> IO FModResult+#if 0+FMOD_RESULT F_API FMOD_Sound_GetSystemObject (FMOD_SOUND *sound, FMOD_SYSTEM **system);++/*+ Standard sound manipulation functions. +*/++FMOD_RESULT F_API FMOD_Sound_Lock (FMOD_SOUND *sound, unsigned int offset, unsigned int length, void **ptr1, void **ptr2, unsigned int *len1, unsigned int *len2);+FMOD_RESULT F_API FMOD_Sound_Unlock (FMOD_SOUND *sound, void *ptr1, void *ptr2, unsigned int len1, unsigned int len2);+FMOD_RESULT F_API FMOD_Sound_SetDefaults (FMOD_SOUND *sound, float frequency, float volume, float pan, int priority);+FMOD_RESULT F_API FMOD_Sound_GetDefaults (FMOD_SOUND *sound, float *frequency, float *volume, float *pan, int *priority);+FMOD_RESULT F_API FMOD_Sound_SetVariations (FMOD_SOUND *sound, float frequencyvar, float volumevar, float panvar);+FMOD_RESULT F_API FMOD_Sound_GetVariations (FMOD_SOUND *sound, float *frequencyvar, float *volumevar, float *panvar);+FMOD_RESULT F_API FMOD_Sound_Set3DMinMaxDistance (FMOD_SOUND *sound, float min, float max);+FMOD_RESULT F_API FMOD_Sound_Get3DMinMaxDistance (FMOD_SOUND *sound, float *min, float *max);+FMOD_RESULT F_API FMOD_Sound_Set3DConeSettings (FMOD_SOUND *sound, float insideconeangle, float outsideconeangle, float outsidevolume);+FMOD_RESULT F_API FMOD_Sound_Get3DConeSettings (FMOD_SOUND *sound, float *insideconeangle, float *outsideconeangle, float *outsidevolume);+FMOD_RESULT F_API FMOD_Sound_Set3DCustomRolloff (FMOD_SOUND *sound, FMOD_VECTOR *points, int numpoints);+FMOD_RESULT F_API FMOD_Sound_Get3DCustomRolloff (FMOD_SOUND *sound, FMOD_VECTOR **points, int *numpoints);+FMOD_RESULT F_API FMOD_Sound_SetSubSound (FMOD_SOUND *sound, int index, FMOD_SOUND *subsound);+FMOD_RESULT F_API FMOD_Sound_GetSubSound (FMOD_SOUND *sound, int index, FMOD_SOUND **subsound);+FMOD_RESULT F_API FMOD_Sound_SetSubSoundSentence (FMOD_SOUND *sound, int *subsoundlist, int numsubsounds);+FMOD_RESULT F_API FMOD_Sound_GetName (FMOD_SOUND *sound, char *name, int namelen);+#endif+foreign import ccall "FMOD_Sound_GetLength" fmod_SoundGetLength :: Ptr FModSound -> Ptr CUInt -> FModTimeUnit -> IO FModResult+#if 0+FMOD_RESULT F_API FMOD_Sound_GetFormat (FMOD_SOUND *sound, FMOD_SOUND_TYPE *type, FMOD_SOUND_FORMAT *format, int *channels, int *bits);+FMOD_RESULT F_API FMOD_Sound_GetNumSubSounds (FMOD_SOUND *sound, int *numsubsounds);+FMOD_RESULT F_API FMOD_Sound_GetNumTags (FMOD_SOUND *sound, int *numtags, int *numtagsupdated);+FMOD_RESULT F_API FMOD_Sound_GetTag (FMOD_SOUND *sound, const char *name, int index, FMOD_TAG *tag);+FMOD_RESULT F_API FMOD_Sound_GetOpenState (FMOD_SOUND *sound, FMOD_OPENSTATE *openstate, unsigned int *percentbuffered, FMOD_BOOL *starving, FMOD_BOOL *diskbusy);+FMOD_RESULT F_API FMOD_Sound_ReadData (FMOD_SOUND *sound, void *buffer, unsigned int lenbytes, unsigned int *read);+FMOD_RESULT F_API FMOD_Sound_SeekData (FMOD_SOUND *sound, unsigned int pcm);++FMOD_RESULT F_API FMOD_Sound_SetSoundGroup (FMOD_SOUND *sound, FMOD_SOUNDGROUP *soundgroup);+FMOD_RESULT F_API FMOD_Sound_GetSoundGroup (FMOD_SOUND *sound, FMOD_SOUNDGROUP **soundgroup);++/*+ Synchronization point API. These points can come from markers embedded in wav files, and can also generate channel callbacks. +*/++FMOD_RESULT F_API FMOD_Sound_GetNumSyncPoints (FMOD_SOUND *sound, int *numsyncpoints);+FMOD_RESULT F_API FMOD_Sound_GetSyncPoint (FMOD_SOUND *sound, int index, FMOD_SYNCPOINT **point);+FMOD_RESULT F_API FMOD_Sound_GetSyncPointInfo (FMOD_SOUND *sound, FMOD_SYNCPOINT *point, char *name, int namelen, unsigned int *offset, FMOD_TIMEUNIT offsettype);+FMOD_RESULT F_API FMOD_Sound_AddSyncPoint (FMOD_SOUND *sound, unsigned int offset, FMOD_TIMEUNIT offsettype, const char *name, FMOD_SYNCPOINT **point);+FMOD_RESULT F_API FMOD_Sound_DeleteSyncPoint (FMOD_SOUND *sound, FMOD_SYNCPOINT *point);++/*+ Functions also in Channel class but here they are the 'default' to save having to change it in Channel all the time.+*/++FMOD_RESULT F_API FMOD_Sound_SetMode (FMOD_SOUND *sound, FMOD_MODE mode);+FMOD_RESULT F_API FMOD_Sound_GetMode (FMOD_SOUND *sound, FMOD_MODE *mode);+FMOD_RESULT F_API FMOD_Sound_SetLoopCount (FMOD_SOUND *sound, int loopcount);+FMOD_RESULT F_API FMOD_Sound_GetLoopCount (FMOD_SOUND *sound, int *loopcount);+FMOD_RESULT F_API FMOD_Sound_SetLoopPoints (FMOD_SOUND *sound, unsigned int loopstart, FMOD_TIMEUNIT loopstarttype, unsigned int loopend, FMOD_TIMEUNIT loopendtype);+FMOD_RESULT F_API FMOD_Sound_GetLoopPoints (FMOD_SOUND *sound, unsigned int *loopstart, FMOD_TIMEUNIT loopstarttype, unsigned int *loopend, FMOD_TIMEUNIT loopendtype);++/*+ For MOD/S3M/XM/IT/MID sequenced formats only.+*/++FMOD_RESULT F_API FMOD_Sound_GetMusicNumChannels (FMOD_SOUND *sound, int *numchannels);+FMOD_RESULT F_API FMOD_Sound_SetMusicChannelVolume (FMOD_SOUND *sound, int channel, float volume);+FMOD_RESULT F_API FMOD_Sound_GetMusicChannelVolume (FMOD_SOUND *sound, int channel, float *volume);+FMOD_RESULT F_API FMOD_Sound_SetMusicSpeed (FMOD_SOUND *sound, float speed);+FMOD_RESULT F_API FMOD_Sound_GetMusicSpeed (FMOD_SOUND *sound, float *speed);++/*+ Userdata set/get.+*/++FMOD_RESULT F_API FMOD_Sound_SetUserData (FMOD_SOUND *sound, void *userdata);+FMOD_RESULT F_API FMOD_Sound_GetUserData (FMOD_SOUND *sound, void **userdata);++FMOD_RESULT F_API FMOD_Sound_GetMemoryInfo (FMOD_SOUND *sound, unsigned int memorybits, unsigned int event_memorybits, unsigned int *memoryused, FMOD_MEMORY_USAGE_DETAILS *memoryused_details);++/*+ 'Channel' API+*/++FMOD_RESULT F_API FMOD_Channel_GetSystemObject (FMOD_CHANNEL *channel, FMOD_SYSTEM **system);++FMOD_RESULT F_API FMOD_Channel_Stop (FMOD_CHANNEL *channel);+#endif+foreign import ccall "FMOD_Channel_SetPaused" fmod_ChannelSetPaused :: Ptr FModChannel -> FModBool -> IO FModResult+foreign import ccall "FMOD_Channel_GetPaused" fmod_ChannelGetPaused :: Ptr FModChannel -> Ptr FModBool -> IO FModResult+#if 0+FMOD_RESULT F_API FMOD_Channel_SetVolume (FMOD_CHANNEL *channel, float volume);+FMOD_RESULT F_API FMOD_Channel_GetVolume (FMOD_CHANNEL *channel, float *volume);+FMOD_RESULT F_API FMOD_Channel_SetFrequency (FMOD_CHANNEL *channel, float frequency);+FMOD_RESULT F_API FMOD_Channel_GetFrequency (FMOD_CHANNEL *channel, float *frequency);+FMOD_RESULT F_API FMOD_Channel_SetPan (FMOD_CHANNEL *channel, float pan);+FMOD_RESULT F_API FMOD_Channel_GetPan (FMOD_CHANNEL *channel, float *pan);+FMOD_RESULT F_API FMOD_Channel_SetDelay (FMOD_CHANNEL *channel, FMOD_DELAYTYPE delaytype, unsigned int delayhi, unsigned int delaylo);+FMOD_RESULT F_API FMOD_Channel_GetDelay (FMOD_CHANNEL *channel, FMOD_DELAYTYPE delaytype, unsigned int *delayhi, unsigned int *delaylo);+FMOD_RESULT F_API FMOD_Channel_SetSpeakerMix (FMOD_CHANNEL *channel, float frontleft, float frontright, float center, float lfe, float backleft, float backright, float sideleft, float sideright);+FMOD_RESULT F_API FMOD_Channel_GetSpeakerMix (FMOD_CHANNEL *channel, float *frontleft, float *frontright, float *center, float *lfe, float *backleft, float *backright, float *sideleft, float *sideright);+FMOD_RESULT F_API FMOD_Channel_SetSpeakerLevels (FMOD_CHANNEL *channel, FMOD_SPEAKER speaker, float *levels, int numlevels);+FMOD_RESULT F_API FMOD_Channel_GetSpeakerLevels (FMOD_CHANNEL *channel, FMOD_SPEAKER speaker, float *levels, int numlevels);+FMOD_RESULT F_API FMOD_Channel_SetInputChannelMix (FMOD_CHANNEL *channel, float *levels, int numlevels);+FMOD_RESULT F_API FMOD_Channel_GetInputChannelMix (FMOD_CHANNEL *channel, float *levels, int numlevels);+FMOD_RESULT F_API FMOD_Channel_SetMute (FMOD_CHANNEL *channel, FMOD_BOOL mute);+FMOD_RESULT F_API FMOD_Channel_GetMute (FMOD_CHANNEL *channel, FMOD_BOOL *mute);+FMOD_RESULT F_API FMOD_Channel_SetPriority (FMOD_CHANNEL *channel, int priority);+FMOD_RESULT F_API FMOD_Channel_GetPriority (FMOD_CHANNEL *channel, int *priority);+#endif+foreign import ccall "FMOD_Channel_SetPosition" fmod_ChannelSetPosition :: Ptr FModChannel -> CUInt -> FModTimeUnit -> IO FModResult+foreign import ccall "FMOD_Channel_GetPosition" fmod_ChannelGetPosition :: Ptr FModChannel -> Ptr CUInt -> FModTimeUnit -> IO FModResult+#if 0+FMOD_RESULT F_API FMOD_Channel_SetReverbProperties (FMOD_CHANNEL *channel, const FMOD_REVERB_CHANNELPROPERTIES *prop);+FMOD_RESULT F_API FMOD_Channel_GetReverbProperties (FMOD_CHANNEL *channel, FMOD_REVERB_CHANNELPROPERTIES *prop);+FMOD_RESULT F_API FMOD_Channel_SetLowPassGain (FMOD_CHANNEL *channel, float gain);+FMOD_RESULT F_API FMOD_Channel_GetLowPassGain (FMOD_CHANNEL *channel, float *gain);++FMOD_RESULT F_API FMOD_Channel_SetChannelGroup (FMOD_CHANNEL *channel, FMOD_CHANNELGROUP *channelgroup);+FMOD_RESULT F_API FMOD_Channel_GetChannelGroup (FMOD_CHANNEL *channel, FMOD_CHANNELGROUP **channelgroup);+FMOD_RESULT F_API FMOD_Channel_SetCallback (FMOD_CHANNEL *channel, FMOD_CHANNEL_CALLBACK callback);++/*+ 3D functionality.+*/++FMOD_RESULT F_API FMOD_Channel_Set3DAttributes (FMOD_CHANNEL *channel, const FMOD_VECTOR *pos, const FMOD_VECTOR *vel);+FMOD_RESULT F_API FMOD_Channel_Get3DAttributes (FMOD_CHANNEL *channel, FMOD_VECTOR *pos, FMOD_VECTOR *vel);+FMOD_RESULT F_API FMOD_Channel_Set3DMinMaxDistance (FMOD_CHANNEL *channel, float mindistance, float maxdistance);+FMOD_RESULT F_API FMOD_Channel_Get3DMinMaxDistance (FMOD_CHANNEL *channel, float *mindistance, float *maxdistance);+FMOD_RESULT F_API FMOD_Channel_Set3DConeSettings (FMOD_CHANNEL *channel, float insideconeangle, float outsideconeangle, float outsidevolume);+FMOD_RESULT F_API FMOD_Channel_Get3DConeSettings (FMOD_CHANNEL *channel, float *insideconeangle, float *outsideconeangle, float *outsidevolume);+FMOD_RESULT F_API FMOD_Channel_Set3DConeOrientation (FMOD_CHANNEL *channel, FMOD_VECTOR *orientation);+FMOD_RESULT F_API FMOD_Channel_Get3DConeOrientation (FMOD_CHANNEL *channel, FMOD_VECTOR *orientation);+FMOD_RESULT F_API FMOD_Channel_Set3DCustomRolloff (FMOD_CHANNEL *channel, FMOD_VECTOR *points, int numpoints);+FMOD_RESULT F_API FMOD_Channel_Get3DCustomRolloff (FMOD_CHANNEL *channel, FMOD_VECTOR **points, int *numpoints);+FMOD_RESULT F_API FMOD_Channel_Set3DOcclusion (FMOD_CHANNEL *channel, float directocclusion, float reverbocclusion);+FMOD_RESULT F_API FMOD_Channel_Get3DOcclusion (FMOD_CHANNEL *channel, float *directocclusion, float *reverbocclusion);+FMOD_RESULT F_API FMOD_Channel_Set3DSpread (FMOD_CHANNEL *channel, float angle);+FMOD_RESULT F_API FMOD_Channel_Get3DSpread (FMOD_CHANNEL *channel, float *angle);+FMOD_RESULT F_API FMOD_Channel_Set3DPanLevel (FMOD_CHANNEL *channel, float level);+FMOD_RESULT F_API FMOD_Channel_Get3DPanLevel (FMOD_CHANNEL *channel, float *level);+FMOD_RESULT F_API FMOD_Channel_Set3DDopplerLevel (FMOD_CHANNEL *channel, float level);+FMOD_RESULT F_API FMOD_Channel_Get3DDopplerLevel (FMOD_CHANNEL *channel, float *level);+FMOD_RESULT F_API FMOD_Channel_Set3DDistanceFilter (FMOD_CHANNEL *channel, FMOD_BOOL custom, float customLevel, float centerFreq);+FMOD_RESULT F_API FMOD_Channel_Get3DDistanceFilter (FMOD_CHANNEL *channel, FMOD_BOOL *custom, float *customLevel, float *centerFreq);++/*+ DSP functionality only for channels playing sounds created with FMOD_SOFTWARE.+*/++FMOD_RESULT F_API FMOD_Channel_GetDSPHead (FMOD_CHANNEL *channel, FMOD_DSP **dsp);+FMOD_RESULT F_API FMOD_Channel_AddDSP (FMOD_CHANNEL *channel, FMOD_DSP *dsp, FMOD_DSPCONNECTION **connection);++/*+ Information only functions.+*/++FMOD_RESULT F_API FMOD_Channel_IsPlaying (FMOD_CHANNEL *channel, FMOD_BOOL *isplaying);+FMOD_RESULT F_API FMOD_Channel_IsVirtual (FMOD_CHANNEL *channel, FMOD_BOOL *isvirtual);+FMOD_RESULT F_API FMOD_Channel_GetAudibility (FMOD_CHANNEL *channel, float *audibility);+FMOD_RESULT F_API FMOD_Channel_GetCurrentSound (FMOD_CHANNEL *channel, FMOD_SOUND **sound);+FMOD_RESULT F_API FMOD_Channel_GetSpectrum (FMOD_CHANNEL *channel, float *spectrumarray, int numvalues, int channeloffset, FMOD_DSP_FFT_WINDOW windowtype);+FMOD_RESULT F_API FMOD_Channel_GetWaveData (FMOD_CHANNEL *channel, float *wavearray, int numvalues, int channeloffset);+FMOD_RESULT F_API FMOD_Channel_GetIndex (FMOD_CHANNEL *channel, int *index);++/*+ Functions also found in Sound class but here they can be set per channel.+*/++FMOD_RESULT F_API FMOD_Channel_SetMode (FMOD_CHANNEL *channel, FMOD_MODE mode);+FMOD_RESULT F_API FMOD_Channel_GetMode (FMOD_CHANNEL *channel, FMOD_MODE *mode);+FMOD_RESULT F_API FMOD_Channel_SetLoopCount (FMOD_CHANNEL *channel, int loopcount);+FMOD_RESULT F_API FMOD_Channel_GetLoopCount (FMOD_CHANNEL *channel, int *loopcount);+FMOD_RESULT F_API FMOD_Channel_SetLoopPoints (FMOD_CHANNEL *channel, unsigned int loopstart, FMOD_TIMEUNIT loopstarttype, unsigned int loopend, FMOD_TIMEUNIT loopendtype);+FMOD_RESULT F_API FMOD_Channel_GetLoopPoints (FMOD_CHANNEL *channel, unsigned int *loopstart, FMOD_TIMEUNIT loopstarttype, unsigned int *loopend, FMOD_TIMEUNIT loopendtype);++/*+ Userdata set/get. +*/++FMOD_RESULT F_API FMOD_Channel_SetUserData (FMOD_CHANNEL *channel, void *userdata);+FMOD_RESULT F_API FMOD_Channel_GetUserData (FMOD_CHANNEL *channel, void **userdata);++FMOD_RESULT F_API FMOD_Channel_GetMemoryInfo (FMOD_CHANNEL *channel, unsigned int memorybits, unsigned int event_memorybits, unsigned int *memoryused, FMOD_MEMORY_USAGE_DETAILS *memoryused_details);++/*+ 'ChannelGroup' API+*/++FMOD_RESULT F_API FMOD_ChannelGroup_Release (FMOD_CHANNELGROUP *channelgroup);+FMOD_RESULT F_API FMOD_ChannelGroup_GetSystemObject (FMOD_CHANNELGROUP *channelgroup, FMOD_SYSTEM **system);++/*+ Channelgroup scale values. (changes attributes relative to the channels, doesn't overwrite them)+*/++FMOD_RESULT F_API FMOD_ChannelGroup_SetVolume (FMOD_CHANNELGROUP *channelgroup, float volume);+FMOD_RESULT F_API FMOD_ChannelGroup_GetVolume (FMOD_CHANNELGROUP *channelgroup, float *volume);+FMOD_RESULT F_API FMOD_ChannelGroup_SetPitch (FMOD_CHANNELGROUP *channelgroup, float pitch);+FMOD_RESULT F_API FMOD_ChannelGroup_GetPitch (FMOD_CHANNELGROUP *channelgroup, float *pitch);+FMOD_RESULT F_API FMOD_ChannelGroup_Set3DOcclusion (FMOD_CHANNELGROUP *channelgroup, float directocclusion, float reverbocclusion);+FMOD_RESULT F_API FMOD_ChannelGroup_Get3DOcclusion (FMOD_CHANNELGROUP *channelgroup, float *directocclusion, float *reverbocclusion);+FMOD_RESULT F_API FMOD_ChannelGroup_SetPaused (FMOD_CHANNELGROUP *channelgroup, FMOD_BOOL paused);+FMOD_RESULT F_API FMOD_ChannelGroup_GetPaused (FMOD_CHANNELGROUP *channelgroup, FMOD_BOOL *paused);+FMOD_RESULT F_API FMOD_ChannelGroup_SetMute (FMOD_CHANNELGROUP *channelgroup, FMOD_BOOL mute);+FMOD_RESULT F_API FMOD_ChannelGroup_GetMute (FMOD_CHANNELGROUP *channelgroup, FMOD_BOOL *mute);++/*+ Channelgroup override values. (recursively overwrites whatever settings the channels had)+*/++FMOD_RESULT F_API FMOD_ChannelGroup_Stop (FMOD_CHANNELGROUP *channelgroup);+FMOD_RESULT F_API FMOD_ChannelGroup_OverrideVolume (FMOD_CHANNELGROUP *channelgroup, float volume);+FMOD_RESULT F_API FMOD_ChannelGroup_OverrideFrequency(FMOD_CHANNELGROUP *channelgroup, float frequency);+FMOD_RESULT F_API FMOD_ChannelGroup_OverridePan (FMOD_CHANNELGROUP *channelgroup, float pan);+FMOD_RESULT F_API FMOD_ChannelGroup_OverrideReverbProperties(FMOD_CHANNELGROUP *channelgroup, const FMOD_REVERB_CHANNELPROPERTIES *prop);+FMOD_RESULT F_API FMOD_ChannelGroup_Override3DAttributes(FMOD_CHANNELGROUP *channelgroup, const FMOD_VECTOR *pos, const FMOD_VECTOR *vel);+FMOD_RESULT F_API FMOD_ChannelGroup_OverrideSpeakerMix(FMOD_CHANNELGROUP *channelgroup, float frontleft, float frontright, float center, float lfe, float backleft, float backright, float sideleft, float sideright);++/*+ Nested channel groups.+*/++FMOD_RESULT F_API FMOD_ChannelGroup_AddGroup (FMOD_CHANNELGROUP *channelgroup, FMOD_CHANNELGROUP *group);+FMOD_RESULT F_API FMOD_ChannelGroup_GetNumGroups (FMOD_CHANNELGROUP *channelgroup, int *numgroups);+FMOD_RESULT F_API FMOD_ChannelGroup_GetGroup (FMOD_CHANNELGROUP *channelgroup, int index, FMOD_CHANNELGROUP **group);+FMOD_RESULT F_API FMOD_ChannelGroup_GetParentGroup (FMOD_CHANNELGROUP *channelgroup, FMOD_CHANNELGROUP **group);++/*+ DSP functionality only for channel groups playing sounds created with FMOD_SOFTWARE.+*/++FMOD_RESULT F_API FMOD_ChannelGroup_GetDSPHead (FMOD_CHANNELGROUP *channelgroup, FMOD_DSP **dsp);+FMOD_RESULT F_API FMOD_ChannelGroup_AddDSP (FMOD_CHANNELGROUP *channelgroup, FMOD_DSP *dsp, FMOD_DSPCONNECTION **connection);++/*+ Information only functions.+*/++FMOD_RESULT F_API FMOD_ChannelGroup_GetName (FMOD_CHANNELGROUP *channelgroup, char *name, int namelen);+FMOD_RESULT F_API FMOD_ChannelGroup_GetNumChannels (FMOD_CHANNELGROUP *channelgroup, int *numchannels);+FMOD_RESULT F_API FMOD_ChannelGroup_GetChannel (FMOD_CHANNELGROUP *channelgroup, int index, FMOD_CHANNEL **channel);+FMOD_RESULT F_API FMOD_ChannelGroup_GetSpectrum (FMOD_CHANNELGROUP *channelgroup, float *spectrumarray, int numvalues, int channeloffset, FMOD_DSP_FFT_WINDOW windowtype);+FMOD_RESULT F_API FMOD_ChannelGroup_GetWaveData (FMOD_CHANNELGROUP *channelgroup, float *wavearray, int numvalues, int channeloffset);++/*+ Userdata set/get.+*/++FMOD_RESULT F_API FMOD_ChannelGroup_SetUserData (FMOD_CHANNELGROUP *channelgroup, void *userdata);+FMOD_RESULT F_API FMOD_ChannelGroup_GetUserData (FMOD_CHANNELGROUP *channelgroup, void **userdata);++FMOD_RESULT F_API FMOD_ChannelGroup_GetMemoryInfo (FMOD_CHANNELGROUP *channelgroup, unsigned int memorybits, unsigned int event_memorybits, unsigned int *memoryused, FMOD_MEMORY_USAGE_DETAILS *memoryused_details);++/*+ 'SoundGroup' API+*/++FMOD_RESULT F_API FMOD_SoundGroup_Release (FMOD_SOUNDGROUP *soundgroup);+FMOD_RESULT F_API FMOD_SoundGroup_GetSystemObject (FMOD_SOUNDGROUP *soundgroup, FMOD_SYSTEM **system);++/*+ SoundGroup control functions.+*/++FMOD_RESULT F_API FMOD_SoundGroup_SetMaxAudible (FMOD_SOUNDGROUP *soundgroup, int maxaudible);+FMOD_RESULT F_API FMOD_SoundGroup_GetMaxAudible (FMOD_SOUNDGROUP *soundgroup, int *maxaudible);+FMOD_RESULT F_API FMOD_SoundGroup_SetMaxAudibleBehavior(FMOD_SOUNDGROUP *soundgroup, FMOD_SOUNDGROUP_BEHAVIOR behavior);+FMOD_RESULT F_API FMOD_SoundGroup_GetMaxAudibleBehavior(FMOD_SOUNDGROUP *soundgroup, FMOD_SOUNDGROUP_BEHAVIOR *behavior);+FMOD_RESULT F_API FMOD_SoundGroup_SetMuteFadeSpeed (FMOD_SOUNDGROUP *soundgroup, float speed);+FMOD_RESULT F_API FMOD_SoundGroup_GetMuteFadeSpeed (FMOD_SOUNDGROUP *soundgroup, float *speed);+FMOD_RESULT F_API FMOD_SoundGroup_SetVolume (FMOD_SOUNDGROUP *soundgroup, float volume);+FMOD_RESULT F_API FMOD_SoundGroup_GetVolume (FMOD_SOUNDGROUP *soundgroup, float *volume);+FMOD_RESULT F_API FMOD_SoundGroup_Stop (FMOD_SOUNDGROUP *soundgroup);++/*+ Information only functions.+*/++FMOD_RESULT F_API FMOD_SoundGroup_GetName (FMOD_SOUNDGROUP *soundgroup, char *name, int namelen);+FMOD_RESULT F_API FMOD_SoundGroup_GetNumSounds (FMOD_SOUNDGROUP *soundgroup, int *numsounds);+FMOD_RESULT F_API FMOD_SoundGroup_GetSound (FMOD_SOUNDGROUP *soundgroup, int index, FMOD_SOUND **sound);+FMOD_RESULT F_API FMOD_SoundGroup_GetNumPlaying (FMOD_SOUNDGROUP *soundgroup, int *numplaying);++/*+ Userdata set/get.+*/++FMOD_RESULT F_API FMOD_SoundGroup_SetUserData (FMOD_SOUNDGROUP *soundgroup, void *userdata);+FMOD_RESULT F_API FMOD_SoundGroup_GetUserData (FMOD_SOUNDGROUP *soundgroup, void **userdata);++FMOD_RESULT F_API FMOD_SoundGroup_GetMemoryInfo (FMOD_SOUNDGROUP *soundgroup, unsigned int memorybits, unsigned int event_memorybits, unsigned int *memoryused, FMOD_MEMORY_USAGE_DETAILS *memoryused_details);++/*+ 'DSP' API+*/++FMOD_RESULT F_API FMOD_DSP_Release (FMOD_DSP *dsp);+FMOD_RESULT F_API FMOD_DSP_GetSystemObject (FMOD_DSP *dsp, FMOD_SYSTEM **system);++/*+ Connection / disconnection / input and output enumeration.+*/++FMOD_RESULT F_API FMOD_DSP_AddInput (FMOD_DSP *dsp, FMOD_DSP *target, FMOD_DSPCONNECTION **connection);+FMOD_RESULT F_API FMOD_DSP_DisconnectFrom (FMOD_DSP *dsp, FMOD_DSP *target);+FMOD_RESULT F_API FMOD_DSP_DisconnectAll (FMOD_DSP *dsp, FMOD_BOOL inputs, FMOD_BOOL outputs);+FMOD_RESULT F_API FMOD_DSP_Remove (FMOD_DSP *dsp);+FMOD_RESULT F_API FMOD_DSP_GetNumInputs (FMOD_DSP *dsp, int *numinputs);+FMOD_RESULT F_API FMOD_DSP_GetNumOutputs (FMOD_DSP *dsp, int *numoutputs);+FMOD_RESULT F_API FMOD_DSP_GetInput (FMOD_DSP *dsp, int index, FMOD_DSP **input, FMOD_DSPCONNECTION **inputconnection);+FMOD_RESULT F_API FMOD_DSP_GetOutput (FMOD_DSP *dsp, int index, FMOD_DSP **output, FMOD_DSPCONNECTION **outputconnection);++/*+ DSP unit control.+*/++FMOD_RESULT F_API FMOD_DSP_SetActive (FMOD_DSP *dsp, FMOD_BOOL active);+FMOD_RESULT F_API FMOD_DSP_GetActive (FMOD_DSP *dsp, FMOD_BOOL *active);+FMOD_RESULT F_API FMOD_DSP_SetBypass (FMOD_DSP *dsp, FMOD_BOOL bypass);+FMOD_RESULT F_API FMOD_DSP_GetBypass (FMOD_DSP *dsp, FMOD_BOOL *bypass);+FMOD_RESULT F_API FMOD_DSP_SetSpeakerActive (FMOD_DSP *dsp, FMOD_SPEAKER speaker, FMOD_BOOL active);+FMOD_RESULT F_API FMOD_DSP_GetSpeakerActive (FMOD_DSP *dsp, FMOD_SPEAKER speaker, FMOD_BOOL *active);+FMOD_RESULT F_API FMOD_DSP_Reset (FMOD_DSP *dsp);++/*+ DSP parameter control.+*/++FMOD_RESULT F_API FMOD_DSP_SetParameter (FMOD_DSP *dsp, int index, float value);+FMOD_RESULT F_API FMOD_DSP_GetParameter (FMOD_DSP *dsp, int index, float *value, char *valuestr, int valuestrlen);+FMOD_RESULT F_API FMOD_DSP_GetNumParameters (FMOD_DSP *dsp, int *numparams);+FMOD_RESULT F_API FMOD_DSP_GetParameterInfo (FMOD_DSP *dsp, int index, char *name, char *label, char *description, int descriptionlen, float *min, float *max);+FMOD_RESULT F_API FMOD_DSP_ShowConfigDialog (FMOD_DSP *dsp, void *hwnd, FMOD_BOOL show);++/*+ DSP attributes. +*/++FMOD_RESULT F_API FMOD_DSP_GetInfo (FMOD_DSP *dsp, char *name, unsigned int *version, int *channels, int *configwidth, int *configheight);+FMOD_RESULT F_API FMOD_DSP_GetType (FMOD_DSP *dsp, FMOD_DSP_TYPE *type);+FMOD_RESULT F_API FMOD_DSP_SetDefaults (FMOD_DSP *dsp, float frequency, float volume, float pan, int priority);+FMOD_RESULT F_API FMOD_DSP_GetDefaults (FMOD_DSP *dsp, float *frequency, float *volume, float *pan, int *priority);++/*+ Userdata set/get.+*/++FMOD_RESULT F_API FMOD_DSP_SetUserData (FMOD_DSP *dsp, void *userdata);+FMOD_RESULT F_API FMOD_DSP_GetUserData (FMOD_DSP *dsp, void **userdata);++FMOD_RESULT F_API FMOD_DSP_GetMemoryInfo (FMOD_DSP *dsp, unsigned int memorybits, unsigned int event_memorybits, unsigned int *memoryused, FMOD_MEMORY_USAGE_DETAILS *memoryused_details);++/*+ 'DSPConnection' API+*/++FMOD_RESULT F_API FMOD_DSPConnection_GetInput (FMOD_DSPCONNECTION *dspconnection, FMOD_DSP **input);+FMOD_RESULT F_API FMOD_DSPConnection_GetOutput (FMOD_DSPCONNECTION *dspconnection, FMOD_DSP **output);+FMOD_RESULT F_API FMOD_DSPConnection_SetMix (FMOD_DSPCONNECTION *dspconnection, float volume);+FMOD_RESULT F_API FMOD_DSPConnection_GetMix (FMOD_DSPCONNECTION *dspconnection, float *volume);+FMOD_RESULT F_API FMOD_DSPConnection_SetLevels (FMOD_DSPCONNECTION *dspconnection, FMOD_SPEAKER speaker, float *levels, int numlevels);+FMOD_RESULT F_API FMOD_DSPConnection_GetLevels (FMOD_DSPCONNECTION *dspconnection, FMOD_SPEAKER speaker, float *levels, int numlevels);++/*+ Userdata set/get.+*/++FMOD_RESULT F_API FMOD_DSPConnection_SetUserData (FMOD_DSPCONNECTION *dspconnection, void *userdata);+FMOD_RESULT F_API FMOD_DSPConnection_GetUserData (FMOD_DSPCONNECTION *dspconnection, void **userdata);++FMOD_RESULT F_API FMOD_DSPConnection_GetMemoryInfo (FMOD_DSPCONNECTION *dspconnection, unsigned int memorybits, unsigned int event_memorybits, unsigned int *memoryused, FMOD_MEMORY_USAGE_DETAILS *memoryused_details);++/*+ 'Geometry' API+*/++FMOD_RESULT F_API FMOD_Geometry_Release (FMOD_GEOMETRY *geometry);++/*+ Polygon manipulation.+*/++FMOD_RESULT F_API FMOD_Geometry_AddPolygon (FMOD_GEOMETRY *geometry, float directocclusion, float reverbocclusion, FMOD_BOOL doublesided, int numvertices, const FMOD_VECTOR *vertices, int *polygonindex);+FMOD_RESULT F_API FMOD_Geometry_GetNumPolygons (FMOD_GEOMETRY *geometry, int *numpolygons);+FMOD_RESULT F_API FMOD_Geometry_GetMaxPolygons (FMOD_GEOMETRY *geometry, int *maxpolygons, int *maxvertices);+FMOD_RESULT F_API FMOD_Geometry_GetPolygonNumVertices(FMOD_GEOMETRY *geometry, int index, int *numvertices);+FMOD_RESULT F_API FMOD_Geometry_SetPolygonVertex (FMOD_GEOMETRY *geometry, int index, int vertexindex, const FMOD_VECTOR *vertex);+FMOD_RESULT F_API FMOD_Geometry_GetPolygonVertex (FMOD_GEOMETRY *geometry, int index, int vertexindex, FMOD_VECTOR *vertex);+FMOD_RESULT F_API FMOD_Geometry_SetPolygonAttributes (FMOD_GEOMETRY *geometry, int index, float directocclusion, float reverbocclusion, FMOD_BOOL doublesided);+FMOD_RESULT F_API FMOD_Geometry_GetPolygonAttributes (FMOD_GEOMETRY *geometry, int index, float *directocclusion, float *reverbocclusion, FMOD_BOOL *doublesided);++/*+ Object manipulation.+*/++FMOD_RESULT F_API FMOD_Geometry_SetActive (FMOD_GEOMETRY *geometry, FMOD_BOOL active);+FMOD_RESULT F_API FMOD_Geometry_GetActive (FMOD_GEOMETRY *geometry, FMOD_BOOL *active);+FMOD_RESULT F_API FMOD_Geometry_SetRotation (FMOD_GEOMETRY *geometry, const FMOD_VECTOR *forward, const FMOD_VECTOR *up);+FMOD_RESULT F_API FMOD_Geometry_GetRotation (FMOD_GEOMETRY *geometry, FMOD_VECTOR *forward, FMOD_VECTOR *up);+FMOD_RESULT F_API FMOD_Geometry_SetPosition (FMOD_GEOMETRY *geometry, const FMOD_VECTOR *position);+FMOD_RESULT F_API FMOD_Geometry_GetPosition (FMOD_GEOMETRY *geometry, FMOD_VECTOR *position);+FMOD_RESULT F_API FMOD_Geometry_SetScale (FMOD_GEOMETRY *geometry, const FMOD_VECTOR *scale);+FMOD_RESULT F_API FMOD_Geometry_GetScale (FMOD_GEOMETRY *geometry, FMOD_VECTOR *scale);+FMOD_RESULT F_API FMOD_Geometry_Save (FMOD_GEOMETRY *geometry, void *data, int *datasize);++/*+ Userdata set/get.+*/++FMOD_RESULT F_API FMOD_Geometry_SetUserData (FMOD_GEOMETRY *geometry, void *userdata);+FMOD_RESULT F_API FMOD_Geometry_GetUserData (FMOD_GEOMETRY *geometry, void **userdata);++FMOD_RESULT F_API FMOD_Geometry_GetMemoryInfo (FMOD_GEOMETRY *geometry, unsigned int memorybits, unsigned int event_memorybits, unsigned int *memoryused, FMOD_MEMORY_USAGE_DETAILS *memoryused_details);++/*+ 'Reverb' API+*/++FMOD_RESULT F_API FMOD_Reverb_Release (FMOD_REVERB *reverb);++/*+ Reverb manipulation.+*/++FMOD_RESULT F_API FMOD_Reverb_Set3DAttributes (FMOD_REVERB *reverb, const FMOD_VECTOR *position, float mindistance, float maxdistance);+FMOD_RESULT F_API FMOD_Reverb_Get3DAttributes (FMOD_REVERB *reverb, FMOD_VECTOR *position, float *mindistance, float *maxdistance);+FMOD_RESULT F_API FMOD_Reverb_SetProperties (FMOD_REVERB *reverb, const FMOD_REVERB_PROPERTIES *properties);+FMOD_RESULT F_API FMOD_Reverb_GetProperties (FMOD_REVERB *reverb, FMOD_REVERB_PROPERTIES *properties);+FMOD_RESULT F_API FMOD_Reverb_SetActive (FMOD_REVERB *reverb, FMOD_BOOL active);+FMOD_RESULT F_API FMOD_Reverb_GetActive (FMOD_REVERB *reverb, FMOD_BOOL *active);++/*+ Userdata set/get.+*/++FMOD_RESULT F_API FMOD_Reverb_SetUserData (FMOD_REVERB *reverb, void *userdata);+FMOD_RESULT F_API FMOD_Reverb_GetUserData (FMOD_REVERB *reverb, void **userdata);++FMOD_RESULT F_API FMOD_Reverb_GetMemoryInfo (FMOD_REVERB *reverb, unsigned int memorybits, unsigned int event_memorybits, unsigned int *memoryused, FMOD_MEMORY_USAGE_DETAILS *memoryused_details);++#endif
+ Sound/FModEx/Raw/Core/Types.hsc view
@@ -0,0 +1,720 @@+{-# LANGUAGE CPP, ForeignFunctionInterface #-}++{- |+Module : Sound.FModEx.Raw.Core.Types+Description : FModEx library C types binding+Copyright : (c) Dimitri Sabadie+License : GPL-3++Maintainer : dimitri.sabadie@gmail.com+Stability : experimental+Portability : Linux only for now++FModEx API C core types raw Haskell binding.+-}++module Sound.FModEx.Raw.Core.Types where++import Foreign.C.String+import Foreign.C.Types+import Foreign.Ptr++#include <fmodex/fmod.h>++-- FMOD types+type FModBool = CInt+data FModSystem = FModSystem deriving (Eq,Show)+data FModSound = FModSound deriving (Eq,Show)+data FModChannel = FModChannel deriving (Eq,Show)+data FModChannelGroup = FModChannelGroup deriving (Eq,Show)+data FModSoundGroup = FModSoundGroup deriving (Eq,Show)+data FModReverb = FModReverb deriving (Eq,Show)+data FModDSP = FModDSP deriving (Eq,Show)+data FModDSPConnection = FModDSPConnection deriving (Eq,Show)+data FModPolygon = FModPolygon deriving (Eq,Show)+data FModGeometry = FModGeometry deriving (Eq,Show)+data FModSyncPoint = FModSyncPoint deriving (Eq,Show)++-- FMOD_RESULT+newtype FModResult = FModResult CInt deriving (Eq,Show)+#{enum FModResult, FModResult+ , fmod_OK = FMOD_OK+ , fmod_ERR_ALREADYLOCKED = FMOD_ERR_ALREADYLOCKED+ , fmod_ERR_BADCOMMAND = FMOD_ERR_BADCOMMAND+ , fmod_ERR_CDDA_DRIVERS = FMOD_ERR_CDDA_DRIVERS+ , fmod_ERR_CDDA_INIT = FMOD_ERR_CDDA_INIT+ , fmod_ERR_CDDA_INVALID_DEVICE = FMOD_ERR_CDDA_INVALID_DEVICE+ , fmod_ERR_CDDA_NOAUDIO = FMOD_ERR_CDDA_NOAUDIO+ , fmod_ERR_CDDA_NODEVICES = FMOD_ERR_CDDA_NODEVICES+ , fmod_ERR_CDDA_NODISC = FMOD_ERR_CDDA_NODISC+ , fmod_ERR_CDDA_READ = FMOD_ERR_CDDA_READ+ , fmod_ERR_CHANNEL_ALLOC = FMOD_ERR_CHANNEL_ALLOC+ , fmod_ERR_CHANNEL_STOLEN = FMOD_ERR_CHANNEL_STOLEN+ , fmod_ERR_COM = FMOD_ERR_COM+ , fmod_ERR_DMA = FMOD_ERR_DMA+ , fmod_ERR_DSP_CONNECTION = FMOD_ERR_DSP_CONNECTION+ , fmod_ERR_DSP_FORMAT = FMOD_ERR_DSP_FORMAT+ , fmod_ERR_DSP_NOTFOUND = FMOD_ERR_DSP_NOTFOUND+ , fmod_ERR_DSP_RUNNING = FMOD_ERR_DSP_RUNNING+ , fmod_ERR_DSP_TOOMANYCONNECTIONS = FMOD_ERR_DSP_TOOMANYCONNECTIONS+ , fmod_ERR_FILE_BAD = FMOD_ERR_FILE_BAD+ , fmod_ERR_FILE_COULDNOTSEEK = FMOD_ERR_FILE_COULDNOTSEEK+ , fmod_ERR_FILE_DISKEJECTED = FMOD_ERR_FILE_DISKEJECTED+ , fmod_ERR_FILE_EOF = FMOD_ERR_FILE_EOF+ , fmod_ERR_FILE_NOTFOUND = FMOD_ERR_FILE_NOTFOUND+ , fmod_ERR_FILE_UNWANTED = FMOD_ERR_FILE_UNWANTED+ , fmod_ERR_FORMAT = FMOD_ERR_FORMAT+ , fmod_ERR_HTTP = FMOD_ERR_HTTP+ , fmod_ERR_HTTP_ACCESS = FMOD_ERR_HTTP_ACCESS+ , fmod_ERR_HTTP_PROXY_AUTH = FMOD_ERR_HTTP_PROXY_AUTH+ , fmod_ERR_HTTP_SERVER_ERROR = FMOD_ERR_HTTP_SERVER_ERROR+ , fmod_ERR_HTTP_TIMEOUT = FMOD_ERR_HTTP_TIMEOUT+ , fmod_ERR_INITIALIZATION = FMOD_ERR_INITIALIZATION+ , fmod_ERR_INITIALIZED = FMOD_ERR_INITIALIZED+ , fmod_ERR_INTERNAL = FMOD_ERR_INTERNAL+ , fmod_ERR_INVALID_ADDRESS = FMOD_ERR_INVALID_ADDRESS+ , fmod_ERR_INVALID_FLOAT = FMOD_ERR_INVALID_FLOAT+ , fmod_ERR_INVALID_HANDLE = FMOD_ERR_INVALID_HANDLE+ , fmod_ERR_INVALID_PARAM = FMOD_ERR_INVALID_PARAM+ , fmod_ERR_INVALID_POSITION = FMOD_ERR_INVALID_POSITION+ , fmod_ERR_INVALID_SPEAKER = FMOD_ERR_INVALID_SPEAKER+ , fmod_ERR_INVALID_SYNCPOINT = FMOD_ERR_INVALID_SYNCPOINT+ , fmod_ERR_INVALID_VECTOR = FMOD_ERR_INVALID_VECTOR+ , fmod_ERR_MAXAUDIBLE = FMOD_ERR_MAXAUDIBLE+ , fmod_ERR_MEMORY = FMOD_ERR_MEMORY+ , fmod_ERR_MEMORY_CANTPOINT = FMOD_ERR_MEMORY_CANTPOINT+ , fmod_ERR_MEMORY_SRAM = FMOD_ERR_MEMORY_SRAM+ , fmod_ERR_NEEDS2D = FMOD_ERR_NEEDS2D+ , fmod_ERR_NEEDS3D = FMOD_ERR_NEEDS3D+ , fmod_ERR_NEEDSHARDWARE = FMOD_ERR_NEEDSHARDWARE+ , fmod_ERR_NEEDSSOFTWARE = FMOD_ERR_NEEDSSOFTWARE+ , fmod_ERR_NET_CONNECT = FMOD_ERR_NET_CONNECT+ , fmod_ERR_NET_SOCKET_ERROR = FMOD_ERR_NET_SOCKET_ERROR+ , fmod_ERR_NET_URL = FMOD_ERR_NET_URL+ , fmod_ERR_NET_WOULD_BLOCK = FMOD_ERR_NET_WOULD_BLOCK+ , fmod_ERR_NOTREADY = FMOD_ERR_NOTREADY+ , fmod_ERR_OUTPUT_ALLOCATED = FMOD_ERR_OUTPUT_ALLOCATED+ , fmod_ERR_OUTPUT_CREATEBUFFER = FMOD_ERR_OUTPUT_CREATEBUFFER+ , fmod_ERR_OUTPUT_DRIVERCALL = FMOD_ERR_OUTPUT_DRIVERCALL+ , fmod_ERR_OUTPUT_ENUMERATION = FMOD_ERR_OUTPUT_ENUMERATION+ , fmod_ERR_OUTPUT_FORMAT = FMOD_ERR_OUTPUT_FORMAT+ , fmod_ERR_OUTPUT_INIT = FMOD_ERR_OUTPUT_INIT+ , fmod_ERR_OUTPUT_NOHARDWARE = FMOD_ERR_OUTPUT_NOHARDWARE+ , fmod_ERR_OUTPUT_NOSOFTWARE = FMOD_ERR_OUTPUT_NOSOFTWARE+ , fmod_ERR_PAN = FMOD_ERR_PAN+ , fmod_ERR_PLUGIN = FMOD_ERR_PLUGIN+ , fmod_ERR_PLUGIN_INSTANCES = FMOD_ERR_PLUGIN_INSTANCES+ , fmod_ERR_PLUGIN_MISSING = FMOD_ERR_PLUGIN_MISSING+ , fmod_ERR_PLUGIN_RESOURCE = FMOD_ERR_PLUGIN_RESOURCE+ , fmod_ERR_PRELOADED = FMOD_ERR_PRELOADED+ , fmod_ERR_PROGRAMMERSOUND = FMOD_ERR_PROGRAMMERSOUND+ , fmod_ERR_RECORD = FMOD_ERR_RECORD+ , fmod_ERR_REVERB_INSTANCE = FMOD_ERR_REVERB_INSTANCE+ , fmod_ERR_SUBSOUND_ALLOCATED = FMOD_ERR_SUBSOUND_ALLOCATED+ , fmod_ERR_SUBSOUND_CANTMOVE = FMOD_ERR_SUBSOUND_CANTMOVE+ , fmod_ERR_SUBSOUND_MODE = FMOD_ERR_SUBSOUND_MODE+ , fmod_ERR_SUBSOUNDS = FMOD_ERR_SUBSOUNDS+ , fmod_ERR_TAGNOTFOUND = FMOD_ERR_TAGNOTFOUND+ , fmod_ERR_TOOMANYCHANNELS = FMOD_ERR_TOOMANYCHANNELS+ , fmod_ERR_UNIMPLEMENTED = FMOD_ERR_UNIMPLEMENTED+ , fmod_ERR_UNINITIALIZED = FMOD_ERR_UNINITIALIZED+ , fmod_ERR_UNSUPPORTED = FMOD_ERR_UNSUPPORTED+ , fmod_ERR_UPDATE = FMOD_ERR_UPDATE+ , fmod_ERR_VERSION = FMOD_ERR_VERSION+ , fmod_ERR_EVENT_FAILED = FMOD_ERR_EVENT_FAILED+ , fmod_ERR_EVENT_INFOONLY = FMOD_ERR_EVENT_INFOONLY+ , fmod_ERR_EVENT_INTERNAL = FMOD_ERR_EVENT_INTERNAL+ , fmod_ERR_EVENT_MAXSTREAMS = FMOD_ERR_EVENT_MAXSTREAMS+ , fmod_ERR_EVENT_MISMATCH = FMOD_ERR_EVENT_MISMATCH+ , fmod_ERR_EVENT_NAMECONFLICT = FMOD_ERR_EVENT_NAMECONFLICT+ , fmod_ERR_EVENT_NOTFOUND = FMOD_ERR_EVENT_NOTFOUND+ , fmod_ERR_EVENT_NEEDSSIMPLE = FMOD_ERR_EVENT_NEEDSSIMPLE+ , fmod_ERR_EVENT_GUIDCONFLICT = FMOD_ERR_EVENT_GUIDCONFLICT+ , fmod_ERR_EVENT_ALREADY_LOADED = FMOD_ERR_EVENT_ALREADY_LOADED+ , fmod_ERR_MUSIC_UNINITIALIZED = FMOD_ERR_MUSIC_UNINITIALIZED+ , fmod_ERR_MUSIC_NOTFOUND = FMOD_ERR_MUSIC_NOTFOUND+ , fmod_ERR_MUSIC_NOCALLBACK = FMOD_ERR_MUSIC_NOCALLBACK+ , fmod_RESULT_FORCEINT = FMOD_RESULT_FORCEINT+ }++-- FMOD_VECTOR+-- FIXME: needs the Storable instance+data FModVector = FModVector {+ fmod_VectorX :: CFloat+ , fmod_VectorY :: CFloat+ } deriving (Eq,Show)++-- FMOD_GUID+-- FIXME: needs the Storable instance+data FModGUID = FModGUID {+ fmod_GUIDData1 :: CUInt+ , fmod_GUIDData2 :: CUShort+ , fmod_GUIDData3 :: CUShort+ , fmod_GUIDData4 :: (CUChar,CUChar,CUChar,CUChar,CUChar,CUChar,CUChar,CUChar)+ } deriving (Eq,Show)++-- FMOD_ASYNCREADINFO+-- FIXME: needs the Storable instance+data FModAsyncReadInfo = FModAsyncReadInfo {+ fmod_AsyncReadInfoHandle :: Ptr ()+ , fmod_AsyncReadInfoOffset :: CUInt+ , fmod_AsyncReadInfoSizeBytes :: CUInt+ , fmod_AsyncReadInfoPriority :: CInt+ , fmod_AsyncReadInfoBuffer :: Ptr ()+ , fmod_AsyncReadInfoBytesRead :: CUInt+ , fmod_AsyncReadInfoResult :: FModResult+ , fmod_AsyncReadInfoUserData :: Ptr ()+ } deriving (Eq,Show)++-- FMOD_OUTPUTTYPE+newtype FModOutputType = FModOutputType CInt deriving (Eq,Show)+#{enum FModOutputType, FModOutputType+ , fmod_OUTPUTTYPE_AUTODECTET = FMOD_OUTPUTTYPE_AUTODETECT+ , fmod_OUTPUTTYPE_UNKNOWN = FMOD_OUTPUTTYPE_UNKNOWN+ , fmod_OUTPUTTYPE_NOSOUND = FMOD_OUTPUTTYPE_NOSOUND+ , fmod_OUTPUTTYPE_WAVWRITER = FMOD_OUTPUTTYPE_WAVWRITER+ , fmod_OUTPUTTYPE_NOSOUND_NRT = FMOD_OUTPUTTYPE_NOSOUND_NRT+ , fmod_OUTPUTTYPE_WAVWRITER_NRT = FMOD_OUTPUTTYPE_WAVWRITER_NRT+ , fmod_OUTPUTTYPE_DSOUND = FMOD_OUTPUTTYPE_DSOUND+ , fmod_OUTPUTTYPE_WINMM = FMOD_OUTPUTTYPE_WINMM+ , fmod_OUTPUTTYPE_WASAPI = FMOD_OUTPUTTYPE_WASAPI+ , fmod_OUTPUTTYPE_ASIO = FMOD_OUTPUTTYPE_ASIO+ , fmod_OUTPUTTYPE_OSS = FMOD_OUTPUTTYPE_OSS+ , fmod_OUTPUTTYPE_ALSA = FMOD_OUTPUTTYPE_ALSA+ , fmod_OUTPUTTYPE_ESD = FMOD_OUTPUTTYPE_ESD+ , fmod_OUTPUTTYPE_PULSEAUDIO = FMOD_OUTPUTTYPE_PULSEAUDIO+ , fmod_OUTPUTTYPE_COREAUDIO = FMOD_OUTPUTTYPE_COREAUDIO+ , fmod_OUTPUTTYPE_XBOX360 = FMOD_OUTPUTTYPE_XBOX360+ , fmod_OUTPUTTYPE_PSP = FMOD_OUTPUTTYPE_PSP+ , fmod_OUTPUTTYPE_PS3 = FMOD_OUTPUTTYPE_NGP+ , fmod_OUTPUTTYPE_WII = FMOD_OUTPUTTYPE_WII+ , fmod_OUTPUTTYPE_3DS = FMOD_OUTPUTTYPE_3DS+ , fmod_OUTPUTTYPE_AUDIOTRACK = FMOD_OUTPUTTYPE_AUDIOTRACK+ , fmod_OUTPUTTYPE_OPENSL = FMOD_OUTPUTTYPE_OPENSL+ , fmod_OUTPUTTYPE_NACL = FMOD_OUTPUTTYPE_NACL+ , fmod_OUTPUTTYPE_WIIU = FMOD_OUTPUTTYPE_WIIU+ , fmod_OUTPUTTYPE_ASOUND = FMOD_OUTPUTTYPE_ASOUND+ , fmod_OUTPUTTYPE_MAX = FMOD_OUTPUTTYPE_MAX+ , fmod_OUTPUTTYPE_FORCEINT = FMOD_OUTPUTTYPE_FORCEINT+ }++-- FMOD_CAPS+newtype FModCaps = FModCaps CUInt deriving (Eq,Show)+#{enum FModCaps, FModCaps+ , fmod_CAPS_NONE = FMOD_CAPS_NONE+ , fmod_CAPS_HARDWARE = FMOD_CAPS_HARDWARE+ , fmod_CAPS_HARDWARE_EMULATED = FMOD_CAPS_HARDWARE_EMULATED+ , fmod_CAPS_OUTPUT_MULTICHANNEL = FMOD_CAPS_OUTPUT_MULTICHANNEL+ , fmod_CAPS_OUTPUT_FORMAT_PCM8 = FMOD_CAPS_OUTPUT_FORMAT_PCM8+ , fmod_CAPS_OUTPUT_FORMAT_PCM16 = FMOD_CAPS_OUTPUT_FORMAT_PCM16+ , fmod_CAPS_OUTPUT_FORMAT_PCM24 = FMOD_CAPS_OUTPUT_FORMAT_PCM24+ , fmod_CAPS_OUTPUT_FORMAT_PCM32 = FMOD_CAPS_OUTPUT_FORMAT_PCM32+ , fmod_CAPS_OUTPUT_FORMAT_PCM_FLOAT = FMOD_CAPS_OUTPUT_FORMAT_PCMFLOAT+ , fmod_CAPS_REVERB_LIMITED = FMOD_CAPS_REVERB_LIMITED+ }++-- FMOD_DEBUGLEVEL+newtype FModDebugLevel = FModDebugLevel CUInt deriving (Eq,Show)+#{enum FModDebugLevel, FModDebugLevel+ , fmod_DEBUG_LEVEL_NONE = FMOD_DEBUG_LEVEL_NONE+ , fmod_DEBUG_LEVEL_LOG = FMOD_DEBUG_LEVEL_LOG+ , fmod_DEBUG_LEVEL_ERROR = FMOD_DEBUG_LEVEL_ERROR+ , fmod_DEBUG_LEVEL_WARNING = FMOD_DEBUG_LEVEL_WARNING+ , fmod_DEBUG_LEVEL_HINT = FMOD_DEBUG_LEVEL_HINT+ , fmod_DEBUG_LEVEL_ALL = FMOD_DEBUG_LEVEL_ALL+ , fmod_DEBUG_TYPE_MEMORY = FMOD_DEBUG_TYPE_MEMORY+ , fmod_DEBUG_TYPE_THREAD = FMOD_DEBUG_TYPE_THREAD+ , fmod_DEBUG_TYPE_FILE = FMOD_DEBUG_TYPE_FILE+ , fmod_DEBUG_TYPE_NET = FMOD_DEBUG_TYPE_NET+ , fmod_DEBUG_TYPE_EVENT = FMOD_DEBUG_TYPE_EVENT+ , fmod_DEBUG_TYPE_ALL = FMOD_DEBUG_TYPE_ALL+ , fmod_DEBUG_DISPLAY_TIMESTAMPS = FMOD_DEBUG_DISPLAY_TIMESTAMPS+ , fmod_DEBUG_DISPLAY_LINENUMBERS = FMOD_DEBUG_DISPLAY_LINENUMBERS+ , fmod_DEBUG_DISPLAY_COMPRESS = FMOD_DEBUG_DISPLAY_COMPRESS+ , fmod_DEBUG_DISPLAY_THREAD = FMOD_DEBUG_DISPLAY_THREAD+ , fmod_DEBUG_DISPLAY_ALL = FMOD_DEBUG_DISPLAY_ALL+ , fmod_DEBUG_ALL = FMOD_DEBUG_ALL+ }++-- FMOD_MEMORYTYPE+newtype FModMemoryType = FModMemoryType CUInt deriving (Eq,Show)+#{enum FModMemoryType, FModMemoryType+ , fmod_MEMORY_NORMAL = FMOD_MEMORY_NORMAL+ , fmod_MEMORY_STREAM_FILE = FMOD_MEMORY_STREAM_FILE+ , fmod_MEMORY_STREAM_DECODE = FMOD_MEMORY_STREAM_DECODE+ , fmod_MEMORY_SAMPLEDATA = FMOD_MEMORY_SAMPLEDATA+ , fmod_MEMORY_DSP_OUTPUTBUFFER = FMOD_MEMORY_DSP_OUTPUTBUFFER+ , fmod_MEMORY_XBOX360_PHYSICAL = FMOD_MEMORY_XBOX360_PHYSICAL+ , fmod_MEMORY_PERSISTENT = FMOD_MEMORY_PERSISTENT+ , fmod_MEMORY_SECONDARY = FMOD_MEMORY_SECONDARY+ , fmod_MEMORY_ALL = FMOD_MEMORY_ALL+ }++-- FMOD_SPEAKERMODE+newtype FModSpeakerMode = FModSpeakerMode CInt deriving (Eq,Show)+#{enum FModSpeakerMode, FModSpeakerMode+ , fmod_SPEAKERMODE_RAW = FMOD_SPEAKERMODE_RAW+ , fmod_SPEAKERMODE_MONO = FMOD_SPEAKERMODE_MONO+ , fmod_SPEAKERMODE_STEREO = FMOD_SPEAKERMODE_STEREO+ , fmod_SPEAKERMODE_QUAD = FMOD_SPEAKERMODE_QUAD+ , fmod_SPEAKERMODE_SURROUND = FMOD_SPEAKERMODE_SURROUND+ , fmod_SPEAKERMODE_5POINT1 = FMOD_SPEAKERMODE_5POINT1+ , fmod_SPEAKERMODE_7POINT1 = FMOD_SPEAKERMODE_7POINT1+ , fmod_SPEAKERMODE_SRS5_1_MATRIX = FMOD_SPEAKERMODE_SRS5_1_MATRIX+ , fmod_SPEAKERMODE_MYEARS = FMOD_SPEAKERMODE_MYEARS+ , fmod_SPEAKERMODE_MAX = FMOD_SPEAKERMODE_MAX+ , fmod_FORCEINT = FMOD_SPEAKERMODE_FORCEINT+ }++-- FMOD_SPEAKER+newtype FModSpeaker = FModSpeaker CInt deriving (Eq,Show)+#{enum FModSpeaker, FModSpeaker+ , fmod_SPEAKER_FRONT_LEFT = FMOD_SPEAKER_FRONT_LEFT+ , fmod_SPEAKER_FRONT_RIGHT = FMOD_SPEAKER_FRONT_RIGHT+ , fmod_SPEAKER_FRONT_CENTER = FMOD_SPEAKER_FRONT_CENTER+ , fmod_SPEAKER_LOW_FREQUENCY = FMOD_SPEAKER_LOW_FREQUENCY+ , fmod_SPEAKER_BACK_LEFT = FMOD_SPEAKER_BACK_LEFT+ , fmod_SPEAKER_BACK_RIGHT = FMOD_SPEAKER_BACK_RIGHT+ , fmod_SPEAKER_SIDE_LEFT = FMOD_SPEAKER_SIDE_LEFT+ , fmod_SPEAKER_SIDE_RIGHT = FMOD_SPEAKER_SIDE_RIGHT+ , fmod_SPEAKER_MAX = FMOD_SPEAKER_MAX+ , fmod_SPEAKER_MONO = FMOD_SPEAKER_MONO+ , fmod_SPEAKER_NULL = FMOD_SPEAKER_NULL+ , fmod_SPEAKER_SBL = FMOD_SPEAKER_SBL+ , fmod_SPEAKER_SBR = FMOD_SPEAKER_SBR+ , fmod_SPEAKER_FORCEINT = FMOD_SPEAKER_FORCEINT+ }++-- FMOD_PLUGINTYPE+newtype FModPluginType = FModPluginType CInt deriving (Eq,Show)+#{enum FModPluginType, FModPluginType+ , fmod_PLUGINTYPE_OUTPUT = FMOD_PLUGINTYPE_OUTPUT+ , fmod_PLUGINTYPE_CODEC = FMOD_PLUGINTYPE_CODEC+ , fmod_PLUGINTYPE_DSP = FMOD_PLUGINTYPE_DSP+ , fmod_PLUGINTYPE_MAX = FMOD_PLUGINTYPE_MAX+ , fmod_PLUGINTYPE_FORCEINT = FMOD_PLUGINTYPE_FORCEINT+ }++-- FMOD_INITFLAGS+newtype FModInitFlags = FModInitFlags CInt deriving (Eq,Show)+#{enum FModInitFlags, FModInitFlags+ , fmod_INIT_NORMAL = FMOD_INIT_NORMAL+ , fmod_INIT_STREAM_FROM_UPDATE = FMOD_INIT_STREAM_FROM_UPDATE+ , fmod_INIT_3D_RIGHTHANDED = FMOD_INIT_3D_RIGHTHANDED+ , fmod_INIT_SOFTWARE_DISABLE = FMOD_INIT_SOFTWARE_DISABLE+ , fmod_INIT_OCCLUSION_LOWPASS = FMOD_INIT_OCCLUSION_LOWPASS+ , fmod_INIT_HRTF_LOWPASS = FMOD_INIT_HRTF_LOWPASS+ , fmod_INIT_DISTANCE_FILTERING = FMOD_INIT_DISTANCE_FILTERING+ , fmod_INIT_SOFTWARE_REVERB_LOWMEM = FMOD_INIT_SOFTWARE_REVERB_LOWMEM+ , fmod_INIT_ENABLE_PROFILE = FMOD_INIT_ENABLE_PROFILE+ , fmod_INIT_VOL0_BECOMES_VIRTUAL = FMOD_INIT_VOL0_BECOMES_VIRTUAL+ , fmod_INIT_WASAPI_EXCLUSIVE = FMOD_INIT_WASAPI_EXCLUSIVE+ , fmod_INIT_PS3_PREFERDTS = FMOD_INIT_PS3_PREFERDTS+ , fmod_INIT_PS3_FORCE2CHLPCM = FMOD_INIT_PS3_FORCE2CHLPCM+ , fmod_INIT_DISABLEDOLBY = FMOD_INIT_DISABLEDOLBY+ , fmod_INIT_SYSTEM_MUSICMUTENOTPAUSE = FMOD_INIT_SYSTEM_MUSICMUTENOTPAUSE+ , fmod_INIT_SYNCMIXERWITHUPDATE = FMOD_INIT_SYNCMIXERWITHUPDATE+ , fmod_INIT_GEOMETRY_USECLOSEST = FMOD_INIT_GEOMETRY_USECLOSEST+ , fmod_INIT_DISABLE_MYEARS_AUTODETECT = FMOD_INIT_DISABLE_MYEARS_AUTODETECT+ , fmod_INIT_PS3_DISABLEDTS = FMOD_INIT_PS3_DISABLEDTS+ , fmod_INIT_PS3_DISABLEDOLBYDIGITAL = FMOD_INIT_PS3_DISABLEDOLBYDIGITAL+ }++-- FMOD_SOUND_TYPE+newtype FModSoundType = FModSoundType CInt deriving (Eq,Show)+#{enum FModSoundType, FModSoundType+ , fmod_SOUND_TYPE_UNKNOWN = FMOD_SOUND_TYPE_UNKNOWN+ , fmod_SOUND_TYPE_AIFF = FMOD_SOUND_TYPE_AIFF+ , fmod_SOUND_TYPE_ASF = FMOD_SOUND_TYPE_ASF+ , fmod_SOUND_TYPE_AT3 = FMOD_SOUND_TYPE_AT3+ , fmod_SOUND_TYPE_CDDA = FMOD_SOUND_TYPE_CDDA+ , fmod_SOUND_TYPE_DLS = FMOD_SOUND_TYPE_DLS+ , fmod_SOUND_TYPE_FLAC = FMOD_SOUND_TYPE_FLAC+ , fmod_SOUND_TYPE_FSB = FMOD_SOUND_TYPE_FSB+ , fmod_SOUND_TYPE_GCADPCM = FMOD_SOUND_TYPE_GCADPCM+ , fmod_SOUND_TYPE_IT = FMOD_SOUND_TYPE_IT+ , fmod_SOUND_TYPE_MIDI = FMOD_SOUND_TYPE_MIDI+ , fmod_SOUND_TYPE_MOD = FMOD_SOUND_TYPE_MOD+ , fmod_SOUND_TYPE_MPEG = FMOD_SOUND_TYPE_MPEG+ , fmod_SOUND_TYPE_OGGVORBIS = FMOD_SOUND_TYPE_OGGVORBIS+ , fmod_SOUND_TYPE_PLAYLIST = FMOD_SOUND_TYPE_PLAYLIST+ , fmod_SOUND_TYPE_RAW = FMOD_SOUND_TYPE_RAW+ , fmod_SOUND_TYPE_S3M = FMOD_SOUND_TYPE_S3M+ , fmod_SOUND_TYPE_SF2 = FMOD_SOUND_TYPE_SF2+ , fmod_SOUND_TYPE_USER = FMOD_SOUND_TYPE_USER+ , fmod_SOUND_TYPE_WAV = FMOD_SOUND_TYPE_WAV+ , fmod_SOUND_TYPE_XM = FMOD_SOUND_TYPE_XM+ , fmod_SOUND_TYPE_XMA = FMOD_SOUND_TYPE_XMA+ , fmod_SOUND_TYPE_VAG = FMOD_SOUND_TYPE_VAG+ , fmod_SOUND_TYPE_AUDIOQUEUE = FMOD_SOUND_TYPE_AUDIOQUEUE+ , fmod_SOUND_TYPE_XWMA = FMOD_SOUND_TYPE_XWMA+ , fmod_SOUND_TYPE_BCWAV = FMOD_SOUND_TYPE_BCWAV+ , fmod_SOUND_TYPE_AT9 = FMOD_SOUND_TYPE_AT9+ , fmod_SOUND_TYPE_VORBIS = FMOD_SOUND_TYPE_VORBIS+ , fmod_SOUND_TYPE_MEDIA_FOUNDATION = FMOD_SOUND_TYPE_MEDIA_FOUNDATION+ , fmod_SOUND_TYPE_MAX = FMOD_SOUND_TYPE_MAX+ , fmod_SOUND_TYPE_FORCEINT = FMOD_SOUND_TYPE_FORCEINT+ }++-- FMOD_SOUND_FORMAT+newtype FModSoundFormat = FModSoundFormat CInt deriving (Eq,Show)+#{enum FModSoundFormat, FModSoundFormat+ , fmod_SOUND_FORMAT_NONE = FMOD_SOUND_FORMAT_NONE+ , fmod_SOUND_FORMAT_PCM8 = FMOD_SOUND_FORMAT_PCM8+ , fmod_SOUND_FORMAT_PCM16 = FMOD_SOUND_FORMAT_PCM16+ , fmod_SOUND_FORMAT_PCM24 = FMOD_SOUND_FORMAT_PCM24+ , fmod_SOUND_FORMAT_PCM32 = FMOD_SOUND_FORMAT_PCM32+ , fmod_SOUND_FORMAT_PCMFLOAT = FMOD_SOUND_FORMAT_PCMFLOAT+ , fmod_SOUND_FORMAT_GCADPCM = FMOD_SOUND_FORMAT_GCADPCM+ , fmod_SOUND_FORMAT_IMAADPCM = FMOD_SOUND_FORMAT_IMAADPCM+ , fmod_SOUND_FORMAT_VAG = FMOD_SOUND_FORMAT_VAG+ , fmod_SOUND_FORMAT_HEVAG = FMOD_SOUND_FORMAT_HEVAG+ , fmod_SOUND_FORMAT_XMA = FMOD_SOUND_FORMAT_XMA+ , fmod_SOUND_FORMAT_MPEG = FMOD_SOUND_FORMAT_MPEG+ , fmod_SOUND_FORMAT_CELT = FMOD_SOUND_FORMAT_CELT+ , fmod_SOUND_FORMAT_AT9 = FMOD_SOUND_FORMAT_AT9+ , fmod_SOUND_FORMAT_XWMA = FMOD_SOUND_FORMAT_XWMA+ , fmod_SOUND_FORMAT_VORBIS = FMOD_SOUND_FORMAT_VORBIS+ , fmod_SOUND_FORMAT_MAX = FMOD_SOUND_FORMAT_MAX+ , fmod_SOUND_FORMAT_FORCEINT = FMOD_SOUND_FORMAT_FORCEINT+ }++-- FMOD_MODE+newtype FModMode = FModMode CUInt deriving (Eq,Show)+#{enum FModMode, FModMode+ , fmod_DEFAULT = FMOD_DEFAULT+ , fmod_LOOP_OFF = FMOD_LOOP_OFF+ , fmod_LOOP_NORMAL = FMOD_LOOP_NORMAL+ , fmod_LOOP_BIDI = FMOD_LOOP_BIDI+ , fmod_2D = FMOD_2D+ , fmod_3D = FMOD_3D+ , fmod_HARDWARE = FMOD_HARDWARE+ , fmod_SOFTWARE = FMOD_SOFTWARE+ , fmod_CREATESTREAM = FMOD_CREATESTREAM+ , fmod_CREATESAMPLE = FMOD_CREATESAMPLE+ , fmod_CREATECOMPRESSEDSAMPLE = FMOD_CREATECOMPRESSEDSAMPLE+ , fmod_OPENUSER = FMOD_OPENUSER+ , fmod_OPENMEMORY = FMOD_OPENMEMORY+ , fmod_OPENMEMORY_POINT = FMOD_OPENMEMORY_POINT+ , fmod_OPENRAW = FMOD_OPENRAW+ , fmod_OPENONLY = FMOD_OPENONLY+ , fmod_ACCURATETIME = FMOD_ACCURATETIME+ , fmod_MPEGSEARCH = FMOD_MPEGSEARCH+ , fmod_NONBLOCKING = FMOD_NONBLOCKING+ , fmod_UNIQUE = FMOD_UNIQUE+ , fmod_3D_HEADRELATIVE = FMOD_3D_HEADRELATIVE+ , fmod_3D_WORLDRELATIVE = FMOD_3D_WORLDRELATIVE+ , fmod_3D_INVERSEROLLOFF = FMOD_3D_INVERSEROLLOFF+ , fmod_3D_LINEARROLLOFF = FMOD_3D_LINEARROLLOFF+ , fmod_3D_LINEARSQUAREROLLOFF = FMOD_3D_LINEARSQUAREROLLOFF+ , fmod_3D_CUSTOMROLLOFF = FMOD_3D_CUSTOMROLLOFF+ , fmod_3D_IGNOREGEOMETRY = FMOD_3D_IGNOREGEOMETRY+ , fmod_UNICODE = FMOD_UNICODE+ , fmod_IGNORETAGS = FMOD_IGNORETAGS+ , fmod_LOWMEM = FMOD_LOWMEM+ , fmod_LOADSECONDARYRAM = FMOD_LOADSECONDARYRAM+ , fmod_VIRTUAL_PLAYFROMSTART = FMOD_VIRTUAL_PLAYFROMSTART+ }++-- FMOD_OPENSTATE+newtype FModOpenState = FModOpenState CInt deriving (Eq,Show)+#{enum FModOpenState, FModOpenState+ , fmod_OPENSTATE_READY = FMOD_OPENSTATE_READY+ , fmod_OPENSTATE_LOADING = FMOD_OPENSTATE_LOADING+ , fmod_OPENSTATE_ERROR = FMOD_OPENSTATE_ERROR+ , fmod_OPENSTATE_CONNECTING = FMOD_OPENSTATE_CONNECTING+ , fmod_OPENSTATE_BUFFERING = FMOD_OPENSTATE_BUFFERING+ , fmod_OPENSTATE_SEEKING = FMOD_OPENSTATE_SEEKING+ , fmod_OPENSTATE_PLAYING = FMOD_OPENSTATE_PLAYING+ , fmod_OPENSTATE_SETPOSITION = FMOD_OPENSTATE_SETPOSITION+ , fmod_OPENSTATE_MAX = FMOD_OPENSTATE_MAX+ , fmod_OPENSTATE_FORCEINT = FMOD_OPENSTATE_FORCEINT+ }++-- FMOD_SOUNDGROUP_BEHAVIOR+newtype FModSoundGroupBehavior = FModSoundGroupBehavior CInt deriving (Eq,Show)+#{enum FModSoundGroupBehavior, FModSoundGroupBehavior+ , fmod_SOUND_GROUP_BEHAVIOR_FAIL = FMOD_SOUNDGROUP_BEHAVIOR_FAIL+ , fmod_SOUND_GROUP_BEHAVIOR_MUTE = FMOD_SOUNDGROUP_BEHAVIOR_MUTE+ , fmod_SOUND_GROUP_BEHAVIOR_STEALLOWEST = FMOD_SOUNDGROUP_BEHAVIOR_STEALLOWEST+ , fmod_SOUND_GROUP_BEHAVIOR_MAX = FMOD_SOUNDGROUP_BEHAVIOR_MAX+ , fmod_SOUND_GROUP_BEHAVIOR_FORCEINT = FMOD_SOUNDGROUP_BEHAVIOR_FORCEINT+ }++-- FMOD_CHANNEL_CALLBACKTYPE+newtype FModChannelCallbackType = FModChannelCallbackType CInt deriving (Eq,Show)+#{enum FModChannelCallbackType, FModChannelCallbackType+ , fmod_CHANNEL_CALLBACKYTPE_END = FMOD_CHANNEL_CALLBACKTYPE_END+ , fmod_CHANNEL_CALLBACKTYPE_VIRTUALVOICE = FMOD_CHANNEL_CALLBACKTYPE_VIRTUALVOICE+ , fmod_CHANNEL_CALLBACKYTPE_SYNCPOINT = FMOD_CHANNEL_CALLBACKTYPE_SYNCPOINT+ , fmod_CHANNEL_CALLBACKTYPE_OCCLUSION = FMOD_CHANNEL_CALLBACKTYPE_OCCLUSION+ , fmod_CHANNEL_CALLBACKTYPE_MAX = FMOD_CHANNEL_CALLBACKTYPE_MAX+ , fmod_CHANNEL_CALLBACKTYPE_FORCEINT = FMOD_CHANNEL_CALLBACKTYPE_FORCEINT+ }++-- FMOD_SYSTEM_CALLBACKTYPE+newtype FModSystemCallbackType = FModSystemCallbackType CInt deriving (Eq,Show)+#{enum FModSystemCallbackType, FModSystemCallbackType+ , fmod_SYSTEM_CALLBACKTYPE_DEVICELISTCHANGED = FMOD_SYSTEM_CALLBACKTYPE_DEVICELISTCHANGED+ , fmod_SYSTEM_CALLBACKTYPE_DEVICELOST = FMOD_SYSTEM_CALLBACKTYPE_DEVICELOST+ , fmod_SYSTEM_CALLBACKTYPE_MEMORYALLOCATIONFAILED = FMOD_SYSTEM_CALLBACKTYPE_MEMORYALLOCATIONFAILED+ , fmod_SYSTEM_CALLBACKTYPE_THREADCREATED = FMOD_SYSTEM_CALLBACKTYPE_THREADCREATED+ , fmod_SYSTEM_CALLBACKTYPE_BADDSPCONNECTION = FMOD_SYSTEM_CALLBACKTYPE_BADDSPCONNECTION+ , fmod_SYSTEM_CALLBACKTYPE_BADDSPLEVEL = FMOD_SYSTEM_CALLBACKTYPE_BADDSPLEVEL+ , fmod_SYSTEM_CALLBACKTYPE_MAX = FMOD_SYSTEM_CALLBACKTYPE_MAX+ , fmod_SYSTEM_CALLBACKTYPE_FORCEINT = FMOD_SYSTEM_CALLBACKTYPE_FORCEINT+ }++-- FMOD Callbacks+type FModSystemCallback = FunPtr (Ptr FModSystem -> FModSystemCallbackType -> Ptr () -> Ptr () -> IO FModResult)+type FModSChannelCallback = FunPtr (Ptr FModChannel -> FModChannelCallbackType -> Ptr () -> Ptr () -> IO FModResult)+type FModSoundNonBlockCallback = FunPtr (Ptr FModSound -> FModResult -> IO FModResult)+type FModSoundPCMReadCallback = FunPtr (Ptr FModSound -> Ptr () -> CUInt -> IO FModResult)+type FModSoundPCMSetPosCallback = FunPtr (Ptr FModSound -> CInt -> CUInt -> FModTimeUnit -> IO FModResult)+type FModFileOpenCallback = FunPtr (CString -> CInt -> CUInt -> Ptr (Ptr ()) -> Ptr (Ptr ()) -> IO FModResult)+type FModFileCloseCallback = FunPtr (Ptr () -> Ptr () -> IO FModResult)+type FModFileReadCallback = FunPtr (Ptr () -> Ptr () -> CUInt -> Ptr CUInt -> Ptr () -> IO FModResult)+type FModFileSeekCallback = FunPtr (Ptr () -> CUInt -> Ptr () -> IO FModResult)+type FModFileAsyncReadCallback = FunPtr (Ptr FModAsyncReadInfo -> Ptr () -> IO FModResult)+type FModFileAsyncCancelCallback = FunPtr (Ptr () -> Ptr () -> IO FModResult)+type FModMemoryAllocCallback = FunPtr (CUInt -> FModMemoryType -> CString -> IO (Ptr ()))+type FModMemoryReallocCallback = FunPtr (Ptr () -> CUInt -> FModMemoryType -> CString -> IO (Ptr ()))+type FModMemoryFreeCallback = FunPtr (Ptr () -> FModMemoryType -> CString -> IO ())+type FMod3DRollOffCallback = FunPtr (Ptr FModChannel -> CFloat -> IO Float)++-- FMOD_DSP_FFT_WINDOW+newtype FModDSPFFTWindow = FModDSPFFTWindow CInt deriving (Eq,Show)+#{enum FModDSPFFTWindow, FModDSPFFTWindow+ , fmod_DSP_FFT_WINDOW_RECT = FMOD_DSP_FFT_WINDOW_RECT+ , fmod_DSP_FFT_WINDOW_TRIANGLE = FMOD_DSP_FFT_WINDOW_TRIANGLE+ , fmod_DSP_FFT_WINDOW_HAMMING = FMOD_DSP_FFT_WINDOW_HAMMING+ , fmod_DSP_FFT_WINDOW_BLACKMAN = FMOD_DSP_FFT_WINDOW_BLACKMAN+ , fmod_DSP_FFT_WINDOW_BLACKMANHARRIS = FMOD_DSP_FFT_WINDOW_BLACKMANHARRIS+ , fmod_DSP_FFT_WINDOW_MAX = FMOD_DSP_FFT_WINDOW_MAX+ , fmod_DSP_FFT_WINDOW_FORCEINT = FMOD_DSP_FFT_WINDOW_FORCEINT+ }++-- FMOD_DSP_RESAMPLER+newtype FModDSPResampler = FModDSPResampler CInt deriving (Eq,Show)+#{enum FModDSPResampler, FModDSPResampler+ , fmod_DSP_RESAMPLER_NOINTERP = FMOD_DSP_RESAMPLER_NOINTERP+ , fmod_DSP_RESAMPLER_LINEAR = FMOD_DSP_RESAMPLER_LINEAR+ , fmod_DSP_RESAMPLER_CUBIC = FMOD_DSP_RESAMPLER_CUBIC+ , fmod_DSP_RESAMPLER_SPLINE = FMOD_DSP_RESAMPLER_SPLINE+ , fmod_DSP_RESAMPLER_MAX = FMOD_DSP_RESAMPLER_MAX+ , fmod_DSP_RESAMPLER_FORCEINT = FMOD_DSP_RESAMPLER_FORCEINT+ }++-- FMOD_TAGTYPE+newtype FModTagType = FModTagType CInt deriving (Eq,Show)+#{enum FModTagType, FModTagType+ , fmod_TAGTYPE_UNKNOWN = FMOD_TAGTYPE_UNKNOWN+ , fmod_TAGTYPE_ID3V1 = FMOD_TAGTYPE_ID3V1+ , fmod_TAGTYPE_ID3V2 = FMOD_TAGTYPE_ID3V2+ , fmod_TAGTYPE_VORBISCOMMENT = FMOD_TAGTYPE_VORBISCOMMENT+ , fmod_TAGTYPE_SHOUTCAST = FMOD_TAGTYPE_SHOUTCAST+ , fmod_TAGTYPE_ICECAST = FMOD_TAGTYPE_ICECAST+ , fmod_TAGTYPE_ASF = FMOD_TAGTYPE_ASF+ , fmod_TAGTYPE_MIDI = FMOD_TAGTYPE_MIDI+ , fmod_TAGTYPE_PLAYLIST = FMOD_TAGTYPE_PLAYLIST+ , fmod_TAGTYPE_FMOD = FMOD_TAGTYPE_FMOD+ , fmod_TAGTYPE_USER = FMOD_TAGTYPE_USER+ , fmod_TAGTYPE_MAX = FMOD_TAGTYPE_MAX+ , fmod_TAGTYPE_FORCEINT = FMOD_TAGTYPE_FORCEINT+ }++-- FMOD_TAGDATATYPE+newtype FModTagDataType = FModTagDataType CInt deriving (Eq,Show)+#{enum FModTagDataType, FModTagDataType+ , fmod_TAGDATATYPE_BINARY = FMOD_TAGDATATYPE_BINARY+ , fmod_TAGDATATYPE_INT = FMOD_TAGDATATYPE_INT+ , fmod_TAGDATATYPE_FLOAT = FMOD_TAGDATATYPE_FLOAT+ , fmod_TAGDATATYPE_STRING = FMOD_TAGDATATYPE_STRING+ , fmod_TAGDATATYPE_STRING_UTF16 = FMOD_TAGDATATYPE_STRING_UTF16+ , fmod_TAGDATATYPE_STRING_UTF16BE = FMOD_TAGDATATYPE_STRING_UTF16BE+ , fmod_TAGDATATYPE_STRING_UTF8 = FMOD_TAGDATATYPE_STRING_UTF8+ , fmod_TAGDATATYPE_CDTOC = FMOD_TAGDATATYPE_CDTOC+ , fmod_TAGDATATYPE_MAX = FMOD_TAGDATATYPE_MAX+ , fmod_TAGDATATYPE_FORCEINT = FMOD_TAGDATATYPE_FORCEINT+ }++-- FMOD_DELAYTYPE+newtype FModDelayType = FModDelayType CInt deriving (Eq,Show)+#{enum FModDelayType, FModDelayType+ , fmod_DELAYTYPE_END_MS = FMOD_DELAYTYPE_END_MS+ , fmod_DELAYTYPE_DSPCLOCK_START = FMOD_DELAYTYPE_DSPCLOCK_START+ , fmod_DELAYTYPE_DSPCLOCK_END = FMOD_DELAYTYPE_DSPCLOCK_END+ , fmod_DELAYTYPE_DSPCLOCK_PAUSE = FMOD_DELAYTYPE_DSPCLOCK_PAUSE+ , fmod_DELAYTYPE_MAX = FMOD_DELAYTYPE_MAX+ , fmod_DELAYTYPE_FORCEINT = FMOD_DELAYTYPE_FORCEINT+ }++-- FMOD_TAG+data FModTag = FModTag {+ fmod_TagType :: FModTagType+ , fmod_TagdataType :: FModTagDataType+ , fmod_TagName :: CString+ , fmod_TagData :: Ptr ()+ , fmod_TagDataLen :: CUInt+ , fmod_TagUpdated :: FModBool+ } deriving (Eq,Show)+++-- FMOD_CDTOC+data FModCDTOC = FModCDTOC {+ fmod_CDTOCNumTracks :: CInt+ , fmod_CDTOCMin :: Ptr CInt+ , fmod_CDTOCMax :: Ptr CInt+ , fmod_CDTOCFrame :: Ptr CInt+ } deriving (Eq,Show)++-- FMOD_TIMEUNIT+newtype FModTimeUnit = FModTimeUnit CUInt deriving (Eq,Show)+#{enum FModTimeUnit, FModTimeUnit+ , fmod_TIMEUNIT_MS = FMOD_TIMEUNIT_MS+ , fmod_TIMEUNIT_PCM = FMOD_TIMEUNIT_PCM+ , fmod_TIMEUNIT_PCMBYTES = FMOD_TIMEUNIT_PCMBYTES+ , fmod_TIMEUNIT_RAWBYTES = FMOD_TIMEUNIT_RAWBYTES+ , fmod_TIMEUNIT_PCMFRACTION = FMOD_TIMEUNIT_PCMFRACTION+ , fmod_TIMEUNIT_MODORDER = FMOD_TIMEUNIT_MODORDER+ , fmod_TIMEUNIT_MODPATTERN = FMOD_TIMEUNIT_MODPATTERN+ , fmod_TIMEUNIT_SENTENCE_MS = FMOD_TIMEUNIT_SENTENCE_MS+ , fmod_TIMEUNIT_SENTENCE_PCM = FMOD_TIMEUNIT_SENTENCE_PCM+ , fmod_TIMEUNIT_SENTENCE_PCMBYTES = FMOD_TIMEUNIT_SENTENCE_PCMBYTES+ , fmod_TIMEUNIT_SENTENCE = FMOD_TIMEUNIT_SENTENCE+ , fmod_TIMEUNIT_SENTENCE_SUBSOUND = FMOD_TIMEUNIT_SENTENCE_SUBSOUND+ , fmod_TIMEUNIT_BUFFERED = FMOD_TIMEUNIT_BUFFERED+ }++-- FMOD_SPEAKERMAPTYPE+newtype FModSpeakerMapType = FModSpeakerMapType CInt deriving (Eq,Show)+#{enum FModSpeakerMapType, FModSpeakerMapType+ , fmod_SPEAKERMAPTYPE_DEFAULT = FMOD_SPEAKERMAPTYPE_DEFAULT+ , fmod_SPEAKERMAPTYPE_ALLMONO = FMOD_SPEAKERMAPTYPE_ALLMONO+ , fmod_SPEAKERMAPTYPE_ALLSTEREO = FMOD_SPEAKERMAPTYPE_ALLSTEREO+ , fmod_SPEAKERMAPTYPE_51_PROTOOLS = FMOD_SPEAKERMAPTYPE_51_PROTOOLS+ }++-- FMOD_CREATESOUNDEXINFO+data FModCreateSoundExInfo = FModCreateSoundExInfo {+ fmod_CreateSoundExInfoCBSize :: CInt+ , fmod_CreateSoundExInfoLength :: CUInt+ , fmod_CreateSoundExInfoFileOffset :: CUInt+ , fmod_CreateSoundExInfoNumChannels :: CInt+ , fmod_CreateSoundExInfoDefaultFrequency :: CInt+ , fmod_CreateSoundExInfoFormat :: FModSoundFormat+ , fmod_CreateSoundExInfoDecodeBufferSize :: CUInt+ , fmod_CreateSoundExInfoInitialSubsound :: CInt+ , fmod_CreateSoundExInfoNumSubsounds :: CInt+ , fmod_CreateSoundExInfoInclusionList :: Ptr CInt+ , fmod_CreateSoundExInfoInclusionListNum :: CInt+ , fmod_CreateSoundExInfoPCMReadCallback :: FModSoundPCMReadCallback+ , fmod_CreateSoundExInfoPCMSetPosCallback :: FModSoundPCMSetPosCallback+ , fmod_CreateSoundExInfocANonBlockCallback :: FModSoundNonBlockCallback+ , fmod_CreateSoundExInfoDLSName :: CString+ , fmod_CreateSoundExInfoEncryptionKey :: CString+ , fmod_CreateSoundExInfoMaxPolyphony :: CInt+ , fmod_CreateSoundExInfoUserData :: Ptr ()+ , fmod_CreateSoundExInfoSuggestedSoundType :: FModSoundType+ , fmod_CreateSoundExInfoUserOpen :: FModFileOpenCallback+ , fmod_CreateSoundExInfoUserClose :: FModFileCloseCallback+ , fmod_CreateSoundExInfoUserRead :: FModFileReadCallback+ , fmod_CreateSoundExInfoUserSeek :: FModFileSeekCallback+ , fmod_CreateSoundExInfoUserAsyncRead :: FModFileAsyncReadCallback+ , fmod_CreateSoundExInfoUserAsyncCancel :: FModFileAsyncCancelCallback+ , fmod_CreateSoundExInfoSpeakerMap :: FModSpeakerMapType+ , fmod_CreateSoundExInfoInitialSoundGroup :: Ptr FModSoundGroup+ , fmod_CreateSoundExInfoInitialSeekPosition :: CUInt+ , fmod_CreateSoundExInfoInitialSeekPosType :: FModTimeUnit+ , fmod_CreateSoundExInfoIgnoreSetFileSystem :: CInt+ , fmod_CreateSoundExInfoCDDAForceASPI :: CInt+ , fmod_CreateSoundExInfoAudioQueuePolicy :: CUInt+ , fmod_CreateSoundExInfoMinMIDIGranularity :: CUInt+ , fmod_CreateSoundExInfoNonBlockThreadID :: CInt+ } deriving (Eq,Show)++-- FMOD_REVERB_PROPERTIES+data FModReverbProperties = FModReverbProperties {+ fmod_ReverbPropertiesInstance :: CInt+ , fmod_ReverPropertiesEnvironment :: CInt+ , fmod_ReverPropertiesEnvDiffusion :: CFloat+ , fmod_ReverPropertiesRoom :: CInt+ , fmod_ReverPropertiesRoomHF :: CInt+ , fmod_ReverPropertiesRoomLF :: CInt+ , fmod_ReverPropertiesDecayTime :: CFloat+ , fmod_ReverPropertiesDecayHFRatio :: CFloat+ , fmod_ReverPropertiesDecayLFRatio :: CFloat+ , fmod_ReverPropertiesReflections :: CInt+ , fmod_ReverPropertiesReverb :: CInt+ , fmod_ReverPropertiesReverbDelay :: CFloat+ , fmod_ReverPropertiesModulationTime :: CFloat+ , fmod_ReverPropertiesModulationDepth :: CFloat+ , fmod_ReverPropertiesHFReference :: CFloat+ , fmod_ReverPropertiesLFReference :: CFloat+ , fmod_ReverPropertiesDiffusion :: CFloat+ , fmod_ReverPropertiesDensity :: CFloat+ , fmod_ReverPropertiesFlags :: CUInt+ }++-- FMOD_REVERB_FLAGS+newtype FModReverbFlags = FModReverbFlags CInt deriving (Eq,Show)+#{enum FModReverbFlags, FModReverbFlags+ , fmod_REVERB_FLAGS_HIGHQUALITYREVERB = FMOD_REVERB_FLAGS_HIGHQUALITYREVERB+ , fmod_REVERB_FLAGS_HIGHQUALITYDPL2REVERB = FMOD_REVERB_FLAGS_HIGHQUALITYDPL2REVERB+ , fmod_REVERB_FLAGS_HARDWAREONLY = FMOD_REVERB_FLAGS_HARDWAREONLY+ , fmod_REVERB_FLAGS_DEFAULT = FMOD_REVERB_FLAGS_DEFAULT+ }++-- FMOD_REVERB_PRESETS+-- TODO: see how to deal with that++-- FMOD_REVERB_CHANNELPROPERTIES+data FModReverbChannelProperties = FModReverbChannelProperties {+ fmod_ReverbChannelPropertiesDirect :: CInt+ , fmod_ReverbChannelPropertiesRoom :: CInt+ , fmod_ReverbChannelPropertiesFlags :: FModReverbChannelFlags+ , fmod_ReverbChannelPropertiesConnectionPoint :: FModDSP+ } deriving (Eq,Show)+ +-- FMOD_REVERB_CHANNELFLAGS+newtype FModReverbChannelFlags = FModReverbChannelFlags CUInt deriving (Eq,Show)+#{enum FModReverbChannelFlags, FModReverbChannelFlags+ , fmod_REVERB_CHANNELFLAGS_INSTANCE0 = FMOD_REVERB_CHANNELFLAGS_INSTANCE0+ , fmod_REVERB_CHANNELFLAGS_INSTANCE1 = FMOD_REVERB_CHANNELFLAGS_INSTANCE1+ , fmod_REVERB_CHANNELFLAGS_INSTANCE2 = FMOD_REVERB_CHANNELFLAGS_INSTANCE2+ , fmod_REVERB_CHANNELFLAGS_INSTANCE3 = FMOD_REVERB_CHANNELFLAGS_INSTANCE3+ , fmod_REVERB_CHANNELFLAGS_DEFAULT = FMOD_REVERB_CHANNELFLAGS_DEFAULT+ }++-- FMOD_ADVANCEDSETTINGS+data FModAdvancedSettings = FModAdvancedSettings {+ fmod_AdvancedSettingsCBSize :: CInt+ , fmod_AdvancedSettingsMaxMPEGCodecs :: CInt+ , fmod_AdvancedSettingsMaxADPMCodecs :: CInt+ , fmod_AdvancedSettingsMaxXMACodecs :: CInt+ , fmod_AdvancedSettingsMaxCELTCodecs :: CInt+ , fmod_AdvancedSettingsMaxVORBISCodecs :: CInt+ , fmod_AdvancedSettingsMaxPCMCodecs :: CInt+ , fmod_AdvancedSettingsASIONumChannels :: CInt+ , fmod_AdvancedSettingsASIOChannelListe :: Ptr (Ptr CChar)+ , fmod_AdvancedSettingsASIOSpeakerList :: Ptr FModSpeaker+ , fmod_AdvancedSettingsMax3DReverbDSPs :: CInt+ , fmod_AdvancedSettingsHRTFMinAngle :: CFloat+ , fmod_AdvancedSettingsHRTFMaxAngle :: CFloat+ , fmod_AdvancedSettingsHRTFFreq :: CFloat+ , fmod_AdvancedSettingsVol0VirtualVol :: CFloat+ , fmod_AdvancedSettingsEventQueueSize :: CInt+ , fmod_AdvancedSettingsDefaultDecodeBufferSize :: CUInt+ , fmod_AdvancedSettingsDebugLogFilename :: CString+ , fmod_AdvancedSettingsGeometryMaxFadeTime :: CUInt+ , fmod_AdvancedSettingsMaxSpectrumWaveDataBuffers :: CUInt+ , fmod_AdvancedSettingsMusicSystemCacheDelay :: CUInt+ , fmod_AdvancedSettingsdistanceFilterCenterFreq :: CFloat+ } deriving (Eq,Show)++-- FMOD_CHANNELINDEX+newtype FModChannelIndex = FModChannelIndex CInt deriving (Eq,Show)+#{enum FModChannelIndex, FModChannelIndex+ , fmod_CHANNEL_FREE = FMOD_CHANNEL_FREE+ , fmod_CHANNEL_REUSE = FMOD_CHANNEL_REUSE+ }
+ Sound/FModEx/Raw/DSP.hs view
@@ -0,0 +1,18 @@+{- |+Module : Sound.FModEx.Raw.DSP+Description : DSP FModEx library Haskell raw binding+Copyright : (c) Dimitri Sabadie+License : GPL-3++Maintainer : dimitri.sabadie@gmail.com+Stability : experimental+Portability : Linux only for now++DSP FModEx raw Haskell API.+-}++module Sound.FModEx.Raw.DSP (+ module X+ ) where++import Sound.FModEx.Raw.DSP.Types as X
+ Sound/FModEx/Raw/DSP/Types.hsc view
@@ -0,0 +1,278 @@+{-# LANGUAGE CPP, ForeignFunctionInterface #-}++{- |+Module : Sound.FModEx.Raw.DSP.Types+Description : FModEx library C DSP types binding+Copyright : (c) Dimitri Sabadie+License : GPL-3++Maintainer : dimitri.sabadie@gmail.com+Stability : experimental+Portability : Linux only for now++FModEx API C DSP types raw Haskell binding.+-}++module Sound.FModEx.Raw.DSP.Types where+++import Foreign.C.String+import Foreign.C.Types+import Foreign.Ptr+import Sound.FModEx.Raw.Core.Types++#include <fmodex/fmod.h>+#include <fmodex/fmod_dsp.h>++-- DSP callbacks+type FModDSPCreateCallback = FunPtr (Ptr FModDSPState -> IO FModResult)+type FModDSPReleaseCallback = FunPtr (Ptr FModDSPState -> IO FModResult)+type FModDSPResetCallback = FunPtr (Ptr FModDSPState -> IO FModResult)+type FModDSPReadCallback = FunPtr (Ptr FModDSPState -> Ptr CFloat -> Ptr CFloat -> CUInt -> CInt -> CInt -> IO FModResult)+type FModDSPSetPositionCallback = FunPtr (Ptr FModDSPState -> CUInt -> IO FModResult)+type FModDSPSetParamCallback = FunPtr (Ptr FModDSPState -> CInt -> CFloat -> IO FModResult)+type FModDSPGetParamCallback = FunPtr (Ptr FModDSPState -> CInt -> Ptr CFloat -> Ptr CChar -> IO FModResult)+type FModDSPDialogCallback = FunPtr (Ptr FModDSPState -> Ptr () -> CInt -> IO FModResult)++-- FMOD_DSP_TYPE+newtype FModDSPType = FModDSPType CInt deriving (Eq,Show)+#{enum FModDSPType, FModDSPType+ , fmod_DSP_TYPE_UNKNOWN = FMOD_DSP_TYPE_UNKNOWN+ , fmod_DSP_TYPE_MIXER = FMOD_DSP_TYPE_MIXER+ , fmod_DSP_TYPE_OSCILLATOR = FMOD_DSP_TYPE_OSCILLATOR+ , fmod_DSP_TYPE_LOWPASS = FMOD_DSP_TYPE_LOWPASS+ , fmod_DSP_TYPE_ITLOWPASS = FMOD_DSP_TYPE_ITLOWPASS+ , fmod_DSP_TYPE_HIGHPASS = FMOD_DSP_TYPE_HIGHPASS+ , fmod_DSP_TYPE_ECHO = FMOD_DSP_TYPE_ECHO+ , fmod_DSP_TYPE_FLANGE = FMOD_DSP_TYPE_FLANGE+ , fmod_DSP_TYPE_DISTORTION = FMOD_DSP_TYPE_DISTORTION+ , fmod_DSP_TYPE_NORMALIZE = FMOD_DSP_TYPE_NORMALIZE+ , fmod_DSP_TYPE_PARAMEQ = FMOD_DSP_TYPE_PARAMEQ+ , fmod_DSP_TYPE_PITCHSHIFT = FMOD_DSP_TYPE_PITCHSHIFT+ , fmod_DSP_TYPE_CHORUS = FMOD_DSP_TYPE_CHORUS+ , fmod_DSP_TYPE_VSTPLUGIN = FMOD_DSP_TYPE_VSTPLUGIN+ , fmod_DSP_TYPE_WINAMPPLUGIN = FMOD_DSP_TYPE_WINAMPPLUGIN+ , fmod_DSP_TYPE_ITECHO = FMOD_DSP_TYPE_ITECHO+ , fmod_DSP_TYPE_COMPRESSOR = FMOD_DSP_TYPE_COMPRESSOR+ , fmod_DSP_TYPE_SFXREVERB = FMOD_DSP_TYPE_SFXREVERB+ , fmod_DSP_TYPE_LOWPASS_SIMPLE = FMOD_DSP_TYPE_LOWPASS_SIMPLE+ , fmod_DSP_TYPE_DELAY = FMOD_DSP_TYPE_DELAY+ , fmod_DSP_TYPE_TREMOLO = FMOD_DSP_TYPE_TREMOLO+ , fmod_DSP_TYPE_LADSPAPLUGIN = FMOD_DSP_TYPE_LADSPAPLUGIN+ , fmod_DSP_TYPE_HIGHPASS_SIMPLE = FMOD_DSP_TYPE_HIGHPASS_SIMPLE+ , fmod_DSP_TYPE_HARDWARE = FMOD_DSP_TYPE_HARDWARE+ , fmod_DSP_TYPE_FORCEINT = FMOD_DSP_TYPE_FORCEINT+ }+ +-- FMOD_DSP_PARAMETERDESC+data FModDSPParameterDesc = FModDSPParameterDesc {+ fmod_DSPParameterDescMin :: CFloat+ , fmod_DSPParameterDescMax :: CFloat+ , fmod_DSPParameterDescDefaultValue :: CFloat+ , fmod_DSPParameterDescName :: CString+ , fmod_DSPParameterDescLabel :: CString+ , fmod_DSPParameterDescDescription :: CString+ } deriving (Eq,Show)++-- FMOD_DSP_DESCRIPTION+data FModDSPDescription = FModDSPDescription {+ fmod_DSPDescriptionName :: CString+ , fmod_DSPDescriptionVersion :: CUInt+ , fmod_DSPDescriptionChannels :: CInt+ , fmod_DSPDescriptionCreate :: FModDSPCreateCallback+ , fmod_DSPDescriptionRelease :: FModDSPReleaseCallback+ , fmod_DSPDescriptionReset :: FModDSPResetCallback+ , fmod_DSPDescriptionRead :: FModDSPReadCallback+ , fmod_DSPDescriptionSetPosition :: FModDSPSetPositionCallback+ , fmod_DSPDescriptionNumParameters :: CInt+ , fmod_DSPDescriptionParamDesc :: Ptr FModDSPParameterDesc+ , fmod_DSPDescriptionSetParameter :: FModDSPSetParamCallback+ , fmod_DSPDescriptionGetParameter :: FModDSPGetParamCallback+ , fmod_DSPDescriptionConfig :: FModDSPDialogCallback+ , fmod_DSPDescriptionConfigWidth :: CInt+ , fmod_DSPDescriptionConfigHeight :: CInt+ , fmod_DSPDescriptionUserData :: Ptr ()+ } deriving (Eq,Show)++-- FMOD_DSP_STATE+data FModDSPState = FModDSPState {+ fmod_DSPStateInstance :: Ptr FModDSP+ , fmod_DSPStatePluginData :: Ptr ()+ , fmod_DSPStateSpeakerMask :: CUShort+ } deriving (Eq,Show)++-- FMOD_DSP_OSCILLATOR+newtype FModDSPOscillator = FModDSPOscillator CInt deriving (Eq,Show)+#{enum FModDSPOscillator, FModDSPOscillator+ , fmod_DSP_OSCILLATOR_TYPE = FMOD_DSP_OSCILLATOR_TYPE+ , fmod_DSP_OSCILLATOR_RATE = FMOD_DSP_OSCILLATOR_RATE+ }++-- FMOD_DSP_LOWPASS+newtype FModDSPLowPass = FModDSPLowPass CInt deriving (Eq,Show)+#{enum FModDSPLowPass, FModDSPLowPass+ , fmod_DSP_LOWPASS_CUTOFF = FMOD_DSP_LOWPASS_CUTOFF+ , fmod_DSP_LOWPASS_RESONANCE = FMOD_DSP_LOWPASS_RESONANCE+ }++-- FMOD_DSP_ITLOWPASS+newtype FModDSPITLowPass = FModDSPITLowPass CInt deriving (Eq,Show)+#{enum FModDSPITLowPass, FModDSPITLowPass+ , fmod_DSP_ITLOWPASS_CUTOFF = FMOD_DSP_ITLOWPASS_CUTOFF+ , fmod_DSP_ITLOWPASS_RESONANCE = FMOD_DSP_ITLOWPASS_RESONANCE+ }++-- FMOD_DSP_HIGHPASS+newtype FModDSPHighPass = FModDSPHighPass CInt deriving (Eq,Show)+#{enum FModDSPHighPass, FModDSPHighPass+ , fmod_DSP_HIGHPASS_CUTOFF = FMOD_DSP_HIGHPASS_CUTOFF+ , fmod_DSP_HIGHPASS_RESONANCE = FMOD_DSP_HIGHPASS_RESONANCE+ }++-- FMOD_DSP_ECHO+newtype FModDSPEcho = FModDSPEcho CInt deriving (Eq,Show)+#{enum FModDSPEcho, FModDSPEcho+ , fmod_DSP_ECHO_DELAY = FMOD_DSP_ECHO_DELAY+ , fmod_DSP_ECHO_DECAYRATIO = FMOD_DSP_ECHO_DECAYRATIO+ , fmod_DSP_ECHO_MAXCHANNELS = FMOD_DSP_ECHO_MAXCHANNELS+ , fmod_DSP_ECHO_DRYMIX = FMOD_DSP_ECHO_DRYMIX+ , fmod_DSP_ECHO_WETMIX = FMOD_DSP_ECHO_WETMIX+ }++-- FMOD_DSP_DELAY+newtype FModDSPDelay = FModDSPDelay CInt deriving (Eq,Show)+#{enum FModDSPDelay, FModDSPDelay+ , fmod_DSP_DELAY_CH0 = FMOD_DSP_DELAY_CH0+ , fmod_DSP_DELAY_CH1 = FMOD_DSP_DELAY_CH1+ , fmod_DSP_DELAY_CH2 = FMOD_DSP_DELAY_CH2+ , fmod_DSP_DELAY_CH3 = FMOD_DSP_DELAY_CH3+ , fmod_DSP_DELAY_CH4 = FMOD_DSP_DELAY_CH4+ , fmod_DSP_DELAY_CH5 = FMOD_DSP_DELAY_CH5+ , fmod_DSP_DELAY_CH6 = FMOD_DSP_DELAY_CH6+ , fmod_DSP_DELAY_CH7 = FMOD_DSP_DELAY_CH7+ , fmod_DSP_DELAY_CH8 = FMOD_DSP_DELAY_CH8+ , fmod_DSP_DELAY_CH9 = FMOD_DSP_DELAY_CH9+ , fmod_DSP_DELAY_CH10 = FMOD_DSP_DELAY_CH10+ , fmod_DSP_DELAY_CH11 = FMOD_DSP_DELAY_CH11+ , fmod_DSP_DELAY_CH12 = FMOD_DSP_DELAY_CH12+ , fmod_DSP_DELAY_CH13 = FMOD_DSP_DELAY_CH13+ , fmod_DSP_DELAY_CH14 = FMOD_DSP_DELAY_CH14+ , fmod_DSP_DELAY_CH15 = FMOD_DSP_DELAY_CH15+ , fmod_DSP_DELAY_MAXDELAY = FMOD_DSP_DELAY_MAXDELAY+ }++-- FMOD_DSP_FLANGE+newtype FModDSPFlange = FModDSPFlange CInt deriving (Eq,Show)+#{enum FModDSPFlange, FModDSPFlange+ , fmod_DSP_FLANGE_DRYMIX = FMOD_DSP_FLANGE_DRYMIX+ , fmod_DSP_FLANGE_WETMIX = FMOD_DSP_FLANGE_WETMIX+ , fmod_DSP_FLANGE_DEPTH = FMOD_DSP_FLANGE_DEPTH+ , fmod_DSP_FLANGE_RATE = FMOD_DSP_FLANGE_RATE+ }++-- FMOD_DSP_TREMOLO+newtype FModDSPTremolo = FModDSPTremolo CInt deriving (Eq,Show)+#{enum FModDSPTremolo, FModDSPTremolo+ , fmod_DSP_TREMOLO_FREQUENCY = FMOD_DSP_TREMOLO_FREQUENCY+ , fmod_DSP_TREMOLO_DEPTH = FMOD_DSP_TREMOLO_DEPTH+ , fmod_DSP_TREMOLO_SHAPE = FMOD_DSP_TREMOLO_SHAPE+ , fmod_DSP_TREMOLO_SKEW = FMOD_DSP_TREMOLO_SKEW+ , fmod_DSP_TREMOLO_DUTY = FMOD_DSP_TREMOLO_DUTY+ , fmod_DSP_TREMOLO_SQUARE = FMOD_DSP_TREMOLO_SQUARE+ , fmod_DSP_TREMOLO_PHASE = FMOD_DSP_TREMOLO_PHASE+ , fmod_DSP_TREMOLO_SPREAD = FMOD_DSP_TREMOLO_SPREAD+ }++-- FMOD_DSP_DISTORTION_LEVEL+newtype FModDSPDistortionLevel = FModDSPDistortionLevel CInt deriving (Eq,Show)+#{enum FModDSPDistortionLevel, FModDSPDistortionLevel+ , fmod_DSP_DISTORTION_LEVEL = FMOD_DSP_DISTORTION_LEVEL+ }++-- FMOD_DSP_NORMALIZE+-- FIXME: type FMOD_DSP_NORMALIZE_THRESHOLD+newtype FModDSPNormalize = FModDSPNormalize CInt deriving (Eq,Show)+#{enum FModDSPNormalize, FModDSPNormalize+ , fmod_DSP_NORMALIZE_FADETIME = FMOD_DSP_NORMALIZE_FADETIME+ , fmod_DSP_NORMALIZE_THRESHOLD = FMOD_DSP_NORMALIZE_THRESHHOLD+ , fmod_DSP_NORMALIZE_MAXAMP = FMOD_DSP_NORMALIZE_MAXAMP+ }++-- FMOD_DSP_PARAMEQ+newtype FModDSPParamEq = FModDSPParamEq CInt deriving (Eq,Show)+#{enum FModDSPParamEq, FModDSPParamEq+ , fmod_DSP_PARAMEQ_CENTER = FMOD_DSP_PARAMEQ_CENTER+ , fmod_DSP_PARAMEQ_BANDWIDTH = FMOD_DSP_PARAMEQ_BANDWIDTH+ , fmod_DSP_PARAMEQ_GAIN = FMOD_DSP_PARAMEQ_GAIN+ }++-- FMOD_DSP_PITCHSHIFT+newtype FModDSPPitchShift = FModDSPPitchShift CInt deriving (Eq,Show)+#{enum FModDSPPitchShift, FModDSPPitchShift+ , fmod_DSP_PITCHSHIFT_PITCH = FMOD_DSP_PITCHSHIFT_PITCH+ , fmod_DSP_PITCHSHIFT_FFTSIZE = FMOD_DSP_PITCHSHIFT_FFTSIZE+ , fmod_DSP_PITCHSHIFT_OVERLAP = FMOD_DSP_PITCHSHIFT_OVERLAP+ , fmod_DSP_PITCHSHIFT_MAXCHANNELS = FMOD_DSP_PITCHSHIFT_MAXCHANNELS+ }++-- FMOD_DSP_CHORUS+newtype FModDSPChorus = FModDSPChorus CInt deriving (Eq,Show)+#{enum FModDSPChorus, FModDSPChorus+ , fmod_DSP_CHORUS_DRYMIX = FMOD_DSP_CHORUS_DRYMIX+ , fmod_DSP_CHORUS_WETMIX1 = FMOD_DSP_CHORUS_WETMIX1+ , fmod_DSP_CHORUS_WETMIX2 = FMOD_DSP_CHORUS_WETMIX2+ , fmod_DSP_CHORUS_WETMIX3 = FMOD_DSP_CHORUS_WETMIX3+ , fmod_DSP_CHORUS_DELAY = FMOD_DSP_CHORUS_DELAY+ , fmod_DSP_CHORUS_RATE = FMOD_DSP_CHORUS_RATE+ , fmod_DSP_CHORUS_DEPTH = FMOD_DSP_CHORUS_DEPTH+ }++-- FMOD_DSP_ITECHO+newtype FModDSPITEcho = FModDSPITEcho CInt deriving (Eq,Show)+#{enum FModDSPITEcho, FModDSPITEcho+ , fmod_DSP_ITECHO_WETDRYMIX = FMOD_DSP_ITECHO_WETDRYMIX+ , fmod_DSP_ITECHO_FEEDBACK = FMOD_DSP_ITECHO_FEEDBACK+ , fmod_DSP_ITECHO_LEFTDELAY = FMOD_DSP_ITECHO_LEFTDELAY+ , fmod_DSP_ITECHO_RIGHTDELAY = FMOD_DSP_ITECHO_RIGHTDELAY+ , fmod_DSP_ITECHO_PANDELAY = FMOD_DSP_ITECHO_PANDELAY+ }++-- FMOD_DSP_COMPRESSOR+newtype FModDSPCompressor = FModDSPCompressor CInt deriving (Eq,Show)+#{enum FModDSPCompressor, FModDSPCompressor+ , fmod_DSP_COMPRESSOR_THRESHOLD = FMOD_DSP_COMPRESSOR_THRESHOLD+ , fmod_DSP_COMPRESSOR_ATTACK = FMOD_DSP_COMPRESSOR_ATTACK+ , fmod_DSP_COMPRESSOR_RELEASE = FMOD_DSP_COMPRESSOR_RELEASE+ , fmod_DSP_COMPRESSOR_GAINMAKEUP = FMOD_DSP_COMPRESSOR_GAINMAKEUP+ }++-- FMOD_DSP_SFXREVERB+newtype FModDSPSFXReverb = FModDSPSFXReverb CInt deriving (Eq,Show)+#{enum FModDSPSFXReverb, FModDSPSFXReverb+ , fmod_DSP_SFXREVERB_DRYLEVEL = FMOD_DSP_SFXREVERB_DRYLEVEL+ , fmod_DSP_SFXREVERB_ROOM = FMOD_DSP_SFXREVERB_ROOM+ , fmod_DSP_SFXREVERB_ROOMHF = FMOD_DSP_SFXREVERB_ROOMHF+ , fmod_DSP_SFXREVERB_DECAYTIME = FMOD_DSP_SFXREVERB_DECAYTIME+ , fmod_DSP_SFXREVERB_DECAYHFRATIO = FMOD_DSP_SFXREVERB_DECAYHFRATIO+ , fmod_DSP_SFXREVERB_REFLECTIONSLEVEL = FMOD_DSP_SFXREVERB_REFLECTIONSLEVEL+ , fmod_DSP_SFXREVERB_REFLECTIONSDELAY = FMOD_DSP_SFXREVERB_REFLECTIONSDELAY+ , fmod_DSP_SFXREVERB_REVERBLEVEL = FMOD_DSP_SFXREVERB_REVERBLEVEL+ , fmod_DSP_SFXREVERB_REVERBDELAY = FMOD_DSP_SFXREVERB_REVERBDELAY+ , fmod_DSP_SFXREVERB_DIFFUSION = FMOD_DSP_SFXREVERB_DIFFUSION+ , fmod_DSP_SFXREVERB_DENSITY = FMOD_DSP_SFXREVERB_DENSITY+ , fmod_DSP_SFXREVERB_HFREFERENCE = FMOD_DSP_SFXREVERB_HFREFERENCE+ , fmod_DSP_SFXREVERB_ROOMLF = FMOD_DSP_SFXREVERB_ROOMLF+ , fmod_DSP_SFXREVERB_LFREFERENCE = FMOD_DSP_SFXREVERB_LFREFERENCE+ }++-- FMOD_DSP_LOWPASS_SIMPLE+newtype FModDSPLowPassSimple = FModDSPLowPassSimple CInt deriving (Eq,Show)+#{enum FModDSPLowPassSimple, FModDSPLowPassSimple+ , fmod_DSP_LOWPASS_SIMPLE_CUTOFF = FMOD_DSP_LOWPASS_SIMPLE_CUTOFF+ }++-- FMOD_DSP_HIGHPASS_SIMPLE+newtype FModDSPHighPassSimple = FModDSPHighPassSimple CInt deriving (Eq,Show)+#{enum FModDSPHighPassSimple, FModDSPHighPassSimple+ , fmod_DSP_HIGHPASS_SIMPLE_CUTOFF = FMOD_DSP_HIGHPASS_SIMPLE_CUTOFF+ }
+ Sound/FModEx/Raw/Errors.hs view
@@ -0,0 +1,18 @@+{- |+Module : Sound.FModEx.Raw.Errors+Description : Errors FModEx library Haskell raw binding+Copyright : (c) Dimitri Sabadie+License : GPL-3++Maintainer : dimitri.sabadie@gmail.com+Stability : experimental+Portability : Linux only for now++Errors FModEx raw Haskell API.+-}++module Sound.FModEx.Raw.Errors (+ module X+ ) where++import Sound.FModEx.Raw.Errors.Functions as X
+ Sound/FModEx/Raw/Errors/Functions.hsc view
@@ -0,0 +1,22 @@+{-# LANGUAGE CPP, ForeignFunctionInterface #-}++{- |+Module : Sound.FModEx.Raw.Errors.Functions+Description : FModEx library C errors functions binding+Copyright : (c) Dimitri Sabadie+License : GPL-3++Maintainer : dimitri.sabadie@gmail.com+Stability : experimental+Portability : Linux only for now++FModEx API C errors functions raw Haskell binding.+-}++module Sound.FModEx.Raw.Errors.Functions where++import Foreign.C.String+import Foreign.C.Types+import Sound.FModEx.Raw.Core.Types++foreign import ccall "FMOD_ErrorString" fmod_ErrorString :: FModResult -> CString
+ Sound/FModEx/Raw/Linux.hs view
@@ -0,0 +1,18 @@+{- |+Module : Sound.FModEx.Raw.Linux+Description : Linux FModEx library Haskell raw binding+Copyright : (c) Dimitri Sabadie+License : GPL-3++Maintainer : dimitri.sabadie@gmail.com+Stability : experimental+Portability : Linux only for now++Linux FModEx raw Haskell API.+-}++module Sound.FModEx.Raw.Linux (+ module X+ ) where++import Sound.FModEx.Raw.Linux.Types as X
+ Sound/FModEx/Raw/Linux/Types.hsc view
@@ -0,0 +1,24 @@+{-# LANGUAGE CPP, ForeignFunctionInterface #-}++{- |+Module : Sound.FModEx.Raw.Linux.Types+Description : FModEx library C linux types binding+Copyright : (c) Dimitri Sabadie+License : GPL-3++Maintainer : dimitri.sabadie@gmail.com+Stability : experimental+Portability : Linux only for now++FModEx API C linux types raw Haskell binding.+-}++module Sound.FModEx.Raw.Linux.Types where++import Foreign.C.String++-- FMOD_LINUX_EXTRADRIVERDATA+data FModLinuxExtraDriverData = FModLinuxExtraDriverData {+ fmod_LinuxExtraDriverDataOutput_Driver_Arguments :: CString+ , fmod_LinuxExtraDriverDataRecord_Driver_Arguments :: CString+ } deriving (Eq,Show)
+ Sound/FModEx/Raw/Memory.hs view
@@ -0,0 +1,18 @@+{- |+Module : Sound.FModEx.Raw.Memory+Description : Memory FModEx library Haskell raw binding+Copyright : (c) Dimitri Sabadie+License : GPL-3++Maintainer : dimitri.sabadie@gmail.com+Stability : experimental+Portability : Linux only for now++Memory FModEx raw Haskell API.+-}++module Sound.FModEx.Raw.Memory (+ module X+ ) where++import Sound.FModEx.Raw.Memory.Types as X
+ Sound/FModEx/Raw/Memory/Types.hsc view
@@ -0,0 +1,135 @@+{-# LANGUAGE CPP, ForeignFunctionInterface #-}++{- |+Module : Sound.FModEx.Raw.Memory.Types+Description : FModEx library C memory types binding+Copyright : (c) Dimitri Sabadie+License : GPL-3++Maintainer : dimitri.sabadie@gmail.com+Stability : experimental+Portability : Linux only for now++FModEx API C memory types raw Haskell binding.+-}++module Sound.FModEx.Raw.Memory.Types where++import Foreign.C.Types++#include <fmodex/fmod.h>+#include <fmodex/fmod_memoryinfo.h>++-- FMOD_MEMORY_USAGE_DETAILS+data FModMemoryUsageDetails = FModMemoryUsageDetails {+ fmod_MemoryUsageDetailsOther :: CUInt+ , fmod_MemoryUsageDetailsString :: CUInt+ , fmod_MemoryUsageDetailsSystem :: CUInt+ , fmod_MemoryUsageDetailsPlugins :: CUInt+ , fmod_MemoryUsageDetailsOutput :: CUInt+ , fmod_MemoryUsageDetailsChannel :: CUInt+ , fmod_MemoryUsageDetailsChannelGroup :: CUInt+ , fmod_MemoryUsageDetailsCodec :: CUInt+ , fmod_MemoryUsageDetailsFile :: CUInt+ , fmod_MemoryUsageDetailsSound :: CUInt+ , fmod_MemoryUsageDetailsSecondaryRAM :: CUInt+ , fmod_MemoryUsageDetailsSoundGroup :: CUInt+ , fmod_MemoryUsageDetailsStreamBuffer :: CUInt+ , fmod_MemoryUsageDetailsDSPConnection :: CUInt+ , fmod_MemoryUsageDetailsDSP :: CUInt+ , fmod_MemoryUsageDetailsDSPCodec :: CUInt+ , fmod_MemoryUsageDetailsProfile :: CUInt+ , fmod_MemoryUsageDetailsRecordBuffer :: CUInt+ , fmod_MemoryUsageDetailsReverb :: CUInt+ , fmod_MemoryUsageDetailsReverbChannelProps :: CUInt+ , fmod_MemoryUsageDetailsGeometry :: CUInt+ , fmod_MemoryUsageDetailsSyncPoint :: CUInt+ , fmod_MemoryUsageDetailsEventSystem :: CUInt+ , fmod_MemoryUsageDetailsMusicSystem :: CUInt+ , fmod_MemoryUsageDetailsFEV :: CUInt+ , fmod_MemoryUsageDetailsMemoryFSB :: CUInt+ , fmod_MemoryUsageDetailsEventProject :: CUInt+ , fmod_MemoryUsageDetailsSoundBankClass :: CUInt+ , fmod_MemoryUsageDetailsSoundBankList :: CUInt+ , fmod_MemoryUsageDetailsStreamInstance :: CUInt+ , fmod_MemoryUsageDetailsSoundDefClass :: CUInt+ , fmod_MemoryUsageDetailsSoundDefDefClass :: CUInt+ , fmod_MemoryUsageDetailsSoundDefPool :: CUInt+ , fmod_MemoryUsageDetailsReverbDef :: CUInt+ , fmod_MemoryUsageDetailsEventReverb :: CUInt+ , fmod_MemoryUsageDetailsUserProperty :: CUInt+ , fmod_MemoryUsageDetailsEventInstance :: CUInt+ , fmod_MemoryUsageDetailsEventInstance_Complex :: CUInt+ , fmod_MemoryUsageDetailsEventInstance_Simple :: CUInt+ , fmod_MemoryUsageDetailsEventInstance_Layer :: CUInt+ , fmod_MemoryUsageDetailsEventInstance_Sound :: CUInt+ , fmod_MemoryUsageDetailsEventEnvelope :: CUInt+ , fmod_MemoryUsageDetailsEventEnvelopeDef :: CUInt+ , fmod_MemoryUsageDetailsEventParameter :: CUInt+ , fmod_MemoryUsageDetailsEventCategory :: CUInt+ , fmod_MemoryUsageDetailsEventEnvelopePoint :: CUInt+ , fmod_MemoryUsageDetailsEventInstancePool :: CUInt+ } deriving (Eq,Show)++-- FMOD_MEMBITS+newtype FModMemBits = FModMemBits CInt deriving (Eq,Show)+#{enum FModMemBits, FModMemBits+ , fmod_MEMBITS_OTHER = FMOD_MEMBITS_OTHER+ , fmod_MEMBITS_STRING = FMOD_MEMBITS_STRING+ , fmod_MEMBITS_SYSTEM = FMOD_MEMBITS_SYSTEM+ , fmod_MEMBITS_PLUGINS = FMOD_MEMBITS_PLUGINS+ , fmod_MEMBITS_OUTPUT = FMOD_MEMBITS_OUTPUT+ , fmod_MEMBITS_CHANNEL = FMOD_MEMBITS_CHANNEL+ , fmod_MEMBITS_CHANNELGROUP = FMOD_MEMBITS_CHANNELGROUP+ , fmod_MEMBITS_CODEC = FMOD_MEMBITS_CODEC+ , fmod_MEMBITS_FILE = FMOD_MEMBITS_FILE+ , fmod_MEMBITS_SOUND = FMOD_MEMBITS_SOUND+ , fmod_MEMBITS_SOUND_SECONDARYRAM = FMOD_MEMBITS_SOUND_SECONDARYRAM+ , fmod_MEMBITS_SOUNDGROUP = FMOD_MEMBITS_SOUNDGROUP+ , fmod_MEMBITS_STREAMBUFFER = FMOD_MEMBITS_STREAMBUFFER+ , fmod_MEMBITS_DSPCONNECTION = FMOD_MEMBITS_DSPCONNECTION+ , fmod_MEMBITS_DSP = FMOD_MEMBITS_DSP+ , fmod_MEMBITS_DSPCODEC = FMOD_MEMBITS_DSPCODEC+ , fmod_MEMBITS_PROFILE = FMOD_MEMBITS_PROFILE+ , fmod_MEMBITS_RECORDBUFFER = FMOD_MEMBITS_RECORDBUFFER+ , fmod_MEMBITS_REVERB = FMOD_MEMBITS_REVERB+ , fmod_MEMBITS_REVERBCHANNELPROPS = FMOD_MEMBITS_REVERBCHANNELPROPS+ , fmod_MEMBITS_GEOMETRY = FMOD_MEMBITS_GEOMETRY+ , fmod_MEMBITS_SYNCPOINT = FMOD_MEMBITS_SYNCPOINT+ , fmod_MEMBITS_ALL = FMOD_MEMBITS_ALL+ }++-- FMOD_EVENT_MEMBITS+newtype FModEventMemBits = FModEventMemBits CInt deriving (Eq,Show)+#{enum FModEventMemBits, FModEventMemBits+ , fmod_EVENT_MEMBITS_EVENTSYSTEM = FMOD_EVENT_MEMBITS_EVENTSYSTEM+ , fmod_EVENT_MEMBITS_MUSICSYSTEM = FMOD_EVENT_MEMBITS_MUSICSYSTEM+ , fmod_EVENT_MEMBITS_FEV = FMOD_EVENT_MEMBITS_FEV+ , fmod_EVENT_MEMBITS_MEMORYFSB = FMOD_EVENT_MEMBITS_MEMORYFSB+ , fmod_EVENT_MEMBITS_EVENTPROJECT = FMOD_EVENT_MEMBITS_EVENTPROJECT+ , fmod_EVENT_MEMBITS_EVENTGROUPI = FMOD_EVENT_MEMBITS_EVENTGROUPI+ , fmod_EVENT_MEMBITS_SOUNDBANKCLASS = FMOD_EVENT_MEMBITS_SOUNDBANKCLASS+ , fmod_EVENT_MEMBITS_SOUNDBANKLIST = FMOD_EVENT_MEMBITS_SOUNDBANKLIST+ , fmod_EVENT_MEMBITS_STREAMINSTANCE = FMOD_EVENT_MEMBITS_STREAMINSTANCE+ , fmod_EVENT_MEMBITS_SOUNDDEFCLASS = FMOD_EVENT_MEMBITS_SOUNDDEFCLASS+ , fmod_EVENT_MEMBITS_SOUNDDEFDEFCLASS = FMOD_EVENT_MEMBITS_SOUNDDEFDEFCLASS+ , fmod_EVENT_MEMBITS_SOUNDDEFPOOL = FMOD_EVENT_MEMBITS_SOUNDDEFPOOL+ , fmod_EVENT_MEMBITS_REVERBDEF = FMOD_EVENT_MEMBITS_REVERBDEF+ , fmod_EVENT_MEMBITS_EVENTREVERB = FMOD_EVENT_MEMBITS_EVENTREVERB+ , fmod_EVENT_MEMBITS_USERPROPERTY = FMOD_EVENT_MEMBITS_USERPROPERTY+ , fmod_EVENT_MEMBITS_EVENTINSTANCE = FMOD_EVENT_MEMBITS_EVENTINSTANCE+ , fmod_EVENT_MEMBITS_EVENTINSTANCE_COMPLEX = FMOD_EVENT_MEMBITS_EVENTINSTANCE_COMPLEX+ , fmod_EVENT_MEMBITS_EVENTINSTANCE_SIMPLE = FMOD_EVENT_MEMBITS_EVENTINSTANCE_SIMPLE+ , fmod_EVENT_MEMBITS_EVENTINSTANCE_LAYER = FMOD_EVENT_MEMBITS_EVENTINSTANCE_LAYER+ , fmod_EVENT_MEMBITS_EVENTINSTANCE_SOUND = FMOD_EVENT_MEMBITS_EVENTINSTANCE_SOUND+ , fmod_EVENT_MEMBITS_EVENTENVELOPE = FMOD_EVENT_MEMBITS_EVENTENVELOPE+ , fmod_EVENT_MEMBITS_EVENTENVELOPEDEF = FMOD_EVENT_MEMBITS_EVENTENVELOPEDEF+ , fmod_EVENT_MEMBITS_EVENTPARAMETER = FMOD_EVENT_MEMBITS_EVENTPARAMETER+ , fmod_EVENT_MEMBITS_EVENTCATEGORY = FMOD_EVENT_MEMBITS_EVENTCATEGORY+ , fmod_EVENT_MEMBITS_EVENTENVELOPEPOINT = FMOD_EVENT_MEMBITS_EVENTENVELOPEPOINT+ , fmod_EVENT_MEMBITS_EVENTINSTANCEPOOL = FMOD_EVENT_MEMBITS_EVENTINSTANCEPOOL+ , fmod_EVENT_MEMBITS_ALL = FMOD_EVENT_MEMBITS_ALL+ }++-- All event instance memory+-- TODO
+ Sound/FModEx/Raw/Output.hs view
@@ -0,0 +1,18 @@+{- |+Module : Sound.FModEx.Raw.Output+Description : Output FModEx library Haskell raw binding+Copyright : (c) Dimitri Sabadie+License : GPL-3++Maintainer : dimitri.sabadie@gmail.com+Stability : experimental+Portability : Linux only for now++Output FModEx raw Haskell API.+-}++module Sound.FModEx.Raw.Output (+ module X+ ) where++import Sound.FModEx.Raw.Output.Types as X
+ Sound/FModEx/Raw/Output/Types.hsc view
@@ -0,0 +1,57 @@+{-# LANGUAGE CPP, ForeignFunctionInterface #-}++{- |+Module : Sound.FModEx.Raw.Output.Types+Description : FModEx library C output types binding+Copyright : (c) Dimitri Sabadie+License : GPL-3++Maintainer : dimitri.sabadie@gmail.com+Stability : experimental+Portability : Linux only for now++FModEx API C output types raw Haskell binding.+-}++module Sound.FModEx.Raw.Output.Types where++import Foreign.C.String+import Foreign.C.Types+import Foreign.Ptr+import Sound.FModEx.Raw.Core.Types++-- Output callbacks+type FModOutputGetNumDriversCallback = FunPtr (Ptr FModOutputState -> Ptr CInt -> IO FModResult)+type FModOutputGetDriverNameCallback = FunPtr (Ptr FModOutputState -> CInt -> CString -> CInt -> IO FModResult)+type FModOutputGetDriverCapsCallback = FunPtr (Ptr FModOutputState -> CInt -> Ptr FModCaps -> IO FModResult)+type FModOutputInitCallback = FunPtr (Ptr FModOutputState -> CInt -> FModInitFlags -> Ptr CInt -> CInt -> Ptr FModSoundFormat -> CInt -> CInt -> Ptr () -> IO FModResult)+type FModOutputCloseCallback = FunPtr (Ptr FModOutputState -> IO FModResult)+type FModOutputUpdateCallback = FunPtr (Ptr FModOutputState -> IO FModResult)+type FModOutputGetHandleCallback = FunPtr (Ptr FModOutputState -> Ptr (Ptr ()) -> IO FModResult)+type FModOutputGetPositionCallback = FunPtr (Ptr FModOutputState -> Ptr CUInt -> IO FModResult)+type FModOutputLockCallback = FunPtr (Ptr FModOutputState -> CUInt -> CUInt -> Ptr (Ptr ()) -> Ptr (Ptr ()) -> Ptr CUInt -> Ptr CUInt -> IO FModResult)+type FModOutputUnlockCallback = FunPtr (Ptr FModOutputState -> Ptr () -> Ptr () -> CUInt -> CUInt -> IO FModResult)+type FModOutputReadFromMixer = FunPtr (Ptr FModOutputState -> Ptr () -> CUInt -> IO FModResult)++-- FMOD_OUTPUT_DESCRIPTION+data FModOutputDescription = FModOutputDescription {+ fmod_OutputDescriptionName :: CString+ , fmod_OutputDescriptionVersion :: CUInt+ , fmod_OutputDescriptionPolling :: CInt+ , fmod_OutputDescriptionGetNumDrivers :: FModOutputGetNumDriversCallback+ , fmod_OutputDescriptionGetDriverName :: FModOutputGetDriverNameCallback+ , fmod_OutputDescriptionGetDRiverCaps :: FModOutputGetDriverCapsCallback+ , fmod_OutputDescriptionInit :: FModOutputInitCallback+ , fmod_OutputDescriptionClose :: FModOutputCloseCallback+ , fmod_OutputDescriptionUpdate :: FModOutputUpdateCallback+ , fmod_OutputDescriptionGetHandle :: FModOutputGetHandleCallback+ , fmod_OutputDescriptionGetPosition :: FModOutputGetPositionCallback+ , fmod_OutputDescriptionLock :: FModOutputLockCallback+ , fmod_OutputDescriptionUnlock :: FModOutputUnlockCallback+ } deriving (Eq,Show)++-- FMOD_OUTPUT_STATE+data FModOutputState = FModOutputState {+ fmod_OutputStatePluginData :: Ptr ()+ , fmod_OutputStateReadFromMixer :: FModOutputReadFromMixer+ } deriving (Eq,Show)