@@ -24,6 +24,23 @@

 #define RECTFILL(r,rx,ry,rw,rh) (r).x=(rx),(r).y=(ry),(r).w=(rw),(r).h=(rh)

+#if SDL_BYTEORDER==SDL_BIG_ENDIAN

+#define CHARRGBA2UINT(rgba) ((((Uint32)(((unsigned char *)rgba)[0]))<<24) \

+                            |(((Uint32)(((unsigned char *)rgba)[1]))<<16) \

+                            |(((Uint32)(((unsigned char *)rgba)[2]))<<8)  \

+                            |((Uint32)(((unsigned char *)rgba)[3])))

+#else

+#define CHARRGBA2UINT(rgba) ((((Uint32)(((unsigned char *)rgba)[3]))<<24) \

+                            |(((Uint32)(((unsigned char *)rgba)[2]))<<16) \

+                            |(((Uint32)(((unsigned char *)rgba)[1]))<<8)  \

+                            |((Uint32)(((unsigned char *)rgba)[0])))

+#endif

+

+

+static int reui_fillrounded(SDL_Surface *dst, int xo, int yo, int w, int h, int r, char *rgba);

+static int reui_triangle(SDL_Surface *dst, int x, int y, int w, int h, char direction, char *rgba);

+

+

 reui_t *

 reui_init()

 {

@@ -223,4 +240,239 @@ reui_printf(reui_t *ui, int x, int y, char *rgba, char *format, ...)

         return(0);

 }

+int

+reui_balloon(reui_t *ui, char direction, int x, int y, char *rgbafg, char *rgbabg, char *str, int nchar)

+{

+        char buf[1024];

+        SDL_Surface *bgsurface;

+        SDL_Surface *fgsurface;

+        SDL_Texture *tex;

+        SDL_Color c={((unsigned char *)rgbafg)[0],

+                     ((unsigned char *)rgbafg)[1],

+                     ((unsigned char *)rgbafg)[2],

+                     ((unsigned char *)rgbafg)[3]};

+        SDL_Rect dstrect;

+        Uint32 rmask, gmask, bmask, amask;

+        int trianglew,triangleh;

+        int marginw,marginh;

+        int marginoffx,marginoffy;

+        int radius;

+        int offx,offy;

+        if(ui==NULL || rgbafg==NULL || rgbabg==NULL || (str==NULL && nchar!=0))

+                return(-1);

+#if SDL_BYTEORDER==SDL_BIG_ENDIAN

+        rmask=0xff000000;

+        gmask=0x00ff0000;

+        bmask=0x0000ff00;

+        amask=0x000000ff;

+#else

+        rmask=0x000000ff;

+        gmask=0x0000ff00;

+        bmask=0x00ff0000;

+        amask=0xff000000;

+#endif

+        if(nchar<sizeof(buf)) {

+                memcpy(buf,str,nchar);

+                buf[nchar]='\0';

+        } else {

+                memcpy(buf,str,sizeof(buf)-1);

+                buf[sizeof(buf)-1]='\0';

+        }

+        if((fgsurface=TTF_RenderUTF8_Blended(ui->font,buf,c))==NULL)

+                return(-1);

+        trianglew=ui->fontwidth;

+        triangleh=ui->fontheight/2;

+        marginw=ui->fontwidth*4/3;

+        marginh=ui->fontheight/3;

+        marginoffx=0;

+        marginoffy=-ui->fontheight/18;

+        radius=ui->fontheight/2;

+        if((bgsurface=SDL_CreateRGBSurface(0

+          ,(fgsurface->w+marginw*2)+((direction=='w' || direction=='e')?trianglew:0)

+          ,(fgsurface->h+marginh*2)+((direction=='n' || direction=='s')?triangleh:0)

+          ,32, rmask, gmask, bmask, amask))==NULL) {

+                if(fgsurface!=NULL)

+                        SDL_FreeSurface(fgsurface),fgsurface=NULL;

+                return(-1);

+        }

+        if(direction=='n') {

+                reui_fillrounded(bgsurface,0,triangleh-1,bgsurface->w,bgsurface->h-triangleh,radius,rgbabg);

+                reui_triangle(bgsurface,(bgsurface->w-trianglew)/2,0,trianglew,triangleh,direction,rgbabg);

+                RECTFILL(dstrect,marginw+marginoffx,triangleh+marginh+marginoffy,fgsurface->w,fgsurface->h);

+                SDL_BlitSurface(fgsurface,NULL,bgsurface,&dstrect);

+                offx=-bgsurface->w/2;

+                offy=0;

+        } else if(direction=='e') {

+                reui_fillrounded(bgsurface,0,0,bgsurface->w-trianglew,bgsurface->h,radius,rgbabg);

+                reui_triangle(bgsurface,bgsurface->w-trianglew,(bgsurface->h-triangleh)/2,trianglew,triangleh,direction,rgbabg);

+                RECTFILL(dstrect,marginw+marginoffx,marginh+marginoffy,fgsurface->w,fgsurface->h);

+                SDL_BlitSurface(fgsurface,NULL,bgsurface,&dstrect);

+                offx=-bgsurface->w;

+                offy=-bgsurface->h/2;

+        } else if(direction=='s') {

+                reui_fillrounded(bgsurface,0,0,bgsurface->w,bgsurface->h-triangleh,radius,rgbabg);

+                reui_triangle(bgsurface,(bgsurface->w-trianglew)/2,bgsurface->h-triangleh,trianglew,triangleh,direction,rgbabg);

+                RECTFILL(dstrect,marginw+marginoffx,marginh+marginoffy,fgsurface->w,fgsurface->h);

+                SDL_BlitSurface(fgsurface,NULL,bgsurface,&dstrect);

+                offx=-bgsurface->w/2;

+                offy=-bgsurface->h;

+        } else if(direction=='w') {

+                reui_fillrounded(bgsurface,trianglew,0,bgsurface->w-trianglew,bgsurface->h,radius,rgbabg);

+                reui_triangle(bgsurface,0,(bgsurface->h-triangleh)/2,trianglew,triangleh,direction,rgbabg);

+                RECTFILL(dstrect,trianglew+marginw+marginoffx,marginh+marginoffy,fgsurface->w,fgsurface->h);

+                SDL_BlitSurface(fgsurface,NULL,bgsurface,&dstrect);

+                offx=0;

+                offy=-bgsurface->h/2;

+        } else { /* default: center */

+                reui_fillrounded(bgsurface,0,0,bgsurface->w,bgsurface->h,radius,rgbabg);

+                RECTFILL(dstrect,marginw+marginoffx,marginh+marginoffy,fgsurface->w,fgsurface->h);

+                SDL_BlitSurface(fgsurface,NULL,bgsurface,&dstrect);

+                offx=-bgsurface->w/2;

+                offy=-bgsurface->h/2;

+        }

+        if((tex=SDL_CreateTextureFromSurface(ui->renderer,bgsurface))==NULL) {

+                SDL_FreeSurface(fgsurface),fgsurface=NULL;

+                SDL_FreeSurface(bgsurface),bgsurface=NULL;

+                return(-1);

+        }

+        RECTFILL(dstrect,x+offx,y+offy,bgsurface->w,bgsurface->h);

+        SDL_RenderCopy(ui->renderer,tex,NULL,&dstrect);

+        ui->rendererdirty=1;

+        SDL_FreeSurface(fgsurface),fgsurface=NULL;

+        SDL_FreeSurface(bgsurface),bgsurface=NULL;

+        SDL_DestroyTexture(tex),tex=NULL;

+        return(0);

+

+}

