src/lib/elm_cnp_helper.c

   1 #ifdef HAVE_CONFIG_H
   2 # include "elementary_config.h"
   3 #endif
   4 #include <Elementary.h>
   5 #include "elm_priv.h"
   6
   7 #include <sys/mman.h>
   8
   9 #ifdef HAVE_ELEMENTARY_X
  10
  11 #define ARRAYINIT(foo)  [foo] =
  12
  13 //#define DEBUGON 1
  14
  15 #ifdef DEBUGON
  16 # define cnp_debug(x...) fprintf(stderr, __FILE__": " x)
  17 #else
  18 # define cnp_debug(x...)
  19 #endif
  20
  21 #define PROVIDER_SET "__elm_cnp_provider_set"
  22
  23 typedef struct _Paste_Image   Paste_Image;
  24 typedef struct _Cnp_Selection Cnp_Selection;
  25 typedef struct _Escape        Escape;
  26 typedef struct _Tmp_Info      Tmp_Info;
  27 typedef struct _Cnp_Atom      Cnp_Atom;
  28 typedef struct _Saved_Type    Saved_Type;
  29 typedef struct _Dropable      Dropable;
  30
  31 typedef Eina_Bool (*Converter_Fn_Cb)     (char *target, void *data, int size, void **data_ret, int *size_ret, Ecore_X_Atom *ttype, int *typesize);
  32 typedef int       (*Response_Handler_Cb) (Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *);
  33 typedef int       (*Notify_Handler_Cb)   (Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *);
  34
  35 enum
  36 {
  37    CNP_ATOM_TARGETS = 0,
  38    CNP_ATOM_text_uri,
  39    CNP_ATOM_text_urilist,
  40    CNP_ATOM_text_x_vcard,
  41    CNP_ATOM_image_png,
  42    CNP_ATOM_image_jpeg,
  43    CNP_ATOM_image_bmp,
  44    CNP_ATOM_image_gif,
  45    CNP_ATOM_image_tiff,
  46    CNP_ATOM_image_svg,
  47    CNP_ATOM_image_xpm,
  48    CNP_ATOM_image_tga,
  49    CNP_ATOM_image_ppm,
  50    CNP_ATOM_XELM,
  51    CNP_ATOM_text_html_utf8,
  52    CNP_ATOM_text_html,
  53    CNP_ATOM_UTF8STRING,
  54    CNP_ATOM_STRING,
  55    CNP_ATOM_TEXT,
  56    CNP_ATOM_text_plain_utf8,
  57    CNP_ATOM_text_plain,
  58
  59    CNP_N_ATOMS,
  60 };
  61
  62 struct _Paste_Image
  63 {
  64    Evas_Object *entry;
  65    const char  *tag;
  66    const char  *file;
  67    Evas_Object *img;
  68 };
  69
  70 struct _Cnp_Selection
  71 {
  72    const char      *debug;
  73    Evas_Object     *widget;
  74    char            *selbuf;
  75    Evas_Object     *requestwidget;
  76    void            *udata;
  77    Elm_Sel_Format   requestformat;
  78    Elm_Drop_Cb      datacb;
  79    Eina_Bool      (*set)     (Ecore_X_Window, const void *data, int size);
  80    Eina_Bool      (*clear)   (void);
  81    void           (*request) (Ecore_X_Window, const char *target);
  82
  83    Elm_Sel_Format    format;
  84    Ecore_X_Selection ecore_sel;
  85
  86    Eina_Bool         active : 1;
  87 };
  88
  89 struct _Escape
  90 {
  91    const char *escape;
  92    const char  value;
  93 };
  94
  95 struct _Tmp_Info
  96 {
  97    char *filename;
  98    void *map;
  99    int   fd;
 100    int   len;
 101 };
 102
 103 struct _Cnp_Atom
 104 {
 105    const char          *name;
 106    Elm_Sel_Format       formats;
 107    /* Called by ecore to do conversion */
 108    Converter_Fn_Cb      converter;
 109    Response_Handler_Cb  response;
 110    Notify_Handler_Cb    notify;
 111    /* Atom */
 112    Ecore_X_Atom         atom;
 113 };
 114
 115 struct _Saved_Type
 116 {
 117    const char  **types;
 118    Paste_Image  *pi;
 119    int           ntypes;
 120    int           x, y;
 121    Eina_Bool     textreq: 1;
 122 };
 123
 124 struct _Dropable
 125 {
 126    Evas_Object     *obj;
 127    /* FIXME: Cache window */
 128    Elm_Sel_Format   types;
 129    Elm_Drop_Cb      dropcb;
 130    void            *cbdata;
 131 };
 132
 133 static Tmp_Info *elm_cnp_tempfile_create(int size);
 134 static int tmpinfo_free(Tmp_Info *tmp);
 135
 136 static Eina_Bool _elm_cnp_init(void);
 137 static Eina_Bool selection_clear(void *udata __UNUSED__, int type, void *event);
 138 static Eina_Bool selection_notify(void *udata __UNUSED__, int type, void *event);
 139 static char *remove_tags(const char *p, int *len);
 140 static char *mark_up(const char *start, int inlen, int *lenp);
 141
 142 static Evas_Object *image_provider(void *images, Evas_Object *entry, const char *item);
 143 static void entry_deleted(void *images, Evas *e, Evas_Object *entry, void *unused);
 144
 145 static Eina_Bool targets_converter(char *target, void *data, int size, void **data_ret, int *size_ret, Ecore_X_Atom *ttype, int *typesize);
 146 static Eina_Bool text_converter(char *target, void *data, int size, void **data_ret, int *size_ret, Ecore_X_Atom *ttype, int *typesize);
 147 static Eina_Bool html_converter(char *target, void *data, int size, void **data_ret, int *size_ret, Ecore_X_Atom *ttype, int *typesize);
 148 static Eina_Bool edje_converter(char *target, void *data, int size, void **data_ret, int *size_ret, Ecore_X_Atom *ttype, int *typesize);
 149 static Eina_Bool uri_converter(char *target, void *data, int size, void **data_ret, int *size_ret, Ecore_X_Atom *ttype, int *typesize);
 150 static Eina_Bool image_converter(char *target, void *data, int size, void **data_ret, int *size_ret, Ecore_X_Atom *ttype, int *typesize);
 151 static Eina_Bool vcard_send(char *target, void *data, int size, void **data_ret, int *size_ret, Ecore_X_Atom *ttype, int *typesize);
 152
 153 static int response_handler_targets(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *);
 154
 155 static int notify_handler_targets(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify);
 156 static int notify_handler_text(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify);
 157 static int notify_handler_image(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify);
 158 static int notify_handler_uri(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify);
 159 static int notify_handler_edje(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify);
 160 static int notify_handler_html(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify);
 161 static int vcard_receive(Cnp_Selection *sed, Ecore_X_Event_Selection_Notify *notify);
 162
 163 static Paste_Image *pasteimage_alloc(const char *file, int pathlen);
 164 static Eina_Bool pasteimage_append(Paste_Image *pi, Evas_Object *entry);
 165 static void pasteimage_free(Paste_Image *pi);
 166 static void entry_insert_filter(Evas_Object* entry, char* str);
 167
 168 /* Optimisation: Turn this into a 256 byte table:
 169  *      then can lookup in one index, not N checks */
 170 static const Escape escapes[] = {
 171        { "<br>",   '\n' },
 172        { "<ps>",   '\n' },
 173        { "<\t>",   '\t' },
 174        { "gt;",    '>'  },
 175        { "lt;",    '<'  },
 176        { "amp;",   '&'  },
 177        { "quot;",  '\'' },
 178        { "dquot;", '"'  }
 179 };
 180 #define N_ESCAPES ((int)(sizeof(escapes) / sizeof(escapes[0])))
 181
 182 static Cnp_Atom atoms[CNP_N_ATOMS] = {
 183      [CNP_ATOM_TARGETS] = {
 184           "TARGETS",
 185           (Elm_Sel_Format) -1, // everything
 186           targets_converter,
 187           response_handler_targets,
 188           notify_handler_targets,
 189           0
 190      },
 191      [CNP_ATOM_XELM] =  {
 192           "application/x-elementary-markup",
 193           ELM_SEL_FORMAT_MARKUP | ELM_SEL_FORMAT_HTML,
 194           edje_converter,
 195           NULL,
 196           notify_handler_edje,
 197           0
 198      },
 199      [CNP_ATOM_text_uri] = {
 200           "text/uri",
 201           ELM_SEL_FORMAT_MARKUP | ELM_SEL_FORMAT_IMAGE, /* Either images or entries */
 202           uri_converter,
 203           NULL,
 204           notify_handler_uri,
 205           0
 206      },
 207      [CNP_ATOM_text_urilist] = {
 208           "text/uri-list",
 209           ELM_SEL_FORMAT_IMAGE,
 210           uri_converter,
 211           NULL,
 212           notify_handler_uri,
 213           0
 214      },
 215      [CNP_ATOM_text_x_vcard] = {
 216           "text/x-vcard",
 217           ELM_SEL_FORMAT_VCARD,
 218           vcard_send, NULL,
 219           vcard_receive, 0
 220      },
 221      [CNP_ATOM_image_png] = {
 222           "image/png",
 223           ELM_SEL_FORMAT_IMAGE,
 224           image_converter,
 225           NULL,
 226           notify_handler_image,
 227           0
 228      },
 229      [CNP_ATOM_image_jpeg] = {
 230           "image/jpeg",
 231           ELM_SEL_FORMAT_IMAGE,
 232           image_converter,
 233           NULL,
 234           notify_handler_image,/* Raw image data is the same */
 235           0
 236      },
 237      [CNP_ATOM_image_bmp] = {
 238           "image/x-ms-bmp",
 239           ELM_SEL_FORMAT_IMAGE,
 240           image_converter,
 241           NULL,
 242           notify_handler_image,/* Raw image data is the same */
 243           0
 244      },
 245      [CNP_ATOM_image_gif] = {
 246           "image/gif",
 247           ELM_SEL_FORMAT_IMAGE,
 248           image_converter,
 249           NULL,
 250           notify_handler_image,/* Raw image data is the same */
 251           0
 252      },
 253      [CNP_ATOM_image_tiff] = {
 254           "image/tiff",
 255           ELM_SEL_FORMAT_IMAGE,
 256           image_converter,
 257           NULL,
 258           notify_handler_image,/* Raw image data is the same */
 259           0
 260      },
 261      [CNP_ATOM_image_svg] = {
 262           "image/svg+xml",
 263           ELM_SEL_FORMAT_IMAGE,
 264           image_converter,
 265           NULL,
 266           notify_handler_image,/* Raw image data is the same */
 267           0
 268      },
 269      [CNP_ATOM_image_xpm] = {
 270           "image/x-xpixmap",
 271           ELM_SEL_FORMAT_IMAGE,
 272           image_converter,
 273           NULL,
 274           notify_handler_image,/* Raw image data is the same */
 275           0
 276      },
 277      [CNP_ATOM_image_tga] = {
 278           "image/x-tga",
 279           ELM_SEL_FORMAT_IMAGE,
 280           image_converter,
 281           NULL,
 282           notify_handler_image,/* Raw image data is the same */
 283           0
 284      },
 285      [CNP_ATOM_image_ppm] = {
 286           "image/x-portable-pixmap",
 287           ELM_SEL_FORMAT_IMAGE,
 288           image_converter,
 289           NULL,
 290           notify_handler_image,/* Raw image data is the same */
 291           0
 292      },
 293      [CNP_ATOM_text_html_utf8] = {
 294           "text/html;charset=utf-8",
 295           ELM_SEL_FORMAT_HTML,
 296           html_converter,
 297           NULL,
 298           notify_handler_html,
 299           0
 300      },
 301      [CNP_ATOM_text_html] = {
 302           "text/html",
 303           ELM_SEL_FORMAT_HTML,
 304           html_converter,
 305           NULL,
 306           notify_handler_html, /* No encoding: Webkit only */
 307           0
 308      },
 309      [CNP_ATOM_UTF8STRING] = {
 310           "UTF8_STRING",
 311           ELM_SEL_FORMAT_TEXT | ELM_SEL_FORMAT_MARKUP | ELM_SEL_FORMAT_HTML,
 312           text_converter,
 313           NULL,
 314           notify_handler_text,
 315           0
 316      },
 317      [CNP_ATOM_STRING] = {
 318           "STRING",
 319           ELM_SEL_FORMAT_TEXT | ELM_SEL_FORMAT_MARKUP | ELM_SEL_FORMAT_HTML,
 320           text_converter,
 321           NULL,
 322           notify_handler_text,
 323           0
 324      },
 325      [CNP_ATOM_TEXT] = {
 326           "TEXT",
 327           ELM_SEL_FORMAT_TEXT | ELM_SEL_FORMAT_MARKUP | ELM_SEL_FORMAT_HTML,
 328           text_converter,
 329           NULL,
 330           NULL,
 331           0
 332      },
 333      [CNP_ATOM_text_plain_utf8] = {
 334           "text/plain;charset=utf-8",
 335           ELM_SEL_FORMAT_TEXT | ELM_SEL_FORMAT_MARKUP | ELM_SEL_FORMAT_HTML,
 336           text_converter,
 337           NULL,
 338           NULL,
 339           0
 340      },
 341      [CNP_ATOM_text_plain] = {
 342           "text/plain",
 343           ELM_SEL_FORMAT_TEXT | ELM_SEL_FORMAT_MARKUP | ELM_SEL_FORMAT_HTML,
 344           text_converter,
 345           NULL,
 346           NULL,
 347           0
 348      },
 349 };
 350
 351 static Cnp_Selection selections[ELM_SEL_MAX] = {
 352      ARRAYINIT(ELM_SEL_PRIMARY) {
 353           .debug = "Primary",
 354           .ecore_sel = ECORE_X_SELECTION_PRIMARY,
 355           .set = ecore_x_selection_primary_set,
 356           .clear = ecore_x_selection_primary_clear,
 357           .request = ecore_x_selection_primary_request,
 358      },
 359      ARRAYINIT(ELM_SEL_SECONDARY) {
 360           .debug = "Secondary",
 361           .ecore_sel = ECORE_X_SELECTION_SECONDARY,
 362           .set = ecore_x_selection_secondary_set,
 363           .clear = ecore_x_selection_secondary_clear,
 364           .request = ecore_x_selection_secondary_request,
 365      },
 366      ARRAYINIT(ELM_SEL_CLIPBOARD) {
 367           .debug = "Clipboard",
 368           .ecore_sel = ECORE_X_SELECTION_CLIPBOARD,
 369           .set = ecore_x_selection_clipboard_set,
 370           .clear = ecore_x_selection_clipboard_clear,
 371           .request = ecore_x_selection_clipboard_request,
 372      },
 373      ARRAYINIT(ELM_SEL_XDND) {
 374           .debug = "XDnD",
 375           .ecore_sel = ECORE_X_SELECTION_XDND,
 376           .request = ecore_x_selection_xdnd_request,
 377      },
 378 };
 379
 380 /* Data for DND in progress */
 381 static Saved_Type savedtypes =  { NULL, NULL, 0, 0, 0, EINA_FALSE };
 382
 383 static void (*dragdonecb) (void *data, Evas_Object *obj) = NULL;
 384 static void *dragdonedata = NULL;
 385
 386 static int _elm_cnp_init_count = 0;
 387 /* FIXME: who left this out of XAtoms.h */
 388 static Ecore_X_Atom clipboard_atom;
 389
 390 static Eina_List *pastedimages = NULL;
 391
 392 /**
 393  * Drag & Drop functions
 394  */
 395
 396 /* FIXME: Way too many globals */
 397 static Eina_List *drops = NULL;
 398 static Evas_Object *dragwin = NULL;
 399 static int _dragx = 0, _dragy = 0;
 400 static Ecore_Event_Handler *handler_pos = NULL;
 401 static Ecore_Event_Handler *handler_drop = NULL;
 402 static Ecore_Event_Handler *handler_enter = NULL;
 403 static Ecore_Event_Handler *handler_status = NULL;
 404
 405 #endif
 406
 407 /* Stringshared, so I can just compare pointers later */
 408 static const char *text_uri;
 409
 410 /* For convert EFL to HTML */
 411
 412 #define TAGPOS_START    0x00000001
 413 #define TAGPOS_END      0x00000002
 414 #define TAGPOS_ALONE    0x00000003
 415
 416 /* TEXTBLOCK tag using stack but close tag word has no mean maybe bug...
 417  * TEXTBLOCK <b>bold<font>font</b>bold</font>
 418  * HTML <b>bold<font>font bold</b>font</font> */
 419
 420 typedef struct _TagTable {
 421      char *src;
 422      char *dst;
 423      char tagType;
 424 }TagTable;
 425
 426 TagTable _EFLtoHTMLConvertTable[] = {
 427        {"font", "font", 0},
 428        {"underline", "del", 0},
 429        {"strikethrough", "ins", 0},
 430        {"br", "br", 1},
 431        {"ps", "br", 1},
 432        {"b", "b", 1},
 433        {"item", "img", 1}
 434 };
 435
 436 TagTable _HTMLtoEFLConvertTable[] = {
 437        {"font", "", 0},
 438        {"del", "underline", 0},
 439        {"u", "underline", 0},
 440        {"ins", "strikethrough", 0},
 441        {"s", "strikethrough", 0},
 442        {"br", "br", 1},
 443        {"b", "b", 1},
 444        {"strong", "b", 1},
 445        {"img", "item", 1}
 446 };
 447
 448
 449 typedef struct _TagNode TagNode, *PTagNode;
 450 struct _TagNode {
 451      char *tag;  //EINA_STRINGSHARE if NULL just str
 452      char *tag_str;
 453      char *str;
 454      char *pos_in_ori_str;
 455      PTagNode matchTag;
 456      void *tagData;
 457      unsigned char tagPosType;
 458 };
 459
 460 typedef struct _FontTagData FontTagData, *PFontTagData;
 461 struct _FontTagData {
 462      char *name;
 463      char *color;
 464      char *size;
 465      char *bg_color;
 466 };
 467
 468
 469 typedef struct _ItemTagData ItemTagData, *PItemTagData;
 470 struct _ItemTagData {
 471      char *href;
 472      char *width;
 473      char *height;
 474 };
 475
 476 #define SAFEFREE(ptr) \
 477    do\
 478 {\
 479    if (ptr)\
 480    free(ptr);\
 481    ptr = NULL;\
 482 } while(0);\
 483
 484 #define freeAndAssign(dst, value) \
 485    do\
 486 {\
 487    if (value)\
 488      {\
 489         SAFEFREE(dst);\
 490         dst = value;\
 491      }\
 492 } while(0);
 493
 494
 495 static PTagNode _new_tag_node(char *tag, char *tag_str, char* str, char *pos_in_ori_str);
 496 static PTagNode _get_start_node(char *str);
 497 static PTagNode _get_next_node(PTagNode prev);
 498 static void _delete_node(PTagNode node);
 499 static void _link_match_tags(Eina_List *nodes);
 500 static char *_get_tag_value(const char *tag_str, const char *tag_name);
 501 static char *_convert_to_html(Eina_List* nodes);
 502 static void _set_EFL_tag_data(Eina_List* nodes);
 503 static char *_convert_to_edje(Eina_List* nodes);
 504 static void _set_HTML_tag_data(Eina_List* nodes);
 505 static PFontTagData _set_EFL_font_data(PFontTagData data, const char *tag_str);
 506 static PItemTagData _set_EFL_item_data(PItemTagData data, const char *tag_str);
 507 static PFontTagData _set_HTML_font_data(PFontTagData data, const char *tag_str);
 508 static PItemTagData _set_HTML_img_data(PItemTagData data, const char *tag_str);
 509
 510 #ifdef DEBUGON
 511 static void _dumpNode(Eina_List* nodes);
 512 #endif
 513
 514 static PTagNode
 515 _new_tag_node(char *tag, char *tag_str, char* str, char *pos_in_ori_str)
 516 {
 517    PTagNode newNode = calloc(1, sizeof(TagNode));
 518    if (tag)
 519      eina_str_tolower(&tag);
 520    newNode->tag = tag;
 521    if (tag_str)
 522      eina_str_tolower(&tag_str);
 523    newNode->tag_str = tag_str;
 524    newNode->str = str;
 525    newNode->pos_in_ori_str = pos_in_ori_str;
 526    return newNode;
 527 }
 528
 529 static PTagNode
 530 _get_start_node(char *str)
 531 {
 532    char *startStr = NULL;
 533    if (!str || str[0] == '\0')
 534      return NULL;
 535
 536    if (str[0] != '<')
 537      {
 538         char *tagStart = strchr(str, '<');
 539         if (!tagStart)
 540           startStr = strdup(str);
 541         else
 542           {
 543              int strLength = tagStart - str;
 544              startStr = malloc(sizeof(char) * (strLength + 1));
 545              strncpy(startStr, str, strLength);
 546              startStr[strLength] = '\0';
 547           }
 548      }
 549
 550    return _new_tag_node(NULL, NULL, startStr, str);
 551 }
 552
 553 static PTagNode
 554 _get_next_node(PTagNode prev)
 555 {
 556    PTagNode retTag = NULL;
 557    char *tagStart;
 558    char *tagEnd;
 559    char *tagNameEnd = NULL;
 560    char *nextTagStart;
 561
 562    if (prev->tag == NULL)
 563      tagStart = strchr(prev->pos_in_ori_str, '<');
 564    else
 565      tagStart = strchr(prev->pos_in_ori_str + 1, '<');
 566
 567    if (!tagStart)
 568      return retTag;
 569
 570    tagEnd = strchr(tagStart, '>');
 571    nextTagStart = strchr(tagStart + 1, '<');
 572
 573    if (!tagEnd || (nextTagStart && (nextTagStart < tagEnd)))
 574         return _get_start_node(tagStart + 1);
 575
 576    int spCnt = 5;
 577    char *spArray[spCnt];
 578    spArray[0] = strchr(tagStart, '=');
 579    spArray[1] = strchr(tagStart, '_');
 580    spArray[2] = strchr(tagStart, ' ');
 581    spArray[3] = strchr(tagStart, '\t');
 582    spArray[4] = strchr(tagStart, '\n');
 583    tagNameEnd = tagEnd;
 584
 585    int i;
 586    for (i = 0; i < spCnt; i++)
 587      {
 588         if (spArray[i] && spArray[i] < tagNameEnd)
 589           tagNameEnd = spArray[i];
 590      }
 591
 592    int tagLength = tagNameEnd - tagStart - 1;
 593    char *tagName = NULL;
 594    if (!strncmp(&tagStart[1], "color", tagLength))
 595      tagName = strndup("font", 4);
 596    else if (!strncmp(&tagStart[1], "/color", tagLength))
 597      tagName = strndup("/font", 5);
 598    else if (!strncmp(&tagStart[1], "/item", tagLength))
 599      tagName = strdup("");
 600    else
 601      tagName = strndup(&tagStart[1], tagLength);
 602
 603    int tagStrLength = 0;
 604    char *tagStr = NULL;
 605    if (tagName)
 606      {
 607         tagStrLength = tagEnd - tagStart + 1;
 608         tagStr = strndup(tagStart, tagStrLength);
 609      }
 610
 611    unsigned int strLength = nextTagStart ? (unsigned int)(nextTagStart - tagEnd - 1) : strlen(&tagEnd[1]);
 612    char *str = strndup(&tagEnd[1], strLength);
 613
 614    retTag = _new_tag_node(tagName, tagStr, str, tagStart);
 615    return retTag;
 616 }
 617
 618
 619 static void
 620 _delete_node(PTagNode node)
 621 {
 622    if (node)
 623      {
 624         SAFEFREE(node->tag_str);
 625         SAFEFREE(node->str);
 626
 627         if (node->tagData)
 628           {
 629              if (node->tag)
 630                {
 631                   if (!strcmp("font", node->tag))
 632                     {
 633                        PFontTagData data = node->tagData;
 634                        SAFEFREE(data->name);
 635                        SAFEFREE(data->color);
 636                        SAFEFREE(data->size);
 637                        SAFEFREE(data->bg_color);
 638                     }
 639                   if (!strcmp("item", node->tag))
 640                     {
 641                        PItemTagData data = node->tagData;
 642                        SAFEFREE(data->href);
 643                        SAFEFREE(data->width);
 644                        SAFEFREE(data->height);
 645                     }
 646
 647                }
 648              SAFEFREE(node->tagData);
 649           }
 650         SAFEFREE(node->tag);
 651         SAFEFREE(node);
 652      }
 653 }
 654
 655 static void
 656 _link_match_tags(Eina_List *nodes)
 657 {
 658    Eina_List *stack = NULL;
 659
 660    PTagNode trail, popData;
 661    Eina_List *l, *r;
 662
 663    EINA_LIST_FOREACH(nodes, l, trail)
 664      {
 665         if (!trail->tag || trail->tag[0] == '\0')
 666           continue;
 667         if (!strcmp("br", trail->tag))
 668           {
 669              trail->tagPosType = TAGPOS_ALONE;
 670              continue;
 671           }
 672         else if (!strcmp("item", trail->tag) || !strcmp("img", trail->tag))
 673           {
 674              trail->tagPosType = TAGPOS_ALONE;
 675              continue;
 676           }
 677
 678         if (trail->tag[0] != '/') // PUSH
 679           {
 680              stack = eina_list_append(stack, trail);
 681 /*             eina_array_push(stack, trail);
 682              cnp_debug("stack: %d, tag %s\n", eina_array_count_get(stack), trail->tag);*/
 683              cnp_debug("stack: %d, tag %s\n", eina_list_count(stack), trail->tag);
 684           }
 685         else // POP
 686           {
 687              if (!eina_list_count(stack))
 688                {
 689                   cnp_debug("tag not matched %s\n", trail->tag);
 690                   continue;
 691                }
 692
 693              EINA_LIST_REVERSE_FOREACH(stack, r, popData)
 694                {
 695                   if (popData->tag && !strcmp(popData->tag, &trail->tag[1]))
 696                     {
 697                        popData->tagPosType = TAGPOS_START;
 698                        trail->tagPosType = TAGPOS_END;
 699                        popData->matchTag = trail;
 700                        trail->matchTag = popData;
 701                        stack = eina_list_remove_list(stack, r);
 702                        break;
 703                     }
 704                }
 705 /*             popData = eina_array_pop(stack);
 706
 707              popData->tagPosType = TAGPOS_START;
 708              trail->tagPosType = TAGPOS_END;
 709              popData->matchTag = trail;
 710              trail->matchTag = popData;
 711              cnp_debug("pop stack: %d, tag %s\n", eina_array_count_get(stack), trail->tag);
 712              */
 713           }
 714      }
 715
 716 /*   if (eina_array_count_get(stack))
 717      cnp_debug("stack state: %d, tag %s\n", eina_array_count_get(stack), trail->tag);*/
 718
 719    /* Make Dummy close tag */
 720 /*   while ((popData = eina_array_pop(stack)))  */
 721
 722    EINA_LIST_REVERSE_FOREACH(stack, r, popData)
 723      {
 724         PTagNode newData;
 725         int tagLength = strlen(popData->tag);
 726         char *tagName = malloc(sizeof(char) * (tagLength + 2));
 727
 728         tagName[0] = '/';
 729         tagName[1] = '\0';
 730         strcat(tagName, popData->tag);
 731
 732         newData = _new_tag_node(tagName, NULL, NULL, NULL);
 733         popData->tagPosType = TAGPOS_START;
 734         newData->tagPosType = TAGPOS_END;
 735         popData->matchTag = newData;
 736         newData->matchTag = popData;
 737         nodes = eina_list_append(nodes, newData);
 738 /*        cnp_debug("stack: %d, tag %s\n", eina_array_count_get(stack), popData->tag);*/
 739      }
 740 /*   cnp_debug("stack_top: %d\n", eina_array_count_get(stack));
 741    eina_array_free(stack);*/
 742    eina_list_free(stack);
 743 }
 744
 745 static char *
 746 _get_tag_value(const char *tag_str, const char *tag_name)
 747 {
 748    if (!tag_name || !tag_str)
 749      return NULL;
 750
 751    char *tag;
 752    if ((tag = strstr(tag_str, tag_name)))
 753      {
 754         if (tag[strlen(tag_name)] == '_')
 755           return NULL;
 756         char *value = strchr(tag, '=');
 757         if (value)
 758           {
 759              do
 760                {
 761                   value++;
 762                } while (!isalnum(*value) && *value != '#');
 763
 764              int spCnt = 6;
 765              char *spArray[spCnt];
 766              spArray[0] = strchr(value, ' ');
 767              spArray[1] = strchr(value, '>');
 768              spArray[2] = strchr(value, '\"');
 769              spArray[3] = strchr(value, '\'');
 770              spArray[4] = strchr(value, '\t');
 771              spArray[5] = strchr(value, '\n');
 772              char *valueEnd = strchr(value, '\0');
 773
 774              int i;
 775              int start = 0;
 776              if ((!strncmp(tag_str, "<item", 5) && !strcmp(tag_name, "href")) // EFL img tag
 777                || (!strncmp(tag_str, "<img", 4) && !strcmp(tag_name, "src"))) // HTML img tag
 778                start = 1;
 779
 780              for (i = start; i < spCnt; i++)
 781                {
 782                   if (spArray[i] && spArray[i] < valueEnd)
 783                     valueEnd = spArray[i];
 784                }
 785
 786              int valueLength = valueEnd - value;
 787              return strndup(value, valueLength);
 788           }
 789      }
 790    return NULL;
 791 }
 792
 793 static PFontTagData
 794 _set_EFL_font_data(PFontTagData data, const char *tag_str)
 795 {
 796    char *value;
 797
 798    if (!data)
 799      data = calloc(1, sizeof(FontTagData));
 800    value = _get_tag_value(tag_str, "font_size");
 801    freeAndAssign(data->size, value);
 802    value = _get_tag_value(tag_str, "color");
 803    freeAndAssign(data->color, value);
 804    value = _get_tag_value(tag_str, "bgcolor");
 805    freeAndAssign(data->bg_color, value);
 806    value = _get_tag_value(tag_str, "font");
 807    freeAndAssign(data->name, value);
 808
 809    return data;
 810 }
 811
 812 static PItemTagData
 813 _set_EFL_item_data(PItemTagData data, const char *tag_str)
 814 {
 815    char *value;
 816
 817    if (!data)
 818      data = calloc(1, sizeof(ItemTagData));
 819    value = _get_tag_value(tag_str, "href");
 820    if (value)
 821      {
 822         char *path = strstr(value, "file://");
 823         if (path)
 824           {
 825              char *modify = malloc(sizeof(char) * (strlen(value) + 1));
 826              strncpy(modify, "file://", 8);
 827              path += 7;
 828              while (path[1] && path[0] && path[1] == '/' && path[0] == '/')
 829                {
 830                   path++;
 831                }
 832              strcat(modify, path);
 833              data->href = modify;
 834              cnp_debug("image href ---%s---\n", data->href);
 835              free(value);
 836           }
 837         else
 838           freeAndAssign(data->href, value);
 839      }
 840
 841    value = _get_tag_value(tag_str, "absize");
 842    if (value)
 843      {
 844         char *xpos = strchr(value, 'x');
 845         if (xpos)
 846           {
 847              int absizeLen = strlen(value);
 848              freeAndAssign(data->width, strndup(value, xpos - value));
 849              freeAndAssign(data->height, strndup(xpos + 1, absizeLen - (xpos - value) - 1));
 850              cnp_debug("image width: -%s-, height: -%s-\n", data->width, data->height);
 851           }
 852         free(value);
 853      }
 854    return data;
 855 }
 856
 857 static void
 858 _set_EFL_tag_data(Eina_List* nodes)
 859 {
 860    PTagNode trail;
 861    Eina_List *l;
 862
 863    EINA_LIST_FOREACH(nodes, l, trail)
 864      {
 865         if (!trail->tag)
 866           continue;
 867         if (!strcmp("font", trail->tag))
 868              trail->tagData = _set_EFL_font_data(trail->tagData, trail->tag_str);
 869         else if (!strcmp("item", trail->tag))
 870              trail->tagData = _set_EFL_item_data(trail->tagData, trail->tag_str);
 871      }
 872 }
 873
 874 static PFontTagData
 875 _set_HTML_font_data(PFontTagData data, const char *tag_str)
 876 {
 877    char *value;
 878
 879    if (!data)
 880      data = calloc(1, sizeof(FontTagData));
 881    value = _get_tag_value(tag_str, "size");
 882    freeAndAssign(data->size, value);
 883    value = _get_tag_value(tag_str, "color");
 884    freeAndAssign(data->color, value);
 885    value = _get_tag_value(tag_str, "bgcolor");
 886    freeAndAssign(data->bg_color, value);
 887    value = _get_tag_value(tag_str, "face");
 888    freeAndAssign(data->name, value);
 889
 890    return data;
 891 }
 892
 893 static PItemTagData
 894 _set_HTML_img_data(PItemTagData data, const char *tag_str)
 895 {
 896    char *value;
 897
 898    if (!data)
 899      data = calloc(1, sizeof(ItemTagData));
 900    value = _get_tag_value(tag_str, "src");
 901    if (value)
 902      {
 903         char *path = strstr(value, "file://");
 904         if (path)
 905           {
 906              char *modify = malloc(sizeof(char) * (strlen(value) + 1));
 907              strncpy(modify, "file://", 8);
 908              path += 7;
 909              while (path[1] && path[0] && path[1] == '/' && path[0] == '/')
 910                {
 911                   path++;
 912                }
 913              strcat(modify, path);
 914              data->href = modify;
 915              cnp_debug("image src ---%s---\n", data->href);
 916              free(value);
 917           }
 918         else
 919           freeAndAssign(data->href, value);
 920      }
 921
 922    value = _get_tag_value(tag_str, "width");
 923    freeAndAssign(data->width, value);
 924    value = _get_tag_value(tag_str, "height");
 925    freeAndAssign(data->height, value);
 926    return data;
 927 }
 928
 929 static void
 930 _set_HTML_tag_data(Eina_List* nodes)
 931 {
 932    PTagNode trail;
 933    Eina_List *l;
 934
 935    EINA_LIST_FOREACH(nodes, l, trail)
 936      {
 937         if (!trail->tag)
 938           continue;
 939         if (!strcmp("font", trail->tag))
 940              trail->tagData = _set_HTML_font_data(trail->tagData, trail->tag_str);
 941         else if (!strcmp("img", trail->tag))
 942              trail->tagData = _set_HTML_img_data(trail->tagData, trail->tag_str);
 943      }
 944 }
 945
 946 #ifdef DEBUGON
 947 static void
 948 _dumpNode(Eina_List* nodes)
 949 {
 950    PTagNode trail;
 951    Eina_List *l;
 952
 953    EINA_LIST_FOREACH(nodes, l, trail)
 954      {
 955         cnp_debug("tag: %s, tag_str: %s, str: %s, tagPosType: %d\n",
 956                trail->tag, trail->tag_str, trail->str, trail->tagPosType);
 957         cnp_debug("matchTag: %x ", (unsigned int)trail->matchTag);
 958         if (trail->matchTag)
 959           cnp_debug("matchTag->tag_str: %s", trail->matchTag->tag_str);
 960         if (trail->tagData)
 961           {
 962              if (!strcmp(trail->tag, "font"))
 963                {
 964                   PFontTagData data = trail->tagData;
 965                   cnp_debug(" tagData->name: %s, tagData->color: %s, tagData->size: %s, tagData->bg_color: %s",
 966                          data->name, data->color, data->size, data->bg_color);
 967                }
 968              else if (!strcmp(trail->tag, "item") || !strcmp(trail->tag, "img"))
 969                {
 970                   PItemTagData data = trail->tagData;
 971                   cnp_debug(" tagData->href: %s, tagData->width: %s, tagData->height: %s",
 972                          data->href, data->width, data->height);
 973                }
 974              else
 975                cnp_debug("\nERROR!!!! not need tagData");
 976           }
 977         cnp_debug("\n");
 978      }
 979 }
 980 #endif
 981
 982 static char *
 983 _convert_to_html(Eina_List* nodes)
 984 {
 985    PTagNode trail;
 986    Eina_List *l;
 987
 988    Eina_Strbuf *html = eina_strbuf_new();
 989
 990    int tableCnt = sizeof(_EFLtoHTMLConvertTable) / sizeof(TagTable);
 991
 992    EINA_LIST_FOREACH(nodes, l, trail)
 993      {
 994         if (trail->tag)
 995           {
 996              char *tagName = trail->tagPosType == TAGPOS_END ?
 997                 trail->matchTag->tag : trail->tag;
 998              int j;
 999              for(j = 0; j < tableCnt; j++)
1000                {
1001                   if (!strcmp(_EFLtoHTMLConvertTable[j].src, tagName))
1002                     {
1003                        switch(trail->tagPosType)
1004                          {
1005                           case TAGPOS_END:
1006                              eina_strbuf_append(html, "</");
1007                              break;
1008                           default:
1009                              eina_strbuf_append(html, "<");
1010                              break;
1011                          }
1012
1013                        eina_strbuf_append(html, _EFLtoHTMLConvertTable[j].dst);
1014                        if (trail->tagPosType != TAGPOS_END)
1015                          {
1016                             if (!strcmp(_EFLtoHTMLConvertTable[j].src, "font"))
1017                               {
1018                                  PFontTagData data = trail->tagData;
1019                                  if (data->name)
1020                                    {
1021                                    }
1022                                  if (data->color)
1023                                    eina_strbuf_append_printf(html, " color=\"%s\"", data->color);
1024                                  if (data->size)
1025                                    eina_strbuf_append_printf(html, " size=\"%s\"", data->size);
1026                                  if (data->bg_color)
1027                                    {
1028                                    }
1029                               }
1030                             else if (!strcmp(_EFLtoHTMLConvertTable[j].src, "item"))
1031                               {
1032                                  PItemTagData data = trail->tagData;
1033                                  if (data->href)
1034                                    eina_strbuf_append_printf(html, " src=\"%s\"", data->href);
1035                                  if (data->width)
1036                                    eina_strbuf_append_printf(html, " width=\"%s\"", data->width);
1037                                  if (data->height)
1038                                    eina_strbuf_append_printf(html, " height=\"%s\"", data->height);
1039                               }
1040                          }
1041                        switch(trail->tagPosType)
1042                          {
1043                             /* closed tag does not need in HTML
1044                           case TAGPOS_ALONE:
1045                              eina_strbuf_append(html, " />");
1046                              break;*/
1047                           default:
1048                              eina_strbuf_append(html, ">");
1049                              break;
1050                          }
1051                        break;
1052                     }
1053                }
1054           }
1055         if (trail->str)
1056           eina_strbuf_append(html, trail->str);
1057      }
1058
1059    char *ret = eina_strbuf_string_steal(html);
1060    eina_strbuf_free(html);
1061    return ret;
1062 }
1063
1064 #define IMAGE_DEFAULT_WIDTH "240"
1065 #define IMAGE_DEFAULT_HEIGHT "180"
1066
1067
1068 static char *
1069 _convert_to_edje(Eina_List* nodes)
1070 {
1071    PTagNode trail;
1072    Eina_List *l;
1073
1074    Eina_Strbuf *html = eina_strbuf_new();
1075
1076    int tableCnt = sizeof(_HTMLtoEFLConvertTable) / sizeof(TagTable);
1077
1078    EINA_LIST_FOREACH(nodes, l, trail)
1079      {
1080         if (trail->tag)
1081           {
1082              char *tagName = trail->tagPosType == TAGPOS_END ?
1083                 trail->matchTag->tag : trail->tag;
1084              int j;
1085              for(j = 0; j < tableCnt; j++)
1086                {
1087                   if (!strcmp(_HTMLtoEFLConvertTable[j].src, tagName))
1088                     {
1089                        if (_HTMLtoEFLConvertTable[j].dst[0] != '\0')
1090                          {
1091                             switch(trail->tagPosType)
1092                               {
1093                                case TAGPOS_END:
1094                                   eina_strbuf_append(html, "</");
1095                                   break;
1096                                default:
1097                                   eina_strbuf_append(html, "<");
1098                                   break;
1099                               }
1100
1101                             eina_strbuf_append(html, _HTMLtoEFLConvertTable[j].dst);
1102                          }
1103                        if (trail->tagPosType != TAGPOS_END)
1104                          {
1105                             if (!strcmp(_HTMLtoEFLConvertTable[j].src, "font"))
1106                               {
1107                                  PFontTagData data = trail->tagData;
1108                                  if (data->name)
1109                                    {
1110                                    }
1111                                  if (data->color)
1112                                    eina_strbuf_append_printf(html, "<color=%s>", data->color);
1113                                  if (data->size)
1114                                    eina_strbuf_append_printf(html, "<font_size=%s>", data->size);
1115                                  if (data->bg_color)
1116                                    {
1117                                    }
1118                                  break;
1119                               }
1120                             else if (!strcmp(_HTMLtoEFLConvertTable[j].src, "img"))
1121                               {
1122                                  PItemTagData data = trail->tagData;
1123                                  char *width = IMAGE_DEFAULT_WIDTH, *height = IMAGE_DEFAULT_HEIGHT;
1124                                  if (data->width)
1125                                    width = data->width;
1126                                  if (data->height)
1127                                    height = data->height;
1128                                  eina_strbuf_append_printf(html, " absize=%sx%s", width, height);
1129                                  if (data->href)
1130                                    eina_strbuf_append_printf(html, " href=%s></item>", data->href);
1131                                  break;
1132                               }
1133                          }
1134                        else
1135                          {
1136                             if (_HTMLtoEFLConvertTable[j].dst[0] == '\0')
1137                               {
1138                                  if (!strcmp(_HTMLtoEFLConvertTable[j].src, "font"))
1139                                    {
1140                                       if (trail->matchTag->tagData)
1141                                         {
1142                                            PFontTagData data = trail->matchTag->tagData;
1143                                            if (data->name)
1144                                              {
1145                                              }
1146                                            if (data->color)
1147                                              eina_strbuf_append_printf(html, "</color>");
1148                                            if (data->size)
1149                                              eina_strbuf_append_printf(html, "</font>");
1150                                            if (data->bg_color)
1151                                              {
1152                                              }
1153                                            break;
1154                                         }
1155                                    }
1156                               }
1157                          }
1158                        switch(trail->tagPosType)
1159                          {
1160                             /* not support in efl
1161                           case TAGPOS_ALONE:
1162                              eina_strbuf_append(html, " />");
1163                              break;
1164                              */
1165                           default:
1166                              eina_strbuf_append(html, ">");
1167                              break;
1168                          }
1169                        break;
1170                     }
1171                }/* for(j = 0; j < tableCnt; j++) end */
1172           }
1173         if (trail->str)
1174           eina_strbuf_append(html, trail->str);
1175      }
1176
1177    char *ret = eina_strbuf_string_steal(html);
1178    eina_strbuf_free(html);
1179    return ret;
1180
1181 }
1182
1183 Eina_Bool
1184 elm_selection_set(Elm_Sel_Type selection, Evas_Object *widget, Elm_Sel_Format format, const char *selbuf)
1185 {
1186 #ifdef HAVE_ELEMENTARY_X
1187    Evas_Object *top = elm_widget_top_get(widget);
1188    Ecore_X_Window xwin;
1189    Cnp_Selection *sel;
1190
1191    if (top) xwin = elm_win_xwindow_get(top);
1192    else xwin = elm_win_xwindow_get(widget);
1193    if (!xwin) return EINA_FALSE;
1194    if ((unsigned int)selection >= (unsigned int)ELM_SEL_MAX) return EINA_FALSE;
1195    if (!_elm_cnp_init_count) _elm_cnp_init();
1196    if ((!selbuf) && (format != ELM_SEL_FORMAT_IMAGE))
1197      return elm_selection_clear(selection, widget);
1198
1199    sel = selections + selection;
1200
1201    sel->active = 1;
1202    sel->widget = widget;
1203
1204    sel->set(xwin, &selection, sizeof(Elm_Sel_Type));
1205    sel->format = format;
1206    sel->selbuf = selbuf ? strdup(selbuf) : NULL;
1207
1208    return EINA_TRUE;
1209 #else
1210    return EINA_FALSE;
1211 #endif
1212 }
1213
1214 Eina_Bool
1215 elm_selection_clear(Elm_Sel_Type selection, Evas_Object *widget)
1216 {
1217 #ifdef HAVE_ELEMENTARY_X
1218    Cnp_Selection *sel;
1219
1220    if ((unsigned int)selection >= (unsigned int)ELM_SEL_MAX) return EINA_FALSE;
1221    if (!_elm_cnp_init_count) _elm_cnp_init();
1222
1223    sel = selections + selection;
1224
1225    /* No longer this selection: Consider it gone! */
1226    if ((!sel->active) || (sel->widget != widget)) return EINA_TRUE;
1227
1228    sel->active = 0;
1229    sel->widget = NULL;
1230    sel->clear();
1231
1232    return EINA_TRUE;
1233 #else
1234    return EINA_FALSE;
1235 #endif
1236 }
1237
1238 Eina_Bool
1239 elm_selection_get(Elm_Sel_Type selection, Elm_Sel_Format format,
1240                   Evas_Object *widget, Elm_Drop_Cb datacb, void *udata)
1241 {
1242 #ifdef HAVE_ELEMENTARY_X
1243    Evas_Object *top;
1244    Cnp_Selection *sel;
1245
1246    if ((unsigned int)selection >= (unsigned int)ELM_SEL_MAX) return EINA_FALSE;
1247    if (!_elm_cnp_init_count) _elm_cnp_init();
1248
1249    sel = selections + selection;
1250    top = elm_widget_top_get(widget);
1251    if (!top) return EINA_FALSE;
1252
1253    sel->requestformat = format;
1254    sel->requestwidget = widget;
1255    sel->request(elm_win_xwindow_get(top), ECORE_X_SELECTION_TARGET_TARGETS);
1256    sel->datacb = datacb;
1257    sel->udata = udata;
1258
1259    return EINA_TRUE;
1260 #else
1261    return EINA_FALSE;
1262 #endif
1263 }
1264
1265 #ifdef HAVE_ELEMENTARY_X
1266
1267 static Eina_Bool
1268 _elm_cnp_init(void)
1269 {
1270    int i;
1271
1272    if (_elm_cnp_init_count++) return EINA_TRUE;
1273    for (i = 0; i < CNP_N_ATOMS; i++)
1274      {
1275         atoms[i].atom = ecore_x_atom_get(atoms[i].name);
1276         ecore_x_selection_converter_atom_add(atoms[i].atom,
1277                                              atoms[i].converter);
1278      }
1279    clipboard_atom = ecore_x_atom_get("CLIPBOARD");
1280
1281    ecore_event_handler_add(ECORE_X_EVENT_SELECTION_CLEAR, selection_clear, NULL);
1282    ecore_event_handler_add(ECORE_X_EVENT_SELECTION_NOTIFY, selection_notify, NULL);
1283
1284    text_uri = eina_stringshare_add("text/uri-list");
1285    return EINA_TRUE;
1286 }
1287
1288 static Eina_Bool
1289 selection_clear(void *udata __UNUSED__, int type __UNUSED__, void *event)
1290 {
1291    Ecore_X_Event_Selection_Clear *ev = event;
1292    Cnp_Selection *sel;
1293    int i;
1294
1295    for (i = 0; i < ELM_SEL_MAX; i++)
1296      {
1297         if (selections[i].ecore_sel == ev->selection) break;
1298      }
1299    cnp_debug("selection %d clear\n", i);
1300    /* Not me... Don't care */
1301    if (i == ELM_SEL_MAX) return ECORE_CALLBACK_PASS_ON;
1302
1303    sel = selections + i;
1304    sel->active = 0;
1305    sel->widget = NULL;
1306    sel->selbuf = NULL;
1307
1308    return ECORE_CALLBACK_PASS_ON;
1309 }
1310
1311
1312 /*
1313  * Response to a selection notify:
1314  *      - So we have asked for the selection list.
1315  *      - If it's the targets list, parse it, and fire of what we want,
1316  *      else it's the data we want.
1317  */
1318 static Eina_Bool
1319 selection_notify(void *udata __UNUSED__, int type __UNUSED__, void *event)
1320 {
1321    Ecore_X_Event_Selection_Notify *ev = event;
1322    Cnp_Selection *sel;
1323    int i;
1324
1325    cnp_debug("selection notify callback: %d\n",ev->selection);
1326    switch (ev->selection)
1327      {
1328       case ECORE_X_SELECTION_CLIPBOARD:
1329          sel = selections + ELM_SEL_CLIPBOARD;
1330          break;
1331       case ECORE_X_SELECTION_PRIMARY:
1332          sel = selections + ELM_SEL_PRIMARY;
1333          break;
1334       case ECORE_X_SELECTION_SECONDARY:
1335          sel = selections + ELM_SEL_SECONDARY;
1336          break;
1337       case ECORE_X_SELECTION_XDND:
1338          sel = selections + ELM_SEL_XDND;
1339          break;
1340       default:
1341          return ECORE_CALLBACK_PASS_ON;
1342      }
1343    cnp_debug("Target is %s\n", ev->target);
1344
1345    for (i = 0; i < CNP_N_ATOMS; i++)
1346      {
1347         if (!strcmp(ev->target, atoms[i].name))
1348           {
1349              if (atoms[i].notify)
1350                {
1351                   cnp_debug("Found something: %s\n", atoms[i].name);
1352                   atoms[i].notify(sel, ev);
1353                }
1354              else
1355                {
1356                   cnp_debug("Ignored: No handler!\n");
1357                }
1358           }
1359      }
1360
1361    return ECORE_CALLBACK_PASS_ON;
1362 }
1363
1364
1365
1366 static Eina_Bool
1367 targets_converter(char *target __UNUSED__, void *data, int size __UNUSED__, void **data_ret, int *size_ret, Ecore_X_Atom *ttype, int *typesize)
1368 {
1369    int i,count;
1370    Ecore_X_Atom *aret;
1371    Cnp_Selection *sel;
1372
1373    if (!data_ret) return EINA_FALSE;
1374    if (!data || (*((unsigned int *)data) >= ELM_SEL_MAX))
1375      return EINA_FALSE;
1376
1377    sel = selections + *((int *)data);
1378
1379    for (i = 0, count = 0; i < CNP_N_ATOMS ; i++)
1380      {
1381         if (sel->format & atoms[i].formats) count++;
1382      }
1383
1384    aret = malloc(sizeof(Ecore_X_Atom) * count);
1385    for (i = 0, count = 0; i < CNP_N_ATOMS; i++)
1386      {
1387         if (sel->format & atoms[i].formats) aret[count ++] = atoms[i].atom;
1388      }
1389
1390    *data_ret = aret;
1391    if (typesize) *typesize = 32 /* urk */;
1392    if (ttype) *ttype = ECORE_X_ATOM_ATOM;
1393    if (size_ret) *size_ret = count;
1394
1395    return EINA_TRUE;
1396 }
1397
1398 static Eina_Bool
1399 image_converter(char *target __UNUSED__, void *data __UNUSED__, int size __UNUSED__, void **data_ret __UNUSED__, int *size_ret __UNUSED__, Ecore_X_Atom *ttype __UNUSED__, int *typesize __UNUSED__)
1400 {
1401    cnp_debug("Image converter called\n");
1402    return EINA_TRUE;
1403 }
1404
1405 static Eina_Bool
1406 vcard_send(char *target __UNUSED__, void *data __UNUSED__, int size __UNUSED__, void **data_ret, int *size_ret, Ecore_X_Atom *ttype __UNUSED__, int *typesize __UNUSED__)
1407 {
1408    Cnp_Selection *sel;
1409
1410    cnp_debug("Vcard send called\n");
1411
1412    sel = selections + *((int *)data);
1413
1414    if (data_ret) *data_ret = strdup(sel->selbuf);
1415    if (size_ret) *size_ret = strlen(sel->selbuf);
1416
1417    return EINA_TRUE;
1418 }
1419
1420 static Eina_Bool
1421 is_uri_type_data(Cnp_Selection *sel __UNUSED__, Ecore_X_Event_Selection_Notify *notify)
1422 {
1423    Ecore_X_Selection_Data *data;
1424    char *p;
1425
1426    data = notify->data;
1427    cnp_debug("data->format is %d %p %p\n", data->format, notify, data);
1428    if (data->content == ECORE_X_SELECTION_CONTENT_FILES) return EINA_TRUE;
1429    else p = (char *)data->data;
1430
1431    if (!p) return EINA_TRUE;
1432    cnp_debug("Got %s\n", p);
1433    if (strncmp(p, "file://", 7))
1434      {
1435         if (*p != '/') return EINA_FALSE;
1436      }
1437
1438    return EINA_TRUE;
1439 }
1440
1441 /*
1442  * Callback to handle a targets response on a selection request:
1443  * So pick the format we'd like; and then request it.
1444  */
1445 static int
1446 notify_handler_targets(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify)
1447 {
1448    Ecore_X_Selection_Data_Targets *targets;
1449    Ecore_X_Atom *atomlist;
1450    Evas_Object *top;
1451    int i, j;
1452
1453    targets = notify->data;
1454    atomlist = (Ecore_X_Atom *)(targets->data.data);
1455
1456    for (j = 1; j < CNP_N_ATOMS; j++)
1457      {
1458         cnp_debug("\t%s %d\n", atoms[j].name, atoms[j].atom);
1459         if (!(atoms[j].formats & sel->requestformat)) continue;
1460         for (i = 0; i < targets->data.length; i++)
1461           {
1462              if ((atoms[j].atom == atomlist[i]) && (atoms[j].notify))
1463                {
1464 /*                  if ((j == CNP_ATOM_text_uri) ||
1465                       (j == CNP_ATOM_text_urilist))
1466                     {
1467                       if(!is_uri_type_data(sel, notify)) continue;
1468                     }*/
1469                   cnp_debug("Atom %s matches\n",atoms[j].name);
1470                   goto done;
1471                }
1472           }
1473      }
1474
1475    cnp_debug("Couldn't find anything that matches\n");
1476    return ECORE_CALLBACK_PASS_ON;
1477
1478 done:
1479    top = elm_widget_top_get(sel->requestwidget);
1480    if (!top) top = sel->requestwidget;
1481    cnp_debug("Sending request for %s\n", atoms[j].name);
1482    sel->request(elm_win_xwindow_get(top), atoms[j].name);
1483
1484    return ECORE_CALLBACK_PASS_ON;
1485 }
1486
1487 static int
1488 response_handler_targets(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify)
1489 {
1490    Ecore_X_Selection_Data_Targets *targets;
1491    Ecore_X_Atom *atomlist;
1492    Evas_Object *top;
1493    int i,j;
1494
1495    targets = notify->data;
1496    atomlist = (Ecore_X_Atom *)(targets->data.data);
1497
1498    /* Start from 1: Skip targets */
1499    for (j = 1 ; j < CNP_N_ATOMS ; j ++)
1500      {
1501         if (!(atoms[j].formats & sel->requestformat)) continue;
1502         for (i = 0 ; i < targets->data.length ; i ++)
1503           {
1504              if ((atoms[j].atom == atomlist[i]) && (atoms[j].response))
1505                {
1506                   /* Found a match: Use it */
1507                   goto found;
1508                }
1509           }
1510      }
1511 found:
1512    if (j == CNP_N_ATOMS)
1513      {
1514         cnp_debug("No matching type found\n");
1515         return 0;
1516      }
1517
1518    top = elm_widget_top_get(sel->requestwidget);
1519    if (!top) return 0;
1520
1521    sel->request(elm_win_xwindow_get(top), atoms[j].name);
1522    return 0;
1523 }
1524
1525 static void
1526 entry_insert_filter(Evas_Object* entry, char* str)
1527 {
1528    if (!entry || !str)
1529      return;
1530
1531    char *insertStr = str;
1532    // if entry has text only set then remove item tags
1533    if (elm_entry_cnp_textonly_get(entry))
1534      {
1535         while (EINA_TRUE)
1536           {
1537              char *startTag = NULL;
1538              char *endTag = NULL;
1539
1540              startTag = strstr(insertStr, "<item");
1541              if (!startTag)
1542                startTag = strstr(insertStr, "</item");
1543              if (startTag)
1544                endTag = strstr(startTag, ">");
1545              else
1546                break;
1547              if (!endTag || startTag > endTag)
1548                {
1549                   cnp_debug("Broken tag: %s\n", str);
1550                   break;
1551                }
1552
1553              size_t sindex = startTag - insertStr;
1554              size_t eindex = endTag - insertStr + 1;
1555
1556              Eina_Strbuf *buf = eina_strbuf_new();
1557              if (buf)
1558                {
1559                   eina_strbuf_append(buf, insertStr);
1560                   eina_strbuf_remove(buf, sindex, eindex);
1561                   insertStr = eina_strbuf_string_steal(buf);
1562                   eina_strbuf_free(buf);
1563                }
1564           }
1565      }
1566    cnp_debug("remove item tag: %s\n", insertStr);
1567
1568    // if entry has single line set then remove <br> & <ps> tags
1569    if (elm_entry_single_line_get(entry))
1570      {
1571         Eina_Strbuf *buf = eina_strbuf_new();
1572         if (buf)
1573           {
1574              eina_strbuf_append(buf, insertStr);
1575              eina_strbuf_replace_all(buf, "<br>", "");
1576              eina_strbuf_replace_all(buf, "<ps>", "");
1577              insertStr = eina_strbuf_string_steal(buf);
1578              eina_strbuf_free(buf);
1579           }
1580      }
1581    cnp_debug("remove break tag: %s\n", insertStr);
1582
1583    elm_entry_entry_insert(entry, insertStr);
1584
1585    if (insertStr != str)
1586      free(insertStr);
1587 }
1588
1589 static int
1590 notify_handler_text(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify)
1591 {
1592    Ecore_X_Selection_Data *data;
1593    char *str;
1594
1595    data = notify->data;
1596
1597    if (sel->datacb)
1598      {
1599         Elm_Selection_Data ddata;
1600
1601         str = strdup(data->data);
1602         ddata.x = ddata.y = 0;
1603         ddata.format = ELM_SEL_FORMAT_TEXT;
1604         ddata.data = str;
1605         ddata.len = data->length;
1606         sel->datacb(sel->udata, sel->widget, &ddata);
1607         free(str);
1608         return 0;
1609      }
1610
1611    cnp_debug("Notify handler text %d %d %p\n", data->format,data->length, data->data);
1612    str = mark_up((char *)data->data, data->length, NULL);
1613    cnp_debug("String is %s (from %s)\n", str, data->data);
1614    entry_insert_filter(sel->requestwidget, str);
1615    //elm_entry_entry_insert(sel->requestwidget, str);
1616    free(str);
1617    return 0;
1618 }
1619
1620
1621 /**
1622  * So someone is pasting an image into my entry or widget...
1623  */
1624 static int
1625 notify_handler_uri(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify)
1626 {
1627    Ecore_X_Selection_Data *data;
1628    Ecore_X_Selection_Data_Files *files;
1629    Paste_Image *pi;
1630    char *p, *stripstr;
1631
1632    data = notify->data;
1633    cnp_debug("data->format is %d %p %p\n", data->format, notify, data);
1634    if (data->content == ECORE_X_SELECTION_CONTENT_FILES)
1635      {
1636         cnp_debug("got a files list\n");
1637         files = notify->data;
1638         if (files->num_files > 1)
1639           {
1640              /* Don't handle many items */
1641              cnp_debug("more then one file: Bailing\n");
1642              return 0;
1643           }
1644         stripstr = p = strdup(files->files[0]);
1645      }
1646    else
1647      {
1648         stripstr = p = strndup((char *)data->data, data->length);
1649      }
1650
1651    if (!p)
1652      {
1653         cnp_debug("Couldn't find a file\n");
1654         return 0;
1655      }
1656    cnp_debug("Got %s\n",p);
1657    if (sel->datacb)
1658      {
1659         Elm_Selection_Data ddata;
1660
1661         ddata.x = ddata.y = 0;
1662         ddata.format = ELM_SEL_FORMAT_MARKUP;
1663         ddata.data = p;
1664         ddata.len = data->length;
1665         sel->datacb(sel->udata, sel->widget, &ddata);
1666         free(p);
1667         return 0;
1668      }
1669    if (strncmp(p, "file://", 7))
1670      {
1671         /* Try and continue if it looks sane */
1672         if (*p != '/')
1673           {
1674              free(p);
1675              return 0;
1676           }
1677      }
1678    else
1679      {
1680         p += strlen("file://");
1681      }
1682
1683    if (savedtypes.pi) pasteimage_free(savedtypes.pi);
1684    pi = pasteimage_alloc(p, strlen(p));
1685    if (savedtypes.textreq)
1686      {
1687         savedtypes.textreq = 0;
1688         savedtypes.pi = pi;
1689      }
1690    else
1691      {
1692         pasteimage_append(pi, sel->requestwidget);
1693         savedtypes.pi = NULL;
1694      }
1695    free(stripstr);
1696    return 0;
1697 }
1698
1699 /**
1700  * Just receieved an vcard, either through cut and paste, or dnd.
1701  */
1702 static int
1703 vcard_receive(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify)
1704 {
1705    Dropable *dropable;
1706    Eina_List *l;
1707    Ecore_X_Selection_Data *data;
1708
1709    data = notify->data;
1710    cnp_debug("vcard receive\n");
1711
1712    if (sel == (selections + ELM_SEL_XDND))
1713      {
1714         Elm_Selection_Data ddata;
1715
1716         cnp_debug("drag & drop\n");
1717         /* FIXME: this needs to be generic: Used for all receives */
1718         EINA_LIST_FOREACH(drops, l, dropable)
1719           {
1720              if (dropable->obj == sel->requestwidget) break;
1721           }
1722         if (!dropable)
1723           {
1724              cnp_debug("Unable to find drop object");
1725              ecore_x_dnd_send_finished();
1726              return 0;
1727           }
1728         dropable = eina_list_data_get(l);
1729         ddata.x = savedtypes.x;
1730         ddata.y = savedtypes.y;
1731         ddata.format = ELM_SEL_FORMAT_VCARD;
1732         ddata.data = data->data;
1733         ddata.len = data->length;
1734         dropable->dropcb(dropable->cbdata, dropable->obj, &ddata);
1735         ecore_x_dnd_send_finished();
1736      }
1737    else if (sel->datacb)
1738      {
1739         Elm_Selection_Data ddata;
1740         ddata.x = ddata.y = 0;
1741         ddata.format = ELM_SEL_FORMAT_IMAGE;
1742         ddata.data = data->data;
1743         ddata.len = data->length;
1744         sel->datacb(sel->udata, sel->widget, &ddata);
1745      }
1746    else
1747      {
1748         cnp_debug("Paste request\n");
1749      }
1750
1751    return 0;
1752
1753 }
1754
1755
1756 static int
1757 notify_handler_image(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify)
1758 {
1759    Ecore_X_Selection_Data *data;
1760    Tmp_Info *tmp;
1761    Paste_Image *pi;
1762
1763    cnp_debug("got a png (or a jpeg)!\n");
1764    data = notify->data;
1765
1766    cnp_debug("Size if %d\n", data->length);
1767
1768    if (sel->datacb)
1769      {
1770         Elm_Selection_Data ddata;
1771
1772         ddata.x = ddata.y = 0;
1773         ddata.format = ELM_SEL_FORMAT_IMAGE;
1774         ddata.data = data->data;
1775         ddata.len = data->length;
1776         sel->datacb(sel->udata, sel->widget, &ddata);
1777         return 0;
1778      }
1779
1780    /* generate tmp name */
1781    tmp = elm_cnp_tempfile_create(data->length);
1782    memcpy(tmp->map, data->data, data->length);
1783    munmap(tmp->map,data->length);
1784
1785    /* FIXME: Add to paste image data to clean up */
1786    pi = pasteimage_alloc(tmp->filename, strlen(tmp->filename));
1787    pasteimage_append(pi, sel->requestwidget);
1788
1789    tmpinfo_free(tmp);
1790    return 0;
1791 }
1792
1793 static int
1794 notify_handler_edje(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify)
1795 {
1796    Ecore_X_Selection_Data *data;
1797
1798    data = notify->data;
1799
1800    char *stripstr = NULL;
1801    stripstr = malloc(sizeof(char) * (data->length + 1));
1802    strncpy(stripstr, (char *)data->data, data->length);
1803    stripstr[data->length] = '\0';
1804
1805    if (sel->datacb)
1806      {
1807         Elm_Selection_Data ddata;
1808         ddata.x = ddata.y = 0;
1809         ddata.format = ELM_SEL_FORMAT_MARKUP;
1810         ddata.data = stripstr;
1811         ddata.len = data->length;
1812         sel->datacb(sel->udata, sel->widget, &ddata);
1813      }
1814    else
1815      entry_insert_filter(sel->requestwidget, stripstr);
1816      //elm_entry_entry_insert(sel->requestwidget, stripstr);
1817
1818    cnp_debug("String is %s (%d bytes)\n", stripstr, data->length);
1819    free(stripstr);
1820    return 0;
1821 }
1822
1823 /**
1824  *    Warning: Generic text/html can';t handle it sanely.
1825  *    Firefox sends ucs2 (i think).
1826  *       chrome sends utf8... blerg
1827  */
1828 static int
1829 notify_handler_html(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify)
1830 {
1831    Ecore_X_Selection_Data *data;
1832
1833    cnp_debug("Got some HTML: Checking encoding is useful\n");
1834    data = notify->data;
1835
1836    char *stripstr = NULL;
1837    stripstr = malloc(sizeof(char) * (data->length + 1));
1838    strncpy(stripstr, (char *)data->data, data->length);
1839    stripstr[data->length] = '\0';
1840
1841    if (sel->datacb)
1842      {
1843         Elm_Selection_Data ddata;
1844         ddata.x = ddata.y = 0;
1845         ddata.format = ELM_SEL_FORMAT_HTML;
1846         ddata.data = stripstr;
1847         ddata.len = data->length;
1848         sel->datacb(sel->udata, sel->widget, &ddata);
1849      }
1850    else
1851      entry_insert_filter(sel->requestwidget, stripstr);
1852      //elm_entry_entry_insert(sel->requestwidget, stripstr);
1853
1854    cnp_debug("String is %s (%d bytes)\n", stripstr, data->length);
1855    free(stripstr);
1856    return 0;
1857 }
1858
1859
1860 static Eina_Bool
1861 text_converter(char *target __UNUSED__, void *data, int size __UNUSED__, void **data_ret, int *size_ret, Ecore_X_Atom *ttype __UNUSED__, int *typesize __UNUSED__)
1862 {
1863    Cnp_Selection *sel;
1864
1865    cnp_debug("text converter\n");
1866    sel = selections + *((int *)data);
1867    if (!sel->active) return EINA_TRUE;
1868
1869    if ((sel->format & ELM_SEL_FORMAT_MARKUP) ||
1870        (sel->format & ELM_SEL_FORMAT_HTML))
1871      {
1872         *data_ret = remove_tags(sel->selbuf, size_ret);
1873      }
1874    else if (sel->format & ELM_SEL_FORMAT_TEXT)
1875      {
1876         *data_ret = strdup(sel->selbuf);
1877         *size_ret = strlen(sel->selbuf);
1878      }
1879    else if (sel->format & ELM_SEL_FORMAT_IMAGE)
1880      {
1881         cnp_debug("Image %s\n", evas_object_type_get(sel->widget));
1882         cnp_debug("Elm type: %s\n", elm_object_widget_type_get(sel->widget));
1883         evas_object_image_file_get(elm_photocam_internal_image_get(sel->widget), (const char **)data_ret, NULL);
1884         if (!*data_ret) *data_ret = strdup("No file");
1885         else *data_ret = strdup(*data_ret);
1886         *size_ret = strlen(*data_ret);
1887      }
1888    return EINA_TRUE;
1889 }
1890
1891 static Eina_Bool
1892 edje_converter(char *target __UNUSED__, void *data, int size __UNUSED__, void **data_ret, int *size_ret, Ecore_X_Atom *ttype __UNUSED__, int *typesize __UNUSED__)
1893 {
1894    Cnp_Selection *sel;
1895    sel = selections + *((int *)data);
1896 /*   if (data_ret) *data_ret = strdup(sel->selbuf);
1897    if (size_ret) *size_ret = strlen(sel->selbuf);*/
1898    char *edje = NULL;
1899
1900    if (data_ret && (sel->format == ELM_SEL_FORMAT_TEXT))
1901      {
1902         if (sel->selbuf && sel->selbuf[0] != '\0')
1903           edje = mark_up(sel->selbuf, strlen(sel->selbuf), NULL);
1904      }
1905    else if (data_ret && ((sel->format & ELM_SEL_FORMAT_HTML)))
1906      {
1907         Eina_List *nodeList = NULL;
1908         Eina_List *trail;
1909         PTagNode nodeData;
1910
1911         nodeData = _get_start_node(sel->selbuf);
1912
1913         while (nodeData)
1914           {
1915              nodeList = eina_list_append(nodeList, nodeData);
1916              nodeData = _get_next_node(nodeData);
1917           }
1918
1919         _link_match_tags(nodeList);
1920
1921         _set_HTML_tag_data(nodeList);
1922
1923 #ifdef DEBUGON
1924         _dumpNode(nodeList);
1925 #endif
1926         edje = _convert_to_edje(nodeList);
1927
1928         cnp_debug("convert edje: %s\n", edje);
1929
1930         EINA_LIST_FOREACH(nodeList, trail, nodeData)
1931            _delete_node(nodeData);
1932         eina_list_free(nodeList);
1933
1934      }
1935    if (data_ret)
1936      {
1937         if (edje)
1938           *data_ret = edje;
1939         else
1940            if (sel->selbuf)
1941              *data_ret = strdup(sel->selbuf);
1942            else
1943              *data_ret = strdup("");
1944      }
1945    if (size_ret)
1946      {
1947         if (edje)
1948           *size_ret = strlen(edje);
1949         else
1950           if (sel->selbuf)
1951             *size_ret = strlen(sel->selbuf);
1952           else
1953             *size_ret = 0;
1954      }
1955
1956    return EINA_TRUE;
1957 }
1958
1959 static Eina_Bool
1960 html_converter(char *target __UNUSED__, void *data, int size __UNUSED__, void **data_ret, int *size_ret, Ecore_X_Atom *ttype __UNUSED__, int *typesize __UNUSED__)
1961 {
1962    Cnp_Selection *sel;
1963
1964    sel = selections + *(int *)data;
1965
1966    char *html = NULL;
1967    char *convert_target = sel->selbuf;
1968    Eina_Bool convert_edje = EINA_FALSE;
1969
1970    if (data_ret && (sel->format == ELM_SEL_FORMAT_TEXT))
1971      {
1972         if (sel->selbuf && sel->selbuf[0] != '\0')
1973           {
1974              convert_target = mark_up(sel->selbuf, strlen(sel->selbuf), NULL);
1975              convert_edje = EINA_TRUE;
1976           }
1977      }
1978
1979    if (data_ret && ((sel->format & ELM_SEL_FORMAT_MARKUP) || convert_edje))
1980      {
1981         Eina_List *nodeList = NULL;
1982         Eina_List *trail;
1983         PTagNode nodeData;
1984
1985         nodeData = _get_start_node(convert_target);
1986
1987         while (nodeData)
1988           {
1989              nodeList = eina_list_append(nodeList, nodeData);
1990              nodeData = _get_next_node(nodeData);
1991           }
1992
1993         _link_match_tags(nodeList);
1994
1995         _set_EFL_tag_data(nodeList);
1996
1997 #ifdef DEBUGON
1998         _dumpNode(nodeList);
1999 #endif
2000         html = _convert_to_html(nodeList);
2001
2002         cnp_debug("convert html: %s\n", html);
2003
2004         EINA_LIST_FOREACH(nodeList, trail, nodeData)
2005            _delete_node(nodeData);
2006         eina_list_free(nodeList);
2007      }
2008    if (data_ret)
2009      {
2010         if (html)
2011           *data_ret = html;
2012         else
2013           if (sel->selbuf)
2014             *data_ret = strdup(sel->selbuf);
2015           else
2016             *data_ret = strdup("");
2017      }
2018
2019    if (size_ret)
2020      {
2021         if (html)
2022           *size_ret = strlen(html);
2023         else
2024           if (sel->selbuf)
2025             *size_ret = strlen(sel->selbuf);
2026           else
2027             *size_ret = 0;
2028      }
2029    if (convert_target != sel->selbuf)
2030      free(convert_target);
2031
2032    return EINA_TRUE;
2033 }
2034
2035 static Eina_Bool
2036 uri_converter(char *target __UNUSED__, void *data, int size __UNUSED__, void **data_ret, int *size_ret, Ecore_X_Atom *ttype __UNUSED__, int *typesize __UNUSED__)
2037 {
2038    Cnp_Selection *sel;
2039    sel = selections + *((int *)data);
2040    cnp_debug("Uri converter\n");
2041    if (data_ret) *data_ret = strdup(sel->selbuf);
2042    if (size_ret) *size_ret = strlen(sel->selbuf);
2043    return EINA_TRUE;
2044 }
2045
2046 /*
2047  * Image paste provide
2048  */
2049
2050 /* FIXME: Should add provider for each pasted item: Use data to store it
2051  * much easier */
2052 static Evas_Object *
2053 image_provider(void *images __UNUSED__, Evas_Object *entry, const char *item)
2054 {
2055    Paste_Image *pi;
2056    Eina_List *l;
2057
2058    cnp_debug("image provider for %s called\n", item);
2059    EINA_LIST_FOREACH(pastedimages, l, pi)
2060      {
2061         cnp_debug("is it %s?\n",pi->tag);
2062         if (!strcmp(pi->tag, item))
2063           {
2064              /* Found it */
2065              Evas_Object *o;
2066              o = evas_object_image_filled_add(evas_object_evas_get(entry));
2067              /* FIXME: Handle eets */
2068              cnp_debug("file is %s (object is %p)\n", pi->file, o);
2069              evas_object_image_file_set(o, pi->file, NULL);
2070              evas_object_show(o);
2071              return o;
2072           }
2073      }
2074    return NULL;
2075 }
2076
2077
2078 static Paste_Image *
2079 pasteimage_alloc(const char *file, int pathlen)
2080 {
2081    Paste_Image *pi;
2082    int len;
2083    char *buf, *filebuf;
2084    int prefixlen = strlen("file://");
2085
2086    pi = calloc(1, sizeof(Paste_Image));
2087    if (!pi) return NULL;
2088
2089    len = snprintf(NULL, 0, "pasteimage-%p", pi);
2090    len++;
2091    buf = malloc(len);
2092    if (!buf)
2093      {
2094         free(pi);
2095         return NULL;
2096      }
2097    snprintf(buf, len, "pasteimage-%p", pi);
2098    pi->tag = buf;
2099
2100    if (file)
2101      {
2102         if (strstr(file,"file://")) file += prefixlen;
2103         filebuf = alloca(pathlen + 1);
2104         strncpy(filebuf, file, pathlen);
2105         filebuf[pathlen] = 0;
2106         pi->file = strdup(filebuf);
2107      }
2108
2109    return pi;
2110 }
2111
2112 static void
2113 pasteimage_free(Paste_Image *pi)
2114 {
2115    if (!pi) return;
2116    if (pi->file) free((void*)pi->file);
2117    if (pi->tag) free((void*)pi->tag);
2118    free(pi);
2119 }
2120
2121 static Eina_Bool
2122 pasteimage_provider_set(Evas_Object *entry)
2123 {
2124    void *v;
2125    const char *type;
2126
2127    if (!entry) return EINA_FALSE;
2128    type = elm_widget_type_get(entry);
2129    cnp_debug("type is %s\n", type);
2130    if ((!type) || (strcmp(type, "entry"))) return EINA_FALSE;
2131
2132    v = evas_object_data_get(entry, PROVIDER_SET);
2133    if (!v)
2134      {
2135         evas_object_data_set(entry, PROVIDER_SET, pasteimage_provider_set);
2136         elm_entry_item_provider_append(entry, image_provider, NULL);
2137         evas_object_event_callback_add(entry, EVAS_CALLBACK_FREE,
2138                                        entry_deleted, NULL);
2139      }
2140    return EINA_TRUE;
2141 }
2142
2143
2144 static Eina_Bool
2145 pasteimage_append(Paste_Image *pi, Evas_Object *entry)
2146 {
2147    char *entrytag;
2148    int len;
2149    static const char *tagstring = "<item absize=240x180 href=file://%s></item>";
2150
2151    if (!pi) return EINA_FALSE;
2152    if (!entry) return EINA_FALSE;
2153    if (elm_entry_cnp_textonly_get(entry)) return EINA_FALSE;
2154
2155    pasteimage_provider_set(entry);
2156
2157    len = strlen(tagstring)+strlen(pi->file);
2158
2159    pastedimages = eina_list_append(pastedimages, pi);
2160    entrytag = alloca(len + 1);
2161    snprintf(entrytag, len + 1, tagstring, pi->file);
2162    elm_entry_entry_insert(entry, entrytag);
2163
2164    return EINA_TRUE;
2165 }
2166
2167 static void
2168 entry_deleted(void *images __UNUSED__, Evas *e __UNUSED__, Evas_Object *entry, void *unused __UNUSED__)
2169 {
2170    Paste_Image *pi;
2171    Eina_List *l,*next;
2172
2173    EINA_LIST_FOREACH_SAFE(pastedimages, l, next, pi)
2174      {
2175         if (pi->entry == entry)
2176           pastedimages = eina_list_remove_list(pastedimages, l);
2177      }
2178 }
2179
2180
2181 static char *
2182 remove_tags(const char *p, int *len)
2183 {
2184    char *q,*ret;
2185    int i;
2186    if (!p) return NULL;
2187
2188    q = malloc(strlen(p) + 1);
2189    if (!q) return NULL;
2190    ret = q;
2191
2192    while (*p)
2193      {
2194         if ((*p != '<') && (*p != '&')) *q++ = *p++;
2195         else if (*p == '<')
2196           {
2197              if ((p[1] == 'b') && (p[2] == 'r') &&
2198                  ((p[3] == ' ') || (p[3] == '/') || (p[3] == '>')))
2199                *q++ = '\n';
2200              while ((*p) && (*p != '>')) p++;
2201              p++;
2202           }
2203         else if (*p == '&')
2204           {
2205              p++;
2206              for (i = 0 ; i < N_ESCAPES ; i++)
2207                {
2208                   if (!strncmp(p,escapes[i].escape, strlen(escapes[i].escape)))
2209                     {
2210                        p += strlen(escapes[i].escape);
2211                        *q = escapes[i].value;
2212                        q++;
2213                        break;
2214                     }
2215                }
2216              if (i == N_ESCAPES) *q ++= '&';
2217           }
2218      }
2219    *q = 0;
2220    if (len) *len = q - ret;
2221    return ret;
2222 }
2223
2224 /* Mark up */
2225 static char *
2226 mark_up(const char *start, int inlen, int *lenp)
2227 {
2228    int l, i;
2229    const char *p;
2230    char *q, *ret;
2231    const char *endp = NULL;
2232
2233    if (!start) return NULL;
2234    if (inlen >= 0) endp = start + inlen;
2235    /* First pass: Count characters */
2236    for (l = 0, p = start; ((!endp) || (p < endp)) && (*p); p++)
2237      {
2238         for (i = 0 ; i < N_ESCAPES ; i ++)
2239           {
2240              if (*p == escapes[i].value)
2241                {
2242                   if (!iscntrl(escapes[i].value)) l++;
2243                   l += strlen(escapes[i].escape);
2244                   break;
2245                }
2246           }
2247         if (i == N_ESCAPES) l++;
2248      }
2249
2250    q = ret = malloc(l + 1);
2251
2252    /* Second pass: Change characters */
2253    for (p = start; ((!endp) || (p < endp)) && (*p); )
2254      {
2255         for (i = 0; i < N_ESCAPES; i++)
2256           {
2257              if (*p == escapes[i].value)
2258                {
2259                   if (!iscntrl(escapes[i].value)) *q++ = '&';
2260                   strcpy(q, escapes[i].escape);
2261                   q += strlen(escapes[i].escape);
2262                   p ++;
2263                   break;
2264                }
2265           }
2266         if (i == N_ESCAPES) *q++ = *p++;
2267      }
2268    *q = 0;
2269
2270    if (lenp) *lenp = l;
2271    return ret;
2272 }
2273
2274
2275 static Eina_Bool
2276 _dnd_enter(void *data __UNUSED__, int etype __UNUSED__, void *ev)
2277 {
2278    Ecore_X_Event_Xdnd_Enter *enter = ev;
2279    int i;
2280
2281    /* Skip it */
2282    if ((!enter) || (!enter->num_types) || (!enter->types)) return EINA_TRUE;
2283
2284    cnp_debug("Types\n");
2285    savedtypes.ntypes = enter->num_types;
2286    if (savedtypes.types) free(savedtypes.types);
2287    savedtypes.types = malloc(sizeof(char *) * enter->num_types);
2288    if (!savedtypes.types) return EINA_FALSE;
2289
2290    for (i = 0; i < enter->num_types; i++)
2291      {
2292         savedtypes.types[i] = eina_stringshare_add(enter->types[i]);
2293         cnp_debug("Type is %s %p %p\n", enter->types[i],
2294                   savedtypes.types[i],text_uri);
2295         if (savedtypes.types[i] == text_uri)
2296           {
2297              /* Request it, so we know what it is */
2298              cnp_debug("Sending uri request\n");
2299              savedtypes.textreq = 1;
2300              if (savedtypes.pi) pasteimage_free(savedtypes.pi);
2301              savedtypes.pi = NULL; /* FIXME: Free? */
2302              ecore_x_selection_xdnd_request(enter->win, text_uri);
2303           }
2304      }
2305
2306    /* FIXME: Find an object and make it current */
2307    return EINA_TRUE;
2308 }
2309
2310 static Eina_Bool
2311 _dnd_drop(void *data __UNUSED__, int etype __UNUSED__, void *ev)
2312 {
2313    struct _Ecore_X_Event_Xdnd_Drop *drop;
2314    Dropable *dropable;
2315    Eina_List *l;
2316    Ecore_Evas *ee;
2317    Ecore_X_Window xwin;
2318    Elm_Selection_Data ddata;
2319    int x, y, w, h;
2320    int i, j;
2321
2322    drop = ev;
2323
2324    // check we still have something to drop
2325    if (!drops) return EINA_TRUE;
2326
2327    /* Find any widget in our window; then work out geometry rel to our window */
2328    for (l = drops; l; l = l->next)
2329      {
2330         dropable = l->data;
2331         xwin = (Ecore_X_Window)ecore_evas_window_get
2332            (ecore_evas_ecore_evas_get(evas_object_evas_get
2333                                       (dropable->obj)));
2334         if (xwin == drop->win) break;
2335      }
2336    /* didn't find a window */
2337    if (!l) return EINA_TRUE;
2338
2339    /* Calculate real (widget relative) position */
2340    // - window position
2341    // - widget position
2342    ee = ecore_evas_ecore_evas_get(evas_object_evas_get(dropable->obj));
2343    ecore_evas_geometry_get(ee, &x, &y, NULL, NULL);
2344    savedtypes.x = drop->position.x - x;
2345    savedtypes.y = drop->position.y - y;
2346
2347    cnp_debug("Drop position is %d,%d\n", savedtypes.x, savedtypes.y);
2348
2349    for (; l; l = l->next)
2350      {
2351         dropable = l->data;
2352         evas_object_geometry_get(dropable->obj, &x, &y, &w, &h);
2353         if ((savedtypes.x >= x) && (savedtypes.y >= y) &&
2354             (savedtypes.x < x + w) && (savedtypes.y < y + h))
2355           break; /* found! */
2356      }
2357
2358    if (!l) return EINA_TRUE; /* didn't find one */
2359
2360    evas_object_geometry_get(dropable->obj, &x, &y, NULL, NULL);
2361    savedtypes.x -= x;
2362    savedtypes.y -= y;
2363
2364    /* Find our type from the previous list */
2365    for (i = 0; i < CNP_N_ATOMS; i++)
2366      {
2367         for (j = 0; j < savedtypes.ntypes; j++)
2368           {
2369              if (!strcmp(savedtypes.types[j], atoms[i].name)) goto found;
2370           }
2371      }
2372
2373    cnp_debug("Didn't find a target\n");
2374    return EINA_TRUE;
2375
2376 found:
2377    cnp_debug("Found a target we'd like: %s\n", atoms[i].name);
2378    cnp_debug("0x%x\n",xwin);
2379
2380    if (i == CNP_ATOM_text_urilist)
2381      {
2382         cnp_debug("We found a URI... (%scached) %s\n",
2383                   savedtypes.pi ? "" : "not ",
2384                   savedtypes.pi->file);
2385         if (savedtypes.pi)
2386           {
2387              char *entrytag;
2388              static const char *tagstring = "<item absize=240x180 href="
2389                 "file://%s></item>";
2390              ddata.x = savedtypes.x;
2391              ddata.y = savedtypes.y;
2392
2393              /* If it's markup that also supports images */
2394              if ((dropable->types & ELM_SEL_FORMAT_MARKUP) &&
2395                  (dropable->types & ELM_SEL_FORMAT_IMAGE))
2396                {
2397                   int len;
2398                   ddata.format = ELM_SEL_FORMAT_MARKUP;
2399                   pasteimage_provider_set(dropable->obj);
2400
2401                   pastedimages = eina_list_append(pastedimages, savedtypes.pi);
2402                   len = strlen(tagstring) + strlen(savedtypes.pi->file);
2403                   entrytag = alloca(len + 1);
2404                   snprintf(entrytag, len + 1, tagstring, savedtypes.pi->file);
2405                   ddata.data = entrytag;
2406                   cnp_debug("Insert %s\n", (char *)ddata.data);
2407                   dropable->dropcb(dropable->cbdata, dropable->obj, &ddata);
2408                   ecore_x_dnd_send_finished();
2409
2410                   if (savedtypes.pi) pasteimage_free(savedtypes.pi);
2411                   savedtypes.pi = NULL;
2412                   return EINA_TRUE;
2413                }
2414              else if (dropable->types & ELM_SEL_FORMAT_IMAGE)
2415                {
2416                   cnp_debug("Doing image insert (%s)\n", savedtypes.pi->file);
2417                   ddata.format = ELM_SEL_FORMAT_IMAGE;
2418                   ddata.data = (char *)savedtypes.pi->file;
2419                   dropable->dropcb(dropable->cbdata, dropable->obj, &ddata);
2420                   ecore_x_dnd_send_finished();
2421
2422                   if (savedtypes.pi) pasteimage_free(savedtypes.pi);
2423                   savedtypes.pi = NULL;
2424
2425                   return EINA_TRUE;
2426                }
2427              else
2428                {
2429                   cnp_debug("Item doesn't support images... passing\n");
2430                   pasteimage_free(savedtypes.pi);
2431                   return EINA_TRUE;
2432                }
2433           }
2434         else if (savedtypes.textreq)
2435           {
2436              /* Already asked: Pretend we asked now, and paste immediately when
2437               * it comes in */
2438              savedtypes.textreq = 0;
2439              ecore_x_dnd_send_finished();
2440              return EINA_TRUE;
2441           }
2442      }
2443
2444    cnp_debug("doing a request then\n");
2445    selections[ELM_SEL_XDND].requestwidget = dropable->obj;
2446    selections[ELM_SEL_XDND].requestformat = ELM_SEL_FORMAT_MARKUP;
2447    selections[ELM_SEL_XDND].active = EINA_TRUE;
2448
2449    ecore_x_selection_xdnd_request(xwin, atoms[i].name);
2450
2451    return EINA_TRUE;
2452 }
2453 static Eina_Bool
2454 _dnd_position(void *data __UNUSED__, int etype __UNUSED__, void *ev)
2455 {
2456    struct _Ecore_X_Event_Xdnd_Position *pos;
2457    Ecore_X_Rectangle rect;
2458
2459    pos = ev;
2460
2461    /* Need to send a status back */
2462    /* FIXME: Should check I can drop here */
2463    /* FIXME: Should highlight widget */
2464    rect.x = pos->position.x - 5;
2465    rect.y = pos->position.y - 5;
2466    rect.width = 10;
2467    rect.height = 10;
2468    ecore_x_dnd_send_status(EINA_TRUE, EINA_FALSE, rect, pos->action);
2469
2470    return EINA_TRUE;
2471 }
2472
2473 /**
2474  * When dragging this is callback response from the destination.
2475  * The important thing we care about: Can we drop; thus update cursor
2476  * appropriately.
2477  */
2478 static Eina_Bool
2479 _dnd_status(void *data __UNUSED__, int etype __UNUSED__, void *ev)
2480 {
2481    struct _Ecore_X_Event_Xdnd_Status *status = ev;
2482
2483    if (!status) return EINA_TRUE;
2484
2485    /* Only thing we care about: will accept */
2486    if (status->will_accept)
2487      {
2488         cnp_debug("Will accept\n");
2489      }
2490    else
2491      { /* Won't accept */
2492         cnp_debug("Won't accept accept\n");
2493      }
2494    return EINA_TRUE;
2495 }
2496
2497 /**
2498  * Add a widget as drop target.
2499  */
2500 Eina_Bool
2501 elm_drop_target_add(Evas_Object *obj, Elm_Sel_Type format, Elm_Drop_Cb dropcb, void *cbdata)
2502 {
2503    Dropable *drop;
2504    Ecore_X_Window xwin;
2505    Eina_List *item;
2506    int first;
2507
2508    if (!obj) return EINA_FALSE;
2509    if (!_elm_cnp_init_count) _elm_cnp_init();
2510
2511    /* Is this the first? */
2512    first = (!drops) ? 1 : 0;
2513
2514    EINA_LIST_FOREACH(drops, item, drop)
2515      {
2516         if (drop->obj == obj)
2517           {
2518              /* Update: Not a new one */
2519              drop->dropcb = dropcb;
2520              drop->cbdata = cbdata;
2521              drop->types = format;
2522              return EINA_TRUE;
2523           }
2524      }
2525
2526    /* Create new drop */
2527    drop = calloc(1, sizeof(Dropable));
2528    if (!drop) return EINA_FALSE;
2529    /* FIXME: Check for eina's deranged error method */
2530    drops = eina_list_append(drops, drop);
2531
2532    if (!drops/* || or other error */)
2533      {
2534         free(drop);
2535         return EINA_FALSE;
2536      }
2537    drop->dropcb = dropcb;
2538    drop->cbdata = cbdata;
2539    drop->types = format;
2540    drop->obj = obj;
2541
2542    evas_object_event_callback_add(obj, EVAS_CALLBACK_DEL,
2543                                   /* I love C and varargs */
2544                                   (Evas_Object_Event_Cb)elm_drop_target_del,
2545                                   obj);
2546    /* FIXME: Handle resizes */
2547
2548    /* If not the first: We're done */
2549    if (!first) return EINA_TRUE;
2550
2551    xwin = (Ecore_X_Window)ecore_evas_window_get
2552       (ecore_evas_ecore_evas_get(evas_object_evas_get(obj)));
2553
2554    ecore_x_dnd_aware_set(xwin, EINA_TRUE);
2555
2556    cnp_debug("Adding drop target calls\n");
2557    handler_enter = ecore_event_handler_add(ECORE_X_EVENT_XDND_ENTER,
2558                                            _dnd_enter, NULL);
2559    handler_pos = ecore_event_handler_add(ECORE_X_EVENT_XDND_POSITION,
2560                                          _dnd_position, NULL);
2561    handler_drop = ecore_event_handler_add(ECORE_X_EVENT_XDND_DROP,
2562                                           _dnd_drop, NULL);
2563
2564    return EINA_TRUE;
2565 }
2566
2567 Eina_Bool
2568 elm_drop_target_del(Evas_Object *obj)
2569 {
2570    Dropable *drop,*del;
2571    Eina_List *item;
2572    Ecore_X_Window xwin;
2573
2574    del = NULL;
2575    EINA_LIST_FOREACH(drops, item, drop)
2576      {
2577         if (drop->obj == obj)
2578           {
2579              drops = eina_list_remove_list(drops, item);
2580              del = drop;
2581              break;
2582           }
2583      }
2584    if (!del) return EINA_FALSE;
2585
2586    evas_object_event_callback_del(obj, EVAS_CALLBACK_FREE,
2587                                   (Evas_Object_Event_Cb)elm_drop_target_del);
2588    free(drop);
2589    /* If still drops there: All fine.. continue */
2590    if (drops) return EINA_TRUE;
2591
2592    cnp_debug("Disabling DND\n");
2593    xwin = (Ecore_X_Window)ecore_evas_window_get
2594       (ecore_evas_ecore_evas_get(evas_object_evas_get(obj)));
2595    ecore_x_dnd_aware_set(xwin, EINA_FALSE);
2596
2597    ecore_event_handler_del(handler_pos);
2598    ecore_event_handler_del(handler_drop);
2599    ecore_event_handler_del(handler_enter);
2600
2601    if (savedtypes.pi)
2602      {
2603         pasteimage_free(savedtypes.pi);
2604         savedtypes.pi = NULL;
2605      }
2606
2607    return EINA_TRUE;
2608 }
2609
2610
2611 static void
2612 _drag_mouse_up(void *un __UNUSED__, Evas *e __UNUSED__, Evas_Object *obj, void *data __UNUSED__)
2613 {
2614    evas_object_event_callback_del(obj, EVAS_CALLBACK_MOUSE_UP, _drag_mouse_up);
2615    ecore_x_dnd_drop();
2616    if (dragdonecb)
2617      {
2618         dragdonecb(dragdonecb,selections[ELM_SEL_XDND].widget);
2619         dragdonecb = NULL;
2620      }
2621    if (dragwin)
2622      {
2623         evas_object_del(dragwin);
2624         dragwin = NULL;
2625      }
2626 }
2627
2628 static void
2629 _drag_move(void *data __UNUSED__, Ecore_X_Xdnd_Position *pos)
2630 {
2631    evas_object_move(dragwin,
2632                     pos->position.x - _dragx,
2633                     pos->position.y - _dragy);
2634 }
2635
2636
2637 Eina_Bool
2638 elm_drag_start(Evas_Object *obj, Elm_Sel_Format format, const char *data, void (*dragdone) (void *data, Evas_Object *), void *donecbdata)
2639 {
2640    Ecore_X_Window xwin;
2641    Cnp_Selection *sel;
2642    Elm_Sel_Type xdnd = ELM_SEL_XDND;
2643    Ecore_Evas *ee;
2644    int x, y, x2, y2, x3, y3;
2645    Evas_Object *icon;
2646    int w, h;
2647
2648    if (!_elm_cnp_init_count) _elm_cnp_init();
2649
2650    xwin = elm_win_xwindow_get(obj);
2651
2652    cnp_debug("starting drag...\n");
2653
2654    ecore_x_dnd_type_set(xwin, "text/uri-list", 1);
2655    sel = selections + ELM_SEL_XDND;
2656    sel->active = 1;
2657    sel->widget = obj;
2658    sel->format = format;
2659    sel->selbuf = data ? strdup(data) : NULL;
2660    dragdonecb = dragdone;
2661    dragdonedata = donecbdata;
2662
2663    ecore_x_dnd_callback_pos_update_set(_drag_move, NULL);
2664    ecore_x_dnd_begin(xwin, (unsigned char *)&xdnd, sizeof(Elm_Sel_Type));
2665    evas_object_event_callback_add(obj, EVAS_CALLBACK_MOUSE_UP,
2666                                   _drag_mouse_up, NULL);
2667
2668    handler_status = ecore_event_handler_add(ECORE_X_EVENT_XDND_STATUS,
2669                                             _dnd_status, NULL);
2670
2671    dragwin = elm_win_add(NULL, "Elm Drag Object", ELM_WIN_UTILITY);
2672    elm_win_override_set(dragwin, 1);
2673
2674    /* FIXME: Images only */
2675    icon = elm_icon_add(dragwin);
2676    elm_icon_file_set(icon, data + 7, NULL); /* 7!? "file://" */
2677    elm_win_resize_object_add(dragwin,icon);
2678    evas_object_size_hint_weight_set(icon, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2679    evas_object_size_hint_align_set(icon, EVAS_HINT_FILL, EVAS_HINT_FILL);
2680
2681    /* Position subwindow appropriately */
2682    ee = ecore_evas_ecore_evas_get(evas_object_evas_get(obj));
2683    ecore_evas_geometry_get(ee, &x, &y, NULL, NULL);
2684    evas_object_geometry_get(obj, &x2, &y2, &w, &h);
2685    x += x2;
2686    y += y2;
2687    evas_object_move(dragwin, x, y);
2688    evas_object_resize(icon, w, h);
2689    evas_object_resize(dragwin, w, h);
2690
2691    evas_object_show(icon);
2692    evas_object_show(dragwin);
2693
2694    evas_pointer_canvas_xy_get(evas_object_evas_get(obj), &x3, &y3);
2695    _dragx = x3 - x2;
2696    _dragy = y3 - y2;
2697
2698    return EINA_TRUE;
2699 }
2700
2701 static Tmp_Info *
2702 elm_cnp_tempfile_create(int size)
2703 {
2704    Tmp_Info *info;
2705    const char *tmppath;
2706    int len;
2707
2708    info = malloc(sizeof(Tmp_Info));
2709    if (!info) return NULL;
2710
2711    tmppath = getenv("TMP");
2712    if (!tmppath) tmppath = P_tmpdir;
2713    len = snprintf(NULL, 0, "%s/%sXXXXXX", tmppath, "elmcnpitem-");
2714    if (len < 0)
2715      {
2716         free(info);
2717         return NULL;
2718      }
2719    len++;
2720    info->filename = malloc(len);
2721    if (!info->filename)
2722      {
2723         free(info);
2724         return NULL;
2725      }
2726    snprintf(info->filename,len,"%s/%sXXXXXX", tmppath, "elmcnpitem-");
2727
2728    info->fd = mkstemp(info->filename);
2729
2730 # ifdef __linux__
2731      {
2732         char *tmp;
2733         /* And before someone says anything see POSIX 1003.1-2008 page 400 */
2734         long pid;
2735
2736         pid = (long)getpid();
2737         /* Use pid instead of /proc/self: That way if can be passed around */
2738         len = snprintf(NULL,0,"/proc/%li/fd/%i", pid, info->fd);
2739         len++;
2740         tmp = malloc(len);
2741         if (tmp)
2742           {
2743              snprintf(tmp,len, "/proc/%li/fd/%i", pid, info->fd);
2744              unlink(info->filename);
2745              free(info->filename);
2746              info->filename = tmp;
2747           }
2748      }
2749 # endif
2750
2751    cnp_debug("filename is %s\n", info->filename);
2752    if (size < 1)
2753      {
2754         /* Set map to NULL and return */
2755         info->map = NULL;
2756         info->len = 0;
2757         return info;
2758      }
2759
2760    /* Map it in */
2761    if (ftruncate(info->fd, size))
2762      {
2763         perror("ftruncate");
2764         info->map = NULL;
2765         info->len = 0;
2766         return info;
2767      }
2768
2769    eina_mmap_safety_enabled_set(EINA_TRUE);
2770
2771    info->map = mmap(NULL, size, PROT_READ|PROT_WRITE, MAP_SHARED, info->fd, 0);
2772    if (info->map == MAP_FAILED)
2773      {
2774         perror("mmap");
2775         info->map = NULL;
2776         info->len = 0;
2777      }
2778
2779    return info;
2780 }
2781
2782
2783 static int
2784 tmpinfo_free(Tmp_Info *info)
2785 {
2786    if (!info) return 0;
2787    free(info->filename);
2788    free(info);
2789    return 0;
2790 }
2791
2792 #else
2793 /* Stubs for windows */
2794 Eina_Bool
2795 elm_drag_start(Evas_Object *o, Elm_Sel_Format f, const char *d, void (*donecb)(void *, Evas_Object *),void *cbdata)
2796 {
2797    return EINA_FALSE;
2798 }
2799
2800 Eina_Bool
2801 elm_drop_target_add(Evas_Object *obj, Elm_Sel_Type format, Elm_Drop_Cb dropcb, void *cbdata)
2802 {
2803    return EINA_FALSE;
2804 }
2805
2806 Eina_Bool
2807 elm_drop_target_del(Evas_Object *o)
2808 {
2809    return EINA_TRUE;
2810 }
2811 #endif
2812
2813 /* vim:set ts=8 sw=3 sts=3 expandtab cino=>5n-2f0^-2{2(0W1st0 :*/