mapilib.pm.c

这个是内存数据库的客户端

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


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


XS(_wrap_MapiDateTime_year_set) {
    {
        MapiDateTime *arg1 = (MapiDateTime *) 0 ;
        short arg2 ;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 2) || (items > 2)) {
            SWIG_croak("Usage: MapiDateTime_year_set(self,year);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_MapiDateTime,0) < 0) {
                SWIG_croak("Type error in argument 1 of MapiDateTime_year_set. Expected _p_MapiDateTime");
            }
        }
        arg2 = (short) SvIV(ST(1));
        if (arg1) (arg1)->year = arg2;
        
        
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_MapiDateTime_year_get) {
    {
        MapiDateTime *arg1 = (MapiDateTime *) 0 ;
        short result;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 1) || (items > 1)) {
            SWIG_croak("Usage: MapiDateTime_year_get(self);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_MapiDateTime,0) < 0) {
                SWIG_croak("Type error in argument 1 of MapiDateTime_year_get. Expected _p_MapiDateTime");
            }
        }
        result = (short) ((arg1)->year);
        
        ST(argvi) = sv_newmortal();
        sv_setiv(ST(argvi++), (IV) result);
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_MapiDateTime_month_set) {
    {
        MapiDateTime *arg1 = (MapiDateTime *) 0 ;
        unsigned short arg2 ;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 2) || (items > 2)) {
            SWIG_croak("Usage: MapiDateTime_month_set(self,month);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_MapiDateTime,0) < 0) {
                SWIG_croak("Type error in argument 1 of MapiDateTime_month_set. Expected _p_MapiDateTime");
            }
        }
        arg2 = (unsigned short) SvUV(ST(1));
        if (arg1) (arg1)->month = arg2;
        
        
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_MapiDateTime_month_get) {
    {
        MapiDateTime *arg1 = (MapiDateTime *) 0 ;
        unsigned short result;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 1) || (items > 1)) {
            SWIG_croak("Usage: MapiDateTime_month_get(self);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_MapiDateTime,0) < 0) {
                SWIG_croak("Type error in argument 1 of MapiDateTime_month_get. Expected _p_MapiDateTime");
            }
        }
        result = (unsigned short) ((arg1)->month);
        
        ST(argvi) = sv_newmortal();
        sv_setuv(ST(argvi++), (UV) result);
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_MapiDateTime_day_set) {
    {
        MapiDateTime *arg1 = (MapiDateTime *) 0 ;
        unsigned short arg2 ;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 2) || (items > 2)) {
            SWIG_croak("Usage: MapiDateTime_day_set(self,day);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_MapiDateTime,0) < 0) {
                SWIG_croak("Type error in argument 1 of MapiDateTime_day_set. Expected _p_MapiDateTime");
            }
        }
        arg2 = (unsigned short) SvUV(ST(1));
        if (arg1) (arg1)->day = arg2;
        
        
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_MapiDateTime_day_get) {
    {
        MapiDateTime *arg1 = (MapiDateTime *) 0 ;
        unsigned short result;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 1) || (items > 1)) {
            SWIG_croak("Usage: MapiDateTime_day_get(self);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_MapiDateTime,0) < 0) {
                SWIG_croak("Type error in argument 1 of MapiDateTime_day_get. Expected _p_MapiDateTime");
            }
        }
        result = (unsigned short) ((arg1)->day);
        
        ST(argvi) = sv_newmortal();
        sv_setuv(ST(argvi++), (UV) result);
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_MapiDateTime_hour_set) {
    {
        MapiDateTime *arg1 = (MapiDateTime *) 0 ;
        unsigned short arg2 ;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 2) || (items > 2)) {
            SWIG_croak("Usage: MapiDateTime_hour_set(self,hour);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_MapiDateTime,0) < 0) {
                SWIG_croak("Type error in argument 1 of MapiDateTime_hour_set. Expected _p_MapiDateTime");
            }
        }
        arg2 = (unsigned short) SvUV(ST(1));
        if (arg1) (arg1)->hour = arg2;
        
        
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_MapiDateTime_hour_get) {
    {
        MapiDateTime *arg1 = (MapiDateTime *) 0 ;
        unsigned short result;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 1) || (items > 1)) {
            SWIG_croak("Usage: MapiDateTime_hour_get(self);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_MapiDateTime,0) < 0) {
                SWIG_croak("Type error in argument 1 of MapiDateTime_hour_get. Expected _p_MapiDateTime");
            }
        }
        result = (unsigned short) ((arg1)->hour);
        
        ST(argvi) = sv_newmortal();
        sv_setuv(ST(argvi++), (UV) result);
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_MapiDateTime_minute_set) {
    {
        MapiDateTime *arg1 = (MapiDateTime *) 0 ;
        unsigned short arg2 ;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 2) || (items > 2)) {
            SWIG_croak("Usage: MapiDateTime_minute_set(self,minute);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_MapiDateTime,0) < 0) {
                SWIG_croak("Type error in argument 1 of MapiDateTime_minute_set. Expected _p_MapiDateTime");
            }
        }
        arg2 = (unsigned short) SvUV(ST(1));
        if (arg1) (arg1)->minute = arg2;
        
        
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_MapiDateTime_minute_get) {
    {
        MapiDateTime *arg1 = (MapiDateTime *) 0 ;
        unsigned short result;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 1) || (items > 1)) {
            SWIG_croak("Usage: MapiDateTime_minute_get(self);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_MapiDateTime,0) < 0) {
                SWIG_croak("Type error in argument 1 of MapiDateTime_minute_get. Expected _p_MapiDateTime");
            }
        }
        result = (unsigned short) ((arg1)->minute);
        
        ST(argvi) = sv_newmortal();
        sv_setuv(ST(argvi++), (UV) result);
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_MapiDateTime_second_set) {
    {
        MapiDateTime *arg1 = (MapiDateTime *) 0 ;
        unsigned short arg2 ;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 2) || (items > 2)) {
            SWIG_croak("Usage: MapiDateTime_second_set(self,second);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_MapiDateTime,0) < 0) {
                SWIG_croak("Type error in argument 1 of MapiDateTime_second_set. Expected _p_MapiDateTime");
            }
        }
        arg2 = (unsigned short) SvUV(ST(1));
        if (arg1) (arg1)->second = arg2;
        
        
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_MapiDateTime_second_get) {
    {
        MapiDateTime *arg1 = (MapiDateTime *) 0 ;
        unsigned short result;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 1) || (items > 1)) {
            SWIG_croak("Usage: MapiDateTime_second_get(self);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_MapiDateTime,0) < 0) {
                SWIG_croak("Type error in argument 1 of MapiDateTime_second_get. Expected _p_MapiDateTime");
            }
        }
        result = (unsigned short) ((arg1)->second);
        
        ST(argvi) = sv_newmortal();
        sv_setuv(ST(argvi++), (UV) result);
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_MapiDateTime_fraction_set) {
    {
        MapiDateTime *arg1 = (MapiDateTime *) 0 ;
        unsigned int arg2 ;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 2) || (items > 2)) {
            SWIG_croak("Usage: MapiDateTime_fraction_set(self,fraction);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_MapiDateTime,0) < 0) {
                SWIG_croak("Type error in argument 1 of MapiDateTime_fraction_set. Expected _p_MapiDateTime");
            }
        }
        arg2 = (unsigned int) SvUV(ST(1));
        if (arg1) (arg1)->fraction = arg2;
        
        
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


