ucommon-6.0.7/ 0000755 0001750 0001750 00000000000 12175176706 010216 5 0000000 0000000 ucommon-6.0.7/commoncpp-config.cmake 0000755 0001750 0001750 00000004277 12163025062 014374 0000000 0000000 #!/bin/sh
# Copyright (C) 2006-2007 David Sugar, Tycho Softworks.
#
# This file is free software; as a special exception the author gives
# unlimited permission to copy and/or distribute it, with or without
# modifications, as long as this notice is preserved.
#
# This program is distributed in the hope that it will be useful, but
# WITHOUT ANY WARRANTY, to the extent permitted by law; without even the
# implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
prefix=${CMAKE_INSTALL_PREFIX}
exec_prefix=${CMAKE_INSTALL_PREFIX}/bin
includedir=${CMAKE_INSTALL_PREFIX}/include
libdir=${CMAKE_INSTALL_PREFIX}/lib${LIB_SUFFIX}
usage()
{
cat <
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.
Copyright (C)
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 .
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:
Copyright (C)
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
.
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
.
ucommon-6.0.7/commoncpp.pc.cmake 0000644 0001750 0001750 00000000434 12163025062 013516 0000000 0000000 prefix=${CMAKE_INSTALL_PREFIX}
libdir=${CMAKE_INSTALL_PREFIX}/lib${LIB_SUFFIX}
includedir=${CMAKE_INSTALL_PREFIX}/include
Name: ucommon
Description: GNU Common C++ class framework
Version: ${PACKAGE_FILE_VERSION}
Libs: -lcommoncpp -lucommon ${PACKAGE_LIBS}
Cflags: ${PACKAGE_FLAGS}
ucommon-6.0.7/commoncpp/ 0000755 0001750 0001750 00000000000 12175176705 012210 5 0000000 0000000 ucommon-6.0.7/commoncpp/map.cpp 0000644 0001750 0001750 00000013015 12163025062 013373 0000000 0000000 // Copyright (C) 2004-2005 Open Source Telecom Corporation.
// Copyright (C) 2006-2010 David Sugar, Tycho Softworks.
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
//
// As a special exception, you may use this file as part of a free software
// library without restriction. Specifically, if other files instantiate
// templates or use macros or inline functions from this file, or you compile
// this file and link it with other files to produce an executable, this
// file does not by itself cause the resulting executable to be covered by
// the GNU General Public License. This exception does not however
// invalidate any other reasons why the executable file might be covered by
// the GNU General Public License.
//
// This exception applies only to the code released under the name GNU
// Common C++. If you copy code from other releases into a copy of GNU
// Common C++, as the General Public License permits, the exception does
// not apply to the code that you add in this way. To avoid misleading
// anyone as to the status of such modified files, you must delete
// this exception notice from them.
//
// If you write modifications of your own for GNU Common C++, it is your choice
// whether to permit this exception to apply to your modifications.
// If you do not wish that, delete this exception notice.
//
#include
#include
#include
#include
#include
using namespace COMMONCPP_NAMESPACE;
MapIndex& MapIndex::operator=(MapObject *theObject)
{
thisObject = theObject;
return *this;
}
MapIndex& MapIndex::operator++()
{
if ( thisObject == NULL )
return *this;
if (thisObject->nextObject != NULL) {
thisObject = thisObject->nextObject;
}
else if (thisObject->table != NULL) {
MapObject* obj = NULL;
unsigned i = thisObject->table->getIndex(thisObject->idObject) + 1;
thisObject->table->enterMutex();
for ( ; obj == NULL && i < thisObject->table->range; i++)
obj = thisObject->table->map[i];
thisObject->table->leaveMutex();
thisObject = obj;
}
return *this;
}
MapTable::MapTable(unsigned size) :
Mutex()
{
map = new MapObject *[size + 1];
memset(map, 0, sizeof(MapObject *) * (size + 1));
range = size;
count = 0;
}
MapTable::~MapTable()
{
cleanup();
}
void MapTable::cleanup(void)
{
enterMutex();
if(map)
delete[] map;
map = NULL;
leaveMutex();
}
unsigned MapTable::getIndex(const char *id)
{
unsigned key = 0;
while(*id)
key = (key << 1) ^ (*(id++) & 0x1f);
return key % range;
}
void *MapTable::getObject(const char *id)
{
if(!map)
return NULL;
enterMutex();
MapObject *obj = map[getIndex(id)];
while(obj) {
if(!stricmp(obj->idObject, id))
break;
obj = obj->nextObject;
}
leaveMutex();
return (void *)obj;
}
void *MapTable::getFirst()
{
MapObject *obj;
if(!map)
return NULL;
enterMutex();
obj = *map;
for (register unsigned i = 0; obj == NULL && i < range; i++)
obj = map[i];
leaveMutex();
return obj;
}
void *MapTable::getLast()
{
MapObject *obj = NULL;
if(!map)
return NULL;
enterMutex();
for (register int i = range - 1; obj == NULL && i >= 0; i--)
obj = map[i];
if ( obj != NULL )
while ( obj->nextObject != NULL )
obj = obj->nextObject;
leaveMutex();
return obj;
}
void *MapTable::getFree(void)
{
enterMutex();
MapObject *obj = map[range];
if(obj)
map[range] = obj->nextObject;
leaveMutex();
return obj;
}
void MapTable::addFree(MapObject *obj)
{
obj->detach();
enterMutex();
obj->nextObject = map[range];
map[range] = obj;
leaveMutex();
}
void MapTable::addObject(MapObject &obj)
{
unsigned idx = getIndex(obj.idObject);
if(obj.table == this || !map)
return;
obj.detach();
enterMutex();
obj.nextObject = map[idx];
map[idx] = &obj;
obj.table = this;
count++;
leaveMutex();
}
MapTable &MapTable::operator+=(MapObject &obj)
{
addObject(obj);
return *this;
}
MapTable &MapTable::operator-=(MapObject &obj)
{
if(obj.table == this)
obj.detach();
return *this;
}
MapObject::MapObject(const char *id)
{
table = NULL;
idObject = id;
}
void MapObject::detach(void)
{
MapObject *node, *prev = NULL;
unsigned idx;
if(!table)
return;
idx = table->getIndex(idObject);
table->enterMutex();
node = table->map[idx];
while(node) {
if(node == this)
break;
prev = node;
node = prev->nextObject;
}
if(node && !prev)
table->map[idx] = nextObject;
else if(node)
prev->nextObject = nextObject;
table->count--;
table->leaveMutex();
table = NULL;
}
ucommon-6.0.7/commoncpp/process.cpp 0000644 0001750 0001750 00000041415 12163025062 014301 0000000 0000000 // Copyright (C) 1999-2005 Open Source Telecom Corporation.
// Copyright (C) 2006-2010 David Sugar, Tycho Softworks.
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
//
// As a special exception, you may use this file as part of a free software
// library without restriction. Specifically, if other files instantiate
// templates or use macros or inline functions from this file, or you compile
// this file and link it with other files to produce an executable, this
// file does not by itself cause the resulting executable to be covered by
// the GNU General Public License. This exception does not however
// invalidate any other reasons why the executable file might be covered by
// the GNU General Public License.
//
// This exception applies only to the code released under the name GNU
// Common C++. If you copy code from other releases into a copy of GNU
// Common C++, as the General Public License permits, the exception does
// not apply to the code that you add in this way. To avoid misleading
// anyone as to the status of such modified files, you must delete
// this exception notice from them.
//
// If you write modifications of your own for GNU Common C++, it is your choice
// whether to permit this exception to apply to your modifications.
// If you do not wish that, delete this exception notice.
//
#include
#include
#include
#include
#include
#include
#include
#include
#include
#ifdef HAVE_FCNTL_H
#include
#endif
#ifdef MACOSX
#undef _POSIX_PRIORITY_SCHEDULING
#endif
#ifndef _MSWINDOWS_
#ifdef HAVE_SYS_TIME_H
#include
#endif
#ifdef HAVE_SYS_WAIT_H
#include
#endif
#include
#include
#ifdef SIGTSTP
#include
#include
#endif
#ifndef _PATH_TTY
#define _PATH_TTY "/dev/tty"
#endif
#endif
#ifdef _MSWINDOWS_
#include
#include
#endif
using namespace COMMONCPP_NAMESPACE;
bool Process::rtflag = false;
#ifdef _MSWINDOWS_
static SYSTEM_INFO sysinfo;
static LPSYSTEM_INFO lpSysInfo = NULL;
static void init_sysinfo(void)
{
if(!lpSysInfo) {
lpSysInfo = &sysinfo;
memset(&sysinfo, 0, sizeof(sysinfo));
GetSystemInfo(lpSysInfo);
}
}
const char *Process::getUser(void)
{
static char userid[65];
DWORD length = sizeof(userid);
if(GetUserName(userid, &length))
return userid;
return NULL;
}
size_t Process::getPageSize(void)
{
init_sysinfo();
return (size_t) lpSysInfo->dwPageSize;
}
int Process::spawn(const char *exename, const char **args, bool wait)
{
int mode = P_NOWAIT;
if(wait)
mode = P_WAIT;
return (int)::spawnvp(mode, (char *)exename, (char **)args);
}
int Process::join(int pid)
{
int status, result;
if(pid == -1)
return pid;
result = (int)cwait(&status, pid, WAIT_CHILD);
if(status & 0x0)
return -1;
return result;
}
bool Process::cancel(int pid, int sig)
{
HANDLE hPid = OpenProcess(PROCESS_TERMINATE, FALSE, pid);
bool rtn = true;
if(!hPid)
return false;
switch(sig) {
case SIGABRT:
case SIGTERM:
if(!TerminateProcess(hPid, -1))
rtn = false;
case 0:
break;
default:
rtn = false;
}
CloseHandle(hPid);
return rtn;
}
void Process::setPriority(int pri)
{
DWORD pc = NORMAL_PRIORITY_CLASS;
DWORD pid = GetCurrentProcessId();
HANDLE hProcess = OpenProcess(PROCESS_DUP_HANDLE, TRUE, pid);
#ifdef BELOW_NORMAL_PRIORITY_CLASS
if(pri == -1)
pc = BELOW_NORMAL_PRIORITY_CLASS;
else if(pri == 1)
pc = ABOVE_NORMAL_PRIORITY_CLASS;
else
#endif
if(pri == 2)
pc = HIGH_PRIORITY_CLASS;
else if(pri > 2)
pc = REALTIME_PRIORITY_CLASS;
else if(pri < -1)
pc = IDLE_PRIORITY_CLASS;
SetPriorityClass(hProcess, pc);
CloseHandle(hProcess);
}
void Process::setScheduler(const char *cp)
{
if(!stricmp(cp, "fifo"))
setPriority(3);
else if(!stricmp(cp, "rr"))
setPriority(2);
else if(!stricmp(cp, "idle"))
setPriority(-2);
else
setPriority(0);
}
void Process::setRealtime(int pri)
{
setPriority(3);
}
bool Process::isScheduler(void)
{
return false;
}
#else
#ifndef WEXITSTATUS
#define WEXITSTATUS(status) ((unsigned)(status) >> 8)
#endif
#ifndef WIFEXITED
#define WIFEXITED(status) (((status) & 255) == 0)
#endif
#ifndef WTERMSIG
#define WTERMSIG(status) (((unsigned)(status)) & 0x7F)
#endif
#ifndef WIFSIGNALLED
#define WIFSIGNALLED(status) (((status) & 255) != 0)
#endif
#ifndef WCOREDUMP
#define WCOREDUMP(status) (((status) & 0x80) != 0)
#endif
static char *_pUser = NULL;
static char *_pHome = NULL;
static void lookup(void)
{
struct passwd *pw = NULL;
#ifdef HAVE_GETPWUID_R
struct passwd pwd;
char buffer[1024];
::getpwuid_r(geteuid(), &pwd, buffer, 1024, &pw);
#else
pw = ::getpwuid(geteuid());
#endif
if(_pHome)
delString(_pHome);
if(_pUser)
delString(_pUser);
_pUser = _pHome = NULL;
if(pw != NULL && pw->pw_dir != NULL)
_pHome = newString(pw->pw_dir);
if(pw != NULL && pw->pw_name != NULL)
_pUser = newString(pw->pw_name);
endpwent();
}
const char *Process::getUser(void)
{
if(!_pUser)
lookup();
return (const char *)_pUser;
}
const char *Process::getConfigDir(void)
{
#ifdef ETC_CONFDIR
return ETC_CONFDIR;
#else
return "/etc";
#endif
}
const char *Process::getHomeDir(void)
{
if(!_pHome)
lookup();
return (const char *)_pHome;
}
#ifdef HAVE_GETPAGESIZE
size_t Process::getPageSize(void)
{
return (size_t)getpagesize();
}
#else
size_t Process::getPageSize(void)
{
return 1024;
}
#endif
bool Process::setUser(const char *id, bool grp)
{
struct passwd *pw = NULL;
#ifdef HAVE_GETPWNAM_R
struct passwd pwd;
char buffer[1024];
::getpwnam_r(id, &pwd, buffer, 1024, &pw);
#else
pw = ::getpwnam(id);
#endif
if(!pw)
return false;
if(grp)
if(setgid(pw->pw_gid))
return false;
if(setuid(pw->pw_uid))
return false;
lookup();
return true;
}
bool Process::setGroup(const char *id)
{
struct group *group = NULL;
#ifdef HAVE_GETGRNAM_R
struct group grp;
char buffer[2048];
::getgrnam_r(id, &grp, buffer, 1024, &group);
#else
group = ::getgrnam(id);
#endif
if(!group) {
endgrent();
return false;
}
#ifdef HAVE_SETEGID
setegid(group->gr_gid);
#endif
if(setgid(group->gr_gid)) {
endgrent();
return false;
}
endgrent();
return true;
}
bool Process::cancel(int pid, int sig)
{
if(!sig)
sig = SIGTERM;
if(pid < 1)
return false;
if(::kill(pid, sig))
return false;
return true;
}
int Process::join(int pid)
{
int status;
if(pid < 1)
return -1;
#ifdef HAVE_WAITPID
waitpid(pid, &status, 0);
#else
#ifdef HAVE_WAIT4
wait4(pid, &status, 0, NULL);
#else
int result;
while((result = ::wait(&status)) != pid && result != -1)
;
#endif
#endif
if(WIFEXITED(status))
return WEXITSTATUS(status);
else if(WIFSIGNALLED(status))
return -WTERMSIG(status);
else
return -1;
}
int Process::spawn(const char *exename, const char **args, bool wait)
{
int pid;
pid = vfork();
if(pid == -1)
return -1;
if(!pid) {
execvp((char *)exename, (char **)args);
_exit(-1);
}
if(!wait)
return pid;
return join(pid);
}
Process::Trap Process::setInterruptSignal(int signo, Trap func)
{
struct sigaction sig_act, old_act;
memset(&sig_act, 0, sizeof(sig_act));
sig_act.sa_handler = func;
sigemptyset(&sig_act.sa_mask);
if(signo != SIGALRM)
sigaddset(&sig_act.sa_mask, SIGALRM);
sig_act.sa_flags = 0;
#ifdef SA_INTERRUPT
sig_act.sa_flags |= SA_INTERRUPT;
#endif
if(sigaction(signo, &sig_act, &old_act) < 0)
return SIG_ERR;
return old_act.sa_handler;
}
Process::Trap Process::setPosixSignal(int signo, Trap func)
{
struct sigaction sig_act, old_act;
memset(&sig_act, 0, sizeof(sig_act));
sig_act.sa_handler = func;
sigemptyset(&sig_act.sa_mask);
sig_act.sa_flags = 0;
if(signo == SIGALRM) {
#ifdef SA_INTERRUPT
sig_act.sa_flags |= SA_INTERRUPT;
#endif
}
else {
sigaddset(&sig_act.sa_mask, SIGALRM);
#ifdef SA_RESTART
sig_act.sa_flags |= SA_RESTART;
#endif
}
if(sigaction(signo, &sig_act, &old_act) < 0)
return SIG_ERR;
return old_act.sa_handler;
}
void Process::detach(void)
{
attach("/dev/null");
}
void Process::attach(const char *dev)
{
int pid;
if(getppid() == 1)
return;
::close(0);
::close(1);
::close(2);
#ifdef SIGTTOU
setPosixSignal(SIGTTOU, SIG_IGN);
#endif
#ifdef SIGTTIN
setPosixSignal(SIGTTIN, SIG_IGN);
#endif
#ifdef SIGTSTP
setPosixSignal(SIGTSTP, SIG_IGN);
#endif
if((pid = fork()) < 0)
THROW(pid);
else if(pid > 0)
exit(0);
#if defined(SIGTSTP) && defined(TIOCNOTTY)
int fd;
if(setpgid(0, getpid()) == -1)
THROW(-1);
if((fd = open(_PATH_TTY, O_RDWR)) >= 0) {
ioctl(fd, TIOCNOTTY, NULL);
close(fd);
}
#else
#ifdef HAVE_SETPGRP
if(setpgrp() == -1)
THROW(-1);
#else
if(setpgid(0, getpid()) == -1)
THROW(-1);
#endif
setPosixSignal(SIGHUP, SIG_IGN);
if((pid = fork()) < 0)
THROW(-1);
else if(pid > 0)
exit(0);
#endif
if(dev && *dev) {
::open(dev, O_RDWR);
::open(dev, O_RDWR);
::open(dev, O_RDWR);
}
}
void Process::setScheduler(const char *pol)
{
#ifdef _POSIX_PRIORITY_SCHEDULING
struct sched_param p;
int policy, orig;
pthread_t ptid = pthread_self();
if(pthread_getschedparam(ptid, &policy, &p))
return;
orig = policy;
if(pol) {
#if defined(SCHED_TS)
policy = SCHED_TS;
#elif defined(SCHED_OTHER)
policy = SCHED_OTHER;
#else
policy = 0;
#endif
#ifdef SCHED_RR
if(ucommon::eq_case(pol, "rr"))
policy = SCHED_RR;
#endif
#if !defined(SCHED_RR) && defined(SCHED_FIFO)
if(ucommon::eq_case(pol, "rr"))
policy = SCHED_FIFO;
#endif
#ifdef SCHED_FIFO
if(ucommon::eq_case(pol, "fifo")) {
rtflag = true;
policy = SCHED_FIFO;
}
#endif
#ifdef SCHED_TS
if(ucommon::eq_case(pol, "ts"))
policy = SCHED_TS;
#endif
#ifdef SCHED_OTHER
if(ucommon::eq_case(pol, "other"))
policy = SCHED_OTHER;
#endif
}
else
policy = orig;
int min = sched_get_priority_min(policy);
int max = sched_get_priority_max(policy);
if(p.sched_priority < min)
p.sched_priority = min;
else if(p.sched_priority > max)
p.sched_priority = max;
pthread_setschedparam(ptid, policy, &p);
#endif
}
void Process::setPriority(int pri)
{
#ifdef _POSIX_PRIORITY_SCHEDULING
struct sched_param p;
int policy;
pthread_t ptid = pthread_self();
pthread_getschedparam(ptid, &policy, &p);
int min = sched_get_priority_min(policy);
int max = sched_get_priority_max(policy);
if(pri < min)
pri = min;
if(pri > max)
pri = max;
p.sched_priority = pri;
pthread_setschedparam(ptid, policy, &p);
#else
if(pri < -20)
pri = -20;
if(pri > 20)
pri = 20;
nice(-pri);
#endif
}
bool Process::isScheduler(void)
{
#ifdef _POSIX_PRIORITY_SCHEDULING
return true;
#else
return false;
#endif
}
void Process::setRealtime(int pri)
{
if(pri < 1)
pri = 1;
setScheduler("rr");
setPriority(pri);
}
#endif
#ifdef _OSF_SOURCE
#undef HAVE_SETENV
#endif
void Process::setEnv(const char *name, const char *value, bool overwrite)
{
#ifdef HAVE_SETENV
::setenv(name, value, (int)overwrite);
#else
char strbuf[256];
snprintf(strbuf, sizeof(strbuf), "%s=%s", name, value);
if(!overwrite)
if(getenv(strbuf))
return;
::putenv(strdup(strbuf));
#endif
}
const char *Process::getEnv(const char *name)
{
return ::getenv(name);
}
#if defined(HAVE_MLOCKALL) && defined(MCL_FUTURE)
#include
bool Process::lock(bool future)
{
int rc;
if(future)
rc = mlockall(MCL_CURRENT | MCL_FUTURE);
else
rc = mlockall(MCL_CURRENT);
if(rc)
return false;
return true;
}
void Process::unlock(void)
{
munlockall();
}
#else
bool Process::lock(bool future)
{
return false;
}
void Process::unlock(void)
{
}
#endif
#ifdef _MSWINDOWS_
Lockfile::Lockfile()
{
_mutex = INVALID_HANDLE_VALUE;
_flagged = false;
}
Lockfile::Lockfile(const char *name)
{
_mutex = INVALID_HANDLE_VALUE;
_flagged = false;
lock(name);
}
bool Lockfile::lock(const char *name)
{
char mname[65];
char *ext = strrchr((char *)name, '/');
if(ext)
name = ++ext;
unlock();
snprintf(mname, sizeof(mname) - 4, "_lock_%s", name);
ext = strrchr(mname, '.');
if(ext && !stricmp(ext, ".lock")) {
*ext = 0;
ext = NULL;
}
if(!ext)
addString(mname, sizeof(mname), ".lck");
_mutex = CreateMutex(NULL, FALSE, mname);
if(WaitForSingleObject(_mutex, 200) == WAIT_OBJECT_0)
_flagged = true;
return _flagged;
}
void Lockfile::unlock(void)
{
if(_mutex == INVALID_HANDLE_VALUE)
return;
if(_flagged)
ReleaseMutex(_mutex);
CloseHandle(_mutex);
_flagged = false;
_mutex = INVALID_HANDLE_VALUE;
}
bool Lockfile::isLocked(void)
{
return _flagged;
}
#else
Lockfile::Lockfile()
{
_path = NULL;
}
Lockfile::Lockfile(const char *name)
{
_path = NULL;
lock(name);
}
bool Lockfile::lock(const char *name)
{
struct stat ino;
int fd, pid, status;
const char *ext;
char buffer[128];
bool rtn = true;
unlock();
ext = strrchr(name, '/');
if(ext)
ext = strrchr(ext, '.');
else
ext = strrchr(name, '.');
if(strchr(name, '/')) {
_path = new char[strlen(name) + 1];
strcpy(_path, name);
}
else if(ext && !strcmp(ext, ".pid")) {
if(stat("/var/run", &ino))
snprintf(buffer, sizeof(buffer), "/tmp/.%s", name);
else
snprintf(buffer, sizeof(buffer), "/var/run/%s", name);
_path = new char[strlen(buffer) + 1];
strcpy(_path, buffer);
}
else {
if(!ext)
ext = ".lock";
if(stat("/var/lock", &ino))
snprintf(buffer, sizeof(buffer), "/tmp/.%s%s", name, ext);
else
snprintf(buffer, sizeof(buffer), "/var/lock/%s%s", name, ext);
_path = new char[strlen(buffer) + 1];
strcpy(_path, buffer);
}
for(;;) {
fd = ::open(_path, O_WRONLY | O_CREAT | O_EXCL, 0660);
if(fd > 0) {
pid = getpid();
snprintf(buffer, sizeof(buffer), "%d\n", pid);
if(::write(fd, buffer, strlen(buffer)))
rtn = false;
::close(fd);
return rtn;
}
if(fd < 0 && errno != EEXIST) {
delete[] _path;
return false;
}
fd = ::open(_path, O_RDONLY);
if(fd < 0) {
if(errno == ENOENT)
continue;
delete[] _path;
return false;
}
Thread::sleep(2000);
status = ::read(fd, buffer, sizeof(buffer) - 1);
if(status < 1) {
::close(fd);
continue;
}
buffer[status] = 0;
pid = atoi(buffer);
if(pid) {
if(pid == getpid()) {
status = -1;
errno = 0;
}
else
status = kill(pid, 0);
if(!status || (errno == EPERM)) {
::close(fd);
delete[] _path;
return false;
}
}
::close(fd);
::unlink(_path);
}
}
void Lockfile::unlock(void)
{
if(_path) {
remove(_path);
delete[] _path;
_path = NULL;
}
}
bool Lockfile::isLocked(void)
{
if(_path)
return true;
return false;
}
#endif
ucommon-6.0.7/commoncpp/dccp.cpp 0000644 0001750 0001750 00000042264 12163025062 013537 0000000 0000000 // Copyright (C) 1999-2005 Open Source Telecom Corporation.
// Copyright (C) 2006-2010 David Sugar, Tycho Softworks.
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
//
// As a special exception, you may use this file as part of a free software
// library without restriction. Specifically, if other files instantiate
// templates or use macros or inline functions from this file, or you compile
// this file and link it with other files to produce an executable, this
// file does not by itself cause the resulting executable to be covered by
// the GNU General Public License. This exception does not however
// invalidate any other reasons why the executable file might be covered by
// the GNU General Public License.
//
// This exception applies only to the code released under the name GNU
// Common C++. If you copy code from other releases into a copy of GNU
// Common C++, as the General Public License permits, the exception does
// not apply to the code that you add in this way. To avoid misleading
// anyone as to the status of such modified files, you must delete
// this exception notice from them.
//
// If you write modifications of your own for GNU Common C++, it is your choice
// whether to permit this exception to apply to your modifications.
// If you do not wish that, delete this exception notice.
//
#include
#include
#include
#include
#include
#include
#include
#ifdef _MSWINDOWS_
#include
#define _IOLEN64 (unsigned)
#define _IORET64 (int)
typedef int socklen_t;
#define socket_errno WSAGetLastError()
#else
#include
#include
#ifdef HAVE_NET_IP6_H
#include
#endif
#define socket_errno errno
# ifndef O_NONBLOCK
# define O_NONBLOCK O_NDELAY
# endif
# ifdef IPPROTO_IP
# ifndef SOL_IP
# define SOL_IP IPPROTO_IP
# endif // !SOL_IP
# endif // IPPROTO_IP
#endif // !WIN32
#ifndef INADDR_LOOPBACK
#define INADDR_LOOPBACK (unsigned long)0x7f000001
#endif
#ifdef HAVE_NETINET_IN_H
#include
#endif
#ifdef HAVE_SYS_FILIO_H
#include
#endif
#if defined(__hpux)
#define _XOPEN_SOURCE_EXTENDED
#endif
#ifdef HAVE_NET_IF_H
#include
#endif
#ifndef _IOLEN64
#define _IOLEN64
#endif
#ifndef _IORET64
#define _IORET64
#endif
using namespace COMMONCPP_NAMESPACE;
DCCPSocket::DCCPSocket(Family fam) :
Socket(fam, SOCK_DCCP, IPPROTO_DCCP)
{
family = fam;
}
DCCPSocket::DCCPSocket(DCCPSocket& server, timeout_t timeout) :
Socket(accept(server.so, NULL, NULL))
{
family = server.family;
Socket::state = CONNECTED;
socklen_t alen = sizeof(peer);
getpeername(so, (struct sockaddr *)&peer, &alen);
switch(family) {
#ifdef CCXX_IPV6
case IPV6:
if(!server.onAccept(IPV6Host(peer.ipv6.sin6_addr), peer.ipv6.sin6_port))
endSocket();
break;
#endif
case IPV4:
if(!server.onAccept(IPV4Host(peer.ipv4.sin_addr), peer.ipv4.sin_port))
endSocket();
break;
}
}
#ifdef HAVE_GETADDRINFO
DCCPSocket::DCCPSocket(const char *name, Family fam, unsigned backlog) :
Socket(fam, SOCK_DCCP, IPPROTO_DCCP)
{
char namebuf[128], *cp;
struct addrinfo hint, *list = NULL, *first;
snprintf(namebuf, sizeof(namebuf), "%s", name);
cp = strrchr(namebuf, '/');
if(!cp)
cp = strrchr(namebuf, ':');
if(!cp) {
cp = namebuf;
name = NULL;
}
else {
name = namebuf;
*(cp++) = 0;
if(!strcmp(name, "*"))
name = NULL;
}
family = fam;
memset(&hint, 0, sizeof(hint));
hint.ai_family = family;
hint.ai_socktype = SOCK_DCCP;
hint.ai_protocol = IPPROTO_DCCP;
hint.ai_flags = AI_PASSIVE;
if(getaddrinfo(name, cp, &hint, &list) || !list) {
endSocket();
error(errBindingFailed, (char *)"Could not find service", errno);
return;
}
#if defined(SO_REUSEADDR)
int opt = 1;
setsockopt(so, SOL_SOCKET, SO_REUSEADDR, (char *)&opt,
(socklen_t)sizeof(opt));
#endif
first = list;
while(list) {
if(!bind(so, list->ai_addr, (socklen_t)list->ai_addrlen)) {
state = BOUND;
break;
}
list = list->ai_next;
}
freeaddrinfo(first);
if(state != BOUND) {
endSocket();
error(errBindingFailed,(char *)"Could not bind socket",socket_errno);
return;
}
if(listen(so, backlog)) {
endSocket();
error(errBindingFailed,(char *)"Could not listen on socket",socket_errno);
return;
}
}
#else
DCCPSocket::DCCPSocket(const char *name, Family fam, unsigned backlog) :
Socket(fam, SOCK_DCCP, IPPROTO_DCCP)
{
char namebuf[128], *cp;
struct sockaddr_in addr;
#ifdef CCXX_IPV6
struct sockaddr_in6 addr6;
#endif
struct sockaddr *ap = NULL;
socklen_t alen = 0;
struct servent *svc;
family = fam;
memset(&addr, 0, sizeof(addr));
snprintf(namebuf, sizeof(namebuf), "%s", name);
cp = strrchr(namebuf, '/');
if(!cp)
cp = strrchr(namebuf, ':');
if(!cp) {
cp = namebuf;
name = "*";
}
else {
name = namebuf;
*(cp++) = 0;
}
addr.sin_family = family;
if(isdigit(*cp))
addr.sin_port = htons(atoi(cp));
else {
mutex.enter();
svc = getservbyname(cp, "dccp");
if(svc)
addr.sin_port = svc->s_port;
mutex.leave();
if(!svc) {
endSocket();
error(errBindingFailed, "Could not find service", errno);
return;
}
}
#if defined(SO_REUSEADDR)
int opt = 1;
setsockopt(so, SOL_SOCKET, SO_REUSEADDR, (char *)&opt,
(socklen_t)sizeof(opt));
#endif
switch(family) {
#ifdef CCXX_IPV6
case IPV6: {
IPV6Address ia6(name);
addr6.sin6_port = addr.sin_port;
addr6.sin6_family = family;
addr6.sin6_addr = getaddress(ia6);
ap = (struct sockaddr *)&addr6;
alen = sizeof(addr6);
break;
}
#endif
case IPV4:
IPV4Address ia(name);
addr.sin_addr = getaddress(ia);
ap = (struct sockaddr *)&addr;
alen = sizeof(addr);
break;
}
if(!ap || bind(so, (struct sockaddr *)ap, alen)) {
endSocket();
error(errBindingFailed,(char *)"Could not bind socket",socket_errno);
return;
}
if(listen(so, backlog)) {
endSocket();
error(errBindingFailed,(char *)"Could not listen on socket",
socket_errno);
return;
}
state = BOUND;
}
#endif
DCCPSocket::DCCPSocket(const IPV4Address &ia, tpport_t port, unsigned backlog) :
Socket(AF_INET, SOCK_DCCP, IPPROTO_DCCP)
{
struct sockaddr_in addr;
memset(&addr, 0, sizeof(addr));
addr.sin_family = AF_INET;
addr.sin_addr = getaddress(ia);
addr.sin_port = htons(port);
family = IPV4;
memset(&peer, 0, sizeof(peer));
peer.ipv4 = addr;
#if defined(SO_REUSEADDR)
int opt = 1;
setsockopt(so, SOL_SOCKET, SO_REUSEADDR, (char *)&opt, (socklen_t)sizeof(opt));
#endif
if(bind(so, (struct sockaddr *)&addr, sizeof(addr))) {
endSocket();
error(errBindingFailed,(char *)"Could not bind socket",socket_errno);
return;
}
if(listen(so, backlog)) {
endSocket();
error(errBindingFailed,(char *)"Could not listen on socket",socket_errno);
return;
}
state = BOUND;
}
#ifdef CCXX_IPV6
DCCPSocket::DCCPSocket(const IPV6Address &ia, tpport_t port, unsigned backlog) :
Socket(AF_INET6, SOCK_DCCP, IPPROTO_DCCP)
{
struct sockaddr_in6 addr;
memset(&addr, 0, sizeof(addr));
addr.sin6_family = AF_INET6;
addr.sin6_addr = getaddress(ia);
addr.sin6_port = htons(port);
family = IPV6;
memset(&peer, 0, sizeof(peer));
peer.ipv6 = addr;
#if defined(SO_REUSEADDR)
int opt = 1;
setsockopt(so, SOL_SOCKET, SO_REUSEADDR, (char *)&opt, (socklen_t)sizeof(opt));
#endif
if(bind(so, (struct sockaddr *)&addr, sizeof(addr))) {
endSocket();
error(errBindingFailed,(char *)"Could not bind socket",socket_errno);
return;
}
if(listen(so, backlog)) {
endSocket();
error(errBindingFailed,(char *)"Could not listen on socket",socket_errno);
return;
}
state = BOUND;
}
bool DCCPSocket::onAccept(const IPV6Host &ia, tpport_t port)
{
return true;
}
#endif
bool DCCPSocket::onAccept(const IPV4Host &ia, tpport_t port)
{
return true;
}
IPV4Host DCCPSocket::getIPV4Sender(tpport_t *port) const
{
if(port)
*port = ntohs(peer.ipv4.sin_port);
return IPV4Host(peer.ipv4.sin_addr);
}
#ifdef CCXX_IPV6
IPV6Host DCCPSocket::getIPV6Sender(tpport_t *port) const
{
return IPV6Host(peer.ipv6.sin6_addr);
}
#endif
DCCPSocket::~DCCPSocket()
{
endSocket();
}
void DCCPSocket::disconnect(void)
{
if(Socket::state != CONNECTED)
return;
endSocket();
so = socket(family, SOCK_DCCP, IPPROTO_DCCP);
if(so != INVALID_SOCKET)
Socket::state = AVAILABLE;
}
#ifdef HAVE_GETADDRINFO
void DCCPSocket::connect(const char *target)
{
char namebuf[128];
char *cp;
struct addrinfo hint, *list = NULL, *next, *first;
bool connected = false;
snprintf(namebuf, sizeof(namebuf), "%s", target);
cp = strrchr(namebuf, '/');
if(!cp)
cp = strrchr(namebuf, ':');
if(!cp) {
connectError();
return;
}
*(cp++) = 0;
memset(&hint, 0, sizeof(hint));
hint.ai_family = family;
hint.ai_socktype = SOCK_DCCP;
hint.ai_protocol = IPPROTO_DCCP;
if(getaddrinfo(namebuf, cp, &hint, &list) || !list) {
connectError();
return;
}
first = list;
while(list) {
if(!::connect(so, list->ai_addr, (socklen_t)list->ai_addrlen)) {
connected = true;
break;
}
next = list->ai_next;
list = next;
}
freeaddrinfo(first);
if(!connected) {
connectError();
return;
}
Socket::state = CONNECTED;
}
#else
void DCCPSocket::connect(const char *target)
{
char namebuf[128];
char *cp;
struct servent *svc;
tpport_t port;
snprintf(namebuf, sizeof(namebuf), "%s", target);
cp = strrchr(namebuf, '/');
if(!cp)
cp = strrchr(namebuf, ':');
if(!cp) {
connectError();
return;
}
*(cp++) = 0;
if(isdigit(*cp))
port = atoi(cp);
else {
mutex.enter();
svc = getservbyname(cp, "dccp");
if(svc)
port = ntohs(svc->s_port);
mutex.leave();
if(!svc) {
connectError();
return;
}
}
switch(family) {
case IPV4:
connect(IPV4Host(namebuf), port);
break;
#ifdef CCXX_IPV6
case IPV6:
connect(IPV6Host(namebuf), port);
break;
#endif
default:
connectError();
}
}
#endif
void DCCPSocket::connect(const IPV4Host &host, tpport_t port, timeout_t timeout)
{
size_t i;
fd_set fds;
struct timeval to;
bool connected = false;
int rtn;
int sockopt;
socklen_t len = sizeof(sockopt);
for(i = 0 ; i < host.getAddressCount(); i++) {
struct sockaddr_in addr;
memset(&addr, 0, sizeof(addr));
addr.sin_family = AF_INET;
addr.sin_addr = host.getAddress(i);
addr.sin_port = htons(port);
if(timeout)
setCompletion(false);
// Win32 will crash if you try to connect to INADDR_ANY.
if ( INADDR_ANY == addr.sin_addr.s_addr )
addr.sin_addr.s_addr = INADDR_LOOPBACK;
rtn = ::connect(so, (struct sockaddr *)&addr, (socklen_t)sizeof(addr));
if(!rtn) {
connected = true;
break;
}
#ifndef _MSWINDOWS_
if(errno == EINPROGRESS)
#else
if(WSAGetLastError() == WSAEINPROGRESS)
#endif
{
FD_ZERO(&fds);
FD_SET(so, &fds);
to.tv_sec = timeout / 1000;
to.tv_usec = timeout % 1000 * 1000;
// timeout check for connect completion
if(::select((int)so + 1, NULL, &fds, NULL, &to) < 1)
continue;
getsockopt(so, SOL_SOCKET, SO_ERROR, (char *)&sockopt, &len);
if(!sockopt) {
connected = true;
break;
}
endSocket();
so = socket(AF_INET, SOCK_DCCP, IPPROTO_DCCP);
if(so == INVALID_SOCKET)
break;
}
}
setCompletion(true);
if(!connected) {
rtn = errno;
errno = rtn;
connectError();
return;
}
Socket::state = CONNECTED;
}
#ifdef CCXX_IPV6
void DCCPSocket::connect(const IPV6Host &host, tpport_t port, timeout_t timeout)
{
size_t i;
fd_set fds;
struct timeval to;
bool connected = false;
int rtn;
int sockopt;
socklen_t len = sizeof(sockopt);
for(i = 0 ; i < host.getAddressCount(); i++) {
struct sockaddr_in6 addr;
memset(&addr, 0, sizeof(addr));
addr.sin6_family = AF_INET6;
addr.sin6_addr = host.getAddress(i);
addr.sin6_port = htons(port);
if(timeout)
setCompletion(false);
// Win32 will crash if you try to connect to INADDR_ANY.
if ( !memcmp(&addr.sin6_addr, &in6addr_any, sizeof(in6addr_any)))
memcpy(&addr.sin6_addr, &in6addr_loopback, sizeof(in6addr_loopback));
rtn = ::connect(so, (struct sockaddr *)&addr, (socklen_t)sizeof(addr));
if(!rtn) {
connected = true;
break;
}
#ifndef _MSWINDOWS_
if(errno == EINPROGRESS)
#else
if(WSAGetLastError() == WSAEINPROGRESS)
#endif
{
FD_ZERO(&fds);
FD_SET(so, &fds);
to.tv_sec = timeout / 1000;
to.tv_usec = timeout % 1000 * 1000;
// timeout check for connect completion
if(::select((int)so + 1, NULL, &fds, NULL, &to) < 1)
continue;
getsockopt(so, SOL_SOCKET, SO_ERROR, (char *)&sockopt, &len);
if(!sockopt) {
connected = true;
break;
}
endSocket();
so = socket(AF_INET6, SOCK_DCCP, IPPROTO_DCCP);
if(so == INVALID_SOCKET)
break;
}
}
setCompletion(true);
if(!connected) {
rtn = errno;
errno = rtn;
connectError();
return;
}
Socket::state = CONNECTED;
}
#endif
bool DCCPSocket::setCCID(uint8_t ccid)
{
uint8_t ccids[16]; /* for getting the available CCIDs, should be large enough */
socklen_t len = sizeof(ccids);
int ret;
bool ccid_supported = false;
/*
* Determine which CCIDs are available on the host
*/
ret = getsockopt(so, SOL_DCCP, DCCP_SOCKOPT_AVAILABLE_CCIDS, (char *)&ccids, &len);
if (ret < 0) {
error(errInput,(char *)"Can not determine available CCIDs",socket_errno);
return false;
}
for (unsigned i = 0; i < sizeof(ccids); i++) {
if (ccid == ccids[i]) {
ccid_supported = true;
break;
}
}
if (!ccid_supported) {
error(errInput,(char *)"CCID specified is not supported",socket_errno);
return false;
}
if (setsockopt(so, SOL_DCCP, DCCP_SOCKOPT_CCID, (char *)&ccid, sizeof (ccid)) < 0) {
error(errInput,(char *)"Can not set CCID",socket_errno);
return false;
}
return true;
}
int DCCPSocket::getTxCCID()
{
int ccid, ret;
socklen_t ccidlen;
ccidlen = sizeof(ccid);
ret = getsockopt(so, SOL_DCCP, DCCP_SOCKOPT_TX_CCID, (char *)&ccid, &ccidlen);
if (ret < 0) {
error(errInput,(char *)"Can not determine get current TX CCID value",socket_errno);
return -1;
}
return ccid;
}
int DCCPSocket::getRxCCID()
{
int ccid, ret;
socklen_t ccidlen;
ccidlen = sizeof(ccid);
ret = getsockopt(so, SOL_DCCP, DCCP_SOCKOPT_RX_CCID, (char *)&ccid, &ccidlen);
if (ret < 0) {
error(errInput,(char *)"Can not determine get current DX CCID value",socket_errno);
return -1;
}
return ccid;
}
size_t DCCPSocket::available()
{
size_t readsize;
#ifndef _MSWINDOWS_
if (ioctl (so, FIONREAD, &readsize) < 0) {
error(errInput,(char *)"Error on retrieve the FIONREAD option.",socket_errno);
}
#else
if (ioctlsocket(so, FIONREAD, (u_long *)&readsize)){
error(errInput,(char *)"Error on retrieve the FIONREAD option.",socket_errno);
}
#endif
return readsize;
}
ucommon-6.0.7/commoncpp/exception.cpp 0000644 0001750 0001750 00000007306 12163025062 014622 0000000 0000000 // Copyright (C) 1999-2005 Open Source Telecom Corporation.
// Copyright (C) 2006-2010 David Sugar, Tycho Softworks.
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
//
// As a special exception, you may use this file as part of a free software
// library without restriction. Specifically, if other files instantiate
// templates or use macros or inline functions from this file, or you compile
// this file and link it with other files to produce an executable, this
// file does not by itself cause the resulting executable to be covered by
// the GNU General Public License. This exception does not however
// invalidate any other reasons why the executable file might be covered by
// the GNU General Public License.
//
// This exception applies only to the code released under the name GNU
// Common C++. If you copy code from other releases into a copy of GNU
// Common C++, as the General Public License permits, the exception does
// not apply to the code that you add in this way. To avoid misleading
// anyone as to the status of such modified files, you must delete
// this exception notice from them.
//
// If you write modifications of your own for GNU Common C++, it is your choice
// whether to permit this exception to apply to your modifications.
// If you do not wish that, delete this exception notice.
//
#include
#ifndef _XOPEN_SOURCE
#define _XOPEN_SOURCE 600
#endif
#include
#include
#include
#include
#include
#if defined(CCXX_EXCEPTIONS)
using namespace COMMONCPP_NAMESPACE;
Exception::Exception(const String& what_arg) throw():
_what(what_arg)
{}
Exception::~Exception() throw()
{}
const char *Exception::what() const throw()
{
return _what.c_str();
}
const char *Exception::getString() const
{
return _what.c_str();
}
IOException::IOException(const String &what_arg, long systemError) throw() :
Exception(what_arg), _systemError(systemError),
_systemErrorString(NULL) {
}
IOException::~IOException() throw()
{
delete [] _systemErrorString;
}
long IOException::getSystemError() const throw()
{
return _systemError;
}
const char* IOException::getSystemErrorString() const throw()
{
const uint32_t errStrSize = 2048;
if ( !_systemErrorString )
_systemErrorString = new char[errStrSize];
#ifndef _MSWINDOWS_
#ifdef HAVE_STRERROR_R
#if ((_POSIX_C_SOURCE >= 200112L || _XOPEN_SOURCE >= 600) && !defined(_GNU_SOURCE) || !defined(APPLE))
assert(strerror_r(_systemError, _systemErrorString, errStrSize) == 0);
#else
_systemErrorString = strerror_r(_systemError, _systemErrorString, errStrSize);
#endif
#else
static Mutex mlock;
mlock.enter();
String::set(_systemErrorString, errStrSize, strerror(_systemError));
mlock.leave();
#endif
return _systemErrorString;
#else
FormatMessage( FORMAT_MESSAGE_FROM_SYSTEM, NULL, _systemError,
MAKELANGID(LANG_NEUTRAL,SUBLANG_DEFAULT),
_systemErrorString, errStrSize, NULL);
return _systemErrorString;
#endif
}
#endif
ucommon-6.0.7/commoncpp/tokenizer.cpp 0000644 0001750 0001750 00000011405 12163025062 014631 0000000 0000000 // Copyright (C) 1999-2005 Open Source Telecom Corporation.
// Copyright (C) 2006-2010 David Sugar, Tycho Softworks.
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
//
// As a special exception, you may use this file as part of a free software
// library without restriction. Specifically, if other files instantiate
// templates or use macros or inline functions from this file, or you compile
// this file and link it with other files to produce an executable, this
// file does not by itself cause the resulting executable to be covered by
// the GNU General Public License. This exception does not however
// invalidate any other reasons why the executable file might be covered by
// the GNU General Public License.
//
// This exception applies only to the code released under the name GNU
// Common C++. If you copy code from other releases into a copy of GNU
// Common C++, as the General Public License permits, the exception does
// not apply to the code that you add in this way. To avoid misleading
// anyone as to the status of such modified files, you must delete
// this exception notice from them.
//
// If you write modifications of your own for GNU Common C++, it is your choice
// whether to permit this exception to apply to your modifications.
// If you do not wish that, delete this exception notice.
//
#include
#include
#include
#include
#include
#include
#include
#include
#include
NAMESPACE_COMMONCPP
using namespace std;
// sorted by the usual probability of occurence
// see also: manpage of isspace()
const char * const StringTokenizer::SPACE=" \t\n\r\f\v";
StringTokenizer::StringTokenizer (const char *_str, const char *_delim, bool _skipAll, bool _trim) :
str(_str),delim(_delim),skipAll(_skipAll),trim(_trim)
{
if (str == 0)
itEnd = iterator(*this, 0);
else
itEnd = iterator(*this,strchr(str, '\0')+1);
}
StringTokenizer::StringTokenizer (const char *s) :
str(s), delim(SPACE), skipAll(false),trim(true)
{
if (str == 0)
itEnd = iterator(*this, 0);
else
itEnd = iterator(*this,strchr(str, '\0')+1);
}
StringTokenizer::iterator& StringTokenizer::iterator::operator ++ () THROWS (StringTokenizer::NoSuchElementException)
{
// someone requested to read beyond the end .. tsts
if (endp == myTok->itEnd.endp)
THROW (NoSuchElementException());
if (token) {
// this is to help people find their bugs, if they
// still maintain a pointer to this invalidated
// area :-)
*token = '\0';
delete[] token;
token = 0;
}
start = ++endp;
if (endp == myTok->itEnd.endp) return *this; // done
// search for next delimiter
while (*endp && strchr(myTok->delim, *endp)==NULL)
++endp;
tokEnd = endp;
if (*endp && myTok->skipAll) { // skip all delimiters
while (*(endp+1) && strchr(myTok->delim, *(endp+1)))
++endp;
}
return *this;
}
/*
* if no one requests the token, no time is spent skipping the whitespaces
* or allocating memory.
*/
const char * StringTokenizer::iterator::operator * () THROWS (StringTokenizer::NoSuchElementException)
{
// someone requested to read beyond the end .. tsts
if (endp == myTok->itEnd.endp)
THROW (NoSuchElementException());
if (!token) {
/*
* someone requests this token; return a copy to provide
* a NULL terminated string.
*/
/* don't clobber tokEnd, it is used in nextDelimiter() */
const char *wsTokEnd = tokEnd;
if (myTok->trim) {
while (wsTokEnd > start && strchr(SPACE, *start))
++start;
while (wsTokEnd > start && strchr(SPACE,*(wsTokEnd-1)))
--wsTokEnd;
}
size_t tokLen = wsTokEnd - start;
if (start > wsTokEnd) {
tokLen = 0;
}
token = newString(start, tokLen + 1);
}
return token;
}
END_NAMESPACE
/** EMACS **
* Local variables:
* mode: c++
* c-basic-offset: 4
* End:
*/
ucommon-6.0.7/commoncpp/linked.cpp 0000644 0001750 0001750 00000011421 12163025062 014063 0000000 0000000 // Copyright (C) 2004-2005 Open Source Telecom Corporation.
// Copyright (C) 2006-2010 David Sugar, Tycho Softworks.
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
//
// As a special exception, you may use this file as part of a free software
// library without restriction. Specifically, if other files instantiate
// templates or use macros or inline functions from this file, or you compile
// this file and link it with other files to produce an executable, this
// file does not by itself cause the resulting executable to be covered by
// the GNU General Public License. This exception does not however
// invalidate any other reasons why the executable file might be covered by
// the GNU General Public License.
//
// This exception applies only to the code released under the name GNU
// Common C++. If you copy code from other releases into a copy of GNU
// Common C++, as the General Public License permits, the exception does
// not apply to the code that you add in this way. To avoid misleading
// anyone as to the status of such modified files, you must delete
// this exception notice from them.
//
// If you write modifications of your own for GNU Common C++, it is your choice
// whether to permit this exception to apply to your modifications.
// If you do not wish that, delete this exception notice.
//
#include
#include
#include
#include
#include
using namespace COMMONCPP_NAMESPACE;
LinkedSingle::~LinkedSingle() {}
LinkedSingle *LinkedSingle::getFirst(void)
{
return this;
}
LinkedSingle *LinkedSingle::getLast(void)
{
LinkedSingle *obj = this;
while(obj->nextObject)
obj = obj->nextObject;
return obj;
}
void LinkedSingle::insert(LinkedSingle& obj)
{
obj.nextObject = nextObject;
nextObject = &obj;
}
LinkedSingle &LinkedSingle::operator+=(LinkedSingle &obj)
{
insert(obj);
return *this;
}
LinkedDouble::~LinkedDouble()
{
detach();
}
void LinkedDouble::enterLock() {}
void LinkedDouble::leaveLock() {}
LinkedDouble *LinkedDouble::firstObject()
{
LinkedDouble *node = this;
while(node->prevObject)
node = node->prevObject;
return node;
}
LinkedDouble *LinkedDouble::lastObject()
{
LinkedDouble *node = this;
while(node->nextObject)
node = node->nextObject;
return node;
}
LinkedDouble *LinkedDouble::getFirst(void)
{
LinkedDouble *node;
enterLock();
node = firstObject();
leaveLock();
return node;
}
LinkedDouble *LinkedDouble::getLast(void)
{
LinkedDouble *node;
enterLock();
node = lastObject();
leaveLock();
return node;
}
LinkedDouble *LinkedDouble::getInsert(void)
{
return getLast();
}
void LinkedDouble::insert(LinkedDouble& obj, InsertMode position)
{
LinkedDouble *node;
enterLock();
obj.detach();
switch ( position ) {
case modeAtFirst:
node = firstObject();
obj.nextObject = node;
node->prevObject = &obj;
break;
case modeBefore:
obj.nextObject = this;
obj.prevObject = this->prevObject;
this->prevObject = &obj;
if (obj.prevObject)
obj.prevObject->nextObject = &obj;
break;
case modeAfter:
obj.nextObject = this->nextObject;
obj.prevObject = this;
this->nextObject = &obj;
if (obj.nextObject)
obj.nextObject->prevObject = &obj;
break;
case modeAtLast:
default:
node = lastObject();
obj.nextObject = node->nextObject;
obj.prevObject = node;
node->nextObject = &obj;
if(obj.nextObject)
obj.nextObject->prevObject = &obj;
break;
}
leaveLock();
}
void LinkedDouble::detach(void)
{
enterLock();
if(prevObject)
prevObject->nextObject = nextObject;
if(nextObject)
nextObject->prevObject = prevObject;
prevObject = NULL;
nextObject = NULL;
leaveLock();
}
LinkedDouble &LinkedDouble::operator+=(LinkedDouble &obj)
{
insert(obj);
return *this;
}
LinkedDouble &LinkedDouble::operator--()
{
detach();
return *this;
}
ucommon-6.0.7/commoncpp/Makefile.am 0000644 0001750 0001750 00000001720 12163025062 014146 0000000 0000000 # Copyright (C) 2006-2010 David Sugar, Tycho Softworks.
#
# This file is free software; as a special exception the author gives
# unlimited permission to copy and/or distribute it, with or without
# modifications, as long as this notice is preserved.
#
# This program is distributed in the hope that it will be useful, but
# WITHOUT ANY WARRANTY, to the extent permitted by law; without even the
# implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
MAINTAINERCLEANFILES = Makefile.in Makefile
RELEASE = -version-info $(LT_VERSION)
AM_CXXFLAGS = -I$(top_srcdir)/inc $(UCOMMON_FLAGS)
LIBTOOL = @LT_GENERIC@
lib_LTLIBRARIES = libcommoncpp.la
libcommoncpp_la_LDFLAGS = ../corelib/libucommon.la @UCOMMON_LIBS@ $(RELEASE)
libcommoncpp_la_SOURCES = strchar.cpp slog.cpp exception.cpp thread.cpp \
address.cpp socket.cpp tcp.cpp udp.cpp dccp.cpp applog.cpp mime.cpp \
process.cpp serial.cpp tokenizer.cpp file.cpp dso.cpp linked.cpp \
pointer.cpp map.cpp
ucommon-6.0.7/commoncpp/strchar.cpp 0000644 0001750 0001750 00000006754 12163025062 014300 0000000 0000000 // Copyright (C) 1999-2005 Open Source Telecom Corporation.
// Copyright (C) 2006-2010 David Sugar, Tycho Softworks.
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
//
// As a special exception, you may use this file as part of a free software
// library without restriction. Specifically, if other files instantiate
// templates or use macros or inline functions from this file, or you compile
// this file and link it with other files to produce an executable, this
// file does not by itself cause the resulting executable to be covered by
// the GNU General Public License. This exception does not however
// invalidate any other reasons why the executable file might be covered by
// the GNU General Public License.
//
// This exception applies only to the code released under the name GNU
// Common C++. If you copy code from other releases into a copy of GNU
// Common C++, as the General Public License permits, the exception does
// not apply to the code that you add in this way. To avoid misleading
// anyone as to the status of such modified files, you must delete
// this exception notice from them.
//
// If you write modifications of your own for GNU Common C++, it is your choice
// whether to permit this exception to apply to your modifications.
// If you do not wish that, delete this exception notice.
//
#include
#include
#include
#include
#include
#include
NAMESPACE_COMMONCPP
char *newString(const char *src, size_t size)
{
char *dest;
if(!size)
size = strlen(src) + 1;
dest = new char[size];
return setString(dest, size, src);
}
void delString(char *str)
{
delete[] str;
}
char *setUpper(char *string, size_t size)
{
char *ret = string;
if(!size)
size = strlen(string);
while(size && *string) {
*string = toupper(*string);
++string;
--size;
}
return ret;
}
char *setLower(char *string, size_t size)
{
char *ret = string;
if(!size)
size = strlen(string);
while(size && *string) {
*string = tolower(*string);
++string;
--size;
}
return ret;
}
char *rsetField(char *dest, size_t size, const char *src, const char fill)
{
size_t len = 0;
if(src)
len = strlen(src);
if(len > size)
len = size;
if(len)
memmove(dest + size - len, (void *)src, len);
if(len < size && fill)
memset(dest, fill, size - len);
return dest;
}
char *lsetField(char *dest, size_t size, const char *src, const char fill)
{
size_t len = 0;
if(src)
len = strlen(src);
if(len > size)
len = size;
if(len)
memmove(dest, src, len);
if(len < size && fill)
memset(dest + len, fill, size - len);
return dest;
}
END_NAMESPACE
ucommon-6.0.7/commoncpp/Makefile.in 0000644 0001750 0001750 00000055357 12175171470 014206 0000000 0000000 # Makefile.in generated by automake 1.14 from Makefile.am.
# @configure_input@
# Copyright (C) 1994-2013 Free Software Foundation, Inc.
# This Makefile.in is free software; the Free Software Foundation
# gives unlimited permission to copy and/or distribute it,
# with or without modifications, as long as this notice is preserved.
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY, to the extent permitted by law; without
# even the implied warranty of MERCHANTABILITY or FITNESS FOR A
# PARTICULAR PURPOSE.
@SET_MAKE@
# Copyright (C) 2006-2010 David Sugar, Tycho Softworks.
#
# This file is free software; as a special exception the author gives
# unlimited permission to copy and/or distribute it, with or without
# modifications, as long as this notice is preserved.
#
# This program is distributed in the hope that it will be useful, but
# WITHOUT ANY WARRANTY, to the extent permitted by law; without even the
# implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
VPATH = @srcdir@
am__is_gnu_make = test -n '$(MAKEFILE_LIST)' && test -n '$(MAKELEVEL)'
am__make_running_with_option = \
case $${target_option-} in \
?) ;; \
*) echo "am__make_running_with_option: internal error: invalid" \
"target option '$${target_option-}' specified" >&2; \
exit 1;; \
esac; \
has_opt=no; \
sane_makeflags=$$MAKEFLAGS; \
if $(am__is_gnu_make); then \
sane_makeflags=$$MFLAGS; \
else \
case $$MAKEFLAGS in \
*\\[\ \ ]*) \
bs=\\; \
sane_makeflags=`printf '%s\n' "$$MAKEFLAGS" \
| sed "s/$$bs$$bs[$$bs $$bs ]*//g"`;; \
esac; \
fi; \
skip_next=no; \
strip_trailopt () \
{ \
flg=`printf '%s\n' "$$flg" | sed "s/$$1.*$$//"`; \
}; \
for flg in $$sane_makeflags; do \
test $$skip_next = yes && { skip_next=no; continue; }; \
case $$flg in \
*=*|--*) continue;; \
-*I) strip_trailopt 'I'; skip_next=yes;; \
-*I?*) strip_trailopt 'I';; \
-*O) strip_trailopt 'O'; skip_next=yes;; \
-*O?*) strip_trailopt 'O';; \
-*l) strip_trailopt 'l'; skip_next=yes;; \
-*l?*) strip_trailopt 'l';; \
-[dEDm]) skip_next=yes;; \
-[JT]) skip_next=yes;; \
esac; \
case $$flg in \
*$$target_option*) has_opt=yes; break;; \
esac; \
done; \
test $$has_opt = yes
am__make_dryrun = (target_option=n; $(am__make_running_with_option))
am__make_keepgoing = (target_option=k; $(am__make_running_with_option))
pkgdatadir = $(datadir)/@PACKAGE@
pkgincludedir = $(includedir)/@PACKAGE@
pkglibdir = $(libdir)/@PACKAGE@
pkglibexecdir = $(libexecdir)/@PACKAGE@
am__cd = CDPATH="$${ZSH_VERSION+.}$(PATH_SEPARATOR)" && cd
install_sh_DATA = $(install_sh) -c -m 644
install_sh_PROGRAM = $(install_sh) -c
install_sh_SCRIPT = $(install_sh) -c
INSTALL_HEADER = $(INSTALL_DATA)
transform = $(program_transform_name)
NORMAL_INSTALL = :
PRE_INSTALL = :
POST_INSTALL = :
NORMAL_UNINSTALL = :
PRE_UNINSTALL = :
POST_UNINSTALL = :
build_triplet = @build@
host_triplet = @host@
target_triplet = @target@
subdir = commoncpp
DIST_COMMON = $(srcdir)/Makefile.in $(srcdir)/Makefile.am \
$(top_srcdir)/autoconf/depcomp
ACLOCAL_M4 = $(top_srcdir)/aclocal.m4
am__aclocal_m4_deps = $(top_srcdir)/configure.ac
am__configure_deps = $(am__aclocal_m4_deps) $(CONFIGURE_DEPENDENCIES) \
$(ACLOCAL_M4)
mkinstalldirs = $(install_sh) -d
CONFIG_HEADER = $(top_builddir)/ucommon-config.h
CONFIG_CLEAN_FILES =
CONFIG_CLEAN_VPATH_FILES =
am__vpath_adj_setup = srcdirstrip=`echo "$(srcdir)" | sed 's|.|.|g'`;
am__vpath_adj = case $$p in \
$(srcdir)/*) f=`echo "$$p" | sed "s|^$$srcdirstrip/||"`;; \
*) f=$$p;; \
esac;
am__strip_dir = f=`echo $$p | sed -e 's|^.*/||'`;
am__install_max = 40
am__nobase_strip_setup = \
srcdirstrip=`echo "$(srcdir)" | sed 's/[].[^$$\\*|]/\\\\&/g'`
am__nobase_strip = \
for p in $$list; do echo "$$p"; done | sed -e "s|$$srcdirstrip/||"
am__nobase_list = $(am__nobase_strip_setup); \
for p in $$list; do echo "$$p $$p"; done | \
sed "s| $$srcdirstrip/| |;"' / .*\//!s/ .*/ ./; s,\( .*\)/[^/]*$$,\1,' | \
$(AWK) 'BEGIN { files["."] = "" } { files[$$2] = files[$$2] " " $$1; \
if (++n[$$2] == $(am__install_max)) \
{ print $$2, files[$$2]; n[$$2] = 0; files[$$2] = "" } } \
END { for (dir in files) print dir, files[dir] }'
am__base_list = \
sed '$$!N;$$!N;$$!N;$$!N;$$!N;$$!N;$$!N;s/\n/ /g' | \
sed '$$!N;$$!N;$$!N;$$!N;s/\n/ /g'
am__uninstall_files_from_dir = { \
test -z "$$files" \
|| { test ! -d "$$dir" && test ! -f "$$dir" && test ! -r "$$dir"; } \
|| { echo " ( cd '$$dir' && rm -f" $$files ")"; \
$(am__cd) "$$dir" && rm -f $$files; }; \
}
am__installdirs = "$(DESTDIR)$(libdir)"
LTLIBRARIES = $(lib_LTLIBRARIES)
libcommoncpp_la_LIBADD =
am_libcommoncpp_la_OBJECTS = strchar.lo slog.lo exception.lo thread.lo \
address.lo socket.lo tcp.lo udp.lo dccp.lo applog.lo mime.lo \
process.lo serial.lo tokenizer.lo file.lo dso.lo linked.lo \
pointer.lo map.lo
libcommoncpp_la_OBJECTS = $(am_libcommoncpp_la_OBJECTS)
AM_V_lt = $(am__v_lt_@AM_V@)
am__v_lt_ = $(am__v_lt_@AM_DEFAULT_V@)
am__v_lt_0 = --silent
am__v_lt_1 =
libcommoncpp_la_LINK = $(LIBTOOL) $(AM_V_lt) --tag=CXX \
$(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=link $(CXXLD) \
$(AM_CXXFLAGS) $(CXXFLAGS) $(libcommoncpp_la_LDFLAGS) \
$(LDFLAGS) -o $@
AM_V_P = $(am__v_P_@AM_V@)
am__v_P_ = $(am__v_P_@AM_DEFAULT_V@)
am__v_P_0 = false
am__v_P_1 = :
AM_V_GEN = $(am__v_GEN_@AM_V@)
am__v_GEN_ = $(am__v_GEN_@AM_DEFAULT_V@)
am__v_GEN_0 = @echo " GEN " $@;
am__v_GEN_1 =
AM_V_at = $(am__v_at_@AM_V@)
am__v_at_ = $(am__v_at_@AM_DEFAULT_V@)
am__v_at_0 = @
am__v_at_1 =
DEFAULT_INCLUDES = -I.@am__isrc@ -I$(top_builddir)
depcomp = $(SHELL) $(top_srcdir)/autoconf/depcomp
am__depfiles_maybe = depfiles
am__mv = mv -f
CXXCOMPILE = $(CXX) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) \
$(AM_CPPFLAGS) $(CPPFLAGS) $(AM_CXXFLAGS) $(CXXFLAGS)
LTCXXCOMPILE = $(LIBTOOL) $(AM_V_lt) --tag=CXX $(AM_LIBTOOLFLAGS) \
$(LIBTOOLFLAGS) --mode=compile $(CXX) $(DEFS) \
$(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) \
$(AM_CXXFLAGS) $(CXXFLAGS)
AM_V_CXX = $(am__v_CXX_@AM_V@)
am__v_CXX_ = $(am__v_CXX_@AM_DEFAULT_V@)
am__v_CXX_0 = @echo " CXX " $@;
am__v_CXX_1 =
CXXLD = $(CXX)
CXXLINK = $(LIBTOOL) $(AM_V_lt) --tag=CXX $(AM_LIBTOOLFLAGS) \
$(LIBTOOLFLAGS) --mode=link $(CXXLD) $(AM_CXXFLAGS) \
$(CXXFLAGS) $(AM_LDFLAGS) $(LDFLAGS) -o $@
AM_V_CXXLD = $(am__v_CXXLD_@AM_V@)
am__v_CXXLD_ = $(am__v_CXXLD_@AM_DEFAULT_V@)
am__v_CXXLD_0 = @echo " CXXLD " $@;
am__v_CXXLD_1 =
SOURCES = $(libcommoncpp_la_SOURCES)
DIST_SOURCES = $(libcommoncpp_la_SOURCES)
am__can_run_installinfo = \
case $$AM_UPDATE_INFO_DIR in \
n|no|NO) false;; \
*) (install-info --version) >/dev/null 2>&1;; \
esac
am__tagged_files = $(HEADERS) $(SOURCES) $(TAGS_FILES) $(LISP)
# Read a list of newline-separated strings from the standard input,
# and print each of them once, without duplicates. Input order is
# *not* preserved.
am__uniquify_input = $(AWK) '\
BEGIN { nonempty = 0; } \
{ items[$$0] = 1; nonempty = 1; } \
END { if (nonempty) { for (i in items) print i; }; } \
'
# Make sure the list of sources is unique. This is necessary because,
# e.g., the same source file might be shared among _SOURCES variables
# for different programs/libraries.
am__define_uniq_tagged_files = \
list='$(am__tagged_files)'; \
unique=`for i in $$list; do \
if test -f "$$i"; then echo $$i; else echo $(srcdir)/$$i; fi; \
done | $(am__uniquify_input)`
ETAGS = etags
CTAGS = ctags
DISTFILES = $(DIST_COMMON) $(DIST_SOURCES) $(TEXINFOS) $(EXTRA_DIST)
ACLOCAL = @ACLOCAL@
AMTAR = @AMTAR@
AM_DEFAULT_VERBOSITY = @AM_DEFAULT_VERBOSITY@
AR = @AR@
AS = @AS@
AUTOCONF = @AUTOCONF@
AUTOHEADER = @AUTOHEADER@
AUTOMAKE = @AUTOMAKE@
AWK = @AWK@
CC = @CC@
CCDEPMODE = @CCDEPMODE@
CFLAGS = @CFLAGS@
CHECKFLAGS = @CHECKFLAGS@
COMPAT = @COMPAT@
CPP = @CPP@
CPPFLAGS = @CPPFLAGS@
CXX = @CXX@
CXXCPP = @CXXCPP@
CXXDEPMODE = @CXXDEPMODE@
CXXFLAGS = @CXXFLAGS@
CYGPATH_W = @CYGPATH_W@
DEFS = @DEFS@
DEPDIR = @DEPDIR@
DLLTOOL = @DLLTOOL@
DOXYGEN = @DOXYGEN@
DSYMUTIL = @DSYMUTIL@
DUMPBIN = @DUMPBIN@
ECHO_C = @ECHO_C@
ECHO_N = @ECHO_N@
ECHO_T = @ECHO_T@
EGREP = @EGREP@
EXEEXT = @EXEEXT@
FGREP = @FGREP@
GNUTLS_CFLAGS = @GNUTLS_CFLAGS@
GNUTLS_LIBS = @GNUTLS_LIBS@
GREP = @GREP@
INSTALL = @INSTALL@
INSTALL_DATA = @INSTALL_DATA@
INSTALL_PROGRAM = @INSTALL_PROGRAM@
INSTALL_SCRIPT = @INSTALL_SCRIPT@
INSTALL_STRIP_PROGRAM = @INSTALL_STRIP_PROGRAM@
LD = @LD@
LDFLAGS = @LDFLAGS@
LIBOBJS = @LIBOBJS@
LIBS = @LIBS@
LIBTOOL = @LT_GENERIC@
LIPO = @LIPO@
LN_S = @LN_S@
LTLIBOBJS = @LTLIBOBJS@
LT_GENERIC = @LT_GENERIC@
LT_VERSION = @LT_VERSION@
MAKEINFO = @MAKEINFO@
MANIFEST_TOOL = @MANIFEST_TOOL@
MKDIR_P = @MKDIR_P@
NM = @NM@
NMEDIT = @NMEDIT@
OBJDUMP = @OBJDUMP@
OBJEXT = @OBJEXT@
OPENSSL_CFLAGS = @OPENSSL_CFLAGS@
OPENSSL_LIBS = @OPENSSL_LIBS@
OTOOL = @OTOOL@
OTOOL64 = @OTOOL64@
PACKAGE = @PACKAGE@
PACKAGE_BUGREPORT = @PACKAGE_BUGREPORT@
PACKAGE_NAME = @PACKAGE_NAME@
PACKAGE_STRING = @PACKAGE_STRING@
PACKAGE_TARNAME = @PACKAGE_TARNAME@
PACKAGE_URL = @PACKAGE_URL@
PACKAGE_VERSION = @PACKAGE_VERSION@
PATH_SEPARATOR = @PATH_SEPARATOR@
PKG_CONFIG = @PKG_CONFIG@
PKG_CONFIG_LIBDIR = @PKG_CONFIG_LIBDIR@
PKG_CONFIG_PATH = @PKG_CONFIG_PATH@
RANLIB = @RANLIB@
SECURE = @SECURE@
SECURE_LIBS = @SECURE_LIBS@
SECURE_LOCAL = @SECURE_LOCAL@
SED = @SED@
SET_MAKE = @SET_MAKE@
SHELL = @SHELL@
STRIP = @STRIP@
UCOMMON_CFGPATH = @UCOMMON_CFGPATH@
UCOMMON_CLINK = @UCOMMON_CLINK@
UCOMMON_FLAGS = @UCOMMON_FLAGS@
UCOMMON_INCLUDES = @UCOMMON_INCLUDES@
UCOMMON_LIBC = @UCOMMON_LIBC@
UCOMMON_LIBS = @UCOMMON_LIBS@
UCOMMON_LINKED = @UCOMMON_LINKED@
UCOMMON_LOCALE = @UCOMMON_LOCALE@
UCOMMON_MODEL = @UCOMMON_MODEL@
UCOMMON_PREFIX = @UCOMMON_PREFIX@
UCOMMON_VARPATH = @UCOMMON_VARPATH@
UCOMMON_VISIBILITY = @UCOMMON_VISIBILITY@
VERSION = @VERSION@
abs_builddir = @abs_builddir@
abs_srcdir = @abs_srcdir@
abs_top_builddir = @abs_top_builddir@
abs_top_srcdir = @abs_top_srcdir@
ac_ct_AR = @ac_ct_AR@
ac_ct_CC = @ac_ct_CC@
ac_ct_CXX = @ac_ct_CXX@
ac_ct_DUMPBIN = @ac_ct_DUMPBIN@
am__include = @am__include@
am__leading_dot = @am__leading_dot@
am__quote = @am__quote@
am__tar = @am__tar@
am__untar = @am__untar@
bindir = @bindir@
build = @build@
build_alias = @build_alias@
build_cpu = @build_cpu@
build_os = @build_os@
build_vendor = @build_vendor@
builddir = @builddir@
datadir = @datadir@
datarootdir = @datarootdir@
docdir = @docdir@
dvidir = @dvidir@
exec_prefix = @exec_prefix@
host = @host@
host_alias = @host_alias@
host_cpu = @host_cpu@
host_os = @host_os@
host_vendor = @host_vendor@
htmldir = @htmldir@
includedir = @includedir@
includes = @includes@
infodir = @infodir@
install_sh = @install_sh@
libdir = @libdir@
libexecdir = @libexecdir@
libs = @libs@
localedir = @localedir@
localstatedir = @localstatedir@
mandir = @mandir@
mkdir_p = @mkdir_p@
oldincludedir = @oldincludedir@
pdfdir = @pdfdir@
prefix = @prefix@
program_transform_name = @program_transform_name@
psdir = @psdir@
sbindir = @sbindir@
sharedstatedir = @sharedstatedir@
srcdir = @srcdir@
sysconfdir = @sysconfdir@
target = @target@
target_alias = @target_alias@
target_cpu = @target_cpu@
target_os = @target_os@
target_vendor = @target_vendor@
top_build_prefix = @top_build_prefix@
top_builddir = @top_builddir@
top_srcdir = @top_srcdir@
MAINTAINERCLEANFILES = Makefile.in Makefile
RELEASE = -version-info $(LT_VERSION)
AM_CXXFLAGS = -I$(top_srcdir)/inc $(UCOMMON_FLAGS)
lib_LTLIBRARIES = libcommoncpp.la
libcommoncpp_la_LDFLAGS = ../corelib/libucommon.la @UCOMMON_LIBS@ $(RELEASE)
libcommoncpp_la_SOURCES = strchar.cpp slog.cpp exception.cpp thread.cpp \
address.cpp socket.cpp tcp.cpp udp.cpp dccp.cpp applog.cpp mime.cpp \
process.cpp serial.cpp tokenizer.cpp file.cpp dso.cpp linked.cpp \
pointer.cpp map.cpp
all: all-am
.SUFFIXES:
.SUFFIXES: .cpp .lo .o .obj
$(srcdir)/Makefile.in: $(srcdir)/Makefile.am $(am__configure_deps)
@for dep in $?; do \
case '$(am__configure_deps)' in \
*$$dep*) \
( cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh ) \
&& { if test -f $@; then exit 0; else break; fi; }; \
exit 1;; \
esac; \
done; \
echo ' cd $(top_srcdir) && $(AUTOMAKE) --gnu commoncpp/Makefile'; \
$(am__cd) $(top_srcdir) && \
$(AUTOMAKE) --gnu commoncpp/Makefile
.PRECIOUS: Makefile
Makefile: $(srcdir)/Makefile.in $(top_builddir)/config.status
@case '$?' in \
*config.status*) \
cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh;; \
*) \
echo ' cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__depfiles_maybe)'; \
cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__depfiles_maybe);; \
esac;
$(top_builddir)/config.status: $(top_srcdir)/configure $(CONFIG_STATUS_DEPENDENCIES)
cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh
$(top_srcdir)/configure: $(am__configure_deps)
cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh
$(ACLOCAL_M4): $(am__aclocal_m4_deps)
cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh
$(am__aclocal_m4_deps):
install-libLTLIBRARIES: $(lib_LTLIBRARIES)
@$(NORMAL_INSTALL)
@list='$(lib_LTLIBRARIES)'; test -n "$(libdir)" || list=; \
list2=; for p in $$list; do \
if test -f $$p; then \
list2="$$list2 $$p"; \
else :; fi; \
done; \
test -z "$$list2" || { \
echo " $(MKDIR_P) '$(DESTDIR)$(libdir)'"; \
$(MKDIR_P) "$(DESTDIR)$(libdir)" || exit 1; \
echo " $(LIBTOOL) $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=install $(INSTALL) $(INSTALL_STRIP_FLAG) $$list2 '$(DESTDIR)$(libdir)'"; \
$(LIBTOOL) $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=install $(INSTALL) $(INSTALL_STRIP_FLAG) $$list2 "$(DESTDIR)$(libdir)"; \
}
uninstall-libLTLIBRARIES:
@$(NORMAL_UNINSTALL)
@list='$(lib_LTLIBRARIES)'; test -n "$(libdir)" || list=; \
for p in $$list; do \
$(am__strip_dir) \
echo " $(LIBTOOL) $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=uninstall rm -f '$(DESTDIR)$(libdir)/$$f'"; \
$(LIBTOOL) $(AM_LIBTOOLFLAGS) $(LIBTOOLFLAGS) --mode=uninstall rm -f "$(DESTDIR)$(libdir)/$$f"; \
done
clean-libLTLIBRARIES:
-test -z "$(lib_LTLIBRARIES)" || rm -f $(lib_LTLIBRARIES)
@list='$(lib_LTLIBRARIES)'; \
locs=`for p in $$list; do echo $$p; done | \
sed 's|^[^/]*$$|.|; s|/[^/]*$$||; s|$$|/so_locations|' | \
sort -u`; \
test -z "$$locs" || { \
echo rm -f $${locs}; \
rm -f $${locs}; \
}
libcommoncpp.la: $(libcommoncpp_la_OBJECTS) $(libcommoncpp_la_DEPENDENCIES) $(EXTRA_libcommoncpp_la_DEPENDENCIES)
$(AM_V_CXXLD)$(libcommoncpp_la_LINK) -rpath $(libdir) $(libcommoncpp_la_OBJECTS) $(libcommoncpp_la_LIBADD) $(LIBS)
mostlyclean-compile:
-rm -f *.$(OBJEXT)
distclean-compile:
-rm -f *.tab.c
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/address.Plo@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/applog.Plo@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/dccp.Plo@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/dso.Plo@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/exception.Plo@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/file.Plo@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/linked.Plo@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/map.Plo@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/mime.Plo@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/pointer.Plo@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/process.Plo@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/serial.Plo@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/slog.Plo@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/socket.Plo@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/strchar.Plo@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tcp.Plo@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/thread.Plo@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tokenizer.Plo@am__quote@
@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/udp.Plo@am__quote@
.cpp.o:
@am__fastdepCXX_TRUE@ $(AM_V_CXX)$(CXXCOMPILE) -MT $@ -MD -MP -MF $(DEPDIR)/$*.Tpo -c -o $@ $<
@am__fastdepCXX_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/$*.Tpo $(DEPDIR)/$*.Po
@AMDEP_TRUE@@am__fastdepCXX_FALSE@ $(AM_V_CXX)source='$<' object='$@' libtool=no @AMDEPBACKSLASH@
@AMDEP_TRUE@@am__fastdepCXX_FALSE@ DEPDIR=$(DEPDIR) $(CXXDEPMODE) $(depcomp) @AMDEPBACKSLASH@
@am__fastdepCXX_FALSE@ $(AM_V_CXX@am__nodep@)$(CXXCOMPILE) -c -o $@ $<
.cpp.obj:
@am__fastdepCXX_TRUE@ $(AM_V_CXX)$(CXXCOMPILE) -MT $@ -MD -MP -MF $(DEPDIR)/$*.Tpo -c -o $@ `$(CYGPATH_W) '$<'`
@am__fastdepCXX_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/$*.Tpo $(DEPDIR)/$*.Po
@AMDEP_TRUE@@am__fastdepCXX_FALSE@ $(AM_V_CXX)source='$<' object='$@' libtool=no @AMDEPBACKSLASH@
@AMDEP_TRUE@@am__fastdepCXX_FALSE@ DEPDIR=$(DEPDIR) $(CXXDEPMODE) $(depcomp) @AMDEPBACKSLASH@
@am__fastdepCXX_FALSE@ $(AM_V_CXX@am__nodep@)$(CXXCOMPILE) -c -o $@ `$(CYGPATH_W) '$<'`
.cpp.lo:
@am__fastdepCXX_TRUE@ $(AM_V_CXX)$(LTCXXCOMPILE) -MT $@ -MD -MP -MF $(DEPDIR)/$*.Tpo -c -o $@ $<
@am__fastdepCXX_TRUE@ $(AM_V_at)$(am__mv) $(DEPDIR)/$*.Tpo $(DEPDIR)/$*.Plo
@AMDEP_TRUE@@am__fastdepCXX_FALSE@ $(AM_V_CXX)source='$<' object='$@' libtool=yes @AMDEPBACKSLASH@
@AMDEP_TRUE@@am__fastdepCXX_FALSE@ DEPDIR=$(DEPDIR) $(CXXDEPMODE) $(depcomp) @AMDEPBACKSLASH@
@am__fastdepCXX_FALSE@ $(AM_V_CXX@am__nodep@)$(LTCXXCOMPILE) -c -o $@ $<
mostlyclean-libtool:
-rm -f *.lo
clean-libtool:
-rm -rf .libs _libs
ID: $(am__tagged_files)
$(am__define_uniq_tagged_files); mkid -fID $$unique
tags: tags-am
TAGS: tags
tags-am: $(TAGS_DEPENDENCIES) $(am__tagged_files)
set x; \
here=`pwd`; \
$(am__define_uniq_tagged_files); \
shift; \
if test -z "$(ETAGS_ARGS)$$*$$unique"; then :; else \
test -n "$$unique" || unique=$$empty_fix; \
if test $$# -gt 0; then \
$(ETAGS) $(ETAGSFLAGS) $(AM_ETAGSFLAGS) $(ETAGS_ARGS) \
"$$@" $$unique; \
else \
$(ETAGS) $(ETAGSFLAGS) $(AM_ETAGSFLAGS) $(ETAGS_ARGS) \
$$unique; \
fi; \
fi
ctags: ctags-am
CTAGS: ctags
ctags-am: $(TAGS_DEPENDENCIES) $(am__tagged_files)
$(am__define_uniq_tagged_files); \
test -z "$(CTAGS_ARGS)$$unique" \
|| $(CTAGS) $(CTAGSFLAGS) $(AM_CTAGSFLAGS) $(CTAGS_ARGS) \
$$unique
GTAGS:
here=`$(am__cd) $(top_builddir) && pwd` \
&& $(am__cd) $(top_srcdir) \
&& gtags -i $(GTAGS_ARGS) "$$here"
cscopelist: cscopelist-am
cscopelist-am: $(am__tagged_files)
list='$(am__tagged_files)'; \
case "$(srcdir)" in \
[\\/]* | ?:[\\/]*) sdir="$(srcdir)" ;; \
*) sdir=$(subdir)/$(srcdir) ;; \
esac; \
for i in $$list; do \
if test -f "$$i"; then \
echo "$(subdir)/$$i"; \
else \
echo "$$sdir/$$i"; \
fi; \
done >> $(top_builddir)/cscope.files
distclean-tags:
-rm -f TAGS ID GTAGS GRTAGS GSYMS GPATH tags
distdir: $(DISTFILES)
@srcdirstrip=`echo "$(srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \
topsrcdirstrip=`echo "$(top_srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \
list='$(DISTFILES)'; \
dist_files=`for file in $$list; do echo $$file; done | \
sed -e "s|^$$srcdirstrip/||;t" \
-e "s|^$$topsrcdirstrip/|$(top_builddir)/|;t"`; \
case $$dist_files in \
*/*) $(MKDIR_P) `echo "$$dist_files" | \
sed '/\//!d;s|^|$(distdir)/|;s,/[^/]*$$,,' | \
sort -u` ;; \
esac; \
for file in $$dist_files; do \
if test -f $$file || test -d $$file; then d=.; else d=$(srcdir); fi; \
if test -d $$d/$$file; then \
dir=`echo "/$$file" | sed -e 's,/[^/]*$$,,'`; \
if test -d "$(distdir)/$$file"; then \
find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \
fi; \
if test -d $(srcdir)/$$file && test $$d != $(srcdir); then \
cp -fpR $(srcdir)/$$file "$(distdir)$$dir" || exit 1; \
find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \
fi; \
cp -fpR $$d/$$file "$(distdir)$$dir" || exit 1; \
else \
test -f "$(distdir)/$$file" \
|| cp -p $$d/$$file "$(distdir)/$$file" \
|| exit 1; \
fi; \
done
check-am: all-am
check: check-am
all-am: Makefile $(LTLIBRARIES)
installdirs:
for dir in "$(DESTDIR)$(libdir)"; do \
test -z "$$dir" || $(MKDIR_P) "$$dir"; \
done
install: install-am
install-exec: install-exec-am
install-data: install-data-am
uninstall: uninstall-am
install-am: all-am
@$(MAKE) $(AM_MAKEFLAGS) install-exec-am install-data-am
installcheck: installcheck-am
install-strip:
if test -z '$(STRIP)'; then \
$(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \
install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \
install; \
else \
$(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \
install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \
"INSTALL_PROGRAM_ENV=STRIPPROG='$(STRIP)'" install; \
fi
mostlyclean-generic:
clean-generic:
distclean-generic:
-test -z "$(CONFIG_CLEAN_FILES)" || rm -f $(CONFIG_CLEAN_FILES)
-test . = "$(srcdir)" || test -z "$(CONFIG_CLEAN_VPATH_FILES)" || rm -f $(CONFIG_CLEAN_VPATH_FILES)
maintainer-clean-generic:
@echo "This command is intended for maintainers to use"
@echo "it deletes files that may require special tools to rebuild."
-test -z "$(MAINTAINERCLEANFILES)" || rm -f $(MAINTAINERCLEANFILES)
clean: clean-am
clean-am: clean-generic clean-libLTLIBRARIES clean-libtool \
mostlyclean-am
distclean: distclean-am
-rm -rf ./$(DEPDIR)
-rm -f Makefile
distclean-am: clean-am distclean-compile distclean-generic \
distclean-tags
dvi: dvi-am
dvi-am:
html: html-am
html-am:
info: info-am
info-am:
install-data-am:
install-dvi: install-dvi-am
install-dvi-am:
install-exec-am: install-libLTLIBRARIES
install-html: install-html-am
install-html-am:
install-info: install-info-am
install-info-am:
install-man:
install-pdf: install-pdf-am
install-pdf-am:
install-ps: install-ps-am
install-ps-am:
installcheck-am:
maintainer-clean: maintainer-clean-am
-rm -rf ./$(DEPDIR)
-rm -f Makefile
maintainer-clean-am: distclean-am maintainer-clean-generic
mostlyclean: mostlyclean-am
mostlyclean-am: mostlyclean-compile mostlyclean-generic \
mostlyclean-libtool
pdf: pdf-am
pdf-am:
ps: ps-am
ps-am:
uninstall-am: uninstall-libLTLIBRARIES
.MAKE: install-am install-strip
.PHONY: CTAGS GTAGS TAGS all all-am check check-am clean clean-generic \
clean-libLTLIBRARIES clean-libtool cscopelist-am ctags \
ctags-am distclean distclean-compile distclean-generic \
distclean-libtool distclean-tags distdir dvi dvi-am html \
html-am info info-am install install-am install-data \
install-data-am install-dvi install-dvi-am install-exec \
install-exec-am install-html install-html-am install-info \
install-info-am install-libLTLIBRARIES install-man install-pdf \
install-pdf-am install-ps install-ps-am install-strip \
installcheck installcheck-am installdirs maintainer-clean \
maintainer-clean-generic mostlyclean mostlyclean-compile \
mostlyclean-generic mostlyclean-libtool pdf pdf-am ps ps-am \
tags tags-am uninstall uninstall-am uninstall-libLTLIBRARIES
# Tell versions [3.59,3.63) of GNU make to not export all variables.
# Otherwise a system limit (for SysV at least) may be exceeded.
.NOEXPORT:
ucommon-6.0.7/commoncpp/tcp.cpp 0000644 0001750 0001750 00000073167 12163025062 013422 0000000 0000000 // Copyright (C) 1999-2005 Open Source Telecom Corporation.
// Copyright (C) 2006-2010 David Sugar, Tycho Softworks.
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
//
// As a special exception, you may use this file as part of a free software
// library without restriction. Specifically, if other files instantiate
// templates or use macros or inline functions from this file, or you compile
// this file and link it with other files to produce an executable, this
// file does not by itself cause the resulting executable to be covered by
// the GNU General Public License. This exception does not however
// invalidate any other reasons why the executable file might be covered by
// the GNU General Public License.
//
// This exception applies only to the code released under the name GNU
// Common C++. If you copy code from other releases into a copy of GNU
// Common C++, as the General Public License permits, the exception does
// not apply to the code that you add in this way. To avoid misleading
// anyone as to the status of such modified files, you must delete
// this exception notice from them.
//
// If you write modifications of your own for GNU Common C++, it is your choice
// whether to permit this exception to apply to your modifications.
// If you do not wish that, delete this exception notice.
//
#include
#include
#include
#include
#include
#include
#include
#ifdef _MSWINDOWS_
#include
#define _IOLEN64 (unsigned)
#define _IORET64 (int)
typedef int socklen_t;
#define socket_errno WSAGetLastError()
#else
#include
#include
#ifdef HAVE_NET_IP6_H
#include
#endif
#define socket_errno errno
# ifndef O_NONBLOCK
# define O_NONBLOCK O_NDELAY
# endif
# ifdef IPPROTO_IP
# ifndef SOL_IP
# define SOL_IP IPPROTO_IP
# endif // !SOL_IP
# endif // IPPROTO_IP
#endif // !WIN32
#ifndef INADDR_LOOPBACK
#define INADDR_LOOPBACK (unsigned long)0x7f000001
#endif
#ifdef HAVE_NETINET_IN_H
#include
#endif
#if defined(__hpux)
#define _XOPEN_SOURCE_EXTENDED
#endif
#ifdef HAVE_NET_IF_H
#include
#endif
#ifndef _IOLEN64
#define _IOLEN64
#endif
#ifndef _IORET64
#define _IORET64
#endif
using namespace COMMONCPP_NAMESPACE;
using namespace std;
void TCPSocket::setSegmentSize(unsigned mss)
{
#ifdef TCP_MAXSEG
if(mss > 1)
setsockopt(so, IPPROTO_TCP, TCP_MAXSEG, (char *)&mss, sizeof(mss));
#endif
segsize = mss;
}
#ifdef HAVE_GETADDRINFO
TCPSocket::TCPSocket(const char *name, unsigned backlog, unsigned mss) :
Socket(AF_INET, SOCK_STREAM, IPPROTO_TCP)
{
char namebuf[128], *cp;
struct addrinfo hint, *list = NULL, *first;
snprintf(namebuf, sizeof(namebuf), "%s", name);
cp = strrchr(namebuf, '/');
if(!cp)
cp = strrchr(namebuf, ':');
if(!cp) {
cp = namebuf;
name = NULL;
}
else {
name = namebuf;
*(cp++) = 0;
if(!strcmp(name, "*"))
name = NULL;
}
memset(&hint, 0, sizeof(hint));
hint.ai_family = AF_INET;
hint.ai_socktype = SOCK_STREAM;
hint.ai_protocol = IPPROTO_TCP;
hint.ai_flags = AI_PASSIVE;
if(getaddrinfo(name, cp, &hint, &list) || !list) {
endSocket();
error(errBindingFailed, (char *)"Could not find service", errno);
return;
}
#if defined(SO_REUSEADDR)
int opt = 1;
setsockopt(so, SOL_SOCKET, SO_REUSEADDR, (char *)&opt,
(socklen_t)sizeof(opt));
#endif
first = list;
while(list) {
if(!bind(so, list->ai_addr, (socklen_t)list->ai_addrlen)) {
state = BOUND;
break;
}
list = list->ai_next;
}
freeaddrinfo(first);
if(state != BOUND) {
endSocket();
error(errBindingFailed,(char *)"Could not bind socket",socket_errno);
return;
}
setSegmentSize(mss);
if(listen(so, backlog)) {
endSocket();
error(errBindingFailed,(char *)"Could not listen on socket",socket_errno);
return;
}
}
#else
TCPSocket::TCPSocket(const char *name, unsigned backlog, unsigned mss) :
Socket(AF_INET, SOCK_STREAM, IPPROTO_TCP)
{
char namebuf[128], *cp;
struct sockaddr_in addr;
struct servent *svc;
memset(&addr, 0, sizeof(addr));
snprintf(namebuf, sizeof(namebuf), "%s", name);
cp = strrchr(namebuf, '/');
if(!cp)
cp = strrchr(namebuf, ':');
if(!cp) {
cp = namebuf;
name = "*";
}
else {
name = namebuf;
*(cp++) = 0;
}
addr.sin_family = AF_INET;
if(isdigit(*cp))
addr.sin_port = htons(atoi(cp));
else {
mutex.enter();
svc = getservbyname(cp, "tcp");
if(svc)
addr.sin_port = svc->s_port;
mutex.leave();
if(!svc) {
endSocket();
error(errBindingFailed, "Could not find service", errno);
return;
}
}
IPV4Address ia(name);
addr.sin_addr = getaddress(ia);
#if defined(SO_REUSEADDR)
int opt = 1;
setsockopt(so, SOL_SOCKET, SO_REUSEADDR, (char *)&opt,
(socklen_t)sizeof(opt));
#endif
if(bind(so, (struct sockaddr *)&addr, sizeof(addr))) {
endSocket();
error(errBindingFailed,(char *)"Could not bind socket",socket_errno);
return;
}
setSegmentSize(mss);
if(listen(so, backlog)) {
endSocket();
error(errBindingFailed,(char *)"Could not listen on socket",
socket_errno);
return;
}
state = BOUND;
}
#endif
TCPSocket::TCPSocket(const IPV4Address &ia, tpport_t port, unsigned backlog, unsigned mss) :
Socket(AF_INET, SOCK_STREAM, IPPROTO_TCP)
{
struct sockaddr_in addr;
memset(&addr, 0, sizeof(addr));
addr.sin_family = AF_INET;
addr.sin_addr = getaddress(ia);
addr.sin_port = htons(port);
#if defined(SO_REUSEADDR)
int opt = 1;
setsockopt(so, SOL_SOCKET, SO_REUSEADDR, (char *)&opt, (socklen_t)sizeof(opt));
#endif
if(bind(so, (struct sockaddr *)&addr, sizeof(addr))) {
endSocket();
error(errBindingFailed,(char *)"Could not bind socket",socket_errno);
return;
}
setSegmentSize(mss);
if(listen(so, backlog)) {
endSocket();
error(errBindingFailed,(char *)"Could not listen on socket",socket_errno);
return;
}
state = BOUND;
}
bool TCPSocket::onAccept(const IPV4Host &ia, tpport_t port)
{
return true;
}
TCPSocket::~TCPSocket()
{
endSocket();
}
#ifdef CCXX_IPV6
void TCPV6Socket::setSegmentSize(unsigned mss)
{
#ifdef TCP_MAXSEG
if(mss > 1)
setsockopt(so, IPPROTO_TCP, TCP_MAXSEG, (char *)&mss, sizeof(mss));
#endif
segsize = mss;
}
TCPV6Socket::TCPV6Socket(const char *name, unsigned backlog, unsigned mss) :
Socket(AF_INET6, SOCK_STREAM, IPPROTO_TCP)
{
char namebuf[128], *cp;
struct addrinfo hint, *list = NULL, *first;
snprintf(namebuf, sizeof(namebuf), "%s", name);
cp = strrchr(namebuf, '/');
if(!cp) {
cp = namebuf;
name = NULL;
}
else {
name = namebuf;
*(cp++) = 0;
if(!strcmp(name, "*"))
name = NULL;
}
memset(&hint, 0, sizeof(hint));
hint.ai_family = AF_INET6;
hint.ai_socktype = SOCK_STREAM;
hint.ai_protocol = IPPROTO_TCP;
hint.ai_flags = AI_PASSIVE;
if(getaddrinfo(name, cp, &hint, &list) || !list) {
endSocket();
error(errBindingFailed, (char *)"Could not find service", errno);
return;
}
#if defined(SO_REUSEADDR)
int opt = 1;
setsockopt(so, SOL_SOCKET, SO_REUSEADDR, (char *)&opt,
(socklen_t)sizeof(opt));
#endif
first = list;
while(list) {
if(!bind(so, list->ai_addr, (socklen_t)list->ai_addrlen)) {
state = BOUND;
break;
}
list = list->ai_next;
}
freeaddrinfo(first);
if(state != BOUND) {
endSocket();
error(errBindingFailed,(char *)"Could not bind socket",socket_errno);
return;
}
setSegmentSize(mss);
if(listen(so, backlog)) {
endSocket();
error(errBindingFailed,(char *)"Could not listen on socket",socket_errno);
return;
}
}
TCPV6Socket::TCPV6Socket(const IPV6Address &ia, tpport_t port, unsigned backlog, unsigned mss) :
Socket(AF_INET6, SOCK_STREAM, IPPROTO_TCP)
{
struct sockaddr_in6 addr;
memset(&addr, 0, sizeof(addr));
addr.sin6_family = AF_INET6;
addr.sin6_addr = getaddress(ia);
addr.sin6_port = htons(port);
#if defined(SO_REUSEADDR)
int opt = 1;
setsockopt(so, SOL_SOCKET, SO_REUSEADDR, (char *)&opt, (socklen_t)sizeof(opt));
#endif
if(bind(so, (struct sockaddr *)&addr, sizeof(addr))) {
endSocket();
error(errBindingFailed,(char *)"Could not bind socket",socket_errno);
return;
}
setSegmentSize(mss);
if(listen(so, backlog)) {
endSocket();
error(errBindingFailed,(char *)"Could not listen on socket",socket_errno);
return;
}
state = BOUND;
}
bool TCPV6Socket::onAccept(const IPV6Host &ia, tpport_t port)
{
return true;
}
TCPV6Socket::~TCPV6Socket()
{
endSocket();
}
#endif
void TCPSocket::reject(void)
{
SOCKET rej = accept(so, NULL, NULL);
::shutdown(rej, 2);
release(rej);
}
#ifdef CCXX_IPV6
void TCPV6Socket::reject(void)
{
SOCKET rej = accept(so, NULL, NULL);
::shutdown(rej, 2);
release(rej);
}
#endif
TCPStream::TCPStream(TCPSocket &server, bool throwflag, timeout_t to) :
streambuf(), Socket(accept(server.getSocket(), NULL, NULL)),
#ifdef OLD_IOSTREAM
iostream()
#else
iostream((streambuf *)this)
#endif
,bufsize(0)
,gbuf(NULL)
,pbuf(NULL) {
tpport_t port;
family = IPV4;
#ifdef OLD_IOSTREAM
init((streambuf *)this);
#endif
timeout = to;
setError(throwflag);
IPV4Host host = getPeer(&port);
if(!server.onAccept(host, port)) {
endSocket();
error(errConnectRejected);
iostream::clear(ios::failbit | rdstate());
return;
}
segmentBuffering(server.getSegmentSize());
Socket::state = CONNECTED;
}
#ifdef CCXX_IPV6
TCPStream::TCPStream(TCPV6Socket &server, bool throwflag, timeout_t to) :
streambuf(), Socket(accept(server.getSocket(), NULL, NULL)),
#ifdef OLD_IOSTREAM
iostream()
#else
iostream((streambuf *)this)
#endif
,bufsize(0)
,gbuf(NULL)
,pbuf(NULL) {
tpport_t port;
family = IPV6;
#ifdef OLD_IOSTREAM
init((streambuf *)this);
#endif
timeout = to;
setError(throwflag);
IPV6Host host = getIPV6Peer(&port);
if(!server.onAccept(host, port)) {
endSocket();
error(errConnectRejected);
iostream::clear(ios::failbit | rdstate());
return;
}
segmentBuffering(server.getSegmentSize());
Socket::state = CONNECTED;
}
#endif
TCPStream::TCPStream(const IPV4Host &host, tpport_t port, unsigned size, bool throwflag, timeout_t to) :
streambuf(), Socket(AF_INET, SOCK_STREAM, IPPROTO_TCP),
#ifdef OLD_IOSTREAM
iostream(),
#else
iostream((streambuf *)this),
#endif
bufsize(0),gbuf(NULL),pbuf(NULL) {
#ifdef OLD_IOSTREAM
init((streambuf *)this);
#endif
family = IPV4;
timeout = to;
setError(throwflag);
connect(host, port, size);
}
#ifdef CCXX_IPV6
TCPStream::TCPStream(const IPV6Host &host, tpport_t port, unsigned size, bool throwflag, timeout_t to) :
streambuf(), Socket(AF_INET6, SOCK_STREAM, IPPROTO_TCP),
#ifdef OLD_IOSTREAM
iostream(),
#else
iostream((streambuf *)this),
#endif
bufsize(0),gbuf(NULL),pbuf(NULL) {
family = IPV6;
#ifdef OLD_IOSTREAM
init((streambuf *)this);
#endif
timeout = to;
setError(throwflag);
connect(host, port, size);
}
#endif
TCPStream::~TCPStream()
{
#ifdef CCXX_EXCEPTIONS
try { endStream(); }
catch( ... ) { if ( ! std::uncaught_exception()) throw;};
#else
endStream();
#endif
}
#ifdef HAVE_GETADDRINFO
void TCPStream::connect(const char *target, unsigned mss)
{
char namebuf[128];
char *cp;
struct addrinfo hint, *list = NULL, *next, *first;
bool connected = false;
snprintf(namebuf, sizeof(namebuf), "%s", target);
cp = strrchr(namebuf, '/');
if(!cp)
cp = strrchr(namebuf, ':');
if(!cp) {
endStream();
connectError();
return;
}
*(cp++) = 0;
memset(&hint, 0, sizeof(hint));
hint.ai_family = family;
hint.ai_socktype = SOCK_STREAM;
hint.ai_protocol = IPPROTO_TCP;
if(getaddrinfo(namebuf, cp, &hint, &list) || !list) {
endStream();
connectError();
return;
}
first = list;
#ifdef TCP_MAXSEG
if(mss)
setsockopt(so, IPPROTO_TCP, TCP_MAXSEG, (char *)&mss, sizeof(mss));
#endif
while(list) {
if(!::connect(so, list->ai_addr, (socklen_t)list->ai_addrlen)) {
connected = true;
break;
}
next = list->ai_next;
list = next;
}
freeaddrinfo(first);
if(!connected) {
endStream();
connectError();
return;
}
segmentBuffering(mss);
Socket::state = CONNECTED;
}
#else
void TCPStream::connect(const char *target, unsigned mss)
{
char namebuf[128];
char *cp;
struct servent *svc;
tpport_t port;
snprintf(namebuf, sizeof(namebuf), "%s", target);
cp = strrchr(namebuf, '/');
if(!cp)
cp = strrchr(namebuf, ':');
if(!cp) {
endStream();
connectError();
return;
}
*(cp++) = 0;
if(isdigit(*cp))
port = atoi(cp);
else {
mutex.enter();
svc = getservbyname(cp, "tcp");
if(svc)
port = ntohs(svc->s_port);
mutex.leave();
if(!svc) {
endStream();
connectError();
return;
}
}
switch(family) {
case IPV4:
connect(IPV4Host(namebuf), port, mss);
break;
#ifdef CCXX_IPV6
case IPV6:
connect(IPV6Host(namebuf), port, mss);
break;
#endif
default:
endStream();
connectError();
}
}
#endif
void TCPStream::connect(const IPV4Host &host, tpport_t port, unsigned mss)
{
size_t i;
fd_set fds;
struct timeval to;
bool connected = false;
int rtn;
int sockopt;
socklen_t len = sizeof(sockopt);
#ifdef TCP_MAXSEG
if(mss)
setsockopt(so, IPPROTO_TCP, TCP_MAXSEG, (char *)&mss, sizeof(mss));
#endif
for(i = 0 ; i < host.getAddressCount(); i++) {
struct sockaddr_in addr;
memset(&addr, 0, sizeof(addr));
addr.sin_family = AF_INET;
addr.sin_addr = host.getAddress(i);
addr.sin_port = htons(port);
if(timeout)
setCompletion(false);
// Win32 will crash if you try to connect to INADDR_ANY.
if ( INADDR_ANY == addr.sin_addr.s_addr )
addr.sin_addr.s_addr = INADDR_LOOPBACK;
rtn = ::connect(so, (struct sockaddr *)&addr, (socklen_t)sizeof(addr));
if(!rtn) {
connected = true;
break;
}
#ifndef _MSWINDOWS_
if(errno == EINPROGRESS)
#else
if(WSAGetLastError() == WSAEINPROGRESS)
#endif
{
FD_ZERO(&fds);
FD_SET(so, &fds);
to.tv_sec = timeout / 1000;
to.tv_usec = timeout % 1000 * 1000;
// timeout check for connect completion
if(::select((int)so + 1, NULL, &fds, NULL, &to) < 1)
continue;
getsockopt(so, SOL_SOCKET, SO_ERROR, (char *)&sockopt, &len);
if(!sockopt) {
connected = true;
break;
}
endSocket();
so = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);
if(so == INVALID_SOCKET)
break;
}
}
setCompletion(true);
if(!connected) {
rtn = errno;
endStream();
errno = rtn;
connectError();
return;
}
segmentBuffering(mss);
Socket::state = CONNECTED;
}
#ifdef CCXX_IPV6
void TCPStream::connect(const IPV6Host &host, tpport_t port, unsigned mss)
{
size_t i;
fd_set fds;
struct timeval to;
bool connected = false;
int rtn;
int sockopt;
socklen_t len = sizeof(sockopt);
#ifdef TCP_MAXSEG
if(mss)
setsockopt(so, IPPROTO_TCP, TCP_MAXSEG, (char *)&mss, sizeof(mss));
#endif
for(i = 0 ; i < host.getAddressCount(); i++) {
struct sockaddr_in6 addr;
memset(&addr, 0, sizeof(addr));
addr.sin6_family = AF_INET6;
addr.sin6_addr = host.getAddress(i);
addr.sin6_port = htons(port);
if(timeout)
setCompletion(false);
// Win32 will crash if you try to connect to INADDR_ANY.
if ( !memcmp(&addr.sin6_addr, &in6addr_any, sizeof(in6addr_any)))
memcpy(&addr.sin6_addr, &in6addr_loopback, sizeof(in6addr_loopback));
rtn = ::connect(so, (struct sockaddr *)&addr, (socklen_t)sizeof(addr));
if(!rtn) {
connected = true;
break;
}
#ifndef _MSWINDOWS_
if(errno == EINPROGRESS)
#else
if(WSAGetLastError() == WSAEINPROGRESS)
#endif
{
FD_ZERO(&fds);
FD_SET(so, &fds);
to.tv_sec = timeout / 1000;
to.tv_usec = timeout % 1000 * 1000;
// timeout check for connect completion
if(::select((int)so + 1, NULL, &fds, NULL, &to) < 1)
continue;
getsockopt(so, SOL_SOCKET, SO_ERROR, (char *)&sockopt, &len);
if(!sockopt) {
connected = true;
break;
}
endSocket();
so = socket(AF_INET6, SOCK_STREAM, IPPROTO_TCP);
if(so == INVALID_SOCKET)
break;
}
}
setCompletion(true);
if(!connected) {
rtn = errno;
endStream();
errno = rtn;
connectError();
return;
}
segmentBuffering(mss);
Socket::state = CONNECTED;
}
#endif
TCPStream::TCPStream(const char *target, Family fam, unsigned mss, bool throwflag, timeout_t to) :
streambuf(), Socket(PF_INET, SOCK_STREAM, IPPROTO_TCP),
#ifdef OLD_IOSTREAM
iostream(),
#else
iostream((streambuf *)this),
#endif
timeout(to), bufsize(0),gbuf(NULL),pbuf(NULL)
{
family = fam;
#ifdef OLD_IOSTREAM
init((streambuf *)this);
#endif
setError(throwflag);
connect(target, mss);
}
TCPStream::TCPStream(Family fam, bool throwflag, timeout_t to) :
streambuf(), Socket(PF_INET, SOCK_STREAM, IPPROTO_TCP),
#ifdef OLD_IOSTREAM
iostream(),
#else
iostream((streambuf *)this),
#endif
timeout(to), bufsize(0),gbuf(NULL),pbuf(NULL)
{
family = fam;
#ifdef OLD_IOSTREAM
init((streambuf *)this);
#endif
setError(throwflag);
}
void TCPStream::connect(TCPSocket &tcpip)
{
tpport_t port;
endStream();
family = IPV4;
so = accept(tcpip.getSocket(), NULL, NULL);
if(so == INVALID_SOCKET)
return;
IPV4Host host = getPeer(&port);
if(!tcpip.onAccept(host, port)) {
endSocket();
iostream::clear(ios::failbit | rdstate());
return;
}
segmentBuffering(tcpip.getSegmentSize());
Socket::state = CONNECTED;
}
#ifdef CCXX_IPV6
void TCPStream::connect(TCPV6Socket &tcpip)
{
tpport_t port;
endStream();
family = IPV6;
so = accept(tcpip.getSocket(), NULL, NULL);
if(so == INVALID_SOCKET)
return;
IPV6Host host = getIPV6Peer(&port);
if(!tcpip.onAccept(host, port)) {
endSocket();
iostream::clear(ios::failbit | rdstate());
return;
}
segmentBuffering(tcpip.getSegmentSize());
Socket::state = CONNECTED;
}
#endif
void TCPStream::segmentBuffering(unsigned mss)
{
unsigned max = 0;
if(mss == 1) { // special interactive
allocate(1);
return;
}
#ifdef TCP_MAXSEG
socklen_t alen = sizeof(max);
if(mss)
setsockopt(so, IPPROTO_TCP, TCP_MAXSEG, (char *)&max, sizeof(max));
getsockopt(so, IPPROTO_TCP, TCP_MAXSEG, (char *)&max, &alen);
#endif
if(max && max < mss)
mss = max;
if(!mss) {
if(max)
mss = max;
else
mss = 536;
allocate(mss);
return;
}
#ifdef TCP_MAXSEG
setsockopt(so, IPPROTO_TCP, TCP_MAXSEG, (char *)&mss, sizeof(mss));
#endif
if(mss < 80)
mss = 80;
if(mss * 7 < 64000)
bufferSize(mss * 7);
else if(mss * 6 < 64000)
bufferSize(mss * 6);
else
bufferSize(mss * 5);
if(mss < 512)
sendLimit(mss * 4);
allocate(mss);
}
int TCPStream::getSegmentSize(void)
{
unsigned mss = 0;
#ifdef TCP_MAXSEG
socklen_t alen = sizeof(mss);
getsockopt(so, IPPROTO_TCP, TCP_MAXSEG, (char *)&mss, &alen);
#endif
if(!mss)
return (int)bufsize;
return mss;
}
void TCPStream::disconnect(void)
{
if(Socket::state == AVAILABLE)
return;
endStream();
so = socket(family, SOCK_STREAM, IPPROTO_TCP);
if(so != INVALID_SOCKET)
Socket::state = AVAILABLE;
}
void TCPStream::endStream(void)
{
if(bufsize)
sync();
if(gbuf)
delete[] gbuf;
if(pbuf)
delete[] pbuf;
gbuf = pbuf = NULL;
bufsize = 0;
iostream::clear();
endSocket();
}
void TCPStream::allocate(size_t size)
{
if(size < 2) {
bufsize = 1;
gbuf = pbuf = 0;
return;
}
gbuf = new char[size];
pbuf = new char[size];
if(!pbuf || !gbuf) {
error(errResourceFailure, (char *)"Could not allocate socket stream buffers");
return;
}
bufsize = size;
iostream::clear();
#if (defined(__GNUC__) && (__GNUC__ < 3)) && !defined(_MSWINDOWS_) && !defined(STLPORT)
setb(gbuf, gbuf + size, 0);
#endif
setg(gbuf, gbuf + size, gbuf + size);
setp(pbuf, pbuf + size);
}
int TCPStream::doallocate()
{
if(bufsize)
return 0;
allocate(1);
return 1;
}
int TCPStream::uflow()
{
int ret = underflow();
if (ret == EOF)
return EOF;
if (bufsize != 1)
gbump(1);
return ret;
}
int TCPStream::underflow()
{
ssize_t rlen = 1;
unsigned char ch;
if(bufsize == 1) {
if(Socket::state == STREAM)
rlen = ::read((int)so, (char *)&ch, 1);
else if(timeout && !Socket::isPending(pendingInput, timeout)) {
iostream::clear(ios::failbit | rdstate());
error(errTimeout,(char *)"Socket read timed out",socket_errno);
return EOF;
}
else
rlen = readData(&ch, 1);
if(rlen < 1) {
if(rlen < 0) {
iostream::clear(ios::failbit | rdstate());
error(errInput,(char *)"Could not read from socket",socket_errno);
}
return EOF;
}
return ch;
}
if(!gptr())
return EOF;
if(gptr() < egptr())
return (unsigned char)*gptr();
rlen = (ssize_t)((gbuf + bufsize) - eback());
if(Socket::state == STREAM)
rlen = ::read((int)so, (char *)eback(), _IOLEN64 rlen);
else if(timeout && !Socket::isPending(pendingInput, timeout)) {
iostream::clear(ios::failbit | rdstate());
error(errTimeout,(char *)"Socket read timed out",socket_errno);
return EOF;
}
else
rlen = readData(eback(), rlen);
if(rlen < 1) {
// clear(ios::failbit | rdstate());
if(rlen < 0)
error(errNotConnected,(char *)"Connection error",socket_errno);
else {
error(errInput,(char *)"Could not read from socket",socket_errno);
iostream::clear(ios::failbit | rdstate());
}
return EOF;
}
error(errSuccess);
setg(eback(), eback(), eback() + rlen);
return (unsigned char) *gptr();
}
bool TCPStream::isPending(Pending pending, timeout_t timer)
{
if(pending == pendingInput && in_avail())
return true;
else if(pending == pendingOutput)
flush();
return Socket::isPending(pending, timer);
}
int TCPStream::sync(void)
{
overflow(EOF);
setg(gbuf, gbuf + bufsize, gbuf + bufsize);
return 0;
}
size_t TCPStream::printf(const char *format, ...)
{
va_list args;
size_t len;
char *buf;
va_start(args, format);
overflow(EOF);
len = pptr() - pbase();
buf = pptr();
vsnprintf(buf, len, format, args);
va_end(args);
len = strlen(buf);
if(Socket::state == STREAM)
return ::write((int)so, buf, _IOLEN64 len);
else
return writeData(buf, len);
}
int TCPStream::overflow(int c)
{
unsigned char ch;
ssize_t rlen, req;
if(bufsize == 1) {
if(c == EOF)
return 0;
ch = (unsigned char)(c);
if(Socket::state == STREAM)
rlen = ::write((int)so, (const char *)&ch, 1);
else
rlen = writeData(&ch, 1);
if(rlen < 1) {
if(rlen < 0) {
iostream::clear(ios::failbit | rdstate());
error(errOutput,(char *)"Could not write to socket",socket_errno);
}
return EOF;
}
else
return c;
}
if(!pbase())
return EOF;
req = (ssize_t)(pptr() - pbase());
if(req) {
if(Socket::state == STREAM)
rlen = ::write((int)so, (const char *)pbase(), req);
else
rlen = writeData(pbase(), req);
if(rlen < 1) {
if(rlen < 0) {
iostream::clear(ios::failbit | rdstate());
error(errOutput,(char *)"Could not write to socket",socket_errno);
}
return EOF;
}
req -= rlen;
}
// if write "partial", rebuffer remainder
if(req)
// memmove(pbuf, pptr() + rlen, req);
memmove(pbuf, pbuf + rlen, req);
setp(pbuf, pbuf + bufsize);
pbump(req);
if(c != EOF) {
*pptr() = (unsigned char)c;
pbump(1);
}
return c;
}
TCPSession::TCPSession(const IPV4Host &ia, tpport_t port, size_t size, int pri, size_t stack) :
Thread(pri, stack), TCPStream(IPV4)
{
setCompletion(false);
setError(false);
allocate(size);
size_t i;
for(i = 0 ; i < ia.getAddressCount(); i++) {
struct sockaddr_in addr;
memset(&addr, 0, sizeof(addr));
addr.sin_family = AF_INET;
addr.sin_addr = ia.getAddress(i);
addr.sin_port = htons(port);
// Win32 will crash if you try to connect to INADDR_ANY.
if ( INADDR_ANY == addr.sin_addr.s_addr )
addr.sin_addr.s_addr = INADDR_LOOPBACK;
if(::connect(so, (struct sockaddr *)&addr, (socklen_t)sizeof(addr)) == 0)
break;
#ifdef _MSWINDOWS_
if(WSAGetLastError() == WSAEISCONN || WSAGetLastError() == WSAEWOULDBLOCK)
#else
if(errno == EINPROGRESS)
#endif
{
Socket::state = CONNECTING;
return;
}
}
if(i == ia.getAddressCount()) {
endSocket();
Socket::state = INITIAL;
return;
}
setCompletion(true);
Socket::state = CONNECTED;
}
#ifdef CCXX_IPV6
TCPSession::TCPSession(const IPV6Host &ia, tpport_t port, size_t size, int pri, size_t stack) :
Thread(pri, stack), TCPStream(IPV6)
{
setCompletion(false);
setError(false);
allocate(size);
size_t i;
for(i = 0 ; i < ia.getAddressCount(); i++) {
struct sockaddr_in6 addr;
memset(&addr, 0, sizeof(addr));
addr.sin6_family = AF_INET6;
addr.sin6_addr = ia.getAddress(i);
addr.sin6_port = htons(port);
// Win32 will crash if you try to connect to INADDR_ANY.
if(!memcmp(&addr.sin6_addr, &in6addr_any, sizeof(in6addr_any)))
memcpy(&addr.sin6_addr, &in6addr_loopback, sizeof(in6addr_loopback));
if(::connect(so, (struct sockaddr *)&addr, (socklen_t)sizeof(addr)) == 0)
break;
#ifdef _MSWINDOWS_
// if(WSAGetLastError() == WSAEWOULDBLOCK)
if(WSAGetLastError() == WSAEISCONN)
#else
if(errno == EINPROGRESS)
#endif
{
Socket::state = CONNECTING;
return;
}
}
if(i == ia.getAddressCount()) {
endSocket();
Socket::state = INITIAL;
return;
}
setCompletion(true);
Socket::state = CONNECTED;
}
#endif
TCPSession::TCPSession(TCPSocket &s, int pri, size_t stack) :
Thread(pri, stack), TCPStream(s)
{
setCompletion(true);
setError(false);
}
#ifdef CCXX_IPV6
TCPSession::TCPSession(TCPV6Socket &s, int pri, size_t stack) :
Thread(pri, stack), TCPStream(s)
{
setCompletion(true);
setError(false);
}
#endif
TCPSession::~TCPSession()
{
endStream();
}
int TCPSession::waitConnection(timeout_t timer)
{
int sockopt = 0;
socklen_t len = sizeof(sockopt);
switch(Socket::state) {
case INITIAL:
return -1;
case CONNECTED:
break;
case CONNECTING:
if(!Socket::isPending(pendingOutput, timer)) {
endSocket();
Socket::state = INITIAL;
return -1;
}
getsockopt(so, SOL_SOCKET, SO_ERROR, (char *)&sockopt, &len);
if(sockopt) {
endSocket();
Socket::state = INITIAL;
return -1;
}
default:
break;
}
Socket::state = CONNECTED;
return 0;
}
void TCPSession::initial(void)
{
if(waitConnection(60000))
exit();
}
ucommon-6.0.7/commoncpp/address.cpp 0000644 0001750 0001750 00000071166 12164016165 014263 0000000 0000000 // Copyright (C) 1999-2005 Open Source Telecom Corporation.
// Copyright (C) 2006-2010 David Sugar, Tycho Softworks.
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
//
// As a special exception, you may use this file as part of a free software
// library without restriction. Specifically, if other files instantiate
// templates or use macros or inline functions from this file, or you compile
// this file and link it with other files to produce an executable, this
// file does not by itself cause the resulting executable to be covered by
// the GNU General Public License. This exception does not however
// invalidate any other reasons why the executable file might be covered by
// the GNU General Public License.
//
// This exception applies only to the code released under the name GNU
// Common C++. If you copy code from other releases into a copy of GNU
// Common C++, as the General Public License permits, the exception does
// not apply to the code that you add in this way. To avoid misleading
// anyone as to the status of such modified files, you must delete
// this exception notice from them.
//
// If you write modifications of your own for GNU Common C++, it is your choice
// whether to permit this exception to apply to your modifications.
// If you do not wish that, delete this exception notice.
//
#include
#ifdef HAVE_ENDIAN_H
#include
#endif
#include
#include
#include
#include
#include
#ifndef _MSWINDOWS_
#include
#include
#include
#endif
#if defined(_MSWINDOWS_) && !defined(__BIG_ENDIAN)
#define __LITTLE_ENDIAN 1234
#define __BIG_ENDIAN 4321
#define __PDP_ENDIAN 3412
#define __BYTE_ORDER __LITTLE_ENDIAN
#endif
using namespace COMMONCPP_NAMESPACE;
#if __BYTE_ORDER == __BIG_ENDIAN
enum {
MCAST_VALID_MASK = 0xF0000000,
MCAST_VALID_VALUE = 0xE0000000
};
#else
enum {
MCAST_VALID_MASK = 0x000000F0,
MCAST_VALID_VALUE = 0x000000E0
};
#endif
#ifndef _MSWINDOWS_
Mutex IPV4Address::mutex;
#endif
IPV4Host IPV4Host::_host_;
const IPV4MulticastValidator IPV4Multicast::validator;
void IPV4MulticastValidator::operator()(const in_addr address) const
{
#ifdef CCXX_EXCEPTIONS
// "0.0.0.0" is always accepted, as it is an "empty" address.
if ( (address.s_addr != INADDR_ANY) &&
(address.s_addr & MCAST_VALID_MASK) != MCAST_VALID_VALUE ) {
throw "Multicast address not in the valid range: from 224.0.0.1 through 239.255.255.255";
}
#endif
}
IPV4Address::IPV4Address(const IPV4Validator *_validator) :
validator(_validator), ipaddr(NULL), addr_count(0), hostname(NULL)
{
*this = (long unsigned int)INADDR_ANY;
}
IPV4Address::IPV4Address(const char *address, const IPV4Validator *_validator) :
validator(_validator), ipaddr(NULL), addr_count(0), hostname(NULL)
{
if(address == 0 || !strcmp(address, "*"))
setAddress(NULL);
else
setAddress(address);
}
IPV4Address::IPV4Address(struct in_addr addr, const IPV4Validator *_validator) :
validator(_validator), ipaddr(NULL), hostname(NULL)
{
if ( this->validator ) {
(*validator)(addr);
}
addr_count = 1;
ipaddr = new struct in_addr[1];
ipaddr[0] = addr;
}
IPV4Address::IPV4Address(const IPV4Address &rhs) :
validator(rhs.validator), addr_count(rhs.addr_count), hostname(NULL)
{
ipaddr = new struct in_addr[addr_count];
memcpy(ipaddr, rhs.ipaddr, sizeof(struct in_addr) * addr_count);
}
IPV4Address::~IPV4Address()
{
if(ipaddr) {
delete[] ipaddr;
ipaddr = NULL;
}
if(hostname) {
delString(hostname);
hostname = NULL;
}
}
struct in_addr IPV4Address::getAddress(void) const
{
return ipaddr[0];
}
struct in_addr IPV4Address::getAddress(size_t i) const
{
return (i < addr_count ? ipaddr[i] : ipaddr[0]);
}
bool IPV4Address::isInetAddress(void) const
{
struct in_addr addr;
memset(&addr, 0, sizeof(addr));
if(memcmp(&addr, &ipaddr[0], sizeof(addr)))
return true;
return false;
}
IPV4Address &IPV4Address::operator=(const char *str)
{
if(str == 0 || !strcmp(str, "*"))
str = "0.0.0.0";
setAddress(str);
return *this;
}
IPV4Address &IPV4Address::operator=(struct in_addr addr)
{
if(ipaddr)
delete[] ipaddr;
if ( validator )
(*validator)(addr);
addr_count = 1;
ipaddr = new struct in_addr[1];
ipaddr[0] = addr;
if(hostname)
delString(hostname);
hostname = NULL;
return *this;
}
IPV4Address &IPV4Address::operator=(unsigned long addr)
{
union {
uint32_t addr;
struct in_addr in4;
} aptr;
aptr.addr = addr;
if ( validator )
(*validator)(aptr.in4);
if(ipaddr)
delete[] ipaddr;
addr_count = 1;
ipaddr = new struct in_addr[1];
memcpy(ipaddr, &aptr.in4, sizeof(struct in_addr));
if(hostname)
delString(hostname);
hostname = NULL;
return *this;
}
IPV4Address &IPV4Address::operator=(const IPV4Address &rhs)
{
if(this == &rhs) return *this;
addr_count = rhs.addr_count;
if(ipaddr)
delete[] ipaddr;
ipaddr = new struct in_addr[addr_count];
memcpy(ipaddr, rhs.ipaddr, sizeof(struct in_addr) * addr_count);
validator = rhs.validator;
if(hostname)
delString(hostname);
hostname = NULL;
return *this;
}
bool IPV4Address::operator==(const IPV4Address &a) const
{
const IPV4Address *smaller, *larger;
size_t s, l;
if(addr_count > a.addr_count) {
smaller = &a;
larger = this;
}
else {
smaller = this;
larger = &a;
}
// Loop through all addr's in the smaller and make sure
// that they are all in the larger
for(s = 0; s < smaller->addr_count; s++) {
// bool found = false;
for(l = 0; l < larger->addr_count &&
memcmp((char *)&smaller->ipaddr[s], (char *)&larger->ipaddr[l], sizeof(struct in_addr)); l++);
if(l == larger->addr_count) return false;
}
return true;
}
bool IPV4Address::operator!=(const IPV4Address &a) const
{
// Impliment in terms of operator==
return (*this == a ? false : true);
}
IPV4Host &IPV4Host::operator&=(const IPV4Mask &ma)
{
for(size_t i = 0; i < addr_count; i++) {
struct in_addr mask = ma.getAddress();
unsigned char *a = (unsigned char *)&ipaddr[i];
unsigned char *m = (unsigned char *)&mask;
for(size_t j = 0; j < sizeof(struct in_addr); ++j)
*(a++) &= *(m++);
}
if(hostname)
delString(hostname);
hostname = NULL;
return *this;
}
IPV4Host::IPV4Host(struct in_addr addr) :
IPV4Address(addr) {}
IPV4Host::IPV4Host(const char *host) :
IPV4Address(host)
{
char namebuf[256];
if(!host) {
if(this == &_host_) {
gethostname(namebuf, 256);
setAddress(namebuf);
}
else
*this = _host_;
}
}
bool IPV4Address::setIPAddress(const char *host)
{
if(!host)
return false;
#if defined(_MSWINDOWS_)
struct sockaddr_in addr;
addr.sin_addr.s_addr = inet_addr(host);
if ( validator )
(*validator)(addr.sin_addr);
if(addr.sin_addr.s_addr == INADDR_NONE)
return false;
*this = addr.sin_addr.s_addr;
#else
struct in_addr l_addr;
int ok = inet_aton(host, &l_addr);
if ( validator )
(*validator)(l_addr);
if ( !ok )
return false;
*this = l_addr;
#endif
return true;
}
void IPV4Address::setAddress(const char *host)
{
if(hostname)
delString(hostname);
hostname = NULL;
if(!host) // The way this is currently used, this can never happen
{
*this = (long unsigned int)htonl(INADDR_ANY);
return;
}
#ifdef _MSWINDOWS_
if(!stricmp(host, "localhost")) {
*this = (long unsigned int)inet_addr("127.0.0.1");
return;
}
#endif
if(!setIPAddress(host)) {
struct hostent *hp;
struct in_addr **bptr;
#if defined(__GLIBC__)
char hbuf[8192];
struct hostent hb;
int rtn;
if(gethostbyname_r(host, &hb, hbuf, sizeof(hbuf), &hp, &rtn))
hp = NULL;
#elif defined(sun)
char hbuf[8192];
struct hostent hb;
int rtn;
hp = gethostbyname_r(host, &hb, hbuf, sizeof(hbuf), &rtn);
#elif (defined(__osf__) || defined(_MSWINDOWS_))
hp = gethostbyname(host);
#else
mutex.enterMutex();
hp = gethostbyname(host);
mutex.leaveMutex();
#endif
if(!hp) {
if(ipaddr)
delete[] ipaddr;
ipaddr = new struct in_addr[1];
memset(ipaddr, 0, sizeof(struct in_addr));
return;
}
// Count the number of IP addresses returned
addr_count = 0;
for(bptr = (struct in_addr **)hp->h_addr_list; *bptr != NULL; bptr++) {
addr_count++;
}
// Allocate enough memory
if(ipaddr)
delete[] ipaddr; // Cause this was allocated in base
ipaddr = new struct in_addr[addr_count];
// Now go through the list again assigning to
// the member ipaddr;
bptr = (struct in_addr **)hp->h_addr_list;
for(unsigned int i = 0; i < addr_count; i++) {
if ( validator )
(*validator)(*bptr[i]);
ipaddr[i] = *bptr[i];
}
}
}
IPV4Broadcast::IPV4Broadcast(const char *net) :
IPV4Address(net)
{
}
IPV4Mask::IPV4Mask(const char *mask)
{
unsigned long x = 0xffffffff;
int l = 32 - atoi(mask);
if(setIPAddress(mask))
return;
if(l < 1 || l > 32) {
#ifdef CCXX_EXCEPTIONS
if(Thread::getException() == Thread::throwObject)
throw((IPV4Address *)this);
#endif
return;
}
*this = htonl(x << l);
}
const char *IPV4Address::getHostname(void) const
{
struct hostent *hp = NULL;
struct in_addr addr0;
memset(&addr0, 0, sizeof(addr0));
if(!memcmp(&addr0, &ipaddr[0], sizeof(addr0)))
return NULL;
#ifdef _MSWINDOWS_
memset(&addr0, 0xff, sizeof(addr0));
if(!memcmp(&addr0, &ipaddr[0], sizeof(addr0)))
return "255.255.255.255";
long a = inet_addr("127.0.0.1");
if(!memcmp(&a, &ipaddr[0], sizeof(a)))
return "localhost";
#endif
#if defined(__GLIBC__)
char hbuf[8192];
struct hostent hb;
int rtn;
if(gethostbyaddr_r((char *)&ipaddr[0], sizeof(addr0), AF_INET, &hb, hbuf, sizeof(hbuf), &hp, &rtn))
hp = NULL;
#elif defined(sun)
char hbuf[8192];
struct hostent hb;
int rtn;
hp = gethostbyaddr_r((char *)&ipaddr[0], (int)sizeof(addr0), (int)AF_INET, &hb, hbuf, (int)sizeof(hbuf), &rtn);
#elif defined(__osf__) || defined(_MSWINDOWS_)
hp = gethostbyaddr((char *)&ipaddr[0], sizeof(addr0), AF_INET);
#else
mutex.enterMutex();
hp = gethostbyaddr((char *)&ipaddr[0], sizeof(addr0), AF_INET);
mutex.leaveMutex();
#endif
if(hp) {
if(hostname)
delString(hostname);
hostname = newString(hp->h_name);
return hostname;
} else {
return inet_ntoa(ipaddr[0]);
}
}
IPV4Host operator&(const IPV4Host &addr, const IPV4Mask &mask)
{
IPV4Host temp = addr;
temp &= mask;
return temp;
}
IPV4Multicast::IPV4Multicast() :
IPV4Address(&validator)
{}
IPV4Multicast::IPV4Multicast(const struct in_addr address) :
IPV4Address(address, &validator)
{}
IPV4Multicast::IPV4Multicast(const char *address) :
IPV4Address(address, &validator)
{}
#ifdef CCXX_IPV6
#ifndef _MSWINDOWS_
Mutex IPV6Address::mutex;
#endif
const IPV6MulticastValidator IPV6Multicast::validator;
void IPV6MulticastValidator::operator()(const in6_addr address) const
{
#ifdef CCXX_EXCEPTIONS
// "0000:" is always accepted, as it is an "empty" address.
if ( (address.s6_addr[0] != 0 || address.s6_addr[1] != 0) &&
(address.s6_addr[0] != 0xff || address.s6_addr[1] < 0x1f)) {
throw "Multicast address not in the valid prefix ff00-ff1f:";
}
#endif
}
IPV6Address::IPV6Address(const IPV6Validator *_validator) :
validator(_validator), hostname(NULL)
{
addr_count = 1;
ipaddr = new struct in6_addr[1];
memcpy(ipaddr, &in6addr_any, sizeof(struct in6_addr));
}
IPV6Address::IPV6Address(const char *address, const IPV6Validator *_validator) :
validator(_validator), ipaddr(NULL), addr_count(0), hostname(NULL)
{
if(address == 0 || !strcmp(address, "*"))
setAddress(NULL);
else
setAddress(address);
}
IPV6Address::IPV6Address(struct in6_addr addr, const IPV6Validator *_validator) :
validator(_validator), ipaddr(NULL), hostname(NULL)
{
if ( this->validator ) {
(*validator)(addr);
}
addr_count = 1;
ipaddr = new struct in6_addr[1];
memcpy(&ipaddr, &addr, sizeof(struct in6_addr));
}
IPV6Address::IPV6Address(const IPV6Address &rhs) :
validator(rhs.validator), addr_count(rhs.addr_count), hostname(NULL) {
ipaddr = new struct in6_addr[addr_count];
memcpy(ipaddr, rhs.ipaddr, sizeof(struct in6_addr) * addr_count);
}
IPV6Address::~IPV6Address()
{
if(ipaddr) {
delete[] ipaddr;
ipaddr = NULL;
}
if(hostname) {
delString(hostname);
hostname = NULL;
}
}
struct in6_addr IPV6Address::getAddress(void) const
{
return ipaddr[0];
}
struct in6_addr IPV6Address::getAddress(size_t i) const
{
return (i < addr_count ? ipaddr[i] : ipaddr[0]);
}
bool IPV6Address::isInetAddress(void) const
{
struct in6_addr addr;
memset(&addr, 0, sizeof(addr));
if(!ipaddr)
return false;
if(memcmp(&addr, &ipaddr[0], sizeof(addr)))
return true;
return false;
}
IPV6Address &IPV6Address::operator=(const char *str)
{
if(str == 0 || !strcmp(str, "*"))
str = "::";
setAddress(str);
return *this;
}
IPV6Address &IPV6Address::operator=(struct in6_addr addr)
{
if(ipaddr)
delete[] ipaddr;
if ( validator )
(*validator)(addr);
addr_count = 1;
ipaddr = new struct in6_addr[1];
ipaddr[0] = addr;
if(hostname)
delString(hostname);
hostname = NULL;
return *this;
}
IPV6Address &IPV6Address::operator=(const IPV6Address &rhs)
{
if(this == &rhs) return *this;
addr_count = rhs.addr_count;
if(ipaddr)
delete[] ipaddr;
ipaddr = new struct in6_addr[addr_count];
memcpy(ipaddr, rhs.ipaddr, sizeof(struct in6_addr) * addr_count);
validator = rhs.validator;
if(hostname)
delString(hostname);
hostname = NULL;
return *this;
}
bool IPV6Address::operator==(const IPV6Address &a) const
{
const IPV6Address *smaller, *larger;
size_t s, l;
if(addr_count > a.addr_count) {
smaller = &a;
larger = this;
}
else {
smaller = this;
larger = &a;
}
// Loop through all addr's in the smaller and make sure
// that they are all in the larger
for(s = 0; s < smaller->addr_count; s++) {
// bool found = false;
for(l = 0; l < larger->addr_count &&
memcmp((char *)&smaller->ipaddr[s], (char *)&larger->ipaddr[l], sizeof(struct in6_addr)); l++);
if(l == larger->addr_count) return false;
}
return true;
}
bool IPV6Address::operator!=(const IPV6Address &a) const
{
// Impliment in terms of operator==
return (*this == a ? false : true);
}
IPV6Host &IPV6Host::operator&=(const IPV6Mask &ma)
{
for(size_t i = 0; i < addr_count; i++) {
struct in6_addr mask = ma.getAddress();
unsigned char *a = (unsigned char *)&ipaddr[i];
unsigned char *m = (unsigned char *)&mask;
for(size_t j = 0; j < sizeof(struct in6_addr); ++j)
*(a++) &= *(m++);
}
if(hostname)
delString(hostname);
hostname = NULL;
return *this;
}
IPV6Host::IPV6Host(struct in6_addr addr) :
IPV6Address(addr) {}
IPV6Host::IPV6Host(const char *host) :
IPV6Address(host)
{
char namebuf[256];
if(!host) {
gethostname(namebuf, 256);
setAddress(namebuf);
}
}
bool IPV6Address::setIPAddress(const char *host)
{
if(!host)
return false;
struct in6_addr l_addr;
#ifdef _MSWINDOWS_
struct sockaddr saddr;
int slen = sizeof(saddr);
struct sockaddr_in6 *paddr = (struct sockaddr_in6 *)&saddr;
int ok = WSAStringToAddress((LPSTR)host, AF_INET6, NULL, &saddr, &slen);
l_addr = paddr->sin6_addr;
#else
int ok = inet_pton(AF_INET6, host, &l_addr);
#endif
if ( validator )
(*validator)(l_addr);
if ( !ok )
return false;
*this = l_addr;
return true;
}
#if defined(HAVE_GETADDRINFO) && !defined(HAVE_GETHOSTBYNAME2)
void IPV6Address::setAddress(const char *host)
{
if(hostname)
delString(hostname);
hostname = NULL;
if(!host) // The way this is currently used, this can never happen
host = "::";
#ifdef _MSWINDOWS_
if(!stricmp(host, "localhost"))
host = "::1";
#endif
if(!setIPAddress(host)) {
struct addrinfo hint, *list = NULL, *first;
memset(&hint, 0, sizeof(hint));
hint.ai_family = AF_INET6;
struct in6_addr *addr;
struct sockaddr_in6 *ip6addr;
if(getaddrinfo(host, NULL, &hint, &list) || !list) {
if(ipaddr)
delete[] ipaddr;
ipaddr = new struct in6_addr[1];
memset((void *)&ipaddr[0], 0, sizeof(struct in6_addr));
return;
}
// Count the number of IP addresses returned
addr_count = 0;
first = list;
while(list) {
++addr_count;
list = list->ai_next;
}
// Allocate enough memory
if(ipaddr)
delete[] ipaddr; // Cause this was allocated in base
ipaddr = new struct in6_addr[addr_count];
// Now go through the list again assigning to
// the member ipaddr;
list = first;
int i = 0;
while(list) {
ip6addr = (struct sockaddr_in6 *)list->ai_addr;
addr = &ip6addr->sin6_addr;
if(validator)
(*validator)(*addr);
ipaddr[i++] = *addr;
list = list->ai_next;
}
freeaddrinfo(first);
}
}
#else
void IPV6Address::setAddress(const char *host)
{
if(hostname)
delString(hostname);
hostname = NULL;
if(!host) // The way this is currently used, this can never happen
host = "::";
#ifdef _MSWINDOWS_
if(!stricmp(host, "localhost"))
host = "::1";
#endif
if(!setIPAddress(host)) {
struct hostent *hp;
struct in6_addr **bptr;
#if defined(__GLIBC__)
char hbuf[8192];
struct hostent hb;
int rtn;
if(gethostbyname2_r(host, AF_INET6, &hb, hbuf, sizeof(hbuf), &hp, &rtn))
hp = NULL;
#elif defined(sun)
char hbuf[8192];
struct hostent hb;
int rtn;
hp = gethostbyname2_r(host, AF_INET6, &hb, hbuf, sizeof(hbuf), &rtn);
#elif (defined(__osf__) || defined(_OSF_SOURCE) || defined(__hpux))
hp = gethostbyname(host);
#elif defined(_MSWINDOWS_) && (!defined(_MSC_VER) || _MSC_VER < 1300)
hp = gethostbyname(host);
#elif defined(_MSWINDOWS_)
hp = gethostbyname2(host, AF_INET6);
#else
mutex.enterMutex();
hp = gethostbyname2(host, AF_INET6);
mutex.leaveMutex();
#endif
if(!hp) {
if(ipaddr)
delete[] ipaddr;
ipaddr = new struct in6_addr[1];
memset((void *)&ipaddr[0], 0, sizeof(struct in6_addr));
return;
}
// Count the number of IP addresses returned
addr_count = 0;
for(bptr = (struct in6_addr **)hp->h_addr_list; *bptr != NULL; bptr++) {
addr_count++;
}
// Allocate enough memory
if(ipaddr)
delete[] ipaddr; // Cause this was allocated in base
ipaddr = new struct in6_addr[addr_count];
// Now go through the list again assigning to
// the member ipaddr;
bptr = (struct in6_addr **)hp->h_addr_list;
for(unsigned int i = 0; i < addr_count; i++) {
if ( validator )
(*validator)(*bptr[i]);
ipaddr[i] = *bptr[i];
}
}
}
#endif
IPV6Broadcast::IPV6Broadcast(const char *net) :
IPV6Address(net)
{
}
IPV6Mask::IPV6Mask(const char *mask) :
IPV6Address(mask)
{
}
const char *IPV6Address::getHostname(void) const
{
struct hostent *hp = NULL;
struct in6_addr addr0;
static char strbuf[64];
memset(&addr0, 0, sizeof(addr0));
if(!memcmp(&addr0, &ipaddr[0], sizeof(addr0)))
return NULL;
if(!memcmp(&in6addr_loopback, &ipaddr[0], sizeof(addr0)))
return "localhost";
#if defined(__GLIBC__)
char hbuf[8192];
struct hostent hb;
int rtn;
if(gethostbyaddr_r((char *)&ipaddr[0], sizeof(addr0), AF_INET6, &hb, hbuf, sizeof(hbuf), &hp, &rtn))
hp = NULL;
#elif defined(sun)
char hbuf[8192];
struct hostent hb;
int rtn;
hp = gethostbyaddr_r((char *)&ipaddr[0], sizeof(addr0), AF_INET6, &hb, hbuf, (int)sizeof(hbuf), &rtn);
#elif defined(__osf__) || defined(_MSWINDOWS_)
hp = gethostbyaddr((char *)&ipaddr[0], sizeof(addr0), AF_INET6);
#else
mutex.enterMutex();
hp = gethostbyaddr((char *)&ipaddr[0], sizeof(addr0), AF_INET6);
mutex.leaveMutex();
#endif
if(hp) {
if(hostname)
delString(hostname);
hostname = newString(hp->h_name);
return hostname;
} else {
#ifdef _MSWINDOWS_
struct sockaddr saddr;
struct sockaddr_in6 *paddr = (struct sockaddr_in6 *)&saddr;
DWORD slen = sizeof(strbuf);
memset(&saddr, 0, sizeof(saddr));
paddr->sin6_family = AF_INET6;
paddr->sin6_addr = ipaddr[0];
WSAAddressToString(&saddr, sizeof(saddr), NULL, strbuf, &slen);
return strbuf;
#else
return inet_ntop(AF_INET6, &ipaddr[0], strbuf, sizeof(strbuf));
#endif
}
}
IPV6Host operator&(const IPV6Host &addr, const IPV6Mask &mask)
{
IPV6Host temp = addr;
temp &= mask;
return temp;
}
IPV6Multicast::IPV6Multicast() :
IPV6Address(&validator)
{}
IPV6Multicast::IPV6Multicast(const char *address) :
IPV6Address(address,&validator)
{}
#endif
NAMESPACE_COMMONCPP
using namespace std;
ostream& operator<<(ostream &os, const IPV4Address &ia)
{
os << inet_ntoa(getaddress(ia));
return os;
}
END_NAMESPACE
typedef unsigned char bit_t;
static void bitmask(bit_t *bits, bit_t *mask, unsigned len)
{
while(len--)
*(bits++) &= *(mask++);
}
static void bitimask(bit_t *bits, bit_t *mask, unsigned len)
{
while(len--)
*(bits++) |= ~(*(mask++));
}
static void bitset(bit_t *bits, unsigned blen)
{
bit_t mask;
while(blen) {
mask = (bit_t)(1 << 7);
while(mask && blen) {
*bits |= mask;
mask >>= 1;
--blen;
}
++bits;
}
}
static unsigned bitcount(bit_t *bits, unsigned len)
{
unsigned count = 0;
bit_t mask, test;
while(len--) {
mask = (bit_t)(1<<7);
test = *bits++;
while(mask) {
if(!(mask & test))
return count;
++count;
mask >>= 1;
}
}
return count;
}
IPV4Cidr::IPV4Cidr()
{
memset(&network, 0, sizeof(network));
memset(&netmask, 0, sizeof(netmask));
}
IPV4Cidr::IPV4Cidr(const char *cp)
{
set(cp);
}
IPV4Cidr::IPV4Cidr(IPV4Cidr &cidr)
{
memcpy(&network, &cidr.network, sizeof(network));
memcpy(&netmask, &cidr.netmask, sizeof(netmask));
}
bool IPV4Cidr::isMember(const struct in_addr &addr) const
{
struct in_addr host = addr;
bitmask((bit_t *)&host, (bit_t *)&netmask, sizeof(host));
if(!memcmp(&host, &network, sizeof(host)))
return true;
return false;
}
bool IPV4Cidr::isMember(const struct sockaddr *saddr) const
{
struct sockaddr_in *addr = (struct sockaddr_in *)saddr;
struct in_addr host;
if(saddr->sa_family != AF_INET)
return false;
memcpy(&host, &addr->sin_addr.s_addr, sizeof(host));
bitmask((bit_t *)&host, (bit_t *)&netmask, sizeof(host));
if(!memcmp(&host, &network, sizeof(host)))
return true;
return false;
}
struct in_addr IPV4Cidr::getBroadcast(void) const
{
struct in_addr bcast;
memcpy(&bcast, &network, sizeof(network));
bitimask((bit_t *)&bcast, (bit_t *)&netmask, sizeof(bcast));
return bcast;
}
unsigned IPV4Cidr::getMask(const char *cp) const
{
unsigned dcount = 0;
const char *gp = cp;
const char *mp = strchr(cp, '/');
unsigned char dots[4];
#ifdef _MSWINDOWS_
DWORD mask;
#else
uint32_t mask;
#endif
if(mp) {
if(!strchr(++mp, '.'))
return atoi(mp);
mask = inet_addr(mp);
return bitcount((bit_t *)&mask, sizeof(mask));
}
memset(dots, 0, sizeof(dots));
dots[0] = atoi(cp);
while(*gp && dcount < 3) {
if(*(gp++) == '.')
dots[++dcount] = atoi(gp);
}
if(dots[3])
return 32;
if(dots[2])
return 24;
if(dots[1])
return 16;
return 8;
}
void IPV4Cidr::set(const char *cp)
{
char cbuf[INET_IPV4_ADDRESS_SIZE];
char *ep;
unsigned dots = 0;
#ifdef _MSWINDOWS_
DWORD addr;
#endif
memset(&netmask, 0, sizeof(netmask));
bitset((bit_t *)&netmask, getMask(cp));
setString(cbuf, sizeof(cbuf), cp);
ep = (char *)strchr(cp, '/');
if(ep)
*ep = 0;
cp = cbuf;
while(NULL != (cp = strchr(cp, '.'))) {
++dots;
++cp;
}
while(dots++ < 3)
addString(cbuf, sizeof(cbuf), ".0");
#ifdef _MSWINDOWS_
addr = inet_addr(cbuf);
memcpy(&network, &addr, sizeof(network));
#else
inet_aton(cbuf, &network);
#endif
bitmask((bit_t *)&network, (bit_t *)&netmask, sizeof(network));
}
#ifdef CCXX_IPV6
IPV6Cidr::IPV6Cidr()
{
memset(&network, 0, sizeof(network));
memset(&netmask, 0, sizeof(netmask));
}
IPV6Cidr::IPV6Cidr(const char *cp)
{
set(cp);
}
IPV6Cidr::IPV6Cidr(IPV6Cidr &cidr)
{
memcpy(&network, &cidr.network, sizeof(network));
memcpy(&netmask, &cidr.netmask, sizeof(netmask));
}
bool IPV6Cidr::isMember(const struct in6_addr &addr) const
{
struct in6_addr host = addr;
bitmask((bit_t *)&host, (bit_t *)&netmask, sizeof(host));
if(!memcmp(&host, &network, sizeof(host)))
return true;
return false;
}
bool IPV6Cidr::isMember(const struct sockaddr *saddr) const
{
struct sockaddr_in6 *addr = (struct sockaddr_in6 *)saddr;
struct in6_addr host;
if(saddr->sa_family != AF_INET6)
return false;
memcpy(&host, &addr->sin6_addr, sizeof(host));
bitmask((bit_t *)&host, (bit_t *)&netmask, sizeof(host));
if(!memcmp(&host, &network, sizeof(host)))
return true;
return false;
}
struct in6_addr IPV6Cidr::getBroadcast(void) const
{
struct in6_addr bcast;
memcpy(&bcast, &network, sizeof(network));
bitimask((bit_t *)&bcast, (bit_t *)&netmask, sizeof(bcast));
return bcast;
}
unsigned IPV6Cidr::getMask(const char *cp) const
{
unsigned count = 0, rcount = 0;
const char *sp = strchr(cp, '/');
int flag = 0;
if(sp)
return atoi(++sp);
if(!strncmp(cp, "ff00:", 5))
return 8;
if(!strncmp(cp, "fe80:", 5))
return 10;
if(!strncmp(cp, "2002:", 5))
return 16;
sp = strrchr(cp, ':');
while(*(++sp) == '0')
++sp;
if(*sp)
return 128;
while(*cp && count < 128) {
if(*(cp++) == ':') {
count+= 16;
while(*cp == '0')
++cp;
if(*cp == ':') {
if(!flag)
rcount = count;
flag = 1;
}
else
flag = 0;
}
}
return rcount;
}
void IPV6Cidr::set(const char *cp)
{
char cbuf[INET_IPV6_ADDRESS_SIZE];
char *ep;
memset(&netmask, 0, sizeof(netmask));
bitset((bit_t *)&netmask, getMask(cp));
setString(cbuf, sizeof(cbuf), cp);
ep = (char *)strchr(cp, '/');
if(ep)
*ep = 0;
#ifdef _MSWINDOWS_
int slen = sizeof(network);
WSAStringToAddressA(cbuf, AF_INET6, NULL, (struct sockaddr*)&network, &slen);
#else
inet_pton(AF_INET6, cbuf, &network);
#endif
bitmask((bit_t *)&network, (bit_t *)&netmask, sizeof(network));
}
#endif
ucommon-6.0.7/commoncpp/applog.cpp 0000644 0001750 0001750 00000067306 12163025062 014114 0000000 0000000 // Copyright (C) 2005-2009 Angelo Naselli, Penta Engineering s.r.l.
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
//
// As a special exception, you may use this file as part of a free software
// library without restriction. Specifically, if other files instantiate
// templates or use macros or inline functions from this file, or you compile
// this file and link it with other files to produce an executable, this
// file does not by itself cause the resulting executable to be covered by
// the GNU General Public License. This exception does not however
// invalidate any other reasons why the executable file might be covered by
// the GNU General Public License.
//
// This exception applies only to the code released under the name GNU
// Common C++. If you copy code from other releases into a copy of GNU
// Common C++, as the General Public License permits, the exception does
// not apply to the code that you add in this way. To avoid misleading
// anyone as to the status of such modified files, you must delete
// this exception notice from them.
//
// If you write modifications of your own for GNU Common C++, it is your choice
// whether to permit this exception to apply to your modifications.
// If you do not wish that, delete this exception notice.
//
#ifdef NEW_STDCPP
#include
#include
#include
#include
#ifndef _MSWINDOWS_
#include
#include
#endif
#include
#include
#include
#include
#include
#include
#include
#include
// TODO sc: test if has to move up now that it is into commoncpp
// NOTE: the order of inclusion is important do not move following include line
// redefinition of __EXPORT needed if we're compiling our dll
#include
// local includes
#include
using namespace std;
using namespace COMMONCPP_NAMESPACE;
class logStruct
{
public:
string _ident;
int _priority;
Slog::Level _level;
bool _enable;
bool _clogEnable;
bool _slogEnable;
size_t _msgpos;
enum logEnum
{
BUFF_SIZE = 512,
LAST_CHAR = BUFF_SIZE - 1
};
char _msgbuf[BUFF_SIZE];
logStruct() : _ident("") , _priority(Slog::levelDebug),
_level(Slog::levelDebug), _enable(false),
_clogEnable(false), _slogEnable(false), _msgpos(0)
{
memset(_msgbuf, 0, BUFF_SIZE);
};
~logStruct() {};
};
struct levelNamePair
{
const char *name;
Slog::Level level;
};
#ifdef _MSWINDOWS_
template class std::map;
#endif
class LevelName : public std::map
{
public:
LevelName(const levelNamePair initval[], int num)
{
for (int i = 0; i < num; i++)
insert(make_pair(initval[i].name, initval[i].level));
};
};
class logger : public ost::ThreadQueue
{
private:
string _nomeFile;
std::fstream _logfs;
bool _usePipe;
bool _closedByApplog;
protected:
// to dequeue log messages and write them to file if not log_directly
virtual void runQueue(void *data);
virtual void startQueue(void);
virtual void stopQueue(void);
virtual void onTimer(void);
virtual void final(void);
void _openFile();
public:
logger(const char* logFileName = NULL, bool usePipe = false);
virtual ~logger();
// To change log file name
void logFileName(const char* FileName, bool usePipe = false);
void openFile();
void closeFile();
};
// mapping thread ID <-> logStruct (buffer)
typedef std::map LogPrivateData;
// map ident <-> levels
typedef std::map IdentLevel;
NAMESPACE_COMMONCPP
class AppLogPrivate
{
public:
// subscription and unsubsciption must be protected as well
ost::Mutex _subMutex;
// mapping thread ID <-> logStruct (buffer)
LogPrivateData _logs;
// map ident <-> levels
IdentLevel _identLevel;
// log directly into file
bool _logDirectly;
bool _logPipe;
// log spooler
logger *_pLogger;
string _nomeFile;
Mutex _lock;
std::fstream _logfs;
static const levelNamePair _values[];
static LevelName _assoc;
AppLogPrivate() : _pLogger(NULL) {}
~AppLogPrivate()
{
if (_pLogger)
delete _pLogger;
}
};
END_NAMESPACE
const levelNamePair AppLogPrivate::_values[] =
{
{ "emerg", Slog::levelEmergency },
{ "alert", Slog::levelAlert },
{ "critical", Slog::levelCritical },
{ "error", Slog::levelError },
{ "warn", Slog::levelWarning },
{ "notice", Slog::levelNotice },
{ "info", Slog::levelInfo },
{ "debug", Slog::levelDebug }
};
AppLog alog;
LevelName AppLogPrivate::_assoc(_values, sizeof AppLogPrivate::_values / sizeof *AppLogPrivate::_values);
std::map *AppLog::assoc = &AppLogPrivate::_assoc;
#if defined(CCXX_EXCEPTIONS)
HEXdump::HEXdump(const unsigned char *buffer, int len, int max_len) : _str()
{
std::stringstream sstr;
if (buffer == NULL || len <= 0)
return ;
long buf_len = (max_len > 0 && len > max_len) ? max_len : len;
long int addr = 0;
int cnt2 = 0;
int n;
int i;
sstr.str("");
// get exception from ifstream failures
sstr.exceptions(ifstream::failbit | ifstream::badbit);
try
{
sstr << std::endl;
sstr << "dump " << len << " byte." << std::endl;
for (n = 0; n < buf_len; n++)
{
if (cnt2 == 0)
{
// Print address.
sstr << std::setw(7) << std::setfill('0') << int (addr) << " - ";
addr = addr + 16;
}
cnt2 = (cnt2 + 1) % 18;
if (cnt2 <= 16)
{
// print hex value
sstr << std::hex << std::setw(2) << std::setfill('0') << int (buffer[n]) << " ";
}
else
{
sstr << " ";
sstr << std::setfill(' ');
for (i = n - cnt2 + 1; i < n; i++)
{
// print ascii value
if (buffer[i] < 32 || 126 < buffer[i])
{
sstr << '.';
}
else
{
sstr << buffer[i];
}
}
sstr << std::endl;
sstr << std::dec;
cnt2 = 0;
n--;
}
}
sstr << std::setfill(' ');
for (i = cnt2 + 1; i <= 16 ; i++)
{
sstr << std::setw(2) << "--" << " ";
}
sstr << " ";
for (i = n - cnt2; cnt2 <= 16 && i < n; i++)
{
if (buffer[i] < 32 || 126 < buffer[i])
{
sstr << '.';
}
else
{
sstr << buffer[i];
}
}
sstr << std::dec;
if (max_len > 0 && len > max_len)
sstr << std::endl << "dump troncato a " << max_len << " byte." << std::endl;
}
catch (...)
{
sstr.str("HEXdump failed!");
}
_str = sstr.str();
}
#endif
// class logger
logger::logger(const char* logFileName, bool usePipe) : ThreadQueue(NULL, 0, 0), _usePipe(usePipe), _closedByApplog(false)
{
_nomeFile = "";
if (logFileName)
_nomeFile = logFileName;
openFile();
}
logger::~logger()
{
Semaphore::post();
Thread::terminate();
_logfs.flush();
_logfs.close();
}
// New log file name
void logger::logFileName(const char* FileName, bool usePipe)
{
if (!FileName)
return;
_usePipe = usePipe;
_nomeFile = FileName;
if (_logfs.is_open())
_logfs.close();
openFile();
}
/// open also logger if applog->open() is invoked
void logger::openFile()
{
_closedByApplog=false;
}
///internal logger openFile needed to use pipe and avoid stream buffering in the case
/// the consumer is not connected to pipe
void logger::_openFile()
{
if (!_closedByApplog && !_logfs.is_open())
{
if (!_nomeFile.empty())
{
_logfs.clear();
if (!_usePipe)
{
_logfs.open(_nomeFile.c_str(), std::ofstream::out | std::ofstream::app | std::ofstream::ate);
}
#ifndef _MSWINDOWS_
else
{
// create pipe
int err = mkfifo(_nomeFile.c_str(), S_IREAD | S_IWRITE);
if (err == 0 || errno == EEXIST)
{
// and open it
_logfs.open(_nomeFile.c_str(), std::fstream::in | std::fstream::out);
}
else
THROW(AppLogException("Can't create pipe"));
}
#endif
if (_logfs.fail())
THROW(AppLogException("Can't open log file name"));
}
}
}
/// close also logger if applog->close() is invoked
void logger::closeFile()
{
_closedByApplog = true;
}
// writes into filename enqueued messages
void logger::runQueue(void * data)
{
char *str = (char *) data;
// if for some internal reasons file has been closed
// reopen it
try
{
_openFile();
}
catch (AppLogException e)
{
std::cerr << e.what() << std::endl;
slog.emerg("%s\n", e.what());
std::cerr.flush();
}
if (_logfs.is_open())
{
_logfs << str;
_logfs.flush();
}
//if we use a pipe to avoid increasing of stream buffer
// without a consumer, we open, use and close it
if ((_usePipe || _closedByApplog) && _logfs.is_open())
{
_logfs.flush();
_logfs.close();
}
}
void logger::startQueue()
{
}
void logger::stopQueue()
{
}
void logger::onTimer()
{
}
void logger::final()
{
if (started)
{
data_t *pFirst = first;
while (pFirst)
{
runQueue(pFirst->data);
pFirst = pFirst->next;
}
}
}
#ifndef _MSWINDOWS_
AppLog::AppLog(const char* logFileName, bool logDirectly, bool usePipe) :
streambuf(), ostream((streambuf*) this)
#else
AppLog::AppLog(const char* logFileName, bool logDirectly) :
streambuf(), ostream((streambuf*) this)
#endif
{
d= NULL; // pedantic fussy about initing members before base classes...
d = new AppLogPrivate();
if (!d)
THROW(AppLogException("Memory allocation problem"));
d->_nomeFile = "";
d->_logDirectly = logDirectly;
#ifndef _MSWINDOWS_
d->_logPipe = usePipe;
#else
d->_logPipe = false;
#endif
// level string to level value
// assoc["emerg"] = levelEmergency;
// assoc["alert"] = levelAlert;
// assoc["critical"] = levelCritical;
// assoc["error"] = levelError;
// assoc["warn"] = levelWarning;
// assoc["notice"] = levelNotice;
// assoc["info"] = levelInfo;
// assoc["debug"] = levelDebug;
if (logFileName)
d->_nomeFile = logFileName;
if (!d->_logDirectly && logFileName)
d->_pLogger = new logger(logFileName, d->_logPipe);
else
d->_pLogger = NULL;
// writes to file directly
if (!d->_nomeFile.empty() && d->_logDirectly)
{
if (!d->_logPipe)
{
d->_logfs.open(d->_nomeFile.c_str(), std::fstream::in | std::fstream::out);
if (!d->_logfs.is_open())
{
d->_logfs.open(d->_nomeFile.c_str(), std::fstream::out | std::fstream::app);
}
else
d->_logfs.seekg(0, std::fstream::end);
}
// on Windows pipe are not used as they are not supported on WinNT
#ifndef _MSWINDOWS_
else
{
// create pipe
int err = mkfifo(d->_nomeFile.c_str(), S_IREAD | S_IWRITE);
if (err == 0 || errno == EEXIST)
{
// and open it
d->_logfs.open(d->_nomeFile.c_str(), std::fstream::in | std::fstream::out);
}
else
THROW(AppLogException("Can't create pipe"));
}
#endif
if (d->_logfs.fail())
THROW(AppLogException("Can't open log file name"));
}
//from Error level on write to syslog also
slog.level(Slog::levelError);
slog.clogEnable(false);
}
AppLog::~AppLog()
{
// if _logDirectly
close();
if (d) delete d;
}
void AppLog::subscribe()
{
ost::MutexLock mtx(d->_subMutex);
Thread *pThr = getThread();
if (pThr)
{
cctid_t tid = pThr->getId();
LogPrivateData::iterator logIt = d->_logs.find(tid);
if (logIt == d->_logs.end())
{
// subscribes new thread
d->_logs[tid];
}
}
}
void AppLog::unsubscribe()
{
ost::MutexLock mtx(d->_subMutex);
Thread *pThr = getThread();
if (pThr)
{
cctid_t tid = pThr->getId();
LogPrivateData::iterator logIt = d->_logs.find(tid);
if (logIt != d->_logs.end())
{
// unsubscribes thread
d->_logs.erase(logIt);
}
}
}
#ifndef _MSWINDOWS_
void AppLog::logFileName(const char* FileName, bool logDirectly, bool usePipe)
#else
void AppLog::logFileName(const char* FileName, bool logDirectly)
#endif
{
if (!FileName)
{
slog.error("Null file name!");
return;
}
d->_lock.enterMutex();
d->_nomeFile = FileName;
close();
d->_logDirectly = logDirectly;
#ifndef _MSWINDOWS_
d->_logPipe = usePipe;
#else
d->_logPipe = false;
#endif
if (!d->_logDirectly)
{
if (d->_pLogger)
d->_pLogger->logFileName(FileName, d->_logPipe);
else
d->_pLogger = new logger(FileName, d->_logPipe);
d->_lock.leaveMutex();
return;
}
// log directly
if (!d->_nomeFile.empty())
{
if (!d->_logPipe)
{
d->_logfs.open(d->_nomeFile.c_str(), std::fstream::out | std::fstream::app);
}
#ifndef _MSWINDOWS_
else
{
// create pipe
int err = mkfifo(d->_nomeFile.c_str(), S_IREAD | S_IWRITE);
if (err == 0 || errno == EEXIST)
{
// and open it
d->_logfs.open(d->_nomeFile.c_str(), std::fstream::in | std::fstream::out);
}
else
THROW(AppLogException("Can't create pipe"));
}
#endif
if (d->_logfs.fail())
THROW(AppLogException("Can't open log file name"));
}
d->_lock.leaveMutex();
}
// writes to log
void AppLog::writeLog(bool endOfLine)
{
Thread *pThr = getThread();
if (pThr)
{
cctid_t tid = pThr->getId();
LogPrivateData::iterator logIt = d->_logs.find(tid);
if (logIt == d->_logs.end())
return;
if ((d->_logDirectly && !d->_logfs.is_open() && !logIt->second._clogEnable) ||
(!d->_logDirectly && !d->_pLogger && !logIt->second._clogEnable))
{
logIt->second._msgpos = 0;
logIt->second._msgbuf[0] = '\0';
return;
}
if (logIt->second._enable)
{
time_t now;
struct tm *dt;
time(&now);
struct timeval detail_time;
gettimeofday(&detail_time, NULL);
dt = localtime(&now);
char buf[50];
const char *p = "unknown";
switch (logIt->second._priority)
{
case Slog::levelEmergency:
p = "emerg";
break;
case Slog::levelInfo:
p = "info";
break;
case Slog::levelError:
p = "error";
break;
case Slog::levelAlert:
p = "alert";
break;
case Slog::levelDebug:
p = "debug";
break;
case Slog::levelNotice:
p = "notice";
break;
case Slog::levelWarning:
p = "warn";
break;
case Slog::levelCritical:
p = "crit";
break;
}
snprintf(buf, sizeof(buf) - 1, "%04d-%02d-%02d %02d:%02d:%02d.%03d ",
dt->tm_year + 1900, dt->tm_mon + 1, dt->tm_mday,
dt->tm_hour, dt->tm_min, dt->tm_sec, (int)(detail_time.tv_usec / 1000));
buf[sizeof(buf)-1] = 0; // per sicurezza
if (d->_logDirectly)
{
d->_lock.enterMutex();
if (d->_logfs.is_open())
{
d->_logfs << buf;
if (!logIt->second._ident.empty())
d->_logfs << logIt->second._ident.c_str() << ": ";
d->_logfs << "[" << p << "] ";
d->_logfs << logIt->second._msgbuf;
if (endOfLine)
d->_logfs << endl;
d->_logfs.flush();
}
}
else if (d->_pLogger)
{
// ThreadQueue
std::stringstream sstr;
sstr.str(""); // reset contents
sstr << buf;
if (!logIt->second._ident.empty())
sstr << logIt->second._ident.c_str() << ": ";
sstr << "[" << p << "] ";
sstr << logIt->second._msgbuf;
if (endOfLine)
sstr << endl;
sstr.flush();
if (sstr.fail())
cerr << "stringstream failed!!!! " << endl;
// enqueues log message
d->_pLogger->post((void *) sstr.str().c_str(), sstr.str().length() + 1);
d->_lock.enterMutex();
}
// slog it if error level is right
if (logIt->second._slogEnable && logIt->second._priority <= Slog::levelError)
{
slog((Slog::Level) logIt->second._priority) << logIt->second._msgbuf;
if (endOfLine) slog << endl;
}
if (logIt->second._clogEnable
#ifndef _MSWINDOWS_
&& (getppid() > 1)
#endif
)
{
clog << logIt->second._msgbuf;
if (endOfLine)
clog << endl;
}
d->_lock.leaveMutex();
}
logIt->second._msgpos = 0;
logIt->second._msgbuf[0] = '\0';
}
}
void AppLog::close(void)
{
if (d->_logDirectly)
{
d->_lock.enterMutex();
if (d->_logfs.is_open())
{
d->_logfs.flush();
d->_logfs.close();
}
d->_lock.leaveMutex();
}
else
{
if (d->_pLogger)
d->_pLogger->closeFile();
}
}
void AppLog::open(const char *ident)
{
Thread *pThr = getThread();
if (pThr)
{
cctid_t tid = pThr->getId();
LogPrivateData::iterator logIt = d->_logs.find(tid);
if (logIt == d->_logs.end())
return;
if (d->_nomeFile.empty())
{
std::cerr << "Empty file name" << std::endl;
slog.emerg("Empty file nane!\n");
}
if (d->_logDirectly)
{
d->_lock.enterMutex();
if (!d->_logfs.is_open())
{
d->_logfs.open(d->_nomeFile.c_str(), std::fstream::out | std::fstream::app);
}
if (!d->_logfs.is_open())
{
std::cerr << "Can't open file name!" << std::endl;
slog.emerg("Can't open file name!\n");
}
d->_lock.leaveMutex();
}
else
{
if (d->_pLogger)
d->_pLogger->openFile();
}
if (ident != NULL)
logIt->second._ident = ident;
}
}
void AppLog::identLevel(const char *ident, Slog::Level level)
{
if (!ident)
return;
string id = ident;
IdentLevel::iterator idLevIt = d->_identLevel.find(id);
if (idLevIt == d->_identLevel.end())
{
d->_identLevel[id] = level;
}
else
idLevIt->second = level;
}
void AppLog::level(Slog::Level enable)
{
Thread *pThr = getThread();
if (pThr)
{
cctid_t tid = pThr->getId();
LogPrivateData::iterator logIt = d->_logs.find(tid);
if (logIt == d->_logs.end())
return;
logIt->second._level = enable;
}
}
void AppLog::clogEnable(bool f)
{
Thread *pThr = getThread();
if (pThr)
{
cctid_t tid = pThr->getId();
LogPrivateData::iterator logIt = d->_logs.find(tid);
if (logIt == d->_logs.end())
return;
logIt->second._clogEnable = f;
}
}
void AppLog::slogEnable(bool en)
{
Thread *pThr = getThread();
if (pThr)
{
cctid_t tid = pThr->getId();
LogPrivateData::iterator logIt = d->_logs.find(tid);
if (logIt == d->_logs.end())
return;
logIt->second._slogEnable = en;
}
}
int AppLog::sync()
{
int retVal = (pbase() != pptr());
if (fail())
{
slog(Slog::levelNotice) << "fail() is true, calling clear()" << endl;
clear();
}
Thread *pThr = getThread();
if (pThr)
{
cctid_t tid = pThr->getId();
LogPrivateData::iterator logIt = d->_logs.find(tid);
if (logIt != d->_logs.end())
{
retVal = (logIt->second._msgpos > 0);
if (retVal)
{
slog(Slog::levelNotice) << "sync called and msgpos > 0" << endl;
}
}
}
overflow(EOF);
return retVal;
}
int AppLog::overflow(int c)
{
Thread *pThr = getThread();
if (pThr)
{
cctid_t tid = pThr->getId();
LogPrivateData::iterator logIt = d->_logs.find(tid);
if (logIt == d->_logs.end())
return c;
if (!logIt->second._enable)
return c;
if (c == '\n' || !c || c == EOF)
{
if (!logIt->second._msgpos)
{
if (c == '\n') writeLog(true);
return c;
}
if (logIt->second._msgpos < (int)(sizeof(logIt->second._msgbuf) - 1))
logIt->second._msgbuf[logIt->second._msgpos] = 0;
else
logIt->second._msgbuf[logIt->second._msgpos-1] = 0;
writeLog(c == '\n');
//reset buffer
logIt->second._msgpos = 0;
return c;
}
if (logIt->second._msgpos < (int)(sizeof(logIt->second._msgbuf) - 1))
logIt->second._msgbuf[logIt->second._msgpos++] = c;
}
return c;
}
void AppLog::error(const char *format, ...)
{
va_list args;
Thread *pThr = getThread();
if (pThr)
{
cctid_t tid = pThr->getId();
LogPrivateData::iterator logIt = d->_logs.find(tid);
if (logIt == d->_logs.end())
return;
error();
if (!logIt->second._enable)
return;
overflow(EOF);
va_start(args, format);
logIt->second._msgbuf[logStruct::BUFF_SIZE-1] = '\0';
logIt->second._msgpos = vsnprintf(logIt->second._msgbuf, logStruct::BUFF_SIZE, format, args);
if (logIt->second._msgpos > logStruct::BUFF_SIZE - 1) logIt->second._msgpos = logStruct::BUFF_SIZE - 1;
overflow(EOF);
if (logIt->second._slogEnable)
slog.error(logIt->second._msgbuf);
va_end(args);
}
}
void AppLog::warn(const char *format, ...)
{
va_list args;
Thread *pThr = getThread();
if (pThr)
{
cctid_t tid = pThr->getId();
LogPrivateData::iterator logIt = d->_logs.find(tid);
if (logIt == d->_logs.end())
return;
warn();
if (!logIt->second._enable)
return;
overflow(EOF);
va_start(args, format);
logIt->second._msgbuf[logStruct::BUFF_SIZE-1] = '\0';
logIt->second._msgpos = vsnprintf(logIt->second._msgbuf, logStruct::BUFF_SIZE, format, args);
if (logIt->second._msgpos > logStruct::BUFF_SIZE - 1) logIt->second._msgpos = logStruct::BUFF_SIZE - 1;
overflow(EOF);
if (logIt->second._slogEnable)
slog.warn(logIt->second._msgbuf);
va_end(args);
}
}
void AppLog::debug(const char *format, ...)
{
va_list args;
Thread *pThr = getThread();
if (pThr)
{
cctid_t tid = pThr->getId();
LogPrivateData::iterator logIt = d->_logs.find(tid);
if (logIt == d->_logs.end())
return;
debug();
if (!logIt->second._enable)
return;
overflow(EOF);
va_start(args, format);
logIt->second._msgbuf[logStruct::BUFF_SIZE-1] = '\0';
logIt->second._msgpos = vsnprintf(logIt->second._msgbuf, logStruct::BUFF_SIZE, format, args);
if (logIt->second._msgpos > logStruct::BUFF_SIZE - 1) logIt->second._msgpos = logStruct::BUFF_SIZE - 1;
overflow(EOF);
va_end(args);
}
}
void AppLog::emerg(const char *format, ...)
{
va_list args;
Thread *pThr = getThread();
if (pThr)
{
cctid_t tid = pThr->getId();
LogPrivateData::iterator logIt = d->_logs.find(tid);
if (logIt == d->_logs.end())
return;
emerg();
if (!logIt->second._enable)
return;
overflow(EOF);
va_start(args, format);
logIt->second._msgbuf[logStruct::BUFF_SIZE-1] = '\0';
logIt->second._msgpos = vsnprintf(logIt->second._msgbuf, logStruct::BUFF_SIZE, format, args);
if (logIt->second._msgpos > logStruct::BUFF_SIZE - 1) logIt->second._msgpos = logStruct::BUFF_SIZE - 1;
overflow(EOF);
if (logIt->second._slogEnable)
slog.emerg(logIt->second._msgbuf);
va_end(args);
}
}
void AppLog::alert(const char *format, ...)
{
va_list args;
Thread *pThr = getThread();
if (pThr)
{
cctid_t tid = pThr->getId();
LogPrivateData::iterator logIt = d->_logs.find(tid);
if (logIt == d->_logs.end())
return;
alert();
if (!logIt->second._enable)
return;
overflow(EOF);
va_start(args, format);
logIt->second._msgbuf[logStruct::BUFF_SIZE-1] = '\0';
logIt->second._msgpos = vsnprintf(logIt->second._msgbuf, logStruct::BUFF_SIZE, format, args);
if (logIt->second._msgpos > logStruct::BUFF_SIZE - 1) logIt->second._msgpos = logStruct::BUFF_SIZE - 1;
overflow(EOF);
if (logIt->second._slogEnable)
slog.alert(logIt->second._msgbuf);
va_end(args);
}
}
void AppLog::critical(const char *format, ...)
{
va_list args;
Thread *pThr = getThread();
if (pThr)
{
cctid_t tid = pThr->getId();
LogPrivateData::iterator logIt = d->_logs.find(tid);
if (logIt == d->_logs.end())
return;
critical();
if (!logIt->second._enable)
return;
overflow(EOF);
va_start(args, format);
logIt->second._msgbuf[logStruct::BUFF_SIZE-1] = '\0';
logIt->second._msgpos = vsnprintf(logIt->second._msgbuf, logStruct::BUFF_SIZE, format, args);
if (logIt->second._msgpos > logStruct::BUFF_SIZE - 1) logIt->second._msgpos = logStruct::BUFF_SIZE - 1;
overflow(EOF);
if (logIt->second._slogEnable)
slog.critical(logIt->second._msgbuf);
va_end(args);
}
}
void AppLog::notice(const char *format, ...)
{
va_list args;
Thread *pThr = getThread();
if (pThr)
{
cctid_t tid = pThr->getId();
LogPrivateData::iterator logIt = d->_logs.find(tid);
if (logIt == d->_logs.end())
return;
notice();
if (!logIt->second._enable)
return;
overflow(EOF);
va_start(args, format);
logIt->second._msgbuf[logStruct::BUFF_SIZE-1] = '\0';
logIt->second._msgpos = vsnprintf(logIt->second._msgbuf, logStruct::BUFF_SIZE, format, args);
if (logIt->second._msgpos > logStruct::BUFF_SIZE - 1) logIt->second._msgpos = logStruct::BUFF_SIZE - 1;
overflow(EOF);
if (logIt->second._slogEnable)
slog.notice(logIt->second._msgbuf);
va_end(args);
}
}
void AppLog::info(const char *format, ...)
{
va_list args;
Thread *pThr = getThread();
if (pThr)
{
cctid_t tid = pThr->getId();
LogPrivateData::iterator logIt = d->_logs.find(tid);
if (logIt == d->_logs.end())
return;
info();
if (!logIt->second._enable)
return;
overflow(EOF);
va_start(args, format);
logIt->second._msgbuf[logStruct::BUFF_SIZE-1] = '\0';
logIt->second._msgpos = vsnprintf(logIt->second._msgbuf, logStruct::BUFF_SIZE, format, args);
if (logIt->second._msgpos > logStruct::BUFF_SIZE - 1) logIt->second._msgpos = logStruct::BUFF_SIZE - 1;
overflow(EOF);
va_end(args);
}
}
AppLog &AppLog::operator()(Slog::Level lev)
{
Thread *pThr = getThread();
if (pThr)
{
cctid_t tid = pThr->getId();
LogPrivateData::iterator logIt = d->_logs.find(tid);
if (logIt == d->_logs.end())
return *this;
// needed? overflow(EOF);
// enables log
Slog::Level th_lev = logIt->second._level;
logIt->second._enable = (th_lev >= lev);
// is there a log level per module?
if (!logIt->second._ident.empty())
{
std::string st = logIt->second._ident;
IdentLevel::iterator idLevIt = d->_identLevel.find(st);
if (idLevIt != d->_identLevel.end())
{
th_lev = idLevIt->second;
logIt->second._enable = (th_lev >= lev);
}
}
logIt->second._priority = lev;
}
return *this;
}
AppLog &AppLog::operator()(const char *ident, Slog::Level lev)
{
Thread *pThr = getThread();
if (pThr)
{
cctid_t tid = pThr->getId();
LogPrivateData::iterator logIt = d->_logs.find(tid);
if (logIt == d->_logs.end())
return this->operator()(lev);
logIt->second._enable = true;
open(ident);
}
return this->operator()(lev);
}
AppLog& AppLog::operator<< (AppLog& (*pfManipulator)(AppLog&))
{
return (*pfManipulator)(*this);
}
AppLog& AppLog::operator<< (ostream& (*pfManipulator)(ostream&))
{
(*pfManipulator)(*(dynamic_cast(this)));
return *this ;
}
#endif
ucommon-6.0.7/commoncpp/pointer.cpp 0000644 0001750 0001750 00000005727 12163025062 014311 0000000 0000000 // Copyright (C) 2004-2005 Open Source Telecom Corporation.
// Copyright (C) 2006-2010 David Sugar, Tycho Softworks.
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
//
// As a special exception, you may use this file as part of a free software
// library without restriction. Specifically, if other files instantiate
// templates or use macros or inline functions from this file, or you compile
// this file and link it with other files to produce an executable, this
// file does not by itself cause the resulting executable to be covered by
// the GNU General Public License. This exception does not however
// invalidate any other reasons why the executable file might be covered by
// the GNU General Public License.
//
// This exception applies only to the code released under the name GNU
// Common C++. If you copy code from other releases into a copy of GNU
// Common C++, as the General Public License permits, the exception does
// not apply to the code that you add in this way. To avoid misleading
// anyone as to the status of such modified files, you must delete
// this exception notice from them.
//
// If you write modifications of your own for GNU Common C++, it is your choice
// whether to permit this exception to apply to your modifications.
// If you do not wish that, delete this exception notice.
//
#include
#include
#include
#include
#include
using namespace COMMONCPP_NAMESPACE;
RefObject::~RefObject() {}
void RefPointer::enterLock(void) {}
void RefPointer::leaveLock(void) {}
void RefPointer::detach(void)
{
if(ref) {
enterLock();
--(ref->refCount);
if(!ref->refCount)
delete ref;
leaveLock();
ref = NULL;
}
}
RefPointer::RefPointer(RefObject *obj)
{
enterLock();
++obj->refCount;
leaveLock();
ref = obj;
}
RefPointer::RefPointer(const RefPointer &ptr)
{
detach();
ref = ptr.ref;
if(ref) {
enterLock();
++ref->refCount;
leaveLock();
}
}
RefPointer::~RefPointer()
{
detach();
}
void *RefPointer::getObject() const
{
if(ref)
return ref->getObject();
return NULL;
}
bool RefPointer::operator!() const
{
if(ref && ref->refCount == 1)
return true;
return false;
}
ucommon-6.0.7/commoncpp/file.cpp 0000644 0001750 0001750 00000101705 12163025062 013541 0000000 0000000 // Copyright (C) 1999-2005 Open Source Telecom Corporation.
// Copyright (C) 2006-2010 David Sugar, Tycho Softworks.
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
//
// As a special exception, you may use this file as part of a free software
// library without restriction. Specifically, if other files instantiate
// templates or use macros or inline functions from this file, or you compile
// this file and link it with other files to produce an executable, this
// file does not by itself cause the resulting executable to be covered by
// the GNU General Public License. This exception does not however
// invalidate any other reasons why the executable file might be covered by
// the GNU General Public License.
//
// This exception applies only to the code released under the name GNU
// Common C++. If you copy code from other releases into a copy of GNU
// Common C++, as the General Public License permits, the exception does
// not apply to the code that you add in this way. To avoid misleading
// anyone as to the status of such modified files, you must delete
// this exception notice from them.
//
// If you write modifications of your own for GNU Common C++, it is your choice
// whether to permit this exception to apply to your modifications.
// If you do not wish that, delete this exception notice.
//
#ifndef _MSC_VER
#include
#endif
// needed for GNU/LINUX glibc otherwise pread/pwrite wont work
#ifndef _XOPEN_SOURCE
#define _XOPEN_SOURCE 600
#endif
/*
* on old glibc's, this has to be
* defined explicitly
*/
#ifndef _XOPEN_SOURCE_EXTENDED
#define _XOPEN_SOURCE_EXTENDED
#endif
#include
// broken BSD; XOPEN should not imply _POSIX_C_SOURCE,
// _POSIX_C_SOURCE should not stop __BSD_VISIBLE
#define u_int unsigned int
#define u_short unsigned short
#define u_long unsigned long
#define u_char unsigned char
#include
#ifdef HAVE_SYS_PARAM_H
#include
#endif
#ifdef HAVE_SYS_FILE_H
#include
#endif
#ifdef HAVE_SYS_LOCKF_H
#include
#endif
#include
#include
#include
#include
#include
#include
#ifdef __BORLANDC__
#include
#include
#else
#include
#include
#endif
#include
#include
#ifndef _MSWINDOWS_
#ifdef COMMON_AIX_FIXES
#undef LOCK_EX
#undef LOCK_SH
#endif
#ifdef MACOSX
#define MISSING_LOCKF
#endif
#ifndef F_LOCK
#define MISSING_LOCKF
enum {
F_ULOCK = 1,
F_LOCK,
F_TLOCK,
F_TEST
};
#endif
#endif // ndef WIN32
#if defined(_OSF_SOURCE) && defined(_POSIX_C_SOURCE) && _POSIX_C_SOURCE > 1
#undef LOCK_EX
#undef LOCK_SH
#endif
#if 0
/*
* not used anymore ? (hen)
*/
static const char *clearfile(const char *pathname)
{
remove(pathname);
return pathname;
}
static const char *clearfifo(const char *pathname, int mode)
{
remove(pathname);
mkfifo(pathname, mode);
return pathname;
}
#endif
NAMESPACE_COMMONCPP
RandomFile::RandomFile(const char *name) : Mutex()
{
#ifdef _MSWINDOWS_
fd = INVALID_HANDLE_VALUE;
// immediate is not defined on Win32
#else
fd = -1;
flags.immediate = false;
#endif
flags.thrown = flags.initial = flags.temp = false;
flags.count = 0;
pathname = NULL;
}
RandomFile::RandomFile(const RandomFile &rf) : Mutex()
{
// first, `dup'-licate the file descriptor/handle
#ifdef _MSWINDOWS_
HANDLE pidHandle = GetCurrentProcess();
HANDLE dupHandle;
if(rf.fd != INVALID_HANDLE_VALUE) {
if(!DuplicateHandle(pidHandle, rf.fd, pidHandle, &dupHandle, 0, FALSE, DUPLICATE_SAME_ACCESS))
fd = INVALID_HANDLE_VALUE;
else
fd = dupHandle;
}
else
fd = INVALID_HANDLE_VALUE;
#else
if(rf.fd > -1)
fd = dup(rf.fd);
else
fd = -1;
#endif
flags = rf.flags;
flags.count = 0;
if(rf.pathname)
pathname = newString(rf.pathname);
else
pathname = NULL;
}
RandomFile::~RandomFile()
{
final();
}
File::Error RandomFile::restart(void)
{
return errOpenFailed;
}
File::Attr RandomFile::initialize(void)
{
return attrPublic;
}
void RandomFile::final(void)
{
#ifdef _MSWINDOWS_
if(fd != INVALID_HANDLE_VALUE) {
CloseHandle(fd);
if(flags.temp && pathname)
DeleteFile(pathname);
}
#else
if(fd > -1) {
close(fd);
if(flags.temp && pathname)
remove(pathname);
}
#endif
if(pathname) {
delString(pathname);
pathname = NULL;
}
#ifdef _MSWINDOWS_
fd = INVALID_HANDLE_VALUE;
#else
fd = -1;
#endif
flags.count = 0;
flags.initial = false;
}
RandomFile::Error RandomFile::error(Error id, char *str)
{
errstr = str;
errid = id;
if(!flags.thrown) {
flags.thrown = true;
#ifdef CCXX_EXCEPTIONS
if(Thread::getException() == Thread::throwObject)
throw(this);
#ifdef COMMON_STD_EXCEPTION
else if(Thread::getException() == Thread::throwException) {
if(!str)
str = (char *)"";
throw FileException(str);
}
#endif
#endif
}
return id;
}
bool RandomFile::initial(void)
{
bool init;
#ifdef _MSWINDOWS_
if(fd == INVALID_HANDLE_VALUE)
#else
if(fd < 0)
#endif
return false;
enterMutex();
init = flags.initial;
flags.initial = false;
if(!init) {
leaveMutex();
return false;
}
#ifdef _MSWINDOWS_
Attr access = initialize();
if(access == attrInvalid) {
CloseHandle(fd);
if(pathname)
DeleteFile(pathname);
fd = INVALID_HANDLE_VALUE;
leaveMutex();
error(errInitFailed);
return false;
}
#else
int mode = (int)initialize();
if(!mode) {
close(fd);
fd = -1;
if(pathname)
remove(pathname);
leaveMutex();
error(errInitFailed);
return false;
}
fchmod(fd, mode);
#endif
leaveMutex();
return init;
}
#ifndef _MSWINDOWS_
RandomFile::Error RandomFile::setCompletion(Complete mode)
{
long flag = fcntl(fd, F_GETFL);
if(fd < 0)
return errNotOpened;
flags.immediate = false;
#ifdef O_SYNC
flag &= ~(O_SYNC | O_NONBLOCK);
#else
flag &= ~O_NONBLOCK;
#endif
switch(mode) {
case completionImmediate:
#ifdef O_SYNC
flag |= O_SYNC;
#endif
flags.immediate = true;
break;
case completionDelayed:
flag |= O_NONBLOCK;
//completionDeferred: ? (hen)
case completionDeferred:
break;
}
fcntl(fd, F_SETFL, flag);
return errSuccess;
}
#endif
off_t RandomFile::getCapacity(void)
{
off_t eof, pos = 0;
#ifdef _MSWINDOWS_
if(!fd)
#else
if(fd < 0)
#endif
return 0;
enterMutex();
#ifdef _MSWINDOWS_
pos = SetFilePointer(fd, 0l, NULL, FILE_CURRENT);
eof = SetFilePointer(fd, 0l, NULL, FILE_END);
SetFilePointer(fd, pos, NULL, FILE_BEGIN);
#else
lseek(fd, pos, SEEK_SET);
pos = lseek(fd, 0l, SEEK_CUR);
eof = lseek(fd, 0l, SEEK_END);
#endif
leaveMutex();
return eof;
}
bool RandomFile::operator!(void)
{
#ifdef _MSWINDOWS_
return fd == INVALID_HANDLE_VALUE;
#else
if(fd < 0)
return true;
return false;
#endif
}
SharedFile::SharedFile(const char *path) :
RandomFile(path)
{
fcb.address = NULL;
fcb.len = 0;
fcb.pos = 0;
open(path);
}
SharedFile::SharedFile(const SharedFile &sh) :
RandomFile(sh)
{
}
SharedFile::~SharedFile()
{
final();
}
SharedFile::Error SharedFile::open(const char *path)
{
#ifdef _MSWINDOWS_
if(fd != INVALID_HANDLE_VALUE)
#else
if(fd > -1)
#endif
final();
if(path != pathname) {
if(pathname)
delString(pathname);
pathname = newString(path);
}
flags.initial = false;
#ifdef _MSWINDOWS_
fd = CreateFile(pathname, GENERIC_READ | GENERIC_WRITE, FILE_SHARE_READ | FILE_SHARE_WRITE, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL | FILE_FLAG_RANDOM_ACCESS, NULL);
if(fd == INVALID_HANDLE_VALUE) {
flags.initial = true;
fd = CreateFile(pathname, GENERIC_READ | GENERIC_WRITE, FILE_SHARE_READ | FILE_SHARE_WRITE, NULL, CREATE_NEW, FILE_ATTRIBUTE_NORMAL | FILE_FLAG_RANDOM_ACCESS, NULL);
}
if(fd == INVALID_HANDLE_VALUE)
return errOpenFailed;
return errSuccess;
#else
fd = ::open(pathname, O_RDWR);
if(fd < 0) {
flags.initial = true;
fd = ::open(pathname, O_CREAT | O_RDWR | O_TRUNC,
(int)attrPrivate);
}
if(fd < 0)
return error(errOpenFailed);
#ifdef LOCK_SH
if(::flock(fd, LOCK_SH | LOCK_NB)) {
close(fd);
fd = -1;
return error(errOpenInUse);
}
#endif
return errSuccess;
#endif // WIN32
}
SharedFile::Error SharedFile::fetch(caddr_t address, ccxx_size_t len, off_t pos)
{
#ifdef _MSWINDOWS_
if(fd == INVALID_HANDLE_VALUE)
#else
if(fd < 0)
#endif
return errNotOpened;
enterMutex();
if(address)
fcb.address = address;
if(len)
fcb.len = len;
if(pos != -1)
fcb.pos = pos;
#ifdef _MSWINDOWS_
OVERLAPPED over;
SetFilePointer(fd, fcb.pos, NULL, FILE_BEGIN);
over.hEvent = 0;
over.Offset = fcb.pos;
over.OffsetHigh = 0;
LockFileEx(fd, LOCKFILE_EXCLUSIVE_LOCK, 0, fcb.len, 0, &over);
DWORD count;
if(!ReadFile(fd, fcb.address, fcb.len, &count, NULL)) {
leaveMutex();
return errReadFailure;
}
leaveMutex();
if(count < fcb.len)
return errReadIncomplete;
return errSuccess;
#else
lseek(fd, fcb.pos, SEEK_SET);
if(lockf(fd, F_LOCK, fcb.len)) {
leaveMutex();
return errLockFailure;
}
int io = ::read(fd, fcb.address, fcb.len);
leaveMutex();
if((size_t) io == fcb.len)
return errSuccess;
if(io > -1)
return errReadIncomplete;
switch(errno) {
case EINTR:
return errReadInterrupted;
default:
return errReadFailure;
}
#endif
}
#ifndef _MSWINDOWS_
SharedFile::Error SharedFile::clear(ccxx_size_t len, off_t pos)
{
if(fd < 0)
return errNotOpened;
enterMutex();
if(len)
fcb.len = len;
if(pos != -1)
fcb.pos = pos;
lseek(fd, fcb.pos, SEEK_SET);
if(lockf(fd, F_ULOCK, fcb.len)) {
leaveMutex();
return errLockFailure;
}
leaveMutex();
return errSuccess;
}
#endif // ndef WIN32
SharedFile::Error SharedFile::update(caddr_t address, ccxx_size_t len, off_t pos)
{
#ifdef _MSWINDOWS_
if(fd == INVALID_HANDLE_VALUE)
#else
if(fd < 0)
#endif
return errNotOpened;
enterMutex();
if(address)
fcb.address = address;
if(len)
fcb.len = len;
if(pos != -1)
fcb.pos = pos;
#ifdef _MSWINDOWS_
OVERLAPPED over;
SetFilePointer(fd, fcb.pos, NULL, FILE_BEGIN);
over.hEvent = 0;
over.Offset = pos;
over.OffsetHigh = 0;
DWORD count;
if(!WriteFile(fd, fcb.address, fcb.len, &count, NULL)) {
SetFilePointer(fd, fcb.pos, NULL, FILE_CURRENT);
UnlockFileEx(fd, 0, len, 0, &over);
leaveMutex();
return errWriteFailure;
}
SetFilePointer(fd, fcb.pos, NULL, FILE_CURRENT);
UnlockFileEx(fd, 0, len, 0, &over);
leaveMutex();
if(count < fcb.len)
return errWriteIncomplete;
return errSuccess;
#else
lseek(fd, fcb.pos, SEEK_SET);
int io = ::write(fd, fcb.address, fcb.len);
if(lockf(fd, F_ULOCK, fcb.len)) {
leaveMutex();
return errLockFailure;
}
leaveMutex();
if((size_t) io == fcb.len)
return errSuccess;
if(io > -1)
return errWriteIncomplete;
switch(errno) {
case EINTR:
return errWriteInterrupted;
default:
return errWriteFailure;
}
#endif // WIN32
}
SharedFile::Error SharedFile::append(caddr_t address, ccxx_size_t len)
{
#ifdef _MSWINDOWS_
if(fd == INVALID_HANDLE_VALUE)
#else
if(fd < 0)
#endif
return errNotOpened;
enterMutex();
if(address)
fcb.address = address;
if(len)
fcb.len = len;
#ifdef _MSWINDOWS_
fcb.pos = SetFilePointer(fd, 0l, NULL, FILE_END);
OVERLAPPED over;
over.hEvent = 0;
over.Offset = fcb.pos;
over.OffsetHigh = 0;
LONG eof = fcb.pos;
LockFileEx(fd, LOCKFILE_EXCLUSIVE_LOCK, 0, 0x7fffffff, 0, &over);
fcb.pos = SetFilePointer(fd, 0l, NULL, FILE_END);
DWORD count;
if(!WriteFile(fd, fcb.address, fcb.len, &count, NULL)) {
SetFilePointer(fd, eof, NULL, FILE_CURRENT);
UnlockFileEx(fd, 0, 0x7fffffff, 0, &over);
leaveMutex();
return errWriteFailure;
}
SetFilePointer(fd, eof, NULL, FILE_CURRENT);
UnlockFileEx(fd, 0, 0x7fffffff, 0, &over);
leaveMutex();
if(count < fcb.len)
return errWriteIncomplete;
return errSuccess;
#else
fcb.pos = lseek(fd, 0l, SEEK_END);
if(lockf(fd, F_LOCK, -1)) {
leaveMutex();
return errLockFailure;
}
fcb.pos = lseek(fd, 0l, SEEK_END);
int io = ::write(fd, fcb.address, fcb.len);
lseek(fd, fcb.pos, SEEK_SET);
if(lockf(fd, F_ULOCK, -1)) {
leaveMutex();
return errLockFailure;
}
leaveMutex();
if((size_t) io == fcb.len)
return errSuccess;
if(io > -1)
return errWriteIncomplete;
switch(errno) {
case EINTR:
return errWriteInterrupted;
default:
return errWriteFailure;
}
#endif // WIN32
}
off_t SharedFile::getPosition(void)
{
return fcb.pos;
}
bool SharedFile::operator++(void)
{
off_t eof;
enterMutex();
fcb.pos += fcb.len;
#ifdef _MSWINDOWS_
eof = SetFilePointer(fd, 0l, NULL, FILE_END);
#else
eof = lseek(fd, 0l, SEEK_END);
#endif
if(fcb.pos >= eof) {
fcb.pos = eof;
leaveMutex();
return true;
}
leaveMutex();
return false;
}
bool SharedFile::operator--(void)
{
enterMutex();
fcb.pos -= fcb.len;
if(fcb.pos <= 0) {
fcb.pos = 0;
leaveMutex();
return true;
}
leaveMutex();
return false;
}
size_t MappedFile::pageAligned(size_t size)
{
size_t pages = size / Process::getPageSize();
if(size % Process::getPageSize())
++pages;
return pages * Process::getPageSize();
}
#ifdef _MSWINDOWS_
static void makemapname(const char *source, char *target)
{
unsigned count = 60;
while(*source && count--) {
if(*source == '/' || *source == '\\')
*(target++) = '_';
else
*(target++) = toupper(*source);
++source;
}
*target = 0;
}
MappedFile::MappedFile(const char *fname, Access mode, size_t size) :
RandomFile(fname)
{
DWORD share = 0, page = 0;
map = INVALID_HANDLE_VALUE;
fcb.address = NULL;
switch(mode) {
case accessReadOnly:
share = FILE_SHARE_READ;
page = PAGE_READONLY;
prot = FILE_MAP_READ;
break;
case accessWriteOnly:
share = FILE_SHARE_WRITE;
page = PAGE_WRITECOPY;
prot = FILE_MAP_COPY;
break;
case accessReadWrite:
share = FILE_SHARE_READ|FILE_SHARE_WRITE;
page = PAGE_READWRITE;
prot = FILE_MAP_WRITE;
}
if(share || page)
fd = CreateFile(pathname, mode, share, NULL, OPEN_ALWAYS, FILE_ATTRIBUTE_NORMAL | FILE_FLAG_RANDOM_ACCESS, NULL);
else
fd = INVALID_HANDLE_VALUE;
if(fd == INVALID_HANDLE_VALUE) {
error(errOpenFailed);
return;
}
SetFilePointer(fd, (LONG)size, 0, FILE_BEGIN);
SetEndOfFile(fd);
makemapname(fname, mapname);
map = CreateFileMapping(fd, NULL, page, 0, 0, mapname);
if(!map)
error(errMapFailed);
fcb.address = (caddr_t)MapViewOfFile(map, prot, 0, 0, size);
fcb.len = (ccxx_size_t)size;
fcb.pos = 0;
if(!fcb.address)
error(errMapFailed);
}
MappedFile::MappedFile(const char *fname, Access mode) :
RandomFile(fname)
{
DWORD share = 0, page = 0;
map = INVALID_HANDLE_VALUE;
fcb.address = NULL;
switch(mode) {
case accessReadOnly:
share = FILE_SHARE_READ;
page = PAGE_READONLY;
prot = FILE_MAP_READ;
break;
case accessWriteOnly:
share = FILE_SHARE_WRITE;
page = PAGE_WRITECOPY;
prot = FILE_MAP_COPY;
break;
case accessReadWrite:
share = FILE_SHARE_READ|FILE_SHARE_WRITE;
page = PAGE_READWRITE;
prot = FILE_MAP_WRITE;
}
if(share || page)
fd = CreateFile(pathname, mode, share, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL | FILE_FLAG_RANDOM_ACCESS, NULL);
else
fd = INVALID_HANDLE_VALUE;
if(fd == INVALID_HANDLE_VALUE) {
error(errOpenFailed);
return;
}
makemapname(fname, mapname);
map = CreateFileMapping(fd, NULL, page, 0, 0, mapname);
if(!map)
error(errMapFailed);
}
MappedFile::MappedFile(const char *fname, pos_t pos, size_t len, Access mode) :
RandomFile(fname)
{
DWORD share = 0, page = 0;
map = INVALID_HANDLE_VALUE;
fcb.address = NULL;
switch(mode) {
case accessReadOnly:
share = FILE_SHARE_READ;
page = PAGE_READONLY;
prot = FILE_MAP_READ;
break;
case accessWriteOnly:
share = FILE_SHARE_WRITE;
page = PAGE_WRITECOPY;
prot = FILE_MAP_COPY;
break;
case accessReadWrite:
share = FILE_SHARE_READ|FILE_SHARE_WRITE;
page = PAGE_READWRITE;
prot = FILE_MAP_WRITE;
}
if(share || page)
fd = CreateFile(pathname, mode, share, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL | FILE_FLAG_RANDOM_ACCESS, NULL);
else
fd = INVALID_HANDLE_VALUE;
if(fd == INVALID_HANDLE_VALUE) {
error(errOpenFailed);
return;
}
makemapname(fname, mapname);
map = CreateFileMapping(fd, NULL, page, 0, 0, mapname);
if(!map) {
error(errMapFailed);
return;
}
fcb.address = (caddr_t)MapViewOfFile(map, prot, 0, pos, len);
fcb.len = (ccxx_size_t)len;
fcb.pos = pos;
if(!fcb.address)
error(errMapFailed);
}
MappedFile::~MappedFile()
{
if(fcb.address) {
unlock();
UnmapViewOfFile(fcb.address);
}
if(map != INVALID_HANDLE_VALUE)
CloseHandle(map);
final();
}
void MappedFile::sync(void)
{
}
void MappedFile::sync(caddr_t address, size_t len)
{
}
void MappedFile::release(caddr_t address, size_t len)
{
if(fcb.address) {
unlock();
UnmapViewOfFile(fcb.address);
}
fcb.address = NULL;
}
caddr_t MappedFile::fetch(off_t pos, size_t len)
{
if(fcb.address) {
unlock();
UnmapViewOfFile(fcb.address);
}
fcb.address = (caddr_t)MapViewOfFile(map, prot, 0, pos, len);
fcb.len = (ccxx_size_t)len;
fcb.pos = pos;
if(!fcb.address)
error(errMapFailed);
return fcb.address;
}
void MappedFile::update(size_t offset, size_t len)
{
}
void MappedFile::update(caddr_t address, size_t len)
{
}
bool MappedFile::lock(void)
{
unlock();
if(VirtualLock(fcb.address, fcb.len))
fcb.locked = true;
return fcb.locked;
}
void MappedFile::unlock(void)
{
if(!fcb.address)
fcb.locked = false;
if(!fcb.locked)
return;
VirtualUnlock(fcb.address, fcb.len);
fcb.locked = false;
}
#else
#ifdef HAVE_MLOCK
MappedFile::MappedFile(const char *fname, Access mode) :
RandomFile(fname)
{
fd = open(fname, (int)mode);
if(fd < 0 && mode != accessReadOnly)
fd = ::open(pathname, O_CREAT | O_RDWR | O_TRUNC,
(int)attrPrivate);
if(fd < 0) {
error(errOpenFailed);
return;
}
switch(mode) {
case O_RDONLY:
prot = PROT_READ;
break;
case O_WRONLY:
prot = PROT_WRITE;
break;
default:
prot = PROT_READ | PROT_WRITE;
}
}
MappedFile::MappedFile(const char *fname, Access mode, size_t size) :
RandomFile(fname)
{
fd = open(fname, (int)mode | O_CREAT, 0660);
if(fd < 0) {
error(errOpenFailed);
return;
}
switch(mode) {
case O_RDONLY:
prot = PROT_READ;
break;
case O_WRONLY:
prot = PROT_WRITE;
break;
default:
prot = PROT_READ | PROT_WRITE;
}
enterMutex();
lseek(fd, size, SEEK_SET);
fcb.address = (caddr_t)mmap(NULL, size, prot, MAP_SHARED, fd, 0);
fcb.len = size;
fcb.pos = 0;
leaveMutex();
if((caddr_t)(fcb.address) == (caddr_t)(MAP_FAILED)) {
close(fd);
fd = -1;
error(errMapFailed);
}
}
MappedFile::MappedFile(const char *fname, pos_t pos, size_t len, Access mode) :
RandomFile(fname)
{
fd = open(fname, (int)mode);
if(fd < 0) {
error(errOpenFailed);
return;
}
switch(mode) {
case O_RDONLY:
prot = PROT_READ;
break;
case O_WRONLY:
prot = PROT_WRITE;
break;
default:
prot = PROT_READ | PROT_WRITE;
}
enterMutex();
lseek(fd, pos + len, SEEK_SET);
fcb.address = (caddr_t)mmap(NULL, len, prot, MAP_SHARED, fd, pos);
fcb.len = len;
fcb.pos = pos;
leaveMutex();
if((caddr_t)(fcb.address) == (caddr_t)(MAP_FAILED)) {
close(fd);
fd = -1;
error(errMapFailed);
}
}
MappedFile::~MappedFile()
{
unlock();
final();
}
void MappedFile::sync(void)
{
msync(fcb.address, fcb.len, MS_SYNC);
}
void MappedFile::release(caddr_t address, size_t len)
{
enterMutex();
if(address)
fcb.address = address;
if(len)
fcb.len = len;
if(fcb.locked)
unlock();
munmap(fcb.address, fcb.len);
leaveMutex();
}
caddr_t MappedFile::fetch(off_t pos, size_t len)
{
enterMutex();
unlock();
fcb.len = len;
fcb.pos = pos;
lseek(fd, fcb.pos + len, SEEK_SET);
fcb.address = (caddr_t)mmap(NULL, len, prot, MAP_SHARED, fd, pos);
leaveMutex();
return fcb.address;
}
bool MappedFile::lock(void)
{
unlock();
if(!mlock(fcb.address, fcb.len))
fcb.locked = true;
return fcb.locked;
}
void MappedFile::unlock(void)
{
if(!fcb.address)
fcb.locked = false;
if(!fcb.locked)
return;
munlock(fcb.address, fcb.len);
fcb.locked = false;
}
void MappedFile::update(size_t offset, size_t len)
{
int mode = MS_ASYNC;
caddr_t address;
if(flags.immediate)
mode = MS_SYNC;
enterMutex();
address = fcb.address;
address += offset;
if(!len)
len = fcb.len;
leaveMutex();
msync(address, len, mode);
}
void MappedFile::update(caddr_t address, size_t len)
{
int mode = MS_ASYNC;
if(flags.immediate)
mode = MS_SYNC;
msync(address, len, mode);
}
#endif
#endif // ndef WIN32
#ifdef _MSWINDOWS_
#ifndef SECS_BETWEEN_EPOCHS
#define SECS_BETWEEN_EPOCHS 11644473600LL
#endif
#ifndef SECS_TO_100NS
#define SECS_TO_100NS 10000000LL
#endif
#endif
time_t lastAccessed(const char *path)
{
#ifdef _MSWINDOWS_
__int64 ts;
WIN32_FILE_ATTRIBUTE_DATA ino;
if(!GetFileAttributesEx(path, GetFileExInfoStandard, &ino))
return 0;
ts = ((__int64)ino.ftLastAccessTime.dwHighDateTime << 32) +
ino.ftLastAccessTime.dwLowDateTime;
ts -= (SECS_BETWEEN_EPOCHS * SECS_TO_100NS);
ts /= SECS_TO_100NS;
return(time_t)ts;
#else
struct stat ino;
if(stat(path, &ino))
return 0;
return ino.st_atime;
#endif
}
time_t lastModified(const char *path)
{
#ifdef _MSWINDOWS_
__int64 ts;
WIN32_FILE_ATTRIBUTE_DATA ino;
if(!GetFileAttributesEx(path, GetFileExInfoStandard, &ino))
return 0;
ts = ((__int64)ino.ftLastWriteTime.dwHighDateTime << 32) +
ino.ftLastWriteTime.dwLowDateTime;
ts -= (SECS_BETWEEN_EPOCHS * SECS_TO_100NS);
ts /= SECS_TO_100NS;
return(time_t)ts;
#else
struct stat ino;
if(stat(path, &ino))
return 0;
return ino.st_mtime;
#endif
}
bool isDir(const char *path)
{
#ifdef _MSWINDOWS_
DWORD attr = GetFileAttributes(path);
if(attr == (DWORD)~0l)
return false;
if(attr & FILE_ATTRIBUTE_DIRECTORY)
return true;
return false;
#else
struct stat ino;
if(stat(path, &ino))
return false;
if(S_ISDIR(ino.st_mode))
return true;
return false;
#endif // WIN32
}
bool isFile(const char *path)
{
#ifdef _MSWINDOWS_
DWORD attr = GetFileAttributes(path);
if(attr == (DWORD)~0l)
return false;
if(attr & FILE_ATTRIBUTE_DIRECTORY)
return false;
return true;
#else
struct stat ino;
if(stat(path, &ino))
return false;
if(S_ISREG(ino.st_mode))
return true;
return false;
#endif // WIN32
}
#ifndef _MSWINDOWS_
// the Win32 version is given in line in the header
bool isDevice(const char *path)
{
struct stat ino;
if(stat(path, &ino))
return false;
if(S_ISCHR(ino.st_mode))
return true;
return false;
}
#endif
bool canAccess(const char *path)
{
#ifdef _MSWINDOWS_
DWORD attr = GetFileAttributes(path);
if(attr == (DWORD)~0l)
return false;
if(attr & FILE_ATTRIBUTE_SYSTEM)
return false;
if(attr & FILE_ATTRIBUTE_HIDDEN)
return false;
return true;
#else
if(!access(path, R_OK))
return true;
return false;
#endif
}
bool canModify(const char *path)
{
#ifdef _MSWINDOWS_
DWORD attr = GetFileAttributes(path);
if(!canAccess(path))
return false;
if(attr & FILE_ATTRIBUTE_READONLY)
return false;
if(attr & (FILE_ATTRIBUTE_DIRECTORY | FILE_ATTRIBUTE_NORMAL))
return true;
return false;
#else
if(!access(path, W_OK | R_OK))
return true;
return false;
#endif
}
#ifdef _MSWINDOWS_
const char *File::getExtension(const char *path)
{
const char *cp = strrchr(path, '\\');
if(!cp)
cp = strrchr(path, '/');
if(!cp)
cp = strrchr(path, ':');
if(cp)
++cp;
else
cp = path;
if(*cp == '.')
return "";
cp = strrchr(cp, '.');
if(!cp)
cp = "";
return cp;
}
const char *File::getFilename(const char *path)
{
const char *cp = strrchr(path, '\\');
if(cp)
return ++cp;
cp = strrchr(path, '/');
if(cp)
return ++cp;
cp = strrchr(path, ':');
if(cp)
++cp;
return path;
}
char *File::getFilename(const char *path, char *buffer, size_t size)
{
const char *cp = strrchr(path, '\\');
if(!cp)
cp = strrchr(path, '/');
if(!cp)
cp = strrchr(path, ':');
if(cp)
snprintf(buffer, size, "%s", ++cp);
else
snprintf(buffer, size, "%s", path);
return buffer;
}
char *File::getDirname(const char *path, char *buffer, size_t size)
{
size_t len;
const char *cp = strrchr(path, '\\');
snprintf(buffer, size, "%s", path);
if(!cp)
cp = strrchr(path, '/');
if(!cp)
cp = strrchr(path, ':');
if(!cp)
return buffer;
if(cp)
len = cp - path;
if(len >= size)
len = size - 1;
buffer[len] = 0;
return buffer;
}
#else
const char *File::getExtension(const char *path)
{
const char *cp = strrchr(path, '/');
if(cp)
++cp;
else
cp = path;
if(*cp == '.')
return "";
cp = strrchr(cp, '.');
if(cp)
return cp;
return "";
}
char *File::getDirname(const char *path, char *buffer, size_t size)
{
unsigned len;
const char *cp = strrchr(path, '/');
snprintf(buffer, size, "%s", path);
if(!cp)
return buffer;
if(cp)
len = cp - path;
if(len >= size)
len = size - 1;
buffer[len] = 0;
return buffer;
}
const char *File::getFilename(const char *path)
{
const char *cp = strrchr(path, '/');
if(cp)
return ++cp;
return path;
}
char *File::getFilename(const char *path, char *buffer, size_t size)
{
const char *cp = strrchr(path, '/');
if(cp)
snprintf(buffer, size, "%s", ++cp);
else
snprintf(buffer, size, "%s", path);
return buffer;
}
#endif
#ifdef HAVE_REALPATH
char *File::getRealpath(const char *path, char *buffer, size_t size)
{
char temp[PATH_MAX];
setString(buffer, size, ".");
if(!realpath(path, temp))
return NULL;
if(strlen(temp) >= size)
return NULL;
setString(buffer, size, temp);
return buffer;
}
#else
#ifdef _MSWINDOWS_
static char *getFile(char *path)
{
char *cp = strchr(path, '\\');
if(!cp)
cp = strchr(path, '/');
if(!cp)
cp = strchr(path, ':');
return cp;
}
#else
static char *getFile(char *path)
{
return strchr(path, '/');
}
#endif
char *File::getRealpath(const char *path, char *buffer, size_t size)
{
if(size > PATH_MAX)
size = PATH_MAX;
#ifdef HAVE_LSTAT
unsigned symlinks = 0;
#endif
#if !defined(DYNAMCIC_LOCAL_ARRAYS)
char left[PATH_MAX];
#else
char left[size];
#endif
size_t left_len, buffer_len;
#ifdef _MSWINDOWS_
if(path[1] == ':')
#else
if(path[0] == '/')
#endif
{
buffer[0] = '/';
buffer[1] = 0;
if(!path[1])
return buffer;
buffer_len = 1;
snprintf(left, size, "%s", path + 1);
left_len = strlen(left);
}
else {
if(!Dir::getPrefix(buffer, size)) {
snprintf(buffer, size, "%s", ".");
return NULL;
}
buffer_len = strlen(buffer);
snprintf(left, size, "%s", path);
left_len = strlen(left);
}
if(left_len >= size || buffer_len >= size)
return NULL;
while(left_len > 0) {
#ifdef HAVE_LSTAT
struct stat ino;
#endif
#if !defined(DYNAMIC_LOCAL_ARRAYS)
char next_token[PATH_MAX];
#else
char next_token[size];
#endif
char *p;
const char *s = (p = getFile(left)) ? p : left + left_len;
memmove(next_token, left, s - left);
left_len -= s - left;
if(p != NULL)
memmove(left, s + 1, left_len + 1);
next_token[s - left] = 0;
if(buffer[buffer_len - 1] != '/') {
if(buffer_len +1 >= size)
return NULL;
buffer[buffer_len++] = '/';
buffer[buffer_len] = 0;
}
if(!next_token[0])
continue;
else if(!strcmp(next_token, "."))
continue;
else if(!strcmp(next_token, "..")) {
if(buffer_len > 1) {
char *q;
buffer[buffer_len - 1] = 0;
#ifdef _MSWINDOWS_
q = strrchr(buffer, '\\');
if(!q)
q = strrchr(buffer, '/');
if(!q)
q = strchr(buffer, ':');
#else
q = strrchr(buffer, '/');
#endif
*q = 0;
buffer_len = q - buffer;
}
continue;
}
snprintf(next_token, size, "%s", buffer);
buffer_len = strlen(buffer);
if(buffer_len >= size)
return NULL;
#ifndef HAVE_LSTAT
if(!isFile(buffer) && !isDir(buffer))
return buffer;
continue;
#else
if(lstat(buffer, &ino) < 0) {
if(errno == ENOENT && !p)
return buffer;
return NULL;
}
if((ino.st_mode & S_IFLNK) == S_IFLNK) {
char symlink[size];
int slen;
if (symlinks++ > MAXSYMLINKS)
return NULL;
slen = readlink(buffer, symlink, size);
if (slen < 0)
return NULL;
symlink[slen] = 0;
if (symlink[0] == '/') {
buffer[1] = 0;
buffer_len = 1;
} else if (buffer_len > 1) {
char *q;
buffer[buffer_len - 1] = 0;
q = strrchr(buffer, '/');
*q = 0;
buffer_len = q - buffer;
}
if (symlink[slen - 1] != '/' && p) {
if (slen >= size)
return NULL;
symlink[slen] = '/';
symlink[slen + 1] = 0;
}
if(p) {
snprintf(symlink, size, "%s", left);
left_len = strlen(symlink);
}
if(left_len >= size)
return NULL;
snprintf(left, size, "%s", symlink);
left_len = strlen(left);
}
#endif
}
#ifdef _MSWINDOWS_
if(buffer_len > 1 && buffer[buffer_len - 1] == '\\')
buffer[buffer_len - 1] = 0;
else if(buffer_len > 1 && buffer[buffer_len - 1] == '/')
buffer[buffer_len - 1] = 0;
#else
if(buffer_len > 1 && buffer[buffer_len - 1] == '/')
buffer[buffer_len - 1] = 0;
#endif
return buffer;
}
#endif
END_NAMESPACE
ucommon-6.0.7/commoncpp/dso.cpp 0000644 0001750 0001750 00000017711 12163025062 013412 0000000 0000000 // Copyright (C) 1999-2005 Open Source Telecom Corporation.
// Copyright (C) 2006-2010 David Sugar, Tycho Softworks.
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
//
// As a special exception, you may use this file as part of a free software
// library without restriction. Specifically, if other files instantiate
// templates or use macros or inline functions from this file, or you compile
// this file and link it with other files to produce an executable, this
// file does not by itself cause the resulting executable to be covered by
// the GNU General Public License. This exception does not however
// invalidate any other reasons why the executable file might be covered by
// the GNU General Public License.
//
// This exception applies only to the code released under the name GNU
// Common C++. If you copy code from other releases into a copy of GNU
// Common C++, as the General Public License permits, the exception does
// not apply to the code that you add in this way. To avoid misleading
// anyone as to the status of such modified files, you must delete
// this exception notice from them.
//
// If you write modifications of your own for GNU Common C++, it is your choice
// whether to permit this exception to apply to your modifications.
// If you do not wish that, delete this exception notice.
//
#include
#include
#include
#include
#include
#include
#include
#include
using namespace COMMONCPP_NAMESPACE;
DSO *DSO::first = NULL;
DSO *DSO::last = NULL;
Mutex DSO::mutex;
#if defined(HAVE_DLFCN_H)
extern "C" {
#include
}
#ifndef RTLD_GLOBAL
#define RTLD_GLOBAL 0
#endif
#endif // HAVE_DLFN_H
#ifdef HAVE_SHL_LOAD
#include
#endif
#ifdef HAVE_MACH_O_DYLD_H
#include
#define oModule ((oModule)(image))
#endif
#ifdef _MSWINDOWS_
#define hImage ((HMODULE)(image))
#endif
void DSO::dynunload(void)
{
while(DSO::last)
delete DSO::last;
}
DSO::~DSO()
{
#if defined(HAVE_MACH_DYLD)
NSSymbol sym;
void (*fini)(void);
#endif
MutexLock lock(mutex);
#if defined(_MSWINDOWS_)
if(image)
FreeLibrary(hImage);
#elif defined(HAVE_MACH_DYLD)
if(image == NULL)
return;
sym = NSLookupSymbolInModule(oModule, "__fini");
if(sym != NULL) {
fini = (void (*)(void))NSAddressOfSymbol(sym);
fini();
}
NSUnLinkModule(oModule, NSUNLINKMODULE_OPTION_NONE);
#elif defined(HAVE_SHL_LOAD)
if(image)
shl_unload(image);
#elif defined(HAVE_DLFCN_H)
if(image)
dlclose(image);
#endif
if(first == this && last == this)
first = last = NULL;
if(!next && !prev)
return;
if(prev)
prev->next = next;
if(next)
next->prev = prev;
if(first == this)
first = next;
if(last == this)
last = prev;
}
void DSO::loader(const char *filename, bool flag)
{
#if defined(HAVE_MACH_DYLD)
NSObjectFileImage oImage;
NSSymbol sym = NULL;
void (*init)(void);
#endif
id = strrchr(filename, '/');
if(id)
++id;
else
id = filename;
next = prev = NULL;
#if defined(_MSWINDOWS_)
image = LoadLibrary(filename);
err = "none";
#elif defined(HAVE_MACH_DYLD)
err = "none";
image = NULL;
fprintf(stderr, "**** HERE %s\n", filename);
switch(NSCreateObjectFileImageFromFile(filename, &oImage)) {
case NSObjectFileImageSuccess:
break;
default:
err = "unknown error";
return;
}
if(flag)
image = NSLinkModule(oImage, filename, NSLINKMODULE_OPTION_BINDNOW | NSLINKMODULE_OPTION_RETURN_ON_ERROR);
else
image = NSLinkModule(oImage, filename, NSLINKMODULE_OPTION_RETURN_ON_ERROR);
NSDestroyObjectFileImage(oImage);
if(oModule != NULL)
sym = NSLookupSymbolInModule(oModule, "__init");
if(sym) {
init = (void (*)(void))NSAddressOfSymbol(sym);
init();
}
#elif defined(HAVE_SHL_LOAD)
err = "none";
if(flag)
image = shl_load(filename, BIND_IMMEDIATE, 0L);
else
image = shl_load(filename, BIND_DEFERRED, 0L);
#elif defined(HAVE_DLFCN_H)
if(flag)
image = dlopen(filename, RTLD_NOW | RTLD_GLOBAL);
else
image = dlopen(filename, RTLD_LAZY | RTLD_GLOBAL);
#endif
#if defined(_MSWINDOWS_)
if(!image) {
err = "load failed";
#elif defined(HAVE_MACH_DYLD)
if(image == NULL) {
err = "load failed";
#elif defined(HAVE_SHL_LOAD)
if(!image) {
err = "load failed";
#elif defined(HAVE_DLFCN_H)
if(!image) {
err = dlerror();
#else
if(1) {
err = "load unsupported";
#endif
// since generally failure to map or load a plugin is fatel in most
// cases, we should generally log the error to syslog as well as notify
// the upper level system of the failure through exception.
slog.error() << "dso: " << id << ": " << err << std::endl;
#ifdef CCXX_EXCEPTIONS
if(Thread::getException() == Thread::throwObject)
throw(this);
#ifdef COMMON_STD_EXCEPTION
else if(Thread::getException() == Thread::throwException)
throw(DSOException(String(id) + err));
#endif
#endif
return;
}
if(!last) {
last = first = this;
return;
}
mutex.enterMutex();
last->next = this;
prev = last;
last = this;
mutex.leaveMutex();
}
DSO *DSO::getObject(const char *id)
{
const char *chk = strrchr(id, '/');
DSO *dso;
if(chk)
++chk;
else
chk = id;
mutex.enterMutex();
dso = first;
while(dso) {
if(!stricmp(dso->id, chk))
break;
dso = dso->next;
}
mutex.leaveMutex();
return dso;
}
bool DSO::isValid(void)
{
#if defined(_MSWINDOWS_)
if(!image)
#elif defined(HAVE_MACH_DYLD)
if(image == NULL)
#else
if(!image)
#endif
return false;
return true;
}
DSO::addr_t DSO::operator[](const char *sym)
{
#if defined(HAVE_SHL_LOAD)
int value;
shl_t handle = (shl_t)image;
if(shl_findsym(&handle, sym, 0, &value) == 0)
return (DSO::addr_t)value;
else
return NULL;
#elif defined(HAVE_MACH_DYLD)
NSSymbol oSymbol = NSLookupSymbolInModule(oModule, sym);
if(oSymbol)
return (DSO::addr_t)NSAddressOfSymbol(oSymbol);
else
return (DSO::addr_t)NULL;
#elif defined(_MSWINDOWS_)
DSO::addr_t addr = (DSO::addr_t)GetProcAddress(hImage, sym);
if(!addr)
err = "symbol missing";
return addr;
#elif defined(HAVE_DLFCN_H)
return (DSO::addr_t)dlsym(image, (char *)sym);
#else
return (DSO::addr_t)NULL;
#endif
}
#ifdef HAVE_MACH_DYLD
static void MyLinkError(NSLinkEditErrors c, int errorNumber, const char *filename, const char *errstr)
{
slog.error() << "dyld: " << filename << ": " << errstr << std::endl;
}
static void MyUndefined(const char *symname)
{
slog.error() << "dyld: undefined: " << symname << std::endl;
}
static NSModule MyMultiple(NSSymbol s, NSModule oMod, NSModule nMod)
{
slog.error() << "dyld: multiply defined symbols" << std::endl;
}
void DSO::setDebug(void)
{
static NSLinkEditErrorHandlers handlers = {
&MyUndefined,
&MyMultiple,
&MyLinkError};
NSInstallLinkEditErrorHandlers(&handlers);
}
#else
void DSO::setDebug(void)
{
}
#endif
ucommon-6.0.7/commoncpp/serial.cpp 0000644 0001750 0001750 00000115174 12163025062 014106 0000000 0000000 // Copyright (C) 1999-2005 Open Source Telecom Corporation.
// Copyright (C) 2006-2010 David Sugar, Tycho Softworks.
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
//
// As a special exception, you may use this file as part of a free software
// library without restriction. Specifically, if other files instantiate
// templates or use macros or inline functions from this file, or you compile
// this file and link it with other files to produce an executable, this
// file does not by itself cause the resulting executable to be covered by
// the GNU General Public License. This exception does not however
// invalidate any other reasons why the executable file might be covered by
// the GNU General Public License.
//
// This exception applies only to the code released under the name GNU
// Common C++. If you copy code from other releases into a copy of GNU
// Common C++, as the General Public License permits, the exception does
// not apply to the code that you add in this way. To avoid misleading
// anyone as to the status of such modified files, you must delete
// this exception notice from them.
//
// If you write modifications of your own for GNU Common C++, it is your choice
// whether to permit this exception to apply to your modifications.
// If you do not wish that, delete this exception notice.
//
#include
#include
#include
#include
#include
#include
#include
#include
#ifdef _MSWINDOWS_
#define B256000 CBR_256000
#define B128000 CBR_128000
#define B115200 CBR_115200
#define B57600 CBR_57600
#define B56000 CBR_56000
#define B38400 CBR_38400
#define B19200 CBR_19200
#define B14400 CBR_14400
#define B9600 CBR_9600
#define B4800 CBR_4800
#define B2400 CBR_2400
#define B1200 CBR_1200
#define B600 CBR_600
#define B300 CBR_300
#define B110 CBR_110
#include
#else
#include
#ifdef HAVE_TERMIOS_H
#include
#endif
#endif
#include
#include
#include
NAMESPACE_COMMONCPP
using std::streambuf;
using std::iostream;
using std::ios;
#ifndef MAX_INPUT
#define MAX_INPUT 255
#endif
#ifndef MAX_CANON
#define MAX_CANON MAX_INPUT
#endif
#ifdef __FreeBSD__
#undef _PC_MAX_INPUT
#undef _PC_MAX_CANON
#endif
#if defined(__QNX__)
#define CRTSCTS (IHFLOW | OHFLOW)
#endif
#if defined(_THR_UNIXWARE) || defined(__hpux) || defined(_AIX)
#include
#define CRTSCTS (CTSXON | RTSXOFF)
#endif
// IRIX
#ifndef CRTSCTS
#ifdef CNEW_RTSCTS
#define CRTSCTS (CNEW_RTSCTS)
#endif
#endif
#if defined(CTSXON) && defined(RTSXOFF) && !defined(CRTSCTS)
#define CRTSCTS (CTSXON | RTSXOFF)
#endif
#ifndef CRTSCTS
#define CRTSCTS 0
#endif
Serial::Serial(const char *fname)
{
initSerial();
#if defined(_MSWINDOWS_) || defined(HAVE_TERMIOS_H)
open(fname);
#endif
#ifdef _MSWINDOWS_
if(dev == INVALID_HANDLE_VALUE)
#elif defined(HAVE_TERMIOS_H)
if(dev < 0)
#else
if(1)
#endif
{
error(errOpenFailed);
return;
}
#ifdef _MSWINDOWS_
COMMTIMEOUTS CommTimeOuts ;
GetCommTimeouts(dev, &CommTimeOuts);
// CommTimeOuts.ReadIntervalTimeout = MAXDWORD;
CommTimeOuts.ReadIntervalTimeout = 0;
CommTimeOuts.ReadTotalTimeoutMultiplier = 0 ;
CommTimeOuts.ReadTotalTimeoutConstant = 0;
CommTimeOuts.WriteTotalTimeoutMultiplier = 0 ;
CommTimeOuts.WriteTotalTimeoutConstant = 1000;
SetCommTimeouts(dev, &CommTimeOuts) ;
#elif defined(HAVE_TERMIOS_H)
if(!isatty(dev)) {
Serial::close();
error(errOpenNoTty);
return;
}
#endif
}
Serial::~Serial()
{
endSerial();
}
void Serial::initConfig(void)
{
#ifdef _MSWINDOWS_
#define ASCII_XON 0x11
#define ASCII_XOFF 0x13
DCB * attr = (DCB *)current;
DCB * orig = (DCB *)original;
attr->DCBlength = sizeof(DCB);
orig->DCBlength = sizeof(DCB);
GetCommState(dev, orig);
GetCommState(dev, attr);
attr->DCBlength = sizeof(DCB);
attr->BaudRate = 1200;
attr->Parity = NOPARITY;
attr->ByteSize = 8;
attr->XonChar = ASCII_XON;
attr->XoffChar = ASCII_XOFF;
attr->XonLim = 100;
attr->XoffLim = 100;
attr->fOutxDsrFlow = 0;
attr->fDtrControl = DTR_CONTROL_ENABLE;
attr->fOutxCtsFlow = 1;
attr->fRtsControl = RTS_CONTROL_ENABLE;
attr->fInX = attr->fOutX = 0;
attr->fBinary = true;
attr->fParity = true;
SetCommState(dev, attr);
#elif defined(HAVE_TERMIOS_H)
struct termios *attr = (struct termios *)current;
struct termios *orig = (struct termios *)original;
long ioflags = fcntl(dev, F_GETFL);
tcgetattr(dev, (struct termios *)original);
tcgetattr(dev, (struct termios *)current);
attr->c_oflag = attr->c_lflag = 0;
attr->c_cflag = CLOCAL | CREAD | HUPCL;
attr->c_iflag = IGNBRK;
memset(attr->c_cc, 0, sizeof(attr->c_cc));
attr->c_cc[VMIN] = 1;
// inherit original settings, maybe we should keep more??
cfsetispeed(attr, cfgetispeed(orig));
cfsetospeed(attr, cfgetospeed(orig));
attr->c_cflag |= orig->c_cflag & (CRTSCTS | CSIZE | PARENB | PARODD | CSTOPB);
attr->c_iflag |= orig->c_iflag & (IXON | IXANY | IXOFF);
tcsetattr(dev, TCSANOW, attr);
fcntl(dev, F_SETFL, ioflags & ~O_NDELAY);
#if defined(TIOCM_RTS) && defined(TIOCMODG)
int mcs = 0;
ioctl(dev, TIOCMODG, &mcs);
mcs |= TIOCM_RTS;
ioctl(dev, TIOCMODS, &mcs);
#endif
#ifdef _COHERENT
ioctl(dev, TIOCSRTS, 0);
#endif
#endif // WIN32
}
void Serial::restore(void)
{
#ifdef _MSWINDOWS_
memcpy(current, original, sizeof(DCB));
SetCommState(dev, (DCB *)current);
#elif defined(HAVE_TERMIOS_H)
memcpy(current, original, sizeof(struct termios));
tcsetattr(dev, TCSANOW, (struct termios *)current);
#endif
}
void Serial::initSerial(void)
{
flags.thrown = false;
flags.linebuf = false;
errid = errSuccess;
errstr = NULL;
dev = INVALID_HANDLE_VALUE;
#ifdef _MSWINDOWS_
current = new DCB;
original = new DCB;
#elif defined(HAVE_TERMIOS_H)
current = new struct termios;
original = new struct termios;
#endif
}
void Serial::endSerial(void)
{
#ifdef _MSWINDOWS_
if(dev == INVALID_HANDLE_VALUE && original)
SetCommState(dev, (DCB *)original);
if(current)
delete (DCB *)current;
if(original)
delete (DCB *)original;
#elif defined(HAVE_TERMIOS_H)
if(dev < 0 && original)
tcsetattr(dev, TCSANOW, (struct termios *)original);
if(current)
delete (struct termios *)current;
if(original)
delete (struct termios *)original;
#endif
Serial::close();
current = NULL;
original = NULL;
}
Serial::Error Serial::error(Error err, char *errs)
{
errid = err;
errstr = errs;
if(!err)
return err;
if(flags.thrown)
return err;
// prevents recursive throws
flags.thrown = true;
#ifdef CCXX_EXCEPTIONS
if(Thread::getException() == Thread::throwObject)
throw((Serial *)this);
#ifdef COMMON_STD_EXCEPTION
else if(Thread::getException() == Thread::throwException) {
if(!errs)
errs = (char *)"";
throw SerException(String(errs));
}
#endif
#endif
return err;
}
int Serial::setPacketInput(int size, unsigned char btimer)
{
#ifdef _MSWINDOWS_
// Still to be done......
return 0;
#elif defined(HAVE_TERMIOS_H)
#ifdef _PC_MAX_INPUT
int max = fpathconf(dev, _PC_MAX_INPUT);
#else
int max = MAX_INPUT;
#endif
struct termios *attr = (struct termios *)current;
if(size > max)
size = max;
attr->c_cc[VEOL] = attr->c_cc[VEOL2] = 0;
attr->c_cc[VMIN] = (unsigned char)size;
attr->c_cc[VTIME] = btimer;
attr->c_lflag &= ~ICANON;
tcsetattr(dev, TCSANOW, attr);
bufsize = size;
return size;
#endif
}
int Serial::setLineInput(char newline, char nl1)
{
#ifdef _MSWINDOWS_
// Still to be done......
return 0;
#elif defined(HAVE_TERMIOS_H)
struct termios *attr = (struct termios *)current;
attr->c_cc[VMIN] = attr->c_cc[VTIME] = 0;
attr->c_cc[VEOL] = newline;
attr->c_cc[VEOL2] = nl1;
attr->c_lflag |= ICANON;
tcsetattr(dev, TCSANOW, attr);
#ifdef _PC_MAX_CANON
bufsize = fpathconf(dev, _PC_MAX_CANON);
#else
bufsize = MAX_CANON;
#endif
return bufsize;
#endif
}
void Serial::flushInput(void)
{
#ifdef _MSWINDOWS_
PurgeComm(dev, PURGE_RXABORT | PURGE_RXCLEAR);
#elif defined(HAVE_TERMIOS_H)
tcflush(dev, TCIFLUSH);
#endif
}
void Serial::flushOutput(void)
{
#ifdef _MSWINDOWS_
PurgeComm(dev, PURGE_TXABORT | PURGE_TXCLEAR);
#elif defined(HAVE_TERMIOS_H)
tcflush(dev, TCOFLUSH);
#endif
}
void Serial::waitOutput(void)
{
#ifdef _MSWINDOWS_
#elif defined(HAVE_TERMIOS_H)
tcdrain(dev);
#endif
}
Serial &Serial::operator=(const Serial &ser)
{
Serial::close();
if(ser.dev < 0)
return *this;
#ifdef _MSWINDOWS_
HANDLE process = GetCurrentProcess();
int result = DuplicateHandle(process, ser.dev, process, &dev, DUPLICATE_SAME_ACCESS, 0, 0);
if (0 == result) {
memcpy(current, ser.current, sizeof(DCB));
memcpy(original, ser.original, sizeof(DCB));
}
#elif defined(HAVE_TERMIOS_H)
dev = dup(ser.dev);
memcpy(current, ser.current, sizeof(struct termios));
memcpy(original, ser.original, sizeof(struct termios));
#endif
return *this;
}
void Serial::open(const char * fname)
{
#ifndef _MSWINDOWS_
int cflags = O_RDWR | O_NDELAY;
dev = ::open(fname, cflags);
if(dev > -1)
initConfig();
#elif defined(HAVE_TERMIOS_H)
// open COMM device
dev = CreateFile(fname,
GENERIC_READ | GENERIC_WRITE,
0, // exclusive access
NULL, // no security attrs
OPEN_EXISTING,
FILE_FLAG_OVERLAPPED | FILE_ATTRIBUTE_NORMAL | FILE_FLAG_WRITE_THROUGH | FILE_FLAG_NO_BUFFERING,
NULL);
if(dev != INVALID_HANDLE_VALUE)
initConfig();
#endif
}
#ifdef _MSWINDOWS_
int Serial::aRead(char * Data, const int Length)
{
unsigned long dwLength = 0, dwError, dwReadLength;
COMSTAT cs;
OVERLAPPED ol;
// Return zero if handle is invalid
if(dev == INVALID_HANDLE_VALUE)
return 0;
// Read max length or only what is available
ClearCommError(dev, &dwError, &cs);
// If not requiring an exact byte count, get whatever is available
if(Length > (int)cs.cbInQue)
dwReadLength = cs.cbInQue;
else
dwReadLength = Length;
memset(&ol, 0, sizeof(OVERLAPPED));
ol.hEvent = CreateEvent(NULL, TRUE, FALSE, NULL);
if(dwReadLength > 0) {
if(ReadFile(dev, Data, dwReadLength, &dwLength, &ol) == FALSE) {
if(GetLastError() == ERROR_IO_PENDING) {
WaitForSingleObject(ol.hEvent, INFINITE);
GetOverlappedResult(dev, &ol, &dwLength, TRUE);
}
else
ClearCommError(dev, &dwError, &cs);
}
}
if(ol.hEvent != INVALID_HANDLE_VALUE)
CloseHandle(ol.hEvent);
return dwLength;
}
int Serial::aWrite(const char * Data, const int Length)
{
COMSTAT cs;
unsigned long dwError = 0;
OVERLAPPED ol;
// Clear the com port of any error condition prior to read
ClearCommError(dev, &dwError, &cs);
unsigned long retSize = 0;
memset(&ol, 0, sizeof(OVERLAPPED));
ol.hEvent = CreateEvent(NULL, TRUE, FALSE, NULL);
if(WriteFile(dev, Data, Length, &retSize, &ol) == FALSE) {
if(GetLastError() == ERROR_IO_PENDING) {
WaitForSingleObject(ol.hEvent, INFINITE);
GetOverlappedResult(dev, &ol, &retSize, TRUE);
}
else
ClearCommError(dev, &dwError, &cs);
}
if(ol.hEvent != INVALID_HANDLE_VALUE)
CloseHandle(ol.hEvent);
return retSize;
}
#else
int Serial::aRead(char *Data, const int Length)
{
return ::read(dev, Data, Length);
}
int Serial::aWrite(const char *Data, const int Length)
{
return ::write(dev, Data, Length);
}
#endif
void Serial::close()
{
#ifdef _MSWINDOWS_
CloseHandle(dev);
#else
::close(dev);
#endif
dev = INVALID_HANDLE_VALUE;
}
/*
const int iAsync::getTimeOuts(unsigned long & readTimeout, unsigned long & writeTimeout)
{
return GetCommTimeouts(_TheHandle, &CommTimeOuts);
}
const int iAsync::setTimeOuts(unsigned long readTimeout, unsigned long writeTimeout)
{
COMMTIMEOUTS CommTimeOuts ;
getTimeOuts(CommTimeOuts);
CommTimeOuts.ReadIntervalTimeout = readTimeout;
CommTimeOuts.ReadTotalTimeoutMultiplier = 0 ;
CommTimeOuts.ReadTotalTimeoutConstant = 0;
CommTimeOuts.WriteTotalTimeoutMultiplier = 0 ;
CommTimeOuts.WriteTotalTimeoutConstant = 1000;
return GetCommTimeouts(_TheHandle, &CommTimeOuts);
}
return SetCommTimeouts(_TheHandle, &CommTimeOuts) ;
{
DCB dcb ;
dcb.DCBlength = sizeof(DCB) ;
GetCommState(_TheHandle, &dcb) ;
// hardcode this stuff for now.....
dcb.BaudRate = _TheBaudrate;
dcb.ByteSize = 8;
dcb.Parity = NOPARITY;
dcb.StopBits = ONESTOPBIT;
dcb.fOutxDsrFlow = 0;
dcb.fDtrControl = DTR_CONTROL_ENABLE ;
dcb.fOutxCtsFlow = 1;
dcb.fRtsControl = RTS_CONTROL_HANDSHAKE ;
dcb.fInX = dcb.fOutX = 0;
dcb.XonChar = ASCII_XON;
dcb.XoffChar = ASCII_XOFF;
dcb.XonLim = 100;
dcb.XoffLim = 100;
// other various settings
dcb.fBinary = TRUE;
dcb.fParity = TRUE;
GetCommState(_TheHandle, &dcb) ;
dcb.DCBlength = sizeof(DCB) ;
dcb.BaudRate = _TheBaudrate;
SetCommState(_TheHandle, &dcb) ;
}
*/
Serial::Error Serial::setSpeed(unsigned long speed)
{
unsigned long rate;
switch(speed) {
#ifdef B115200
case 115200:
rate = B115200;
break;
#endif
#ifdef B57600
case 57600:
rate = B57600;
break;
#endif
#ifdef B38400
case 38400:
rate = B38400;
break;
#endif
case 19200:
rate = B19200;
break;
case 9600:
rate = B9600;
break;
case 4800:
rate = B4800;
break;
case 2400:
rate = B2400;
break;
case 1200:
rate = B1200;
break;
case 600:
rate = B600;
break;
case 300:
rate = B300;
break;
case 110:
rate = B110;
break;
#ifdef B0
case 0:
rate = B0;
break;
#endif
default:
return error(errSpeedInvalid);
}
#ifdef _MSWINDOWS_
DCB * dcb = (DCB *)current;
dcb->DCBlength = sizeof(DCB);
GetCommState(dev, dcb);
dcb->BaudRate = rate;
SetCommState(dev, dcb) ;
#else
struct termios *attr = (struct termios *)current;
cfsetispeed(attr, rate);
cfsetospeed(attr, rate);
tcsetattr(dev, TCSANOW, attr);
#endif
return errSuccess;
}
Serial::Error Serial::setFlowControl(Flow flow)
{
#ifdef _MSWINDOWS_
DCB * attr = (DCB *)current;
attr->XonChar = ASCII_XON;
attr->XoffChar = ASCII_XOFF;
attr->XonLim = 100;
attr->XoffLim = 100;
switch(flow) {
case flowSoft:
attr->fInX = attr->fOutX = 1;
break;
case flowBoth:
attr->fInX = attr->fOutX = 1;
case flowHard:
attr->fOutxCtsFlow = 1;
attr->fRtsControl = RTS_CONTROL_HANDSHAKE;
break;
case flowNone:
break;
default:
return error(errFlowInvalid);
}
SetCommState(dev, attr);
#else
struct termios *attr = (struct termios *)current;
attr->c_cflag &= ~CRTSCTS;
attr->c_iflag &= ~(IXON | IXANY | IXOFF);
switch(flow) {
case flowSoft:
attr->c_iflag |= (IXON | IXANY | IXOFF);
break;
case flowBoth:
attr->c_iflag |= (IXON | IXANY | IXOFF);
case flowHard:
attr->c_cflag |= CRTSCTS;
break;
case flowNone:
break;
default:
return error(errFlowInvalid);
}
tcsetattr(dev, TCSANOW, attr);
#endif
return errSuccess;
}
Serial::Error Serial::setStopBits(int bits)
{
#ifdef _MSWINDOWS_
DCB * attr = (DCB *)current;
switch(bits) {
case 1:
attr->StopBits = ONESTOPBIT;
break;
case 2:
attr->StopBits = TWOSTOPBITS;
break;
default:
return error(errStopbitsInvalid);
}
SetCommState(dev, attr);
#else
struct termios *attr = (struct termios *)current;
attr->c_cflag &= ~CSTOPB;
switch(bits) {
case 1:
break;
case 2:
attr->c_cflag |= CSTOPB;
break;
default:
return error(errStopbitsInvalid);
}
tcsetattr(dev, TCSANOW, attr);
#endif
return errSuccess;
}
Serial::Error Serial::setCharBits(int bits)
{
#ifdef _MSWINDOWS_
DCB * attr = (DCB *)current;
switch(bits) {
case 5:
case 6:
case 7:
case 8:
attr->ByteSize = bits;
break;
default:
return error(errCharsizeInvalid);
}
SetCommState(dev, attr);
#else
struct termios *attr = (struct termios *)current;
attr->c_cflag &= ~CSIZE;
switch(bits) {
case 5:
attr->c_cflag |= CS5;
break;
case 6:
attr->c_cflag |= CS6;
break;
case 7:
attr->c_cflag |= CS7;
break;
case 8:
attr->c_cflag |= CS8;
break;
default:
return error(errCharsizeInvalid);
}
tcsetattr(dev, TCSANOW, attr);
#endif
return errSuccess;
}
Serial::Error Serial::setParity(Parity parity)
{
#ifdef _MSWINDOWS_
DCB * attr = (DCB *)current;
switch(parity) {
case parityEven:
attr->Parity = EVENPARITY;
break;
case parityOdd:
attr->Parity = ODDPARITY;
break;
case parityNone:
attr->Parity = NOPARITY;
break;
default:
return error(errParityInvalid);
}
SetCommState(dev, attr);
#else
struct termios *attr = (struct termios *)current;
attr->c_cflag &= ~(PARENB | PARODD);
switch(parity) {
case parityEven:
attr->c_cflag |= PARENB;
break;
case parityOdd:
attr->c_cflag |= (PARENB | PARODD);
break;
case parityNone:
break;
default:
return error(errParityInvalid);
}
tcsetattr(dev, TCSANOW, attr);
#endif
return errSuccess;
}
void Serial::sendBreak(void)
{
#ifdef _MSWINDOWS_
SetCommBreak(dev);
Thread::sleep(100L);
ClearCommBreak(dev);
#else
tcsendbreak(dev, 0);
#endif
}
void Serial::toggleDTR(timeout_t millisec)
{
#ifdef _MSWINDOWS_
EscapeCommFunction(dev, CLRDTR);
if(millisec) {
Thread::sleep(millisec);
EscapeCommFunction(dev, SETDTR);
}
#else
struct termios tty, old;
tcgetattr(dev, &tty);
tcgetattr(dev, &old);
cfsetospeed(&tty, B0);
cfsetispeed(&tty, B0);
tcsetattr(dev, TCSANOW, &tty);
if(millisec) {
Thread::sleep(millisec);
tcsetattr(dev, TCSANOW, &old);
}
#endif
}
bool Serial::isPending(Pending pending, timeout_t timeout)
{
#ifdef _MSWINDOWS_
unsigned long dwError;
COMSTAT cs;
ClearCommError(dev, &dwError, &cs);
if(timeout == 0 || ((pending == pendingInput) && (0 != cs.cbInQue)) ||
((pending == pendingOutput) && (0 != cs.cbOutQue)) || (pending == pendingError))
{
switch(pending) {
case pendingInput:
return (0 != cs.cbInQue);
case pendingOutput:
return (0 != cs.cbOutQue);
case pendingError:
return false;
}
}
else {
OVERLAPPED ol;
DWORD dwMask;
DWORD dwEvents = 0;
BOOL suc;
memset(&ol, 0, sizeof(OVERLAPPED));
ol.hEvent = CreateEvent(NULL, TRUE, FALSE, NULL);
if(pending == pendingInput)
dwMask = EV_RXCHAR;
else if(pending == pendingOutput)
dwMask = EV_TXEMPTY;
else // on error
dwMask = EV_ERR;
SetCommMask(dev, dwMask);
// let's wait for event or timeout
if((suc = WaitCommEvent(dev, &dwEvents, &ol)) == FALSE) {
if(GetLastError() == ERROR_IO_PENDING) {
DWORD transferred;
dwError = WaitForSingleObject(ol.hEvent, timeout);
if (dwError != WAIT_OBJECT_0)
SetCommMask(dev, 0);
suc = GetOverlappedResult(dev, &ol, &transferred, TRUE);
if (suc)
suc = (dwEvents & dwMask) ? TRUE : FALSE;
}
else
ClearCommError(dev, &dwError, &cs);
}
if(ol.hEvent != INVALID_HANDLE_VALUE)
CloseHandle(ol.hEvent);
if(suc == FALSE)
return false;
return true;
}
#else
int status = 0;
#ifdef HAVE_POLL
struct pollfd pfd;
pfd.fd = dev;
pfd.revents = 0;
switch(pending) {
case pendingInput:
pfd.events = POLLIN;
break;
case pendingOutput:
pfd.events = POLLOUT;
break;
case pendingError:
pfd.events = POLLERR | POLLHUP;
break;
}
status = 0;
while(status < 1) {
if(timeout == TIMEOUT_INF)
status = poll(&pfd, 1, -1);
else
status = poll(&pfd, 1, timeout);
if(status < 1) {
if(status == -1 && errno == EINTR)
continue;
return false;
}
}
if(pfd.revents & pfd.events)
return true;
#else
struct timeval tv;
fd_set grp;
struct timeval *tvp = &tv;
if(timeout == TIMEOUT_INF)
tvp = NULL;
else {
tv.tv_usec = (timeout % 1000) * 1000;
tv.tv_sec = timeout / 1000;
}
FD_ZERO(&grp);
FD_SET(dev, &grp);
switch(pending) {
case pendingInput:
status = select(dev + 1, &grp, NULL, NULL, tvp);
break;
case pendingOutput:
status = select(dev + 1, NULL, &grp, NULL, tvp);
break;
case pendingError:
status = select(dev + 1, NULL, NULL, &grp, tvp);
break;
}
if(status < 1)
return false;
if(FD_ISSET(dev, &grp))
return true;
#endif
#endif // WIN32
return false;
}
TTYStream::TTYStream(const char *filename, timeout_t to)
: streambuf(),
Serial(filename),
#ifdef HAVE_OLD_IOSTREAM
iostream()
#else
iostream((streambuf *)this)
#endif
{
#ifdef HAVE_OLD_IOSTREAM
init((streambuf *)this);
#endif
gbuf = pbuf = NULL;
timeout = to;
if(INVALID_HANDLE_VALUE != dev)
allocate();
}
TTYStream::TTYStream()
: streambuf(),
Serial(),
#ifdef HAVE_OLD_IOSTREAM
iostream()
#else
iostream((streambuf *)this)
#endif
{
#ifdef HAVE_OLD_IOSTREAM
init((streambuf *)this);
#endif
timeout = 0;
gbuf = pbuf = NULL;
}
TTYStream::~TTYStream()
{
endStream();
endSerial();
}
void TTYStream::endStream(void)
{
if(bufsize)
sync();
if(gbuf) {
delete[] gbuf;
gbuf = NULL;
}
if(pbuf) {
delete[] pbuf;
pbuf = NULL;
}
bufsize = 0;
clear();
}
void TTYStream::allocate(void)
{
if(INVALID_HANDLE_VALUE == dev)
return;
#ifdef _PC_MAX_INPUT
bufsize = fpathconf(dev, _PC_MAX_INPUT);
#else
bufsize = MAX_INPUT;
#endif
gbuf = new char[bufsize];
pbuf = new char[bufsize];
if(!pbuf || !gbuf) {
error(errResourceFailure);
return;
}
clear();
#if !(defined(STLPORT) || defined(__KCC))
setg(gbuf, gbuf + bufsize, 0);
#endif
setg(gbuf, gbuf + bufsize, gbuf + bufsize);
setp(pbuf, pbuf + bufsize);
}
int TTYStream::doallocate()
{
if(bufsize)
return 0;
allocate();
return 1;
}
void TTYStream::interactive(bool iflag)
{
#ifdef _MSWINDOWS_
if(dev == INVALID_HANDLE_VALUE)
#else
if(dev < 0)
#endif
return;
if(bufsize >= 1)
endStream();
if(iflag) {
// setting to unbuffered mode
bufsize = 1;
gbuf = new char[bufsize];
#if !(defined(STLPORT) || defined(__KCC))
#if defined(__GNUC__) && (__GNUC__ < 3)
setb(0,0);
#endif
#endif
setg(gbuf, gbuf+bufsize, gbuf+bufsize);
setp(pbuf, pbuf);
return;
}
if(bufsize < 2)
allocate();
}
int TTYStream::uflow(void)
{
int rlen;
unsigned char ch;
if(bufsize < 2) {
if(timeout) {
if(Serial::isPending(pendingInput, timeout))
rlen = aRead((char *)&ch, 1);
else
rlen = -1;
}
else
rlen = aRead((char *)&ch, 1);
if(rlen < 1) {
if(rlen < 0)
clear(ios::failbit | rdstate());
return EOF;
}
return ch;
}
else {
ch = underflow();
gbump(1);
return ch;
}
}
int TTYStream::underflow(void)
{
ssize_t rlen = 1;
if(!gptr())
return EOF;
if(gptr() < egptr())
return (unsigned char)*gptr();
rlen = (ssize_t)((gbuf + bufsize) - eback());
if(timeout && !Serial::isPending(pendingInput, timeout))
rlen = -1;
else
rlen = aRead((char *)eback(), rlen);
if(rlen < 1) {
if(rlen < 0) {
clear(ios::failbit | rdstate());
error(errInput);
}
return EOF;
}
setg(eback(), eback(), eback() + rlen);
return (unsigned char) *gptr();
}
int TTYStream::sync(void)
{
if(bufsize > 1 && pbase() && ((pptr() - pbase()) > 0)) {
overflow(0);
waitOutput();
setp(pbuf, pbuf + bufsize);
}
setg(gbuf, gbuf + bufsize, gbuf + bufsize);
return 0;
}
int TTYStream::overflow(int c)
{
unsigned char ch;
ssize_t rlen, req;
if(bufsize < 2) {
if(c == EOF)
return 0;
ch = (unsigned char)(c);
rlen = aWrite((char *)&ch, 1);
if(rlen < 1) {
if(rlen < 0)
clear(ios::failbit | rdstate());
return EOF;
}
else
return c;
}
if(!pbase())
return EOF;
req = (ssize_t)(pptr() - pbase());
if(req) {
rlen = aWrite((char *)pbase(), req);
if(rlen < 1) {
if(rlen < 0)
clear(ios::failbit | rdstate());
return EOF;
}
req -= rlen;
}
if(req)
// memmove(pptr(), pptr() + rlen, req);
memmove(pbuf, pbuf + rlen, req);
setp(pbuf + req, pbuf + bufsize);
if(c != EOF) {
*pptr() = (unsigned char)c;
pbump(1);
}
return c;
}
bool TTYStream::isPending(Pending pending, timeout_t timer)
{
// if(pending == pendingInput && in_avail())
// return true;
// else if(pending == pendingOutput)
// flush();
return Serial::isPending(pending, timer);
}
ttystream::ttystream() :
TTYStream()
{
setError(false);
}
ttystream::ttystream(const char *name) :
TTYStream()
{
setError(false);
open(name);
}
void ttystream::close(void)
{
#ifdef _MSWINDOWS_
if (INVALID_HANDLE_VALUE == dev)
#else
if(dev < 0)
#endif
return;
endStream();
restore();
TTYStream::close();
}
void ttystream::open(const char *name)
{
const char *cpp;
char *cp;
char pathname[256];
size_t namelen;
long opt;
if (INVALID_HANDLE_VALUE != dev) {
restore();
close();
}
cpp = strrchr(name, ':');
if(cpp)
namelen = cpp - name;
else
namelen = strlen(name);
cp = pathname;
#ifndef _MSWINDOWS_
if(*name != '/') {
strcpy(pathname, "/dev/");
cp += 5;
}
if((cp - pathname) + namelen > 255) {
error(errResourceFailure);
return;
}
#endif
setString(cp, pathname - cp + sizeof(pathname), name);
cp += namelen;
#ifdef _MSWINDOWS_
*cp++ = ':';
#endif
*cp = 0;
Serial::open(pathname);
if(INVALID_HANDLE_VALUE == dev) {
error(errOpenFailed);
return;
}
allocate();
setString(pathname, sizeof(pathname), name + namelen);
cp = pathname + 1;
if(*pathname == ':')
cp = strtok(cp, ",");
else
cp = NULL;
while(cp) {
switch(*cp) {
case 'h':
case 'H':
setFlowControl(flowHard);
break;
case 's':
case 'S':
setFlowControl(flowSoft);
break;
case 'b':
case 'B':
setFlowControl(flowBoth);
break;
case 'n':
case 'N':
setParity(parityNone);
break;
case 'O':
case 'o':
setParity(parityOdd);
break;
case 'e':
case 'E':
setParity(parityEven);
break;
case '0':
case '1':
case '2':
case '3':
case '4':
case '5':
case '6':
case '7':
case '8':
case '9':
opt = atol(cp);
if(opt == 1 || opt == 2) {
setStopBits((int)opt);
break;
}
if(opt > 4 && opt < 9) {
setCharBits((int)opt);
break;
}
setSpeed(opt);
break;
default:
error(errOptionInvalid);
}
cp = strtok(NULL, ",");
}
}
TTYSession::TTYSession(const char *filename, int pri, int stack) :
Thread(pri, stack), TTYStream(filename)
{
setError(false);
}
TTYSession::~TTYSession()
{
terminate();
endSerial();
}
#ifndef _MSWINDOWS_
// Not supporting this right now........
//
SerialPort::SerialPort(SerialService *svc, const char *name) :
Serial(name),
detect_pending(true),
detect_output(false),
detect_disconnect(true)
{
next = prev = NULL;
service = NULL;
#ifdef _MSWINDOWS_
if(INVALID_HANDLE_VALUE != dev)
#else
if(dev > -1)
#endif
{
setError(false);
service = svc;
svc->attach(this);
}
}
SerialPort::~SerialPort()
{
if(service)
service->detach(this);
endSerial();
}
void SerialPort::expired(void)
{
}
void SerialPort::pending(void)
{
}
void SerialPort::disconnect(void)
{
}
void SerialPort::output(void)
{
}
void SerialPort::setTimer(timeout_t ptimer)
{
TimerPort::setTimer(ptimer);
service->update();
}
void SerialPort::incTimer(timeout_t ptimer)
{
TimerPort::incTimer(ptimer);
service->update();
}
void SerialPort::setDetectPending( bool val )
{
if ( detect_pending != val ) {
detect_pending = val;
#ifdef USE_POLL
if ( ufd ) {
if ( val ) {
ufd->events |= POLLIN;
} else {
ufd->events &= ~POLLIN;
}
}
#endif
service->update();
}
}
void SerialPort::setDetectOutput( bool val )
{
if ( detect_output != val ) {
detect_output = val;
#ifdef USE_POLL
if ( ufd ) {
if ( val ) {
ufd->events |= POLLOUT;
} else {
ufd->events &= ~POLLOUT;
}
}
#endif
service->update();
}
}
SerialService::SerialService(int pri, size_t stack, const char *id) :
Thread(pri, stack), Mutex()
{
long opt;
first = last = NULL;
count = 0;
FD_ZERO(&connect);
if(::pipe(iosync)) {
#ifdef CCXX_EXCEPTIONS
switch(Thread::getException()) {
case throwObject:
throw(this);
return;
#ifdef COMMON_STD_EXCEPTION
case throwException:
throw(ThrException("no service pipe"));
return;
#endif
default:
return;
}
#else
return;
#endif
}
hiwater = iosync[0] + 1;
FD_SET(iosync[0], &connect);
opt = fcntl(iosync[0], F_GETFL);
fcntl(iosync[0], F_SETFL, opt | O_NDELAY);
}
SerialService::~SerialService()
{
update(0);
terminate();
while(first)
delete first;
}
void SerialService::onUpdate(unsigned char flag)
{
}
void SerialService::onEvent(void)
{
}
void SerialService::onCallback(SerialPort *port)
{
}
void SerialService::attach(SerialPort *port)
{
enterMutex();
#ifdef USE_POLL
port->ufd = 0;
#endif
if(last)
last->next = port;
port->prev = last;
last = port;
FD_SET(port->dev, &connect);
if(port->dev >= hiwater)
hiwater = port->dev + 1;
if(!first) {
first = port;
leaveMutex();
++count;
start();
}
else {
leaveMutex();
update();
++count;
}
}
void SerialService::detach(SerialPort *port)
{
enterMutex();
#ifndef USE_POLL
FD_CLR(port->dev, &connect);
#endif
if(port->prev)
port->prev->next = port->next;
else
first = port->next;
if(port->next)
port->next->prev = port->prev;
else
last = port->prev;
--count;
leaveMutex();
update();
}
void SerialService::update(unsigned char flag)
{
if(::write(iosync[1], (char *)&flag, 1) < 1) {
#ifdef CCXX_EXCEPTIONS
switch(Thread::getException()) {
case throwObject:
throw(this);
return;
#ifdef COMMON_STD_EXCEPTION
case throwException:
throw(ThrException("update failed"));
return;
#endif
default:
return;
}
#else
return;
#endif
}
}
void SerialService::run(void)
{
timeout_t timer, expires;
SerialPort *port;
unsigned char buf;
#ifdef USE_POLL
Poller mfd;
pollfd *p_ufd;
int lastcount = 0;
// initialize ufd in all attached ports :
// probably don't need this but it can't hurt.
enterMutex();
port = first;
while(port) {
port->ufd = 0;
port = port->next;
}
leaveMutex();
#else
struct timeval timeout, *tvp;
fd_set inp, out, err;
int dev;
FD_ZERO(&inp);
FD_ZERO(&out);
FD_ZERO(&err);
#endif
for(;;) {
timer = TIMEOUT_INF;
while(1 == ::read(iosync[0], (char *)&buf, 1)) {
if(buf) {
onUpdate(buf);
continue;
}
Thread::exit();
}
#ifdef USE_POLL
bool reallocate = false;
enterMutex();
onEvent();
port = first;
while(port) {
onCallback(port);
if ( ( p_ufd = port->ufd ) ) {
if ( ( POLLHUP | POLLNVAL ) & p_ufd->revents ) {
// Avoid infinite loop from disconnected sockets
port->detect_disconnect = false;
p_ufd->events &= ~POLLHUP;
port->disconnect();
}
if ( ( POLLIN | POLLPRI ) & p_ufd->revents )
port->pending();
if ( POLLOUT & p_ufd->revents )
port->output();
} else {
reallocate = true;
}
retry:
expires = port->getTimer();
if(expires > 0)
if(expires < timer)
timer = expires;
if(!expires) {
port->endTimer();
port->expired();
goto retry;
}
port = port->next;
}
//
// reallocate things if we saw a ServerPort without
// ufd set !
if ( reallocate || ( ( count + 1 ) != lastcount ) ) {
lastcount = count + 1;
p_ufd = mfd.getList( count + 1 );
// Set up iosync polling
p_ufd->fd = iosync[0];
p_ufd->events = POLLIN | POLLHUP;
p_ufd ++;
port = first;
while(port) {
p_ufd->fd = port->dev;
p_ufd->events =
( port->detect_disconnect ? POLLHUP : 0 )
| ( port->detect_output ? POLLOUT : 0 )
| ( port->detect_pending ? POLLIN : 0 )
;
port->ufd = p_ufd;
p_ufd ++;
port = port->next;
}
}
leaveMutex();
poll( mfd.getList(), count + 1, timer );
#else
enterMutex();
onEvent();
port = first;
while(port) {
onCallback(port);
dev = port->dev;
if(FD_ISSET(dev, &err)) {
port->detect_disconnect = false;
port->disconnect();
}
if(FD_ISSET(dev, &inp))
port->pending();
if(FD_ISSET(dev, &out))
port->output();
retry:
expires = port->getTimer();
if(expires > 0)
if(expires < timer)
timer = expires;
if(!expires) {
port->endTimer();
port->expired();
goto retry;
}
port = port->next;
}
FD_ZERO(&inp);
FD_ZERO(&out);
FD_ZERO(&err);
int so;
port = first;
while(port) {
so = port->dev;
if(port->detect_pending)
FD_SET(so, &inp);
if(port->detect_output)
FD_SET(so, &out);
if(port->detect_disconnect)
FD_SET(so, &err);
port = port->next;
}
leaveMutex();
if(timer == TIMEOUT_INF)
tvp = NULL;
else {
tvp = &timeout;
timeout.tv_sec = timer / 1000;
timeout.tv_usec = (timer % 1000) * 1000;
}
select(hiwater, &inp, &out, &err, tvp);
#endif
}
}
#endif
END_NAMESPACE
/** EMACS **
* Local variables:
* mode: c++
* c-basic-offset: 8
* End:
*/
ucommon-6.0.7/commoncpp/socket.cpp 0000644 0001750 0001750 00000070711 12163025062 014114 0000000 0000000 // Copyright (C) 1999-2005 Open Source Telecom Corporation.
// Copyright (C) 2006-2010 David Sugar, Tycho Softworks.
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
//
// As a special exception, you may use this file as part of a free software
// library without restriction. Specifically, if other files instantiate
// templates or use macros or inline functions from this file, or you compile
// this file and link it with other files to produce an executable, this
// file does not by itself cause the resulting executable to be covered by
// the GNU General Public License. This exception does not however
// invalidate any other reasons why the executable file might be covered by
// the GNU General Public License.
//
// This exception applies only to the code released under the name GNU
// Common C++. If you copy code from other releases into a copy of GNU
// Common C++, as the General Public License permits, the exception does
// not apply to the code that you add in this way. To avoid misleading
// anyone as to the status of such modified files, you must delete
// this exception notice from them.
//
// If you write modifications of your own for GNU Common C++, it is your choice
// whether to permit this exception to apply to your modifications.
// If you do not wish that, delete this exception notice.
//
#include
#include
#include
#include
#include
#include
#ifdef _MSWINDOWS_
#include
#define _IOLEN64 (unsigned)
#define _IORET64 (int)
typedef int socklen_t;
#define socket_errno WSAGetLastError()
#else
#include
#include
#ifdef HAVE_NET_IP6_H
#include
#endif
#define socket_errno errno
# ifndef O_NONBLOCK
# define O_NONBLOCK O_NDELAY
# endif
# ifdef IPPROTO_IP
# ifndef SOL_IP
# define SOL_IP IPPROTO_IP
# endif // !SOL_IP
# endif // IPPROTO_IP
#endif // !WIN32
#ifndef INADDR_LOOPBACK
#define INADDR_LOOPBACK (unsigned long)0x7f000001
#endif
#ifdef HAVE_NETINET_IN_H
#include
#endif
#if defined(__hpux)
#define _XOPEN_SOURCE_EXTENDED
#endif
#ifdef HAVE_NET_IF_H
#include
#endif
#ifndef _IOLEN64
#define _IOLEN64
#endif
#ifndef _IORET64
#define _IORET64
#endif
using namespace COMMONCPP_NAMESPACE;
#if defined(_MSWINDOWS_) && !defined(__MINGW32__)
socket_t Socket::dupSocket(socket_t so, enum Socket::State state)
{
if (state == Socket::STREAM)
return dup((int)so);
HANDLE pidHandle = GetCurrentProcess();
HANDLE dupHandle;
if(DuplicateHandle(pidHandle, reinterpret_cast(so), pidHandle, &dupHandle, 0, FALSE, DUPLICATE_SAME_ACCESS))
return reinterpret_cast(dupHandle);
return (socket_t)(-1);
}
# define DUP_SOCK(s,state) dupSocket(s,state)
#else
socket_t Socket::dupSocket(socket_t so, State state)
{
return dup(so);
}
#endif
Mutex Socket::mutex;
void Socket::setSocket(void)
{
flags.thrown = false;
flags.broadcast = false;
flags.route = true;
flags.keepalive = false;
flags.loopback = true;
flags.multicast = false;
flags.linger = false;
flags.ttl = 1;
errid = errSuccess;
errstr = NULL;
syserr = 0;
state = INITIAL;
so = INVALID_SOCKET;
}
void Socket::endSocket(void)
{
if(Socket::state == STREAM) {
state = INITIAL;
if(so != INVALID_SOCKET) {
SOCKET sosave = so;
so = INVALID_SOCKET;
release(sosave);
}
return;
}
state = INITIAL;
if(so == INVALID_SOCKET)
return;
#ifdef SO_LINGER
struct linger linger;
if(flags.linger) {
linger.l_onoff = 1;
linger.l_linger = 60;
}
else
linger.l_onoff = linger.l_linger = 0;
setsockopt(so, SOL_SOCKET, SO_LINGER, (char *)&linger,
(socklen_t)sizeof(linger));
#endif
// shutdown(so, 2);
ucommon::Socket::release();
}
Socket::Socket() : ucommon::Socket()
{
setSocket();
}
Socket::Socket(int domain, int type, int protocol) : ucommon::Socket()
{
setSocket();
so = socket(domain, type, protocol);
if(so == INVALID_SOCKET) {
error(errCreateFailed,(char *)"Could not create socket",socket_errno);
return;
}
#ifdef SO_NOSIGPIPE
int opt = 1;
setsockopt(so, SOL_SOCKET, SO_NOSIGPIPE, (char *)&opt, sizeof(opt));
#endif
state = AVAILABLE;
}
Socket::Socket(socket_t fd) : ucommon::Socket()
{
setSocket();
if (fd == INVALID_SOCKET) {
error(errCreateFailed,(char *)"Invalid socket handle passed",0);
return;
}
so = fd;
state = AVAILABLE;
}
Socket::Socket(const Socket &orig) : ucommon::Socket()
{
setSocket();
so = dupSocket(orig.so,orig.state);
if(so == INVALID_SOCKET)
error(errCopyFailed,(char *)"Could not duplicate socket handle",socket_errno);
state = orig.state;
}
Socket::~Socket()
{
endSocket();
}
Socket::Error Socket::error(Error err, const char *errs, long systemError) const
{
errid = err;
errstr = errs;
syserr = systemError;
if(!err)
return err;
if(flags.thrown)
return err;
// prevents recursive throws
flags.thrown = true;
#ifdef CCXX_EXCEPTIONS
switch(Thread::getException()) {
case Thread::throwObject:
THROW((Socket *)this);
case Thread::throwException:
if(!errs)
errs = (char *)"";
THROW(SockException(String(errs), err, systemError));
case Thread::throwNothing:
break;
}
#endif
return err;
}
#ifdef _MSWINDOWS_
Socket::Error Socket::connectError(void)
{
const char* str = "Could not connect to remote host";
switch(WSAGetLastError()) {
case WSAENETDOWN:
return error(errResourceFailure,str,socket_errno);
case WSAEINPROGRESS:
return error(errConnectBusy,str,socket_errno);
case WSAEADDRNOTAVAIL:
return error(errConnectInvalid,str,socket_errno);
case WSAECONNREFUSED:
return error(errConnectRefused,str,socket_errno);
case WSAENETUNREACH:
return error(errConnectNoRoute,str,socket_errno);
default:
return error(errConnectFailed,str,socket_errno);
}
}
#else
Socket::Error Socket::connectError(void)
{
char* str = (char *)"Could not connect to remote host";
switch(errno) {
#ifdef EHOSTUNREACH
case EHOSTUNREACH:
return error(errConnectNoRoute,str,socket_errno);
#endif
#ifdef ENETUNREACH
case ENETUNREACH:
return error(errConnectNoRoute,str,socket_errno);
#endif
case EINPROGRESS:
return error(errConnectBusy,str,socket_errno);
#ifdef EADDRNOTAVAIL
case EADDRNOTAVAIL:
return error(errConnectInvalid,str,socket_errno);
#endif
case ECONNREFUSED:
return error(errConnectRefused,str,socket_errno);
case ETIMEDOUT:
return error(errConnectTimeout,str,socket_errno);
default:
return error(errConnectFailed,str,socket_errno);
}
}
#endif
Socket::Error Socket::sendLimit(int limit)
{
#ifdef SO_SNDLOWAT
if(setsockopt(so, SOL_SOCKET, SO_SNDLOWAT, (char *)&limit, sizeof(limit)))
return errInvalidValue;
return errSuccess;
#else
return errServiceUnavailable;
#endif
}
Socket::Error Socket::receiveLimit(int limit)
{
#ifdef SO_RCVLOWAT
if(setsockopt(so, SOL_SOCKET, SO_RCVLOWAT, (char *)&limit, sizeof(limit)))
return errInvalidValue;
return errSuccess;
#else
return errServiceUnavailable;
#endif
}
Socket::Error Socket::sendTimeout(timeout_t to)
{
#ifdef SO_SNDTIMEO
struct timeval tv;
tv.tv_sec = to / 1000;
tv.tv_usec = (to % 1000) * 1000;
if(setsockopt(so, SOL_SOCKET, SO_SNDTIMEO, (char *)&tv, sizeof(tv)))
return errInvalidValue;
return errSuccess;
#else
return errServiceUnavailable;
#endif
}
Socket::Error Socket::receiveTimeout(timeout_t to)
{
#ifdef SO_RCVTIMEO
struct timeval tv;
tv.tv_sec = to / 1000;
tv.tv_usec = (to % 1000) * 1000;
if(setsockopt(so, SOL_SOCKET, SO_RCVTIMEO, (char *)&tv, sizeof(tv)))
return errInvalidValue;
return errSuccess;
#else
return errServiceUnavailable;
#endif
}
Socket::Error Socket::sendBuffer(unsigned bufsize)
{
#ifdef SO_SNDBUF
if(setsockopt(so, SOL_SOCKET, SO_SNDBUF, (char *)&bufsize, sizeof(bufsize)))
return errInvalidValue;
return errSuccess;
#else
return errServiceUnavailable;
#endif
}
Socket::Error Socket::bufferSize(unsigned bufsize)
{
Error err = receiveBuffer(bufsize);
if(err == errSuccess)
err = sendBuffer(bufsize);
return err;
}
Socket::Error Socket::receiveBuffer(unsigned bufsize)
{
#ifdef SO_RCVBUF
if(setsockopt(so, SOL_SOCKET, SO_RCVBUF, (char *)&bufsize, sizeof(bufsize)))
return errInvalidValue;
return errSuccess;
#else
return errServiceUnavailable;
#endif
}
Socket::Error Socket::setBroadcast(bool enable)
{
int opt = (enable ? 1 : 0);
if(setsockopt(so, SOL_SOCKET, SO_BROADCAST,
(char *)&opt, (socklen_t)sizeof(opt)))
return error(errBroadcastDenied,(char *)"Could not set socket broadcast option",socket_errno);
flags.broadcast = enable;
return errSuccess;
}
Socket::Error Socket::setMulticastByFamily(bool enable, Family family)
{
socklen_t len;
switch(family) {
#ifdef CCXX_IPV6
case IPV6:
struct sockaddr_in6 addr;
len = sizeof(addr);
if(enable == flags.multicast)
return errSuccess;
flags.multicast = enable;
if(enable)
getsockname(so, (struct sockaddr *)&addr, &len);
else
memset(&addr.sin6_addr, 0, sizeof(addr.sin6_addr));
setsockopt(so, IPPROTO_IPV6, IPV6_MULTICAST_IF, (char *)&addr.sin6_addr, sizeof(addr.sin6_addr));
return errSuccess;
#endif
case IPV4:
#ifdef IP_MULTICAST_IF
struct sockaddr_in addr4;
len = sizeof(addr4);
if(enable == flags.multicast)
return errSuccess;
flags.multicast = enable;
if(enable)
getsockname(so, (struct sockaddr *)&addr4, &len);
else
memset(&addr4.sin_addr, 0, sizeof(addr4.sin_addr));
setsockopt(so, IPPROTO_IP, IP_MULTICAST_IF, (char *)&addr4.sin_addr, sizeof(addr4.sin_addr));
return errSuccess;
#endif
default:
return error(errServiceUnavailable,(char *)"Multicast not supported");
}
}
Socket::Error Socket::setTimeToLiveByFamily(unsigned char ttl, Family fam)
{
if(!flags.multicast)
return error(errMulticastDisabled,(char *)"Multicast not enabled on socket");
switch(fam) {
#ifdef CCXX_IPV6
case IPV6:
flags.ttl = ttl;
setsockopt(so, IPPROTO_IPV6, IPV6_MULTICAST_HOPS, (char *)&ttl, sizeof(ttl));
return errSuccess;
#endif
case IPV4:
#ifdef IP_MULTICAST_TTL
flags.ttl = ttl;
setsockopt(so, IPPROTO_IP, IP_MULTICAST_TTL, (char *)&ttl, sizeof(ttl));
return errSuccess;
#endif
default:
return error(errServiceUnavailable, (char *)"Multicast not supported");
}
}
Socket::Error Socket::setLoopbackByFamily(bool enable, Family family)
{
unsigned char loop;
if(!flags.multicast)
return error(errMulticastDisabled,(char *)"Multicast not enabled on socket");
if(enable)
loop = 1;
else
loop = 0;
flags.loopback = enable;
switch(family) {
#ifdef CCXX_IPV6
case IPV6:
setsockopt(so, IPPROTO_IPV6, IPV6_MULTICAST_LOOP, (char *)&loop, sizeof(loop));
return errSuccess;
#endif
case IPV4:
#ifdef IP_MULTICAST_LOOP
setsockopt(so, IPPROTO_IP, IP_MULTICAST_LOOP, (char *)&loop, sizeof(loop));
return errSuccess;
#endif
default:
return error(errServiceUnavailable,(char *)"Multicast not supported");
}
}
Socket::Error Socket::join(const IPV4Multicast &ia)
{
#ifdef IP_ADD_MEMBERSHIP
struct ip_mreq group;
struct sockaddr_in myaddr;
socklen_t len = sizeof(myaddr);
if(!flags.multicast)
return error(errMulticastDisabled,(char *)"Multicast not enabled on socket");
getsockname(so, (struct sockaddr *)&myaddr, &len);
group.imr_interface.s_addr = INADDR_ANY;
group.imr_multiaddr = ia.getAddress();
setsockopt(so, IPPROTO_IP, IP_ADD_MEMBERSHIP, (char *)&group, sizeof(group));
return errSuccess;
#else
return error(errServiceUnavailable,(char *)"Multicast not supported");
#endif
}
#ifdef CCXX_IPV6
Socket::Error Socket::join(const IPV6Multicast &ia)
{
#ifdef IPV6_ADD_MEMBERSHIP
struct ipv6_mreq group;
struct sockaddr_in6 myaddr;
socklen_t len = sizeof(myaddr);
if(!flags.multicast)
return error(errMulticastDisabled,(char *)"Multicast not enabled on socket");
getsockname(so, (struct sockaddr *)&myaddr, &len);
group.ipv6mr_interface = 0;
group.ipv6mr_multiaddr = ia.getAddress();
setsockopt(so, IPPROTO_IPV6, IPV6_ADD_MEMBERSHIP, (char *)&group, sizeof(group));
return errSuccess;
#else
return error(errServiceUnavailable,(char *)"Multicast not supported");
#endif
}
#endif
Socket::Error Socket::drop(const IPV4Multicast &ia)
{
#ifdef IP_DROP_MEMBERSHIP
struct ip_mreq group;
struct sockaddr_in myaddr;
socklen_t len = sizeof(myaddr);
if(!flags.multicast)
return error(errMulticastDisabled,(char *)"Multicast not enabled on socket");
getsockname(so, (struct sockaddr *)&myaddr, &len);
group.imr_interface.s_addr = INADDR_ANY;
group.imr_multiaddr = ia.getAddress();
setsockopt(so, IPPROTO_IP, IP_DROP_MEMBERSHIP, (char *)&group, sizeof(group));
return errSuccess;
#else
return error(errServiceUnavailable,(char *)"Multicast not supported");
#endif
}
#ifdef CCXX_IPV6
Socket::Error Socket::drop(const IPV6Multicast &ia)
{
#ifdef IPV6_DROP_MEMBERSHIP
struct ipv6_mreq group;
struct sockaddr_in6 myaddr;
socklen_t len = sizeof(myaddr);
if(!flags.multicast)
return error(errMulticastDisabled,(char *)"Multicast not enabled on socket");
getsockname(so, (struct sockaddr *)&myaddr, &len);
group.ipv6mr_interface = 0;
group.ipv6mr_multiaddr = ia.getAddress();
setsockopt(so, IPPROTO_IPV6, IPV6_DROP_MEMBERSHIP, (char *)&group, sizeof(group));
return errSuccess;
#else
return error(errServiceUnavailable,(char *)"Multicast not supported");
#endif
}
#endif
Socket::Error Socket::setRouting(bool enable)
{
int opt = (enable ? 1 : 0);
#ifdef SO_DONTROUTE
if(setsockopt(so, SOL_SOCKET, SO_DONTROUTE,
(char *)&opt, (socklen_t)sizeof(opt)))
return error(errRoutingDenied,(char *)"Could not set dont-route socket option",socket_errno);
#endif
flags.route = enable;
return errSuccess;
}
Socket::Error Socket::setNoDelay(bool enable)
{
int opt = (enable ? 1 : 0);
if(setsockopt(so, IPPROTO_TCP, TCP_NODELAY,
(char *)&opt, (socklen_t)sizeof(opt)))
return error(errNoDelay,(char *)"Could not set tcp-nodelay socket option",socket_errno);
return errSuccess;
}
ssize_t Socket::readLine(char *str, size_t request, timeout_t timeout)
{
bool crlf = false;
bool nl = false;
size_t nleft = request - 1; // leave also space for terminator
int nstat,c;
if(request < 1)
return 0;
str[0] = 0;
while(nleft && !nl) {
if(timeout) {
if(!isPending(pendingInput, timeout)) {
error(errTimeout,(char *)"Read timeout", 0);
return -1;
}
}
nstat = ::recv(so, str, _IOLEN64 nleft, MSG_PEEK);
if(nstat <= 0) {
error(errInput,(char *)"Could not read from socket", socket_errno);
return -1;
}
// FIXME: if unique char in buffer is '\r' return "\r"
// if buffer end in \r try to read another char?
// and if timeout ??
// remember last \r
for(c=0; c < nstat; ++c) {
if(str[c] == '\n') {
if (c > 0 && str[c-1] == '\r')
crlf = true;
++c;
nl = true;
break;
}
}
nstat = ::recv(so, str, _IOLEN64 c, 0);
// TODO: correct ???
if(nstat < 0)
break;
// adjust ending \r\n in \n
if(crlf) {
--nstat;
str[nstat - 1] = '\n';
}
str += nstat;
nleft -= nstat;
}
*str = 0;
return (ssize_t)(request - nleft - 1);
}
ssize_t Socket::readData(void *Target, size_t Size, char Separator, timeout_t timeout)
{
if ((Separator == 0x0D) || (Separator == 0x0A))
return (readLine ((char *) Target, Size, timeout));
if (Size < 1)
return (0);
ssize_t nstat;
if (Separator == 0) { // Flat-out read for a number of bytes.
if (timeout) {
if (!isPending (pendingInput, timeout)) {
error(errTimeout);
return (-1);
}
}
nstat =::recv (so, (char *)Target, _IOLEN64 Size, 0);
if (nstat < 0) {
error (errInput);
return (-1);
}
return (nstat);
}
/////////////////////////////////////////////////////////////
// Otherwise, we have a special char separator to use
/////////////////////////////////////////////////////////////
bool found = false;
size_t nleft = Size;
int c;
char *str = (char *) Target;
memset (str, 0, Size);
while (nleft && !found) {
if (timeout) {
if (!isPending (pendingInput, timeout)) {
error(errTimeout);
return (-1);
}
}
nstat =::recv (so, str, _IOLEN64 nleft, MSG_PEEK);
if (nstat <= 0) {
error (errInput);
return (-1);
}
for (c = 0; (c < nstat) && !found; ++c) {
if (str[c] == Separator)
found = true;
}
memset (str, 0, nleft);
nstat =::recv (so, str, c, 0);
if (nstat < 0)
break;
str += nstat;
nleft -= nstat;
}
return (ssize_t)(Size - (ssize_t) nleft);
}
ssize_t Socket::writeData(const void *Source, size_t Size, timeout_t timeout)
{
if (Size < 1)
return (0);
ssize_t nstat;
const char *Slide = (const char *) Source;
while (true) {
if (timeout) {
if (!isPending (pendingOutput, timeout)) {
error(errOutput);
return (-1);
}
}
nstat =::send (so, Slide, _IOLEN64 Size, MSG_NOSIGNAL);
if (nstat <= 0) {
error(errOutput);
return (-1);
}
Size -= nstat;
Slide += nstat;
if (Size <= 0)
break;
}
return (nstat);
}
const char *Socket::getSystemErrorString(void) const
{
#ifdef CCXX_EXCEPTIONS
SockException e(errstr, errid, syserr);
return e.getSystemErrorString();
#else
return NULL;
#endif
}
bool Socket::isPending(Pending pending, timeout_t timeout)
{
int status = 0;
#ifdef USE_POLL
struct pollfd pfd;
pfd.fd = so;
pfd.revents = 0;
if(so == INVALID_SOCKET)
return true;
switch(pending) {
case pendingInput:
pfd.events = POLLIN;
break;
case pendingOutput:
pfd.events = POLLOUT;
break;
case pendingError:
pfd.events = POLLERR | POLLHUP;
break;
}
status = 0;
while(status < 1) {
if(timeout == TIMEOUT_INF)
status = poll(&pfd, 1, -1);
else
status = poll(&pfd, 1, timeout);
if(status < 1) {
// don't stop polling because of a simple
// signal :)
if(status == -1 && errno == EINTR)
continue;
return false;
}
}
if(pfd.revents & pfd.events)
return true;
return false;
#else
struct timeval tv;
struct timeval *tvp = &tv;
fd_set grp;
if(timeout == TIMEOUT_INF)
tvp = NULL;
else {
tv.tv_usec = (timeout % 1000) * 1000;
tv.tv_sec = timeout / 1000;
}
FD_ZERO(&grp);
SOCKET sosave = so;
if(so == INVALID_SOCKET)
return true;
FD_SET(sosave, &grp);
switch(pending) {
case pendingInput:
status = ::select((int)so + 1, &grp, NULL, NULL, tvp);
break;
case pendingOutput:
status = ::select((int)so + 1, NULL, &grp, NULL, tvp);
break;
case pendingError:
status = ::select((int)so + 1, NULL, NULL, &grp, tvp);
break;
}
if(status < 1)
return false;
if(FD_ISSET(so, &grp))
return true;
return false;
#endif
}
bool Socket::operator!() const
{
return (Socket::state == INITIAL) ? true : false;
}
Socket::operator bool() const
{
return (Socket::state == INITIAL) ? false : true;
}
Socket &Socket::operator=(const Socket &from)
{
if(so == from.so)
return *this;
if(state != INITIAL)
endSocket();
so = dupSocket(from.so,from.state);
if(so == INVALID_SOCKET) {
error(errCopyFailed,(char *)"Could not duplicate socket handle",socket_errno);
state = INITIAL;
}
else
state = from.state;
return *this;
}
bool Socket::check(Family fam)
{
SOCKET so = INVALID_SOCKET;
switch(fam) {
case IPV4:
so = socket(fam, SOCK_DGRAM, IPPROTO_UDP);
break;
#ifdef CCXX_IPV6
case IPV6:
so = socket(fam, SOCK_DGRAM, IPPROTO_UDP);
break;
#endif
default:
return false;
}
if(so == INVALID_SOCKET)
return false;
release(so);
return true;
}
IPV4Host Socket::getIPV4Sender(tpport_t *port) const
{
struct sockaddr_in from;
char buf;
socklen_t len = sizeof(from);
int rc = ::recvfrom(so, &buf, 1, MSG_PEEK,
(struct sockaddr *)&from, &len);
#ifdef _MSWINDOWS_
if(rc < 1 && WSAGetLastError() != WSAEMSGSIZE) {
if(port)
*port = 0;
memset((void*) &from, 0, sizeof(from));
error(errInput,(char *)"Could not read from socket",socket_errno);
}
#else
if(rc < 0) {
if(port)
*port = 0;
memset((void*) &from, 0, sizeof(from));
error(errInput,(char *)"Could not read from socket",socket_errno);
}
#endif
else {
if(rc < 1)
memset((void*) &from, 0, sizeof(from));
if(port)
*port = ntohs(from.sin_port);
}
return IPV4Host(from.sin_addr);
}
#ifdef CCXX_IPV6
IPV6Host Socket::getIPV6Sender(tpport_t *port) const
{
struct sockaddr_in6 from;
char buf;
socklen_t len = sizeof(from);
int rc = ::recvfrom(so, &buf, 1, MSG_PEEK,
(struct sockaddr *)&from, &len);
#ifdef _MSWINDOWS_
if(rc < 1 && WSAGetLastError() != WSAEMSGSIZE) {
if(port)
*port = 0;
memset((void*) &from, 0, sizeof(from));
error(errInput,(char *)"Could not read from socket",socket_errno);
}
#else
if(rc < 0) {
if(port)
*port = 0;
memset((void*) &from, 0, sizeof(from));
error(errInput,(char *)"Could not read from socket",socket_errno);
}
#endif
else {
if(rc < 1)
memset((void*) &from, 0, sizeof(from));
if(port)
*port = ntohs(from.sin6_port);
}
return IPV6Host(from.sin6_addr);
}
#endif
IPV4Host Socket::getIPV4Local(tpport_t *port) const
{
struct sockaddr_in addr;
socklen_t len = sizeof(addr);
if(getsockname(so, (struct sockaddr *)&addr, &len)) {
error(errResourceFailure,(char *)"Could not get socket address",socket_errno);
if(port)
*port = 0;
memset(&addr.sin_addr, 0, sizeof(addr.sin_addr));
}
else {
if(port)
*port = ntohs(addr.sin_port);
}
return IPV4Host(addr.sin_addr);
}
#ifdef CCXX_IPV6
IPV6Host Socket::getIPV6Local(tpport_t *port) const
{
struct sockaddr_in6 addr;
socklen_t len = sizeof(addr);
if(getsockname(so, (struct sockaddr *)&addr, &len)) {
error(errResourceFailure,(char *)"Could not get socket address",socket_errno);
if(port)
*port = 0;
memset(&addr.sin6_addr, 0, sizeof(addr.sin6_addr));
}
else {
if(port)
*port = ntohs(addr.sin6_port);
}
return IPV6Host(addr.sin6_addr);
}
#endif
IPV4Host Socket::getIPV4Peer(tpport_t *port) const
{
struct sockaddr_in addr;
socklen_t len = sizeof(addr);
if(getpeername(so, (struct sockaddr *)&addr, &len)) {
#ifndef _MSWINDOWS_
if(errno == ENOTCONN)
error(errNotConnected,(char *)"Could not get peer address",socket_errno);
else
#endif
error(errResourceFailure,(char *)"Could not get peer address",socket_errno);
if(port)
*port = 0;
memset(&addr.sin_addr, 0, sizeof(addr.sin_addr));
}
else {
if(port)
*port = ntohs(addr.sin_port);
}
return IPV4Host(addr.sin_addr);
}
#ifdef CCXX_IPV6
IPV6Host Socket::getIPV6Peer(tpport_t *port) const
{
struct sockaddr_in6 addr;
socklen_t len = sizeof(addr);
if(getpeername(so, (struct sockaddr *)&addr, &len)) {
#ifndef _MSWINDOWS_
if(errno == ENOTCONN)
error(errNotConnected,(char *)"Could not get peer address",socket_errno);
else
#endif
error(errResourceFailure,(char *)"Could not get peer address",socket_errno);
if(port)
*port = 0;
memset(&addr.sin6_addr, 0, sizeof(addr.sin6_addr));
}
else {
if(port)
*port = ntohs(addr.sin6_port);
}
return IPV6Host(addr.sin6_addr);
}
#endif
void Socket::setCompletion(bool immediate)
{
flags.completion = immediate;
#ifdef _MSWINDOWS_
unsigned long flag;
// note that this will not work on some versions of Windows for Workgroups. Tough. -- jfc
switch( immediate ) {
case false:
// this will not work if you are using WSAAsyncSelect or WSAEventSelect.
// -- perhaps I should throw an exception
flag = 1;
// ioctlsocket( so, FIONBIO, (unsigned long *) 1);
break;
case true:
flag = 0;
// ioctlsocket( so, FIONBIO, (unsigned long *) 0);
break;
}
ioctlsocket(so, FIONBIO, &flag);
#else
int fflags = fcntl(so, F_GETFL);
if(immediate) {
fflags &=~ O_NONBLOCK;
fcntl(so, F_SETFL, fflags);
}
else {
fflags |= O_NONBLOCK;
fcntl(so, F_SETFL, fflags);
}
#endif
}
Socket::Error Socket::setKeepAlive(bool enable)
{
int opt = (enable ? ~0: 0);
#if (defined(SO_KEEPALIVE) || defined(_MSWINDOWS_))
if(setsockopt(so, SOL_SOCKET, SO_KEEPALIVE,
(char *)&opt, (socklen_t)sizeof(opt)))
return error(errKeepaliveDenied,(char *)"Could not set socket keep-alive option",socket_errno);
#endif
flags.keepalive = enable;
return errSuccess;
}
Socket::Error Socket::setLinger(bool linger)
{
#ifdef SO_LINGER
flags.linger = linger;
return errSuccess;
#else
return error(errServiceUnavailable,(char *)"Socket lingering not supported");
#endif
}
Socket::Error Socket::setTypeOfService(Tos service)
{
#ifdef SOL_IP
unsigned char tos;
switch(service) {
#ifdef IPTOS_LOWDELAY
case tosLowDelay:
tos = IPTOS_LOWDELAY;
break;
#endif
#ifdef IPTOS_THROUGHPUT
case tosThroughput:
tos = IPTOS_THROUGHPUT;
break;
#endif
#ifdef IPTOS_RELIABILITY
case tosReliability:
tos = IPTOS_RELIABILITY;
break;
#endif
#ifdef IPTOS_MINCOST
case tosMinCost:
tos = IPTOS_MINCOST;
break;
#endif
default:
return error(errServiceUnavailable,(char *)"Unknown type-of-service");
}
if(setsockopt(so, SOL_IP, IP_TOS,(char *)&tos, (socklen_t)sizeof(tos)))
return error(errServiceDenied,(char *)"Could not set type-of-service",socket_errno);
return errSuccess;
#else
return error(errServiceUnavailable,(char *)"Socket type-of-service not supported",socket_errno);
#endif
}
bool Socket::isConnected(void) const
{
return (Socket::state == CONNECTED) ? true : false;
}
bool Socket::isActive(void) const
{
return (state != INITIAL) ? true : false;
}
ucommon-6.0.7/commoncpp/thread.cpp 0000644 0001750 0001750 00000045743 12163025062 014102 0000000 0000000 // Copyright (C) 1999-2005 Open Source Telecom Corporation.
// Copyright (C) 2006-2010 David Sugar, Tycho Softworks.
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
//
// As a special exception, you may use this file as part of a free software
// library without restriction. Specifically, if other files instantiate
// templates or use macros or inline functions from this file, or you compile
// this file and link it with other files to produce an executable, this
// file does not by itself cause the resulting executable to be covered by
// the GNU General Public License. This exception does not however
// invalidate any other reasons why the executable file might be covered by
// the GNU General Public License.
//
// This exception applies only to the code released under the name GNU
// Common C++. If you copy code from other releases into a copy of GNU
// Common C++, as the General Public License permits, the exception does
// not apply to the code that you add in this way. To avoid misleading
// anyone as to the status of such modified files, you must delete
// this exception notice from them.
//
// If you write modifications of your own for GNU Common C++, it is your choice
// whether to permit this exception to apply to your modifications.
// If you do not wish that, delete this exception notice.
//
#include
#include
#include
#include
#include
#include
#ifdef _MSWINDOWS_
#define MAX_SEM_VALUE 1000000
#endif
using namespace COMMONCPP_NAMESPACE;
#if _POSIX_TIMERS > 0 && defined(POSIX_TIMERS)
extern int _posix_clocking;
#endif
static class __EXPORT MainThread : public Thread
{
private:
void run(void);
public:
MainThread();
~MainThread();
} _mainthread;
extern "C" {
#ifdef _MSWINDOWS_
static unsigned __stdcall exec_thread(void *obj) {
assert(obj != NULL);
ucommon::Thread *th = static_cast(obj);
Thread *cth = static_cast(obj);
th->setPriority();
cth->map();
cth->initial();
cth->run();
cth->finalize();
cth->exit();
return 0;
}
#else
static void *exec_thread(void *obj)
{
assert(obj != NULL);
ucommon::Thread *th = static_cast(obj);
Thread *cth = static_cast(obj);
th->setPriority();
cth->map();
cth->initial();
cth->run();
cth->finalize();
cth->exit();
return NULL;
}
#endif
}
MainThread::MainThread() : Thread()
{
ucommon::Thread::init();
ucommon::Socket::init();
map();
}
MainThread::~MainThread()
{
}
void MainThread::run(void)
{
}
Thread::Thread(int pri, size_t stack) : ucommon::JoinableThread(stack)
{
priority = pri;
detached = false;
terminated = false;
msgpos = 0;
if(this == &_mainthread) {
parent = this;
exceptions = throwObject;
}
else {
parent = Thread::get();
if(!parent)
parent = &_mainthread;
exceptions = parent->exceptions;
}
}
Thread::~Thread()
{
if(!detached)
join();
finalize();
}
bool Thread::isRunning(void)
{
return !detached && running && !terminated;
}
void Thread::finalize(void)
{
if(terminated)
return;
terminated = true;
if(parent)
parent->notify(this);
final();
}
bool Thread::isThread(void)
{
pthread_t self = pthread_self();
if(equal(tid, self))
return true;
return false;
}
void Thread::terminate(void)
{
pthread_t self = pthread_self();
if(detached && equal(tid, self))
ucommon::Thread::exit();
else if(!detached)
join();
}
void Thread::exit(void)
{
pthread_t self = pthread_self();
if(detached && equal(tid, self)) {
delete this;
ucommon::Thread::exit();
}
terminate();
}
void Thread::initial(void)
{
}
void Thread::final(void)
{
}
void Thread::notify(Thread *thread)
{
}
#ifdef _MSWINDOWS_
void Thread::start(void)
{
if(running != INVALID_HANDLE_VALUE)
return;
if(stack == 1)
stack = 1024;
running = (HANDLE)_beginthreadex(NULL, stack, &exec_thread, this, 0, (unsigned int *)&tid);
if(!running)
running = INVALID_HANDLE_VALUE;
else
terminated = false;
}
void Thread::detach(void)
{
HANDLE hThread;;
if(stack == 1)
stack = 1024;
hThread = (HANDLE)_beginthreadex(NULL, stack, &exec_thread, this, 0, (unsigned int *)&tid);
CloseHandle(hThread);
}
#else
void Thread::start(void)
{
int result;
if(running)
return;
#ifndef __PTH__
pthread_attr_t attr;
pthread_attr_init(&attr);
pthread_attr_setdetachstate(&attr, PTHREAD_CREATE_JOINABLE);
pthread_attr_setinheritsched(&attr, PTHREAD_INHERIT_SCHED);
#endif
// we typically use "stack 1" for min stack...
#ifdef PTHREAD_STACK_MIN
if(stack && stack < PTHREAD_STACK_MIN)
stack = PTHREAD_STACK_MIN;
#else
if(stack && stack < 2)
stack = 0;
#endif
#ifdef __PTH__
pth_attr_t attr = PTH_ATTR_DEFAULT;
pth_attr_set(attr, PTH_ATTR_JOINABLE);
tid = pth_spawn(attr, &exec_thread, this);
#else
if(stack)
pthread_attr_setstacksize(&attr, stack);
result = pthread_create(&tid, &attr, &exec_thread, this);
pthread_attr_destroy(&attr);
if(!result) {
terminated = false;
running = true;
}
#endif
}
void Thread::detach(void)
{
#ifndef __PTH__
pthread_attr_t attr;
pthread_attr_init(&attr);
pthread_attr_setdetachstate(&attr, PTHREAD_CREATE_DETACHED);
pthread_attr_setinheritsched(&attr, PTHREAD_INHERIT_SCHED);
#endif
// we typically use "stack 1" for min stack...
#ifdef PTHREAD_STACK_MIN
if(stack && stack < PTHREAD_STACK_MIN)
stack = PTHREAD_STACK_MIN;
#else
if(stack && stack < 2)
stack = 0;
#endif
#ifdef __PTH__
tid = pth_spawn(PTH_ATTR_DEFAULT, &exec_thread, this);
#else
if(stack)
pthread_attr_setstacksize(&attr, stack);
pthread_create(&tid, &attr, &exec_thread, this);
pthread_attr_destroy(&attr);
#endif
}
#endif
Thread::Throw Thread::getException(void)
{
Thread *th = Thread::get();
if(!th)
return throwNothing;
return th->exceptions;
}
void Thread::setException(Thread::Throw _throw)
{
Thread *th = Thread::get();
if(th)
th->exceptions = _throw;
}
void Conditional::signal(bool broadcast)
{
if(broadcast)
ucommon::Conditional::broadcast();
else
ucommon::Conditional::signal();
}
bool Conditional::wait(timeout_t timeout, bool locked)
{
bool result;
if(!locked)
ucommon::Conditional::lock();
result = ucommon::Conditional::wait(timeout);
if(!locked)
ucommon::Conditional::unlock();
return result;
}
static pthread_mutex_t mlock;
time_t SysTime::getTime(time_t *tloc)
{
time_t ret;
pthread_mutex_lock(&mlock);
time_t temp;
::time(&temp);
memcpy(&ret, &temp, sizeof(time_t));
if (tloc != NULL)
memcpy(tloc, &ret, sizeof(time_t));
pthread_mutex_unlock(&mlock);
return ret;
}
int SysTime::getTimeOfDay(struct timeval *tp)
{
struct timeval temp;
int ret(0);
pthread_mutex_lock(&mlock);
#ifdef _MSWINDOWS_
// We could use _ftime(), but it is not available on WinCE.
// (WinCE also lacks time.h)
// Note also that the average error of _ftime is around 20 ms :)
time_t now;
time(&now);
temp.tv_sec = (long)now;
temp.tv_usec = (GetTickCount() % 1000) * 1000;
memcpy(tp, &temp, sizeof(struct timeval));
#else
ret = ::gettimeofday(&temp, NULL);
if(ret == 0)
memcpy(tp, &temp, sizeof(struct timeval));
#endif
pthread_mutex_unlock(&mlock);
return ret;
}
struct tm *SysTime::getLocalTime(const time_t *clock, struct tm* result)
{
pthread_mutex_lock(&mlock);
struct tm *temp = ::localtime(clock);
memcpy(result, temp, sizeof(struct tm));
pthread_mutex_unlock(&mlock);
return result;
}
struct tm *SysTime::getGMTTime(const time_t *clock, struct tm* result)
{
pthread_mutex_lock(&mlock);
struct tm *temp = ::gmtime(clock);
memcpy(result, temp, sizeof(struct tm));
pthread_mutex_unlock(&mlock);
return result;
}
#ifndef _MSWINDOWS_
#if _POSIX_TIMERS > 0 && defined(POSIX_TIMERS)
TimerPort::TimerPort()
{
struct timespec ts;
active = false;
::clock_gettime(_posix_clocking, &ts);
timer.tv_sec = ts.tv_sec;
timer.tv_usec = ts.tv_nsec / 1000;
}
#else
TimerPort::TimerPort()
{
active = false;
SysTime::getTimeOfDay(&timer);
}
#endif
void TimerPort::setTimer(timeout_t timeout)
{
#if _POSIX_TIMERS > 0 && defined(POSIX_TIMERS)
struct timespec ts;
::clock_gettime(_posix_clocking, &ts);
timer.tv_sec = ts.tv_sec;
timer.tv_usec = ts.tv_nsec / 1000l;
#else
SysTime::getTimeOfDay(&timer);
#endif
active = false;
if(timeout)
incTimer(timeout);
}
void TimerPort::incTimer(timeout_t timeout)
{
int secs = timeout / 1000;
int usecs = (timeout % 1000) * 1000;
timer.tv_usec += usecs;
if(timer.tv_usec >= 1000000l) {
++timer.tv_sec;
timer.tv_usec %= 1000000l;
}
timer.tv_sec += secs;
active = true;
}
void TimerPort::decTimer(timeout_t timeout)
{
int secs = timeout / 1000;
int usecs = (timeout % 1000) * 1000;
if(timer.tv_usec < usecs) {
--timer.tv_sec;
timer.tv_usec = 1000000l + timer.tv_usec - usecs;
}
else
timer.tv_usec -= usecs;
timer.tv_sec -= secs;
active = true;
}
#if _POSIX_TIMERS > 0 && defined(POSIX_TIMERS)
void TimerPort::sleepTimer(void)
{
struct timespec ts;
ts.tv_sec = timer.tv_sec;
ts.tv_nsec = timer.tv_usec * 1000l;
::clock_nanosleep(_posix_clocking, TIMER_ABSTIME, &ts, NULL);
}
#else
void TimerPort::sleepTimer(void)
{
timeout_t remaining = getTimer();
if(remaining && remaining != TIMEOUT_INF)
Thread::sleep(remaining);
}
#endif
void TimerPort::endTimer(void)
{
active = false;
}
timeout_t TimerPort::getTimer(void) const
{
#if _POSIX_TIMERS > 0 && defined(POSIX_TIMERS)
struct timespec now;
#else
struct timeval now;
#endif
long diff;
if(!active)
return TIMEOUT_INF;
#if _POSIX_TIMERS > 0 && defined(POSIX_TIMERS)
::clock_gettime(_posix_clocking, &now);
diff = (timer.tv_sec - now.tv_sec) * 1000l;
diff += (timer.tv_usec - (now.tv_nsec / 1000)) / 1000l;
#else
SysTime::getTimeOfDay(&now);
diff = (timer.tv_sec - now.tv_sec) * 1000l;
diff += (timer.tv_usec - now.tv_usec) / 1000l;
#endif
if(diff < 0)
return 0l;
return diff;
}
timeout_t TimerPort::getElapsed(void) const
{
#if _POSIX_TIMERS > 0 && defined(POSIX_TIMERS)
struct timespec now;
#else
struct timeval now;
#endif
long diff;
if(!active)
return TIMEOUT_INF;
#if _POSIX_TIMERS > 0 && defined(POSIX_TIMERS)
::clock_gettime(_posix_clocking, &now);
diff = (now.tv_sec - timer.tv_sec) * 1000l;
diff += ((now.tv_nsec / 1000l) - timer.tv_usec) / 1000l;
#else
SysTime::getTimeOfDay(&now);
diff = (now.tv_sec -timer.tv_sec) * 1000l;
diff += (now.tv_usec - timer.tv_usec) / 1000l;
#endif
if(diff < 0)
return 0;
return diff;
}
#else // WIN32
TimerPort::TimerPort()
{
active = false;
timer = GetTickCount();
}
void TimerPort::setTimer(timeout_t timeout)
{
timer = GetTickCount();
active = false;
if(timeout)
incTimer(timeout);
}
void TimerPort::incTimer(timeout_t timeout)
{
timer += timeout;
active = true;
}
void TimerPort::decTimer(timeout_t timeout)
{
timer -= timeout;
active = true;
}
void TimerPort::sleepTimer(void)
{
timeout_t remaining = getTimer();
if(remaining && remaining != TIMEOUT_INF)
Thread::sleep(remaining);
}
void TimerPort::endTimer(void)
{
active = false;
}
timeout_t TimerPort::getTimer(void) const
{
DWORD now;
long diff;
if(!active)
return TIMEOUT_INF;
now = GetTickCount();
diff = timer - now;
if(diff < 0)
return 0l;
return diff;
}
timeout_t TimerPort::getElapsed(void) const
{
DWORD now;
long diff;
if(!active)
return TIMEOUT_INF;
now = GetTickCount();
diff = now - timer;
if(diff < 0)
return 0l;
return diff;
}
#endif
MutexCounter::MutexCounter() : Mutex()
{
counter = 0;
}
MutexCounter::MutexCounter(int initial) : Mutex()
{
counter = initial;
}
int MutexCounter::operator++()
{
int rtn;
enterMutex();
rtn = counter++;
leaveMutex();
return rtn;
}
// ??? why cannot be < 0 ???
int MutexCounter::operator--()
{
int rtn = 0;
enterMutex();
if(counter) {
rtn = --counter;
if(!rtn) {
leaveMutex();
THROW(mc);
}
}
leaveMutex();
return rtn;
}
#ifndef _MSWINDOWS_
timespec *getTimeout(struct timespec *spec, timeout_t timer)
{
static struct timespec myspec;
if(spec == NULL)
spec = &myspec;
#ifdef PTHREAD_GET_EXPIRATION_NP
struct timespec offset;
offset.tv_sec = timer / 1000;
offset.tv_nsec = (timer % 1000) * 1000000;
pthread_get_expiration_np(&offset, spec);
#else
struct timeval current;
SysTime::getTimeOfDay(¤t);
spec->tv_sec = current.tv_sec + ((timer + current.tv_usec / 1000) / 1000);
spec->tv_nsec = ((current.tv_usec / 1000 + timer) % 1000) * 1000000;
#endif
return spec;
}
#endif
const size_t Buffer::timeout = ((size_t)(-1l));
#ifdef _MSWINDOWS_
Buffer::Buffer(size_t capacity) : Mutex()
#else
Buffer::Buffer(size_t capacity) : Conditional()
#endif
{
#ifdef _MSWINDOWS_
sem_head = ::CreateSemaphore((LPSECURITY_ATTRIBUTES)NULL, 0, MAX_SEM_VALUE, (LPCTSTR)NULL);
sem_tail = ::CreateSemaphore((LPSECURITY_ATTRIBUTES)NULL, (LONG)capacity, MAX_SEM_VALUE, (LPCTSTR)NULL);
#endif
_size = capacity;
_used = 0;
}
Buffer::~Buffer()
{
#ifdef _MSWINDOWS_
::CloseHandle(sem_head);
::CloseHandle(sem_tail);
#endif
}
#ifdef _MSWINDOWS_
size_t Buffer::wait(void *buf, timeout_t timeout)
{
size_t rc;
if(!timeout)
timeout = INFINITE;
if(WaitForSingleObject(sem_head, timeout) != WAIT_OBJECT_0)
return Buffer::timeout;
enterMutex();
rc = onWait(buf);
--_used;
leaveMutex();
::ReleaseSemaphore(sem_tail, 1, (LPLONG)NULL);
return rc;
}
size_t Buffer::post(void *buf, timeout_t timeout)
{
size_t rc;
if(!timeout)
timeout = INFINITE;
if(WaitForSingleObject(sem_tail, timeout) != WAIT_OBJECT_0)
return Buffer::timeout;
enterMutex();
rc = onPost(buf);
++_used;
leaveMutex();
::ReleaseSemaphore(sem_head, 1, (LPLONG)NULL);
return rc;
}
#else
size_t Buffer::wait(void *buf, timeout_t timeout)
{
size_t rc = 0;
enterMutex();
while(!_used) {
if(!Conditional::wait(timeout, true)) {
leaveMutex();
return Buffer::timeout;
}
}
rc = (ssize_t)onWait(buf);
--_used;
Conditional::signal(false);
leaveMutex();
return rc;
}
size_t Buffer::post(void *buf, timeout_t timeout)
{
size_t rc = 0;
enterMutex();
while(_used == _size) {
if(!Conditional::wait(timeout, true)) {
leaveMutex();
return Buffer::timeout;
}
}
rc = (ssize_t)onPost(buf);
++_used;
Conditional::signal(false);
leaveMutex();
return rc;
}
size_t Buffer::peek(void *buf)
{
size_t rc;
enterMutex();
if(!_used) {
leaveMutex();
return 0;
}
rc = onPeek(buf);
leaveMutex();
return rc;
}
#endif
bool Buffer::isValid(void)
{
return true;
}
FixedBuffer::FixedBuffer(size_t capacity, size_t osize) :
Buffer(capacity)
{
objsize = osize;
buf = new char[capacity * objsize];
#ifdef CCXX_EXCEPTIONS
if(!buf && Thread::getException() == Thread::throwObject)
throw(this);
else if(!buf && Thread::getException() == Thread::throwException)
throw(SyncException("fixed buffer failure"));
#endif
head = tail = buf;
}
FixedBuffer::~FixedBuffer()
{
if(buf)
delete[] buf;
}
bool FixedBuffer::isValid(void)
{
if(head && tail)
return true;
return false;
}
#define MAXBUF (buf + (getSize() * objsize))
size_t FixedBuffer::onWait(void *data)
{
memcpy(data, head, objsize);
if((head += objsize) >= MAXBUF)
head = buf;
return objsize;
}
size_t FixedBuffer::onPost(void *data)
{
memcpy(tail, data, objsize);
if((tail += objsize) >= MAXBUF)
tail = buf;
return objsize;
}
size_t FixedBuffer::onPeek(void *data)
{
memcpy(data, head, objsize);
return objsize;
}
ThreadQueue::ThreadQueue(const char *id, int pri, size_t stack) :
Mutex(), Thread(pri, stack), Semaphore(0), name(id)
{
first = last = NULL;
started = false;
timeout = 0;
}
ThreadQueue::~ThreadQueue()
{
data_t *data, *next;
if(started) {
started = false;
}
data = first;
while(data) {
next = data->next;
delete[] data;
data = next;
}
}
void ThreadQueue::run(void)
{
bool posted;
data_t *prev;
started = true;
for(;;) {
posted = Semaphore::wait(timeout);
if(!posted) {
onTimer();
if(!first)
continue;
}
if(!started)
sleep((timeout_t)~0);
startQueue();
while(first) {
runQueue(first->data);
enterMutex();
prev = first;
first = first->next;
delete[] prev;
if(!first)
last = NULL;
leaveMutex();
if(first)
Semaphore::wait(); // demark semaphore
}
stopQueue();
}
}
void ThreadQueue::final()
{
}
void ThreadQueue::onTimer(void)
{
}
void ThreadQueue::setTimer(timeout_t timed)
{
enterMutex();
timeout = timed;
leaveMutex();
if(!started) {
start();
started = true;
}
else if(!first)
Semaphore::post();
}
void ThreadQueue::post(const void *dp, unsigned len)
{
data_t *data = (data_t *)new char[sizeof(data_t) + len];
memcpy(data->data, dp, len);
data->len = len;
data->next = NULL;
enterMutex();
if(!first)
first = data;
if(last)
last->next = data;
last = data;
if(!started) {
start();
started = true;
}
leaveMutex();
Semaphore::post();
}
void ThreadQueue::startQueue(void)
{
}
void ThreadQueue::stopQueue(void)
{
}
ucommon-6.0.7/commoncpp/udp.cpp 0000644 0001750 0001750 00000055544 12163025062 013423 0000000 0000000 // Copyright (C) 1999-2005 Open Source Telecom Corporation.
// Copyright (C) 2006-2010 David Sugar, Tycho Softworks.
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
//
// As a special exception, you may use this file as part of a free software
// library without restriction. Specifically, if other files instantiate
// templates or use macros or inline functions from this file, or you compile
// this file and link it with other files to produce an executable, this
// file does not by itself cause the resulting executable to be covered by
// the GNU General Public License. This exception does not however
// invalidate any other reasons why the executable file might be covered by
// the GNU General Public License.
//
// This exception applies only to the code released under the name GNU
// Common C++. If you copy code from other releases into a copy of GNU
// Common C++, as the General Public License permits, the exception does
// not apply to the code that you add in this way. To avoid misleading
// anyone as to the status of such modified files, you must delete
// this exception notice from them.
//
// If you write modifications of your own for GNU Common C++, it is your choice
// whether to permit this exception to apply to your modifications.
// If you do not wish that, delete this exception notice.
//
#include
#include
#include
#include
#include
#include
#ifdef _MSWINDOWS_
#include
#define _IOLEN64 (unsigned)
#define _IORET64 (int)
typedef int socklen_t;
#define socket_errno WSAGetLastError()
#else
#include
#include
#ifdef HAVE_NET_IP6_H
#include
#endif
#define socket_errno errno
# ifndef O_NONBLOCK
# define O_NONBLOCK O_NDELAY
# endif
# ifdef IPPROTO_IP
# ifndef SOL_IP
# define SOL_IP IPPROTO_IP
# endif // !SOL_IP
# endif // IPPROTO_IP
#endif // !WIN32
#ifndef INADDR_LOOPBACK
#define INADDR_LOOPBACK (unsigned long)0x7f000001
#endif
#ifdef HAVE_NETINET_IN_H
#include
#endif
#if defined(__hpux)
#define _XOPEN_SOURCE_EXTENDED
#endif
#ifdef HAVE_NET_IF_H
#include
#endif
#ifndef _IOLEN64
#define _IOLEN64
#endif
#ifndef _IORET64
#define _IORET64
#endif
using namespace COMMONCPP_NAMESPACE;
#ifdef HAVE_GETADDRINFO
UDPSocket::UDPSocket(const char *name, Family fam) :
Socket(fam, SOCK_DGRAM, IPPROTO_UDP)
{
char namebuf[128], *cp;
struct addrinfo hint, *list = NULL, *first;
family = fam;
switch(fam) {
#ifdef CCXX_IPV6
case IPV6:
peer.ipv6.sin6_family = family;
break;
#endif
case IPV4:
peer.ipv4.sin_family = family;
}
snprintf(namebuf, sizeof(namebuf), "%s", name);
cp = strrchr(namebuf, '/');
if(!cp && family == IPV4)
cp = strrchr(namebuf, ':');
if(!cp) {
cp = namebuf;
name = NULL;
}
else {
name = namebuf;
*(cp++) = 0;
if(!strcmp(name, "*"))
name = NULL;
}
memset(&hint, 0, sizeof(hint));
hint.ai_family = family;
hint.ai_socktype = SOCK_DGRAM;
hint.ai_protocol = IPPROTO_UDP;
hint.ai_flags = AI_PASSIVE;
if(getaddrinfo(name, cp, &hint, &list) || !list) {
error(errBindingFailed, (char *)"Could not find service", errno);
endSocket();
return;
}
#if defined(SO_REUSEADDR)
int opt = 1;
setsockopt(so, SOL_SOCKET, SO_REUSEADDR, (char *)&opt,
(socklen_t)sizeof(opt));
#endif
first = list;
while(list) {
if(!bind(so, list->ai_addr, (socklen_t)list->ai_addrlen)) {
state = BOUND;
break;
}
list = list->ai_next;
}
freeaddrinfo(first);
if(state != BOUND) {
endSocket();
error(errBindingFailed, (char *)"Count not bind socket", errno);
return;
}
}
#else
UDPSocket::UDPSocket(const char *name, Family fam) :
Socket(fam, SOCK_DGRAM, IPPROTO_UDP)
{
char namebuf[128], *cp;
tpport_t port = 0;
struct servent *svc = NULL;
socklen_t alen = 0;
struct sockaddr *addr = NULL;
family = fam;
snprintf(namebuf, sizeof(namebuf), "%s", name);
cp = strrchr(namebuf, '/');
if(!cp && family == IPV4)
cp = strrchr(namebuf, ':');
if(!cp) {
cp = namebuf;
name = "*";
}
else {
name = namebuf;
*(cp++) = 0;
}
if(isdigit(*cp))
port = atoi(cp);
else {
mutex.enter();
svc = getservbyname(cp, "udp");
if(svc)
port = ntohs(svc->s_port);
mutex.leave();
if(!svc) {
error(errBindingFailed, (char *)"Could not find service", errno);
endSocket();
return;
}
}
struct sockaddr_in addr4;
IPV4Address ia4(name);
#ifdef CCXX_IPV6
struct sockaddr_in6 addr6;
IPV6Address ia6(name);
#endif
switch(family) {
#ifdef CCXX_IPV6
case IPV6:
peer.ipv6.sin6_family = family;
memset(&addr6, 0, sizeof(addr6));
addr6.sin6_family = family;
addr6.sin6_addr = ia6.getAddress();
addr6.sin6_port = htons(port);
alen = sizeof(addr6);
addr = (struct sockaddr *)&addr6;
break;
#endif
case IPV4:
peer.ipv4.sin_family = family;
memset(&addr4, 0, sizeof(addr4));
addr4.sin_family = family;
addr4.sin_addr = ia4.getAddress();
addr4.sin_port = htons(port);
alen = sizeof(&addr4);
addr = (struct sockaddr *)&addr4;
}
#if defined(SO_REUSEADDR)
int opt = 1;
setsockopt(so, SOL_SOCKET, SO_REUSEADDR, (char *)&opt,
(socklen_t)sizeof(opt));
#endif
if(addr && !bind(so, addr, alen))
state = BOUND;
if(state != BOUND) {
endSocket();
error(errBindingFailed, (char *)"Count not bind socket", errno);
return;
}
}
#endif
UDPSocket::UDPSocket(Family fam) :
Socket(fam, SOCK_DGRAM, IPPROTO_UDP)
{
family = fam;
memset(&peer, 0, sizeof(peer));
switch(fam) {
#ifdef CCXX_IPV6
case IPV6:
peer.ipv6.sin6_family = family;
break;
#endif
case IPV4:
peer.ipv4.sin_family = family;
}
}
UDPSocket::UDPSocket(const IPV4Address &ia, tpport_t port) :
Socket(AF_INET, SOCK_DGRAM, IPPROTO_UDP)
{
family = IPV4;
memset(&peer.ipv4, 0, sizeof(peer));
peer.ipv4.sin_family = AF_INET;
peer.ipv4.sin_addr = ia.getAddress();
peer.ipv4.sin_port = htons(port);
#if defined(SO_REUSEADDR)
int opt = 1;
setsockopt(so, SOL_SOCKET, SO_REUSEADDR, (char *)&opt, (socklen_t)sizeof(opt));
#endif
if(bind(so, (struct sockaddr *)&peer.ipv4, sizeof(peer.ipv4))) {
endSocket();
error(errBindingFailed,(char *)"Could not bind socket",socket_errno);
return;
}
state = BOUND;
}
#ifdef CCXX_IPV6
UDPSocket::UDPSocket(const IPV6Address &ia, tpport_t port) :
Socket(AF_INET6, SOCK_DGRAM, IPPROTO_UDP)
{
family = IPV6;
memset(&peer.ipv6, 0, sizeof(peer));
peer.ipv6.sin6_family = AF_INET6;
peer.ipv6.sin6_addr = ia.getAddress();
peer.ipv6.sin6_port = htons(port);
#if defined(SO_REUSEADDR)
int opt = 1;
setsockopt(so, SOL_SOCKET, SO_REUSEADDR, (char *)&opt, (socklen_t)sizeof(opt));
#endif
if(bind(so, (struct sockaddr *)&peer.ipv6, sizeof(peer.ipv6))) {
endSocket();
error(errBindingFailed,(char *)"Could not bind socket",socket_errno);
return;
}
state = BOUND;
}
#endif
UDPSocket::~UDPSocket()
{
endSocket();
}
ssize_t UDPSocket::send(const void *buf, size_t len)
{
struct sockaddr *addr = NULL;
socklen_t alen = 0;
switch(family) {
#ifdef CCXX_IPV6
case IPV6:
addr = (struct sockaddr *)&peer.ipv6;
alen = sizeof(struct sockaddr_in6);
break;
#endif
case IPV4:
addr = (struct sockaddr *)&peer.ipv4;
alen = sizeof(struct sockaddr_in);
break;
default:
return -1;
}
if(isConnected()) {
addr = NULL;
alen = 0;
}
return _IORET64 ::sendto(so, (const char *)buf, _IOLEN64 len, MSG_NOSIGNAL, addr, alen);
}
ssize_t UDPSocket::receive(void *buf, size_t len, bool reply)
{
struct sockaddr *addr = NULL;
struct sockaddr_in senderAddress; // DMC 2/7/05 ADD for use below.
socklen_t alen = 0;
switch(family) {
#ifdef CCXX_IPV6
case IPV6:
addr = (struct sockaddr *)&peer.ipv6;
alen = sizeof(struct sockaddr_in6);
break;
#endif
case IPV4:
addr = (struct sockaddr *)&peer.ipv4;
alen = sizeof(struct sockaddr_in);
break;
default:
return -1;
}
if(isConnected() || !reply) {
// DMC 2/7/05 MOD to use senderAddress instead of NULL, to prevent 10014 error
// from recvfrom.
//addr = NULL;
//alen = 0;
addr = (struct sockaddr*)(&senderAddress);
alen = sizeof(struct sockaddr_in);
}
int bytes = ::recvfrom(so, (char *)buf, _IOLEN64 len, 0, addr, &alen);
#ifdef _MSWINDOWS_
if (bytes == SOCKET_ERROR) {
WSAGetLastError();
}
#endif
return _IORET64 bytes;
}
Socket::Error UDPSocket::join(const IPV4Multicast &ia,int InterfaceIndex)
{
#if defined(_MSWINDOWS_) && defined(IP_ADD_MEMBERSHIP)
// DMC 2/7/05: Added WIN32 block. Win32 does not define the ip_mreqn structure,
// so we must use ip_mreq with INADDR_ANY.
struct ip_mreq group;
struct sockaddr_in myaddr;
socklen_t len = sizeof(myaddr);
if(!flags.multicast)
return error(errMulticastDisabled);
memset(&group, 0, sizeof(group));
getsockname(so, (struct sockaddr *)&myaddr, &len);
group.imr_multiaddr.s_addr = ia.getAddress().s_addr;
group.imr_interface.s_addr = INADDR_ANY;
setsockopt(so, IPPROTO_IP, IP_ADD_MEMBERSHIP, (char *)&group, sizeof(group));
return errSuccess;
#elif defined(IP_ADD_MEMBERSHIP) && defined(SIOCGIFINDEX) && !defined(__FreeBSD__) && !defined(__FreeBSD_kernel__) && !defined(_OSF_SOURCE) && !defined(__hpux) && !defined(__GNU__)
struct ip_mreqn group;
struct sockaddr_in myaddr;
socklen_t len = sizeof(myaddr);
if(!flags.multicast)
return error(errMulticastDisabled);
getsockname(so, (struct sockaddr *)&myaddr, &len);
memset(&group, 0, sizeof(group));
memcpy(&group.imr_address, &myaddr.sin_addr, sizeof(myaddr.sin_addr));
group.imr_multiaddr = ia.getAddress();
group.imr_ifindex = InterfaceIndex;
setsockopt(so, IPPROTO_IP, IP_ADD_MEMBERSHIP, (char *)&group, sizeof(group));
return errSuccess;
#elif defined(IP_ADD_MEMBERSHIP)
// if no by index, use INADDR_ANY
struct ip_mreq group;
struct sockaddr_in myaddr;
socklen_t len = sizeof(myaddr);
if(!flags.multicast)
return error(errMulticastDisabled);
getsockname(so, (struct sockaddr *)&myaddr, &len);
memset(&group, sizeof(group), 0);
group.imr_multiaddr.s_addr = ia.getAddress().s_addr;
group.imr_interface.s_addr = INADDR_ANY;
setsockopt(so, IPPROTO_IP, IP_ADD_MEMBERSHIP, (char *)&group, sizeof(group));
return errSuccess;
#else
return error(errServiceUnavailable);
#endif
}
Socket::Error UDPSocket::getInterfaceIndex(const char *DeviceName,int& InterfaceIndex)
{
#ifndef _MSWINDOWS_
#if defined(IP_ADD_MEMBERSHIP) && defined(SIOCGIFINDEX) && !defined(__FreeBSD__) && !defined(__FreeBSD_kernel__) && !defined(_OSF_SOURCE) && !defined(__hpux) && !defined(__GNU__)
struct ip_mreqn mreqn;
struct ifreq m_ifreq;
int i;
sockaddr_in* in4 = (sockaddr_in*) &peer.ipv4;
InterfaceIndex = -1;
memset(&mreqn, 0, sizeof(mreqn));
memcpy(&mreqn.imr_multiaddr.s_addr, &in4->sin_addr, sizeof(mreqn.imr_multiaddr.s_addr));
for (i = 0; i < IFNAMSIZ && DeviceName[i]; ++i)
m_ifreq.ifr_name[i] = DeviceName[i];
for (; i < IFNAMSIZ; ++i)
m_ifreq.ifr_name[i] = 0;
if (ioctl (so, SIOCGIFINDEX, &m_ifreq))
return error(errServiceUnavailable);
#if defined(__FreeBSD__) || defined(__GNU__)
InterfaceIndex = m_ifreq.ifr_ifru.ifru_index;
#else
InterfaceIndex = m_ifreq.ifr_ifindex;
#endif
return errSuccess;
#else
return error(errServiceUnavailable);
#endif
#else
return error(errServiceUnavailable);
#endif // WIN32
}
#ifdef AF_UNSPEC
Socket::Error UDPSocket::disconnect(void)
{
struct sockaddr_in addr;
int len = sizeof(addr);
if(so == INVALID_SOCKET)
return errSuccess;
Socket::state = BOUND;
memset(&addr, 0, len);
#ifndef _MSWINDOWS_
addr.sin_family = AF_UNSPEC;
#else
addr.sin_family = AF_INET;
memset(&addr.sin_addr, 0, sizeof(addr.sin_addr));
#endif
if(::connect(so, (sockaddr *)&addr, len))
return connectError();
return errSuccess;
}
#else
Socket::Error UDPSocket::disconnect(void)
{
if(so == INVALID_SOCKET)
return errSuccess;
Socket::state = BOUND;
return connect(getLocal());
}
#endif
void UDPSocket::setPeer(const IPV4Host &ia, tpport_t port)
{
memset(&peer.ipv4, 0, sizeof(peer.ipv4));
peer.ipv4.sin_family = AF_INET;
peer.ipv4.sin_addr = ia.getAddress();
peer.ipv4.sin_port = htons(port);
}
void UDPSocket::connect(const IPV4Host &ia, tpport_t port)
{
setPeer(ia, port);
if(so == INVALID_SOCKET)
return;
if(!::connect(so, (struct sockaddr *)&peer.ipv4, sizeof(struct sockaddr_in)))
Socket::state = CONNECTED;
}
#ifdef CCXX_IPV6
void UDPSocket::setPeer(const IPV6Host &ia, tpport_t port)
{
memset(&peer.ipv6, 0, sizeof(peer.ipv6));
peer.ipv6.sin6_family = AF_INET6;
peer.ipv6.sin6_addr = ia.getAddress();
peer.ipv6.sin6_port = htons(port);
}
void UDPSocket::connect(const IPV6Host &ia, tpport_t port)
{
setPeer(ia, port);
if(so == INVALID_SOCKET)
return;
if(!::connect(so, (struct sockaddr *)&peer.ipv6, sizeof(struct sockaddr_in6)))
Socket::state = CONNECTED;
}
#endif
#ifdef HAVE_GETADDRINFO
void UDPSocket::setPeer(const char *name)
{
char namebuf[128], *cp;
struct addrinfo hint, *list;
snprintf(namebuf, sizeof(namebuf), "%s", name);
cp = strrchr(namebuf, '/');
if(!cp)
cp = strrchr(namebuf, ':');
if(!cp)
return;
memset(&hint, 0, sizeof(hint));
hint.ai_family = family;
hint.ai_socktype = SOCK_DGRAM;
hint.ai_protocol = IPPROTO_UDP;
if(getaddrinfo(namebuf, cp, &hint, &list) || !list)
return;
switch(family) {
#ifdef CCXX_IPV6
case IPV6:
memcpy(&peer.ipv6, list->ai_addr, sizeof(peer.ipv6));
break;
#endif
case IPV4:
memcpy(&peer.ipv4, list->ai_addr, sizeof(peer.ipv4));
break;
}
freeaddrinfo(list);
}
#else
void UDPSocket::setPeer(const char *name)
{
char namebuf[128], *cp;
struct servent *svc;
tpport_t port;
snprintf(namebuf, sizeof(namebuf), "%s", name);
cp = strrchr(namebuf, '/');
if(!cp)
cp = strrchr(namebuf, ':');
if(!cp)
return;
if(isdigit(*cp))
port = atoi(cp);
else {
mutex.enter();
svc = getservbyname(cp, "udp");
if(svc)
port = ntohs(svc->s_port);
mutex.leave();
if(!svc)
return;
}
memset(&peer, 0, sizeof(peer));
switch(family) {
#ifdef CCXX_IPV6
case IPV6:
setPeer(IPV6Host(namebuf), port);
break;
#endif
case IPV4:
setPeer(IPV4Host(namebuf), port);
break;
}
}
#endif
void UDPSocket::connect(const char *service)
{
int rtn = -1;
setPeer(service);
if(so == INVALID_SOCKET)
return;
switch(family) {
#ifdef CCXX_IPV6
case IPV6:
rtn = ::connect(so, (struct sockaddr *)&peer.ipv6, sizeof(struct sockaddr_in6));
break;
#endif
case IPV4:
rtn = ::connect(so, (struct sockaddr *)&peer.ipv4, sizeof(struct sockaddr_in));
break;
}
if(!rtn)
Socket::state = CONNECTED;
}
IPV4Host UDPSocket::getIPV4Peer(tpport_t *port) const
{
// FIXME: insufficient buffer
// how to retrieve peer ??
char buf;
socklen_t len = sizeof(peer.ipv4);
int rtn = ::recvfrom(so, &buf, 1, MSG_PEEK, (struct sockaddr *)&peer.ipv4, &len);
#ifdef _MSWINDOWS_
if(rtn < 1 && WSAGetLastError() != WSAEMSGSIZE) {
if(port)
*port = 0;
memset((void*) &peer.ipv4, 0, sizeof(peer.ipv4));
}
#else
if(rtn < 1) {
if(port)
*port = 0;
memset((void*) &peer.ipv4, 0, sizeof(peer.ipv4));
}
#endif
else {
if(port)
*port = ntohs(peer.ipv4.sin_port);
}
return IPV4Host(peer.ipv4.sin_addr);
}
#ifdef CCXX_IPV6
IPV6Host UDPSocket::getIPV6Peer(tpport_t *port) const
{
// FIXME: insufficient buffer
// how to retrieve peer ??
char buf;
socklen_t len = sizeof(peer.ipv6);
int rtn = ::recvfrom(so, &buf, 1, MSG_PEEK, (struct sockaddr *)&peer.ipv6, &len);
#ifdef _MSWINDOWS_
if(rtn < 1 && WSAGetLastError() != WSAEMSGSIZE) {
if(port)
*port = 0;
memset((void*) &peer.ipv6, 0, sizeof(peer.ipv6));
}
#else
if(rtn < 1) {
if(port)
*port = 0;
memset((void*) &peer.ipv6, 0, sizeof(peer.ipv6));
}
#endif
else {
if(port)
*port = ntohs(peer.ipv6.sin6_port);
}
return IPV6Host(peer.ipv6.sin6_addr);
}
#endif
UDPBroadcast::UDPBroadcast(const IPV4Address &ia, tpport_t port) :
UDPSocket(ia, port)
{
if(so != INVALID_SOCKET)
setBroadcast(true);
}
void UDPBroadcast::setPeer(const IPV4Broadcast &ia, tpport_t port)
{
memset(&peer.ipv4, 0, sizeof(peer.ipv4));
peer.ipv4.sin_family = AF_INET;
peer.ipv4.sin_addr = ia.getAddress();
peer.ipv4.sin_port = htons(port);
}
UDPTransmit::UDPTransmit(const IPV4Address &ia, tpport_t port) :
UDPSocket(ia, port)
{
disconnect(); // assure not started live
::shutdown(so, 0);
receiveBuffer(0);
}
#ifdef CCXX_IPV6
UDPTransmit::UDPTransmit(const IPV6Address &ia, tpport_t port) :
UDPSocket(ia, port)
{
disconnect(); // assure not started live
::shutdown(so, 0);
receiveBuffer(0);
}
#endif
UDPTransmit::UDPTransmit(Family family) : UDPSocket(family)
{
disconnect();
::shutdown(so, 0);
receiveBuffer(0);
}
Socket::Error UDPTransmit::cConnect(const IPV4Address &ia, tpport_t port)
{
int len = sizeof(peer.ipv4);
peer.ipv4.sin_family = AF_INET;
peer.ipv4.sin_addr = ia.getAddress();
peer.ipv4.sin_port = htons(port);
// Win32 will crash if you try to connect to INADDR_ANY.
if ( INADDR_ANY == peer.ipv4.sin_addr.s_addr )
peer.ipv4.sin_addr.s_addr = INADDR_LOOPBACK;
if(::connect(so, (sockaddr *)&peer.ipv4, len))
return connectError();
return errSuccess;
}
#ifdef CCXX_IPV6
Socket::Error UDPTransmit::connect(const IPV6Address &ia, tpport_t port)
{
int len = sizeof(peer.ipv6);
peer.ipv6.sin6_family = AF_INET6;
peer.ipv6.sin6_addr = ia.getAddress();
peer.ipv6.sin6_port = htons(port);
// Win32 will crash if you try to connect to INADDR_ANY.
if(!memcmp(&peer.ipv6.sin6_addr, &in6addr_any, sizeof(in6addr_any)))
memcpy(&peer.ipv6.sin6_addr, &in6addr_loopback,
sizeof(in6addr_loopback));
if(::connect(so, (struct sockaddr *)&peer.ipv6, len))
return connectError();
return errSuccess;
}
#endif
Socket::Error UDPTransmit::connect(const IPV4Host &ia, tpport_t port)
{
if(isBroadcast())
setBroadcast(false);
return cConnect((IPV4Address)ia,port);
}
Socket::Error UDPTransmit::connect(const IPV4Broadcast &subnet, tpport_t port)
{
if(!isBroadcast())
setBroadcast(true);
return cConnect((IPV4Address)subnet,port);
}
Socket::Error UDPTransmit::connect(const IPV4Multicast &group, tpport_t port)
{
Error err;
if(!( err = UDPSocket::setMulticast(true) ))
return err;
return cConnect((IPV4Address)group,port);
}
#ifdef CCXX_IPV6
Socket::Error UDPTransmit::connect(const IPV6Multicast &group, tpport_t port)
{
Error error;
if(!( error = UDPSocket::setMulticast(true) ))
return error;
return connect((IPV6Address)group,port);
}
#endif
UDPReceive::UDPReceive(const IPV4Address &ia, tpport_t port) :
UDPSocket(ia, port)
{
::shutdown(so, 1);
sendBuffer(0);
}
#ifdef CCXX_IPV6
UDPReceive::UDPReceive(const IPV6Address &ia, tpport_t port) :
UDPSocket(ia, port)
{
::shutdown(so, 1);
sendBuffer(0);
}
#endif
Socket::Error UDPReceive::connect(const IPV4Host &ia, tpport_t port)
{
int len = sizeof(peer.ipv4);
peer.ipv4.sin_family = AF_INET;
peer.ipv4.sin_addr = ia.getAddress();
peer.ipv4.sin_port = htons(port);
// Win32 will crash if you try to connect to INADDR_ANY.
if ( INADDR_ANY == peer.ipv4.sin_addr.s_addr )
peer.ipv4.sin_addr.s_addr = INADDR_LOOPBACK;
if(::connect(so, (struct sockaddr *)&peer.ipv4, len))
return connectError();
return errSuccess;
}
#ifdef CCXX_IPV6
Socket::Error UDPReceive::connect(const IPV6Host &ia, tpport_t port)
{
int len = sizeof(peer.ipv6);
peer.ipv6.sin6_family = AF_INET6;
peer.ipv6.sin6_addr = ia.getAddress();
peer.ipv6.sin6_port = htons(port);
// Win32 will crash if you try to connect to INADDR_ANY.
if(!memcmp(&peer.ipv6.sin6_addr, &in6addr_any, sizeof(in6addr_any)))
memcpy(&peer.ipv6.sin6_addr, &in6addr_loopback, sizeof(in6addr_loopback));
if(::connect(so, (sockaddr *)&peer.ipv6, len))
return connectError();
return errSuccess;
}
#endif
UDPDuplex::UDPDuplex(const IPV4Address &bind, tpport_t port) :
UDPTransmit(bind, port + 1), UDPReceive(bind, port)
{}
#ifdef CCXX_IPV6
UDPDuplex::UDPDuplex(const IPV6Address &bind, tpport_t port) :
UDPTransmit(bind, port + 1), UDPReceive(bind, port)
{}
#endif
Socket::Error UDPDuplex::connect(const IPV4Host &host, tpport_t port)
{
Error rtn = UDPTransmit::connect(host, port);
if(rtn) {
UDPTransmit::disconnect();
UDPReceive::disconnect();
return rtn;
}
return UDPReceive::connect(host, port + 1);
}
#ifdef CCXX_IPV6
Socket::Error UDPDuplex::connect(const IPV6Host &host, tpport_t port)
{
Error rtn = UDPTransmit::connect(host, port);
if(rtn) {
UDPTransmit::disconnect();
UDPReceive::disconnect();
return rtn;
}
return UDPReceive::connect(host, port + 1);
}
#endif
Socket::Error UDPDuplex::disconnect(void)
{
Error rtn = UDPTransmit::disconnect();
Error rtn2 = UDPReceive::disconnect();
if (rtn) return rtn;
return rtn2;
}
ucommon-6.0.7/commoncpp/slog.cpp 0000644 0001750 0001750 00000026260 12163025062 013570 0000000 0000000 // Copyright (C) 1999-2005 Open Source Telecom Corporation.
// Copyright (C) 2006-2010 David Sugar, Tycho Softworks.
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
//
// As a special exception, you may use this file as part of a free software
// library without restriction. Specifically, if other files instantiate
// templates or use macros or inline functions from this file, or you compile
// this file and link it with other files to produce an executable, this
// file does not by itself cause the resulting executable to be covered by
// the GNU General Public License. This exception does not however
// invalidate any other reasons why the executable file might be covered by
// the GNU General Public License.
//
// This exception applies only to the code released under the name GNU
// Common C++. If you copy code from other releases into a copy of GNU
// Common C++, as the General Public License permits, the exception does
// not apply to the code that you add in this way. To avoid misleading
// anyone as to the status of such modified files, you must delete
// this exception notice from them.
//
// If you write modifications of your own for GNU Common C++, it is your choice
// whether to permit this exception to apply to your modifications.
// If you do not wish that, delete this exception notice.
//
#include
#include
#include
#include
#ifdef __BORLANDC__
#include
#include
#else
#include
#include
#endif
#ifdef HAVE_SYSLOG_H
#include
#endif
using std::streambuf;
using std::ofstream;
using std::ostream;
using std::clog;
using std::endl;
using std::ios;
using namespace COMMONCPP_NAMESPACE;
Slog ost::slog;
Slog::Slog(void) :
streambuf()
#ifdef OLD_IOSTREAM
,ostream()
#else
,ostream((streambuf *)this)
#endif
{
#ifdef OLD_IOSTREAM
init((streambuf *)this);
#endif
_enable = true;
_level = levelDebug;
_clogEnable = true;
#ifndef HAVE_SYSLOG_H
syslog = NULL;
#endif
}
Slog::~Slog(void)
{
#ifdef HAVE_SYSLOG_H
closelog();
#else
if(syslog)
fclose(syslog);
#endif
}
void Slog::close(void)
{
#ifdef HAVE_SYSLOG_H
closelog();
#else
pthread_mutex_lock(&lock);
if(syslog)
fclose(syslog);
syslog = NULL;
pthread_mutex_unlock(&lock);
#endif
}
void Slog::open(const char *ident, Class grp)
{
const char *cp;
#ifdef HAVE_SYSLOG_H
cp = strrchr(ident, '/');
if(cp)
ident = ++cp;
int fac;
switch(grp) {
case classUser:
fac = LOG_USER;
break;
case classDaemon:
fac = LOG_DAEMON;
break;
case classAudit:
#ifdef LOG_AUTHPRIV
fac = LOG_AUTHPRIV;
break;
#endif
case classSecurity:
fac = LOG_AUTH;
break;
case classLocal0:
fac = LOG_LOCAL0;
break;
case classLocal1:
fac = LOG_LOCAL1;
break;
case classLocal2:
fac = LOG_LOCAL2;
break;
case classLocal3:
fac = LOG_LOCAL3;
break;
case classLocal4:
fac = LOG_LOCAL4;
break;
case classLocal5:
fac = LOG_LOCAL5;
break;
case classLocal6:
fac = LOG_LOCAL6;
break;
case classLocal7:
fac = LOG_LOCAL7;
break;
default:
fac = LOG_USER;
break;
}
openlog(ident, 0, fac);
#else
char *buf;
pthread_mutex_lock(&lock);
if(syslog)
fclose(syslog);
buf = new char[strlen(ident) + 1];
strcpy(buf, ident);
cp = (const char *)buf;
buf = strrchr(buf, '.');
if(buf) {
if(!stricmp(buf, ".exe"))
strcpy(buf, ".log");
}
syslog = fopen(cp, "a");
delete[] (char *)cp;
pthread_mutex_unlock(&lock);
#endif
}
void Slog::error(const char *format, ...)
{
Thread *thread = Thread::get();
va_list args;
va_start(args, format);
overflow(EOF);
if(!thread)
return;
error();
vsnprintf(thread->msgbuf, sizeof(thread->msgbuf), format, args);
thread->msgpos = strlen(thread->msgbuf);
overflow(EOF);
va_end(args);
}
void Slog::warn(const char *format, ...)
{
Thread *thread = Thread::get();
va_list args;
if(!thread)
return;
va_start(args, format);
overflow(EOF);
warn();
vsnprintf(thread->msgbuf, sizeof(thread->msgbuf), format, args);
thread->msgpos = strlen(thread->msgbuf);
overflow(EOF);
va_end(args);
}
void Slog::debug(const char *format, ...)
{
Thread *thread = Thread::get();
va_list args;
if(!thread)
return;
va_start(args, format);
overflow(EOF);
debug();
vsnprintf(thread->msgbuf, sizeof(thread->msgbuf), format, args);
thread->msgpos = strlen(thread->msgbuf);
overflow(EOF);
va_end(args);
}
void Slog::emerg(const char *format, ...)
{
Thread *thread = Thread::get();
va_list args;
if(!thread)
return;
va_start(args, format);
overflow(EOF);
emerg();
vsnprintf(thread->msgbuf, sizeof(thread->msgbuf), format, args);
thread->msgpos = strlen(thread->msgbuf);
overflow(EOF);
va_end(args);
}
void Slog::alert(const char *format, ...)
{
Thread *thread = Thread::get();
va_list args;
if(!thread)
return;
va_start(args, format);
overflow(EOF);
alert();
vsnprintf(thread->msgbuf, sizeof(thread->msgbuf), format, args);
thread->msgpos = strlen(thread->msgbuf);
overflow(EOF);
va_end(args);
}
void Slog::critical(const char *format, ...)
{
Thread *thread = Thread::get();
va_list args;
if(!thread)
return;
va_start(args, format);
overflow(EOF);
critical();
vsnprintf(thread->msgbuf, sizeof(thread->msgbuf), format, args);
thread->msgpos = strlen(thread->msgbuf);
overflow(EOF);
va_end(args);
}
void Slog::notice(const char *format, ...)
{
Thread *thread = Thread::get();
va_list args;
if(!thread)
return;
va_start(args, format);
overflow(EOF);
notice();
vsnprintf(thread->msgbuf, sizeof(thread->msgbuf), format, args);
thread->msgpos = strlen(thread->msgbuf);
overflow(EOF);
va_end(args);
}
void Slog::info(const char *format, ...)
{
Thread *thread = Thread::get();
va_list args;
if(!thread)
return;
va_start(args, format);
overflow(EOF);
info();
vsnprintf(thread->msgbuf, sizeof(thread->msgbuf), format, args);
thread->msgpos = strlen(thread->msgbuf);
overflow(EOF);
va_end(args);
}
int Slog::overflow(int c)
{
Thread *thread = Thread::get();
if(!thread)
return c;
if(c == '\n' || !c || c == EOF) {
if(!thread->msgpos)
return c;
thread->msgbuf[thread->msgpos] = 0;
if (_enable)
#ifdef HAVE_SYSLOG_H
::syslog(priority, "%s", thread->msgbuf);
#else
{
time_t now;
struct tm *dt;
time(&now);
dt = localtime(&now);
char buf[256];
const char *p = "unknown";
switch(priority) {
case levelEmergency:
p = "emerg";
break;
case levelInfo:
p = "info";
break;
case levelError:
p = "error";
break;
case levelAlert:
p = "alert";
break;
case levelDebug:
p = "debug";
break;
case levelNotice:
p = "notice";
break;
case levelWarning:
p = "warn";
break;
case levelCritical:
p = "crit";
break;
}
pthread_mutex_lock(&lock);
snprintf(buf, sizeof(buf), "%04d-%02d-%02d %02d:%02d:%02d [%s] %s\n",
dt->tm_year + 1900, dt->tm_mon + 1, dt->tm_mday,
dt->tm_hour, dt->tm_min, dt->tm_sec,
p, thread->msgbuf);
if(syslog)
fputs(buf, syslog);
// syslog << "[" << priority << "] " << thread->msgbuf << endl;
pthread_mutex_unlock(&lock);
}
#endif
thread->msgpos = 0;
if ( _enable && _clogEnable
#ifndef _MSWINDOWS_
&& (getppid() > 1)
#endif
)
clog << thread->msgbuf << endl;
_enable = true;
return c;
}
if (thread->msgpos < (int)(sizeof(thread->msgbuf) - 1))
thread->msgbuf[thread->msgpos++] = c;
return c;
}
Slog &Slog::operator()(const char *ident, Class grp, Level lev)
{
Thread *thread = Thread::get();
if(!thread)
return *this;
thread->msgpos = 0;
_enable = true;
open(ident, grp);
return this->operator()(lev, grp);
}
Slog &Slog::operator()(Level lev, Class grp)
{
Thread *thread = Thread::get();
if(!thread)
return *this;
thread->msgpos = 0;
if(_level >= lev)
_enable = true;
else
_enable = false;
#ifdef HAVE_SYSLOG_H
switch(lev) {
case levelEmergency:
priority = LOG_EMERG;
break;
case levelAlert:
priority = LOG_ALERT;
break;
case levelCritical:
priority = LOG_CRIT;
break;
case levelError:
priority = LOG_ERR;
break;
case levelWarning:
priority = LOG_WARNING;
break;
case levelNotice:
priority = LOG_NOTICE;
break;
case levelInfo:
priority = LOG_INFO;
break;
case levelDebug:
priority = LOG_DEBUG;
break;
}
switch(grp) {
case classAudit:
#ifdef LOG_AUTHPRIV
priority |= LOG_AUTHPRIV;
break;
#endif
case classSecurity:
priority |= LOG_AUTH;
break;
case classUser:
priority |= LOG_USER;
break;
case classDaemon:
priority |= LOG_DAEMON;
break;
case classDefault:
priority |= LOG_USER;
break;
case classLocal0:
priority |= LOG_LOCAL0;
break;
case classLocal1:
priority |= LOG_LOCAL1;
break;
case classLocal2:
priority |= LOG_LOCAL2;
break;
case classLocal3:
priority |= LOG_LOCAL3;
break;
case classLocal4:
priority |= LOG_LOCAL4;
break;
case classLocal5:
priority |= LOG_LOCAL5;
break;
case classLocal6:
priority |= LOG_LOCAL6;
break;
case classLocal7:
priority |= LOG_LOCAL7;
break;
}
#else
priority = lev;
#endif
return *this;
}
Slog &Slog::operator()(void)
{
return *this;
}
ucommon-6.0.7/commoncpp/mime.cpp 0000644 0001750 0001750 00000007661 12163025062 013557 0000000 0000000 // Copyright (C) 2001-2005 Open Source Telecom Corporation.
// Copyright (C) 2006-2010 David Sugar, Tycho Softworks.
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
//
// As a special exception, you may use this file as part of a free software
// library without restriction. Specifically, if other files instantiate
// templates or use macros or inline functions from this file, or you compile
// this file and link it with other files to produce an executable, this
// file does not by itself cause the resulting executable to be covered by
// the GNU General Public License. This exception does not however
// invalidate any other reasons why the executable file might be covered by
// the GNU General Public License.
//
// This exception applies only to the code released under the name GNU
// Common C++. If you copy code from other releases into a copy of GNU
// Common C++, as the General Public License permits, the exception does
// not apply to the code that you add in this way. To avoid misleading
// anyone as to the status of such modified files, you must delete
// this exception notice from them.
//
// If you write modifications of your own for GNU Common C++, it is your choice
// whether to permit this exception to apply to your modifications.
// If you do not wish that, delete this exception notice.
//
#include
#include
#include
#include
#include
#include
#include
NAMESPACE_COMMONCPP
using namespace std;
MIMEMultipart::MIMEMultipart(const char *mt)
{
const char *cp = strchr(mt, '/');
if(cp)
mt = ++cp;
first = last = NULL;
header[1] = NULL;
header[0] = mtype;
setString(boundry, sizeof(boundry), "xyzzy");
snprintf(mtype, sizeof(mtype), "Content-Type: multipart/%s, boundry=%s", mt, boundry);
}
MIMEMultipart::~MIMEMultipart()
{}
void MIMEMultipart::head(std::ostream *out)
{
char **list = header;
while(**list)
*out << *(list++) << "\r\n";
out->flush();
}
void MIMEMultipart::body(std::ostream *out)
{
MIMEItemPart *item = first;
while(item) {
*out << "--" << boundry << "\r\n";
item->head(out);
*out << "\r\n";
item->body(out);
item = item->next;
}
*out << "--" << boundry << "--\r\n";
out->flush();
}
MIMEItemPart::MIMEItemPart(MIMEMultipart *m, const char *ct)
{
if(m->last) {
m->last->next = this;
m->last = this;
}
else
m->first = m->last = this;
next = NULL;
ctype = ct;
}
MIMEItemPart::~MIMEItemPart()
{}
MIMEMultipartForm::MIMEMultipartForm() :
MIMEMultipart("form-data")
{}
MIMEMultipartForm::~MIMEMultipartForm()
{}
void MIMEItemPart::head(std::ostream *out)
{
*out << "Content-Type: " << ctype << "\r" << endl;
}
MIMEFormData::MIMEFormData(MIMEMultipartForm *m, const char *n, const char *v) :
MIMEItemPart(m, "")
{
name = n;
content = v;
}
MIMEFormData::~MIMEFormData()
{}
void MIMEFormData::head(std::ostream *out)
{
*out << "Content-Disposition: form-data; name=\"" << name << "\"\r\n";
}
void MIMEFormData::body(std::ostream *out)
{
*out << content << "\r\n";
}
END_NAMESPACE
/** EMACS **
* Local variables:
* mode: c++
* c-basic-offset: 4
* End:
*/
ucommon-6.0.7/ucommon-config.h.in 0000644 0001750 0001750 00000016162 12175171615 013634 0000000 0000000 /* ucommon-config.h.in. Generated from configure.ac by autoheader. */
/* has posix clock functions */
#undef HAVE_CLOCK_GETTIME
/* has clocked nanosleep */
#undef HAVE_CLOCK_NANOSLEEP
/* Define to 1 if you have the header file. */
#undef HAVE_DIRENT_H
/* Define to 1 if you have the header file. */
#undef HAVE_DLFCN_H
/* Define to 1 if you have the header file. */
#undef HAVE_ENDIAN_H
/* has execvp in libc */
#undef HAVE_EXECVP
/* Define to 1 if you have the header file. */
#undef HAVE_FCNTL_H
/* has ftok */
#undef HAVE_FTOK
/* can truncate files */
#undef HAVE_FTRUNCATE
/* "cannot test in autoconf safely" */
#undef HAVE_GCC_ATOMICS
/* have getaddrinfo */
#undef HAVE_GETADDRINFO
/* have gethostbyname2 */
#undef HAVE_GETHOSTBYNAME2
/* has gettext in glibc */
#undef HAVE_GETTEXT
/* has localtime_r */
#undef HAVE_GMTIME_R
/* have inet_ntop */
#undef HAVE_INET_NTOP
/* Define to 1 if you have the header file. */
#undef HAVE_INTTYPES_H
/* international headers */
#undef HAVE_LIBINTL_H
/* Define to 1 if you have the header file. */
#undef HAVE_LINUX_VERSION_H
/* has localtime_r */
#undef HAVE_LOCALTIME_R
/* have lstat */
#undef HAVE_LSTAT
/* Define to 1 if you have the header file. */
#undef HAVE_MACH_CLOCK_H
/* Define to 1 if you have the header file. */
#undef HAVE_MACH_O_DYLD_H
/* Define to 1 if you have the header file. */
#undef HAVE_MEMORY_H
/* has nanosleep */
#undef HAVE_NANOSLEEP
/* Define to 1 if you have the header file. */
#undef HAVE_NETINET_IN_H
/* Define to 1 if you have the header file. */
#undef HAVE_NET_IF_H
/* Define to 1 if you have the header file. */
#undef HAVE_OPENSSL_FIPS_H
/* Define to 1 if you have the header file. */
#undef HAVE_OPENSSL_SSL_H
/* Define to 1 if you have the header file. */
#undef HAVE_POLL_H
/* can specify access options */
#undef HAVE_POSIX_FADVISE
/* posix memory alignment */
#undef HAVE_POSIX_MEMALIGN
/* "pthread clocking" */
#undef HAVE_PTHREAD_CONDATTR_SETCLOCK
/* "pthread delay" */
#undef HAVE_PTHREAD_DELAY
/* "pthread delay np" */
#undef HAVE_PTHREAD_DELAY_NP
/* "pthread concurrency" */
#undef HAVE_PTHREAD_SETCONCURRENCY
/* "pthread scheduling" */
#undef HAVE_PTHREAD_SETSCHEDPRIO
/* "pthread yield" */
#undef HAVE_PTHREAD_YIELD
/* can do atomic write with offset */
#undef HAVE_PWRITE
/* has readlink in libc */
#undef HAVE_READLINK
/* realpath support */
#undef HAVE_REALPATH
/* have regex header */
#undef HAVE_REGEX_H
/* can set localization */
#undef HAVE_SETLOCALE
/* process group control */
#undef HAVE_SETPGRP
/* alternate dyn loader */
#undef HAVE_SHL_LOAD
/* shared memory open */
#undef HAVE_SHM_OPEN
/* have socketpair in libsocket */
#undef HAVE_SOCKETPAIR
/* "Socks proxy support" */
#undef HAVE_SOCKS
/* Define to 1 if you have the header file. */
#undef HAVE_SOCKS_H
/* Define to 1 if you have the header file. */
#undef HAVE_STDEXCEPT
/* Define to 1 if you have the header file. */
#undef HAVE_STDINT_H
/* Define to 1 if you have the header file. */
#undef HAVE_STDLIB_H
/* string collation */
#undef HAVE_STRCOLL
/* has strerror_r */
#undef HAVE_STRERROR_R
/* string icmp */
#undef HAVE_STRICMP
/* Define to 1 if you have the header file. */
#undef HAVE_STRINGS_H
/* Define to 1 if you have the header file. */
#undef HAVE_STRING_H
/* string istr */
#undef HAVE_STRISTR
/* has symlink in libc */
#undef HAVE_SYMLINK
/* system config */
#undef HAVE_SYSCONF
/* Define to 1 if you have the header file. */
#undef HAVE_SYSLOG_H
/* Define to 1 if you have the header file. */
#undef HAVE_SYS_EVENT_H
/* Define to 1 if you have the header file. */
#undef HAVE_SYS_FILE_H
/* Define to 1 if you have the header file. */
#undef HAVE_SYS_FILIO_H
/* Define to 1 if you have the header file. */
#undef HAVE_SYS_INOTIFY_H
/* Define to 1 if you have the header file. */
#undef HAVE_SYS_LOCKF_H
/* Define to 1 if you have the header file. */
#undef HAVE_SYS_MMAN_H
/* Define to 1 if you have the header file. */
#undef HAVE_SYS_PARAM_H
/* Define to 1 if you have the header file. */
#undef HAVE_SYS_POLL_H
/* Define to 1 if you have the header file. */
#undef HAVE_SYS_RESOURCE_H
/* Define to 1 if you have the header file. */
#undef HAVE_SYS_SHM_H
/* Define to 1 if you have the header file. */
#undef HAVE_SYS_STAT_H
/* Define to 1 if you have the header file. */
#undef HAVE_SYS_TIMEB_H
/* Define to 1 if you have the header file. */
#undef HAVE_SYS_TYPES_H
/* Define to 1 if you have the header file. */
#undef HAVE_SYS_WAIT_H
/* Define to 1 if you have the header file. */
#undef HAVE_TERMIOS_H
/* Define to 1 if you have the