HEX
Server: Apache
System: Windows NT MAGNETO-ARM 10.0 build 22000 (Windows 10) AMD64
User: Michel (0)
PHP: 7.4.7
Disabled: NONE
Upload Files
File: C:/mod_perl-2.0.12/WrapXS/APR/URI/URI.xs
/*
 * *********** WARNING **************
 * This file generated by ModPerl::WrapXS/0.01
 * Any changes made here will be lost
 * ***********************************
 * 01: lib/ModPerl/WrapXS.pm:549
 * 02: lib/ModPerl/WrapXS.pm:1185
 * 03: Makefile.PL:435
 * 04: Makefile.PL:333
 * 05: Makefile.PL:59
 */



#define MP_IN_XS

#include "mod_perl.h"

#include "modperl_xs_sv_convert.h"

#include "modperl_xs_util.h"

#include "modperl_xs_typedefs.h"

#include "APR/URI/APR__URI.h"

MODULE = APR::URI    PACKAGE = APR::URI   PREFIX = apr_uri_

SV *
parse(classname, p_sv, uri)
    SV * classname
    SV * p_sv
    const char * uri


    CODE:
    /* avoiding -Wall warnings */
    classname = classname;
    p_sv = p_sv;
    uri = uri;

    RETVAL = mpxs_apr_uri_parse(aTHX_ classname, p_sv, uri);

    OUTPUT:
    RETVAL

MODULE = APR::URI    PACKAGE = APR::URI   PREFIX = apr_uri_

apr_port_t
apr_uri_port_of_scheme(scheme_str)
    const char * scheme_str


MODULE = APR::URI    PACKAGE = APR::URI   PREFIX = apr_uri_

char *
unparse(uptr, flags=APR_URI_UNP_OMITPASSWORD)
    APR::URI uptr
    unsigned flags


    CODE:
    /* avoiding -Wall warnings */
    uptr = uptr;
    flags = flags;

    RETVAL = mpxs_apr_uri_unparse(aTHX_ uptr, flags);

    OUTPUT:
    RETVAL

MODULE = APR::URI    PACKAGE = APR::URI   PREFIX = mpxs_APR__URI_

char *
mpxs_APR__URI_port(uri, portsv=(SV *)NULL)
    APR::URI uri
    SV * portsv


    CODE:
    /* avoiding -Wall warnings */
    uri = uri;
    portsv = portsv;

    RETVAL = mpxs_APR__URI_port(aTHX_ uri, portsv);

    OUTPUT:
    RETVAL

MODULE = APR::URI    PACKAGE = APR::URI   PREFIX = mpxs_APR__URI_

SV *
mpxs_APR__URI_rpath(apr_uri)
    APR::URI apr_uri


    CODE:
    /* avoiding -Wall warnings */
    apr_uri = apr_uri;

    RETVAL = mpxs_APR__URI_rpath(aTHX_ apr_uri);

    OUTPUT:
    RETVAL

MODULE = APR::URI    PACKAGE = APR::URI 

char *
scheme(obj, val_sv=(SV *)NULL)
    APR::URI obj
    SV *val_sv

    PREINIT:


    CODE:
    RETVAL = (char *) obj->scheme;

    if (val_sv) {
        if (SvOK(val_sv)) {
            STRLEN val_len;
            char *val = (char *)SvPV(val_sv, val_len);
            obj->scheme = apr_pstrndup(mpxs_APR__URI_pool(obj), val, val_len);
        }
        else {
            obj->scheme = NULL;
        }
    }

    OUTPUT:
    RETVAL

MODULE = APR::URI    PACKAGE = APR::URI 

char *
hostinfo(obj, val=NULL)
    APR::URI obj
    char_len * val

    PREINIT:
    STRLEN val_len;


    CODE:
    RETVAL = (char *) obj->hostinfo;

    if (items > 1) {
         
         obj->hostinfo = (char *) (SvOK(ST(1)) ?
                    apr_pstrndup(mpxs_APR__URI_pool(obj), val, val_len) : NULL);
    }

    OUTPUT:
    RETVAL

