1 files changed, 111 insertions, 0 deletions
diff --git a/l4basic/l4arg/toargv.c b/l4basic/l4arg/toargv.c
new file mode 100644
index 0000000..433ad1a
--- /dev/null
+++ b/l4basic/l4arg/toargv.c
@@ -0,0 +1,111 @@
+#include <string.h>
+#include <stdlib.h>
+#include <l4arg.h>
+#include <l4darr.h>
+
+/* 基本上優先順序是 escape -> quoting -> delimiter */
+
+#define abort_l4arg_toargv \
+	do{ \
+		l4da_free(parr); \
+		l4da_free(tmpstr); \
+		return NULL; \
+	}while(0)
+
+char** l4arg_toargv(const char* str, 
+		const char* delim, const char* quoting, const char* esc){
+	int i;
+	char escaped = 0, quoted = 0, delimed = 0;
+	L4DA* parr;
+	L4DA* tmpstr;
+	char* addstr, tmpchar;
+	char** rval;
+	parr = l4da_create(sizeof(char*), 0);
+	if(parr == NULL){
+		return NULL;
+	}
+	tmpstr = l4da_create(sizeof(char), 0);
+	if(tmpstr == NULL){
+		l4da_free(parr);
+		return NULL;
+	}
+	for(i=0; str[i]!='\0'; i++){
+		if(escaped){
+			if(l4da_pushback(tmpstr, &str[i]) < 0){
+				abort_l4arg_toargv;
+			}
+			escaped = 0;
+			delimed = 0;
+			continue;
+		}
+		if(quoted){
+			if(strchr(quoting, str[i]) != NULL){
+				quoted = 0;
+				continue;
+			}
+			if(l4da_pushback(tmpstr, &str[i]) < 0){
+				abort_l4arg_toargv;
+			}
+			delimed = 0;
+			continue;
+		}
+		if(strchr(esc, str[i]) != NULL){
+			escaped = 1;
+			continue;
+		}
+		if(strchr(quoting, str[i]) != NULL){
+			quoted = 1;
+			continue;
+		}
+		if(strchr(delim, str[i]) != NULL){
+			if(l4da_getlen(tmpstr) > 0){
+				tmpchar = '\0';
+				if(l4da_pushback(tmpstr, &tmpchar) < 0){
+					abort_l4arg_toargv;
+				}
+				addstr = (char*)l4da_drop_struct(tmpstr);
+				if(l4da_pushback(parr, &addstr) < 0){
+					l4da_free(parr);
+					return NULL;
+				}
+				tmpstr = l4da_create(sizeof(char), 0);
+				if(tmpstr == NULL){
+					l4da_free(parr);
+					return NULL;
+				}
+			}
+			delimed = 1;
+			continue;
+		}
+		if(l4da_pushback(tmpstr, &str[i]) < 0){
+			abort_l4arg_toargv;
+		}
+		delimed = 0;
+	}
+	if(!delimed){
+		tmpchar = '\0';
+		if(l4da_pushback(tmpstr, &tmpchar) < 0){
+			abort_l4arg_toargv;
+		}
+		addstr = (char*)l4da_drop_struct(tmpstr);
+		if(l4da_pushback(parr, &addstr) < 0){
+			l4da_free(parr);
+			return NULL;
+		}
+	}
+	addstr = NULL;
+	if(l4da_pushback(parr, &addstr) < 0){
+		l4da_free(parr);
+		return NULL;
+	}
+	rval = (char**)l4da_drop_struct(parr);
+	return rval;
+}
+
+void l4arg_toargv_free(char** pargv){
+	int i;
+	for(i=0; pargv[i]!=NULL; i++){
+		free(pargv[i]);
+	}
+	free(pargv);
+}