Subversion Repositories NedoOS

Rev

Rev 2257 | Blame | Compare with Previous | Last modification | View Log | Download

  1. #include <stdlib.h>
  2. #include <stdio.h>
  3. #include <string.h>
  4. #include <oscalls.h>
  5. #include <osfs.h>
  6. #include <intrz80.h>
  7. #include <graphic.h>
  8. #include <../common/terminal.c>
  9. #include <tcp.h>
  10. //
  11. #define true 1
  12. #define false 0
  13.  
  14. unsigned int RBR_THR = 0xf8ef;
  15. unsigned int IER = 0xf9ef;
  16. unsigned int IIR_FCR = 0xfaef;
  17. unsigned int LCR = 0xfbef;
  18. unsigned int MCR = 0xfcef;
  19. unsigned int LSR = 0xfdef;
  20. unsigned int MSR = 0xfeef;
  21. unsigned int SR = 0xffef;
  22. unsigned int divider = 1;
  23. unsigned char comType = 0;
  24. unsigned int espType = 32;
  25.  
  26. unsigned char picture[15000];
  27. unsigned char netbuf[6912];
  28.  
  29. unsigned char minRating[] = "0000000000";
  30. struct fileStruct
  31. {
  32.   long picId;
  33.   unsigned int picYear;
  34.   unsigned long totalAmount;
  35.   unsigned int httpErr;
  36.   unsigned char picRating[8];
  37.   unsigned char picName[256];
  38.   unsigned char picType[64];
  39.   unsigned char authorIds[64];
  40.   unsigned char authorTitle[64];
  41.   unsigned char authorRealName[64];
  42.   unsigned char afn[128];
  43.   unsigned char pfn[128];
  44.   unsigned char fileName[128];
  45. } curFileStruct;
  46.  
  47. struct window
  48. {
  49.   unsigned char x;
  50.   unsigned char y;
  51.   unsigned char w;
  52.   unsigned char h;
  53.   unsigned char text;
  54.   unsigned char back;
  55.   unsigned char tittle[80];
  56. } curWin;
  57.  
  58. struct sockaddr_in dnsaddress;
  59. struct sockaddr_in targetadr;
  60. struct readstructure readStruct;
  61.  
  62. unsigned char ver[] = "4.0";
  63. const unsigned char sendOk[] = "SEND OK";
  64. const unsigned char gotWiFi[] = "WIFI GOT IP";
  65. unsigned char buffer[] = "0000000000";
  66. unsigned char userAgent[] = " HTTP/1.1\r\nHost: zxart.ee\r\nUser-Agent: Mozilla/4.0 (compatible; MSIE5.01; NedoOS; GetPic)\r\n\r\n\0";
  67. unsigned char zxart[] = "zxart.ee";
  68. unsigned char keypress, verbose, randomPic, slideShow, netDriver;
  69.  
  70. unsigned long contLen;
  71. unsigned long count = 0;
  72. unsigned int headlng;
  73. unsigned int slideShowTime = 0;
  74. unsigned int loaded;
  75.  
  76. unsigned char crlf[2] = {13, 10};
  77. unsigned char cmd[512];
  78. unsigned char link[512];
  79. unsigned char fileIdChar[10];
  80.  
  81. void clearStatus(void)
  82. {
  83. }
  84.  
  85. void emptyKeys(void)
  86. {
  87.   unsigned char loop = 0, key;
  88.   do
  89.   {
  90.     key = OS_GETKEY();
  91.     if (loop > 64)
  92.     {
  93.       break;
  94.     }
  95.     loop++;
  96.   } while (key != 0);
  97. }
  98.  
  99. void spaces(unsigned char number)
  100. {
  101.   while (number > 0)
  102.   {
  103.     putchar(' ');
  104.     number--;
  105.   }
  106. }
  107. void quit(void)
  108. {
  109.   OS_CLS(0);
  110.   OS_SETGFX(-1);
  111.   exit(0);
  112. }
  113. /*
  114. void infoBox(struct window w, const char *message)
  115. {
  116.   unsigned char wcount, tempx, tittleStart;
  117.  
  118.   w.h++;
  119.   OS_SETXY(w.x, w.y - 1);
  120.   BDBOX(w.x, w.y, w.w + 1, w.h, w.back, 32);
  121.   OS_SETXY(w.x, w.y);
  122.   OS_SETCOLOR(w.text);
  123.   putchar(201);
  124.   for (wcount = 0; wcount < w.w; wcount++)
  125.   {
  126.     putchar(205);
  127.   }
  128.   putchar(187);
  129.   OS_SETXY(w.x, w.y + w.h);
  130.   putchar(200);
  131.   for (wcount = 0; wcount < w.w; wcount++)
  132.   {
  133.     putchar(205);
  134.   }
  135.   putchar(188);
  136.  
  137.   tempx = w.x + w.w + 1;
  138.   for (wcount = 1; wcount < w.h; wcount++)
  139.   {
  140.     OS_SETXY(w.x, w.y + wcount);
  141.     putchar(186);
  142.     OS_SETXY(tempx, w.y + wcount);
  143.     putchar(186);
  144.   }
  145.   tittleStart = w.x + (w.w / 2) - (strlen(w.tittle) / 2);
  146.   OS_SETXY(tittleStart, w.y);
  147.   printf("[%s]", w.tittle);
  148.  
  149.   OS_SETXY(w.x + 1, w.y + 1);
  150.   OS_SETCOLOR(w.back);
  151.   tittleStart = w.x + (w.w / 2) - (strlen(message) / 2);
  152.   OS_SETXY(tittleStart, w.y + 1);
  153.   printf("%s", message);
  154. }
  155. */
  156. void printHelp(void)
  157. {
  158.   OS_SETCOLOR(67);
  159.   printf("   GETPIC [%s] zxart.ee picture viewer for nedoNET\n\r", ver);
  160.   OS_SETCOLOR(6);
  161.   printf("-------------------------------------------------------\n\r");
  162.   printf(" Управление:\n\r");
  163.   printf(" 'ESC' - выход из программы;\n\r");
  164.   printf(" '<-' или 'B' к последним картинкам;\n\r");
  165.   printf(" '->' или 'Пробел' к более старым картинкам\n\r");
  166.   printf(" 'J' Прыжок на  указанную по счету картинку\n\r");
  167.   printf(" 'I' Просмотр экрана информации о картинках\n\r");
  168.   printf(" 'S' Сохранить картинку на диск в текущую папку\n\r");
  169.   printf(" 'V' не выводить информацию об авторах\n\r");
  170.   printf(" 'R' переход в режим  случайная картинка с рейтингом 4+\n\r");
  171.   printf(" 'A' переход в режим  слайд-шоу\n\r");
  172.   printf(" 'D' Переключение режима ZXNETUSB/ESP-COM\n\r");
  173.   printf(" 'T' Продолжительность одного слайда в int-ах \n\r");
  174.   printf(" 'M' Минимальный рейтинг для случайного воспроизведения. \n\r");
  175.   printf(" 'H' Данная справочная информация\n\r");
  176.   printf("-----------------Нажмите любую кнопку------------------\n\r");
  177.   OS_SETCOLOR(70);
  178.   keypress = getchar();
  179.   OS_CLS(0);
  180. }
  181.  
  182. void delay(unsigned long counter)
  183. {
  184.   unsigned long start, finish;
  185.   counter = counter / 20;
  186.   if (counter < 1)
  187.   {
  188.     counter = 1;
  189.   }
  190.   start = time();
  191.   finish = start + counter;
  192.  
  193.   while (start < finish)
  194.   {
  195.     start = time();
  196.   }
  197. }
  198.  
  199. ///////////////////////////
  200. #include <../common/esp-com.c>
  201. #include <../common/network.c>
  202. //////////////////////////
  203.  
  204. int testOperation2(const char *process, int socket)
  205. {
  206.   if (socket < 0)
  207.   {
  208.     printf("%s: [ERROR:", process);
  209.     errorPrint(-socket);
  210.     printf("]\r\n");
  211.     YIELD();
  212.     return -socket;
  213.   }
  214.   return 1;
  215. }
  216.  
  217. int cutHeader(unsigned int todo)
  218. {
  219.   unsigned char *count1;
  220.  
  221.   curFileStruct.httpErr = httpError();
  222.   if (curFileStruct.httpErr != 200)
  223.   {
  224.     clearStatus();
  225.     printf("HTTP response:[%u]", curFileStruct.httpErr);
  226.     return 0;
  227.   }
  228.   count1 = strstr(netbuf, "Content-Length:");
  229.   if (count1 == NULL)
  230.   {
  231.     clearStatus();
  232.     printf("contLen not found");
  233.     contLen = 0;
  234.     curFileStruct.httpErr = 999; // bad kostil
  235.     return 0;
  236.   }
  237.   contLen = atol(count1 + 15);
  238.   // printf("Content-Length: %lu \n\r", contLen);
  239.  
  240.   count1 = strstr(netbuf, "\r\n\r\n");
  241.   if (count1 == NULL)
  242.   {
  243.     clearStatus();
  244.     printf("end of header not found\r\n");
  245.   }
  246.   else
  247.   {
  248.     headlng = ((unsigned int)count1 - (unsigned int)netbuf + 4);
  249.     // printf("header %u bytes\r\n", headlng);
  250.   }
  251.   return todo - headlng;
  252. }
  253.  
  254. char *str_replace(char *dst, int num, const char *str, const char *orig, const char *rep)
  255. {
  256.   const char *ptr;
  257.   size_t len1 = strlen(orig);
  258.   size_t len2 = strlen(rep);
  259.   char *tmp = dst;
  260.  
  261.   num -= 1;
  262.   while ((ptr = strstr(str, orig)) != NULL)
  263.   {
  264.     num -= (ptr - str) + len2;
  265.     if (num < 1)
  266.       break;
  267.  
  268.     strncpy(dst, str, (size_t)(ptr - str));
  269.     dst += ptr - str;
  270.     strncpy(dst, rep, len2);
  271.     dst += len2;
  272.     str = ptr + len1;
  273.   }
  274.  
  275.   for (; (*dst = *str) && (num > 0); --num)
  276.   {
  277.     ++dst;
  278.     ++str;
  279.   }
  280.   return tmp;
  281. }
  282.  
  283. char fillPictureEsp(void)
  284. {
  285.   unsigned char sizeLink;
  286.   unsigned long downloaded;
  287.   unsigned char byte, countl;
  288.   unsigned int todo;
  289.   const unsigned char *count1;
  290.   unsigned char firstPacket;
  291.   strcpy(link, netbuf);
  292.   sizeLink = strlen(link);
  293.   do
  294.   {
  295.     sendcommand("AT+CIPSTART=\"TCP\",\"zxart.ee\",80");
  296.     getAnswer2(); // CONNECT or ERROR or link is not valid
  297.     count1 = strstr(netbuf, "CONNECT");
  298.   } while (count1 == NULL);
  299.  
  300.   getAnswer2();                                   // OK
  301.   sprintf(netbuf, "AT+CIPSEND=%u", sizeLink + 2); // second CRLF in send command
  302.   sendcommand(netbuf);
  303.   getAnswer2();
  304.   do
  305.   {
  306.     byte = uart_readBlock();
  307.     // putchar(byte);
  308.   } while (byte != '>');
  309.   sendcommand(link);
  310.   countl = 0;
  311.   do
  312.   {
  313.     byte = uart_readBlock();
  314.     if (byte == sendOk[countl])
  315.     {
  316.       countl++;
  317.     }
  318.     else
  319.     {
  320.       countl = 0;
  321.     }
  322.   } while (countl < strlen(sendOk));
  323.   uart_readBlock(); // CR
  324.   uart_readBlock(); // LF
  325.   downloaded = 0;
  326.   firstPacket = true;
  327.   do
  328.   {
  329.     headlng = 0;
  330.     todo = recvHead();
  331.     getdataEsp(todo); // Requested size
  332.     if (firstPacket)
  333.     {
  334.       todo = cutHeader(todo);
  335.       firstPacket = false;
  336.       if (curFileStruct.httpErr != 200)
  337.       {
  338.         sendcommand("AT+CIPCLOSE");
  339.         getAnswer2(); // CLOSED
  340.         getAnswer2(); // OK
  341.         return false;
  342.       }
  343.     }
  344.  
  345.     if (downloaded + todo > sizeof(picture))
  346.     {
  347.       printf("dataBuffer overrun... %u reached \n\r", downloaded + todo);
  348.       return false;
  349.     }
  350.     memcpy(picture + downloaded, netbuf + headlng, todo);
  351.     downloaded = downloaded + todo;
  352.   } while (downloaded < contLen);
  353.   sendcommand("AT+CIPCLOSE");
  354.   getAnswer2(); // CLOSED or ERROR
  355.   count1 = strstr(netbuf, "CLOSED");
  356.   if (count1 != NULL)
  357.   {
  358.     getAnswer2(); // OK
  359.   }
  360.   return true;
  361. }
  362.  
  363. char fillPictureNet(void)
  364. {
  365.   int todo;
  366.   unsigned int downloaded = 0;
  367.   unsigned char firstPacket;
  368.   char socket, retry;
  369.   picture[0] = 0;
  370.   retry = 3;
  371.   socket = OpenSock(AF_INET, SOCK_STREAM);
  372.   if (testOperation2("OS_NETSOCKET", socket) != 1)
  373.   {
  374.     getchar();
  375.     quit();
  376.   }
  377.   todo = netConnect(socket, retry);
  378.   if (testOperation2("OS_NETCONNECT", todo) != 1)
  379.   {
  380.     getchar();
  381.     quit();
  382.   }
  383.   todo = tcpSend(socket, (unsigned int)&netbuf, strlen(netbuf), retry);
  384.   if (testOperation2("OS_WIZNETWRITE", todo) != 1)
  385.   {
  386.     getchar();
  387.     quit();
  388.   }
  389.   firstPacket = true;
  390.   do
  391.   {
  392.     headlng = 0;
  393.     todo = tcpRead(socket, retry);
  394.     testOperation("OS_WIZNETREAD", todo); // Quit if too many retries
  395.  
  396.     if (firstPacket)
  397.     {
  398.       todo = cutHeader(todo);
  399.       firstPacket = false;
  400.       if (curFileStruct.httpErr != 200)
  401.       {
  402.         netShutDown(socket, 0);
  403.         return false;
  404.       }
  405.     }
  406.  
  407.     if (downloaded + todo > sizeof(picture))
  408.     {
  409.       printf("dataBuffer overrun... %u reached \n\r", downloaded + todo);
  410.       return false;
  411.     }
  412.     memcpy(picture + downloaded, netbuf + headlng, todo);
  413.     downloaded = downloaded + todo;
  414.   } while (downloaded != contLen);
  415.  
  416.   netShutDown(socket, 0);
  417.   picture[downloaded + 1] = 0;
  418.   return true;
  419. }
  420.  
  421. void nameRepair(unsigned char *pfn, unsigned int tfnSize)
  422. {
  423.  
  424.   str_replace(pfn, tfnSize, pfn, "\\", "_");
  425.   str_replace(pfn, tfnSize, pfn, "/", "_");
  426.   str_replace(pfn, tfnSize, pfn, ":", "_");
  427.   str_replace(pfn, tfnSize, pfn, "*", "_");
  428.   str_replace(pfn, tfnSize, pfn, "?", "_");
  429.   str_replace(pfn, tfnSize, pfn, "<", "_");
  430.   str_replace(pfn, tfnSize, pfn, ">", "_");
  431.   str_replace(pfn, tfnSize, pfn, "|", "_");
  432.   str_replace(pfn, tfnSize, pfn, " ", "_");
  433.   str_replace(pfn, tfnSize, pfn, "&#039;", "'");
  434.   str_replace(pfn, tfnSize, pfn, "&amp;", "&");
  435.   str_replace(pfn, tfnSize, pfn, "&quot;", "'");
  436.   str_replace(pfn, tfnSize, pfn, "&gt;", ")");
  437.   str_replace(pfn, tfnSize, pfn, "&lt;", "(");
  438.   str_replace(pfn, tfnSize, pfn, "\"", "'");
  439. }
  440.  
  441. void stringRepair(unsigned char *pfn, unsigned int tSize)
  442. {
  443.   str_replace(pfn, tSize, pfn, "&#039;", "'");
  444.   str_replace(pfn, tSize, pfn, "&amp;", "&");
  445.   str_replace(pfn, tSize, pfn, "&gt;", ">");
  446.   str_replace(pfn, tSize, pfn, "&lt;", "<");
  447.   str_replace(pfn, tSize, pfn, "&quot;", "\"");
  448.   str_replace(pfn, tSize, pfn, "\\/", "/");
  449. }
  450.  
  451. void ncReplace(void)
  452. {
  453.   unsigned char len;
  454.   for (len = 0; len < strlen(curFileStruct.afn); len++)
  455.   {
  456.     if ((curFileStruct.afn[len] < ' ') || (curFileStruct.afn[len] > 0xef) || (curFileStruct.afn[len] > 0x7e && curFileStruct.afn[len] < 0xb0))
  457.     {
  458.       curFileStruct.afn[len] = '_';
  459.     }
  460.   }
  461.  
  462.   for (len = 0; len < strlen(curFileStruct.pfn); len++)
  463.   {
  464.     if ((curFileStruct.pfn[len] < ' ') || (curFileStruct.pfn[len] > 0xef) || (curFileStruct.pfn[len] > 0x7e && curFileStruct.pfn[len] < 0xb0))
  465.     {
  466.       curFileStruct.pfn[len] = '_';
  467.     }
  468.   }
  469. }
  470.  
  471. unsigned char savePic(unsigned long fileId)
  472. {
  473.   FILE *fp2;
  474.   unsigned char afnSize, tfnSize;
  475.  
  476.   afnSize = sizeof(curFileStruct.afn) - 1;
  477.   tfnSize = sizeof(curFileStruct.pfn) - 1;
  478.  
  479.   strcpy(curFileStruct.afn, curFileStruct.authorTitle);
  480.   nameRepair(curFileStruct.afn, afnSize);
  481.  
  482.   strcpy(curFileStruct.pfn, curFileStruct.picName);
  483.   nameRepair(curFileStruct.pfn, tfnSize);
  484.   ncReplace();
  485.  
  486.   sprintf(curFileStruct.fileName, "%s-%s-%ld.scr", curFileStruct.afn, curFileStruct.pfn, fileId);
  487.   if (strlen(curFileStruct.fileName) > 62)
  488.   {
  489.     sprintf(fileIdChar, "-%ld", fileId);
  490.     str_replace(curFileStruct.fileName, sizeof(curFileStruct.fileName) - 1, curFileStruct.fileName, fileIdChar, "");
  491.     curFileStruct.fileName[50] = '\0';
  492.     strcat(curFileStruct.fileName, fileIdChar);
  493.     strcat(curFileStruct.fileName, ".scr");
  494.   }
  495.   OS_SETSYSDRV();
  496.   OS_MKDIR("../downloads");        // Create if not exist
  497.   OS_MKDIR("../downloads/getpic"); // Create if not exist
  498.   OS_CHDIR("../downloads/getpic");
  499.   fp2 = OS_CREATEHANDLE(curFileStruct.fileName, 0x80);
  500.   if (((int)fp2) & 0xff)
  501.   {
  502.     printf("%s creating error\r\n", curFileStruct.fileName);
  503.     getchar();
  504.     quit();
  505.   }
  506.   OS_WRITEHANDLE(picture, fp2, 6912);
  507.   OS_CLOSEHANDLE(fp2);
  508.   return 0;
  509. }
  510.  
  511. int pos(unsigned char *s, unsigned char *c, unsigned int n, unsigned int startPos)
  512. {
  513.   unsigned int i, j;
  514.   unsigned int lenC, lenS;
  515.  
  516.   for (lenC = 0; c[lenC]; lenC++)
  517.     ;
  518.   for (lenS = 0; s[lenS]; lenS++)
  519.     ;
  520.  
  521.   for (i = startPos; i <= lenS - lenC; i++)
  522.   {
  523.     for (j = 0; s[i + j] == c[j]; j++)
  524.       ;
  525.  
  526.     if (j - lenC == 1 && i == lenS - lenC && !(n - 1))
  527.       return i;
  528.     if (j == lenC)
  529.       if (n - 1)
  530.         n--;
  531.       else
  532.         return i;
  533.   }
  534.   return -1;
  535. }
  536.  
  537. const char *parseJson(unsigned char *property)
  538. {
  539.   unsigned int w, lng, lngp1, findEnd, listPos;
  540.   unsigned char terminator;
  541.   int n;
  542.   //n = -1;
  543.   // netbuf[0] = '\0';
  544.   n = pos(picture, property, 1, 0);
  545.   if (n == -1)
  546.   {
  547.     strcpy(netbuf, "-");
  548.     // printf("Property %s not found", property);
  549.     return netbuf;
  550.   }
  551.   lng = n - 1 + strlen(property);
  552.   if (picture[lng] == ':')
  553.   {
  554.     terminator = 0;
  555.   }
  556.   if (picture[lng] == '\"')
  557.   {
  558.     terminator = '\"';
  559.   }
  560.   if (picture[lng] == '[')
  561.   {
  562.     terminator = ']';
  563.   }
  564.  
  565.   findEnd = 1;
  566.   lngp1 = lng + 1;
  567.  
  568.   while (42)
  569.   {
  570.  
  571.     if ((picture[lngp1 + findEnd] == ','))
  572.     {
  573.       if (terminator == 0)
  574.       {
  575.         break;
  576.       }
  577.       if ((picture[lng + findEnd] == terminator))
  578.       {
  579.         findEnd--;
  580.         break;
  581.       }
  582.     }
  583.     findEnd++;
  584.   }
  585.   listPos = 0;
  586.   for (w = lngp1; w < findEnd + lngp1; w++)
  587.   {
  588.     netbuf[listPos] = picture[w];
  589.     listPos++;
  590.   }
  591.   netbuf[listPos] = 0;
  592.   return netbuf;
  593. }
  594.  
  595. void convert866(void)
  596. {
  597.   unsigned int lng, targetPos, w, q = 0;
  598.   unsigned char bufferl[8], one, two;
  599.   unsigned int decVal;
  600.   lng = strlen(netbuf);
  601.   targetPos = lng + 1;
  602.  
  603.   while (q < lng)
  604.   {
  605.     one = netbuf[q];
  606.     two = netbuf[q + 1];
  607.     if (one == 92 && two == 117)
  608.     {
  609.       q = q + 2;
  610.       for (w = 0; w < 4; w++)
  611.       {
  612.         bufferl[w] = netbuf[q + w];
  613.       }
  614.       q = q + 4;
  615.       bufferl[4] = '\0';
  616.       decVal = (unsigned int)strtol(bufferl, NULL, 16);
  617.  
  618.       if (decVal < 1088)
  619.       {
  620.         decVal = decVal - 912;
  621.       }
  622.       if (decVal > 1087)
  623.       {
  624.         decVal = decVal - 864;
  625.       }
  626.       if (decVal == 1025)
  627.       {
  628.         decVal = 240;
  629.       }
  630.       if (decVal == 1105)
  631.       {
  632.         decVal = 241;
  633.       }
  634.  
  635.       netbuf[targetPos] = decVal;
  636.     }
  637.     else
  638.     {
  639.       netbuf[targetPos] = netbuf[q];
  640.       q++;
  641.     }
  642.     targetPos++;
  643.   }
  644.   netbuf[targetPos] = 0;
  645.  
  646.   for (w = lng + 1; w < targetPos + 1; w++)
  647.   {
  648.     netbuf[w - lng - 1] = netbuf[w];
  649.   }
  650. }
  651.  
  652. long processJson(unsigned long startPos, unsigned char limit, unsigned char queryNum)
  653. {
  654.   unsigned int tSize;
  655.   const unsigned char *count1;
  656.   unsigned char result;
  657.   switch (queryNum)
  658.   {
  659.   case 0:
  660.     sprintf(netbuf, "GET /api/export:zxPicture/filter:zxPictureType=standard/limit:%u/start:%lu/order:date,desc%s", limit, startPos, userAgent);
  661.     break;
  662.   case 1:
  663.     sprintf(netbuf, "GET /api/types:zxPicture/export:zxPicture/language:eng/start:0/limit:1/order:rand/filter:zxPictureMinRating=%s;zxPictureType=standard%s", minRating, userAgent);
  664.     break;
  665.   case 99: // GET /jsonElementData/elementId:182798
  666.     sprintf(netbuf, "GET /jsonElementData/elementId:%lu%s", startPos, userAgent);
  667.     break;
  668.   }
  669.  
  670.   switch (netDriver)
  671.   {
  672.   case 0:
  673.     result = fillPictureNet();
  674.     break;
  675.   case 1:
  676.     result = fillPictureEsp();
  677.     break;
  678.   }
  679.  
  680.   if (!result)
  681.   {
  682.     return -1;
  683.   }
  684.  
  685.   count1 = strstr(picture, "responseStatus\":\"success");
  686.   if (count1 == NULL)
  687.   {
  688.     OS_CLS(0);
  689.     OS_SETCOLOR(66);
  690.     puts("Picture[]:");
  691.     puts(picture);
  692.     puts("---------------");
  693.     printf("PROCESS JSON: [ERROR: Bad responseStatus.] [Query:%u][Pic:%lu]\r\n", queryNum, startPos);
  694.     YIELD();
  695.     getchar();
  696.     return -1;
  697.   }
  698.  
  699.   count1 = strstr(picture, "\"id\":");
  700.   if (count1 == NULL)
  701.   {
  702.     parseJson("\"totalAmount\":");
  703.  
  704.     if (atol(netbuf) == 0)
  705.     {
  706.       return -3;
  707.     }
  708.  
  709.     if (netbuf[0] != '-')
  710.     {
  711.       return -4;
  712.     }
  713.     OS_CLS(0);
  714.     OS_SETCOLOR(66);
  715.     puts("Picture[]:");
  716.     puts(picture);
  717.     puts("---------------");
  718.     printf("PROCESS JSON: [ERROR: ID not found.] [Query:%u][Pic:%lu]\r\n", queryNum, startPos);
  719.     YIELD();
  720.     return -2;
  721.   }
  722.   netbuf[0] = 0;
  723.  
  724.   switch (queryNum)
  725.   {
  726.   case 0:
  727.   case 1:
  728.     parseJson("\"id\":");
  729.     curFileStruct.picId = atol(netbuf);
  730.     parseJson(",\"title\":\"");
  731.     convert866();
  732.     strcpy(curFileStruct.picName, netbuf);
  733.     tSize = sizeof(curFileStruct.picName);
  734.     stringRepair(curFileStruct.picName, tSize);
  735.  
  736.     parseJson(",\"type\":\"");
  737.     strcpy(curFileStruct.picType, netbuf);
  738.     parseJson("\"rating\":\"");
  739.     strcpy(curFileStruct.picRating, netbuf);
  740.     parseJson("\"year\":\"");
  741.     curFileStruct.picYear = atoi(netbuf);
  742.     parseJson("\"totalAmount\":");
  743.     curFileStruct.totalAmount = atol(netbuf);
  744.     parseJson("\"authorIds\":[");
  745.     strcpy(curFileStruct.authorIds, netbuf);
  746.     break;
  747.   case 99:
  748.     parseJson(",\"title\":\"");
  749.     convert866();
  750.     strcpy(curFileStruct.authorTitle, netbuf);
  751.     parseJson(",\"realName\":\"");
  752.     convert866();
  753.     strcpy(curFileStruct.authorRealName, netbuf);
  754.     break;
  755.   }
  756.   return curFileStruct.picId;
  757. }
  758.  
  759. void printData(void)
  760. {
  761.   OS_SETCOLOR(70);
  762.   printf(" #: ");
  763.   OS_SETCOLOR(71);
  764.   printf("%lu", count);
  765.   OS_SETCOLOR(70);
  766.   printf(" ID: ");
  767.   OS_SETCOLOR(71);
  768.   printf("%lu ", curFileStruct.picId);
  769.   OS_SETCOLOR(70);
  770.   printf(" Total Pics: ");
  771.   OS_SETCOLOR(71);
  772.   printf("%lu\r\n", curFileStruct.totalAmount);
  773.   OS_SETCOLOR(70);
  774.   printf(" Author: ");
  775.   OS_SETCOLOR(69);
  776.   printf("%s\r\n", curFileStruct.authorTitle);
  777.   OS_SETCOLOR(70);
  778.   printf(" TITLE: ");
  779.   OS_SETCOLOR(67);
  780.   printf("%s\r\n", curFileStruct.picName);
  781.   OS_SETCOLOR(70);
  782.   printf(" RATING: ");
  783.   OS_SETCOLOR(71);
  784.   printf("%s", curFileStruct.picRating);
  785.   OS_SETCOLOR(70);
  786.   printf(" YEAR: ");
  787.   OS_SETCOLOR(71);
  788.   printf("%u\r\n", curFileStruct.picYear);
  789.   OS_SETCOLOR(70);
  790.   printf(" AuthorsIDs ");
  791.   OS_SETCOLOR(71);
  792.   printf("%s", curFileStruct.authorIds);
  793.   OS_SETCOLOR(70);
  794.   printf(" Real name: ");
  795.   OS_SETCOLOR(71);
  796.   printf("%s\r\n", curFileStruct.authorRealName);
  797.   OS_SETCOLOR(69);
  798.   printf("\r\n");
  799.   printf("\r\n");
  800.  
  801.   OS_SETCOLOR(70);
  802.  
  803.   OS_SETCOLOR(70);
  804.   printf(" Query: ");
  805.   OS_SETCOLOR(71);
  806.   if (randomPic)
  807.   {
  808.     printf("Random pic with %s+ rating\r\n", minRating);
  809.   }
  810.   else
  811.   {
  812.     puts("Sequental from newest");
  813.   }
  814.   OS_SETCOLOR(70);
  815.   printf(" Mode : ");
  816.   OS_SETCOLOR(71);
  817.  
  818.   if (slideShow)
  819.   {
  820.     printf("Slide-show, %u ints \r\n", slideShowTime);
  821.   }
  822.   else
  823.   {
  824.     puts("Manual show");
  825.   }
  826.  
  827.   // YIELD();
  828. }
  829.  
  830. unsigned char inputBox(struct window w, const char *prefilled)
  831. {
  832.   unsigned char wcount, tempx, tittleStart;
  833.   unsigned char byte, counter;
  834.   w.h++;
  835.   OS_SETXY(w.x, w.y - 1);
  836.   BDBOX(w.x, w.y, w.w + 1, w.h, w.back, 32);
  837.   OS_SETXY(w.x, w.y);
  838.   OS_SETCOLOR(w.text);
  839.   putchar(201);
  840.   for (wcount = 0; wcount < w.w; wcount++)
  841.   {
  842.     putchar(205);
  843.   }
  844.   putchar(187);
  845.   OS_SETXY(w.x, w.y + w.h);
  846.   putchar(200);
  847.   for (wcount = 0; wcount < w.w; wcount++)
  848.   {
  849.     putchar(205);
  850.   }
  851.   putchar(188);
  852.  
  853.   tempx = w.x + w.w + 1;
  854.   for (wcount = 1; wcount < w.h; wcount++)
  855.   {
  856.     OS_SETXY(w.x, w.y + wcount);
  857.     putchar(186);
  858.     OS_SETXY(tempx, w.y + wcount);
  859.     putchar(186);
  860.   }
  861.   tittleStart = w.x + (w.w / 2) - (strlen(w.tittle) / 2);
  862.   OS_SETXY(tittleStart, w.y);
  863.   printf("[%s]", w.tittle);
  864.   OS_SETXY(w.x + 1, w.y + 1);
  865.   OS_SETCOLOR(w.back);
  866.   putchar(219);
  867.  
  868.   cmd[0] = 0;
  869.  
  870.   counter = strlen(prefilled);
  871.   if (counter != 0)
  872.   {
  873.     strcpy(cmd, prefilled);
  874.     goto skipKeys;
  875.   }
  876.  
  877.   do
  878.   {
  879.     byte = OS_GETKEY();
  880.     if (byte != 0)
  881.     {
  882.       switch (byte)
  883.       {
  884.       case 0x08:
  885.         if (counter > 0)
  886.         {
  887.           counter--;
  888.           cmd[counter] = 0;
  889.         }
  890.         break;
  891.       case 0x0d:
  892.  
  893.         if (counter == 0)
  894.         {
  895.           return false;
  896.         }
  897.         else
  898.         {
  899.           return true;
  900.         }
  901.  
  902.       case 31:
  903.         break;
  904.       case 250:
  905.         break;
  906.       case 249:
  907.         break;
  908.       case 248:
  909.         break;
  910.       case 251: // Right
  911.         break;
  912.       case 252: // Del
  913.         OS_SETXY(w.x + 1, w.y + 1);
  914.         spaces(counter + 1);
  915.         cmd[0] = 0;
  916.         counter = 0;
  917.         break;
  918.       case 27:
  919.         cmd[0] = 0;
  920.         return false;
  921.       default:
  922.         if (counter < w.w - 1)
  923.         {
  924.           cmd[counter] = byte;
  925.           counter++;
  926.           cmd[counter] = 0;
  927.         }
  928.         break;
  929.       }
  930.     skipKeys:
  931.       OS_SETXY(w.x + 1, w.y + 1);
  932.       printf("%s", cmd);
  933.       putchar(219);
  934.       if (byte == 0x08)
  935.       {
  936.         putchar(' ');
  937.       }
  938.     }
  939.     YIELD();
  940.   } while (42);
  941.   return false;
  942. }
  943.  
  944. void safeKeys(unsigned char keypress)
  945. {
  946.   switch (keypress)
  947.   {
  948.   case 27:
  949.     OS_SETCOLOR(70);
  950.     printf("Good bye...\r\n");
  951.     delayLong(500);
  952.     quit();
  953.     break;
  954.   case 'j':
  955.   case 'J':
  956.     curWin.w = 13;
  957.     curWin.x = 80 / 2 - curWin.w / 2 - 2;
  958.     curWin.y = 11;
  959.     curWin.h = 1;
  960.     curWin.text = 103;
  961.     curWin.back = 103;
  962.     strcpy(curWin.tittle, "# of pic:");
  963.     if (inputBox(curWin, ""))
  964.     {
  965.       sscanf(cmd, "%lu", &count);
  966.       if (count > curFileStruct.totalAmount - 1)
  967.       {
  968.         count = curFileStruct.totalAmount - 1;
  969.       }
  970.     }
  971.     break;
  972.   case 't':
  973.   case 'T':
  974.     curWin.w = 20;
  975.     curWin.x = 80 / 2 - curWin.w / 2 - 2;
  976.     curWin.y = 11;
  977.     curWin.h = 1;
  978.     curWin.text = 103;
  979.     curWin.back = 103;
  980.     strcpy(curWin.tittle, "Slide time(ints)");
  981.     if (inputBox(curWin, ""))
  982.     {
  983.       sscanf(cmd, "%u", &slideShowTime);
  984.       OS_CLS(0);
  985.       OS_SETCOLOR(70);
  986.       printf("Slide duration set to %u ints.", slideShowTime);
  987.       delayLong(500);
  988.     }
  989.     break;
  990.   case 'v':
  991.   case 'V':
  992.     verbose = !verbose;
  993.  
  994.     if (verbose == 0)
  995.     {
  996.       BOX(1, 1, 80, 25, 40, ' ');
  997.       AT(1, 1);
  998.     }
  999.     break;
  1000.   case 'h':
  1001.   case 'H':
  1002.     printHelp();
  1003.     break;
  1004.   case 'r':
  1005.   case 'R':
  1006.     randomPic = !randomPic;
  1007.     OS_SETCOLOR(70);
  1008.     if (verbose == 1)
  1009.     {
  1010.       if (randomPic == 1)
  1011.       {
  1012.         printf("    Random mode enabled...\r\n");
  1013.         count = 0;
  1014.         delayLong(500);
  1015.       }
  1016.       else
  1017.       {
  1018.         printf("    Sequental mode enabled...\r\n");
  1019.         count = 0;
  1020.         delayLong(500);
  1021.       }
  1022.     }
  1023.     break;
  1024.   case 'a':
  1025.   case 'A':
  1026.     slideShow = !slideShow;
  1027.     OS_SETCOLOR(70);
  1028.     if (slideShow == 1)
  1029.     {
  1030.       if (verbose == 1)
  1031.         printf("    SlideShow mode enabled...\r\n\r\n");
  1032.       slideShowTime = 150;
  1033.       delayLong(500);
  1034.     }
  1035.     else
  1036.     {
  1037.       if (verbose == 1)
  1038.         printf("    Manual mode enabled...\r\n\r\n");
  1039.       slideShowTime = 0;
  1040.       delayLong(500);
  1041.     }
  1042.     break;
  1043.   case 'd':
  1044.   case 'D':
  1045.     netDriver = !netDriver;
  1046.     OS_SETCOLOR(70);
  1047.     if (netDriver == 1)
  1048.     {
  1049.       printf("    ESP-COM mode enabled...\r\n");
  1050.       loadEspConfig();
  1051.       uart_init(divider);
  1052.       espReBoot();
  1053.       printf("    ESP-COM inited...\r\n");
  1054.       delayLong(500);
  1055.     }
  1056.     else
  1057.     {
  1058.       if (verbose == 1)
  1059.         printf("    NedoNET mode enabled...");
  1060.       delayLong(500);
  1061.     }
  1062.     break;
  1063.   case 'm':
  1064.   case 'M':
  1065.     curWin.w = 22;
  1066.     curWin.x = 80 / 2 - curWin.w / 2 - 2;
  1067.     curWin.y = 1;
  1068.     curWin.h = 1;
  1069.     curWin.text = 103;
  1070.     curWin.back = 103;
  1071.     strcpy(curWin.tittle, "Минимальная оценка:");
  1072.  
  1073.     if (inputBox(curWin, ""))
  1074.     {
  1075.       char counter;
  1076.       for (counter = 0; counter < strlen(cmd); counter++)
  1077.       {
  1078.         if ((((cmd[counter] < '0') || (cmd[counter] > '9'))) && cmd[counter] != '.')
  1079.         {
  1080.           counter = 0;
  1081.           break;
  1082.         }
  1083.       }
  1084.       if (counter != 0)
  1085.       {
  1086.         strncpy(minRating, cmd, 5);
  1087.         count = 0;
  1088.       }
  1089.     }
  1090.   default:
  1091.     break;
  1092.   }
  1093. }
  1094.  
  1095. void init(void)
  1096. {
  1097.   OS_SETSYSDRV();
  1098.   OS_MKDIR("../downloads");        // Create if not exist
  1099.   OS_MKDIR("../downloads/getpic"); // Create if not exist
  1100.   OS_CHDIR("../downloads/getpic");
  1101.  
  1102.   count = 0;
  1103.   verbose = 1;
  1104.   randomPic = 0;
  1105.   slideShow = 0;
  1106.   netDriver = 0;
  1107.   strcpy(minRating, "4.0");
  1108.  
  1109.   targetadr.family = AF_INET;
  1110.   targetadr.porth = 00;
  1111.   targetadr.portl = 80;
  1112.   targetadr.b1 = 217; // D9
  1113.   targetadr.b2 = 146; // 92
  1114.   targetadr.b3 = 69;  // 45
  1115.   targetadr.b4 = 13;  // 0D
  1116. }
  1117.  
  1118. C_task main(void)
  1119. {
  1120.   long iddqd, idkfa;
  1121.   char result;
  1122.  
  1123.   OS_HIDEFROMPARENT();
  1124.   OS_SETGFX(0x86);
  1125.   OS_CLS(0);
  1126.  
  1127.   init();
  1128.  
  1129.   printHelp();
  1130.   safeKeys(keypress);
  1131.  
  1132.   if (netDriver == 0)
  1133.   {
  1134.  
  1135.     get_dns();
  1136.     dnsResolve("zxart.ee");
  1137.     printf("\r\n");
  1138.   }
  1139.  
  1140. start:
  1141.   keypress = 0;
  1142.   switch (randomPic)
  1143.   {
  1144.   case 0:
  1145.  
  1146.     iddqd = processJson(count, 1, 0);
  1147.     break;
  1148.   case 1:
  1149.     iddqd = processJson(0, 1, 1);
  1150.     break;
  1151.   }
  1152.  
  1153.   OS_SETCOLOR(70);
  1154.  
  1155.   switch (iddqd)
  1156.   {
  1157.   case -3: // return 0 pictures
  1158.     strcpy(minRating, "1.0");
  1159.     printf("[%u]No picture is returned in query. Minimal rating is set to %s\r\n", curFileStruct.httpErr, minRating);
  1160.     delayLong(500);
  1161.     goto start;
  1162.   case -4: // return xxxx picture, but empty body.
  1163.     printf("[%u]Empty body is returned. Next picture, please.(%ld)...\r\n", curFileStruct.httpErr, iddqd);
  1164.     delayLong(500);
  1165.     count++;
  1166.     goto start;
  1167.   case -1: // return HTTP error != 200
  1168.     printf("[%u]Error getting pic info. Next picture, please(%ld)...\r\n", curFileStruct.httpErr, iddqd);
  1169.     count++;
  1170.     delayLong(500);
  1171.     goto start;
  1172.   }
  1173.  
  1174.   if (verbose == 1)
  1175.   {
  1176.     idkfa = processJson(atol(curFileStruct.authorIds), 0, 99);
  1177.     if (idkfa < 0)
  1178.     {
  1179.       printf("[%u]Error can't parse authorIds(%s). Next picture, please...\r\n", curFileStruct.httpErr, curFileStruct.authorIds);
  1180.       count++;
  1181.       delayLong(500);
  1182.       goto start;
  1183.     }
  1184.   }
  1185.   if (strcmp(curFileStruct.picType, "standard") != 0)
  1186.   {
  1187.     printf("[%u]Error format '%s' not supported. Next picture, please.\n\r", curFileStruct.httpErr, curFileStruct.picType);
  1188.     delayLong(500);
  1189.     count++;
  1190.     goto start;
  1191.   }
  1192.   sprintf(netbuf, "GET /file/id:%ld%s", iddqd, userAgent);
  1193.   switch (netDriver)
  1194.   {
  1195.   case 0:
  1196.     result = fillPictureNet();
  1197.     break;
  1198.   case 1:
  1199.     result = fillPictureEsp();
  1200.     break;
  1201.   }
  1202.  
  1203.   if (result == -1) // return HTTP error != 200
  1204.   {
  1205.     printf("[%u]Error getting pic. Next picture, please...\r\n", curFileStruct.httpErr);
  1206.     count++;
  1207.     delayLong(500);
  1208.     goto start;
  1209.   }
  1210.  
  1211. review:
  1212.   OS_CLS(0);
  1213.   YIELD();
  1214.   keypress = viewScreen6912((unsigned int)&picture, slideShowTime);
  1215.   emptyKeys();
  1216.  
  1217.   ///// Keys only for pictures
  1218.   if (keypress == 's' || keypress == 'S')
  1219.   {
  1220.     savePic(iddqd);
  1221.     printf("%s saved.", curFileStruct.fileName);
  1222.     delayLong(500);
  1223.     count++;
  1224.   }
  1225.  
  1226.   if (keypress == 248 || keypress == 'b' || keypress == 'B')
  1227.   {
  1228.     if (count > 0)
  1229.     {
  1230.       count--;
  1231.     }
  1232.   }
  1233.   if (keypress == 251 || keypress == 32)
  1234.   {
  1235.     count++;
  1236.     goto start;
  1237.   }
  1238.   if (keypress == 'i' || keypress == 'I')
  1239.   {
  1240.     printData();
  1241.     getchar();
  1242.     goto review;
  1243.   }
  1244.   safeKeys(keypress);
  1245.   goto start;
  1246. }
  1247.