MODULE = APR::URI    PACKAGE = APR::URI 

char *
user(obj, val_sv=(SV *)NULL)
    APR::URI obj
    SV *val_sv

    PREINIT:


    CODE:
    RETVAL = (char *) obj->user;

    if (val_sv) {
        if (SvOK(val_sv)) {
            STRLEN val_len;
            char *val = (char *)SvPV(val_sv, val_len);
            obj->user = apr_pstrndup(mpxs_APR__URI_pool(obj), val, val_len);
        }
        else {
            obj->user = NULL;
        }
    }

    OUTPUT:
    RETVAL

MODULE = APR::URI    PACKAGE = APR::URI 

char *
password(obj, val_sv=(SV *)NULL)
    APR::URI obj
    SV *val_sv

    PREINIT:


    CODE:
    RETVAL = (char *) obj->password;

    if (val_sv) {
        if (SvOK(val_sv)) {
            STRLEN val_len;
            char *val = (char *)SvPV(val_sv, val_len);
            obj->password = apr_pstrndup(mpxs_APR__URI_pool(obj), val, val_len);
        }
        else {
            obj->password = NULL;
        }
    }

    OUTPUT:
    RETVAL

MODULE = APR::URI    PACKAGE = APR::URI 

char *
hostname(obj, val_sv=(SV *)NULL)
    APR::URI obj
    SV *val_sv

    PREINIT:


    CODE:
    RETVAL = (char *) obj->hostname;

    if (val_sv) {
        if (SvOK(val_sv)) {
            STRLEN val_len;
            char *val = (char *)SvPV(val_sv, val_len);
            obj->hostname = apr_pstrndup(mpxs_APR__URI_pool(obj), val, val_len);
        }
        else {
            obj->hostname = NULL;
        }
    }

    OUTPUT:
    RETVAL

MODULE = APR::URI    PACKAGE = APR::URI 

char *
path(obj, val_sv=(SV *)NULL)
    APR::URI obj
    SV *val_sv

    PREINIT:


    CODE:
    RETVAL = (char *) obj->path;

    if (val_sv) {
        if (SvOK(val_sv)) {
            STRLEN val_len;
            char *val = (char *)SvPV(val_sv, val_len);
            obj->path = apr_pstrndup(mpxs_APR__URI_pool(obj), val, val_len);
        }
        else {
            obj->path = NULL;
        }
    }

    OUTPUT:
    RETVAL

MODULE = APR::URI    PACKAGE = APR::URI 

char *
query(obj, val_sv=(SV *)NULL)
    APR::URI obj
    SV *val_sv

    PREINIT:


    CODE:
    RETVAL = (char *) obj->query;

    if (val_sv) {
        if (SvOK(val_sv)) {
            STRLEN val_len;
            char *val = (char *)SvPV(val_sv, val_len);
            obj->query = apr_pstrndup(mpxs_APR__URI_pool(obj), val, val_len);
        }
        else {
            obj->query = NULL;
        }
    }

    OUTPUT:
    RETVAL

MODULE = APR::URI    PACKAGE = APR::URI 

char *
fragment(obj, val_sv=(SV *)NULL)
    APR::URI obj
    SV *val_sv

    PREINIT:


    CODE:
    RETVAL = (char *) obj->fragment;

    if (val_sv) {
        if (SvOK(val_sv)) {
            STRLEN val_len;
            char *val = (char *)SvPV(val_sv, val_len);
            obj->fragment = apr_pstrndup(mpxs_APR__URI_pool(obj), val, val_len);
        }
        else {
            obj->fragment = NULL;
        }
    }

    OUTPUT:
    RETVAL

MODULE = APR::URI
PROTOTYPES: disabled

BOOT:
    items = items; /* -Wall */