home *** CD-ROM | disk | FTP | other *** search
- /*
- * edlib v1.1 Copyright 1989 Edwin Hoogerbeets
- * This code is freely redistributable as long as no charge other than
- * reasonable copying fees are levied for it.
- */
-
- #include <stdio.h>
- #include "edlib.h"
- #include <ctype.h>
- #include <exec/types.h>
-
- char *b = "10101";
- char *d = "12345";
- char *h = "2a";
- char *zoo = "ifoo";
- char *zar = "Ibar";
-
- char *s1 = "hey man this was in lower case.";
- char *s2 = "THIS WAS ENTIRELY UPPER CASE IN THE FASHION OF IBM.";
-
- char *s3 = "hey man this was in lower case.";
- char *s4 = "THIS WAS ENTIRELY UPPER CASE IN THE FASHION OF IBM.";
-
- char *file = "df1:edlib/1.1";
- char *file2 = "df0:foo";
- char *file3 = "foobar";
- char *file4 = "rad:c";
- char *file5 = "rad:edlib";
- char *doub = "00011020.332e+20";
-
- main()
- {
- char buf[BUFSIZ];
-
- printf("basename of %s is %s\n",file,basename(file));
- printf("basename of %s is %s\n",file2,basename(file2));
- printf("basename of %s is %s\n",file3,basename(file3));
-
- printf("getcwd reveals that the current dir is %s\n",getcwd(buf,BUFSIZ));
- printf("getcwd reveals again that the current dir is %s\n",getcwd(buf,BUFSIZ));
- printf("and changing directory to %s and then %s\n",file4,file5);
- chdir(file4);
- chdir(file5);
- printf("getcwd reveals that the current dir is %s\n",getcwd(buf,BUFSIZ));
-
- printf("strtod of %s is %f\n",doub,strtod(doub,NULL));
-
- printf("Bin: %d\n",bintoint(b));
- printf("Dec: %d\n",dectoint(d));
- printf("Hex: %d\n",hextoint(h));
-
- printf("Is 1 a bdigit? %d Is 'a'? %d\n",isbdigit('1'),isbdigit('a'));
-
- printf("iscsym: 'a' %d '_' %d '4' %d '!' %d '/' %d\n",iscsym('a'),
- iscsym('_'), iscsym('4'), iscsym('!'), iscsym('/'));
-
- printf("iscsymf: 'a' %d '_' %d '4' %d '!' %d '/' %d\n",iscsymf('a'),
- iscsymf('_'), iscsymf('4'), iscsymf('!'), iscsymf('/'));
-
- printf("isodigit: '2' %d '8' %d 'a' %d\n", isodigit('2'), isodigit('8'),
- isodigit('a'));
-
- printf("stoupper: %s\n",stoupper(s1));
- printf("stolower: %s\n",stolower(s2));
-
- printf("strcspn: '%s' '%s' gives %d\n",s3,"an",strcspn(s3,"an"));
-
- printf("stricmp: '%s' '%s' gives %d\n",s1,s3,stricmp(s1,s3));
- printf("strnicmp: '%s' '%s' 1 gives %d\n",zoo,zar,strnicmp(zoo,zar,1));
-
- printf("strpbrk: '%s' '%s' gives '%s'\n",s3,"a",strpbrk(s3,"a"));
-
- printf("strpos: '%s' '%c' gives %d\n",s3,'a',strpos(s3,'a'));
-
- printf("strrpbrk: '%s' '%s' gives '%s'\n",s3,"a",strrpbrk(s3,"a"));
-
- printf("strrpos: '%s' '%s' gives %d\n",s3,'a',strrpos(s3,'a'));
-
- printf("strspn: '%s' '%s' gives %d\n",s3,"ma yeh",strspn(s3,"ma yeh"));
-
- printf("strtok: '%s'\n",s3);
- printf(" tok1: '%s'\n",strtok(s3," "));
- printf(" tok2: '%s'\n",strtok(NULL," "));
- printf(" tok3: '%s'\n",strtok(NULL," "));
-
- printf("toint: '1' %d 'b' %d 'k' %d\n",toint('1'),toint('b'),toint('k'));
-
- exit(0);
- }
-
-
-
-
-