diff --git a/openair1/SIMULATION/LTE_CONECT_RELAY/COPYING b/openair1/SIMULATION/LTE_CONECT_RELAY/COPYING deleted file mode 100644 index 818433ecc0e094a4db1023c68b33f24344643ad8..0000000000000000000000000000000000000000 --- a/openair1/SIMULATION/LTE_CONECT_RELAY/COPYING +++ /dev/null @@ -1,674 +0,0 @@ - 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>. diff --git a/openair1/SIMULATION/LTE_CONECT_RELAY/Makefile b/openair1/SIMULATION/LTE_CONECT_RELAY/Makefile deleted file mode 100644 index 604d99fd0378488bc2130f8a19a38787da1d6a24..0000000000000000000000000000000000000000 --- a/openair1/SIMULATION/LTE_CONECT_RELAY/Makefile +++ /dev/null @@ -1,149 +0,0 @@ -include $(OPENAIR_HOME)/common/utils/Makefile.inc - -TOP_DIR = $(OPENAIR1_DIR) -OPENAIR1_TOP = $(OPENAIR1_DIR) -OPENAIR2_TOP = $(OPENAIR2_DIR) -OPENAIR3 = $(OPENAIR3_DIR) - -CFLAGS += -DPHYSIM -DNODE_RG -DUSER_MODE -DPC_TARGET -DPC_DSP -DNB_ANTENNAS_RX=2 -DNB_ANTENNAS_TXRX=2 -DNB_ANTENNAS_TX=2 -DPHY_CONTEXT=1 -rdynamic -DMALLOC_CHECK_=1 # -Wno-packed-bitfield-compat - -LFLAGS = -lm -lblas -lxml2 -lrt - -CFLAGS += -m32 -DOPENAIR_LTE #-DOFDMA_ULSCH #-DIFFT_FPGA -DIFFT_FPGA_UE -#CFLAGS += -DTBS_FIX -CFLAGS += -DCELLULAR - -ASN1_MSG_INC = $(OPENAIR2_DIR)/RRC/LITE/MESSAGES - -ifdef EMOS -CFLAGS += -DEMOS -endif - -ifdef DEBUG_PHY -CFLAGS += -DDEBUG_PHY -endif - -ifdef MeNBMUE -CFLAGS += -DMeNBMUE -endif - -ifdef MU_RECEIVER -CFLAGS += -DMU_RECEIVER -endif - -ifdef ZBF_ENABLED -CFLAGS += -DNULL_SHAPE_BF_ENABLED -endif - -ifdef RANDOM_BF -CFLAGS += -DRANDOM_BF -endif - -ifdef PBS_SIM -CFLAGS += -DPBS_SIM -endif - -# Debugging flags -#CFLAGS += -DDEBUG_DLSCH_CODING -#CFLAGS += -DDEBUG_DLSCH_DECODING -#CFLAGS += -DDEBUG_LOGMAP - -# Always use this flag with relaysim. Will be fixed in future versions. -CFLAGS += -DREL_AMPLIFY_FORWARD - -# Use this flag if you want to run relaysim with only 1 relay node. -#CFLAGS += -DSINGLE_RELAY - -# This is a flag to use different patterns for RVI (redundancy versions) -# Normally it is (0,0,1,1). If you use this flag, it is used as (0,1,1,0). -CFLAGS += -DRVI_PATTERN_ALT - -# This flag is used in relayQMFsim where relays are Quantize-Forward relays. -# with this option you get results which assumes there is no error in the first link (Source-Relays). -# This kind of an upper bound to the performance of QMF relays in this scenario after LLR adjustment at the destination. -#CFLAGS += -DQF_UPPER_BOUND - -CFLAGS += -DNO_RRM #-DOPENAIR2 -DPHY_ABSTRACTION - -ifdef XFORMS -CFLAGS += -DXFORMS -LFLAGS += -lforms -endif - -ifdef PERFECT_CE -CFLAGS += -DPERFECT_CE -endif - -ifdef BIT8_TX -CFLAGS += -DBIT8_TX -endif - -CFLAGS += -DNO_RRM -DOPENAIR1 #-DOPENAIR2 #-DPHY_ABSTRACTION - -CFLAGS += -I/usr/include/X11 -I/usr/X11R6/include - -ifdef ENABLE_FXP -CFLAGS += -DENABLE_FXP # Fxp only -else - ifdef ENABLE_FLP - CFLAGS += -DENABLE_FLP # dual_stream_correlation(), channel_compensation_prec() and qam16_qam16_mu_mimo() are flp (independently) - else - ifdef ENABLE_FULL_FLP - CFLAGS += -DENABLE_FULL_FLP # Flp inside of rx_pdsch() (dlsch_detection_mrc(), dual_stream_correlation(), channel_compensation_prec(), qam16_qam16_mu_mimo() and dlsch_16qam_16qam_llr) - else - CFLAGS += -DENABLE_FXP # Fxp only by default - endif - endif -endif - -ifdef COMPARE_FLP_AND_FXP -CFLAGS += -DCOMPARE_FLP_AND_FXP -endif - -include $(TOP_DIR)/PHY/Makefile.inc -#SCHED_OBJS = $(TOP_DIR)/SCHED/phy_procedures_lte_common.o $(TOP_DIR)/SCHED/phy_procedures_lte_eNb.o $(TOP_DIR)/SCHED/phy_procedures_lte_ue.o -include $(TOP_DIR)/SCHED/Makefile.inc -include $(TOP_DIR)/SIMULATION/Makefile.inc -include $(OPENAIR2_DIR)/LAYER2/Makefile.inc -include $(OPENAIR2_DIR)/UTIL/Makefile.inc -include $(OPENAIR2_DIR)/RRC/LITE/MESSAGES/Makefile.inc - -CFLAGS += $(L2_incl) -I$(ASN1_MSG_INC) -I$(TOP_DIR) -I$(OPENAIR3) $(UTIL_incl) -# EXTRA_CFLAGS = - -#STATS_OBJS += $(TOP_DIR)/ARCH/CBMIMO1/DEVICE_DRIVER/cbmimo1_proc.o - -#LAYER2_OBJ += $(OPENAIR2_DIR)/LAYER2/MAC/rar_tools.o -LAYER2_OBJ = $(OPENAIR2_DIR)/LAYER2/MAC/lte_transport_init.o - -OBJ = $(PHY_OBJS) $(SIMULATION_OBJS) $(TOOLS_OBJS) $(SCHED_OBJS) $(LAYER2_OBJ) $(LOG_OBJS) #$(ASN1_MSG_OBJS) -#OBJ2 = $(PHY_OBJS) $(SIMULATION_OBJS) $(TOOLS_OBJS) - -ifdef XFORMS -OBJ += ../../USERSPACE_TOOLS/SCOPE/lte_scope.o -endif - -OBJ += openair_hw.o - -all: relaysim - -$(OBJ) : %.o : %.c - @echo - @echo Compiling $< ... - $(CC) -c $(CFLAGS) -o $@ $< - -relaysim : $(OBJ) relaysim.c - @echo "Compiling relaysim.c ..." - $(CC) relaysim.c -o relaysim $(CFLAGS) $(OBJ) $(LFLAGS) #-static -L/usr/lib/libblas - -clean : - rm -f $(OBJ) - rm -f *.o - -cleanall : clean - rm -f relaysim - rm -f *.exe* - -showcflags : - @echo $(CFLAGS) - diff --git a/openair1/SIMULATION/LTE_CONECT_RELAY/openair_hw.c b/openair1/SIMULATION/LTE_CONECT_RELAY/openair_hw.c deleted file mode 100644 index 0e37c682f57e81ea053ffca848e15bdbfd079992..0000000000000000000000000000000000000000 --- a/openair1/SIMULATION/LTE_CONECT_RELAY/openair_hw.c +++ /dev/null @@ -1,151 +0,0 @@ -/******************************************************************************* - OpenAirInterface - Copyright(c) 1999 - 2014 Eurecom - - OpenAirInterface 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. - - - OpenAirInterface 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 OpenAirInterface.The full GNU General Public License is - included in this distribution in the file called "COPYING". If not, - see <http://www.gnu.org/licenses/>. - - Contact Information - OpenAirInterface Admin: openair_admin@eurecom.fr - OpenAirInterface Tech : openair_tech@eurecom.fr - OpenAirInterface Dev : openair4g-devel@eurecom.fr - - Address : Eurecom, Campus SophiaTech, 450 Route des Chappes, CS 50193 - 06904 Biot Sophia Antipolis cedex, FRANCE - - *******************************************************************************/ -#include <string.h> -#include <math.h> -#include <unistd.h> -#include <execinfo.h> -#include <signal.h> -#include <sys/ioctl.h> -#include <sys/mman.h> - -#include "SIMULATION/TOOLS/defs.h" -#include "PHY/types.h" -#include "PHY/defs.h" -#include "PHY/extern.h" -#include "MAC_INTERFACE/extern.h" -#ifdef IFFT_FPGA -#include "PHY/LTE_REFSIG/mod_table.h" -#endif - -#include "ARCH/CBMIMO1/DEVICE_DRIVER/cbmimo1_device.h" -#include "ARCH/CBMIMO1/DEVICE_DRIVER/defs.h" -#include "ARCH/COMMON/defs.h" -#include "ARCH/CBMIMO1/DEVICE_DRIVER/extern.h" -#include "SCHED/defs.h" -#include "SCHED/extern.h" -#include "LAYER2/MAC/extern.h" - - -TX_RX_VARS dummy_tx_rx_vars; - - -int pci_buffers[2*NB_ANTENNAS_RX]; -int openair_fd,fc; -unsigned int bigphys_top; -unsigned int mem_base; - - -int setup_oai_hw(LTE_DL_FRAME_PARMS *frame_parms, - PHY_VARS_UE *phy_vars_ue, - PHY_VARS_eNB *phy_vars_eNB) -{ - int i,j; - - frame_parms->dual_tx = 0; - frame_parms->freq_idx = 0; - fc = 0; - - printf("Opening /dev/openair0\n"); - - if ((openair_fd = open("/dev/openair0", O_RDWR)) <0) { - fprintf(stderr,"Error %d opening /dev/openair0\n",openair_fd); - exit(-1); - } - - ioctl(openair_fd,openair_DUMP_CONFIG,frame_parms); - sleep(1); - // ioctl(openair_fd,openair_GET_BUFFER,(void *)&fc); - ioctl(openair_fd,openair_GET_VARS,&dummy_tx_rx_vars); - ioctl(openair_fd,openair_GET_BIGPHYSTOP,(void *)&bigphys_top); - - if (dummy_tx_rx_vars.TX_DMA_BUFFER[0]==NULL) { - printf("pci_buffers not allocated\n"); - close(openair_fd); - exit(-1); - } - - printf("BIGPHYS top 0x%x\n",bigphys_top); - printf("RX_DMA_BUFFER[0] %p\n",dummy_tx_rx_vars.RX_DMA_BUFFER[0]); - printf("TX_DMA_BUFFER[0] %p\n",dummy_tx_rx_vars.TX_DMA_BUFFER[0]); - - mem_base = (unsigned int) mmap(0, - BIGPHYS_NUMPAGES*4096, - PROT_READ|PROT_WRITE, - MAP_SHARED|MAP_FIXED,//MAP_SHARED, - openair_fd, - 0); - - if (mem_base != -1) - msg("MEM base= 0x%x\n",mem_base); - else { - msg("Could not map physical memory\n"); - close(openair_fd); - exit(-1); - } - - if (phy_vars_ue) { - - // replace RX signal buffers with mmaped HW versions - for (i=0; i<frame_parms->nb_antennas_rx; i++) { - free(phy_vars_ue->lte_ue_common_vars.rxdata[i]); - phy_vars_ue->lte_ue_common_vars.rxdata[i] = (int32_t*)((int)dummy_tx_rx_vars.RX_DMA_BUFFER[0]-bigphys_top+mem_base); - printf("rxdata[%d] @ %p\n",i,phy_vars_ue->lte_ue_common_vars.rxdata[i]); - } - - for (i=0; i<frame_parms->nb_antennas_tx; i++) { - free(phy_vars_ue->lte_ue_common_vars.txdata[i]); - phy_vars_ue->lte_ue_common_vars.txdata[i] = (int32_t*)((int)dummy_tx_rx_vars.TX_DMA_BUFFER[0]-bigphys_top+mem_base); - printf("txdata[%d] @ %p\n",i,phy_vars_ue->lte_ue_common_vars.txdata[i]); - } - } - - if (phy_vars_eNB) { - // replace RX signal buffers with mmaped HW versions - for (i=0; i<frame_parms->nb_antennas_rx; i++) { - free(phy_vars_eNB->lte_eNB_common_vars.rxdata[0][i]); - phy_vars_eNB->lte_eNB_common_vars.rxdata[0][i] = (int32_t*)((int)dummy_tx_rx_vars.RX_DMA_BUFFER[0]-bigphys_top+mem_base); - printf("rxdata[%d] @ %p\n",i,phy_vars_eNB->lte_eNB_common_vars.rxdata[0][i]); - } - - for (i=0; i<frame_parms->nb_antennas_tx; i++) { - free(phy_vars_eNB->lte_eNB_common_vars.txdata[0][i]); - phy_vars_eNB->lte_eNB_common_vars.txdata[0][i] = (int32_t*)((int)dummy_tx_rx_vars.TX_DMA_BUFFER[0]-bigphys_top+mem_base); - printf("txdata[%d] @ %p\n",i,phy_vars_eNB->lte_eNB_common_vars.txdata[0][i]); - - for (j=0; j<16; j++) { - printf("txbuffer %d: %x\n",j,phy_vars_eNB->lte_eNB_common_vars.txdata[0][i][j]); - phy_vars_eNB->lte_eNB_common_vars.txdata[0][i][j] = 16-j; - } - - // msync(openair_fd); - } - } - - return(openair_fd); -} diff --git a/openair1/SIMULATION/LTE_CONECT_RELAY/readme.txt b/openair1/SIMULATION/LTE_CONECT_RELAY/readme.txt deleted file mode 100644 index a17aeba7d978c532e26e81227c8e47e4d6e3892b..0000000000000000000000000000000000000000 --- a/openair1/SIMULATION/LTE_CONECT_RELAY/readme.txt +++ /dev/null @@ -1,11 +0,0 @@ -This file is created by Emre Atsan. emre.atsan@epfl.ch, ARNI, EPFL, CH. ------------------------------------------------------------- - -Link level simulations for CONECT project Diamond Relay Network Scenario. - -We assume Half-Duplex relays and a proper scheduling in which two relays never transmit at the same time. - -* relaysim: This file is an extension to dlsim with additional channels created for the second source-relay and relay-destination paths. Relays are AF (Amplify-Forward relays in this simulation). -* relayQMFsim: Similar to relaysim, except relays are Quantize-Forward relays. - - diff --git a/openair1/SIMULATION/LTE_CONECT_RELAY/relaysim.c b/openair1/SIMULATION/LTE_CONECT_RELAY/relaysim.c deleted file mode 100644 index 2f30525c40a2aaeca4370985c12b3dd1bd0527e4..0000000000000000000000000000000000000000 --- a/openair1/SIMULATION/LTE_CONECT_RELAY/relaysim.c +++ /dev/null @@ -1,2473 +0,0 @@ -/******************************************************************************* - OpenAirInterface - Copyright(c) 1999 - 2014 Eurecom - - OpenAirInterface 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. - - - OpenAirInterface 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 OpenAirInterface.The full GNU General Public License is - included in this distribution in the file called "COPYING". If not, - see <http://www.gnu.org/licenses/>. - - Contact Information - OpenAirInterface Admin: openair_admin@eurecom.fr - OpenAirInterface Tech : openair_tech@eurecom.fr - OpenAirInterface Dev : openair4g-devel@eurecom.fr - - Address : Eurecom, Campus SophiaTech, 450 Route des Chappes, CS 50193 - 06904 Biot Sophia Antipolis cedex, FRANCE - - *******************************************************************************/ -#include <string.h> -#include <math.h> -#include <unistd.h> -#include <execinfo.h> -#include <signal.h> - -#include "SIMULATION/TOOLS/defs.h" -#include "PHY/types.h" -#include "PHY/defs.h" -#include "PHY/vars.h" -#include "MAC_INTERFACE/vars.h" -#ifdef IFFT_FPGA -#include "PHY/LTE_REFSIG/mod_table.h" -#endif - -#include "ARCH/CBMIMO1/DEVICE_DRIVER/vars.h" -#include "SCHED/defs.h" -#include "SCHED/vars.h" -#include "LAYER2/MAC/vars.h" - -#include "OCG_vars.h" -#include "UTIL/LOG/log.h" - -#ifdef XFORMS -#include "forms.h" -#include "../../USERSPACE_TOOLS/SCOPE/lte_scope.h" -#endif - -//#define AWGN -//#define NO_DCI - -#define BW 7.68 - -//#define ABSTRACTION -//#define PERFECT_CE - -/* - #define RBmask0 0x00fc00fc - #define RBmask1 0x0 - #define RBmask2 0x0 - #define RBmask3 0x0 -*/ - -PHY_VARS_eNB *PHY_vars_eNB; -PHY_VARS_UE *PHY_vars_UE; - -void handler(int sig) -{ - void *array[10]; - size_t size; - - // get void*'s for all entries on the stack - size = backtrace(array, 10); - - // print out all the frames to stderr - fprintf(stderr, "Error: signal %d:\n", sig); - backtrace_symbols_fd(array, size, 2); - exit(1); -} - - -#ifdef XFORMS -void do_forms(FD_lte_scope *form, LTE_DL_FRAME_PARMS *frame_parms, short **channel, short **channel_f, short **rx_sig, short **rx_sig_f, short *dlsch_comp, short* dlsch_comp_i, short* dlsch_rho, - short *dlsch_llr, int coded_bits_per_codeword) -{ - - int i,j,ind,k,s; - - float Re,Im; - float mag_sig[NB_ANTENNAS_RX*4*NUMBER_OF_OFDM_CARRIERS*NUMBER_OF_OFDM_SYMBOLS_PER_SLOT], - sig_time[NB_ANTENNAS_RX*4*NUMBER_OF_OFDM_CARRIERS*NUMBER_OF_OFDM_SYMBOLS_PER_SLOT], - sig2[FRAME_LENGTH_COMPLEX_SAMPLES], - time2[FRAME_LENGTH_COMPLEX_SAMPLES], - I[25*12*11*4], Q[25*12*11*4], - *llr,*llr_time; - - float avg, cum_avg; - - llr = malloc(coded_bits_per_codeword*sizeof(float)); - llr_time = malloc(coded_bits_per_codeword*sizeof(float)); - - // Channel frequency response - cum_avg = 0; - ind = 0; - - for (j=0; j<4; j++) { - for (i=0; i<frame_parms->nb_antennas_rx; i++) { - for (k=0; k<NUMBER_OF_OFDM_CARRIERS*7; k++) { - sig_time[ind] = (float)ind; - Re = (float)(channel_f[(j<<1)+i][2*k]); - Im = (float)(channel_f[(j<<1)+i][2*k+1]); - //mag_sig[ind] = (short) rand(); - mag_sig[ind] = (short)10*log10(1.0+((double)Re*Re + (double)Im*Im)); - cum_avg += (short)sqrt((double)Re*Re + (double)Im*Im) ; - ind++; - } - - // ind+=NUMBER_OF_OFDM_CARRIERS/4; // spacing for visualization - } - } - - avg = cum_avg/NUMBER_OF_USEFUL_CARRIERS; - - //fl_set_xyplot_ybounds(form->channel_f,30,70); - fl_set_xyplot_data(form->channel_f,sig_time,mag_sig,ind,"","",""); - - /* - // channel time resonse - cum_avg = 0; - ind = 0; - for (k=0;k<1;k++){ - for (j=0;j<1;j++) { - - for (i=0;i<frame_parms->ofdm_symbol_size;i++){ - sig_time[ind] = (float)ind; - Re = (float)(channel[k+2*j][2*i]); - Im = (float)(channel[k+2*j][2*i+1]); - //mag_sig[ind] = (short) rand(); - mag_sig[ind] = (short)10*log10(1.0+((double)Re*Re + (double)Im*Im)); - cum_avg += (short)sqrt((double)Re*Re + (double)Im*Im) ; - ind++; - } - } - } - - //fl_set_xyplot_ybounds(form->channel_t_im,10,90); - fl_set_xyplot_data(form->channel_t_im,sig_time,mag_sig,ind,"","",""); - */ - - // channel_t_re = rx_sig_f[0] - //for (i=0; i<FRAME_LENGTH_COMPLEX_SAMPLES_NO_PREFIX; i++) { - for (i=0; i<NUMBER_OF_OFDM_CARRIERS*frame_parms->symbols_per_tti/2; i++) { - sig2[i] = 10*log10(1.0+(double) ((rx_sig_f[0][4*i])*(rx_sig_f[0][4*i])+(rx_sig_f[0][4*i+1])*(rx_sig_f[0][4*i+1]))); - time2[i] = (float) i; - } - - //fl_set_xyplot_ybounds(form->channel_t_re,10,90); - fl_set_xyplot_data(form->channel_t_re,time2,sig2,NUMBER_OF_OFDM_CARRIERS*frame_parms->symbols_per_tti,"","",""); - //fl_set_xyplot_data(form->channel_t_re,time2,sig2,FRAME_LENGTH_COMPLEX_SAMPLES_NO_PREFIX,"","",""); - - - // channel_t_im = rx_sig[0] - //if (frame_parms->nb_antennas_rx>1) { - for (i=0; i<FRAME_LENGTH_COMPLEX_SAMPLES; i++) { - //for (i=0; i<NUMBER_OF_OFDM_CARRIERS*frame_parms->symbols_per_tti/2; i++) { - sig2[i] = 10*log10(1.0+(double) ((rx_sig[0][2*i])*(rx_sig[0][2*i])+(rx_sig[0][2*i+1])*(rx_sig[0][2*i+1]))); - time2[i] = (float) i; - } - - //fl_set_xyplot_ybounds(form->channel_t_im,0,100); - //fl_set_xyplot_data(form->channel_t_im,&time2[640*12*6],&sig2[640*12*6],640*12,"","",""); - fl_set_xyplot_data(form->channel_t_im,time2,sig2,FRAME_LENGTH_COMPLEX_SAMPLES,"","",""); - //} - - /* - // PBCH LLR - j=0; - for(i=0;i<1920;i++) { - llr[j] = (float) pbch_llr[i]; - llr_time[j] = (float) j; - //if (i==63) - // i=127; - //else if (i==191) - // i=319; - j++; - } - - fl_set_xyplot_data(form->decoder_input,llr_time,llr,1920,"","",""); - //fl_set_xyplot_ybounds(form->decoder_input,-100,100); - - // PBCH I/Q - j=0; - for(i=0;i<12*12;i++) { - I[j] = pbch_comp[2*i]; - Q[j] = pbch_comp[2*i+1]; - j++; - //if (i==47) - // i=96; - //else if (i==191) - // i=239; - } - - fl_set_xyplot_data(form->scatter_plot,I,Q,12*12,"","",""); - //fl_set_xyplot_xbounds(form->scatter_plot,-100,100); - //fl_set_xyplot_ybounds(form->scatter_plot,-100,100); - - // PDCCH I/Q - j=0; - for(i=0;i<12*25*3;i++) { - I[j] = pdcch_comp[2*i]; - Q[j] = pdcch_comp[2*i+1]; - j++; - //if (i==47) - // i=96; - //else if (i==191) - // i=239; - } - - fl_set_xyplot_data(form->scatter_plot1,I,Q,12*25*3,"","",""); - //fl_set_xyplot_xbounds(form->scatter_plot,-100,100); - //fl_set_xyplot_ybounds(form->scatter_plot,-100,100); - */ - - // DLSCH LLR - for(i=0; i<coded_bits_per_codeword; i++) { - llr[i] = (float) dlsch_llr[i]; - llr_time[i] = (float) i; - } - - fl_set_xyplot_data(form->demod_out,llr_time,llr,coded_bits_per_codeword,"","",""); - fl_set_xyplot_ybounds(form->demod_out,-1000,1000); - - // DLSCH I/Q - j=0; - - for (s=0; s<frame_parms->symbols_per_tti; s++) { - for(i=0; i<12*25; i++) { - I[j] = dlsch_comp[(2*25*12*s)+2*i]; - Q[j] = dlsch_comp[(2*25*12*s)+2*i+1]; - j++; - } - - //if (s==2) - // s=3; - //else if (s==5) - // s=6; - //else if (s==8) - // s=9; - } - - fl_set_xyplot_data(form->scatter_plot,I,Q,j,"","",""); - fl_set_xyplot_xbounds(form->scatter_plot,-2000,2000); - fl_set_xyplot_ybounds(form->scatter_plot,-2000,2000); - - // DLSCH I/Q - j=0; - - for (s=0; s<frame_parms->symbols_per_tti; s++) { - for(i=0; i<12*25; i++) { - I[j] = dlsch_comp_i[(2*25*12*s)+2*i]; - Q[j] = dlsch_comp_i[(2*25*12*s)+2*i+1]; - j++; - } - - //if (s==2) - // s=3; - //else if (s==5) - // s=6; - //else if (s==8) - // s=9; - } - - fl_set_xyplot_data(form->scatter_plot1,I,Q,j,"","",""); - fl_set_xyplot_xbounds(form->scatter_plot1,-2000,2000); - fl_set_xyplot_ybounds(form->scatter_plot1,-2000,2000); - - // DLSCH I/Q - j=0; - - for (s=0; s<frame_parms->symbols_per_tti; s++) { - for(i=0; i<12*25; i++) { - I[j] = dlsch_rho[(2*25*12*s)+2*i]; - Q[j] = dlsch_rho[(2*25*12*s)+2*i+1]; - j++; - } - - //if (s==2) - // s=3; - //else if (s==5) - // s=6; - //else if (s==8) - // s=9; - } - - fl_set_xyplot_data(form->scatter_plot2,I,Q,j,"","",""); - //fl_set_xyplot_xbounds(form->scatter_plot2,-1000,1000); - //fl_set_xyplot_ybounds(form->scatter_plot2,-1000,1000); - - - free(llr); - free(llr_time); - -} -#endif - -void lte_param_init(unsigned char N_tx, unsigned char N_rx,unsigned char transmission_mode,uint8_t extended_prefix_flag,uint8_t fdd_flag, uint16_t Nid_cell,uint8_t tdd_config,uint8_t N_RB_DL, - uint8_t osf) -{ - - LTE_DL_FRAME_PARMS *lte_frame_parms; - int i; - - - printf("Start lte_param_init\n"); - PHY_vars_eNB = malloc(sizeof(PHY_VARS_eNB)); - PHY_vars_UE = malloc(sizeof(PHY_VARS_UE)); - //PHY_config = malloc(sizeof(PHY_CONFIG)); - mac_xface = malloc(sizeof(MAC_xface)); - - randominit(0); - set_taus_seed(0); - - lte_frame_parms = &(PHY_vars_eNB->lte_frame_parms); - - lte_frame_parms->N_RB_DL = N_RB_DL; //50 for 10MHz and 25 for 5 MHz - lte_frame_parms->N_RB_UL = N_RB_DL; - lte_frame_parms->Ncp = extended_prefix_flag; - lte_frame_parms->Nid_cell = Nid_cell; - lte_frame_parms->nushift = 0; - lte_frame_parms->nb_antennas_tx = N_tx; - lte_frame_parms->nb_antennas_rx = N_rx; - lte_frame_parms->phich_config_common.phich_resource = oneSixth; - lte_frame_parms->tdd_config = tdd_config; - lte_frame_parms->frame_type = (fdd_flag==1)?0 : 1; - // lte_frame_parms->Csrs = 2; - // lte_frame_parms->Bsrs = 0; - // lte_frame_parms->kTC = 0;44 - // lte_frame_parms->n_RRC = 0; - lte_frame_parms->mode1_flag = (transmission_mode == 1)? 1 : 0; - - init_frame_parms(lte_frame_parms,osf); - - //copy_lte_parms_to_phy_framing(lte_frame_parms, &(PHY_config->PHY_framing)); - - phy_init_top(lte_frame_parms); //allocation - - lte_frame_parms->twiddle_fft = twiddle_fft; - lte_frame_parms->twiddle_ifft = twiddle_ifft; - lte_frame_parms->rev = rev; - - PHY_vars_UE->is_secondary_ue = 0; - PHY_vars_UE->lte_frame_parms = *lte_frame_parms; - PHY_vars_eNB->lte_frame_parms = *lte_frame_parms; - - phy_init_lte_top(lte_frame_parms); - dump_frame_parms(lte_frame_parms); - - for (i=0; i<3; i++) - lte_gold(lte_frame_parms,PHY_vars_UE->lte_gold_table[i],i); - - phy_init_lte_ue(PHY_vars_UE,0); - phy_init_lte_eNB(PHY_vars_eNB,0,0,0); - - - printf("Done lte_param_init\n"); - - -} - - -//DCI2_5MHz_2A_M10PRB_TDD_t DLSCH_alloc_pdu2_2A[2]; - -DCI1E_5MHz_2A_M10PRB_TDD_t DLSCH_alloc_pdu2_1E[2]; - - -#define UL_RB_ALLOC 0x1ff; -#define CCCH_RB_ALLOC computeRIV(PHY_vars_eNB->lte_frame_parms.N_RB_UL,0,2) -//#define DLSCH_RB_ALLOC 0x1fbf // ignore DC component,RB13 -//#define DLSCH_RB_ALLOC 0x0001 -void do_OFDM_mod(mod_sym_t **txdataF, int32_t **txdata, uint16_t next_slot, LTE_DL_FRAME_PARMS *frame_parms) -{ - - int aa, slot_offset, slot_offset_F; - -#ifdef IFFT_FPGA - int32_t **txdataF2; - int i, l; - - txdataF2 = (int32_t **)malloc(2*sizeof(int32_t*)); - txdataF2[0] = (int32_t *)malloc(NUMBER_OF_OFDM_CARRIERS*((frame_parms->Ncp==1) ? 6 : 7)*sizeof(int32_t)); - txdataF2[1] = (int32_t *)malloc(NUMBER_OF_OFDM_CARRIERS*((frame_parms->Ncp==1) ? 6 : 7)*sizeof(int32_t)); - - bzero(txdataF2[0],NUMBER_OF_OFDM_CARRIERS*((frame_parms->Ncp==1) ? 6 : 7)*sizeof(int32_t)); - bzero(txdataF2[1],NUMBER_OF_OFDM_CARRIERS*((frame_parms->Ncp==1) ? 6 : 7)*sizeof(int32_t)); - - slot_offset_F = (next_slot)*(frame_parms->N_RB_DL*12)*((frame_parms->Ncp==1) ? 6 : 7); - slot_offset = (next_slot)*(frame_parms->samples_per_tti>>1); - - //write_output("eNB_txsigF0.m","eNB_txsF0", lte_eNB_common_vars->txdataF[eNB_id][0],300*120,1,4); - //write_output("eNB_txsigF1.m","eNB_txsF1", lte_eNB_common_vars->txdataF[eNB_id][1],300*120,1,4); - - - // do talbe lookup and write results to txdataF2 - for (aa=0; aa<frame_parms->nb_antennas_tx; aa++) { - - l = slot_offset_F; - - for (i=0; i<NUMBER_OF_OFDM_CARRIERS*((frame_parms->Ncp==1) ? 6 : 7); i++) - if ((i%512>=1) && (i%512<=150)) - txdataF2[aa][i] = ((int32_t*)mod_table)[txdataF[aa][l++]]; - else if (i%512>=362) - txdataF2[aa][i] = ((int32_t*)mod_table)[txdataF[aa][l++]]; - else - txdataF2[aa][i] = 0; - - } - - for (aa=0; aa<frame_parms->nb_antennas_tx; aa++) { - if (frame_parms->Ncp == 1) - PHY_ofdm_mod(txdataF2[aa], // input - &txdata[aa][slot_offset], // output - frame_parms->log2_symbol_size, // log2_fft_size - 6, // number of symbols - frame_parms->nb_prefix_samples, // number of prefix samples - frame_parms->twiddle_ifft, // IFFT twiddle factors - frame_parms->rev, // bit-reversal permutation - CYCLIC_PREFIX); - else { - normal_prefix_mod(txdataF2[aa],&txdata[aa][slot_offset],7,frame_parms); - } - } - - free(txdataF2[0]); - free(txdataF2[1]); - free(txdataF2); - -#else //IFFT_FPGA - - slot_offset_F = (next_slot)*(frame_parms->ofdm_symbol_size)*((frame_parms->Ncp==1) ? 6 : 7); - slot_offset = (next_slot)*(frame_parms->samples_per_tti>>1); - - for (aa=0; aa<frame_parms->nb_antennas_tx; aa++) { - if (frame_parms->Ncp == 1) - PHY_ofdm_mod(&txdataF[aa][slot_offset_F], // input - &txdata[aa][slot_offset], // output - frame_parms->log2_symbol_size, // log2_fft_size - 6, // number of symbols - frame_parms->nb_prefix_samples, // number of prefix samples - frame_parms->twiddle_ifft, // IFFT twiddle factors - frame_parms->rev, // bit-reversal permutation - CYCLIC_PREFIX); - else { - normal_prefix_mod(&txdataF[aa][slot_offset_F], - &txdata[aa][slot_offset], - 7, - frame_parms); - } - } - -#endif //IFFT_FPGA - -} - -int main(int argc, char **argv) -{ - - char c; - int k,i,aa,aarx,aatx; - - int s,Kr,Kr_bytes; - - double sigma2, sigma2_dB=10,SNR,snr0=-2.0,snr1,rate,saving_bler=1; - double snr_step=1,input_snr_step=1, snr_int=20; - - LTE_DL_FRAME_PARMS *frame_parms; - double **s_re,**s_im,**r_re,**r_im; - double forgetting_factor=0.0; //in [0,1] 0 means a new channel every time, 1 means keep the same channel - double iqim=0.0; - - uint8_t extended_prefix_flag=0,transmission_mode=1,n_tx=1,n_rx=1; - uint16_t Nid_cell=0; - - int eNB_id = 0, eNB_id_i = NUMBER_OF_eNB_MAX; - unsigned char mcs,dual_stream_UE = 0,awgn_flag=0,round,dci_flag=0; - unsigned char i_mod = 2; - unsigned short NB_RB; - unsigned char Ns,l,m; - uint16_t tdd_config=3; - uint16_t n_rnti=0x1234; - int n_users = 1; - - SCM_t channel_model=Rayleigh1; - // unsigned char *input_data,*decoded_output; - - unsigned char *input_buffer[2]; - unsigned short input_buffer_length; - unsigned int ret; - unsigned int coded_bits_per_codeword,nsymb,dci_cnt,tbs; - - unsigned int tx_lev,tx_lev_dB,trials,errs[4]= {0,0,0,0},round_trials[4]= {0,0,0,0},dci_errors=0,dlsch_active=0,num_layers; - int re_allocated; - FILE *bler_fd; - char bler_fname[256]; - FILE *tikz_fd; - char tikz_fname[256]; - - FILE *input_trch_fd; - unsigned char input_trch_file=0; - FILE *input_fd=NULL; - unsigned char input_file=0; - char input_val_str[50],input_val_str2[50]; - - char input_trch_val[16]; - double pilot_sinr, abs_channel,channelx,channely; - - // unsigned char pbch_pdu[6]; - - DCI_ALLOC_t dci_alloc[8],dci_alloc_rx[8]; - int num_common_dci=0,num_ue_spec_dci=0,num_dci=0; - - // FILE *rx_frame_file; - - int n_frames; - int n_ch_rlz = 1; - //channel_desc_t *eNB2UE; - double snr; - uint8_t num_pdcch_symbols=3,num_pdcch_symbols_2=0; - uint8_t pilot1,pilot2,pilot3; - uint8_t rx_sample_offset = 0; - //char stats_buffer[4096]; - //int len; - uint8_t num_rounds = 4,fix_rounds=0; - uint8_t subframe=6; - int u; - int abstx=0; - int iii; - FILE *csv_fd; - char csv_fname[512]; - int ch_realization; - int pmi_feedback=0; - int hold_channel=0; - // void *data; - // int ii; - // int bler; - double blerr,uncoded_ber,avg_ber; - short *uncoded_ber_bit; - uint8_t N_RB_DL=25,osf=1; - int16_t amp; - uint8_t fdd_flag = 0; - - //RELAY SIM PARAMETERS FOR NEW CHANNEL -#ifdef REL_AMPLIFY_FORWARD - //Number of relays - int nb_relays = 2; - int rel=0; - int active_relay_channel_id=0; - channel_desc_t *eNB2REL[nb_relays]; - channel_desc_t *REL2UE[nb_relays]; - unsigned int tx_lev_r1,tx_lev_r1_dB; - double SNR_r1; - double **rs_re,**rs_im, **dr_re, **dr_im; - //RELAYS TO UE PARAMETERS - double sigma2_r1, sigma2_r1_dB,SNR_r_array[nb_relays], SNR_array[nb_relays]; - double alpha_SNR=1.0; - unsigned int rv_pattern[4] = {0,1,1,0}; - double effective_rate, successfully_sent_frames=0, total_timeslots=0; -#else - //FOR POINT TO POINT CASE - THIS SIMULATES DLSIM, basically. - channel_desc_t *eNB2REL; -#endif - -#ifdef XFORMS - FD_lte_scope *form; - char title[255]; -#endif - uint32_t DLSCH_RB_ALLOC = 0x1fff; - - signal(SIGSEGV, handler); - - // default parameters - mcs = 0; - n_frames = 1000; - snr0 = 0; - num_layers = 1; - - while ((c = getopt (argc, argv, "hadpDm:n:o:s:f:t:c:g:r:F:x:y:z:M:N:I:i:j:R:S:C:T:b:u:")) != -1) { - switch (c) { - case 'a': - awgn_flag = 1; - break; - - case 'b': - tdd_config=atoi(optarg); - break; - - case 'd': - dci_flag = 1; - break; - - case 'm': - mcs = atoi(optarg); - break; - - case 'n': - n_frames = atoi(optarg); - break; - - case 'C': - Nid_cell = atoi(optarg); - break; - - case 'o': - rx_sample_offset = atoi(optarg); - break; - - case 'D': - fdd_flag = 1; - break; - - case 'r': - DLSCH_RB_ALLOC = atoi(optarg); - break; - - case 'F': - forgetting_factor = atof(optarg); - break; - - case 's': - snr0 = atoi(optarg); - break; - - case 't': - //Td= atof(optarg); - printf("Please use the -G option to select the channel model\n"); - exit(-1); - break; - - case 'f': - input_snr_step= atof(optarg); - break; - - case 'M': - abstx= atof(optarg); - break; - - case 'N': - n_ch_rlz= atof(optarg); - break; - - case 'p': - extended_prefix_flag=1; - break; - - case 'c': - num_pdcch_symbols=atoi(optarg); - break; - - case 'g': - switch((char)*optarg) { - case 'A': - channel_model=SCM_A; - break; - - case 'B': - channel_model=SCM_B; - break; - - case 'C': - channel_model=SCM_C; - break; - - case 'D': - channel_model=SCM_D; - break; - - case 'E': - channel_model=EPA; - break; - - case 'F': - channel_model=EVA; - break; - - case 'G': - channel_model=ETU; - break; - - case 'H': - channel_model=Rayleigh8; - break; - - case 'I': - channel_model=Rayleigh1; - break; - - case 'J': - channel_model=Rayleigh1_corr; - break; - - case 'K': - channel_model=Rayleigh1_anticorr; - break; - - case 'L': - channel_model=Rice8; - break; - - case 'M': - channel_model=Rice1; - break; - - default: - msg("Unsupported channel model!\n"); - exit(-1); - } - - break; - - case 'x': - transmission_mode=atoi(optarg); - - if ((transmission_mode!=1) && - (transmission_mode!=2) && - (transmission_mode!=5) && - (transmission_mode!=6)) { - msg("Unsupported transmission mode %d\n",transmission_mode); - exit(-1); - } - - break; - - case 'y': - n_tx=atoi(optarg); - - if ((n_tx==0) || (n_tx>2)) { - msg("Unsupported number of tx antennas %d\n",n_tx); - exit(-1); - } - - break; - - case 'z': - n_rx=atoi(optarg); - - if ((n_rx==0) || (n_rx>2)) { - msg("Unsupported number of rx antennas %d\n",n_rx); - exit(-1); - } - - break; - - case 'I': - input_trch_fd = fopen(optarg,"r"); - input_trch_file=1; - break; - - case 'i': - input_fd = fopen(optarg,"r"); - input_file=1; - dci_flag = 1; - break; - - case 'R': - num_rounds=atoi(optarg); - fix_rounds=1; - break; - - case 'S': - subframe=atoi(optarg); - break; - - case 'T': - n_rnti=atoi(optarg); - break; - - case 'u': - dual_stream_UE=atoi(optarg); - - if ((n_tx!=2) || (transmission_mode!=5)) { - msg("Unsupported nb of decoded users: %d user(s), %d user(s) to decode\n", n_tx, dual_stream_UE); - exit(-1); - } - - break; - - case 'j': - alpha_SNR=atof(optarg); - break; - - case 'h': - default: - printf("%s -h(elp) -a(wgn on) -d(ci decoding on) -p(extended prefix on) -m mcs -n n_frames -s snr0 -t Delayspread -x transmission mode (1,2,5,6) -y TXant -z RXant -I trch_file\n",argv[0]); - printf("-h This message\n"); - printf("-a Use AWGN channel and not multipath\n"); - printf("-c Number of PDCCH symbols\n"); - printf("-m MCS\n"); - printf("-d Transmit the DCI and compute its error statistics and the overall throughput\n"); - printf("-p Use extended prefix mode\n"); - printf("-n Number of frames to simulate\n"); - printf("-o Sample offset for receiver\n"); - printf("-s Starting SNR, runs from SNR to SNR+%.1fdB in steps of %.1fdB. If n_frames is 1 then just SNR is simulated and MATLAB/OCTAVE output is generated\n", snr_int, snr_step); - printf("-f step size of SNR, default value is 1.\n"); - printf("-t Delay spread for multipath channel\n"); - printf("-r Ricean factor (dB, 0 dB = Rayleigh, 100 dB = almost AWGN)\n"); - printf("-g [A:M] Use 3GPP 25.814 SCM-A/B/C/D('A','B','C','D') or 36-101 EPA('E'), EVA ('F'),ETU('G') models (ignores delay spread and Ricean factor), Rayghleigh8 ('H'), Rayleigh1('I'), Rayleigh1_corr('J'), Rayleigh1_anticorr ('K'), Rice8('L'), Rice1('M')\n"); - printf("-F forgetting factor (0 new channel every trial, 1 channel constant\n"); - printf("-x Transmission mode (1,2,6 for the moment)\n"); - printf("-y Number of TX antennas used in eNB\n"); - printf("-z Number of RX antennas used in UE\n"); - printf("-R Number of HARQ rounds (fixed)\n"); - printf("-M Determines whether the Absraction flag is on or Off. 1-->On and 0-->Off. Default status is Off. \n"); - printf("-N Determines the number of Channel Realizations in Absraction mode. Default value is 1. \n"); - printf("-I Input filename for TrCH data (binary)\n"); - printf("-u Determines if the 2 streams at the UE are decoded or not. 0-->U2 is interference only and 1-->U2 is detected\n"); - printf("-j Value of alpha - Relay channel SNR coefficient.\n"); - exit(1); - break; - } - } - - NB_RB=conv_nprb(0,DLSCH_RB_ALLOC); -#ifdef XFORMS - fl_initialize (&argc, argv, NULL, 0, 0); - form = create_form_lte_scope(); - sprintf (title, "LTE DLSIM SCOPE"); - fl_show_form (form->lte_scope, FL_PLACE_HOTSPOT, FL_FULLBORDER, title); -#endif - - if (transmission_mode==5) { - n_users = 2; - printf("dual_stream_UE=%d\n", dual_stream_UE); - } - - lte_param_init(n_tx,n_rx,transmission_mode,extended_prefix_flag,fdd_flag,Nid_cell,tdd_config,N_RB_DL,osf); - - - printf("Setting mcs = %d\n",mcs); - printf("NPRB = %d\n",NB_RB); - printf("n_frames = %d\n",n_frames); - printf("Transmission mode %d with %dx%d antenna configuration, Extended Prefix %d\n",transmission_mode,n_tx,n_rx,extended_prefix_flag); - - snr1 = snr0+snr_int; - printf("SNR0 %f, SNR1 %f\n",snr0,snr1); - - /* - txdataF = (int **)malloc16(2*sizeof(int*)); - txdataF[0] = (int *)malloc16(FRAME_LENGTH_BYTES); - txdataF[1] = (int *)malloc16(FRAME_LENGTH_BYTES); - - txdata = (int **)malloc16(2*sizeof(int*)); - txdata[0] = (int *)malloc16(FRAME_LENGTH_BYTES); - txdata[1] = (int *)malloc16(FRAME_LENGTH_BYTES); - */ - - frame_parms = &PHY_vars_eNB->lte_frame_parms; - - s_re = malloc(2*sizeof(double*)); - s_im = malloc(2*sizeof(double*)); - r_re = malloc(2*sizeof(double*)); - r_im = malloc(2*sizeof(double*)); - // r_re0 = malloc(2*sizeof(double*)); - // r_im0 = malloc(2*sizeof(double*)); - -#ifdef REL_AMPLIFY_FORWARD - rs_re = malloc(2*sizeof(double*)); - rs_im = malloc(2*sizeof(double*)); - dr_re = malloc(2*sizeof(double*)); - dr_im = malloc(2*sizeof(double*)); -#endif - - - nsymb = (PHY_vars_eNB->lte_frame_parms.Ncp == 0) ? 14 : 12; - - printf("Channel Model=%d\n",channel_model); - printf("SCM-A=%d, SCM-B=%d, SCM-C=%d, SCM-D=%d, EPA=%d, EVA=%d, ETU=%d, Rayleigh8=%d, Rayleigh1=%d, Rayleigh1_corr=%d, Rayleigh1_anticorr=%d, Rice1=%d, Rice8=%d\n", - SCM_A, SCM_B, SCM_C, SCM_D, EPA, EVA, ETU, Rayleigh8, Rayleigh1, Rayleigh1_corr, Rayleigh1_anticorr, Rice1, Rice8); - sprintf(bler_fname,"relay_second_bler_tx%d_mcs%d_chan%d_alpha%f.csv",transmission_mode,mcs,channel_model,alpha_SNR); - bler_fd = fopen(bler_fname,"w"); - fprintf(bler_fd,"SNR; MCS; TBS; rate; err0; trials0; err1; trials1; err2; trials2; err3; trials3; dci_err\n"); - - - if(abstx) { - // CSV file - sprintf(csv_fname,"dataout_tx%d_u2%d_mcs%d_chan%d_nsimus%d.m",transmission_mode,dual_stream_UE,mcs,channel_model,n_frames); - csv_fd = fopen(csv_fname,"w"); - fprintf(csv_fd,"data_all%d=[",mcs); - } - - //sprintf(tikz_fname, "second_bler_tx%d_u2=%d_mcs%d_chan%d_nsimus%d.tex",transmission_mode,dual_stream_UE,mcs,channel_model,n_frames); - //sprintf(tikz_fname, "second_bler_tx%d_u2%d_mcs%d_chan%d_nsimus%d",transmission_mode,dual_stream_UE,mcs,channel_model,n_frames); - -#ifdef SINGLE_RELAY - //sprintf(tikz_fname, "/home/emre/Projects/openair/results/results_relay_sim/channel_%d/SR_effectiveRate_tx%d_u2=%d_mcs%d_nsimus%d_alpha%f",channel_model,transmission_mode,dual_stream_UE,mcs,n_frames,alpha_SNR); -#else - //sprintf(tikz_fname, "/home/emre/Projects/openair/results/results_relay_sim/channel_%d/effectiveRate_tx%d_u2=%d_mcs%d_nsimus%d_alpha%f",channel_model,transmission_mode,dual_stream_UE,mcs,n_frames,alpha_SNR); -#endif - - tikz_fd = fopen(tikz_fname,"w"); - - //fprintf(tikz_fd,"\\addplot[color=red, mark=o] plot coordinates {"); - switch (mcs) { - case 0: - fprintf(tikz_fd,"\\addplot[color=blue, mark=star] plot coordinates {"); - break; - - case 1: - fprintf(tikz_fd,"\\addplot[color=red, mark=star] plot coordinates {"); - break; - - case 2: - fprintf(tikz_fd,"\\addplot[color=green, mark=star] plot coordinates {"); - break; - - case 3: - fprintf(tikz_fd,"\\addplot[color=yellow, mark=star] plot coordinates {"); - break; - - case 4: - fprintf(tikz_fd,"\\addplot[color=black, mark=star] plot coordinates {"); - break; - - case 5: - fprintf(tikz_fd,"\\addplot[color=blue, mark=o] plot coordinates {"); - break; - - case 6: - fprintf(tikz_fd,"\\addplot[color=red, mark=o] plot coordinates {"); - break; - - case 7: - fprintf(tikz_fd,"\\addplot[color=green, mark=o] plot coordinates {"); - break; - - case 8: - fprintf(tikz_fd,"\\addplot[color=yellow, mark=o] plot coordinates {"); - break; - - case 9: - fprintf(tikz_fd,"\\addplot[color=black, mark=o] plot coordinates {"); - break; - - case 10: - fprintf(tikz_fd,"\\addplot[color=blue, mark=square] plot coordinates {"); - break; - - case 11: - fprintf(tikz_fd,"\\addplot[color=red, mark=square] plot coordinates {"); - break; - - case 12: - fprintf(tikz_fd,"\\addplot[color=green, mark=square] plot coordinates {"); - break; - - case 13: - fprintf(tikz_fd,"\\addplot[color=yellow, mark=square] plot coordinates {"); - break; - - case 14: - fprintf(tikz_fd,"\\addplot[color=black, mark=square] plot coordinates {"); - break; - - case 15: - fprintf(tikz_fd,"\\addplot[color=blue, mark=diamond] plot coordinates {"); - break; - - case 16: - fprintf(tikz_fd,"\\addplot[color=red, mark=diamond] plot coordinates {"); - break; - - case 17: - fprintf(tikz_fd,"\\addplot[color=green, mark=diamond] plot coordinates {"); - break; - - case 18: - fprintf(tikz_fd,"\\addplot[color=yellow, mark=diamond] plot coordinates {"); - break; - - case 19: - fprintf(tikz_fd,"\\addplot[color=black, mark=diamond] plot coordinates {"); - break; - - case 20: - fprintf(tikz_fd,"\\addplot[color=blue, mark=x] plot coordinates {"); - break; - - case 21: - fprintf(tikz_fd,"\\addplot[color=red, mark=x] plot coordinates {"); - break; - - case 22: - fprintf(tikz_fd,"\\addplot[color=green, mark=x] plot coordinates {"); - break; - - case 23: - fprintf(tikz_fd,"\\addplot[color=yellow, mark=x] plot coordinates {"); - break; - - case 24: - fprintf(tikz_fd,"\\addplot[color=black, mark=x] plot coordinates {"); - break; - - case 25: - fprintf(tikz_fd,"\\addplot[color=blue, mark=x] plot coordinates {"); - break; - - case 26: - fprintf(tikz_fd,"\\addplot[color=red, mark=+] plot coordinates {"); - break; - - case 27: - fprintf(tikz_fd,"\\addplot[color=green, mark=+] plot coordinates {"); - break; - - case 28: - fprintf(tikz_fd,"\\addplot[color=yellow, mark=+] plot coordinates {"); - break; - } - - for (i=0; i<2; i++) { - s_re[i] = malloc(FRAME_LENGTH_COMPLEX_SAMPLES*sizeof(double)); - s_im[i] = malloc(FRAME_LENGTH_COMPLEX_SAMPLES*sizeof(double)); - r_re[i] = malloc(FRAME_LENGTH_COMPLEX_SAMPLES*sizeof(double)); - r_im[i] = malloc(FRAME_LENGTH_COMPLEX_SAMPLES*sizeof(double)); - // r_re0[i] = malloc(FRAME_LENGTH_COMPLEX_SAMPLES*sizeof(double)); - // bzero(r_re0[i],FRAME_LENGTH_COMPLEX_SAMPLES*sizeof(double)); - // r_im0[i] = malloc(FRAME_LENGTH_COMPLEX_SAMPLES*sizeof(double)); - // bzero(r_im0[i],FRAME_LENGTH_COMPLEX_SAMPLES*sizeof(double)); - -#ifdef REL_AMPLIFY_FORWARD - rs_re[i] = malloc(FRAME_LENGTH_COMPLEX_SAMPLES*sizeof(double)); - rs_im[i] = malloc(FRAME_LENGTH_COMPLEX_SAMPLES*sizeof(double)); - dr_re[i] = malloc(FRAME_LENGTH_COMPLEX_SAMPLES*sizeof(double)); - dr_im[i] = malloc(FRAME_LENGTH_COMPLEX_SAMPLES*sizeof(double)); - -#endif - } - - - PHY_vars_UE->lte_ue_pdcch_vars[0]->crnti = n_rnti; - - // Fill in UL_alloc - UL_alloc_pdu.type = 0; - UL_alloc_pdu.hopping = 0; - UL_alloc_pdu.rballoc = UL_RB_ALLOC; - UL_alloc_pdu.mcs = 1; - UL_alloc_pdu.ndi = 1; - UL_alloc_pdu.TPC = 0; - UL_alloc_pdu.cqi_req = 1; - - CCCH_alloc_pdu.type = 0; - CCCH_alloc_pdu.vrb_type = 0; - CCCH_alloc_pdu.rballoc = CCCH_RB_ALLOC; - CCCH_alloc_pdu.ndi = 1; - CCCH_alloc_pdu.mcs = 1; - CCCH_alloc_pdu.harq_pid = 0; - - DLSCH_alloc_pdu2_1E[0].rah = 0; - DLSCH_alloc_pdu2_1E[0].rballoc = DLSCH_RB_ALLOC; - DLSCH_alloc_pdu2_1E[0].TPC = 0; - DLSCH_alloc_pdu2_1E[0].dai = 0; - DLSCH_alloc_pdu2_1E[0].harq_pid = 0; - //DLSCH_alloc_pdu2_1E[0].tb_swap = 0; - DLSCH_alloc_pdu2_1E[0].mcs = mcs; - DLSCH_alloc_pdu2_1E[0].ndi = 1; - DLSCH_alloc_pdu2_1E[0].rv = 0; - // Forget second codeword - DLSCH_alloc_pdu2_1E[0].tpmi = (transmission_mode>=5 ? 5 : 0); // precoding - DLSCH_alloc_pdu2_1E[0].dl_power_off = (transmission_mode==5 ? 0 : 1); - - DLSCH_alloc_pdu2_1E[1].rah = 0; - DLSCH_alloc_pdu2_1E[1].rballoc = DLSCH_RB_ALLOC; - DLSCH_alloc_pdu2_1E[1].TPC = 0; - DLSCH_alloc_pdu2_1E[1].dai = 0; - DLSCH_alloc_pdu2_1E[1].harq_pid = 0; - //DLSCH_alloc_pdu2_1E[1].tb_swap = 0; - DLSCH_alloc_pdu2_1E[1].mcs = mcs; - DLSCH_alloc_pdu2_1E[1].ndi = 1; - DLSCH_alloc_pdu2_1E[1].rv = 0; - // Forget second codeword - DLSCH_alloc_pdu2_1E[1].tpmi = (transmission_mode>=5 ? 5 : 0) ; // precoding - DLSCH_alloc_pdu2_1E[1].dl_power_off = (transmission_mode==5 ? 0 : 1); - - -#ifdef REL_AMPLIFY_FORWARD - - for (rel = 0; rel < nb_relays; rel++) { - REL2UE[rel] = new_channel_desc_scm(PHY_vars_eNB->lte_frame_parms.nb_antennas_tx, - PHY_vars_UE->lte_frame_parms.nb_antennas_rx, - channel_model, - BW, - forgetting_factor, - rx_sample_offset, - 0); - - eNB2REL[rel]= new_channel_desc_scm(PHY_vars_eNB->lte_frame_parms.nb_antennas_tx, - PHY_vars_UE->lte_frame_parms.nb_antennas_rx, - channel_model, - BW, - forgetting_factor, - rx_sample_offset, - 0); - - if (eNB2REL[rel]==NULL || REL2UE[rel]==NULL) { - msg("[RELAY] Problem generating channel model. Exiting.\n"); - exit(-1); - } - - random_channel(REL2UE[rel]); - random_channel(eNB2REL[rel]); - - } - -#else - - eNB2REL = new_channel_desc_scm(PHY_vars_eNB->lte_frame_parms.nb_antennas_tx, - PHY_vars_UE->lte_frame_parms.nb_antennas_rx, - channel_model, - BW, - forgetting_factor, - rx_sample_offset, - 0); - - if (eNB2REL==NULL) { - msg("Problem generating channel model. Exiting.\n"); - exit(-1); - } - - random_channel(eNB2REL); - -#endif - - for (k=0; k<n_users; k++) { - // Create transport channel structures for 2 transport blocks (MIMO) - for (i=0; i<2; i++) { - PHY_vars_eNB->dlsch_eNB[k][i] = new_eNB_dlsch(1,8,0); - - if (!PHY_vars_eNB->dlsch_eNB[k][i]) { - printf("Can't get eNB dlsch structures\n"); - exit(-1); - } - - PHY_vars_eNB->dlsch_eNB[k][i]->rnti = n_rnti+k; - } - } - - for (i=0; i<2; i++) { - PHY_vars_UE->dlsch_ue[0][i] = new_ue_dlsch(1,8,0); - - if (!PHY_vars_UE->dlsch_ue[0][i]) { - printf("Can't get ue dlsch structures\n"); - exit(-1); - } - - PHY_vars_UE->dlsch_ue[0][i]->rnti = n_rnti; - } - - if (DLSCH_alloc_pdu2_1E[0].tpmi == 5) { - - PHY_vars_eNB->eNB_UE_stats[0].DL_pmi_single = (unsigned short)(taus()&0xffff); - - if (n_users>1) - PHY_vars_eNB->eNB_UE_stats[1].DL_pmi_single = (PHY_vars_eNB->eNB_UE_stats[0].DL_pmi_single ^ 0x1555); //opposite PMI - } else { - PHY_vars_eNB->eNB_UE_stats[0].DL_pmi_single = 0; - - if (n_users>1) - PHY_vars_eNB->eNB_UE_stats[1].DL_pmi_single = 0; - } - - - if (input_fd==NULL) { - - for(k=0; k<n_users; k++) { - printf("Generating dlsch params for user %d\n",k); - generate_eNB_dlsch_params_from_dci(0, - &DLSCH_alloc_pdu2_1E[k], - n_rnti+k, - format1E_2A_M10PRB, - PHY_vars_eNB->dlsch_eNB[k], - &PHY_vars_eNB->lte_frame_parms, - SI_RNTI, - 0, - P_RNTI, - PHY_vars_eNB->eNB_UE_stats[k].DL_pmi_single); - } - - num_dci = 0; - num_ue_spec_dci = 0; - num_common_dci = 0; - - /* - // common DCI - memcpy(&dci_alloc[num_dci].dci_pdu[0],&CCCH_alloc_pdu,sizeof(DCI1A_5MHz_TDD_1_6_t)); - dci_alloc[num_dci].dci_length = sizeof_DCI1A_5MHz_TDD_1_6_t; - dci_alloc[num_dci].L = 2; - dci_alloc[num_dci].rnti = SI_RNTI; - num_dci++; - num_common_dci++; - */ - - // UE specific DCI - for(k=0; k<n_users; k++) { - memcpy(&dci_alloc[num_dci].dci_pdu[0],&DLSCH_alloc_pdu2_1E[k],sizeof(DCI1E_5MHz_2A_M10PRB_TDD_t)); - dci_alloc[num_dci].dci_length = sizeof_DCI1E_5MHz_2A_M10PRB_TDD_t; - dci_alloc[num_dci].L = 2; - dci_alloc[num_dci].rnti = n_rnti+k; - dci_alloc[num_dci].format = format1E_2A_M10PRB; - - dump_dci(&PHY_vars_eNB->lte_frame_parms,&dci_alloc[num_dci]); - - num_dci++; - num_ue_spec_dci++; - - /* - memcpy(&dci_alloc[1].dci_pdu[0],&UL_alloc_pdu,sizeof(DCI0_5MHz_TDD0_t)); - dci_alloc[1].dci_length = sizeof_DCI0_5MHz_TDD_0_t; - dci_alloc[1].L = 2; - dci_alloc[1].rnti = n_rnti; - */ - } - - for (k=0; k<n_users; k++) { - - input_buffer_length = PHY_vars_eNB->dlsch_eNB[k][0]->harq_processes[0]->TBS/8; - input_buffer[k] = (unsigned char *)malloc(input_buffer_length+4); - memset(input_buffer[k],0,input_buffer_length+4); - - if (input_trch_file==0) { - for (i=0; i<input_buffer_length; i++) { - input_buffer[k][i]= (unsigned char)(taus()&0xff); - } - } - - else { - i=0; - - while ((!feof(input_trch_fd)) && (i<input_buffer_length<<3)) { - fscanf(input_trch_fd,"%s",input_trch_val); - - if (input_trch_val[0] == '1') - input_buffer[k][i>>3]+=(1<<(7-(i&7))); - - if (i<16) - printf("input_trch_val %d : %c\n",i,input_trch_val[0]); - - i++; - - if (((i%8) == 0) && (i<17)) - printf("%x\n",input_buffer[k][(i-1)>>3]); - } - - printf("Read in %d bits\n",i); - } - } - } - - snr_step = input_snr_step; - - for (ch_realization=0; ch_realization<n_ch_rlz; ch_realization++) { - if(abstx) { - printf("**********************Channel Realization Index = %d **************************\n", ch_realization); - saving_bler=1; - } - - - for (SNR_array[0]=snr0; SNR_array[0]<snr1; SNR_array[0]+=snr_step) { - errs[0]=0; - errs[1]=0; - errs[2]=0; - errs[3]=0; - round_trials[0] = 0; - round_trials[1] = 0; - round_trials[2] = 0; - round_trials[3] = 0; - - dci_errors=0; - avg_ber = 0; - - round=0; - - - for (trials = 0; trials<n_frames; trials++) { - // printf("Trial %d\n",trials); - fflush(stdout); - round=0; - - for (rel = 0; rel < nb_relays; rel++) { - random_channel(REL2UE[rel]); - random_channel(eNB2REL[rel]); - } - - //if (trials%100==0) - eNB2REL[active_relay_channel_id]->first_run = 1; - - while (round < num_rounds) { - round_trials[round]++; - - //CH0OSE THE ACTIVE LINK USING THE round VARIABLE. - //Odd rounds to SNR[0], Even rounds to SNR[1]. -#ifdef SINGLE_RELAY - - if(round%2==0 || round%2==1) { -#else - - if(round%2==0) { -#endif - SNR = SNR_array[0]; - active_relay_channel_id = 0; - } else { - SNR = alpha_SNR * SNR_array[0]; - active_relay_channel_id = 1; - } - - if(n_frames<10) { - printf("[Relay] Trial: %d, Active relay channel: %d \n",trials,active_relay_channel_id); - - } - - if(transmission_mode>=5) - pmi_feedback=1; - else - pmi_feedback=0; - - if (abstx) { - if (trials==0 && round==0 && SNR==snr0) //generate a new channel - hold_channel = 0; - else - hold_channel = 1; - } else - hold_channel = 0; - -PMI_FEEDBACK: - - // printf("Trial %d : Round %d, pmi_feedback %d \n",trials,round,pmi_feedback); - for (aa=0; aa<PHY_vars_eNB->lte_frame_parms.nb_antennas_tx; aa++) { -#ifdef IFFT_FPGA - memset(&PHY_vars_eNB->lte_eNB_common_vars.txdataF[eNB_id][aa][0],0,NUMBER_OF_USEFUL_CARRIERS*NUMBER_OF_SYMBOLS_PER_FRAME*sizeof(mod_sym_t)); -#else - memset(&PHY_vars_eNB->lte_eNB_common_vars.txdataF[eNB_id][aa][0],0,FRAME_LENGTH_COMPLEX_SAMPLES_NO_PREFIX*sizeof(mod_sym_t)); -#endif - } - - if (input_fd==NULL) { - - // Simulate HARQ procedures!!! - if (round == 0) { // First round, set Ndi to 1 and rv to floor(round/2) - PHY_vars_eNB->dlsch_eNB[0][0]->harq_processes[0]->Ndi = 1; -#ifdef RVI_PATTERN_ALT - PHY_vars_eNB->dlsch_eNB[0][0]->harq_processes[0]->rvidx = rv_pattern[round]; - DLSCH_alloc_pdu2_1E[0].rv = rv_pattern[round]; -#else - PHY_vars_eNB->dlsch_eNB[0][0]->harq_processes[0]->rvidx = round>>1; - DLSCH_alloc_pdu2_1E[0].rv = 0; -#endif - DLSCH_alloc_pdu2_1E[0].ndi = 1; - memcpy(&dci_alloc[0].dci_pdu[0],&DLSCH_alloc_pdu2_1E[0],sizeof(DCI1E_5MHz_2A_M10PRB_TDD_t)); - } else { // set Ndi to 0 - PHY_vars_eNB->dlsch_eNB[0][0]->harq_processes[0]->Ndi = 0; -#ifdef RVI_PATTERN_ALT - PHY_vars_eNB->dlsch_eNB[0][0]->harq_processes[0]->rvidx = rv_pattern[round]; - DLSCH_alloc_pdu2_1E[0].rv = rv_pattern[round]; -#else - PHY_vars_eNB->dlsch_eNB[0][0]->harq_processes[0]->rvidx = round>>1; - DLSCH_alloc_pdu2_1E[0].rv = round>>1; -#endif - DLSCH_alloc_pdu2_1E[0].ndi = 0; - - memcpy(&dci_alloc[0].dci_pdu[0],&DLSCH_alloc_pdu2_1E[0],sizeof(DCI1E_5MHz_2A_M10PRB_TDD_t)); - } - - num_pdcch_symbols_2 = generate_dci_top(num_ue_spec_dci, - num_common_dci, - dci_alloc, - 0, - 1024, - &PHY_vars_eNB->lte_frame_parms, - PHY_vars_eNB->lte_eNB_common_vars.txdataF[eNB_id], - subframe); - - if (num_pdcch_symbols_2 > num_pdcch_symbols) { - msg("Error: given num_pdcch_symbols not big enough\n"); - exit(-1); - } - - for (k=0; k<n_users; k++) { - coded_bits_per_codeword = get_G(&PHY_vars_eNB->lte_frame_parms, - PHY_vars_eNB->dlsch_eNB[k][0]->nb_rb, - PHY_vars_eNB->dlsch_eNB[k][0]->rb_alloc, - get_Qm(PHY_vars_eNB->dlsch_eNB[k][0]->harq_processes[0]->mcs), - num_pdcch_symbols, - subframe); - -#ifdef TBS_FIX // This is for MESH operation!!! - tbs = (double)3*dlsch_tbs25[get_I_TBS(PHY_vars_eNB->dlsch_eNB[k][0]->harq_processes[0]->mcs)][PHY_vars_eNB->dlsch_eNB[k][0]->nb_rb-1]/4; -#else - tbs = (double)dlsch_tbs25[get_I_TBS(PHY_vars_eNB->dlsch_eNB[k][0]->harq_processes[0]->mcs)][PHY_vars_eNB->dlsch_eNB[k][0]->nb_rb-1]; -#endif - - rate = (double)tbs/(double)coded_bits_per_codeword; // bits per dimension - rate *= get_Qm(PHY_vars_eNB->dlsch_eNB[k][0]->harq_processes[0]->mcs); //bits - uncoded_ber_bit = (short*) malloc(2*coded_bits_per_codeword); - - if (trials==0 && round==0) - printf("Rate = %f (G %d, TBS %d, mod %d, pdcch_sym %d)\n", - rate, - coded_bits_per_codeword, - tbs, - get_Qm(PHY_vars_eNB->dlsch_eNB[k][0]->harq_processes[0]->mcs), - num_pdcch_symbols); - - /* - // generate channel here - random_channel(eNB2UE); - // generate frequency response - freq_channel(eNB2UE,NB_RB); - // generate PMI from channel - */ - - - // use the PMI from previous trial - if (DLSCH_alloc_pdu2_1E[0].tpmi == 5) { - PHY_vars_eNB->dlsch_eNB[0][0]->pmi_alloc = quantize_subband_pmi(&PHY_vars_UE->PHY_measurements,0); - PHY_vars_UE->dlsch_ue[0][0]->pmi_alloc = quantize_subband_pmi(&PHY_vars_UE->PHY_measurements,0); - - if (n_users>1) - PHY_vars_eNB->dlsch_eNB[1][0]->pmi_alloc = (PHY_vars_eNB->dlsch_eNB[0][0]->pmi_alloc ^ 0x1555); - - /* - if ((trials<10) && (round==0)) { - printf("tx PMI UE0 %x (pmi_feedback %d)\n",pmi2hex_2Ar1(PHY_vars_eNB->dlsch_eNB[0][0]->pmi_alloc),pmi_feedback); - if (transmission_mode ==5) - printf("tx PMI UE1 %x\n",pmi2hex_2Ar1(PHY_vars_eNB->dlsch_eNB[1][0]->pmi_alloc)); - } - */ - } - - if (dlsch_encoding(input_buffer[k], - &PHY_vars_eNB->lte_frame_parms, - num_pdcch_symbols, - PHY_vars_eNB->dlsch_eNB[k][0], - subframe)<0) - exit(-1); - - // printf("Did not Crash here 1\n"); - PHY_vars_eNB->dlsch_eNB[k][0]->rnti = n_rnti+k; - dlsch_scrambling(&PHY_vars_eNB->lte_frame_parms, - num_pdcch_symbols, - PHY_vars_eNB->dlsch_eNB[k][0], - coded_bits_per_codeword, - 0, - subframe<<1); - - if (n_frames==1) { - for (s=0; s<PHY_vars_eNB->dlsch_eNB[k][0]->harq_processes[0]->C; s++) { - if (s<PHY_vars_eNB->dlsch_eNB[k][0]->harq_processes[0]->Cminus) - Kr = PHY_vars_eNB->dlsch_eNB[k][0]->harq_processes[0]->Kminus; - else - Kr = PHY_vars_eNB->dlsch_eNB[k][0]->harq_processes[0]->Kplus; - - Kr_bytes = Kr>>3; - - for (i=0; i<Kr_bytes; i++) - printf("%d : (%x)\n",i,PHY_vars_eNB->dlsch_eNB[k][0]->harq_processes[0]->c[s][i]); - } - } - - // printf("Did not Crash here 2\n"); - - if (transmission_mode == 5) { - amp = (int16_t)(((int32_t)1024*ONE_OVER_SQRT2_Q15)>>15); - } else - amp = 1024; - - // if (k==1) - // amp=0; - re_allocated = dlsch_modulation(PHY_vars_eNB->lte_eNB_common_vars.txdataF[eNB_id], - amp, - subframe, - &PHY_vars_eNB->lte_frame_parms, - num_pdcch_symbols, - PHY_vars_eNB->dlsch_eNB[k][0]); - - // printf("Did not Crash here 3\n"); - if (trials==0 && round==0) - printf("RE count %d\n",re_allocated); - - if (num_layers>1) - re_allocated = dlsch_modulation(PHY_vars_eNB->lte_eNB_common_vars.txdataF[eNB_id], - 1024, - subframe, - &PHY_vars_eNB->lte_frame_parms, - num_pdcch_symbols, - PHY_vars_eNB->dlsch_eNB[k][1]); - } //n_users - - // printf("Did not Crash here 4\n"); - - generate_pilots(PHY_vars_eNB, - PHY_vars_eNB->lte_eNB_common_vars.txdataF[eNB_id], - 1024, - LTE_NUMBER_OF_SUBFRAMES_PER_FRAME); - - - do_OFDM_mod(PHY_vars_eNB->lte_eNB_common_vars.txdataF[eNB_id], - PHY_vars_eNB->lte_eNB_common_vars.txdata[eNB_id], - (subframe*2), - &PHY_vars_eNB->lte_frame_parms); - do_OFDM_mod(PHY_vars_eNB->lte_eNB_common_vars.txdataF[eNB_id], - PHY_vars_eNB->lte_eNB_common_vars.txdata[eNB_id], - (subframe*2)+1, - &PHY_vars_eNB->lte_frame_parms); - do_OFDM_mod(PHY_vars_eNB->lte_eNB_common_vars.txdataF[eNB_id], - PHY_vars_eNB->lte_eNB_common_vars.txdata[eNB_id], - (subframe*2)+2, - &PHY_vars_eNB->lte_frame_parms); - -#ifdef IFFT_FPGA - - if (n_frames==1) { - write_output("txsigF0.m","txsF0", &PHY_vars_eNB->lte_eNB_common_vars.txdataF[0][0][subframe*nsymb*300],300*nsymb,1,4); - - if (PHY_vars_eNB->lte_frame_parms.nb_antennas_tx>1) - write_output("txsigF1.m","txsF1", &PHY_vars_eNB->lte_eNB_common_vars.txdataF[0][1][subframe*nsymb*300],300*nsymb,1,4); - - write_output("txsigF20.m","txsF20", txdataF2[0], FRAME_LENGTH_COMPLEX_SAMPLES_NO_PREFIX,1,1); - - if (PHY_vars_eNB->lte_frame_parms.nb_antennas_tx>1) - write_output("txsigF21.m","txsF21", txdataF2[1], FRAME_LENGTH_COMPLEX_SAMPLES_NO_PREFIX,1,1); - } - -#else //IFFT_FPGA - - if (n_frames==1) { - write_output("txsigF0.m","txsF0", &PHY_vars_eNB->lte_eNB_common_vars.txdataF[eNB_id][0][subframe*nsymb*PHY_vars_eNB->lte_frame_parms.ofdm_symbol_size], - nsymb*PHY_vars_eNB->lte_frame_parms.ofdm_symbol_size,1,1); - - if (PHY_vars_eNB->lte_frame_parms.nb_antennas_tx>1) - write_output("txsigF1.m","txsF1", &PHY_vars_eNB->lte_eNB_common_vars.txdataF[eNB_id][1][subframe*nsymb*PHY_vars_eNB->lte_frame_parms.ofdm_symbol_size], - nsymb*PHY_vars_eNB->lte_frame_parms.ofdm_symbol_size,1,1); - } - -#endif - - tx_lev = 0; - - for (aa=0; aa<PHY_vars_eNB->lte_frame_parms.nb_antennas_tx; aa++) { - tx_lev += signal_energy(&PHY_vars_eNB->lte_eNB_common_vars.txdata[eNB_id][aa] - [subframe*PHY_vars_eNB->lte_frame_parms.samples_per_tti], - PHY_vars_eNB->lte_frame_parms.samples_per_tti); - } - - tx_lev_dB = (unsigned int) dB_fixed(tx_lev); - - if (n_frames==1) { - printf("tx_lev = %d (%d dB)\n",tx_lev,tx_lev_dB); - write_output("txsig0.m","txs0", &PHY_vars_eNB->lte_eNB_common_vars.txdata[eNB_id][0][subframe* PHY_vars_eNB->lte_frame_parms.samples_per_tti], - - PHY_vars_eNB->lte_frame_parms.samples_per_tti,1,1); - } - } - - /* - else { // Read signal from file - i=0; - while (!feof(input_fd)) { - fscanf(input_fd,"%s %s",input_val_str,input_val_str2); - - if ((i%4)==0) { - ((short*)txdata[0])[i/2] = (short)((1<<15)*strtod(input_val_str,NULL)); - ((short*)txdata[0])[(i/2)+1] = (short)((1<<15)*strtod(input_val_str2,NULL)); - if ((i/4)<100) - printf("sample %d => %e + j%e (%d +j%d)\n",i/4,strtod(input_val_str,NULL),strtod(input_val_str2,NULL),((short*)txdata[0])[i/4],((short*)txdata[0])[(i/4)+1]);//1,input_val2,); - } - i++; - if (i>(FRAME_LENGTH_SAMPLES)) - break; - } - printf("Read in %d samples\n",i/4); - write_output("txsig0.m","txs0", txdata[0],2*frame_parms->samples_per_tti,1,1); - // write_output("txsig1.m","txs1", txdata[1],FRAME_LENGTH_COMPLEX_SAMPLES,1,1); - tx_lev = signal_energy(&txdata[0][0], - OFDM_SYMBOL_SIZE_COMPLEX_SAMPLES); - tx_lev_dB = (unsigned int) dB_fixed(tx_lev); - } - */ - - // printf("Copying tx ..., nsymb %d (n_tx %d), awgn %d\n",nsymb,PHY_vars_eNB->lte_frame_parms.nb_antennas_tx,awgn_flag); - for (i=0; i<2*nsymb*OFDM_SYMBOL_SIZE_COMPLEX_SAMPLES; i++) { - for (aa=0; aa<PHY_vars_eNB->lte_frame_parms.nb_antennas_tx; aa++) { - if (awgn_flag == 0) { - s_re[aa][i] = ((double)(((short *)PHY_vars_eNB->lte_eNB_common_vars.txdata[eNB_id][aa]))[(2*subframe*PHY_vars_UE->lte_frame_parms.samples_per_tti) + (i<<1)]); - s_im[aa][i] = ((double)(((short *)PHY_vars_eNB->lte_eNB_common_vars.txdata[eNB_id][aa]))[(2*subframe*PHY_vars_UE->lte_frame_parms.samples_per_tti) +(i<<1)+1]); - } else { - for (aarx=0; aarx<PHY_vars_UE->lte_frame_parms.nb_antennas_rx; aarx++) { - if (aa==0) { - r_re[aarx][i] = ((double)(((short *)PHY_vars_eNB->lte_eNB_common_vars.txdata[eNB_id][aa]))[(2*subframe*PHY_vars_UE->lte_frame_parms.samples_per_tti) +(i<<1)]); - r_im[aarx][i] = ((double)(((short *)PHY_vars_eNB->lte_eNB_common_vars.txdata[eNB_id][aa]))[(2*subframe*PHY_vars_UE->lte_frame_parms.samples_per_tti) +(i<<1)+1]); - } else { - r_re[aarx][i] += ((double)(((short *)PHY_vars_eNB->lte_eNB_common_vars.txdata[eNB_id][aa]))[(2*subframe*PHY_vars_UE->lte_frame_parms.samples_per_tti) +(i<<1)]); - r_im[aarx][i] += ((double)(((short *)PHY_vars_eNB->lte_eNB_common_vars.txdata[eNB_id][aa]))[(2*subframe*PHY_vars_UE->lte_frame_parms.samples_per_tti) +(i<<1)+1]); - } - - } - } - } - } - - //Multipath channel - if (awgn_flag == 0) { - multipath_channel(eNB2REL[active_relay_channel_id],s_re,s_im,r_re,r_im, - 2*nsymb*OFDM_SYMBOL_SIZE_COMPLEX_SAMPLES,hold_channel); - } - - if(abstx) { - if(saving_bler==0) - if (trials==0 && round==0) { - // calculate freq domain representation to compute SINR - freq_channel(eNB2REL[active_relay_channel_id], 25,51); - // snr=pow(10.0,.1*SNR); - fprintf(csv_fd,"%f,",SNR); - - for (u=0; u<50; u++) { - for (aarx=0; aarx<eNB2REL[active_relay_channel_id]->nb_rx; aarx++) { - for (aatx=0; aatx<eNB2REL[active_relay_channel_id]->nb_tx; aatx++) { - // abs_channel = (eNB2REL[active_relay_channel_id]->chF[aarx+(aatx*eNB2REL[active_relay_channel_id]->nb_rx)][u].x*eNB2REL[active_relay_channel_id]->chF[aarx+(aatx*eNB2REL[active_relay_channel_id]->nb_rx)][u].x + eNB2REL[active_relay_channel_id]->chF[aarx+(aatx*eNB2REL[active_relay_channel_id]->nb_rx)][u].y*eNB2REL[active_relay_channel_id]->chF[aarx+(aatx*eNB2REL[active_relay_channel_id]->nb_rx)][u].y); - channelx = eNB2REL[active_relay_channel_id]->chF[aarx+(aatx*eNB2REL[active_relay_channel_id]->nb_rx)][u].x; - channely = eNB2REL[active_relay_channel_id]->chF[aarx+(aatx*eNB2REL[active_relay_channel_id]->nb_rx)][u].y; - // if(transmission_mode==5){ - fprintf(csv_fd,"%e+i*(%e),",channelx,channely); - // } - // else{ - // pilot_sinr = 10*log10(snr*abs_channel); - // fprintf(csv_fd,"%e,",pilot_sinr); - // } - } - } - } - } - } - - - - //AWGN - sigma2_dB = 10*log10((double)tx_lev) +10*log10(PHY_vars_eNB->lte_frame_parms.ofdm_symbol_size/(NB_RB*12)) - SNR; - sigma2 = pow(10,sigma2_dB/10); - - if (n_frames==1) - printf("Sigma2 %f (sigma2_dB %f)\n",sigma2,sigma2_dB); - - for (i=0; i<2*nsymb*OFDM_SYMBOL_SIZE_COMPLEX_SAMPLES; i++) { - for (aa=0; aa<PHY_vars_eNB->lte_frame_parms.nb_antennas_rx; aa++) { - -#ifdef REL_AMPLIFY_FORWARD - //KEEP THE NOISE ADDED SIGNAL STRUCTURES FOR SECOND CHANNEL INPUT - rs_re[aa][i] = (r_re[aa][i] + sqrt(sigma2/2)*gaussdouble(0.0,1.0)); - rs_im[aa][i] = (r_im[aa][i] + sqrt(sigma2/2)*gaussdouble(0.0,1.0)); -#else - - //printf("s_re[0][%d]=> %f , r_re[0][%d]=> %f\n",i,s_re[aa][i],i,r_re[aa][i]); - ((short*) PHY_vars_UE->lte_ue_common_vars.rxdata[aa])[(2*subframe*PHY_vars_UE->lte_frame_parms.samples_per_tti)+2*i] = - (short) (r_re[aa][i] + sqrt(sigma2/2)*gaussdouble(0.0,1.0)); - ((short*) PHY_vars_UE->lte_ue_common_vars.rxdata[aa])[(2*subframe*PHY_vars_UE->lte_frame_parms.samples_per_tti)+2*i+1] = - (short) (r_im[aa][i] + (iqim*r_re[aa][i]) + sqrt(sigma2/2)*gaussdouble(0.0,1.0)); -#endif - } - } - - - //ADD SECOND CHANNEL EFFECTS FROM RELAY TO DESTINATION - -#ifdef REL_AMPLIFY_FORWARD - - //Second link noise variables - if(active_relay_channel_id == 0) { - SNR_r1 = alpha_SNR*SNR; - - } else if(active_relay_channel_id == 1) { - SNR_r1 = SNR; - } else { - printf("Error in active relay selection..Should be 1 or 0.\n"); - } - - tx_lev_r1 = signal_energy_fp(rs_re,rs_im,PHY_vars_eNB->lte_frame_parms.nb_antennas_rx,PHY_vars_eNB->lte_frame_parms.samples_per_tti,0); - tx_lev_r1_dB = (unsigned int) dB_fixed(tx_lev_r1); - sigma2_r1_dB = 10*log10((double)tx_lev_r1) +10*log10(PHY_vars_eNB->lte_frame_parms.ofdm_symbol_size/(NB_RB*12)) - SNR_r1; - - //AWGN - sigma2_r1 = pow(10,sigma2_r1_dB/10); - - //printf("[RELAY CHANNEL] sigma2_r1: [%f] dB\n",sigma2_r1_dB); - - if (awgn_flag == 0) { - //printf("[RELAY CHANNEL] Second channel multipath is added here - 2!\n"); - multipath_channel(REL2UE[active_relay_channel_id],rs_re,rs_im,dr_re,dr_im,2*nsymb*OFDM_SYMBOL_SIZE_COMPLEX_SAMPLES,hold_channel); - } - - //printf("[RELAY CHANNEL] Second channel noise is added here!\n"); - for (i=0; i<2*nsymb*OFDM_SYMBOL_SIZE_COMPLEX_SAMPLES; i++) { - for (aa=0; aa<PHY_vars_eNB->lte_frame_parms.nb_antennas_rx; aa++) { - - // printf("s_re[0][%d]=> %f , r_re[0][%d]=> %f\n",i,s_re[aa][i],i,r_re[aa][i]); - - ((short*) PHY_vars_UE->lte_ue_common_vars.rxdata[aa])[(2*subframe*PHY_vars_UE->lte_frame_parms.samples_per_tti)+2*i] = (short) (dr_re[aa][i] + sqrt(sigma2_r1/2)*gaussdouble(0.0,1.0)); - ((short*) PHY_vars_UE->lte_ue_common_vars.rxdata[aa])[(2*subframe*PHY_vars_UE->lte_frame_parms.samples_per_tti)+2*i+1] = (short) (dr_im[aa][i] + (iqim*dr_re[aa][i]) + sqrt(sigma2_r1/2)*gaussdouble( - 0.0,1.0)); - - } - } - - - -#endif - - - // lte_sync_time_init(PHY_vars_eNB->lte_frame_parms,lte_ue_common_vars); - // lte_sync_time(lte_ue_common_vars->rxdata, PHY_vars_eNB->lte_frame_parms); - // lte_sync_time_free(); - - /* - // optional: read rx_frame from file - if ((rx_frame_file = fopen("rx_frame.dat","r")) == NULL) - { - printf("Cannot open rx_frame.m data file\n"); - exit(0); - } - - result = fread((void *)PHY_vars->rx_vars[0].RX_DMA_BUFFER,4,FRAME_LENGTH_COMPLEX_SAMPLES,rx_frame_file); - printf("Read %d bytes\n",result); - result = fread((void *)PHY_vars->rx_vars[1].RX_DMA_BUFFER,4,FRAME_LENGTH_COMPLEX_SAMPLES,rx_frame_file); - printf("Read %d bytes\n",result); - - fclose(rx_frame_file); - */ - - if (n_frames==1) { - printf("RX level in null symbol %d\n",dB_fixed(signal_energy(&PHY_vars_UE->lte_ue_common_vars.rxdata[0][160+OFDM_SYMBOL_SIZE_COMPLEX_SAMPLES],OFDM_SYMBOL_SIZE_COMPLEX_SAMPLES/2))); - printf("RX level in data symbol %d\n",dB_fixed(signal_energy(&PHY_vars_UE->lte_ue_common_vars.rxdata[0][160+(2*OFDM_SYMBOL_SIZE_COMPLEX_SAMPLES)],OFDM_SYMBOL_SIZE_COMPLEX_SAMPLES/2))); - printf("rx_level Null symbol %f\n",10*log10(signal_energy_fp(r_re,r_im,1,OFDM_SYMBOL_SIZE_COMPLEX_SAMPLES/2,256+(OFDM_SYMBOL_SIZE_COMPLEX_SAMPLES)))); - printf("rx_level data symbol %f\n",10*log10(signal_energy_fp(r_re,r_im,1,OFDM_SYMBOL_SIZE_COMPLEX_SAMPLES/2,256+(2*OFDM_SYMBOL_SIZE_COMPLEX_SAMPLES)))); - } - - if (PHY_vars_eNB->lte_frame_parms.Ncp == 0) { // normal prefix - pilot1 = 4; - pilot2 = 7; - pilot3 = 11; - } else { // extended prefix - pilot1 = 3; - pilot2 = 6; - pilot3 = 9; - } - - i_mod = get_Qm(mcs); - - // Inner receiver scheduling for 3 slots - for (Ns=(2*subframe); Ns<((2*subframe)+3); Ns++) { - for (l=0; l<pilot2; l++) { - if (n_frames==1) - printf("Ns %d, l %d\n",Ns,l); - - /* - This function implements the OFDM front end processor (FEP). - - Parameters: - frame_parms LTE DL Frame Parameters - ue_common_vars LTE UE Common Vars - l symbol within slot (0..6/7) - Ns Slot number (0..19) - sample_offset offset within rxdata (points to beginning of subframe) - no_prefix if 1 prefix is removed by HW - - */ - slot_fep(PHY_vars_UE, - l, - Ns%20, - 0, - 0); - -#ifdef PERFECT_CE - - if (awgn_flag==0) { - // fill in perfect channel estimates - freq_channel(eNB2REL[active_relay_channel_id],PHY_vars_UE->lte_frame_parms.N_RB_DL,301); - - //write_output("channel.m","ch",desc1->ch[0],desc1->channel_length,1,8); - //write_output("channelF.m","chF",desc1->chF[0],nb_samples,1,8); - for(k=0; k<NUMBER_OF_eNB_MAX; k++) { - for(aa=0; aa<frame_parms->nb_antennas_tx; aa++) { - for (aarx=0; aarx<frame_parms->nb_antennas_rx; aarx++) { - for (i=0; i<frame_parms->N_RB_DL*12; i++) { - ((int16_t *) PHY_vars_UE->lte_ue_common_vars.dl_ch_estimates[k][(aa<<1)+aarx])[2*i+(l*frame_parms->ofdm_symbol_size+LTE_CE_FILTER_LENGTH)*2]=(int16_t)( - eNB2UE->chF[aarx+(aa*frame_parms->nb_antennas_rx)][i].x*AMP/2); - ((int16_t *) PHY_vars_UE->lte_ue_common_vars.dl_ch_estimates[k][(aa<<1)+aarx])[2*i+1+(l*frame_parms->ofdm_symbol_size+LTE_CE_FILTER_LENGTH)*2]=(int16_t)( - eNB2UE->chF[aarx+(aa*frame_parms->nb_antennas_rx)][i].y*AMP/2) ; - } - } - } - } - } else { - for(aa=0; aa<frame_parms->nb_antennas_tx; aa++) { - for (aarx=0; aarx<frame_parms->nb_antennas_rx; aarx++) { - for (i=0; i<frame_parms->N_RB_DL*12; i++) { - ((int16_t *) PHY_vars_UE->lte_ue_common_vars.dl_ch_estimates[0][(aa<<1)+aarx])[2*i+(l*frame_parms->ofdm_symbol_size+LTE_CE_FILTER_LENGTH)*2]=AMP/2; - ((int16_t *) PHY_vars_UE->lte_ue_common_vars.dl_ch_estimates[0][(aa<<1)+aarx])[2*i+1+(l*frame_parms->ofdm_symbol_size+LTE_CE_FILTER_LENGTH)*2]=0/2; - } - } - } - } - -#endif - - - if ((Ns==(2+(2*subframe))) && (l==0)) { - lte_ue_measurements(PHY_vars_UE, - subframe*PHY_vars_UE->lte_frame_parms.samples_per_tti, - 1, - 0); - /* - debug_msg("RX RSSI %d dBm, digital (%d, %d) dB, linear (%d, %d), avg rx power %d dB (%d lin), RX gain %d dB\n", - PHY_vars_UE->PHY_measurements.rx_rssi_dBm[0] - ((PHY_vars_UE->lte_frame_parms.nb_antennas_rx==2) ? 3 : 0), - PHY_vars_UE->PHY_measurements.wideband_cqi_dB[0][0], - PHY_vars_UE->PHY_measurements.wideband_cqi_dB[0][1], - PHY_vars_UE->PHY_measurements.wideband_cqi[0][0], - PHY_vars_UE->PHY_measurements.wideband_cqi[0][1], - PHY_vars_UE->PHY_measurements.rx_power_avg_dB[0], - PHY_vars_UE->PHY_measurements.rx_power_avg[0], - PHY_vars_UE->rx_total_gain_dB); - debug_msg("N0 %d dBm digital (%d, %d) dB, linear (%d, %d), avg noise power %d dB (%d lin)\n", - PHY_vars_UE->PHY_measurements.n0_power_tot_dBm, - PHY_vars_UE->PHY_measurements.n0_power_dB[0], - PHY_vars_UE->PHY_measurements.n0_power_dB[1], - PHY_vars_UE->PHY_measurements.n0_power[0], - PHY_vars_UE->PHY_measurements.n0_power[1], - PHY_vars_UE->PHY_measurements.n0_power_avg_dB, - PHY_vars_UE->PHY_measurements.n0_power_avg); - debug_msg("Wideband CQI tot %d dB, wideband cqi avg %d dB\n", - PHY_vars_UE->PHY_measurements.wideband_cqi_tot[0], - PHY_vars_UE->PHY_measurements.wideband_cqi_avg[0]); - */ - - if (transmission_mode==5 || transmission_mode==6) { - if (pmi_feedback == 1) { - pmi_feedback = 0; - hold_channel = 1; - goto PMI_FEEDBACK; - } - } - - } - - - if ((Ns==(2*subframe)) && (l==pilot1)) {// process symbols 0,1,2 - - if (dci_flag == 1) { - rx_pdcch(&PHY_vars_UE->lte_ue_common_vars, - PHY_vars_UE->lte_ue_pdcch_vars, - &PHY_vars_UE->lte_frame_parms, - subframe, - 0, - (PHY_vars_UE->lte_frame_parms.mode1_flag == 1) ? SISO : ALAMOUTI, - 0); - - // overwrite number of pdcch symbols - PHY_vars_UE->lte_ue_pdcch_vars[0]->num_pdcch_symbols = num_pdcch_symbols; - - dci_cnt = dci_decoding_procedure(PHY_vars_UE, - dci_alloc_rx, - eNB_id, - subframe); - //printf("dci_cnt %d\n",dci_cnt); - - if (dci_cnt==0) { - dlsch_active = 0; - - if (round==0) { - dci_errors++; - round=5; - errs[0]++; - round_trials[0]++; - // printf("DCI error trial %d errs[0] %d\n",trials,errs[0]); - } - - // for (i=1;i<=round;i++) - // round_trials[i]--; - // round=5; - } - - for (i=0; i<dci_cnt; i++) { - //printf("Generating dlsch parameters for RNTI %x\n",dci_alloc_rx[i].rnti); - if ((dci_alloc_rx[i].rnti == n_rnti) && - (generate_ue_dlsch_params_from_dci(0, - dci_alloc_rx[i].dci_pdu, - dci_alloc_rx[i].rnti, - dci_alloc_rx[i].format, - PHY_vars_UE->dlsch_ue[0], - &PHY_vars_UE->lte_frame_parms, - SI_RNTI, - 0, - P_RNTI)==0)) { - //dump_dci(&PHY_vars_UE->lte_frame_parms,&dci_alloc_rx[i]); - coded_bits_per_codeword = get_G(&PHY_vars_eNB->lte_frame_parms, - PHY_vars_UE->dlsch_ue[0][0]->nb_rb, - PHY_vars_UE->dlsch_ue[0][0]->rb_alloc, - get_Qm(PHY_vars_UE->dlsch_ue[0][0]->harq_processes[PHY_vars_UE->dlsch_ue[0][0]->current_harq_pid]->mcs), - PHY_vars_UE->lte_ue_pdcch_vars[0]->num_pdcch_symbols, - subframe); - /* - rate = (double)dlsch_tbs25[get_I_TBS(PHY_vars_UE->dlsch_ue[0][0]->harq_processes[PHY_vars_UE->dlsch_ue[0][0]->current_harq_pid]->mcs)][PHY_vars_UE->dlsch_ue[0][0]->nb_rb-1]/(coded_bits_per_codeword); - rate*=get_Qm(PHY_vars_UE->dlsch_ue[0][0]->harq_processes[PHY_vars_UE->dlsch_ue[0][0]->current_harq_pid]->mcs); - - printf("num_pdcch_symbols %d, G %d, TBS %d\n",PHY_vars_UE->lte_ue_pdcch_vars[0]->num_pdcch_symbols,coded_bits_per_codeword,PHY_vars_UE->dlsch_ue[0][0]->harq_processes[PHY_vars_UE->dlsch_ue[0][0]->current_harq_pid]->TBS); - */ - dlsch_active = 1; - } else { - dlsch_active = 0; - - if (round==0) { - dci_errors++; - errs[0]++; - round_trials[0]++; - - if (n_frames==1) { - printf("DCI misdetection trial %d\n",trials); - round=5; - } - } - - // for (i=1;i<=round;i++) - // round_trials[i]--; - // round=5; - } - } - } // if dci_flag==1 - else { //dci_flag == 0 - - PHY_vars_UE->lte_ue_pdcch_vars[0]->crnti = n_rnti; - PHY_vars_UE->lte_ue_pdcch_vars[0]->num_pdcch_symbols = num_pdcch_symbols; - - generate_ue_dlsch_params_from_dci(0, - &DLSCH_alloc_pdu2_1E[0], - C_RNTI, - format1E_2A_M10PRB, - PHY_vars_UE->dlsch_ue[0], - &PHY_vars_UE->lte_frame_parms, - SI_RNTI, - 0, - P_RNTI); - dlsch_active = 1; - } // if dci_flag == 1 - } - - if (dlsch_active == 1) { - if ((Ns==(1+(2*subframe))) && (l==0)) {// process PDSCH symbols 1,2,3,4,5,(6 Normal Prefix) - - for (m=PHY_vars_UE->lte_ue_pdcch_vars[0]->num_pdcch_symbols; - m<pilot2; - m++) { -#if defined ENABLE_FXP || ENABLE_FLP - - // printf("fxp or flp release used\n"); - if (rx_pdsch(PHY_vars_UE, - PDSCH, - eNB_id, - eNB_id_i, - subframe, - m, - (m==PHY_vars_UE->lte_ue_pdcch_vars[0]->num_pdcch_symbols)?1:0, - dual_stream_UE, - i_mod)==-1) { - dlsch_active = 0; - break; - } - -#endif -#ifdef ENABLE_FULL_FLP - - // printf("Full flp release used\n"); - if (rx_pdsch_full_flp(PHY_vars_UE, - PDSCH, - eNB_id, - eNB_id_i, - subframe, - m, - (m==PHY_vars_UE->lte_ue_pdcch_vars[0]->num_pdcch_symbols)?1:0, - dual_stream_UE, - i_mod)==-1) { - dlsch_active = 0; - break; - } - -#endif - } - } - - if ((Ns==(1+(2*subframe))) && (l==pilot1)) { - // process symbols (6 Extended Prefix),7,8,9 - for (m=pilot2; - m<pilot3; - m++) { -#if defined ENABLE_FXP || ENABLE_FLP - - // printf("fxp or flp release used\n"); - if (rx_pdsch(PHY_vars_UE, - PDSCH, - eNB_id, - eNB_id_i, - subframe, - m, - 0, - dual_stream_UE, - i_mod)==-1) { - dlsch_active=0; - break; - } - -#endif -#ifdef ENABLE_FULL_FLP - - // printf("Full flp release used\n"); - if (rx_pdsch_full_flp(PHY_vars_UE, - PDSCH, - eNB_id, - eNB_id_i, - subframe, - m, - 0, - dual_stream_UE, - i_mod)==-1) { - dlsch_active=0; - break; - } - -#endif - } - } - - if ((Ns==(2+(2*subframe))) && (l==0)) { // process symbols 10,11,(12,13 Normal Prefix) do deinterleaving for TTI - for (m=pilot3; - m<PHY_vars_UE->lte_frame_parms.symbols_per_tti; - m++) { -#if defined ENABLE_FXP || ENABLE_FLP - - // printf("fxp or flp release used\n"); - if (rx_pdsch(PHY_vars_UE, - PDSCH, - eNB_id, - eNB_id_i, - subframe, - m, - 0, - dual_stream_UE, - i_mod)==-1) { - dlsch_active=0; - break; - } - -#endif -#ifdef ENABLE_FULL_FLP - - // printf("Full flp release used\n"); - if (rx_pdsch_full_flp(PHY_vars_UE, - PDSCH, - eNB_id, - eNB_id_i, - subframe, - m, - 0, - dual_stream_UE, - i_mod)==-1) { - dlsch_active=0; - break; - } - -#endif - } - } - - if ((n_frames==1) && (Ns==(2+(2*subframe))) && (l==0)) { - write_output("ch0.m","ch0",eNB2REL[active_relay_channel_id]->ch[0],eNB2REL[active_relay_channel_id]->channel_length,1,8); - - if (PHY_vars_eNB->lte_frame_parms.nb_antennas_tx>1) - write_output("ch1.m","ch1",eNB2REL[active_relay_channel_id]->ch[PHY_vars_eNB->lte_frame_parms.nb_antennas_rx],eNB2REL[active_relay_channel_id]->channel_length,1,8); - - //common vars - write_output("rxsig0.m","rxs0", &PHY_vars_UE->lte_ue_common_vars.rxdata[0][0],10*PHY_vars_UE->lte_frame_parms.samples_per_tti,1,1); - write_output("rxsigF0.m","rxsF0", &PHY_vars_UE->lte_ue_common_vars.rxdataF[0][0],2*PHY_vars_UE->lte_frame_parms.ofdm_symbol_size*nsymb,2,1); - - if (PHY_vars_UE->lte_frame_parms.nb_antennas_rx>1) { - write_output("rxsig1.m","rxs1", PHY_vars_UE->lte_ue_common_vars.rxdata[1],PHY_vars_UE->lte_frame_parms.samples_per_tti,1,1); - write_output("rxsigF1.m","rxsF1", PHY_vars_UE->lte_ue_common_vars.rxdataF[1],2*PHY_vars_UE->lte_frame_parms.ofdm_symbol_size*nsymb,2,1); - } - - write_output("dlsch00_ch0.m","dl00_ch0", - &(PHY_vars_UE->lte_ue_common_vars.dl_ch_estimates[eNB_id][0][0]), - PHY_vars_UE->lte_frame_parms.ofdm_symbol_size*nsymb/2,1,1); - - if (PHY_vars_UE->lte_frame_parms.nb_antennas_rx>1) - write_output("dlsch01_ch0.m","dl01_ch0", - &(PHY_vars_UE->lte_ue_common_vars.dl_ch_estimates[eNB_id][1][0]), - PHY_vars_UE->lte_frame_parms.ofdm_symbol_size*nsymb/2,1,1); - - if (PHY_vars_eNB->lte_frame_parms.nb_antennas_tx>1) - write_output("dlsch10_ch0.m","dl10_ch0", - &(PHY_vars_UE->lte_ue_common_vars.dl_ch_estimates[eNB_id][2][0]), - PHY_vars_UE->lte_frame_parms.ofdm_symbol_size*nsymb/2,1,1); - - if ((PHY_vars_UE->lte_frame_parms.nb_antennas_rx>1) && (PHY_vars_eNB->lte_frame_parms.nb_antennas_tx>1)) - write_output("dlsch11_ch0.m","dl11_ch0", - &(PHY_vars_UE->lte_ue_common_vars.dl_ch_estimates[eNB_id][3][0]), - PHY_vars_UE->lte_frame_parms.ofdm_symbol_size*nsymb/2,1,1); - - //pdsch_vars - dump_dlsch2(PHY_vars_UE,eNB_id,coded_bits_per_codeword); - dump_dlsch2(PHY_vars_UE,eNB_id_i,coded_bits_per_codeword); - write_output("dlsch_e.m","e",PHY_vars_eNB->dlsch_eNB[0][0]->e,coded_bits_per_codeword,1,4); - - //pdcch_vars - write_output("pdcchF0_ext.m","pdcchF_ext", PHY_vars_UE->lte_ue_pdcch_vars[eNB_id]->rxdataF_ext[0],2*3*PHY_vars_UE->lte_frame_parms.ofdm_symbol_size,1,1); - write_output("pdcch00_ch0_ext.m","pdcch00_ch0_ext",PHY_vars_UE->lte_ue_pdcch_vars[eNB_id]->dl_ch_estimates_ext[0],300*3,1,1); - - write_output("pdcch_rxF_comp0.m","pdcch0_rxF_comp0",PHY_vars_UE->lte_ue_pdcch_vars[eNB_id]->rxdataF_comp[0],4*300,1,1); - write_output("pdcch_rxF_llr.m","pdcch_llr",PHY_vars_UE->lte_ue_pdcch_vars[eNB_id]->llr,2400,1,4); - - } - - } - } - } - - //saving PMI incase of Transmission Mode > 5 - - if(abstx) { - if(saving_bler==0) - if (trials==0 && round==0 && transmission_mode>=5) { - for (iii=0; iii<NB_RB; iii++) { - //fprintf(csv_fd, "%d, %d", (PHY_vars_UE->lte_ue_pdsch_vars[eNB_id]->pmi_ext[iii]),(PHY_vars_UE->lte_ue_pdsch_vars[eNB_id_i]->pmi_ext[iii])); - fprintf(csv_fd,"%x,%x,",(PHY_vars_UE->lte_ue_pdsch_vars[eNB_id]->pmi_ext[iii]),(PHY_vars_UE->lte_ue_pdsch_vars[eNB_id]->pmi_ext[iii])); - msg(" %x",(PHY_vars_UE->lte_ue_pdsch_vars[eNB_id]->pmi_ext[iii])); - } - } - } - - // calculate uncoded BLER - /* uncoded_ber=0; - for (i=0;i<coded_bits_per_codeword;i++) - if (PHY_vars_eNB->dlsch_eNB[0][0]->e[i] != (PHY_vars_UE->lte_ue_pdsch_vars[0]->llr[0][i]<0)) { - uncoded_ber_bit[i] = 1; - uncoded_ber++; - } - else - uncoded_ber_bit[i] = 0; - - uncoded_ber/=coded_bits_per_codeword; - avg_ber += uncoded_ber; - */ - //write_output("uncoded_ber_bit.m","uncoded_ber_bit",uncoded_ber_bit,coded_bits_per_codeword,1,0); - - /* - printf("precoded CQI %d dB, opposite precoded CQI %d dB\n", - PHY_vars_UE->PHY_measurements.precoded_cqi_dB[eNB_id][0], - PHY_vars_UE->PHY_measurements.precoded_cqi_dB[eNB_id_i][0]); - */ - - PHY_vars_UE->dlsch_ue[0][0]->rnti = n_rnti; - dlsch_unscrambling(&PHY_vars_UE->lte_frame_parms, - PHY_vars_UE->lte_ue_pdcch_vars[0]->num_pdcch_symbols, - PHY_vars_UE->dlsch_ue[0][0], - coded_bits_per_codeword, - PHY_vars_UE->lte_ue_pdsch_vars[eNB_id]->llr[0], - 0, - subframe<<1); - - /* - for (i=0;i<coded_bits_per_codeword;i++) - PHY_vars_UE->lte_ue_pdsch_vars[0]->llr[0][i] = (short)quantize(100,PHY_vars_UE->lte_ue_pdsch_vars[0]->llr[0][i],4); - */ - - ret = dlsch_decoding(PHY_vars_UE->lte_ue_pdsch_vars[eNB_id]->llr[0], - &PHY_vars_UE->lte_frame_parms, - PHY_vars_UE->dlsch_ue[0][0], - subframe, - PHY_vars_UE->lte_ue_pdcch_vars[0]->num_pdcch_symbols); - -#ifdef XFORMS - do_forms(form, - &PHY_vars_UE->lte_frame_parms, - PHY_vars_UE->lte_ue_common_vars.dl_ch_estimates_time, - PHY_vars_UE->lte_ue_common_vars.dl_ch_estimates[eNB_id], - PHY_vars_UE->lte_ue_common_vars.rxdata, - PHY_vars_UE->lte_ue_common_vars.rxdataF, - PHY_vars_UE->lte_ue_pdsch_vars[0]->rxdataF_comp[0], - PHY_vars_UE->lte_ue_pdsch_vars[3]->rxdataF_comp[0], - PHY_vars_UE->lte_ue_pdsch_vars[0]->dl_ch_rho_ext[0], - PHY_vars_UE->lte_ue_pdsch_vars[0]->llr[0],coded_bits_per_codeword); - //PHY_vars_UE->dlsch_ue[0][0]->harq_processes[0]->w[0],3*(tbs+64)); - //uncoded_ber_bit,coded_bits_per_codeword); - - - /* - printf("Hit a key to continue\n"); - c = getchar(); - */ - -#endif - - if (ret <= MAX_TURBO_ITERATIONS) { - - if (n_frames==1) - printf("No DLSCH errors found\n"); - - // exit(-1); - if (fix_rounds==0) - round=5; - else - round++; - } else { - errs[round]++; - - if (n_frames==1) { - //if ((n_frames==1) || (SNR>=30)) { - printf("DLSCH errors found, uncoded ber %f\n",uncoded_ber); - - for (s=0; s<PHY_vars_UE->dlsch_ue[0][0]->harq_processes[0]->C; s++) { - if (s<PHY_vars_UE->dlsch_ue[0][0]->harq_processes[0]->Cminus) - Kr = PHY_vars_UE->dlsch_ue[0][0]->harq_processes[0]->Kminus; - else - Kr = PHY_vars_UE->dlsch_ue[0][0]->harq_processes[0]->Kplus; - - Kr_bytes = Kr>>3; - - printf("Decoded_output (Segment %d):\n",s); - - for (i=0; i<Kr_bytes; i++) - printf("%d : %x (%x)\n",i,PHY_vars_UE->dlsch_ue[0][0]->harq_processes[0]->c[s][i],PHY_vars_UE->dlsch_ue[0][0]->harq_processes[0]->c[s][i]^PHY_vars_eNB->dlsch_eNB[0][0]->harq_processes[0]->c[s][i]); - } - - write_output("rxsig0.m","rxs0", &PHY_vars_UE->lte_ue_common_vars.rxdata[0][0],10*PHY_vars_UE->lte_frame_parms.samples_per_tti,1,1); - write_output("rxsigF0.m","rxsF0", &PHY_vars_UE->lte_ue_common_vars.rxdataF[0][0],2*PHY_vars_UE->lte_frame_parms.ofdm_symbol_size*nsymb,2,1); - - if (PHY_vars_UE->lte_frame_parms.nb_antennas_rx>1) { - write_output("rxsig1.m","rxs1", PHY_vars_UE->lte_ue_common_vars.rxdata[1],PHY_vars_UE->lte_frame_parms.samples_per_tti,1,1); - write_output("rxsigF1.m","rxsF1", PHY_vars_UE->lte_ue_common_vars.rxdataF[1],2*PHY_vars_UE->lte_frame_parms.ofdm_symbol_size*nsymb,2,1); - } - - write_output("dlsch00_ch0.m","dl00_ch0", - &(PHY_vars_UE->lte_ue_common_vars.dl_ch_estimates[eNB_id][0][0]), - PHY_vars_UE->lte_frame_parms.ofdm_symbol_size*nsymb/2,1,1); - - if (PHY_vars_UE->lte_frame_parms.nb_antennas_rx>1) - write_output("dlsch01_ch0.m","dl01_ch0", - &(PHY_vars_UE->lte_ue_common_vars.dl_ch_estimates[eNB_id][1][0]), - PHY_vars_UE->lte_frame_parms.ofdm_symbol_size*nsymb/2,1,1); - - if (PHY_vars_eNB->lte_frame_parms.nb_antennas_tx>1) - write_output("dlsch10_ch0.m","dl10_ch0", - &(PHY_vars_UE->lte_ue_common_vars.dl_ch_estimates[eNB_id][2][0]), - PHY_vars_UE->lte_frame_parms.ofdm_symbol_size*nsymb/2,1,1); - - if ((PHY_vars_UE->lte_frame_parms.nb_antennas_rx>1) && (PHY_vars_eNB->lte_frame_parms.nb_antennas_tx>1)) - write_output("dlsch11_ch0.m","dl11_ch0", - &(PHY_vars_UE->lte_ue_common_vars.dl_ch_estimates[eNB_id][3][0]), - PHY_vars_UE->lte_frame_parms.ofdm_symbol_size*nsymb/2,1,1); - - //pdsch_vars - dump_dlsch2(PHY_vars_UE,eNB_id,coded_bits_per_codeword); - write_output("dlsch_e.m","e",PHY_vars_eNB->dlsch_eNB[0][0]->e,coded_bits_per_codeword,1,4); - write_output("dlsch_ber_bit.m","ber_bit",uncoded_ber_bit,coded_bits_per_codeword,1,0); - write_output("dlsch_eNB_w.m","w",PHY_vars_eNB->dlsch_eNB[0][0]->harq_processes[0]->w[0],3*(tbs+64),1,4); - write_output("dlsch_UE_w.m","w",PHY_vars_UE->dlsch_ue[0][0]->harq_processes[0]->w[0],3*(tbs+64),1,0); - - - exit(-1); - } - - // printf("round %d errors %d/%d\n",round,errs[round],trials); - - - round++; - - if (n_frames==1) - printf("DLSCH in error in round %d\n",round); - - } - - free(uncoded_ber_bit); - uncoded_ber_bit = NULL; - - } //round - - // printf("\n"); - - if ((errs[0]>=n_frames/10) && (trials>(n_frames/2))) - break; - - //len = chbch_stats_read(stats_buffer,NULL,0,4096); - //printf("%s\n\n",stats_buffer); - - } //trials - - -#ifdef REL_AMPLIFY_FORWARD - printf("\n**********************SNR = %f dB, alpha_SNR= %f ( tx_lev %f, sigma2_dB %f, tx_lev_r1 %f, sigma2_r1_dB %f)**************************\n", - SNR_array[0],alpha_SNR, - (double)tx_lev_dB+10*log10(PHY_vars_UE->lte_frame_parms.ofdm_symbol_size/(NB_RB*12)), - sigma2_dB, - (double)tx_lev_r1_dB+10*log10(PHY_vars_UE->lte_frame_parms.ofdm_symbol_size/(NB_RB*12)), - sigma2_r1_dB); - - //Compute the real effective rate by taking into account the fact that single relay and two relay have different - // timeslot occupations (which are not taken into account in this extended dlsim simulations.) - //bits/hz. - -#ifdef SINGLE_RELAY - total_timeslots = ((double) (round_trials[0] - round_trials[1])*2 + (round_trials[1] - round_trials[2])*4 + (round_trials[2] - round_trials[3])*6 + (round_trials[3])*8 ); -#else - total_timeslots = 1 + ((double) (round_trials[0] - round_trials[1])*2 + (round_trials[1] - round_trials[2])*2 + (round_trials[2] - round_trials[3])*4 + (round_trials[3])*4 ); -#endif - successfully_sent_frames = (double)(round_trials[0]-errs[3]); - effective_rate = rate*( successfully_sent_frames / total_timeslots); - - - -#else - printf("\n**********************SNR = %f dB (tx_lev %f, sigma2_dB %f)**************************\n", - SNR, - (double)tx_lev_dB+10*log10(PHY_vars_UE->lte_frame_parms.ofdm_symbol_size/(NB_RB*12)), - sigma2_dB); -#endif - printf("Errors (%d/%d %d/%d %d/%d %d/%d), Pe = (%e,%e,%e,%e), dci_errors %d/%d, Pe = %e => effective rate %f (%f), normalized delay %f (%f), uncoded_ber %f\n", - errs[0], - round_trials[0], - errs[1], - round_trials[1], - errs[2], - round_trials[2], - errs[3], - round_trials[3], - (double)errs[0]/(round_trials[0]), - (double)errs[1]/(round_trials[1]), - (double)errs[2]/(round_trials[2]), - (double)errs[3]/(round_trials[3]), - dci_errors, - round_trials[0], - (double)dci_errors/(round_trials[0]), - effective_rate, - rate, - (1.0*(round_trials[0]-errs[0])+2.0*(round_trials[1]-errs[1])+3.0*(round_trials[2]-errs[2])+4.0*(round_trials[3]-errs[3]))/((double)round_trials[0])/ - (double)PHY_vars_eNB->dlsch_eNB[0][0]->harq_processes[0]->TBS, - (1.0*(round_trials[0]-errs[0])+2.0*(round_trials[1]-errs[1])+3.0*(round_trials[2]-errs[2])+4.0*(round_trials[3]-errs[3]))/((double)round_trials[0]), - avg_ber/round_trials[0]); - - fprintf(bler_fd,"%f;%d;%d;%f;%d;%d;%d;%d;%d;%d;%d;%d;%d;%f\n", - SNR, - mcs, - PHY_vars_eNB->dlsch_eNB[0][0]->harq_processes[0]->TBS, - rate, - errs[0], - round_trials[0], - errs[1], - round_trials[1], - errs[2], - round_trials[2], - errs[3], - round_trials[3], - dci_errors, - avg_ber/round_trials[0]); - - fprintf(tikz_fd,"(%f,%f)", SNR, (float)errs[0]/round_trials[0]); - - if(abstx) { //ABSTRACTION - blerr= (double)errs[1]/(round_trials[1]); - - if (blerr>.1) - snr_step = 1.5; - else snr_step = input_snr_step; - - blerr = (double)errs[0]/(round_trials[0]); - - if(saving_bler==0) - fprintf(csv_fd,"%e;\n",blerr); - - if(blerr<1) - saving_bler = 0; - else saving_bler =1; - - - } //ABStraction - - if (((double)errs[0]/(round_trials[0]))<1e-2) - break; - }// SNR - - - } //ch_realization - - - fclose(bler_fd); - fprintf(tikz_fd,"};\n"); - fclose(tikz_fd); - - if (input_trch_file==1) - fclose(input_trch_fd); - - if (input_file==1) - fclose(input_fd); - - if(abstx) { // ABSTRACTION - fprintf(csv_fd,"];"); - fclose(csv_fd); - } - - - - - printf("Freeing dlsch structures\n"); - - for (i=0; i<2; i++) { - printf("eNB %d\n",i); - free_eNB_dlsch(PHY_vars_eNB->dlsch_eNB[0][i]); - printf("UE %d\n",i); - free_ue_dlsch(PHY_vars_UE->dlsch_ue[0][i]); - } - - - printf("Freeing channel I/O\n"); - - for (i=0; i<2; i++) { - free(s_re[i]); - free(s_im[i]); - free(r_re[i]); - free(r_im[i]); - -#ifdef REL_AMPLIFY_FORWARD - free(rs_re[i]); - free(rs_im[i]); - free(dr_re[i]); - free(dr_im[i]); - -#endif - } - - free(s_re); - free(s_im); - free(r_re); - free(r_im); - -#ifdef REL_AMPLIFY_FORWARD - free(rs_re); - free(rs_im); - free(dr_re); - free(dr_im); - - for (rel = 0; rel < nb_relays; rel++) { - free(REL2UE[rel]); - free(eNB2REL[rel]); - - } - -#endif - - // lte_sync_time_free(); - - return(0); -} - -