Function gmtapi_wrap_the_line

src/gmt_api.c:14166–14228

}

GMT_LOCAL void gmtapi_wrap_the_line (struct GMTAPI_CTRL *API, int level, FILE *fp, const char *in_line) {
	/* Break the in_ine across multiple lines determined by the terminal line width API->terminal_width */
	bool keep_same_indent = (level < 0), go = true, force = false;
	int k, j, next_level, current_width = 0, try = 0;
	unsigned int width;
	static int gmtapi_indent[8] = {0, 2, 5, 7, 10, 13, 15, 0}; /* Last one is for custom negative values exceeding 6 */
	struct GMT_WORD *W = gmtapi_split_words (in_line);	/* Create array of words */
	char message[GMT_MSGSIZ] = {""};

#ifdef DEBUG_USAGE_OPTIONS
	{	/* Breaks usage string into one word per line.  See gmt_usage_messages.sh in the sandbox/guru repo for what to do next */
		strcpy (message, in_line);
		gmt_strrepc (message, ' ', '\n');
		API->print_func (fp, message);  /* Do the printing */
		return;
	}
 #endif

	/* Start with any fixed indent */
	level = abs (level);	/* In case it was negative */
	if (level > 6) {    /* Place custom level in last entry.  This is to help g**math issue wrapped operator messages */
		gmtapi_indent[7] = level;
		level = 7;
		go = false;   /* Already indented and ready to go */
	}
	next_level = (keep_same_indent) ? level : level + 1;	/* Do we indent when we wrap or not */
	for (j = 0; go && j < gmtapi_indent[level]; j++) strcat (message, " ");	/* Starting spaces */
	current_width = gmtapi_indent[level];
	for (k = 0; W[k].word; k++) {	/* As long as there are more words... */
		width = (gmtapi_space (W[k+1].space)) ? API->terminal_width : API->terminal_width - 1;	/* May need one space for ellipsis at end */
		if (force || (current_width + strlen (W[k].word) + W[k].space) < width) {	/* Word will fit on current line */
			if (gmtapi_space (W[k].space))	/* This word requires a leading space */
				strcat (message, " ");
			strcat (message, W[k].word);
			current_width += (int)(strlen (W[k].word) + gmtapi_space (W[k].space));	/* Update line width so far */
			free (W[k].word);	/* Free the word we are done with */
			if (W[k+1].word == NULL)	/* Finalize the last line */
				strcat (message, "\n");
			force = false;  /* In case it was set */
		}
		else {	/* Must split at the current break point and continue on next line */
			if (W[k].space) { /* No break character needed since space separation is expected */
				strcat (message, "\n");	/* Move to new line */
				for (j = 0; j < gmtapi_indent[next_level]; j++) strcat (message, " ");	/* Initial indent plus possibly next indent*/
				current_width = gmtapi_indent[next_level];	/* Indent plus next indent */
			}
			else {	/* Split in the middle of an option so append breakline and start new line with ellipsis after indent */
				strcat (message, GMT_LINE_BREAK);
				strcat (message, "\n");
				for (j = 0; j < gmtapi_indent[next_level]; j++) strcat (message, " ");	/* Initial indent plus possibly next indent */
				strcat (message, GMT_LINE_CONT);		/* And the ellipsis */
				current_width = gmtapi_indent[next_level];	/* Indent plus the next indent */
			}
			W[k].space = 0;	/* Can be no leading space if starting a the line */
			k--;	/* Since k will be incremented by loop and we did not write this word yet */
			try++;
			if (try == 2) /* Word is longer than effective terminal width - must force output (even if too long) to get past this stalemate */
				force = true, try = 0;