C++ (Cpp) all_digits Examples

Example #1

0

Show file

File: os.c Project: 274914765/C

void ns_os_inituserinfo (const char *username)
{
    char strbuf[ISC_STRERRORSIZE];

    if (username == NULL)
        return;

    if (all_digits (username))
        runas_pw = getpwuid ((uid_t) atoi (username));
    else
        runas_pw = getpwnam (username);
    endpwent ();

    if (runas_pw == NULL)
        ns_main_earlyfatal ("user '%s' unknown", username);

    if (getuid () == 0)
    {
        if (initgroups (runas_pw->pw_name, runas_pw->pw_gid) < 0)
        {
            isc__strerror (errno, strbuf, sizeof (strbuf));
            ns_main_earlyfatal ("initgroups(): %s", strbuf);
        }
    }

}

Example #2

0

Show file

File: reader.c Project: spacemanaki/lisp-in-c

object_t parse_sexp2(char **in, object_t current) {
  char *buf;
  enum kind k = next_token(in, &buf);
  object_t rest, s;
  switch(k) {

  case End:
    return current;

  case Left:
    rest = parse_sexp2(in, NIL);
    if(current == NULL)
      return rest;
    else if(current == NIL)
      current = cons(rest, NIL);
    else
      storage_append(rest, current);

    return parse_sexp2(in, current);
    
  case Right:
    return current;

  case Period:
    rest = parse_sexp2(in, NULL);
    set_cdr(storage_last(current), rest);
    return parse_sexp2(in, current);

  
  case Single: /* following are reader-macros */
    return wrap(in, current, "quote");
  case Back:
    return wrap(in, current, "quasiquote");
  case Comma:
    return wrap(in, current, "unquote");

  case Symbol:
  case String:
    if(k == Symbol) {
      if(all_digits(buf))
        s = obj_new_number(atoi(buf));
      else
        s = obj_new_symbol(buf);
    }
    else if(k == String)
      s = obj_new_string(buf);

    if(current == NULL)
      return s;
    else if(current == NIL)
      return parse_sexp2(in, cons(s, NIL));
    else {
      storage_append(s, current);
      return parse_sexp2(in, current);
    }
  }
  return NULL;
}

Example #3

0

Show file

File: keywords.c Project: resmon/resmon-spine

/*! \fn find_keyword_by_word(const struct keyword *tbl, const char *word, int dflt)
 *  \brief takes a generic word and returns either TRUE or FALSE
 *  \param tbl the table that contains the translation from text to boolean
 *  \param word the word to compare against the table for the result
 *  \param dflt the default value to be returned if the string can not be found
 *
 *	Given a table of keywords and a user's word, look that word up in the
 *	table and return the value associted with it. If the word is not found,
 *	return the user-provide default value.
 *
 *	The default-value parameter can be used for either the actual default
 *	value of the parameter being searched for (say, LOGDEST_BOTH), or
 *	a didn't-find-it value (say, -1) which the caller can key off of.
 *
 *	NOTE: if the given word is all digits, it's parsed as a number and
 *	returned numerically.
 *
 *  \return TRUE, FALSE, or dflt depending on results of search
 *
 */
static int find_keyword_by_word(const struct keyword *tbl, const char *word, int dflt)
{
	assert(tbl  != 0);
	assert(word != 0);

	if (all_digits(word)) {
		return atoi(word);
	}

	for (; tbl->word; tbl++) {
		if (STRIMATCH(word, tbl->word)) {
			return tbl->value;
		}
	}

	return dflt;
}

Example #4

0

Show file

File: proc.c Project: KapJlcoH/ltrace

int
process_tasks(pid_t pid, pid_t **ret_tasks, size_t *ret_n)
{
	PROC_PID_FILE(fn, "/proc/%d/task", pid);
	DIR * d = opendir(fn);
	if (d == NULL)
		return -1;

	pid_t *tasks = NULL;
	size_t n = 0;
	size_t alloc = 0;

	while (1) {
		struct dirent entry;
		struct dirent *result;
		if (readdir_r(d, &entry, &result) != 0) {
			free(tasks);
			return -1;
		}
		if (result == NULL)
			break;
		if (result->d_type == DT_DIR && all_digits(result->d_name)) {
			pid_t npid = atoi(result->d_name);
			if (n >= alloc) {
				alloc = alloc > 0 ? (2 * alloc) : 8;
				pid_t *ntasks = realloc(tasks,
							sizeof(*tasks) * alloc);
				if (ntasks == NULL) {
					free(tasks);
					return -1;
				}
				tasks = ntasks;
			}
			if (n >= alloc)
				abort();
			tasks[n++] = npid;
		}
	}

	closedir(d);

	*ret_tasks = tasks;
	*ret_n = n;
	return 0;
}

