! * \brief sarrayCreateWordsFromString() * * \param[in] string * \return sarray, or NULL on error * * * Notes: * (1) This finds the number of word substrings, creates an sarray * of this size, and puts copies of each substring into the sarray. * */
| 223 | * </pre> |
| 224 | */ |
| 225 | SARRAY * |
| 226 | sarrayCreateWordsFromString(const char *string) |
| 227 | { |
| 228 | char separators[] = " \n\t"; |
| 229 | l_int32 i, nsub, size, inword; |
| 230 | SARRAY *sa; |
| 231 | |
| 232 | PROCNAME("sarrayCreateWordsFromString"); |
| 233 | |
| 234 | if (!string) |
| 235 | return (SARRAY *)ERROR_PTR("textstr not defined", procName, NULL); |
| 236 | |
| 237 | /* Find the number of words */ |
| 238 | size = strlen(string); |
| 239 | nsub = 0; |
| 240 | inword = FALSE; |
| 241 | for (i = 0; i < size; i++) { |
| 242 | if (inword == FALSE && |
| 243 | (string[i] != ' ' && string[i] != '\t' && string[i] != '\n')) { |
| 244 | inword = TRUE; |
| 245 | nsub++; |
| 246 | } else if (inword == TRUE && |
| 247 | (string[i] == ' ' || string[i] == '\t' || string[i] == '\n')) { |
| 248 | inword = FALSE; |
| 249 | } |
| 250 | } |
| 251 | |
| 252 | if ((sa = sarrayCreate(nsub)) == NULL) |
| 253 | return (SARRAY *)ERROR_PTR("sa not made", procName, NULL); |
| 254 | sarraySplitString(sa, string, separators); |
| 255 | |
| 256 | return sa; |
| 257 | } |
| 258 | |
| 259 | |
| 260 | /*! |
no test coverage detected