core.c

subversion-1.4.5.tar.gz 配置svn的源码

        }
        {
            result = (svn_error_t *)(svn_error_t *) calloc(1, sizeof(svn_error_t));
            
            
            
            
        }
        {
            if (result) {
                SV *exception_handler = perl_get_sv ("SVN::Error::handler", FALSE);
                
                if (SvOK(exception_handler)) {
                    SV *callback_result;
                    
                    svn_swig_pl_callback_thunk (CALL_SV, exception_handler,
                    &callback_result, "S", result,
                    SWIGTYPE_p_svn_error_t);
                } else {
                    ST(argvi) = sv_newmortal();
                    SWIG_MakePtr (ST(argvi), (void *)result, SWIGTYPE_p_svn_error_t ,0);
                    argvi++;
                }
            }
        }
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_delete_svn_error_t) {
    {
        svn_error_t *arg1 = (svn_error_t *) 0 ;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 1) || (items > 1)) {
            SWIG_croak("Usage: delete_svn_error_t(self);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_svn_error_t,0) < 0) {
                SWIG_croak("Type error in argument 1 of delete_svn_error_t. Expected _p_svn_error_t");
            }
        }
        {
            free((char *) arg1);
            
            
            
            
        }
        
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_svn_dirent_t_kind_set) {
    {
        svn_dirent_t *arg1 = (svn_dirent_t *) 0 ;
        svn_node_kind_t arg2 ;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 2) || (items > 2)) {
            SWIG_croak("Usage: svn_dirent_t_kind_set(self,kind);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_svn_dirent_t,0) < 0) {
                SWIG_croak("Type error in argument 1 of svn_dirent_t_kind_set. Expected _p_svn_dirent_t");
            }
        }
        arg2 = (svn_node_kind_t) SvIV(ST(1));
        if (arg1) (arg1)->kind = arg2;
        
        
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_svn_dirent_t_kind_get) {
    {
        svn_dirent_t *arg1 = (svn_dirent_t *) 0 ;
        svn_node_kind_t result;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 1) || (items > 1)) {
            SWIG_croak("Usage: svn_dirent_t_kind_get(self);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_svn_dirent_t,0) < 0) {
                SWIG_croak("Type error in argument 1 of svn_dirent_t_kind_get. Expected _p_svn_dirent_t");
            }
        }
        result = (svn_node_kind_t) ((arg1)->kind);
        
        ST(argvi) = sv_newmortal();
        sv_setiv(ST(argvi++), (IV) result);
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_svn_dirent_t_size_set) {
    {
        svn_dirent_t *arg1 = (svn_dirent_t *) 0 ;
        svn_filesize_t arg2 ;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 2) || (items > 2)) {
            SWIG_croak("Usage: svn_dirent_t_size_set(self,size);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_svn_dirent_t,0) < 0) {
                SWIG_croak("Type error in argument 1 of svn_dirent_t_size_set. Expected _p_svn_dirent_t");
            }
        }
        arg2 = (svn_filesize_t) strtoll(SvPV(ST(1), PL_na), 0, 0);
        if (arg1) (arg1)->size = arg2;
        
        
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_svn_dirent_t_size_get) {
    {
        svn_dirent_t *arg1 = (svn_dirent_t *) 0 ;
        svn_filesize_t result;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 1) || (items > 1)) {
            SWIG_croak("Usage: svn_dirent_t_size_get(self);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_svn_dirent_t,0) < 0) {
                SWIG_croak("Type error in argument 1 of svn_dirent_t_size_get. Expected _p_svn_dirent_t");
            }
        }
        result =  ((arg1)->size);
        
        {
            char temp[256];
            sprintf(temp, "%" APR_INT64_T_FMT, (apr_int64_t) result);
            ST(argvi) = sv_newmortal();
            sv_setpv((SV*)ST(argvi++), temp);
        }
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_svn_dirent_t_has_props_set) {
    {
        svn_dirent_t *arg1 = (svn_dirent_t *) 0 ;
        svn_boolean_t arg2 ;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 2) || (items > 2)) {
            SWIG_croak("Usage: svn_dirent_t_has_props_set(self,has_props);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_svn_dirent_t,0) < 0) {
                SWIG_croak("Type error in argument 1 of svn_dirent_t_has_props_set. Expected _p_svn_dirent_t");
            }
        }
        arg2 = (svn_boolean_t) SvIV(ST(1));
        if (arg1) (arg1)->has_props = arg2;
        
        
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_svn_dirent_t_has_props_get) {
    {
        svn_dirent_t *arg1 = (svn_dirent_t *) 0 ;
        svn_boolean_t result;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 1) || (items > 1)) {
            SWIG_croak("Usage: svn_dirent_t_has_props_get(self);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_svn_dirent_t,0) < 0) {
                SWIG_croak("Type error in argument 1 of svn_dirent_t_has_props_get. Expected _p_svn_dirent_t");
            }
        }
        result = (svn_boolean_t) ((arg1)->has_props);
        
        ST(argvi) = sv_newmortal();
        sv_setiv(ST(argvi++), (IV) result);
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_svn_dirent_t_created_rev_set) {
    {
        svn_dirent_t *arg1 = (svn_dirent_t *) 0 ;
        svn_revnum_t arg2 ;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 2) || (items > 2)) {
            SWIG_croak("Usage: svn_dirent_t_created_rev_set(self,created_rev);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_svn_dirent_t,0) < 0) {
                SWIG_croak("Type error in argument 1 of svn_dirent_t_created_rev_set. Expected _p_svn_dirent_t");
            }
        }
        arg2 = (svn_revnum_t) SvIV(ST(1));
        if (arg1) (arg1)->created_rev = arg2;
        
        
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_svn_dirent_t_created_rev_get) {
    {
        svn_dirent_t *arg1 = (svn_dirent_t *) 0 ;
        svn_revnum_t result;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 1) || (items > 1)) {
            SWIG_croak("Usage: svn_dirent_t_created_rev_get(self);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_svn_dirent_t,0) < 0) {
                SWIG_croak("Type error in argument 1 of svn_dirent_t_created_rev_get. Expected _p_svn_dirent_t");
            }
        }
        result = (svn_revnum_t) ((arg1)->created_rev);
        
        ST(argvi) = sv_newmortal();
        sv_setiv(ST(argvi++), (IV) result);
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_svn_dirent_t_time_set) {
    {
        svn_dirent_t *arg1 = (svn_dirent_t *) 0 ;
        apr_time_t arg2 ;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 2) || (items > 2)) {
            SWIG_croak("Usage: svn_dirent_t_time_set(self,time);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_svn_dirent_t,0) < 0) {
                SWIG_croak("Type error in argument 1 of svn_dirent_t_time_set. Expected _p_svn_dirent_t");
            }
        }
        arg2 = (apr_time_t) strtoll(SvPV(ST(1), PL_na), 0, 0);
        if (arg1) (arg1)->time = arg2;
        
        
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_svn_dirent_t_time_get) {
    {
        svn_dirent_t *arg1 = (svn_dirent_t *) 0 ;
        apr_time_t result;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 1) || (items > 1)) {
            SWIG_croak("Usage: svn_dirent_t_time_get(self);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_svn_dirent_t,0) < 0) {
                SWIG_croak("Type error in argument 1 of svn_dirent_t_time_get. Expected _p_svn_dirent_t");
            }
        }
        result =  ((arg1)->time);
        
        {
            char temp[256];
            sprintf(temp, "%" APR_INT64_T_FMT, (apr_int64_t) result);
            ST(argvi) = sv_newmortal();
            sv_setpv((SV*)ST(argvi++), temp);
        }
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_svn_dirent_t_last_author_get) {
    {
        svn_dirent_t *arg1 = (svn_dirent_t *) 0 ;
        char *result;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 1) || (items > 1)) {
            SWIG_croak("Usage: svn_dirent_t_last_author_get(self);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_svn_dirent_t,0) < 0) {
                SWIG_croak("Type error in argument 1 of svn_dirent_t_last_author_get. Expected _p_svn_dirent_t");
            }
        }
        result = (char *) ((arg1)->last_author);
        
        ST(argvi) = sv_newmortal();
        if (result) {
            sv_setpv((SV*)ST(argvi++), (char *) result);
        } else {
            sv_setsv((SV*)ST(argvi++), &PL_sv_undef);
        }
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_new_svn_dirent_t) {
    {
        svn_dirent_t *result;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 0) || (items > 0)) {
            SWIG_croak("Usage: new_svn_dirent_t();");
        }
        {
            result = (svn_dirent_t *)(svn_dirent_t *) calloc(1, sizeof(svn_dirent_t));
            
            
            
            
        }
        ST(argvi) = sv_newmortal();
        SWIG_MakePtr(ST(argvi++), (void *) result, SWIGTYPE_p_svn_dirent_t, SWIG_SHADOW|SWIG_OWNER);
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_delete_svn_dirent_t) {
    {
        svn_dirent_t *arg1 = (svn_dirent_t *) 0 ;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 1) || (items > 1)) {
            SWIG_croak("Usage: delete_svn_dirent_t(self);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_svn_dirent_t,0) < 0) {
                SWIG_croak("Type error in argument 1 of delete_svn_dirent_t. Expected _p_svn_dirent_t");
            }
        }
        {
            free((char *) arg1);
            
            
            
            
        }
        
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_svn_dirent_dup) {
    {
        svn_dirent_t *arg1 = (svn_dirent_t *) 0 ;
        apr_pool_t *arg2 = (apr_pool_t *) 0 ;
        svn_dirent_t *result;
        apr_pool_t *_global_pool ;
        int argvi = 0;
        dXSARGS;
        
        {
            _global_pool = arg2 = svn_swig_pl_make_pool (ST(items-1));
        }
        if ((items < 1) || (items > 2)) {
            SWIG_croak("Usage: svn_dirent_dup(dirent,pool);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_svn_dirent_t,0) < 0) {
                SWIG_croak("Type error in argument 1 of svn_dirent_dup. Expected _p_svn_dirent_t");
            }
        }
        if (items > 1) {
            
        }
        {
            result = (svn_dirent_t *)svn_dirent_dup((struct svn_dirent_t const *)arg1,arg2);
            
            
            
            
        }
        ST(argvi) = sv_newmortal();
        SWIG_MakePtr(ST(argvi++), (void *) result, SWIGTYPE_p_svn_dirent_t, SWIG_SHADOW|0);
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_svn_commit_info_t_revision_set) {
    {
        svn_commit_info_t *arg1 = (svn_commit_info_t *) 0 ;
        svn_revnum_t arg2 ;