Example #5

0

Show file

File: options_util.C Project: juddy/edcde

void
options_spinbox_modCB( 
     Widget widget,
     XtPointer clientdata,
     XtPointer calldata
)
{
     Widget 	spinbox = (Widget) clientdata;
     int        mvalue, value;
     Display    *dpy = XtDisplayOfObject(widget);
     char	*text = XtMalloc(BUFSIZ);
     char	*textvalue;
     XmTextVerifyCallbackStruct *cbs = (XmTextVerifyCallbackStruct*) calldata;
     
     if (NULL == cbs->text->ptr) return;
     if (!all_digits(cbs->text->ptr))
     {
         cbs->doit = FALSE;
	 XBell(dpy, 50);
     }

     textvalue = XmTextGetString(widget);
     strncpy(text, textvalue, cbs->startPos);
     text[cbs->startPos] = '\0';
     strcat(text, cbs->text->ptr);
     strcat(text, textvalue+cbs->endPos);

     XtVaGetValues(spinbox, XmNmaximumValue, &mvalue, NULL); 
     value = (int) strtol(text, NULL, 10);
     if (value > mvalue)
     {
         cbs->doit = FALSE;
	 XBell(dpy, 50);
     }
     if (NULL != text) XtFree(text);
     if (NULL != textvalue) XtFree(textvalue);
}

Example #6

0

Show file

File: timeformat.c Project: Infinidat/infinitrace

unsigned long long str_to_nano_seconds(const char* str) {
    /* possible formats:
       nnnnnn - micro timer
       nnnn/nn/nn aa:aa:aa nnnnn - timestamp timer
       aa:aa:aa nnnnn - omit date
       part of the last two - assume zeros
     */
    int len;
    if (!str) return 0;
#define NEXT_DIGIT while (*str && !is_digit(*str)) str++ ; len = strlen(str)
    NEXT_DIGIT;
    /* 000000211630 */
    if (len > 9 && all_digits(str)) {
        return atoll(str);
    }
    struct tm t = { 0 };

    /* 2012/09/03 05:10:56 674869660 */

    /* date? */
    if (len >= 10 && str[4] == '/' && str[7] == '/') {
        t.tm_year = atoll_n(str+0, 4) - 1900;
        t.tm_mon  = atoll_n(str+5, 2) - 1;
        t.tm_mday = atoll_n(str+8, 2);
        str += 10;
        NEXT_DIGIT;
    }
    if (len >= 8 && str[2] == ':' && str[5] == ':') {
        t.tm_hour = atoll_n(str+0, 2);
        t.tm_min  = atoll_n(str+3, 2);
        t.tm_sec  = atoll_n(str+6, 2);
        str += 8;
        NEXT_DIGIT;
    }

    return (SECOND * (timegm(&t))) + atoll_n(str, 9);
}

Example #7

0

Show file

File: options_util.C Project: juddy/edcde

void
options_spinbox_chgCB( 
     Widget widget,
     XtPointer clientdata,
     XtPointer calldata
)
{
     Widget  spinbox = (Widget) clientdata;
     int             mvalue, value = 
			(int) strtol(XmTextGetString(widget), NULL, 10);
     Display         *dpy = XtDisplayOfObject(widget);
     calldata = calldata;
     
     props_changed = TRUE;
     if (!all_digits(XmTextGetString(widget))){
	XtVaSetValues(spinbox, XmNposition, 1, NULL);
	XBell(dpy, 50);
	return;
     }
     XtVaGetValues(spinbox, XmNmaximumValue, &mvalue, NULL); 
     if (value > mvalue) {
	XtVaSetValues(spinbox, XmNposition, mvalue, NULL);
	XBell(dpy, 50);
	return;
     }
     // It could never be less than the minimum value because a 
     // '-' is an invalid entry and it would be cleared and reset
     // if entered. So if we made it here it is a valid entry. We
     // also have to reset the insertion point! Another spinbox bug
     // we have to work around. 
     XtVaSetValues(spinbox, XmNposition, value, NULL);
     int shift = 1;
     while ((value /= 10) > 0)
	shift++; 
     XmTextSetInsertionPosition(widget, shift);
}

Example #8

0

Show file