src/javacodegen.c

Tue, 23 Aug 2016 15:28:56 +0200

author
Mike Becker <universe@uap-core.de>
date
Tue, 23 Aug 2016 15:28:56 +0200
changeset 45
1f3835182aeb
parent 39
ac35daceb24c
child 46
534a4ef4143d
permissions
-rw-r--r--

changes signature of parser functions to use a UcxBuffer - the functions itself don't use the API yet

     1 /*
     2  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
     3  *
     4  * Copyright 2016 Mike Becker. All rights reserved.
     5  *
     6  * Redistribution and use in source and binary forms, with or without
     7  * modification, are permitted provided that the following conditions are met:
     8  *
     9  *   1. Redistributions of source code must retain the above copyright
    10  *      notice, this list of conditions and the following disclaimer.
    11  *
    12  *   2. Redistributions in binary form must reproduce the above copyright
    13  *      notice, this list of conditions and the following disclaimer in the
    14  *      documentation and/or other materials provided with the distribution.
    15  *
    16  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
    17  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
    18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
    19  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
    20  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
    21  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
    22  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
    23  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
    24  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
    25  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
    26  * POSSIBILITY OF SUCH DAMAGE.
    27  *
    28  */
    30 #include "javacodegen.h"
    31 #include <string.h>
    32 #include <ctype.h>
    34 const char* jkeywords[] = {
    35     "abstract", "continue", "for", "new", "switch", "assert", "default", "goto",
    36     "package", "synchronized", "boolean", "do", "if", "private", "this",
    37     "break", "double", "implements", "protected", "throw", "byte", "else",
    38     "import", "public", "throws", "case", "enum", "instanceof", "return",
    39     "transient", "catch", "extends", "int", "short", "try", "char", "final",
    40     "interface", "static", "void", "class", "finally", "long", "strictfp",
    41     "volatile", "const", "float", "native", "super", "while", NULL
    42 };
    44 int check_jtype(char *word, size_t len) {
    45     return isupper(word[0]);
    46 }
    48 int check_jdirective(char *word) {
    49     return word[0] == '@';
    50 }
    52 #define memcpy_const(darr,doff,str) memcpy(&(darr[doff]), str, sizeof(str)-1); \
    53                                     dp += sizeof(str)-1
    55 void jparseline(char *src, UcxBuffer *destbuf, highlighter_t *hltr) {
    56     /* TODO: workaround for using old code with UcxBuffer */
    57     char *dest = destbuf->space + destbuf->pos;
    59     memset(hltr->word, 0, WORDBUF_SIZE);
    60     size_t wp = 0, sp = (size_t)-1, dp = 0;
    61     int isstring = 0, iscomment = 0, isimport = 0;
    62     char quote = '\0';
    63     int isescaping = 0;
    65     if (hltr->iscommentml) {
    66         iscomment = 1;
    67         memcpy_const(dest, dp, "<span class=\"c2html-comment\">");
    68     }
    70     char c;
    71     do {
    72         c = src[++sp];
    73         if (!c) break;
    75         /* comments */
    76         if (!isstring && c == '/') {
    77             if (hltr->iscommentml && sp > 0 && src[sp-1] == '*') {
    78                 iscomment = 0;
    79                 hltr->iscommentml = 0;
    80                 memcpy_const(dest, dp, "/</span>");
    81                 continue;
    82             } else if (!iscomment && (src[sp+1] == '/' || src[sp+1] == '*')) {
    83                 iscomment = 1;
    84                 hltr->iscommentml = (src[sp+1] == '*');
    85                 memcpy_const(dest, dp, "<span class=\"c2html-comment\">");
    86             }
    87         }
    89         if (iscomment) {
    90             if (c == '\n') {
    91                 memcpy(&(dest[dp]), "</span>", 7);
    92                 dp += 7;
    93             }
    94             dp = writeescapedchar(dest, dp, c);
    95         } else if (isimport) {
    96             // TODO: local imports
    97         } else {
    98             /* strings */
    99             if (!isescaping && (c == '\'' || c == '\"')) {
   100                 if (isstring) {
   101                     dp = writeescapedchar(dest, dp, c);
   102                     if (c == quote) {
   103                         isstring = 0;
   104                         memcpy_const(dest, dp, "</span>");
   105                     } else {
   106                         dp = writeescapedchar(dest, dp, c);
   107                     }
   108                 } else {
   109                     isstring = 1;
   110                     quote = c;
   111                     memcpy_const(dest, dp,
   112                         "<span class=\"c2html-string\">");
   113                     dp = writeescapedchar(dest, dp, c);
   114                 }
   115             } else {
   116                 if (isstring) {
   117                     dp = writeescapedchar(dest, dp, c);
   118                 } else if (!iswordcharacter(c)) {
   119                     /* interpret word int_t */
   120                     if (wp > 0 && wp < WORDBUF_SIZE) {
   121                         int closespan = 1;
   122                         if (check_keyword(hltr->word, hltr->keywords)) {
   123                             memcpy_const(dest, dp, 
   124                                 "<span class=\"c2html-keyword\">");
   125                         } else if (hltr->istype(hltr->word, wp)) {
   126                             memcpy_const(dest, dp, 
   127                                 "<span class=\"c2html-type\">");
   128                         } else if (hltr->isdirective(hltr->word)) {
   129                             memcpy_const(dest, dp, 
   130                                 "<span class=\"c2html-directive\">");
   131                         } else if (check_capsonly(hltr->word, wp)) {
   132                             memcpy_const(dest, dp, 
   133                                 "<span class=\"c2html-macroconst\">");
   134                         } else {
   135                             closespan = 0;
   136                         }
   137                         for (int i = 0 ; i < wp ; i++) {
   138                             dp = writeescapedchar(dest, dp, hltr->word[i]);
   139                         }
   140                         if (closespan) {
   141                             memcpy_const(dest, dp, "</span>");
   142                         }
   143                     }
   144                     memset(hltr->word, 0, WORDBUF_SIZE);
   145                     wp = 0;
   146                     dp = writeescapedchar(dest, dp, c);
   147                 } else {
   148                     /* read word */
   149                     if (wp < WORDBUF_SIZE) {
   150                         hltr->word[wp++] = c;
   151                     } else if (wp == WORDBUF_SIZE) {
   152                         for (int i = 0 ; i < WORDBUF_SIZE ; i++) {
   153                             dp = writeescapedchar(dest, dp, hltr->word[i]);
   154                         }
   155                         wp++;
   156                         dp = writeescapedchar(dest, dp, c);
   157                     } else {
   158                         dp = writeescapedchar(dest, dp, c);
   159                     }
   160                 }
   161             }
   163             isescaping = !isescaping & (c == '\\');
   164         }
   165     } while (c != '\n');
   166     dest[dp] = 0;
   168     /* TODO: workaround */
   169     destbuf->pos += dp;
   170     destbuf->size += dp;
   171 }

mercurial