diff options
Diffstat (limited to 'cuturl.c')
| -rw-r--r-- | cuturl.c | 191 |
1 files changed, 191 insertions, 0 deletions
diff --git a/cuturl.c b/cuturl.c new file mode 100644 index 0000000..3f09020 --- /dev/null +++ b/cuturl.c @@ -0,0 +1,191 @@ +#include <netdb.h> +#include <stdio.h> +#include <string.h> +#include <stdlib.h> +#include <errno.h> +#include <unistd.h> +#include <sys/wait.h> + +#include "url.h" + +/* + schemes are case sensitive but cononicals are lower case. + domain is case insensitive. return it lowercased? + port is optional and in decimal + path + scheme://username:password@domain:port/path?query_string#fragment_id + mailto:username@domain + + optional stuff: + scheme, username, password, port, path, query_string, fragment_id +*/ + +#define AorB(a,b) ((a)?(a):(b)) + +#define F_SCHEME 1<<0 +#define F_USERNAME 1<<1 +#define F_PASSWORD 1<<2 +#define F_DOMAIN 1<<3 +#define F_PORT 1<<4 +#define F_PATH 1<<5 +#define F_QUERY_STRING 1<<6 +#define F_FRAGMENT_ID 1<<7 + +char *long_opts[]={"scheme","username","password","domain","port","path","query_string","fragment_id",0}; +char *short_opts[]={"s","u","k","d","P","p","q","f"}; + +int main(int argc,char *argv[]) { + char *name[2]; + char *line=0; + char sport[10]; + char args[256]; + struct servent *serv; + int i,j,c=0; + int size=1024; + int status; + char fixme=0; + char using_stdin=1; + char malloced=0; + struct url u; + if(argc > 1) { + if(!strcmp(argv[1],"--help") || !strcmp(argv[1],"-h")) { + printf("usage: echo urls | cuturl [options]\n"); + printf("usage: cuturl [options] url [options] [url]\n\n"); + printf("options: \n"); + for(i=0;long_opts[i];i++) { + printf(" -%s|--%s\n",short_opts[i],long_opts[i]); + } + printf("To set default values use environment variables like: CUTURL_[OPTION]\n"); + return 2; + } + } + argv++; + argc--; + while(1) { + u.scheme=0; + u.username=0; + u.password=0; + u.domain=0; + u.port=0; + u.path=0; + u.query_string=0; + u.fragment_id=0; + if(!using_stdin) c=0; + if(argc >= 1) { + for(;argc>0;argc--,argv++) { + for(i=0;long_opts[i];i++) { + if(!strncmp(*argv,"--",2)) { + if(!strcmp(*argv+2,long_opts[i])) { + args[c]=1<<i; + c++; + break; + } + } + } + fixme=0; + if(**argv=='-' && argv[0][1] != '-') { + for(j=1;argv[0][j];j++) { + for(i=0;short_opts[i];i++) { + if(argv[0][j]==*short_opts[i]) { + args[c]=1<<i; + c++; + fixme=1; + } + } + } + } + if(fixme) continue; + if(long_opts[i]) continue; + //if we get here we are at data instead of flags. work on it. + line=*argv; + using_stdin=0; + argc--; + argv++; + break; + } + } + if(!argc && !line) {//if we are out of arguments and it didn't include data + using_stdin=1; + } + if(using_stdin) { + line=malloc(size+1); + malloced=1; + if(!fgets(line,size,stdin)) { + return 0; + } + } + if(!line) return 0; + for(i=0;line[i] && line[i] != '\n' && line[i] != '\r';i++); + line[i]=0; + + urlfromline(&u,line); + + // printf("scheme://username:password@domain:port/path?query_string#fragment_id\n\n"); + //let's set them to what'll get printed now... + + u.scheme=AorB(u.scheme,AorB(getenv("CUTURL_SCHEME"),"DEFAULT")); + u.username=AorB(u.username,AorB(getenv("CUTURL_USERNAME"),"DEFAULT")); + u.password=AorB(u.password,AorB(getenv("CUTURL_PASSWORD"),"DEFAULT")); + u.domain=AorB(u.domain,AorB(getenv("CURURL_DOMAIN"),"DEFAULT")); + serv=getservbyname(u.scheme,strcmp(u.scheme,"udp")?"tcp":"udp");//gets default port for the scheme. http -> 80 + if(serv) snprintf(sport,sizeof(sport)-1,"%d",ntohs(serv->s_port)); + u.port=AorB(u.port,AorB(getenv("CUTURL_PORT"),(serv?sport:"DEFAULT"))); + u.path=AorB(u.path,AorB(getenv("CUTURL_PATH"),"DEFAULT")); + u.query_string=AorB(u.query_string,AorB(getenv("CUTURL_QUERY_STRING"),"DEFAULT")); + u.fragment_id=AorB(u.fragment_id,AorB(getenv("CUTURL_FRAGMENT_ID"),"DEFAULT")); + + if((name[0]=getenv("CUTURL__"))) { + setenv("CUTURL__SCHEME",u.scheme,1); + setenv("CUTURL__USERNAME",u.username,1); + setenv("CUTURL__PASSWORD",u.password,1); + setenv("CUTURL__DOMAIN",u.domain,1); + setenv("CUTURL__PORT",u.port,1); + setenv("CUTURL__PATH",u.path,1); + setenv("CUTURL__QUERY_STRING",u.query_string,1); + setenv("CUTURL__FRAGMENT_ID",u.fragment_id,1); + name[1]=0; + switch(fork()) { + case 0: + execv(name[0],name); + perror("execv"); + return errno; + case -1: + perror("fork"); + return errno; + default: + break; + } + wait(&status); + } else { + if(c) { + for(i=0;i<c;i++) { + if(args[i]&F_SCHEME) printf("%s\n",u.scheme); + if(args[i]&F_USERNAME) printf("%s\n",u.username); + if(args[i]&F_PASSWORD) printf("%s\n",u.password); + if(args[i]&F_DOMAIN) printf("%s\n",u.domain); + if(args[i]&F_PORT) printf("%s\n",u.port); + if(args[i]&F_PATH) printf("%s\n",u.path); + if(args[i]&F_QUERY_STRING) printf("%s\n",u.query_string); + if(args[i]&F_FRAGMENT_ID) printf("%s\n",u.fragment_id); + } + } else { + printf("scheme: %s\n",u.scheme); + printf("username: %s\n",u.username); + printf("password: %s\n",u.password); + printf("domain: %s\n",u.domain); + printf("port: %s\n",u.port); + printf("path: %s\n",u.path); + printf("query_string: %s\n",u.query_string); + printf("fragment_id: %s\n",u.fragment_id); + } + } + if(malloced) { + free(line); + malloced=0; + line=0; + } else { + line=0;//??? + } + } + return 0; +} |