Where Online Learning is simpler!

The C and C++ Include Header Files

/usr/include/apache2/modperl_io.h


$ cat -n /usr/include/apache2/modperl_io.h

     1	/* Licensed to the Apache Software Foundation (ASF) under one or more
     2	 * contributor license agreements.  See the NOTICE file distributed with
     3	 * this work for additional information regarding copyright ownership.
     4	 * The ASF licenses this file to You under the Apache License, Version 2.0
     5	 * (the "License"); you may not use this file except in compliance with
     6	 * the License.  You may obtain a copy of the License at
     7	 *
     8	 *     http://www.apache.org/licenses/LICENSE-2.0
     9	 *
    10	 * Unless required by applicable law or agreed to in writing, software
    11	 * distributed under the License is distributed on an "AS IS" BASIS,
    12	 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
    13	 * See the License for the specific language governing permissions and
    14	 * limitations under the License.
    15	 */
    16	
    17	#ifndef MODPERL_IO_H
    18	#define MODPERL_IO_H
    19	
    20	#include "modperl_io_apache.h"
    21	
    22	/*
    23	 * bleedperl change #11639 switch tied handle magic
    24	 * from living in the gv to the GvIOp(gv), so we have to deal
    25	 * with both to support 5.6.x
    26	 */
    27	#if MP_PERL_VERSION_AT_LEAST(5, 7, 0)
    28	#   define TIEHANDLE_SV(handle) (SV*)GvIOp((SV*)handle)
    29	#else
    30	#   define TIEHANDLE_SV(handle) (SV*)handle
    31	#endif
    32	
    33	#define dHANDLE(name) GV *handle = gv_fetchpv(name, TRUE, SVt_PVIO)
    34	
    35	#define IoFLUSH_off(gv) \
    36	IoFLAGS(GvIOp((gv))) &= ~IOf_FLUSH
    37	
    38	#define IoFLUSH_on(gv) \
    39	IoFLAGS(GvIOp((gv))) |= IOf_FLUSH
    40	
    41	#define IoFLUSH(gv) \
    42	(IoFLAGS(GvIOp((gv))) & IOf_FLUSH)
    43	
    44	MP_INLINE void modperl_io_handle_tie(pTHX_ GV *handle,
    45	                                     char *classname, void *ptr);
    46	MP_INLINE GV *modperl_io_tie_stdout(pTHX_ request_rec *r);
    47	
    48	MP_INLINE GV *modperl_io_tie_stdin(pTHX_ request_rec *r);
    49	
    50	MP_INLINE int modperl_io_handle_tied(pTHX_ GV *handle, char *classname);
    51	
    52	MP_INLINE void modperl_io_handle_untie(pTHX_ GV *handle);
    53	
    54	MP_INLINE GV *modperl_io_perlio_override_stdin(pTHX_ request_rec *r);
    55	
    56	MP_INLINE GV *modperl_io_perlio_override_stdout(pTHX_ request_rec *r);
    57	
    58	MP_INLINE void modperl_io_perlio_restore_stdin(pTHX_ GV *handle);
    59	
    60	MP_INLINE void modperl_io_perlio_restore_stdout(pTHX_ GV *handle);
    61	
    62	#if defined(MP_IO_TIE_SFIO)
    63	    /* XXX */
    64	#elif defined(MP_IO_TIE_PERLIO)
    65	#define modperl_io_override_stdin  modperl_io_perlio_override_stdin
    66	#define modperl_io_override_stdout modperl_io_perlio_override_stdout
    67	#define modperl_io_restore_stdin   modperl_io_perlio_restore_stdin
    68	#define modperl_io_restore_stdout  modperl_io_perlio_restore_stdout
    69	#else
    70	#define modperl_io_override_stdin  modperl_io_tie_stdin
    71	#define modperl_io_override_stdout modperl_io_tie_stdout
    72	#define modperl_io_restore_stdin   modperl_io_handle_untie
    73	#define modperl_io_restore_stdout  modperl_io_handle_untie
    74	#endif
    75	
    76	
    77	#endif /* MODPERL_IO_H */
    78	
    79	/*
    80	 * Local Variables:
    81	 * c-basic-offset: 4
    82	 * indent-tabs-mode: nil
    83	 * End:
    84	 */