+

+

+

+/*

+ * https://sdl.libsdl.narkive.com/rX3aNgKp/rectangle-with-round-corners-in-sdl

+ *

+ * static int fill_rounded_box_b(SDL_Surface* dst, int xo, int yo,

+ *                               int w, int h, int r, Uint32 color);

+ *

+ * by "Sami N��t�nen" (s***@bayminer.com)

+ * (lightly edited to conform to this file code style and semantics)

+ *

+ * draws a rounded box with...

+ *   corner radius of 'r'

+ *   width of 'w'

+ *   and height of 'h'

+ *

+ * draws the box right and down of...

+ *   x-offset xo

+ *   y-offset yo

+ *

+ * returns -1 if 2*r is bigger than w or h

+ *           and draws nothing

+ * returns 0 on success

+ */

+static int

+reui_fillrounded(SDL_Surface *dst, int xo, int yo, int w, int h, int r, char *rgba)

+{

+        int yd=(dst->pitch)/(dst->format->BytesPerPixel);

+        Uint32 *pixels=NULL;

+        int x,y,i,j;

+        int rpsqrt2= (int) (r/sqrt(2));

+        int sy,ey,sx,ex;

+        int d,x2m1;

+        Uint32 color;

+        if(dst==NULL || rgba==NULL || xo<0 || y0<0 || (xo+w)>dst->w || (yo+h)>dst->h)

+                return(-1); /* sanity check failed */

+        color=CHARRGBA2UINT(rgba);

+        w/=2;

+        h/=2;

+        xo+=w;

+        yo+=h;

+        w-=r;

+        h-=r;

+        if(w<0||h<0)

+                return(-1);

+        SDL_LockSurface(dst);

+        pixels=(Uint32*)(dst->pixels);

+        sy=(yo-h)*yd;

+        ey=(yo+h)*yd;

+        sx=(xo-w);

+        ex=(xo+w);

+        for(i=sy;i<=ey;i+=yd) {

+                for(j=sx-r;j<=ex+r;j++) {

+                        pixels[i+j]=color;

+                }

+        }

+        d=-r;

+        x2m1=-1;

+        y=r;

+        for(x=0;x<=rpsqrt2;x++) {

+                x2m1+=2;

+                d+=x2m1;

+                if(d>=0) {

+                        y--;

+                        d-=(y*2);

+                }

+                for(i=sx-x;i<=ex+x;i++)

+                        pixels[sy-y*yd+i]=color;

+

+                for(i=sx-y;i<=ex+y;i++)

+                        pixels[sy-x*yd+i]=color;

+

+                for(i=sx-y;i<=ex+y;i++)

+                        pixels[ey+x*yd+i]=color;

+

+                for(i=sx-x;i<=ex+x;i++)

+                        pixels[ey+y*yd+i]=color;

+        }

+        SDL_UnlockSurface(dst);

+        return(0);

+}

