ilusha/cpython
1
0
Fork 0
mirror of https://github.com/python/cpython synced 2026-09-29 12:10:30 +03:00
Code Issues Projects Releases Packages Wiki Activity Actions

Added [GS]etCreatorType methods to FSSpec objects

Browse source
This commit is contained in:
Jack Jansen 1995-02-02 14:23:52 +00:00
parent 992ff06e98
commit 8828fcf738
1 changed files with 49 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

49
Mac/Modules/macfsmodule.c
View file

@ -288,11 +288,60 @@ mfss_NewAliasMinimal(self, args)
return (object *)newmfsaobject(alias);
}
/* XXXX These routines should be replaced with a complete interface to *FInfo */
static object *
mfss_GetCreatorType(self, args)
mfssobject *self;
object *args;
{
OSErr err;
FInfo info;
if (!newgetargs(args, ""))
return NULL;
err = FSpGetFInfo(&self->fsspec, &info);
if ( err ) {
PyErr_Mac(ErrorObject, err);
return NULL;
}
return Py_BuildValue("(O&O&)",
PyMac_BuildOSType, info.fdCreator, PyMac_BuildOSType, info.fdType);
}
static object *
mfss_SetCreatorType(self, args)
mfssobject *self;
object *args;
{
OSErr err;
OSType creator, type;
FInfo info;
if (!newgetargs(args, "O&O&", PyMac_GetOSType, &creator, PyMac_GetOSType, &type))
return NULL;
err = FSpGetFInfo(&self->fsspec, &info);
if ( err ) {
PyErr_Mac(ErrorObject, err);
return NULL;
}
info.fdType = type;
info.fdCreator = creator;
err = FSpSetFInfo(&self->fsspec, &info);
if ( err ) {
PyErr_Mac(ErrorObject, err);
return NULL;
}
INCREF(None);
return None;
}
static struct methodlist mfss_methods[] = {
{"as_pathname", (method)mfss_as_pathname, 1},
{"as_tuple", (method)mfss_as_tuple, 1},
{"NewAlias", (method)mfss_NewAlias, 1},
{"NewAliasMinimal", (method)mfss_NewAliasMinimal, 1},
{"GetCreatorType", (method)mfss_GetCreatorType, 1},
{"SetCreatorType", (method)mfss_SetCreatorType, 1},
{NULL, NULL} /* sentinel */
};