if (strcmp(name, "itemsize") == 0) {
return newintobject((long)a->ob_descr->itemsize);
}
+ if (strcmp(name, "__members__") == 0) {
+ object *list = newlistobject(2);
+ if (list) {
+ setlistitem(list, 0, newstringobject("typecode"));
+ setlistitem(list, 1, newstringobject("itemsize"));
+ if (err_occurred()) {
+ DECREF(list);
+ list = NULL;
+ }
+ }
+ return list;
+ }
return findmethod(array_methods, (object *)a, name);
}
if (a->ob_descr->typecode == 'c') {
fprintf(fp, "array('c', ");
v = array_tostring(a, (object *)NULL);
- ok = printobject(v, fp, flags);
+ ok = printobject(v, fp, 0);
XDECREF(v);
fprintf(fp, ")");
return ok;
if (i > 0)
fprintf(fp, ", ");
v = (a->ob_descr->getitem)(a, i);
- ok = printobject(v, fp, flags);
+ ok = printobject(v, fp, 0);
XDECREF(v);
}
fprintf(fp, "])");
return newopenfileobject(fp, name, mode, pclose);
}
+static object *
+posix_setuid(self, args)
+ object *self;
+ object *args;
+{
+ int uid;
+ if (!getargs(args, "i", &uid))
+ return NULL;
+ if (setuid(uid) < 0)
+ return posix_error();
+ INCREF(None);
+ return None;
+}
+
+static object *
+posix_setgid(self, args)
+ object *self;
+ object *args;
+{
+ int gid;
+ if (!getargs(args, "i", &gid))
+ return NULL;
+ if (setgid(gid) < 0)
+ return posix_error();
+ INCREF(None);
+ return None;
+}
+
static object *
posix_waitpid(self, args)
object *self;
{"getuid", posix_getuid},
{"kill", posix_kill},
{"popen", posix_popen},
+ {"setuid", posix_setuid},
+ {"setgid", posix_setgid},
{"setpgrp", posix_setpgrp},
{"wait", posix_wait},
{"waitpid", posix_waitpid},
if (ep->me_value != NULL) {
if (any++ > 0)
fprintf(fp, ", ");
- if (printobject((object *)ep->me_key, fp, flags) != 0)
+ if (printobject((object *)ep->me_key, fp, 0) != 0)
return -1;
fprintf(fp, ": ");
- if (printobject(ep->me_value, fp, flags) != 0)
+ if (printobject(ep->me_value, fp, 0) != 0)
return -1;
}
}
for (i = 0; i < op->ob_size; i++) {
if (i > 0)
fprintf(fp, ", ");
- if (printobject(op->ob_item[i], fp, flags) != 0)
+ if (printobject(op->ob_item[i], fp, 0) != 0)
return -1;
}
fprintf(fp, "]");
if (ep->me_value != NULL) {
if (any++ > 0)
fprintf(fp, ", ");
- if (printobject((object *)ep->me_key, fp, flags) != 0)
+ if (printobject((object *)ep->me_key, fp, 0) != 0)
return -1;
fprintf(fp, ": ");
- if (printobject(ep->me_value, fp, flags) != 0)
+ if (printobject(ep->me_value, fp, 0) != 0)
return -1;
}
}
for (i = 0; i < op->ob_size; i++) {
if (i > 0)
fprintf(fp, ", ");
- if (printobject(op->ob_item[i], fp, flags) != 0)
+ if (printobject(op->ob_item[i], fp, 0) != 0)
return -1;
}
if (op->ob_size == 1)
return newsizedstringobject(s, len);
v = newsizedstringobject((char *)NULL, len);
p = buf = getstringvalue(v);
- while (*s != '\0' && *s != '\'') {
+ while (*s != '\0' && *s != quote) {
if (*s != '\\') {
*p++ = *s++;
continue;