+

+/* end of external code */

+

+static int

+reui_triangle(SDL_Surface *dst, int x, int y, int w, int h, char direction, char *rgba)

+{

+        Uint32 color;

+        SDL_Rect dstrect;

+        int i;

+        int myw,myh;

+        if(dst==NULL || rgba==NULL)

+                return(-1);

+        color=CHARRGBA2UINT(rgba);

+        SDL_LockSurface(dst);

+        if(direction=='n') {

+                for(i=0;i<h;i++) {

+                        myw=(i*w*2)/(3*h);

+                        myw=(myw<0)?1:(myw>w)?w:myw;

+                        RECTFILL(dstrect,x+(w-myw)/2,y+i,myw,1);

+                        SDL_FillRect(dst,&dstrect,color);

+                }

+        } else if(direction=='e') {

+                for(i=0;i<w;i++) {

+                        myh=(i*h*2)/(3*w);

+                        myh=(myh<0)?1:(myh>h)?h:myh;

+                        RECTFILL(dstrect,x+w-1-i,y+(h-myh)/2,1,myh);

+                        SDL_FillRect(dst,&dstrect,color);

+                }

+        } else if(direction=='s') {

+                for(i=0;i<h;i++) {

+                        myw=(i*w*2)/(3*h);

+                        myw=(myw<0)?1:(myw>w)?w:myw;

+                        RECTFILL(dstrect,x+(w-myw)/2,y+h-1-i,myw,1);

+                        SDL_FillRect(dst,&dstrect,color);

+                }

+        } else if(direction=='w') {

+                for(i=0;i<w;i++) {

+                        myh=(i*h*2)/(3*w);

+                        myh=(myh<0)?1:(myh>h)?h:myh;

+                        RECTFILL(dstrect,x+i,y+(h-myh)/2,1,myh);

+                        SDL_FillRect(dst,&dstrect,color);

+                }

+        } else { /* default: center */

+                RECTFILL(dstrect,x,y,w,h);

+                SDL_FillRect(dst,&dstrect,color);

+        }

+        SDL_UnlockSurface(dst);

+        return(0);

+}

@@ -48,3 +48,5 @@ int reui_printf(reui_t *ui, int x, int y, char *rgba, char *format, ...) __attri

 int reui_printf(reui_t *ui, int x, int y, char *rgba, char *format, ...);

 #endif

+int reui_balloon(reui_t *ui, char direction, int x, int y, char *rgbafg, char *rgbabg, char *str, int nchar);

+

@@ -1040,6 +1040,7 @@ re_drawcontents(re_t *re)

                                         reui_write(re->ui,re->x+re->ui->fontwidth*(re->curcol-re->origincol),y,"\xff\xff\xff\xff",curptr,redata_generic_utf8charlen(curptr,curptrlen));

                                 }

 #warning TODO: if it is one of  '[','{','<','>','}',']', highlight the matching bracket/parens/anglebracket.

+#warning When searching for matching backet/..., count only the ones in the same highlighting color.

 #warning If it is ourside of the visible part of the code, put a comic baloon (with some transparency) in that dir. (up, down or right) at the correct height/position to mark the direction of where it is.

 #warning TODO: Select(control+k+b/control+k+k/...)

                         }

@@ -1053,6 +1054,20 @@ re_drawcontents(re_t *re)

         }

         re->contentsdirty=0;

         re->ui->rendererdirty=1;

+#if 1

+{

+char sampletext[]={"Here is the top"};

+char sampletextlarge[]={"void *memcpy(void *dest, const void *src, size_t n)"};

+reui_balloon(re->ui, 'n', re->x+re->w/2, re->y, "\xff\x00\x00\xff", "\x00\x00\xff\x80",sampletext,strlen(sampletext));

+reui_balloon(re->ui, 's', re->x+re->w/2, re->y+re->h-1, "\xff\x00\x00\x80", "\xff\xff\xff\xaf", "}",1);

+reui_balloon(re->ui, 'e', re->x+re->w-1,re->y+re->h/2, "\xff\x00\x00\x80", "\xff\xff\xff\xaf", "[",1);

+reui_balloon(re->ui, 'w', re->x, re->y+re->h/2, "\xff\x00\x00\x80", "\xff\xff\xff\xaf", "]",1);

+if((re->curline-re->originline)>=(re->maxrow/2))

+        reui_balloon(re->ui, '\0', re->x+re->w/2, re->y+re->ui->fontheight*3/2, "\x80\x80\x80\xff", "\xff\xff\xff\xcf",sampletextlarge,strlen(sampletextlarge));

+else

+        reui_balloon(re->ui, '\0', re->x+re->w/2, re->y+re->h-re->ui->fontheight*3/2, "\x80\x80\x80\xff", "\xff\xff\xff\xcf",sampletextlarge,strlen(sampletextlarge));

+}

+#endif

         return(0);

 }