File:  [ELWIX - Embedded LightWeight unIX -] / libaitio / src / exec.c
Revision 1.1.2.14: download - view: text, annotated - select for diffs - revision graph
Sun Dec 8 20:43:22 2013 UTC (10 years, 6 months ago) by misho
Branches: io6_7
new api add

    1: #include "global.h"
    2: 
    3: 
    4: /*
    5:  * io_progInit() - Init program pool
    6:  *
    7:  * @progName = program name for execution
    8:  * @initNum = initial started programs
    9:  * @maxNum = maximum started programs
   10:  * return: NULL error or !=NULL allocated pool (must destroied with io_progDestroy())
   11:  */
   12: prog_t *
   13: io_progInit(const char *progName, u_int initNum, u_int maxNum)
   14: {
   15: 	prog_t *prg = NULL;
   16: 
   17: 	if (initNum > maxNum)
   18: 		return NULL;
   19: 
   20: 	prg = e_malloc(sizeof(prog_t));
   21: 	if (!prg) {
   22: 		io_SetErr(elwix_GetErrno(), "%s", elwix_GetError());
   23: 		return NULL;
   24: 	} else
   25: 		memset(prg, 0, sizeof(prog_t));
   26: 
   27: 	prg->prog_inin = initNum;
   28: 	prg->prog_maxn = maxNum;
   29: 	strlcpy(prg->prog_name, progName, sizeof prg->prog_name);
   30: 
   31: 	prg->prog_used = e_malloc(E_ALIGN(prg->prog_maxn, sizeof *prg->prog_used) / 
   32: 			sizeof *prg->prog_used);
   33: 	if (!prg->prog_used) {
   34: 		io_SetErr(elwix_GetErrno(), "%s", elwix_GetError());
   35: 		e_free(prg);
   36: 		return NULL;
   37: 	}
   38: 
   39: 	prg->prog_fds = array_Init(prg->prog_maxn);
   40: 	if (!prg->prog_fds) {
   41: 		io_SetErr(elwix_GetErrno(), "%s", elwix_GetError());
   42: 		e_free(prg->prog_used);
   43: 		e_free(prg);
   44: 		return NULL;
   45: 	}
   46: 
   47: 	pthread_mutex_init(&prg->prog_mtx, NULL);
   48: 	signal(SIGPIPE, SIG_IGN);
   49: 
   50: 	if (io_progOpen(prg, prg->prog_inin) < 0) {
   51: 		io_progDestroy(&prg);
   52: 		prg = NULL;
   53: 	}
   54: 	return prg;
   55: }
   56: 
   57: /*
   58:  * io_progDestroy() - Destroy entire program pool
   59:  *
   60:  * @pprg = program pool
   61:  * return: none
   62:  */
   63: void
   64: io_progDestroy(prog_t ** __restrict pprg)
   65: {
   66: 	if (!pprg || !*pprg)
   67: 		return;
   68: 
   69: 	io_progClose(*pprg, 0);
   70: 
   71: 	e_free((*pprg)->prog_used);
   72: 	array_Destroy(&(*pprg)->prog_fds);
   73: 	pthread_mutex_destroy(&(*pprg)->prog_mtx);
   74: 	signal(SIGPIPE, SIG_DFL);
   75: 
   76: 	e_free(*pprg);
   77: 	*pprg = NULL;
   78: }
   79: 
   80: /*
   81:  * io_progClose() - Close all programs in pool
   82:  *
   83:  * @prg = program pool
   84:  * @closeNum = close program(s) (0 all)
   85:  * return: 0 error, >0 closed programs
   86:  */
   87: int
   88: io_progClose(prog_t * __restrict prg, u_int closeNum)
   89: {
   90: 	register int i;
   91: 	int ret = 0;
   92: 	struct tagPIOPID *p;
   93: 
   94: 	if (!prg)
   95: 		return 0;
   96: 	if (closeNum > prg->prog_maxn) {
   97: 		io_SetErr(EINVAL, "Requested number for close program is over pool's limit");
   98: 		return 0;
   99: 	}
  100: 
  101: 	pthread_mutex_lock(&prg->prog_mtx);
  102: 	for (i = array_Size(prg->prog_fds) - 1; 
  103: 			(closeNum ? ret < closeNum : 42) && i > -1; i--)
  104: 		if (array_Get(prg->prog_fds, i) && 
  105: #ifdef POPEN_STREAM
  106: 				(p = pio_pgetpid(array(prg->prog_fds, i, FILE*)))) {
  107: #else
  108: 				(p = pio_pgetpid((int) array(prg->prog_fds, i, intptr_t)))) {
  109: #endif
  110: 			kill(p->pid, SIGTERM);
  111: 			usleep(1000);
  112: 			if (waitpid(p->pid, &p->stat, WNOHANG) > 0)
  113: 				kill(p->pid, SIGKILL);
  114: #ifdef POPEN_STREAM
  115: 			e_pclose(array(prg->prog_fds, i, FILE*));
  116: #else
  117: 			e_pclose((int) array(prg->prog_fds, i, intptr_t));
  118: #endif
  119: 			array_Del(prg->prog_fds, i, 0);
  120: 			clrbit(prg->prog_used, i);
  121: 			prg->prog_cnum--;
  122: 			ret++;
  123: 		}
  124: 	pthread_mutex_unlock(&prg->prog_mtx);
  125: 
  126: 	return ret;
  127: }
  128: 
  129: /*
  130:  * io_progCloseAt() - Close program at pool of certain position
  131:  *
  132:  * @prg = program pool
  133:  * @idx = index at pool
  134:  * return: 0 error or !=0 closed program
  135:  */
  136: int
  137: io_progCloseAt(prog_t * __restrict prg, u_int idx)
  138: {
  139: 	int ret = 0;
  140: 	struct tagPIOPID *p;
  141: 
  142: 	if (!prg)
  143: 		return 0;
  144: 	if (idx > prg->prog_maxn) {
  145: 		io_SetErr(EINVAL, "Requested number for close program is over pool's limit");
  146: 		return 0;
  147: 	}
  148: 
  149: 	pthread_mutex_lock(&prg->prog_mtx);
  150: 	if (array_Get(prg->prog_fds, idx) && 
  151: #ifdef POPEN_STREAM
  152: 			(p = pio_pgetpid(array(prg->prog_fds, idx, FILE*)))) {
  153: #else
  154: 			(p = pio_pgetpid((int) array(prg->prog_fds, idx, intptr_t)))) {
  155: #endif
  156: 		kill(p->pid, SIGTERM);
  157: 		usleep(1000);
  158: 		if (waitpid(p->pid, &p->stat, WNOHANG) > 0)
  159: 			kill(p->pid, SIGKILL);
  160: #ifdef POPEN_STREAM
  161: 		e_pclose(array(prg->prog_fds, idx, FILE*));
  162: #else
  163: 		e_pclose((int) array(prg->prog_fds, idx, intptr_t));
  164: #endif
  165: 		array_Del(prg->prog_fds, idx, 0);
  166: 		clrbit(prg->prog_used, idx);
  167: 		prg->prog_cnum--;
  168: 		ret++;
  169: 	}
  170: 	pthread_mutex_unlock(&prg->prog_mtx);
  171: 
  172: 	return ret;
  173: }
  174: 
  175: /*
  176:  * io_progOpen() - Execute number of program(s)
  177:  *
  178:  * @prg = program pool
  179:  * @execNum = execute program(s) (0 max)
  180:  * return: 0 error, >0 executed programs and abs(<0) executed programs with logged error
  181:  */
  182: int
  183: io_progOpen(prog_t * __restrict prg, u_int execNum)
  184: {
  185: #ifdef POPEN_STREAM
  186: 	FILE *f;
  187: #else
  188: 	int f;
  189: #endif
  190: 	int stat, ret = 0;
  191: 	register int i;
  192: 	pid_t pid;
  193: 
  194: 	if (!prg)
  195: 		return 0;
  196: 	if (prg->prog_cnum + execNum > prg->prog_maxn) {
  197: 		io_SetErr(EINVAL, "Requested number for program execution is over pool's limit");
  198: 		return 0;
  199: 	}
  200: 
  201: 	pthread_mutex_lock(&prg->prog_mtx);
  202: 	for (i = 0; (execNum ? ret < execNum : 42) && i < array_Size(prg->prog_fds); i++)
  203: 		if (!array_Get(prg->prog_fds, i)) {
  204: 			f = e_popen(prg->prog_name, "r+", &pid);
  205: #ifdef POPEN_STREAM
  206: 			if (!f) {
  207: #else
  208: 			if (f == -1) {
  209: #endif
  210: 				LOGERR;
  211: 				ret = -1;
  212: 				break;
  213: 			} else if (waitpid(pid, &stat, WNOHANG)) {
  214: 				io_SetErr(ECHILD, "Program with pid=%d exit with status %d", 
  215: 						pid, WIFEXITED(stat) ? WEXITSTATUS(stat) : -1);
  216: 				ret = -1;
  217: 				break;
  218: 			} else
  219: 				array_Set(prg->prog_fds, i, f);
  220: 			prg->prog_cnum++;
  221: 			ret++;
  222: 		}
  223: 	pthread_mutex_unlock(&prg->prog_mtx);
  224: 
  225: 	return ret;
  226: }
  227: 
  228: /*
  229:  * io_progGrow() - Execute to number of programs in pool
  230:  *
  231:  * @prg = program pool
  232:  * @toNum = execute to number of programs (0 max)
  233:  * return: 0 error, >0 executed programs and abs(<0) executed programs with logged error
  234:  */
  235: int
  236: io_progGrow(prog_t * __restrict prg, u_int toNum)
  237: {
  238: 	if (!prg)
  239: 		return 0;
  240: 	if (toNum > prg->prog_maxn) {
  241: 		io_SetErr(EINVAL, "Requested number for program execution is over pool's limit");
  242: 		return 0;
  243: 	}
  244: 	if (!toNum)
  245: 		toNum = prg->prog_maxn;
  246: 
  247: 	return io_progOpen(prg, toNum - prg->prog_cnum);
  248: }
  249: 
  250: /*
  251:  * io_progVacuum() - Vacuum pool to running number of programs
  252:  *
  253:  * @prg = program pool
  254:  * @toNum = vacuum to number of programs (0 to init number)
  255:  * return: 0 error or >0 closed programs
  256:  */
  257: int
  258: io_progVacuum(prog_t * __restrict prg, u_int toNum)
  259: {
  260: 	register int i;
  261: 	int ret = 0;
  262: 	struct tagPIOPID *p;
  263: 
  264: 	if (!prg)
  265: 		return 0;
  266: 	if (toNum > prg->prog_maxn) {
  267: 		io_SetErr(EINVAL, "Requested number for close program is over pool's limit");
  268: 		return 0;
  269: 	}
  270: 	if (!toNum)
  271: 		toNum = prg->prog_inin;
  272: 
  273: 	pthread_mutex_lock(&prg->prog_mtx);
  274: 	for (i = array_Size(prg->prog_fds) - 1; prg->prog_cnum > toNum && i > -1; i--)
  275: 		if (array_Get(prg->prog_fds, i) && isclr(prg->prog_used, i) && 
  276: #ifdef POPEN_STREAM
  277: 				(p = pio_pgetpid(array(prg->prog_fds, i, FILE*)))) {
  278: 			kill(p->pid, SIGTERM);
  279: 			usleep(1000);
  280: 			if (waitpid(p->pid, &p->stat, WNOHANG) > 0)
  281: 				kill(p->pid, SIGKILL);
  282: 			e_pclose(array(prg->prog_fds, i, FILE*));
  283: #else
  284: 				(p = pio_pgetpid((int) array(prg->prog_fds, i, intptr_t)))) {
  285: 			kill(p->pid, SIGTERM);
  286: 			usleep(1000);
  287: 			if (waitpid(p->pid, &p->stat, WNOHANG) > 0)
  288: 				kill(p->pid, SIGKILL);
  289: 			e_pclose((int) array(prg->prog_fds, i, intptr_t));
  290: #endif
  291: 			array_Del(prg->prog_fds, i, 0);
  292: 			prg->prog_cnum--;
  293: 			ret++;
  294: 		}
  295: 	pthread_mutex_unlock(&prg->prog_mtx);
  296: 
  297: 	return ret;
  298: }
  299: 
  300: /*
  301:  * io_progCheck() - Check exit status of program pool
  302:  *
  303:  * @prg = program pool
  304:  * return: -1 error or >-1 exited programs
  305:  */
  306: int
  307: io_progCheck(prog_t * __restrict prg)
  308: {
  309: 	int ret = 0;
  310: 	struct tagPIOPID *p;
  311: 	register int i;
  312: 
  313: 	if (!prg)
  314: 		return -1;
  315: 
  316: 	pthread_mutex_lock(&prg->prog_mtx);
  317: 	for (i = 0; i < array_Size(prg->prog_fds); i++)
  318: 		if (array_Get(prg->prog_fds, i) && 
  319: #ifdef POPEN_STREAM
  320: 				(p = pio_pgetpid(array(prg->prog_fds, i, FILE*))))
  321: #else
  322: 				(p = pio_pgetpid((int) array(prg->prog_fds, i, intptr_t))))
  323: #endif
  324: 			if (waitpid(p->pid, &p->stat, WNOHANG) > 0) {
  325: 				clrbit(prg->prog_used, i);
  326: 				ret++;
  327: 			}
  328: 	pthread_mutex_unlock(&prg->prog_mtx);
  329: 
  330: 	return ret;
  331: }
  332: 
  333: /*
  334:  * io_progAttach() - Attach to open program
  335:  *
  336:  * @prg = program pool
  337:  * return: NULL error or !=NULL attached program handle
  338:  */
  339: #ifdef POPEN_STREAM
  340: FILE *
  341: #else
  342: int
  343: #endif
  344: io_progAttach(prog_t * __restrict prg)
  345: {
  346: #ifdef POPEN_STREAM
  347: 	FILE *f = NULL;
  348: #else
  349: 	int f = -1;
  350: #endif
  351: 	register int i;
  352: 
  353: 	if (!prg)
  354: #ifdef POPEN_STREAM
  355: 		return NULL;
  356: #else
  357: 		return -1;
  358: #endif
  359: 
  360: 	pthread_mutex_lock(&prg->prog_mtx);
  361: 	for (i = 0; i < array_Size(prg->prog_fds); i++)
  362: 		if (array_Get(prg->prog_fds, i) && isclr(prg->prog_used, i)) {
  363: 			setbit(prg->prog_used, i);
  364: #ifdef POPEN_STREAM
  365: 			f = array(prg->prog_fds, i, FILE*);
  366: #else
  367: 			f = array(prg->prog_fds, i, intptr_t);
  368: #endif
  369: 			break;
  370: 		}
  371: 	pthread_mutex_unlock(&prg->prog_mtx);
  372: 
  373: 	return f;
  374: }
  375: 
  376: /*
  377:  * io_progDetach() - Detch from open program
  378:  *
  379:  * @prg= program pool
  380:  * @pfd = attached program handle
  381:  * return: none
  382:  */
  383: void
  384: #ifdef POPEN_STREAM
  385: io_progDetach(prog_t * __restrict prg, FILE *pfd)
  386: #else
  387: io_progDetach(prog_t * __restrict prg, int pfd)
  388: #endif
  389: {
  390: 	register int i;
  391: 
  392: 	if (!prg || !pfd)
  393: 		return;
  394: 
  395: 	pthread_mutex_lock(&prg->prog_mtx);
  396: 	for (i = 0; i < array_Size(prg->prog_fds); i++)
  397: #ifdef POPEN_STREAM
  398: 		if (array(prg->prog_fds, i, FILE*) == pfd) {
  399: #else
  400: 		if (array(prg->prog_fds, i, intptr_t) == pfd) {
  401: #endif
  402: 			clrbit(prg->prog_used, i);
  403: 			break;
  404: 		}
  405: 	pthread_mutex_unlock(&prg->prog_mtx);
  406: }

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>