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_selection_has_owner(void)
1185 {
1186 #ifdef HAVE_ELEMENTARY_X
1187    return !!ecore_x_selection_owner_get(clipboard_atom);
1188 #else
1189    return EINA_FALSE;
1190 #endif
1191 }
1192
1193 Eina_Bool
1194 elm_selection_set(Elm_Sel_Type selection, Evas_Object *widget, Elm_Sel_Format format, const char *selbuf)
1195 {
1196 #ifdef HAVE_ELEMENTARY_X
1197    Evas_Object *top = elm_widget_top_get(widget);
1198    Ecore_X_Window xwin;
1199    Cnp_Selection *sel;
1200
1201    if (top) xwin = elm_win_xwindow_get(top);
1202    else xwin = elm_win_xwindow_get(widget);
1203    if (!xwin) return EINA_FALSE;
1204    if ((unsigned int)selection >= (unsigned int)ELM_SEL_MAX) return EINA_FALSE;
1205    if (!_elm_cnp_init_count) _elm_cnp_init();
1206    if ((!selbuf) && (format != ELM_SEL_FORMAT_IMAGE))
1207      return elm_selection_clear(selection, widget);
1208
1209    sel = selections + selection;
1210
1211    sel->active = 1;
1212    sel->widget = widget;
1213
1214    sel->set(xwin, &selection, sizeof(Elm_Sel_Type));
1215    sel->format = format;
1216    sel->selbuf = selbuf ? strdup(selbuf) : NULL;
1217
1218    return EINA_TRUE;
1219 #else
1220    return EINA_FALSE;
1221 #endif
1222 }
1223
1224 Eina_Bool
1225 elm_selection_clear(Elm_Sel_Type selection, Evas_Object *widget)
1226 {
1227 #ifdef HAVE_ELEMENTARY_X
1228    Cnp_Selection *sel;
1229
1230    if ((unsigned int)selection >= (unsigned int)ELM_SEL_MAX) return EINA_FALSE;
1231    if (!_elm_cnp_init_count) _elm_cnp_init();
1232
1233    sel = selections + selection;
1234
1235    /* No longer this selection: Consider it gone! */
1236    if ((!sel->active) || (sel->widget != widget)) return EINA_TRUE;
1237
1238    sel->active = 0;
1239    sel->widget = NULL;
1240    sel->clear();
1241
1242    return EINA_TRUE;
1243 #else
1244    return EINA_FALSE;
1245 #endif
1246 }
1247
1248 Eina_Bool
1249 elm_selection_get(Elm_Sel_Type selection, Elm_Sel_Format format,
1250                   Evas_Object *widget, Elm_Drop_Cb datacb, void *udata)
1251 {
1252 #ifdef HAVE_ELEMENTARY_X
1253    Evas_Object *top;
1254    Cnp_Selection *sel;
1255
1256    if ((unsigned int)selection >= (unsigned int)ELM_SEL_MAX) return EINA_FALSE;
1257    if (!_elm_cnp_init_count) _elm_cnp_init();
1258
1259    sel = selections + selection;
1260    top = elm_widget_top_get(widget);
1261    if (!top) return EINA_FALSE;
1262
1263    sel->requestformat = format;
1264    sel->requestwidget = widget;
1265    sel->request(elm_win_xwindow_get(top), ECORE_X_SELECTION_TARGET_TARGETS);
1266    sel->datacb = datacb;
1267    sel->udata = udata;
1268
1269    return EINA_TRUE;
1270 #else
1271    return EINA_FALSE;
1272 #endif
1273 }
1274
1275 #ifdef HAVE_ELEMENTARY_X
1276
1277 static Eina_Bool
1278 _elm_cnp_init(void)
1279 {
1280    int i;
1281
1282    if (_elm_cnp_init_count++) return EINA_TRUE;
1283    for (i = 0; i < CNP_N_ATOMS; i++)
1284      {
1285         atoms[i].atom = ecore_x_atom_get(atoms[i].name);
1286         ecore_x_selection_converter_atom_add(atoms[i].atom,
1287                                              atoms[i].converter);
1288      }
1289    clipboard_atom = ecore_x_atom_get("CLIPBOARD");
1290
1291    ecore_event_handler_add(ECORE_X_EVENT_SELECTION_CLEAR, selection_clear, NULL);
1292    ecore_event_handler_add(ECORE_X_EVENT_SELECTION_NOTIFY, selection_notify, NULL);
1293
1294    text_uri = eina_stringshare_add("text/uri-list");
1295    return EINA_TRUE;
1296 }
1297
1298 static Eina_Bool
1299 selection_clear(void *udata __UNUSED__, int type __UNUSED__, void *event)
1300 {
1301    Ecore_X_Event_Selection_Clear *ev = event;
1302    Cnp_Selection *sel;
1303    int i;
1304
1305    for (i = 0; i < ELM_SEL_MAX; i++)
1306      {
1307         if (selections[i].ecore_sel == ev->selection) break;
1308      }
1309    cnp_debug("selection %d clear\n", i);
1310    /* Not me... Don't care */
1311    if (i == ELM_SEL_MAX) return ECORE_CALLBACK_PASS_ON;
1312
1313    sel = selections + i;
1314    sel->active = 0;
1315    sel->widget = NULL;
1316    sel->selbuf = NULL;
1317
1318    return ECORE_CALLBACK_PASS_ON;
1319 }
1320
1321
1322 /*
1323  * Response to a selection notify:
1324  *      - So we have asked for the selection list.
1325  *      - If it's the targets list, parse it, and fire of what we want,
1326  *      else it's the data we want.
1327  */
1328 static Eina_Bool
1329 selection_notify(void *udata __UNUSED__, int type __UNUSED__, void *event)
1330 {
1331    Ecore_X_Event_Selection_Notify *ev = event;
1332    Cnp_Selection *sel;
1333    int i;
1334
1335    cnp_debug("selection notify callback: %d\n",ev->selection);
1336    switch (ev->selection)
1337      {
1338       case ECORE_X_SELECTION_CLIPBOARD:
1339          sel = selections + ELM_SEL_CLIPBOARD;
1340          break;
1341       case ECORE_X_SELECTION_PRIMARY:
1342          sel = selections + ELM_SEL_PRIMARY;
1343          break;
1344       case ECORE_X_SELECTION_SECONDARY:
1345          sel = selections + ELM_SEL_SECONDARY;
1346          break;
1347       case ECORE_X_SELECTION_XDND:
1348          sel = selections + ELM_SEL_XDND;
1349          break;
1350       default:
1351          return ECORE_CALLBACK_PASS_ON;
1352      }
1353    cnp_debug("Target is %s\n", ev->target);
1354
1355    for (i = 0; i < CNP_N_ATOMS; i++)
1356      {
1357         if (!strcmp(ev->target, atoms[i].name))
1358           {
1359              if (atoms[i].notify)
1360                {
1361                   cnp_debug("Found something: %s\n", atoms[i].name);
1362                   atoms[i].notify(sel, ev);
1363                }
1364              else
1365                {
1366                   cnp_debug("Ignored: No handler!\n");
1367                }
1368           }
1369      }
1370
1371    return ECORE_CALLBACK_PASS_ON;
1372 }
1373
1374
1375
1376 static Eina_Bool
1377 targets_converter(char *target __UNUSED__, void *data, int size __UNUSED__, void **data_ret, int *size_ret, Ecore_X_Atom *ttype, int *typesize)
1378 {
1379    int i,count;
1380    Ecore_X_Atom *aret;
1381    Cnp_Selection *sel;
1382
1383    if (!data_ret) return EINA_FALSE;
1384    if (!data || (*((unsigned int *)data) >= ELM_SEL_MAX))
1385      return EINA_FALSE;
1386
1387    sel = selections + *((int *)data);
1388
1389    for (i = 0, count = 0; i < CNP_N_ATOMS ; i++)
1390      {
1391         if (sel->format & atoms[i].formats) count++;
1392      }
1393
1394    aret = malloc(sizeof(Ecore_X_Atom) * count);
1395    for (i = 0, count = 0; i < CNP_N_ATOMS; i++)
1396      {
1397         if (sel->format & atoms[i].formats) aret[count ++] = atoms[i].atom;
1398      }
1399
1400    *data_ret = aret;
1401    if (typesize) *typesize = 32 /* urk */;
1402    if (ttype) *ttype = ECORE_X_ATOM_ATOM;
1403    if (size_ret) *size_ret = count;
1404
1405    return EINA_TRUE;
1406 }
1407
1408 static Eina_Bool
1409 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__)
1410 {
1411    cnp_debug("Image converter called\n");
1412    return EINA_TRUE;
1413 }
1414
1415 static Eina_Bool
1416 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__)
1417 {
1418    Cnp_Selection *sel;
1419
1420    cnp_debug("Vcard send called\n");
1421
1422    sel = selections + *((int *)data);
1423
1424    if (data_ret) *data_ret = strdup(sel->selbuf);
1425    if (size_ret) *size_ret = strlen(sel->selbuf);
1426
1427    return EINA_TRUE;
1428 }
1429
1430 static Eina_Bool
1431 is_uri_type_data(Cnp_Selection *sel __UNUSED__, Ecore_X_Event_Selection_Notify *notify)
1432 {
1433    Ecore_X_Selection_Data *data;
1434    char *p;
1435
1436    data = notify->data;
1437    cnp_debug("data->format is %d %p %p\n", data->format, notify, data);
1438    if (data->content == ECORE_X_SELECTION_CONTENT_FILES) return EINA_TRUE;
1439    else p = (char *)data->data;
1440
1441    if (!p) return EINA_TRUE;
1442    cnp_debug("Got %s\n", p);
1443    if (strncmp(p, "file://", 7))
1444      {
1445         if (*p != '/') return EINA_FALSE;
1446      }
1447
1448    return EINA_TRUE;
1449 }
1450
1451 /*
1452  * Callback to handle a targets response on a selection request:
1453  * So pick the format we'd like; and then request it.
1454  */
1455 static int
1456 notify_handler_targets(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify)
1457 {
1458    Ecore_X_Selection_Data_Targets *targets;
1459    Ecore_X_Atom *atomlist;
1460    Evas_Object *top;
1461    int i, j;
1462
1463    targets = notify->data;
1464    atomlist = (Ecore_X_Atom *)(targets->data.data);
1465
1466    for (j = 1; j < CNP_N_ATOMS; j++)
1467      {
1468         cnp_debug("\t%s %d\n", atoms[j].name, atoms[j].atom);
1469         if (!(atoms[j].formats & sel->requestformat)) continue;
1470         for (i = 0; i < targets->data.length; i++)
1471           {
1472              if ((atoms[j].atom == atomlist[i]) && (atoms[j].notify))
1473                {
1474 #if 0
1475                   if ((j == CNP_ATOM_text_uri) ||
1476                       (j == CNP_ATOM_text_urilist))
1477                     {
1478                       if(!is_uri_type_data(sel, notify)) continue;
1479                     }
1480 #endif
1481                   cnp_debug("Atom %s matches\n",atoms[j].name);
1482                   goto done;
1483                }
1484           }
1485      }
1486
1487    cnp_debug("Couldn't find anything that matches\n");
1488    return ECORE_CALLBACK_PASS_ON;
1489
1490 done:
1491    top = elm_widget_top_get(sel->requestwidget);
1492    if (!top) top = sel->requestwidget;
1493    cnp_debug("Sending request for %s\n", atoms[j].name);
1494    sel->request(elm_win_xwindow_get(top), atoms[j].name);
1495
1496    return ECORE_CALLBACK_PASS_ON;
1497 }
1498
1499 static int
1500 response_handler_targets(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify)
1501 {
1502    Ecore_X_Selection_Data_Targets *targets;
1503    Ecore_X_Atom *atomlist;
1504    Evas_Object *top;
1505    int i,j;
1506
1507    targets = notify->data;
1508    atomlist = (Ecore_X_Atom *)(targets->data.data);
1509
1510    /* Start from 1: Skip targets */
1511    for (j = 1 ; j < CNP_N_ATOMS ; j ++)
1512      {
1513         if (!(atoms[j].formats & sel->requestformat)) continue;
1514         for (i = 0 ; i < targets->data.length ; i ++)
1515           {
1516              if ((atoms[j].atom == atomlist[i]) && (atoms[j].response))
1517                {
1518                   /* Found a match: Use it */
1519                   goto found;
1520                }
1521           }
1522      }
1523 found:
1524    if (j == CNP_N_ATOMS)
1525      {
1526         cnp_debug("No matching type found\n");
1527         return 0;
1528      }
1529
1530    top = elm_widget_top_get(sel->requestwidget);
1531    if (!top) return 0;
1532
1533    sel->request(elm_win_xwindow_get(top), atoms[j].name);
1534    return 0;
1535 }
1536
1537 static void
1538 entry_insert_filter(Evas_Object* entry, char* str)
1539 {
1540    if (!entry || !str)
1541      return;
1542
1543    char *insertStr = str;
1544    // if entry has text only set then remove item tags
1545    if (elm_entry_cnp_textonly_get(entry))
1546      {
1547         while (EINA_TRUE)
1548           {
1549              char *startTag = NULL;
1550              char *endTag = NULL;
1551
1552              startTag = strstr(insertStr, "<item");
1553              if (!startTag)
1554                startTag = strstr(insertStr, "</item");
1555              if (startTag)
1556                endTag = strstr(startTag, ">");
1557              else
1558                break;
1559              if (!endTag || startTag > endTag)
1560                {
1561                   cnp_debug("Broken tag: %s\n", str);
1562                   break;
1563                }
1564
1565              size_t sindex = startTag - insertStr;
1566              size_t eindex = endTag - insertStr + 1;
1567
1568              Eina_Strbuf *buf = eina_strbuf_new();
1569              if (buf)
1570                {
1571                   eina_strbuf_append(buf, insertStr);
1572                   eina_strbuf_remove(buf, sindex, eindex);
1573                   insertStr = eina_strbuf_string_steal(buf);
1574                   eina_strbuf_free(buf);
1575                }
1576           }
1577      }
1578    cnp_debug("remove item tag: %s\n", insertStr);
1579
1580    // if entry has single line set then remove <br> & <ps> tags
1581    if (elm_entry_single_line_get(entry))
1582      {
1583         Eina_Strbuf *buf = eina_strbuf_new();
1584         if (buf)
1585           {
1586              eina_strbuf_append(buf, insertStr);
1587              eina_strbuf_replace_all(buf, "<br>", "");
1588              eina_strbuf_replace_all(buf, "<ps>", "");
1589              insertStr = eina_strbuf_string_steal(buf);
1590              eina_strbuf_free(buf);
1591           }
1592      }
1593    cnp_debug("remove break tag: %s\n", insertStr);
1594
1595    elm_entry_entry_insert(entry, insertStr);
1596
1597    if (insertStr != str)
1598      free(insertStr);
1599 }
1600
1601 static int
1602 notify_handler_text(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify)
1603 {
1604    Ecore_X_Selection_Data *data;
1605    char *str;
1606
1607    data = notify->data;
1608
1609    if (sel->datacb)
1610      {
1611         Elm_Selection_Data ddata;
1612
1613         str = strdup(data->data);
1614         ddata.x = ddata.y = 0;
1615         ddata.format = ELM_SEL_FORMAT_TEXT;
1616         ddata.data = str;
1617         ddata.len = data->length;
1618         sel->datacb(sel->udata, sel->widget, &ddata);
1619         free(str);
1620         return 0;
1621      }
1622
1623    cnp_debug("Notify handler text %d %d %p\n", data->format,data->length, data->data);
1624    str = mark_up((char *)data->data, data->length, NULL);
1625    cnp_debug("String is %s (from %s)\n", str, data->data);
1626    entry_insert_filter(sel->requestwidget, str);
1627    //elm_entry_entry_insert(sel->requestwidget, str);
1628    free(str);
1629    return 0;
1630 }
1631
1632
1633 /**
1634  * So someone is pasting an image into my entry or widget...
1635  */
1636 static int
1637 notify_handler_uri(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify)
1638 {
1639    Ecore_X_Selection_Data *data;
1640    Ecore_X_Selection_Data_Files *files;
1641    Paste_Image *pi;
1642    char *p, *stripstr;
1643
1644    data = notify->data;
1645    cnp_debug("data->format is %d %p %p\n", data->format, notify, data);
1646    if (data->content == ECORE_X_SELECTION_CONTENT_FILES)
1647      {
1648         cnp_debug("got a files list\n");
1649         files = notify->data;
1650         if (files->num_files > 1)
1651           {
1652              /* Don't handle many items */
1653              cnp_debug("more then one file: Bailing\n");
1654              return 0;
1655           }
1656         stripstr = p = strdup(files->files[0]);
1657      }
1658    else
1659      {
1660         stripstr = p = strndup((char *)data->data, data->length);
1661      }
1662
1663    if (!p)
1664      {
1665         cnp_debug("Couldn't find a file\n");
1666         return 0;
1667      }
1668    cnp_debug("Got %s\n",p);
1669    if (sel->datacb)
1670      {
1671         Elm_Selection_Data ddata;
1672
1673         ddata.x = ddata.y = 0;
1674         ddata.format = ELM_SEL_FORMAT_MARKUP;
1675         ddata.data = p;
1676         ddata.len = data->length;
1677         sel->datacb(sel->udata, sel->widget, &ddata);
1678         free(p);
1679         return 0;
1680      }
1681    if (strncmp(p, "file://", 7))
1682      {
1683         /* Try and continue if it looks sane */
1684         if (*p != '/')
1685           {
1686              free(p);
1687              return 0;
1688           }
1689      }
1690    else
1691      {
1692         p += strlen("file://");
1693      }
1694
1695    if (savedtypes.pi) pasteimage_free(savedtypes.pi);
1696    pi = pasteimage_alloc(p, strlen(p));
1697    if (savedtypes.textreq)
1698      {
1699         savedtypes.textreq = 0;
1700         savedtypes.pi = pi;
1701      }
1702    else
1703      {
1704         pasteimage_append(pi, sel->requestwidget);
1705         savedtypes.pi = NULL;
1706      }
1707    free(stripstr);
1708    return 0;
1709 }
1710
1711 /**
1712  * Just receieved an vcard, either through cut and paste, or dnd.
1713  */
1714 static int
1715 vcard_receive(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify)
1716 {
1717    Dropable *dropable;
1718    Eina_List *l;
1719    Ecore_X_Selection_Data *data;
1720
1721    data = notify->data;
1722    cnp_debug("vcard receive\n");
1723
1724    if (sel == (selections + ELM_SEL_XDND))
1725      {
1726         Elm_Selection_Data ddata;
1727
1728         cnp_debug("drag & drop\n");
1729         /* FIXME: this needs to be generic: Used for all receives */
1730         EINA_LIST_FOREACH(drops, l, dropable)
1731           {
1732              if (dropable->obj == sel->requestwidget) break;
1733           }
1734         if (!dropable)
1735           {
1736              cnp_debug("Unable to find drop object");
1737              ecore_x_dnd_send_finished();
1738              return 0;
1739           }
1740         dropable = eina_list_data_get(l);
1741         ddata.x = savedtypes.x;
1742         ddata.y = savedtypes.y;
1743         ddata.format = ELM_SEL_FORMAT_VCARD;
1744         ddata.data = data->data;
1745         ddata.len = data->length;
1746         dropable->dropcb(dropable->cbdata, dropable->obj, &ddata);
1747         ecore_x_dnd_send_finished();
1748      }
1749    else if (sel->datacb)
1750      {
1751         Elm_Selection_Data ddata;
1752         ddata.x = ddata.y = 0;
1753         ddata.format = ELM_SEL_FORMAT_IMAGE;
1754         ddata.data = data->data;
1755         ddata.len = data->length;
1756         sel->datacb(sel->udata, sel->widget, &ddata);
1757      }
1758    else
1759      {
1760         cnp_debug("Paste request\n");
1761      }
1762
1763    return 0;
1764
1765 }
1766
1767
1768 static int
1769 notify_handler_image(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify)
1770 {
1771    Ecore_X_Selection_Data *data;
1772    Tmp_Info *tmp;
1773    Paste_Image *pi;
1774
1775    cnp_debug("got a png (or a jpeg)!\n");
1776    data = notify->data;
1777
1778    cnp_debug("Size if %d\n", data->length);
1779
1780    if (sel->datacb)
1781      {
1782         Elm_Selection_Data ddata;
1783
1784         ddata.x = ddata.y = 0;
1785         ddata.format = ELM_SEL_FORMAT_IMAGE;
1786         ddata.data = data->data;
1787         ddata.len = data->length;
1788         sel->datacb(sel->udata, sel->widget, &ddata);
1789         return 0;
1790      }
1791
1792    /* generate tmp name */
1793    tmp = elm_cnp_tempfile_create(data->length);
1794    memcpy(tmp->map, data->data, data->length);
1795    munmap(tmp->map,data->length);
1796
1797    /* FIXME: Add to paste image data to clean up */
1798    pi = pasteimage_alloc(tmp->filename, strlen(tmp->filename));
1799    pasteimage_append(pi, sel->requestwidget);
1800
1801    tmpinfo_free(tmp);
1802    return 0;
1803 }
1804
1805 static int
1806 notify_handler_edje(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify)
1807 {
1808    Ecore_X_Selection_Data *data;
1809
1810    data = notify->data;
1811
1812    char *stripstr = NULL;
1813    stripstr = malloc(sizeof(char) * (data->length + 1));
1814    strncpy(stripstr, (char *)data->data, data->length);
1815    stripstr[data->length] = '\0';
1816
1817    if (sel->datacb)
1818      {
1819         Elm_Selection_Data ddata;
1820         ddata.x = ddata.y = 0;
1821         ddata.format = ELM_SEL_FORMAT_MARKUP;
1822         ddata.data = stripstr;
1823         ddata.len = data->length;
1824         sel->datacb(sel->udata, sel->widget, &ddata);
1825      }
1826    else
1827      entry_insert_filter(sel->requestwidget, stripstr);
1828      //elm_entry_entry_insert(sel->requestwidget, stripstr);
1829
1830    cnp_debug("String is %s (%d bytes)\n", stripstr, data->length);
1831    free(stripstr);
1832    return 0;
1833 }
1834
1835 /**
1836  *    Warning: Generic text/html can';t handle it sanely.
1837  *    Firefox sends ucs2 (i think).
1838  *       chrome sends utf8... blerg
1839  */
1840 static int
1841 notify_handler_html(Cnp_Selection *sel, Ecore_X_Event_Selection_Notify *notify)
1842 {
1843    Ecore_X_Selection_Data *data;
1844
1845    cnp_debug("Got some HTML: Checking encoding is useful\n");
1846    data = notify->data;
1847
1848    char *stripstr = NULL;
1849    stripstr = malloc(sizeof(char) * (data->length + 1));
1850    strncpy(stripstr, (char *)data->data, data->length);
1851    stripstr[data->length] = '\0';
1852
1853    if (sel->datacb)
1854      {
1855         Elm_Selection_Data ddata;
1856         ddata.x = ddata.y = 0;
1857         ddata.format = ELM_SEL_FORMAT_HTML;
1858         ddata.data = stripstr;
1859         ddata.len = data->length;
1860         sel->datacb(sel->udata, sel->widget, &ddata);
1861      }
1862    else
1863      entry_insert_filter(sel->requestwidget, stripstr);
1864      //elm_entry_entry_insert(sel->requestwidget, stripstr);
1865
1866    cnp_debug("String is %s (%d bytes)\n", stripstr, data->length);
1867    free(stripstr);
1868    return 0;
1869 }
1870
1871
1872 static Eina_Bool
1873 text_converter(char *target __UNUSED__, void *data, int size __UNUSED__, void **data_ret, int *size_ret, Ecore_X_Atom *ttype __UNUSED__, int *typesize __UNUSED__)
1874 {
1875    Cnp_Selection *sel;
1876
1877    cnp_debug("text converter\n");
1878    sel = selections + *((int *)data);
1879    if (!sel->active) return EINA_TRUE;
1880
1881    if ((sel->format & ELM_SEL_FORMAT_MARKUP) ||
1882        (sel->format & ELM_SEL_FORMAT_HTML))
1883      {
1884         *data_ret = remove_tags(sel->selbuf, size_ret);
1885      }
1886    else if (sel->format & ELM_SEL_FORMAT_TEXT)
1887      {
1888         *data_ret = strdup(sel->selbuf);
1889         *size_ret = strlen(sel->selbuf);
1890      }
1891    else if (sel->format & ELM_SEL_FORMAT_IMAGE)
1892      {
1893         cnp_debug("Image %s\n", evas_object_type_get(sel->widget));
1894         cnp_debug("Elm type: %s\n", elm_object_widget_type_get(sel->widget));
1895         evas_object_image_file_get(elm_photocam_internal_image_get(sel->widget), (const char **)data_ret, NULL);
1896         if (!*data_ret) *data_ret = strdup("No file");
1897         else *data_ret = strdup(*data_ret);
1898         *size_ret = strlen(*data_ret);
1899      }
1900    return EINA_TRUE;
1901 }
1902
1903 static Eina_Bool
1904 edje_converter(char *target __UNUSED__, void *data, int size __UNUSED__, void **data_ret, int *size_ret, Ecore_X_Atom *ttype __UNUSED__, int *typesize __UNUSED__)
1905 {
1906    Cnp_Selection *sel;
1907    sel = selections + *((int *)data);
1908 /*   if (data_ret) *data_ret = strdup(sel->selbuf);
1909    if (size_ret) *size_ret = strlen(sel->selbuf);*/
1910    char *edje = NULL;
1911
1912    if (data_ret && (sel->format == ELM_SEL_FORMAT_TEXT))
1913      {
1914         if (sel->selbuf && sel->selbuf[0] != '\0')
1915           edje = mark_up(sel->selbuf, strlen(sel->selbuf), NULL);
1916      }
1917    else if (data_ret && ((sel->format & ELM_SEL_FORMAT_HTML)))
1918      {
1919         Eina_List *nodeList = NULL;
1920         Eina_List *trail;
1921         PTagNode nodeData;
1922
1923         nodeData = _get_start_node(sel->selbuf);
1924
1925         while (nodeData)
1926           {
1927              nodeList = eina_list_append(nodeList, nodeData);
1928              nodeData = _get_next_node(nodeData);
1929           }
1930
1931         _link_match_tags(nodeList);
1932
1933         _set_HTML_tag_data(nodeList);
1934
1935 #ifdef DEBUGON
1936         _dumpNode(nodeList);
1937 #endif
1938         edje = _convert_to_edje(nodeList);
1939
1940         cnp_debug("convert edje: %s\n", edje);
1941
1942         EINA_LIST_FOREACH(nodeList, trail, nodeData)
1943            _delete_node(nodeData);
1944         eina_list_free(nodeList);
1945
1946      }
1947    if (data_ret)
1948      {
1949         if (edje)
1950           *data_ret = edje;
1951         else
1952            if (sel->selbuf)
1953              *data_ret = strdup(sel->selbuf);
1954            else
1955              *data_ret = strdup("");
1956      }
1957    if (size_ret)
1958      {
1959         if (edje)
1960           *size_ret = strlen(edje);
1961         else
1962           if (sel->selbuf)
1963             *size_ret = strlen(sel->selbuf);
1964           else
1965             *size_ret = 0;
1966      }
1967
1968    return EINA_TRUE;
1969 }
1970
1971 static Eina_Bool
1972 html_converter(char *target __UNUSED__, void *data, int size __UNUSED__, void **data_ret, int *size_ret, Ecore_X_Atom *ttype __UNUSED__, int *typesize __UNUSED__)
1973 {
1974    Cnp_Selection *sel;
1975
1976    sel = selections + *(int *)data;
1977
1978    char *html = NULL;
1979    char *convert_target = sel->selbuf;
1980    Eina_Bool convert_edje = EINA_FALSE;
1981
1982    if (data_ret && (sel->format == ELM_SEL_FORMAT_TEXT))
1983      {
1984         if (sel->selbuf && sel->selbuf[0] != '\0')
1985           {
1986              convert_target = mark_up(sel->selbuf, strlen(sel->selbuf), NULL);
1987              convert_edje = EINA_TRUE;
1988           }
1989      }
1990
1991    if (data_ret && ((sel->format & ELM_SEL_FORMAT_MARKUP) || convert_edje))
1992      {
1993         Eina_List *nodeList = NULL;
1994         Eina_List *trail;
1995         PTagNode nodeData;
1996
1997         nodeData = _get_start_node(convert_target);
1998
1999         while (nodeData)
2000           {
2001              nodeList = eina_list_append(nodeList, nodeData);
2002              nodeData = _get_next_node(nodeData);
2003           }
2004
2005         _link_match_tags(nodeList);
2006
2007         _set_EFL_tag_data(nodeList);
2008
2009 #ifdef DEBUGON
2010         _dumpNode(nodeList);
2011 #endif
2012         html = _convert_to_html(nodeList);
2013
2014         cnp_debug("convert html: %s\n", html);
2015
2016         EINA_LIST_FOREACH(nodeList, trail, nodeData)
2017            _delete_node(nodeData);
2018         eina_list_free(nodeList);
2019      }
2020    if (data_ret)
2021      {
2022         if (html)
2023           *data_ret = html;
2024         else
2025           if (sel->selbuf)
2026             *data_ret = strdup(sel->selbuf);
2027           else
2028             *data_ret = strdup("");
2029      }
2030
2031    if (size_ret)
2032      {
2033         if (html)
2034           *size_ret = strlen(html);
2035         else
2036           if (sel->selbuf)
2037             *size_ret = strlen(sel->selbuf);
2038           else
2039             *size_ret = 0;
2040      }
2041    if (convert_target != sel->selbuf)
2042      free(convert_target);
2043
2044    return EINA_TRUE;
2045 }
2046
2047 static Eina_Bool
2048 uri_converter(char *target __UNUSED__, void *data, int size __UNUSED__, void **data_ret, int *size_ret, Ecore_X_Atom *ttype __UNUSED__, int *typesize __UNUSED__)
2049 {
2050    Cnp_Selection *sel;
2051    sel = selections + *((int *)data);
2052    cnp_debug("Uri converter\n");
2053    if (data_ret) *data_ret = strdup(sel->selbuf);
2054    if (size_ret) *size_ret = strlen(sel->selbuf);
2055    return EINA_TRUE;
2056 }
2057
2058 /*
2059  * Image paste provide
2060  */
2061
2062 /* FIXME: Should add provider for each pasted item: Use data to store it
2063  * much easier */
2064 static Evas_Object *
2065 image_provider(void *images __UNUSED__, Evas_Object *entry, const char *item)
2066 {
2067    Paste_Image *pi;
2068    Eina_List *l;
2069
2070    cnp_debug("image provider for %s called\n", item);
2071    EINA_LIST_FOREACH(pastedimages, l, pi)
2072      {
2073         cnp_debug("is it %s?\n",pi->tag);
2074         if (!strcmp(pi->tag, item))
2075           {
2076              /* Found it */
2077              Evas_Object *o;
2078              o = evas_object_image_filled_add(evas_object_evas_get(entry));
2079              /* FIXME: Handle eets */
2080              cnp_debug("file is %s (object is %p)\n", pi->file, o);
2081              evas_object_image_file_set(o, pi->file, NULL);
2082              evas_object_show(o);
2083              return o;
2084           }
2085      }
2086    return NULL;
2087 }
2088
2089
2090 static Paste_Image *
2091 pasteimage_alloc(const char *file, int pathlen)
2092 {
2093    Paste_Image *pi;
2094    int len;
2095    char *buf, *filebuf;
2096    int prefixlen = strlen("file://");
2097
2098    pi = calloc(1, sizeof(Paste_Image));
2099    if (!pi) return NULL;
2100
2101    len = snprintf(NULL, 0, "pasteimage-%p", pi);
2102    len++;
2103    buf = malloc(len);
2104    if (!buf)
2105      {
2106         free(pi);
2107         return NULL;
2108      }
2109    snprintf(buf, len, "pasteimage-%p", pi);
2110    pi->tag = buf;
2111
2112    if (file)
2113      {
2114         if (strstr(file,"file://")) file += prefixlen;
2115         filebuf = alloca(pathlen + 1);
2116         strncpy(filebuf, file, pathlen);
2117         filebuf[pathlen] = 0;
2118         pi->file = strdup(filebuf);
2119      }
2120
2121    return pi;
2122 }
2123
2124 static void
2125 pasteimage_free(Paste_Image *pi)
2126 {
2127    if (!pi) return;
2128    if (pi->file) free((void*)pi->file);
2129    if (pi->tag) free((void*)pi->tag);
2130    free(pi);
2131 }
2132
2133 static Eina_Bool
2134 pasteimage_provider_set(Evas_Object *entry)
2135 {
2136    void *v;
2137    const char *type;
2138
2139    if (!entry) return EINA_FALSE;
2140    type = elm_widget_type_get(entry);
2141    cnp_debug("type is %s\n", type);
2142    if ((!type) || (strcmp(type, "entry"))) return EINA_FALSE;
2143
2144    v = evas_object_data_get(entry, PROVIDER_SET);
2145    if (!v)
2146      {
2147         evas_object_data_set(entry, PROVIDER_SET, pasteimage_provider_set);
2148         elm_entry_item_provider_append(entry, image_provider, NULL);
2149         evas_object_event_callback_add(entry, EVAS_CALLBACK_FREE,
2150                                        entry_deleted, NULL);
2151      }
2152    return EINA_TRUE;
2153 }
2154
2155
2156 static Eina_Bool
2157 pasteimage_append(Paste_Image *pi, Evas_Object *entry)
2158 {
2159    char *entrytag;
2160    int len;
2161    static const char *tagstring = "<item absize=240x180 href=file://%s></item>";
2162
2163    if (!pi) return EINA_FALSE;
2164    if (!entry) return EINA_FALSE;
2165    if (elm_entry_cnp_textonly_get(entry)) return EINA_FALSE;
2166
2167    pasteimage_provider_set(entry);
2168
2169    len = strlen(tagstring)+strlen(pi->file);
2170
2171    pastedimages = eina_list_append(pastedimages, pi);
2172    entrytag = alloca(len + 1);
2173    snprintf(entrytag, len + 1, tagstring, pi->file);
2174    elm_entry_entry_insert(entry, entrytag);
2175
2176    return EINA_TRUE;
2177 }
2178
2179 static void
2180 entry_deleted(void *images __UNUSED__, Evas *e __UNUSED__, Evas_Object *entry, void *unused __UNUSED__)
2181 {
2182    Paste_Image *pi;
2183    Eina_List *l,*next;
2184
2185    EINA_LIST_FOREACH_SAFE(pastedimages, l, next, pi)
2186      {
2187         if (pi->entry == entry)
2188           pastedimages = eina_list_remove_list(pastedimages, l);
2189      }
2190 }
2191
2192
2193 static char *
2194 remove_tags(const char *p, int *len)
2195 {
2196    char *q,*ret;
2197    int i;
2198    if (!p) return NULL;
2199
2200    q = malloc(strlen(p) + 1);
2201    if (!q) return NULL;
2202    ret = q;
2203
2204    while (*p)
2205      {
2206         if ((*p != '<') && (*p != '&')) *q++ = *p++;
2207         else if (*p == '<')
2208           {
2209              if ((p[1] == 'b') && (p[2] == 'r') &&
2210                  ((p[3] == ' ') || (p[3] == '/') || (p[3] == '>')))
2211                *q++ = '\n';
2212              while ((*p) && (*p != '>')) p++;
2213              p++;
2214           }
2215         else if (*p == '&')
2216           {
2217              p++;
2218              for (i = 0 ; i < N_ESCAPES ; i++)
2219                {
2220                   if (!strncmp(p,escapes[i].escape, strlen(escapes[i].escape)))
2221                     {
2222                        p += strlen(escapes[i].escape);
2223                        *q = escapes[i].value;
2224                        q++;
2225                        break;
2226                     }
2227                }
2228              if (i == N_ESCAPES) *q ++= '&';
2229           }
2230      }
2231    *q = 0;
2232    if (len) *len = q - ret;
2233    return ret;
2234 }
2235
2236 /* Mark up */
2237 static char *
2238 mark_up(const char *start, int inlen, int *lenp)
2239 {
2240    int l, i;
2241    const char *p;
2242    char *q, *ret;
2243    const char *endp = NULL;
2244
2245    if (!start) return NULL;
2246    if (inlen >= 0) endp = start + inlen;
2247    /* First pass: Count characters */
2248    for (l = 0, p = start; ((!endp) || (p < endp)) && (*p); p++)
2249      {
2250         for (i = 0 ; i < N_ESCAPES ; i ++)
2251           {
2252              if (*p == escapes[i].value)
2253                {
2254                   if (!iscntrl(escapes[i].value)) l++;
2255                   l += strlen(escapes[i].escape);
2256                   break;
2257                }
2258           }
2259         if (i == N_ESCAPES) l++;
2260      }
2261
2262    q = ret = malloc(l + 1);
2263
2264    /* Second pass: Change characters */
2265    for (p = start; ((!endp) || (p < endp)) && (*p); )
2266      {
2267         for (i = 0; i < N_ESCAPES; i++)
2268           {
2269              if (*p == escapes[i].value)
2270                {
2271                   if (!iscntrl(escapes[i].value)) *q++ = '&';
2272                   strcpy(q, escapes[i].escape);
2273                   q += strlen(escapes[i].escape);
2274                   p ++;
2275                   break;
2276                }
2277           }
2278         if (i == N_ESCAPES) *q++ = *p++;
2279      }
2280    *q = 0;
2281
2282    if (lenp) *lenp = l;
2283    return ret;
2284 }
2285
2286
2287 static Eina_Bool
2288 _dnd_enter(void *data __UNUSED__, int etype __UNUSED__, void *ev)
2289 {
2290    Ecore_X_Event_Xdnd_Enter *enter = ev;
2291    int i;
2292
2293    /* Skip it */
2294    if ((!enter) || (!enter->num_types) || (!enter->types)) return EINA_TRUE;
2295
2296    cnp_debug("Types\n");
2297    savedtypes.ntypes = enter->num_types;
2298    if (savedtypes.types) free(savedtypes.types);
2299    savedtypes.types = malloc(sizeof(char *) * enter->num_types);
2300    if (!savedtypes.types) return EINA_FALSE;
2301
2302    for (i = 0; i < enter->num_types; i++)
2303      {
2304         savedtypes.types[i] = eina_stringshare_add(enter->types[i]);
2305         cnp_debug("Type is %s %p %p\n", enter->types[i],
2306                   savedtypes.types[i],text_uri);
2307         if (savedtypes.types[i] == text_uri)
2308           {
2309              /* Request it, so we know what it is */
2310              cnp_debug("Sending uri request\n");
2311              savedtypes.textreq = 1;
2312              if (savedtypes.pi) pasteimage_free(savedtypes.pi);
2313              savedtypes.pi = NULL; /* FIXME: Free? */
2314              ecore_x_selection_xdnd_request(enter->win, text_uri);
2315           }
2316      }
2317
2318    /* FIXME: Find an object and make it current */
2319    return EINA_TRUE;
2320 }
2321
2322 static Eina_Bool
2323 _dnd_drop(void *data __UNUSED__, int etype __UNUSED__, void *ev)
2324 {
2325    struct _Ecore_X_Event_Xdnd_Drop *drop;
2326    Dropable *dropable;
2327    Eina_List *l;
2328    Ecore_Evas *ee;
2329    Ecore_X_Window xwin;
2330    Elm_Selection_Data ddata;
2331    int x, y, w, h;
2332    int i, j;
2333
2334    drop = ev;
2335
2336    // check we still have something to drop
2337    if (!drops) return EINA_TRUE;
2338
2339    /* Find any widget in our window; then work out geometry rel to our window */
2340    for (l = drops; l; l = l->next)
2341      {
2342         dropable = l->data;
2343         xwin = (Ecore_X_Window)ecore_evas_window_get
2344            (ecore_evas_ecore_evas_get(evas_object_evas_get
2345                                       (dropable->obj)));
2346         if (xwin == drop->win) break;
2347      }
2348    /* didn't find a window */
2349    if (!l) return EINA_TRUE;
2350
2351    /* Calculate real (widget relative) position */
2352    // - window position
2353    // - widget position
2354    ee = ecore_evas_ecore_evas_get(evas_object_evas_get(dropable->obj));
2355    ecore_evas_geometry_get(ee, &x, &y, NULL, NULL);
2356    savedtypes.x = drop->position.x - x;
2357    savedtypes.y = drop->position.y - y;
2358
2359    cnp_debug("Drop position is %d,%d\n", savedtypes.x, savedtypes.y);
2360
2361    for (; l; l = l->next)
2362      {
2363         dropable = l->data;
2364         evas_object_geometry_get(dropable->obj, &x, &y, &w, &h);
2365         if ((savedtypes.x >= x) && (savedtypes.y >= y) &&
2366             (savedtypes.x < x + w) && (savedtypes.y < y + h))
2367           break; /* found! */
2368      }
2369
2370    if (!l) return EINA_TRUE; /* didn't find one */
2371
2372    evas_object_geometry_get(dropable->obj, &x, &y, NULL, NULL);
2373    savedtypes.x -= x;
2374    savedtypes.y -= y;
2375
2376    /* Find our type from the previous list */
2377    for (i = 0; i < CNP_N_ATOMS; i++)
2378      {
2379         for (j = 0; j < savedtypes.ntypes; j++)
2380           {
2381              if (!strcmp(savedtypes.types[j], atoms[i].name)) goto found;
2382           }
2383      }
2384
2385    cnp_debug("Didn't find a target\n");
2386    return EINA_TRUE;
2387
2388 found:
2389    cnp_debug("Found a target we'd like: %s\n", atoms[i].name);
2390    cnp_debug("0x%x\n",xwin);
2391
2392    if (i == CNP_ATOM_text_urilist)
2393      {
2394         cnp_debug("We found a URI... (%scached) %s\n",
2395                   savedtypes.pi ? "" : "not ",
2396                   savedtypes.pi->file);
2397         if (savedtypes.pi)
2398           {
2399              char *entrytag;
2400              static const char *tagstring = "<item absize=240x180 href="
2401                 "file://%s></item>";
2402              ddata.x = savedtypes.x;
2403              ddata.y = savedtypes.y;
2404
2405              /* If it's markup that also supports images */
2406              if ((dropable->types & ELM_SEL_FORMAT_MARKUP) &&
2407                  (dropable->types & ELM_SEL_FORMAT_IMAGE))
2408                {
2409                   int len;
2410                   ddata.format = ELM_SEL_FORMAT_MARKUP;
2411                   pasteimage_provider_set(dropable->obj);
2412
2413                   pastedimages = eina_list_append(pastedimages, savedtypes.pi);
2414                   len = strlen(tagstring) + strlen(savedtypes.pi->file);
2415                   entrytag = alloca(len + 1);
2416                   snprintf(entrytag, len + 1, tagstring, savedtypes.pi->file);
2417                   ddata.data = entrytag;
2418                   cnp_debug("Insert %s\n", (char *)ddata.data);
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                   return EINA_TRUE;
2425                }
2426              else if (dropable->types & ELM_SEL_FORMAT_IMAGE)
2427                {
2428                   cnp_debug("Doing image insert (%s)\n", savedtypes.pi->file);
2429                   ddata.format = ELM_SEL_FORMAT_IMAGE;
2430                   ddata.data = (char *)savedtypes.pi->file;
2431                   dropable->dropcb(dropable->cbdata, dropable->obj, &ddata);
2432                   ecore_x_dnd_send_finished();
2433
2434                   if (savedtypes.pi) pasteimage_free(savedtypes.pi);
2435                   savedtypes.pi = NULL;
2436
2437                   return EINA_TRUE;
2438                }
2439              else
2440                {
2441                   cnp_debug("Item doesn't support images... passing\n");
2442                   pasteimage_free(savedtypes.pi);
2443                   return EINA_TRUE;
2444                }
2445           }
2446         else if (savedtypes.textreq)
2447           {
2448              /* Already asked: Pretend we asked now, and paste immediately when
2449               * it comes in */
2450              savedtypes.textreq = 0;
2451              ecore_x_dnd_send_finished();
2452              return EINA_TRUE;
2453           }
2454      }
2455
2456    cnp_debug("doing a request then\n");
2457    selections[ELM_SEL_XDND].requestwidget = dropable->obj;
2458    selections[ELM_SEL_XDND].requestformat = ELM_SEL_FORMAT_MARKUP;
2459    selections[ELM_SEL_XDND].active = EINA_TRUE;
2460
2461    ecore_x_selection_xdnd_request(xwin, atoms[i].name);
2462
2463    return EINA_TRUE;
2464 }
2465 static Eina_Bool
2466 _dnd_position(void *data __UNUSED__, int etype __UNUSED__, void *ev)
2467 {
2468    struct _Ecore_X_Event_Xdnd_Position *pos;
2469    Ecore_X_Rectangle rect;
2470
2471    pos = ev;
2472
2473    /* Need to send a status back */
2474    /* FIXME: Should check I can drop here */
2475    /* FIXME: Should highlight widget */
2476    rect.x = pos->position.x - 5;
2477    rect.y = pos->position.y - 5;
2478    rect.width = 10;
2479    rect.height = 10;
2480    ecore_x_dnd_send_status(EINA_TRUE, EINA_FALSE, rect, pos->action);
2481
2482    return EINA_TRUE;
2483 }
2484
2485 /**
2486  * When dragging this is callback response from the destination.
2487  * The important thing we care about: Can we drop; thus update cursor
2488  * appropriately.
2489  */
2490 static Eina_Bool
2491 _dnd_status(void *data __UNUSED__, int etype __UNUSED__, void *ev)
2492 {
2493    struct _Ecore_X_Event_Xdnd_Status *status = ev;
2494
2495    if (!status) return EINA_TRUE;
2496
2497    /* Only thing we care about: will accept */
2498    if (status->will_accept)
2499      {
2500         cnp_debug("Will accept\n");
2501      }
2502    else
2503      { /* Won't accept */
2504         cnp_debug("Won't accept accept\n");
2505      }
2506    return EINA_TRUE;
2507 }
2508
2509 /**
2510  * Add a widget as drop target.
2511  */
2512 Eina_Bool
2513 elm_drop_target_add(Evas_Object *obj, Elm_Sel_Type format, Elm_Drop_Cb dropcb, void *cbdata)
2514 {
2515    Dropable *drop;
2516    Ecore_X_Window xwin;
2517    Eina_List *item;
2518    int first;
2519
2520    if (!obj) return EINA_FALSE;
2521    if (!_elm_cnp_init_count) _elm_cnp_init();
2522
2523    /* Is this the first? */
2524    first = (!drops) ? 1 : 0;
2525
2526    EINA_LIST_FOREACH(drops, item, drop)
2527      {
2528         if (drop->obj == obj)
2529           {
2530              /* Update: Not a new one */
2531              drop->dropcb = dropcb;
2532              drop->cbdata = cbdata;
2533              drop->types = format;
2534              return EINA_TRUE;
2535           }
2536      }
2537
2538    /* Create new drop */
2539    drop = calloc(1, sizeof(Dropable));
2540    if (!drop) return EINA_FALSE;
2541    /* FIXME: Check for eina's deranged error method */
2542    drops = eina_list_append(drops, drop);
2543
2544    if (!drops/* || or other error */)
2545      {
2546         free(drop);
2547         return EINA_FALSE;
2548      }
2549    drop->dropcb = dropcb;
2550    drop->cbdata = cbdata;
2551    drop->types = format;
2552    drop->obj = obj;
2553
2554    evas_object_event_callback_add(obj, EVAS_CALLBACK_DEL,
2555                                   /* I love C and varargs */
2556                                   (Evas_Object_Event_Cb)elm_drop_target_del,
2557                                   obj);
2558    /* FIXME: Handle resizes */
2559
2560    /* If not the first: We're done */
2561    if (!first) return EINA_TRUE;
2562
2563    xwin = (Ecore_X_Window)ecore_evas_window_get
2564       (ecore_evas_ecore_evas_get(evas_object_evas_get(obj)));
2565
2566    ecore_x_dnd_aware_set(xwin, EINA_TRUE);
2567
2568    cnp_debug("Adding drop target calls\n");
2569    handler_enter = ecore_event_handler_add(ECORE_X_EVENT_XDND_ENTER,
2570                                            _dnd_enter, NULL);
2571    handler_pos = ecore_event_handler_add(ECORE_X_EVENT_XDND_POSITION,
2572                                          _dnd_position, NULL);
2573    handler_drop = ecore_event_handler_add(ECORE_X_EVENT_XDND_DROP,
2574                                           _dnd_drop, NULL);
2575
2576    return EINA_TRUE;
2577 }
2578
2579 Eina_Bool
2580 elm_drop_target_del(Evas_Object *obj)
2581 {
2582    Dropable *drop,*del;
2583    Eina_List *item;
2584    Ecore_X_Window xwin;
2585
2586    del = NULL;
2587    EINA_LIST_FOREACH(drops, item, drop)
2588      {
2589         if (drop->obj == obj)
2590           {
2591              drops = eina_list_remove_list(drops, item);
2592              del = drop;
2593              break;
2594           }
2595      }
2596    if (!del) return EINA_FALSE;
2597
2598    evas_object_event_callback_del(obj, EVAS_CALLBACK_FREE,
2599                                   (Evas_Object_Event_Cb)elm_drop_target_del);
2600    free(drop);
2601    /* If still drops there: All fine.. continue */
2602    if (drops) return EINA_TRUE;
2603
2604    cnp_debug("Disabling DND\n");
2605    xwin = (Ecore_X_Window)ecore_evas_window_get
2606       (ecore_evas_ecore_evas_get(evas_object_evas_get(obj)));
2607    ecore_x_dnd_aware_set(xwin, EINA_FALSE);
2608
2609    ecore_event_handler_del(handler_pos);
2610    ecore_event_handler_del(handler_drop);
2611    ecore_event_handler_del(handler_enter);
2612
2613    if (savedtypes.pi)
2614      {
2615         pasteimage_free(savedtypes.pi);
2616         savedtypes.pi = NULL;
2617      }
2618
2619    return EINA_TRUE;
2620 }
2621
2622
2623 static void
2624 _drag_mouse_up(void *un __UNUSED__, Evas *e __UNUSED__, Evas_Object *obj, void *data __UNUSED__)
2625 {
2626    evas_object_event_callback_del(obj, EVAS_CALLBACK_MOUSE_UP, _drag_mouse_up);
2627    ecore_x_dnd_drop();
2628    if (dragdonecb)
2629      {
2630         dragdonecb(dragdonecb,selections[ELM_SEL_XDND].widget);
2631         dragdonecb = NULL;
2632      }
2633    if (dragwin)
2634      {
2635         evas_object_del(dragwin);
2636         dragwin = NULL;
2637      }
2638 }
2639
2640 static void
2641 _drag_move(void *data __UNUSED__, Ecore_X_Xdnd_Position *pos)
2642 {
2643    evas_object_move(dragwin,
2644                     pos->position.x - _dragx,
2645                     pos->position.y - _dragy);
2646 }
2647
2648
2649 Eina_Bool
2650 elm_drag_start(Evas_Object *obj, Elm_Sel_Format format, const char *data, void (*dragdone) (void *data, Evas_Object *), void *donecbdata)
2651 {
2652    Ecore_X_Window xwin;
2653    Cnp_Selection *sel;
2654    Elm_Sel_Type xdnd = ELM_SEL_XDND;
2655    Ecore_Evas *ee;
2656    int x, y, x2, y2, x3, y3;
2657    Evas_Object *icon;
2658    int w, h;
2659
2660    if (!_elm_cnp_init_count) _elm_cnp_init();
2661
2662    xwin = elm_win_xwindow_get(obj);
2663
2664    cnp_debug("starting drag...\n");
2665
2666    ecore_x_dnd_type_set(xwin, "text/uri-list", 1);
2667    sel = selections + ELM_SEL_XDND;
2668    sel->active = 1;
2669    sel->widget = obj;
2670    sel->format = format;
2671    sel->selbuf = data ? strdup(data) : NULL;
2672    dragdonecb = dragdone;
2673    dragdonedata = donecbdata;
2674
2675    ecore_x_dnd_callback_pos_update_set(_drag_move, NULL);
2676    ecore_x_dnd_begin(xwin, (unsigned char *)&xdnd, sizeof(Elm_Sel_Type));
2677    evas_object_event_callback_add(obj, EVAS_CALLBACK_MOUSE_UP,
2678                                   _drag_mouse_up, NULL);
2679
2680    handler_status = ecore_event_handler_add(ECORE_X_EVENT_XDND_STATUS,
2681                                             _dnd_status, NULL);
2682
2683    dragwin = elm_win_add(NULL, "Elm Drag Object", ELM_WIN_UTILITY);
2684    elm_win_override_set(dragwin, 1);
2685
2686    /* FIXME: Images only */
2687    icon = elm_icon_add(dragwin);
2688    elm_icon_file_set(icon, data + 7, NULL); /* 7!? "file://" */
2689    elm_win_resize_object_add(dragwin,icon);
2690    evas_object_size_hint_weight_set(icon, EVAS_HINT_EXPAND, EVAS_HINT_EXPAND);
2691    evas_object_size_hint_align_set(icon, EVAS_HINT_FILL, EVAS_HINT_FILL);
2692
2693    /* Position subwindow appropriately */
2694    ee = ecore_evas_ecore_evas_get(evas_object_evas_get(obj));
2695    ecore_evas_geometry_get(ee, &x, &y, NULL, NULL);
2696    evas_object_geometry_get(obj, &x2, &y2, &w, &h);
2697    x += x2;
2698    y += y2;
2699    evas_object_move(dragwin, x, y);
2700    evas_object_resize(icon, w, h);
2701    evas_object_resize(dragwin, w, h);
2702
2703    evas_object_show(icon);
2704    evas_object_show(dragwin);
2705
2706    evas_pointer_canvas_xy_get(evas_object_evas_get(obj), &x3, &y3);
2707    _dragx = x3 - x2;
2708    _dragy = y3 - y2;
2709
2710    return EINA_TRUE;
2711 }
2712
2713 static Tmp_Info *
2714 elm_cnp_tempfile_create(int size)
2715 {
2716    Tmp_Info *info;
2717    const char *tmppath;
2718    int len;
2719
2720    info = malloc(sizeof(Tmp_Info));
2721    if (!info) return NULL;
2722
2723    tmppath = getenv("TMP");
2724    if (!tmppath) tmppath = P_tmpdir;
2725    len = snprintf(NULL, 0, "%s/%sXXXXXX", tmppath, "elmcnpitem-");
2726    if (len < 0)
2727      {
2728         free(info);
2729         return NULL;
2730      }
2731    len++;
2732    info->filename = malloc(len);
2733    if (!info->filename)
2734      {
2735         free(info);
2736         return NULL;
2737      }
2738    snprintf(info->filename,len,"%s/%sXXXXXX", tmppath, "elmcnpitem-");
2739
2740    info->fd = mkstemp(info->filename);
2741
2742 # ifdef __linux__
2743      {
2744         char *tmp;
2745         /* And before someone says anything see POSIX 1003.1-2008 page 400 */
2746         long pid;
2747
2748         pid = (long)getpid();
2749         /* Use pid instead of /proc/self: That way if can be passed around */
2750         len = snprintf(NULL,0,"/proc/%li/fd/%i", pid, info->fd);
2751         len++;
2752         tmp = malloc(len);
2753         if (tmp)
2754           {
2755              snprintf(tmp,len, "/proc/%li/fd/%i", pid, info->fd);
2756              unlink(info->filename);
2757              free(info->filename);
2758              info->filename = tmp;
2759           }
2760      }
2761 # endif
2762
2763    cnp_debug("filename is %s\n", info->filename);
2764    if (size < 1)
2765      {
2766         /* Set map to NULL and return */
2767         info->map = NULL;
2768         info->len = 0;
2769         return info;
2770      }
2771
2772    /* Map it in */
2773    if (ftruncate(info->fd, size))
2774      {
2775         perror("ftruncate");
2776         info->map = NULL;
2777         info->len = 0;
2778         return info;
2779      }
2780
2781    eina_mmap_safety_enabled_set(EINA_TRUE);
2782
2783    info->map = mmap(NULL, size, PROT_READ|PROT_WRITE, MAP_SHARED, info->fd, 0);
2784    if (info->map == MAP_FAILED)
2785      {
2786         perror("mmap");
2787         info->map = NULL;
2788         info->len = 0;
2789      }
2790
2791    return info;
2792 }
2793
2794
2795 static int
2796 tmpinfo_free(Tmp_Info *info)
2797 {
2798    if (!info) return 0;
2799    free(info->filename);
2800    free(info);
2801    return 0;
2802 }
2803
2804 #else
2805 /* Stubs for windows */
2806 Eina_Bool
2807 elm_drag_start(Evas_Object *o, Elm_Sel_Format f, const char *d, void (*donecb)(void *, Evas_Object *),void *cbdata)
2808 {
2809    return EINA_FALSE;
2810 }
2811
2812 Eina_Bool
2813 elm_drop_target_add(Evas_Object *obj, Elm_Sel_Type format, Elm_Drop_Cb dropcb, void *cbdata)
2814 {
2815    return EINA_FALSE;
2816 }
2817
2818 Eina_Bool
2819 elm_drop_target_del(Evas_Object *o)
2820 {
2821    return EINA_TRUE;
2822 }
2823 #endif
2824
2825 /* vim:set ts=8 sw=3 sts=3 expandtab cino=>5n-2f0^-2{2(0W1st0 :*/