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