XS(_wrap_MapiDateTime_fraction_get) {
    {
        MapiDateTime *arg1 = (MapiDateTime *) 0 ;
        unsigned int result;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 1) || (items > 1)) {
            SWIG_croak("Usage: MapiDateTime_fraction_get(self);");
        }
        {
            if (SWIG_ConvertPtr(ST(0), (void **) &arg1, SWIGTYPE_p_MapiDateTime,0) < 0) {
                SWIG_croak("Type error in argument 1 of MapiDateTime_fraction_get. Expected _p_MapiDateTime");
            }
        }
        result = (unsigned int) ((arg1)->fraction);
        
        ST(argvi) = sv_newmortal();
        sv_setuv(ST(argvi++), (UV) result);
        XSRETURN(argvi);
        fail:
        ;
    }
    croak(Nullch);
}


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


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


XS(_wrap_mapi_mapi) {
    {
        char *arg1 = (char *) 0 ;
        int arg2 ;
        char *arg3 = (char *) 0 ;
        char *arg4 = (char *) 0 ;
        char *arg5 = (char *) 0 ;
        char *arg6 = (char *) 0 ;
        Mapi result;
        int argvi = 0;
        dXSARGS;
        
        if ((items < 6) || (items > 6)) {
            SWIG_croak("Usage: mapi_mapi(host,port,username,password,lang,dbname);");
        }
        if (!SvOK((SV*) ST(0))) arg1 = 0;
        else arg1 = (char *) SvPV(ST(0), PL_na);
        arg2 = (int) SvIV(ST(1));
        if (!SvOK((SV*) ST(2))) arg3 = 0;
        else arg3 = (char *) SvPV(ST(2), PL_na);
        if (!SvOK((SV*) ST(3))) arg4 = 0;
        else arg4 = (char *) SvPV(ST(3), PL_na);
        if (!SvOK((SV*) ST(4))) arg5 = 0;
        else arg5 = (char *) SvPV(ST(4), PL_na);
        if (!SvOK((SV*) ST(5))) arg6 = 0;
        else arg6 = (char *) SvPV(ST(5), PL_na);
        result = (Mapi)mapi_mapi((char const *)arg1,arg2,(char const *)arg3,(char const *)arg4,(char const *)arg5,(char const *)arg6);
        
        ST(argvi) = sv_newmortal();
        SWIG_MakePtr(ST(argvi++), (void *) result, SWIGTYPE_p_MapiStruct, 0|SWIG_OWNER);
        XSRETURN(argvi);
        fail: