kagecgi/kagecgi.c

   1 //kagecgi.c\r
   2 //\r
   3 \r
   4 #include <stdio.h>\r
   5 #include <stdlib.h>\r
   6 #include <png.h>\r
   7 #include <glib.h>\r
   8 #include "kage.h"\r
   9 #include "kagecgi.h"\r
  10 \r
  11 int main(int argc, char *argv[]){\r
  12         GString *tmp1, *tmp2, *test1, *test2, *filename;\r
  13         FILE *err, *fp;\r
  14         char errbuf[errorFileSize];\r
  15         char *pos, *cur;\r
  16         int dummy;\r
  17         int i;\r
  18 \r
  19         dummy = initDB();\r
  20 \r
  21         //set default\r
  22         kShotai = kMincho;\r
  23 //      kShotai = kGothic;\r
  24 //      kDesign = 0; //jp\r
  25         kSize = 200;\r
  26         kType = 0; //png\r
  27         kInput = 0; //ids or direct\r
  28         kResultText = g_string_new("");\r
  29         kMode = 0;\r
  30         \r
  31         //set some param by request\r
  32 //      tmp1 = g_string_new((gchar *)argv[1]);\r
  33         tmp1 = g_string_new((gchar *)getenv("QUERY_STRING"));\r
  34         pos = tmp1->str;\r
  35         \r
  36         //separate token\r
  37         if(tmp1->len != 0){\r
  38                 while(1){\r
  39                         cur = strchr(pos, '&');\r
  40                         tmp2 = g_string_new(pos);\r
  41                         if(cur != NULL) g_string_set_size(tmp2, cur - pos);\r
  42                         //got request string\r
  43 //                      if(strncmp(tmp2->str, "design=jp", 9) == 0) kDesign = 0;\r
  44 //                      else if(strncmp(tmp2->str, "design=cs", 9) == 0) kDesign = 10;\r
  45 //                      else if(strncmp(tmp2->str, "design=ct", 9) == 0) kDesign = 11;\r
  46 //                      else if(strncmp(tmp2->str, "design=kr", 9) == 0) kDesign = 20;\r
  47 //                      else if(strncmp(tmp2->str, "design=vn", 9) == 0) kDesign = 30;\r
  48 //                      else if(strncmp(tmp2->str, "design=un", 9) == 0) kDesign = 40;\r
  49 //                      else if(strncmp(tmp2->str, "shotai=mincho", 13) == 0) kShotai = kMincho;\r
  50                         if(strncmp(tmp2->str, "shotai=mincho", 13) == 0) kShotai = kMincho;\r
  51                         else if(strncmp(tmp2->str, "shotai=gothic", 13) == 0) kShotai = kGothic;\r
  52                         else if(strncmp(tmp2->str, "shotai=skeleton", 15) == 0) kShotai = kGothic;\r
  53                         else if(strncmp(tmp2->str, "type=png", 8) == 0) kType = 0;\r
  54                         else if(strncmp(tmp2->str, "type=svg", 8) == 0) kType = 1;\r
  55                         else if(strncmp(tmp2->str, "type=eps", 8) == 0) kType = 2;\r
  56                         else if(strncmp(tmp2->str, "type=raw", 8) == 0) kType = 3;\r
  57                         else if(strncmp(tmp2->str, "input=ids", 9) == 0) kInput = 0;\r
  58                         else if(strncmp(tmp2->str, "input=directwithadjust", 22) == 0) kInput = 2;\r
  59                         else if(strncmp(tmp2->str, "input=direct", 12) == 0) kInput = 1;\r
  60                         else if(strncmp(tmp2->str, "size=24", 7) == 0) kSize = 24;\r
  61                         else if(strncmp(tmp2->str, "size=200", 8) == 0) kSize = 200;\r
  62                         else test1 = g_string_new(tmp2->str);\r
  63                         if(cur == NULL) break;\r
  64                         pos = cur + 1;\r
  65                 }\r
  66         }\r
  67         else{ // redirected request\r
  68                 kInput = 0;\r
  69                 tmp1 = g_string_new((gchar *)getenv("REDIRECT_URL"));\r
  70                 pos = tmp1->str;\r
  71                 while(1){\r
  72                         cur = strchr(pos, '/');\r
  73                         tmp2 = g_string_new(pos);\r
  74                         if(cur != NULL) g_string_set_size(tmp2, cur - pos);\r
  75                         //got request string\r
  76 //                      if(strncmp(tmp2->str, "jp", 2) == 0) kDesign = 0;\r
  77 //                      else if(strncmp(tmp2->str, "cs", 2) == 0) kDesign = 10;\r
  78 //                      else if(strncmp(tmp2->str, "ct", 2) == 0) kDesign = 11;\r
  79 //                      else if(strncmp(tmp2->str, "kr", 2) == 0) kDesign = 20;\r
  80 //                      else if(strncmp(tmp2->str, "vn", 2) == 0) kDesign = 30;\r
  81 //                      else if(strncmp(tmp2->str, "un", 2) == 0) kDesign = 40;\r
  82 //                      else if(strncmp(tmp2->str, "mincho", 6) == 0) kShotai = kMincho;\r
  83                         if(strncmp(tmp2->str, "mincho", 6) == 0) kShotai = kMincho;\r
  84                         else if(strncmp(tmp2->str, "gothic", 6) == 0) kShotai = kGothic;\r
  85                         else if(strncmp(tmp2->str, "skeleton", 8) == 0) kShotai = kGothic;\r
  86                         else if(strncmp(tmp2->str, "v0.4", 4) == 0);\r
  87                         else test1 = g_string_new(tmp2->str);\r
  88                         if(cur == NULL) break;\r
  89                         pos = cur + 1;\r
  90                 }\r
  91                 if(strncmp(test1->str + test1->len - 4, ".png", 4) == 0) kType = 0;\r
  92                 if(strncmp(test1->str + test1->len - 4, ".svg", 4) == 0) kType = 1;\r
  93                 if(strncmp(test1->str + test1->len - 4, ".eps", 4) == 0) kType = 2;\r
  94                 if(strncmp(test1->str + test1->len - 4, ".raw", 4) == 0) kType = 3;\r
  95                 g_string_set_size(test1, test1->len - 4);\r
  96         }\r
  97         \r
  98         //clear result buffer\r
  99         test2 = g_string_new("");\r
 100         if(kType == 1){ //svg\r
 101           g_string_append(kResultText, "<?xml version=\"1.0\"?>\n");\r
 102           g_string_append(kResultText, "<!DOCTYPE svg PUBLIC \"-//W3C//DTD SVG 1.0//EN\" \"http://www.w3.org/TR/2001/REC-SVG-20010904/DTD/svg10.dtd\">\n");\r
 103           g_string_append(kResultText, "<svg viewBox=\"0 0 1024 1024\">");\r
 104         }\r
 105         else if(kType == 2){ //eps\r
 106                 g_string_append(kResultText, "%!PS-Adobe-3.0 EPSF-3.0\n");\r
 107                 g_string_append(kResultText, "%%BoundingBox: 0 -208 1024 816\n");\r
 108                 g_string_append(kResultText, "%%Pages: 0\n");\r
 109                 g_string_append(kResultText, "%%Title: ");\r
 110                 g_string_append(kResultText, test1->str);\r
 111                 g_string_append(kResultText, "\n");\r
 112                 g_string_append(kResultText, "%%Creator: KAGE System\n");\r
 113                 g_string_append(kResultText, "%%CreationDate: 00:00 1-1-2004\n");\r
 114                 g_string_append(kResultText, "%%EndComments\n");\r
 115                 g_string_append(kResultText, "%%EndProlog\n");\r
 116                 g_string_append(kResultText, "%%Page \"");\r
 117                 g_string_append(kResultText, test1->str);\r
 118                 g_string_append(kResultText, "\" 1\n");\r
 119                 g_string_append(kResultText, "newpath\n");\r
 120         }\r
 121         kageCanvas = initPng(canvasWidth, canvasHeight);\r
 122         if(kInput == 0) generateGlyph(test1, test2);\r
 123         else{\r
 124           convert99(test1, test2);\r
 125           //      g_string_append(test2, test1->str);\r
 126         }\r
 127 \r
 128         if(kType == 0){ //png(image)\r
 129                 if(test2->len != 0){\r
 130                   if(kInput != 1){ //0 and 2\r
 131                     test2 = CalcSizes(test2, 1);\r
 132                   }\r
 133                         DrawBox();\r
 134                         drawGlyph(test2, 0);\r
 135                         //output to file\r
 136                         filename = g_string_new(pngFilePath);\r
 137 //                      if(kDesign == 0) g_string_append(filename, "jp/");\r
 138 //                      else if(kDesign == 10) g_string_append(filename, "cs/");\r
 139 //                      else if(kDesign == 11) g_string_append(filename, "ct/");\r
 140 //                      else if(kDesign == 20) g_string_append(filename, "kr/");\r
 141 //                      else if(kDesign == 30) g_string_append(filename, "vn/");\r
 142 //                      else if(kDesign == 40) g_string_append(filename, "un/");\r
 143                         if(kShotai == kMincho) g_string_append(filename, "mincho/");\r
 144                         else if(kShotai == kGothic) g_string_append(filename, "gothic/");//skeleton??\r
 145                         g_string_append(filename, test1->str);\r
 146                         g_string_append(filename, ".png");\r
 147                         \r
 148 //skip for adjustment mode\r
 149 //                      fp = fopen(filename->str, "w");\r
 150 //                      writePng(pngWidth, pngHeight, kageCanvas, fp);\r
 151 //                      fclose(fp);\r
 152                         //output to stdout\r
 153                         fprintf(stdout, "Content-type: image/png\n\n");\r
 154                         writePng(pngWidth, pngHeight, kageCanvas, stdout);\r
 155                         //done\r
 156                         closePng(pngWidth, pngHeight, kageCanvas);\r
 157                 }\r
 158                 else{\r
 159                         err = fopen("error.png", "r");\r
 160                         fread(errbuf, sizeof(char), errorFileSize, err);\r
 161                 //      printf("An error occurred.\r\n");\r
 162                         fprintf(stdout, "Content-type: image/png\n\n");\r
 163                         fwrite(errbuf, sizeof(char), errorFileSize, stdout);\r
 164                         fclose(err);\r
 165                 }\r
 166         }\r
 167         else if(kType == 1){ //svg(vector graphics)\r
 168                 if(test2->len != 0){\r
 169                         test2 = CalcSizes(test2, 1);\r
 170                         kMode = 1;\r
 171                         drawGlyph(test2, 0);\r
 172                         g_string_append(kResultText, "</svg>\n");\r
 173                         fprintf(stdout, "Content-type: image/svg-xml\n\n");\r
 174                         fprintf(stdout, "%s", kResultText->str);\r
 175                 }\r
 176                 else{\r
 177                         fprintf(stdout, "Content-type: text/plain\n\n");\r
 178                         fprintf(stdout, "An error occurred.");\r
 179                 }\r
 180         }\r
 181         else if(kType == 2){ //eps(vector graphics)\r
 182                 if(test2->len != 0){\r
 183                         test2 = CalcSizes(test2, 1);\r
 184                         kMode = 2;\r
 185                         drawGlyph(test2, 0);\r
 186                         g_string_append(kResultText, "fill\n");\r
 187                         g_string_append(kResultText, "%%EOF\n");\r
 188                         fprintf(stdout, "Content-type: application/postscript\n\n");\r
 189                         fprintf(stdout, "%s", kResultText->str);\r
 190                 }\r
 191                 else{\r
 192                         fprintf(stdout, "Content-type: text/plain\n\n");\r
 193                         fprintf(stdout, "An error occurred.");\r
 194                 }\r
 195         }\r
 196         else{ //raw(text)\r
 197                 if(test2->len != 0){\r
 198                         fprintf(stdout, "Content-type: text/plain\n\n");\r
 199                         fprintf(stdout, "result=%s", test2->str);\r
 200                 }\r
 201                 else{\r
 202                         fprintf(stdout, "Content-type: text/plain\n\n");\r
 203                         fprintf(stdout, "result=nodata");\r
 204                 }\r
 205         }\r
 206         dummy = closeDB();\r
 207         \r
 208         return 0;\r
 209 }\r
 210 \r