text: #include "pwf.h"
  #include <pthread.h>
  
  static unsigned atou(char **s)
  {
  	unsigned x;
  	for (x=0; **s-'0'<10U; ++*s) x=10*x+(**s-'0');
  	return x;
  }
  
  int __getpwent_a(FILE *f, struct passwd *pw, char **line, size_t *size, struct passwd **res)
  {
  	ssize_t l;
  	char *s;
  	int rv = 0;
  	int cs;
  	pthread_setcancelstate(PTHREAD_CANCEL_DISABLE, &cs);
  	for (;;) {
  		if ((l=getline(line, size, f)) < 0) {
  			rv = ferror(f) ? errno : 0;
  			free(*line);
  			*line = 0;
  			pw = 0;
  			break;
  		}
  		line[0][l-1] = 0;
  
  		s = line[0];
  		pw->pw_name = s++;
  		if (!(s = strchr(s, ':'))) continue;
  
  		*s++ = 0; pw->pw_passwd = s;
  		if (!(s = strchr(s, ':'))) continue;
  
  		*s++ = 0; pw->pw_uid = atou(&s);
  		if (*s != ':') continue;
  
  		*s++ = 0; pw->pw_gid = atou(&s);
  		if (*s != ':') continue;
  
  		*s++ = 0; pw->pw_gecos = s;
  		if (!(s = strchr(s, ':'))) continue;
  
  		*s++ = 0; pw->pw_dir = s;
  		if (!(s = strchr(s, ':'))) continue;
  
  		*s++ = 0; pw->pw_shell = s;
  		break;
  	}
  	pthread_setcancelstate(cs, 0);
  	*res = pw;
  	if (rv) errno = rv;
  	return rv;
  }
  