3977f1934c177208086aada840865c89a951b6cd
[pandora-libraries.git] / lib / pnd_desktop.c
1
2 #include <stdio.h> /* for FILE etc */
3 #include <string.h>
4 #include <unistd.h> /* for unlink */
5 #include <stdlib.h> /* for free */
6 #include <sys/stat.h> /* for stat */
7
8 #include "pnd_apps.h"
9 #include "pnd_container.h"
10 #include "pnd_pxml.h"
11 #include "pnd_discovery.h"
12 #include "pnd_pndfiles.h"
13 #include "pnd_conf.h"
14 #include "pnd_desktop.h"
15 #include "pnd_logger.h"
16
17 unsigned char pnd_emit_dotdesktop ( char *targetpath, char *pndrun, pnd_disco_t *p ) {
18   char filename [ FILENAME_MAX ];
19   char buffer [ 4096 ];
20   FILE *f;
21
22   // specification
23   // http://standards.freedesktop.org/desktop-entry-spec
24
25   // validation
26
27   if ( ! p -> unique_id ) {
28     pnd_log ( PND_LOG_DEFAULT, "Can't emit dotdesktop for %s, missing unique-id\n", targetpath );
29     return ( 0 );
30   }
31
32   if ( ! p -> exec ) {
33     pnd_log ( PND_LOG_DEFAULT, "Can't emit dotdesktop for %s, missing exec\n", targetpath );
34     return ( 0 );
35   }
36
37   if ( ! targetpath ) {
38     pnd_log ( PND_LOG_DEFAULT, "Can't emit dotdesktop for %s, missing target path\n", targetpath );
39     return ( 0 );
40   }
41
42   if ( ! pndrun ) {
43     pnd_log ( PND_LOG_DEFAULT, "Can't emit dotdesktop for %s, missing pnd_run.sh\n", targetpath );
44     return ( 0 );
45   }
46
47   // set up
48
49   sprintf ( filename, "%s/%s#%u.desktop", targetpath, p -> unique_id, p -> subapp_number );
50
51   // emit
52
53   //printf ( "EMIT DOTDESKTOP '%s'\n", filename );
54
55   f = fopen ( filename, "w" );
56
57   if ( ! f ) {
58     return ( 0 );
59   }
60
61   fprintf ( f, "%s\n", PND_DOTDESKTOP_HEADER );
62
63   if ( p -> title_en ) {
64     snprintf ( buffer, 1020, "Name=%s\n", p -> title_en );
65     fprintf ( f, "%s", buffer );
66   }
67
68   fprintf ( f, "Type=Application\n" );
69   fprintf ( f, "Version=1.0\n" );
70
71   if ( p -> icon ) {
72     snprintf ( buffer, 1020, "Icon=%s\n", p -> icon );
73     fprintf ( f, "%s", buffer );
74   }
75
76   if ( p -> unique_id ) {
77     fprintf ( f, "X-Pandora-UID=%s\n", p -> unique_id );
78   }
79
80 #if 1
81   if ( p -> desc_en && p -> desc_en [ 0 ] ) {
82     snprintf ( buffer, 1020, "Comment=%s\n", p -> desc_en ); // no [en] needed I suppose, yet
83     fprintf ( f, "%s", buffer );
84   }
85 #endif
86
87   if ( p -> preview_pic1 ) {
88     fprintf ( f, "X-Pandora-Preview-Pic-1=%s\n", p -> preview_pic1 );
89   }
90
91   if ( p -> clockspeed ) {
92     fprintf ( f, "X-Pandora-Clockspeed=%s\n", p -> clockspeed );
93   }
94
95   if ( p -> startdir ) {
96     fprintf ( f, "X-Pandora-Startdir=%s\n", p -> startdir );
97   }
98
99   if ( p -> main_category ) {
100     fprintf ( f, "X-Pandora-MainCategory=%s\n", p -> main_category );
101   }
102   if ( p -> main_category1 ) {
103     fprintf ( f, "X-Pandora-MainCategory1=%s\n", p -> main_category1 );
104   }
105   if ( p -> main_category2 ) {
106     fprintf ( f, "X-Pandora-MainCategory2=%s\n", p -> main_category2 );
107   }
108
109   if ( p -> alt_category ) {
110     fprintf ( f, "X-Pandora-AltCategory=%s\n", p -> alt_category );
111   }
112   if ( p -> alt_category1 ) {
113     fprintf ( f, "X-Pandora-AltCategory1=%s\n", p -> alt_category1 );
114   }
115   if ( p -> alt_category2 ) {
116     fprintf ( f, "X-Pandora-AltCategory2=%s\n", p -> alt_category2 );
117   }
118   if ( p -> info_filename ) {
119     fprintf ( f, "X-Pandora-Info-Filename=%s\n", p -> info_filename );
120   }
121   if ( p -> info_name ) {
122     fprintf ( f, "X-Pandora-Info-Name=%s\n", p -> info_name );
123   }
124
125 #if 0 // we let pnd_run.sh command line handle this instead of in .desktop
126   if ( p -> startdir ) {
127     snprintf ( buffer, 1020, "Path=%s\n", p -> startdir );
128     fprintf ( f, "%s", buffer );
129   } else {
130     fprintf ( f, "Path=%s\n", PND_DEFAULT_WORKDIR );
131   }
132 #endif
133
134   // association requests
135   if ( p -> associationitem1_filetype ) {
136     fprintf ( f, "MimeType=%s\n", p -> associationitem1_filetype );
137   }
138
139   if ( p -> exec ) {
140     char *nohup;
141
142     if ( p -> option_no_x11 ) {
143       nohup = "/usr/bin/nohup ";
144     } else {
145       nohup = "";
146     }
147
148     // basics
149     if ( p -> object_type == pnd_object_type_directory ) {
150       snprintf ( buffer, 1020, "Exec=%s%s -p \"%s\" -e \"%s\" -b \"%s\"",
151                  nohup, pndrun, p -> object_path, p -> exec,
152                  p -> appdata_dirname ? p -> appdata_dirname : p -> unique_id );
153     } else if ( p -> object_type == pnd_object_type_pnd ) {
154       snprintf ( buffer, 1020, "Exec=%s%s -p \"%s/%s\" -e \"%s\" -b \"%s\"",
155                  nohup, pndrun, p -> object_path, p -> object_filename, p -> exec,
156                  p -> appdata_dirname ? p -> appdata_dirname : p -> unique_id );
157     }
158
159     // start dir
160     if ( p -> startdir ) {
161       strncat ( buffer, " -s ", 1020 );
162       strncat ( buffer, p -> startdir, 1020 );
163     }
164
165     // args (regular args, for pnd_run.sh to handle)
166     if ( p -> execargs ) {
167       char argbuf [ 1024 ];
168       snprintf ( argbuf, 1000, " -a \"%s\"", p -> execargs );
169       strncat ( buffer, argbuf, 1020 );
170     }
171
172     // clockspeed
173     if ( p -> clockspeed && atoi ( p -> clockspeed ) != 0 ) {
174       strncat ( buffer, " -c ", 1020 );
175       strncat ( buffer, p -> clockspeed, 1020 );
176     }
177
178     // exec options
179     if ( pnd_pxml_get_x11 ( p -> option_no_x11 ) == pnd_pxml_x11_stop ) {
180       strncat ( buffer, " -x ", 1020 );
181     }
182
183     // args (dashdash -- args, that the shell can screw with before pnd_run.sh gets them)
184     if ( p -> exec_dashdash_args ) {
185       char argbuf [ 4096 ];
186       snprintf ( argbuf, 4096, " -- %s", p -> exec_dashdash_args );
187       strncat ( buffer, argbuf, 4096 );
188     }
189
190     // newline
191     strncat ( buffer, "\n", 1020 );
192
193     // emit
194     fprintf ( f, "%s", buffer );
195
196     // and lets copy in some stuff in case it makes .desktop consumers life easier
197     if ( p -> exec ) { fprintf ( f, "X-Pandora-Exec=%s\n", p -> exec ); }
198     if ( p -> appdata_dirname ) { fprintf ( f, "X-Pandora-Appdata-Dirname=%s\n", p -> appdata_dirname ); }
199     if ( p -> execargs ) { fprintf ( f, "X-Pandora-ExecArgs=%s\n", p -> execargs ); }
200     if ( p -> object_flags & PND_DISCO_FLAG_OVR ) { fprintf ( f, "X-Pandora-Object-Flag-OVR=%s\n", "Yes" ); }
201     if ( p -> object_type == pnd_object_type_pnd ) {
202       fprintf ( f, "X-Pandora-Object-Path=%s\n", p -> object_path );
203       fprintf ( f, "X-Pandora-Object-Filename=%s\n", p -> object_filename );
204     }
205
206   }
207
208   // categories
209   {
210     char cats [ 512 ] = "";
211     int n;
212     pnd_conf_handle c;
213     char *confpath;
214
215     // uuuuh, defaults?
216     // "Application" used to be in the standard and is commonly supported still
217     // Utility and Network should ensure the app is visible 'somewhere' :/
218     char *defaults = PND_DOTDESKTOP_DEFAULT_CATEGORY;
219
220     // determine searchpath (for conf, not for apps)
221     confpath = pnd_conf_query_searchpath();
222
223     // inhale the conf file
224     c = pnd_conf_fetch_by_id ( pnd_conf_categories, confpath );
225
226     // if we can find a default category set, pull it in; otherwise assume
227     // the hardcoded one
228     if ( pnd_conf_get_as_char ( c, "default" ) ) {
229       defaults = pnd_conf_get_as_char ( c, "default" );
230     }
231
232     // ditch the confpath
233     free ( confpath );
234
235     // attempt mapping
236     if ( c ) {
237
238       n = pnd_map_dotdesktop_categories ( c, cats, 511, p );
239
240       if ( n ) {
241         fprintf ( f, "Categories=%s\n", cats );
242       } else {
243         fprintf ( f, "Categories=%s\n", defaults );
244       }
245
246     } else {
247       fprintf ( f, "Categories=%s\n", defaults );
248     }
249
250   }
251
252   fprintf ( f, "%s\n", PND_DOTDESKTOP_SOURCE ); // should we need to know 'who' created the file during trimming
253
254   fclose ( f );
255
256   return ( 1 );
257 }
258
259 unsigned char pnd_emit_dotinfo ( char *targetpath, char *pndrun, pnd_disco_t *p ) {
260   char filename [ FILENAME_MAX ];
261   char buffer [ 1024 ];
262   FILE *f;
263   char *viewer, *searchpath;
264   pnd_conf_handle desktoph;
265
266   // specification
267   // http://standards.freedesktop.org/desktop-entry-spec
268
269   // validation
270   //
271
272   // viewer
273   searchpath = pnd_conf_query_searchpath();
274
275   desktoph = pnd_conf_fetch_by_id ( pnd_conf_desktop, searchpath );
276
277   if ( ! desktoph ) {
278     return ( 0 );
279   }
280
281   viewer = pnd_conf_get_as_char ( desktoph, "info.viewer" );
282
283   if ( ! viewer ) {
284     return ( 0 ); // no way to view the file
285   }
286
287   // etc
288   if ( ! p -> unique_id ) {
289     pnd_log ( PND_LOG_DEFAULT, "Can't emit dotdesktop for %s, missing unique-id\n", targetpath );
290     return ( 0 );
291   }
292
293   if ( ! p -> info_filename ) {
294     pnd_log ( PND_LOG_DEFAULT, "Can't emit dotdesktop for %s, missing info_filename\n", targetpath );
295     return ( 0 );
296   }
297
298   if ( ! p -> info_name ) {
299     pnd_log ( PND_LOG_DEFAULT, "Can't emit dotdesktop for %s, missing info_name\n", targetpath );
300     return ( 0 );
301   }
302
303   if ( ! targetpath ) {
304     pnd_log ( PND_LOG_DEFAULT, "Can't emit dotdesktop for %s, missing target path\n", targetpath );
305     return ( 0 );
306   }
307
308   if ( ! pndrun ) {
309     pnd_log ( PND_LOG_DEFAULT, "Can't emit dotdesktop for %s, missing pnd_run.sh\n", targetpath );
310     return ( 0 );
311   }
312
313   // set up
314
315   sprintf ( filename, "%s/%s#%uinfo.desktop", targetpath, p -> unique_id, p -> subapp_number );
316
317   // emit
318
319   f = fopen ( filename, "w" );
320
321   if ( ! f ) {
322     return ( 0 );
323   }
324
325   fprintf ( f, "%s\n", PND_DOTDESKTOP_HEADER );
326
327   if ( p -> info_name ) {
328     snprintf ( buffer, 1020, "Name=%s\n", p -> info_name );
329     fprintf ( f, "%s", buffer );
330   }
331
332   fprintf ( f, "Type=Application\n" );
333   fprintf ( f, "Version=1.0\n" );
334
335 #if 0
336   if ( p -> icon ) {
337     snprintf ( buffer, 1020, "Icon=%s\n", p -> icon );
338     fprintf ( f, "%s", buffer );
339   }
340 #endif
341
342   if ( p -> unique_id ) {
343     fprintf ( f, "X-Pandora-UID=%s\n", p -> unique_id );
344   }
345
346   if ( p -> title_en && p -> title_en [ 0 ] ) {
347     snprintf ( buffer, 1020, "Comment=Automatic menu info entry for %s\n", p -> title_en );
348     fprintf ( f, "%s", buffer );
349   }
350
351 #if 0 // we let pnd_run.sh command line handle this instead of in .desktop
352   if ( p -> startdir ) {
353     snprintf ( buffer, 1020, "Path=%s\n", p -> startdir );
354     fprintf ( f, "%s", buffer );
355   } else {
356     fprintf ( f, "Path=%s\n", PND_DEFAULT_WORKDIR );
357   }
358 #endif
359
360   // exec line
361   char args [ 1001 ];
362   char *pargs = args;
363   char *viewerargs = pnd_conf_get_as_char ( desktoph, "info.viewer_args" );
364   if ( viewerargs && viewerargs [ 0 ] ) {
365     snprintf ( pargs, 1001, "%s %s",
366                pnd_conf_get_as_char ( desktoph, "info.viewer_args" ), p -> info_filename );
367   } else {
368     pargs = NULL;
369     // WARNING: This might not be quite right; if no viewer-args, shouldn't we still append the info-filename? likewise,
370     //          even if we do have view-args, shouldn't we check if filename is present?
371   }
372
373   char pndfile [ 1024 ];
374   if ( p -> object_type == pnd_object_type_directory ) {
375     // for PXML-app-dir, pnd_run.sh doesn't want the PXML.xml.. it just wants the dir-name
376     strncpy ( pndfile, p -> object_path, 1000 );
377   } else if ( p -> object_type == pnd_object_type_pnd ) {
378     // pnd_run.sh wants the full path and filename for the .pnd file
379     snprintf ( pndfile, 1020, "%s/%s", p -> object_path, p -> object_filename );
380   }
381
382   pnd_apps_exec_info_t info;
383   info.viewer = viewer;
384   info.args = pargs;
385
386   if ( ! pnd_apps_exec_disco ( pndrun, p, PND_EXEC_OPTION_NORUN | PND_EXEC_OPTION_INFO, &info ) ) {
387     return ( 0 );
388   }
389
390   fprintf ( f, "Exec=%s\n", pnd_apps_exec_runline() );
391
392   if ( pnd_conf_get_as_char ( desktoph, "info.category" ) ) {
393     fprintf ( f, "Categories=%s\n", pnd_conf_get_as_char ( desktoph, "info.category" ) );
394   } else {
395     fprintf ( f, "Categories=Documentation\n" );
396   }
397
398   fprintf ( f, "%s\n", PND_DOTDESKTOP_SOURCE ); // should we need to know 'who' created the file during trimming
399
400   fclose ( f );
401
402   return ( 1 );
403 }
404
405 unsigned char pnd_emit_icon ( char *targetpath, pnd_disco_t *p ) {
406   //#define BITLEN (8*1024)
407 #define BITLEN (64*1024)
408   char buffer [ FILENAME_MAX ]; // target filename
409   char from [ FILENAME_MAX ];   // source filename
410   unsigned char bits [ BITLEN ];
411   unsigned int bitlen;
412   FILE *pnd, *target;
413
414   // prelim .. if a pnd file, and no offset found, discovery code didn't locate icon.. so bail.
415   if ( ( p -> object_type == pnd_object_type_pnd ) &&
416        ( ! p -> pnd_icon_pos ) )
417   {
418     return ( 0 ); // discover code didn't find it, so FAIL
419   }
420
421   // determine filename for target
422   sprintf ( buffer, "%s/%s.png", targetpath, p -> unique_id /*, p -> subapp_number*/ ); // target
423
424   /* first.. open the source file, by type of application:
425    * are we looking through a pnd file or a dir?
426    */
427   if ( p -> object_type == pnd_object_type_directory ) {
428     sprintf ( from, "%s/%s", p -> object_path, p -> icon );
429   } else if ( p -> object_type == pnd_object_type_pnd ) {
430     sprintf ( from, "%s/%s", p -> object_path, p -> object_filename );
431   }
432
433   pnd = fopen ( from, "rb" );
434
435   if ( ! pnd ) {
436     pnd_log ( PND_LOG_DEFAULT, "    Emit icon, couldn't open source\n" );
437     return ( 0 );
438   }
439
440   unsigned int len;
441
442   target = fopen ( buffer, "wb" );
443
444   if ( ! target ) {
445     fclose ( pnd );
446     pnd_log ( PND_LOG_DEFAULT, "    Emit icon, couldn't open target\n" );
447     return ( 0 );
448   }
449
450   fseek ( pnd, 0, SEEK_END );
451   len = ftell ( pnd );
452   //fseek ( pnd, 0, SEEK_SET );
453
454   fseek ( pnd, p -> pnd_icon_pos, SEEK_SET );
455
456   len -= p -> pnd_icon_pos;
457
458   pnd_log ( PND_LOG_DEFAULT, "    Emit icon, length: %u\n", len );
459
460   while ( len ) {
461
462     if ( len > (BITLEN) ) {
463       bitlen = (BITLEN);
464     } else {
465       bitlen = len;
466     }
467
468     if ( fread ( bits, bitlen, 1, pnd ) != 1 ) {
469       fclose ( pnd );
470       fclose ( target );
471       unlink ( buffer );
472       pnd_log ( PND_LOG_DEFAULT, "    Emit icon, bad read\n" );
473       return ( 0 );
474     }
475
476 #if 0
477     {
478       unsigned int i = 0;
479       char bigbuffer [ 200 * 1024 ] = "\0";
480       char b [ 10 ];
481       pnd_log ( PND_LOG_DEFAULT, "    Read hexdump\n" );
482       while ( i < bitlen ) {
483         sprintf ( b, "%x,", bits [ i ] );
484         strcat ( bigbuffer, b );
485         i++;
486       }
487       pnd_log ( PND_LOG_DEFAULT, bigbuffer );
488     }
489 #endif
490
491     if ( fwrite ( bits, bitlen, 1, target ) != 1 ) {
492       fclose ( pnd );
493       fclose ( target );
494       unlink ( buffer );
495       pnd_log ( PND_LOG_DEFAULT, "    Emit icon, bad write\n" );
496       return ( 0 );
497     }
498
499     len -= bitlen;
500     //pnd_log ( PND_LOG_DEFAULT, "    Emit icon, next block, length: %u\n", len );
501   } // while
502
503   fclose ( pnd );
504   fclose ( target );
505
506   //pnd_log ( PND_LOG_DEFAULT, "    Emit icon, done.\n" );
507
508   return ( 1 );
509 }
510
511 #if 1 // we switched direction to freedesktop standard categories
512 // if no categories herein, return 0; otherwise, if some category-like-text, return 1
513 int pnd_map_dotdesktop_categories ( pnd_conf_handle c, char *target_buffer, unsigned short int len, pnd_disco_t *d ) {
514   char *t;
515   char *match;
516
517   // clear target so we can easily append
518   memset ( target_buffer, '\0', len );
519
520   // for each main-cat and sub-cat, including alternates, just append them all together
521   // we'll try mapping them, since the categories file is there, but we'll default to
522   // copying over; this lets the conf file do merging or renaming of cagtegories, which
523   // could still be useful, but we can leave the conf file empty to effect a pure
524   // trusted-PXML-copying
525
526   // it would be sort of cumbersome to copy all the freedesktop.org defined categories (as
527   // there are hundreds), and would also mean new ones and peoples custom ones would
528   // flop
529
530   /* attempt primary category chain
531    */
532   #define MAPCAT(field)                                     \
533     if ( ( t = d -> field ) ) {                             \
534       match = pnd_map_dotdesktop_category ( c, t );         \
535       strncat ( target_buffer, match ? match : t, len );    \
536       strncat ( target_buffer, ";", len );                  \
537     }
538
539   MAPCAT(main_category);
540   MAPCAT(main_category1);
541   MAPCAT(main_category2);
542   MAPCAT(alt_category);
543   MAPCAT(alt_category1);
544   MAPCAT(alt_category2);
545
546   if ( target_buffer [ 0 ] ) {
547     return ( 1 ); // I guess its 'good'?
548   }
549
550 #if 0
551   if ( ( t = d -> main_category ) ) {
552     match = pnd_map_dotdesktop_category ( c, t );
553     strncat ( target_buffer, match ? match : t, len );
554     strncat ( target_buffer, ";", len );
555   }
556 #endif
557
558   return ( 0 );
559 }
560 #endif
561
562 #if 0 // we switched direction
563 //int pnd_map_dotdesktop_categories ( pnd_conf_handle c, char *target_buffer, unsigned short int len, pnd_pxml_handle h ) {
564 int pnd_map_dotdesktop_categories ( pnd_conf_handle c, char *target_buffer, unsigned short int len, pnd_disco_t *d ) {
565   unsigned short int n = 0; // no. matches
566   char *t;
567   char *match;
568
569   // clear target so we can easily append
570   memset ( target_buffer, '\0', len );
571
572   /* attempt primary category chain
573    */
574   match = NULL;
575
576   if ( ( t = d -> main_category ) ) {
577     match = pnd_map_dotdesktop_category ( c, t );
578   }
579
580   if ( ( ! match ) &&
581        ( t = d -> main_category1 ) )
582   {
583     match = pnd_map_dotdesktop_category ( c, t );
584   }
585
586   if ( ( ! match ) &&
587        ( t = d -> main_category2 ) )
588   {
589     match = pnd_map_dotdesktop_category ( c, t );
590   }
591
592   if ( match ) {
593     strncat ( target_buffer, match, len );
594     len -= strlen ( target_buffer );
595     n += 1;
596   }
597
598   /* attempt secondary category chain
599    */
600   match = NULL;
601
602   if ( ( t = d -> alt_category ) ) {
603     match = pnd_map_dotdesktop_category ( c, t );
604   }
605
606   if ( ( ! match ) &&
607        ( t = d -> alt_category1 ) )
608   {
609     match = pnd_map_dotdesktop_category ( c, t );
610   }
611
612   if ( ( ! match ) &&
613        ( t = d -> alt_category2 ) )
614   {
615     match = pnd_map_dotdesktop_category ( c, t );
616   }
617
618   if ( match ) {
619     if ( target_buffer [ 0 ] != '\0' && len > 0 ) {
620       strcat ( target_buffer, ";" );
621       len -= 1;
622     }
623     strncat ( target_buffer, match, len );
624     len -= strlen ( target_buffer );
625     n += 1;
626   }
627
628 #if 0 // doh, originally I was using pxml-t till I realized I pre-boned myself on that one
629   match = NULL;
630
631   if ( ( t = pnd_pxml_get_main_category ( h ) ) ) {
632     match = pnd_map_dotdesktop_category ( c, t );
633   }
634
635   if ( ( ! match ) &&
636        ( t = pnd_pxml_get_subcategory1 ( h ) ) )
637   {
638     match = pnd_map_dotdesktop_category ( c, t );
639   }
640
641   if ( ( ! match ) &&
642        ( t = pnd_pxml_get_subcategory2 ( h ) ) )
643   {
644     match = pnd_map_dotdesktop_category ( c, t );
645   }
646
647   if ( match ) {
648     strncat ( target_buffer, match, len );
649     len -= strlen ( target_buffer );
650     n += 1;
651   }
652
653   /* attempt secondary category chain
654    */
655   match = NULL;
656
657   if ( ( t = pnd_pxml_get_altcategory ( h ) ) ) {
658     match = pnd_map_dotdesktop_category ( c, t );
659   }
660
661   if ( ( ! match ) &&
662        ( t = pnd_pxml_get_altsubcategory1 ( h ) ) )
663   {
664     match = pnd_map_dotdesktop_category ( c, t );
665   }
666
667   if ( ( ! match ) &&
668        ( t = pnd_pxml_get_altsubcategory2 ( h ) ) )
669   {
670     match = pnd_map_dotdesktop_category ( c, t );
671   }
672
673   if ( match ) {
674     if ( target_buffer [ 0 ] != '\0' && len > 0 ) {
675       strcat ( target_buffer, ";" );
676       len -= 1;
677     }
678     strncat ( target_buffer, match, len );
679     len -= strlen ( target_buffer );
680     n += 1;
681   }
682 #endif
683
684   if ( n && len ) {
685     strcat ( target_buffer, ";" );
686   }
687
688   return ( n );
689 }
690 #endif
691
692 // given category 'foo', look it up in the provided config map. return the char* reference, or NULL
693 char *pnd_map_dotdesktop_category ( pnd_conf_handle c, char *single_category ) {
694   char *key;
695   char *ret;
696
697   key = malloc ( strlen ( single_category ) + 4 + 1 );
698
699   sprintf ( key, "map.%s", single_category );
700
701   ret = pnd_conf_get_as_char ( c, key );
702
703   free ( key );
704
705   return ( ret );
706 }
707
708 unsigned char *pnd_emit_icon_to_buffer ( pnd_disco_t *p, unsigned int *r_buflen ) {
709   // this is shamefully mostly a copy of emit_icon() above; really, need to refactor that to use this routine
710   // with a fwrite at the end...
711   char from [ FILENAME_MAX ];   // source filename
712   char bits [ 8 * 1024 ];
713   unsigned int bitlen;
714   FILE *pnd = NULL;
715   unsigned char *target = NULL, *targiter = NULL;
716
717   // prelim .. if a pnd file, and no offset found, discovery code didn't locate icon.. so bail.
718   if ( ( p -> object_type == pnd_object_type_pnd ) &&
719        ( ! p -> pnd_icon_pos ) )
720   {
721     return ( NULL ); // discover code didn't find it, so FAIL
722   }
723
724   /* first.. open the source file, by type of application:
725    * are we looking through a pnd file or a dir?
726    */
727   if ( p -> object_type == pnd_object_type_directory ) {
728     sprintf ( from, "%s/%s", p -> object_path, p -> icon );
729   } else if ( p -> object_type == pnd_object_type_pnd ) {
730     sprintf ( from, "%s/%s", p -> object_path, p -> object_filename );
731   }
732
733   pnd = fopen ( from, "r" );
734
735   if ( ! pnd ) {
736     return ( NULL );
737   }
738
739   // determine length of file, then adjust by icon position to find begin of icon
740   unsigned int len;
741
742   fseek ( pnd, 0, SEEK_END );
743   len = ftell ( pnd );
744   //fseek ( pnd, 0, SEEK_SET );
745
746   fseek ( pnd, p -> pnd_icon_pos, SEEK_SET );
747
748   len -= p -> pnd_icon_pos;
749
750   // create target buffer
751   target = malloc ( len );
752
753   if ( ! target ) {
754     fclose ( pnd );
755     return ( 0 );
756   }
757
758   targiter = target;
759
760   if ( r_buflen ) {
761     *r_buflen = len;
762   }
763
764   // copy over icon to target
765   while ( len ) {
766
767     if ( len > (8*1024) ) {
768       bitlen = (8*1024);
769     } else {
770       bitlen = len;
771     }
772
773     if ( fread ( bits, bitlen, 1, pnd ) != 1 ) {
774       fclose ( pnd );
775       free ( target );
776       return ( NULL );
777     }
778
779     memmove ( targiter, bits, bitlen );
780     targiter += bitlen;
781
782     len -= bitlen;
783   } // while
784
785   fclose ( pnd );
786
787   return ( target );
788 }
789
790 // parse_dotdesktop() can be used to read a libpnd generated .desktop and return a limited
791 // but useful disco-t structure back; possibly useful for scanning .desktops rather than
792 // scanning pnd-files?
793 pnd_disco_t *pnd_parse_dotdesktop ( char *ddpath, unsigned int flags ) {
794
795   // will verify the .desktop has the libpnd-marking on it (X-Pandora-Source): PND_DOTDESKTOP_SOURCE
796
797   // attempt to extract..
798   // - unique-id (from filename or field)
799   // - subapp number (from filename)
800   // - exec required info
801   // - icon path
802   // - name (title-en)
803   // - comment (desc-en)
804   // - option_no_x11
805   // - object path
806   // - appdata name (or unique-id if not present)
807   // - start dir
808   // - args
809   // - clockspeed
810   // - categories
811
812   char pndpath [ 1024 ];
813   bzero ( pndpath, 1024 );
814
815   // filter on filename?
816   if ( flags & PND_DOTDESKTOP_LIBPND_ONLY ) {
817     // too bad we didn't put some libpnd token at the front of the filename or something
818     // hell, we should cleanse unique-id to ensure its not full of special chars like '*' and '..'.. eep!
819     if ( strrchr ( ddpath, '#' ) == NULL ) { // but if requiring libpnd, we can at least check for #subapp-number
820       return ( NULL );
821     }
822   }
823
824   if ( strstr ( ddpath, ".desktop" ) == NULL ) {
825     return ( NULL ); // no .desktop in filename, must be something else... skip!
826   }
827
828   if ( strstr ( ddpath, "info.desktop" ) != NULL ) {
829     // ".....info.desktop" is the 'document help' (README) emitted from a pnd, not an actual app; minimenu rather
830     // expects the doc-info as part of the main app, not a separate app.. so lets drop it here, to avoid doubling up
831     // the number of applications, needlessly..
832     return ( NULL );
833   }
834
835   // determine file length
836   struct stat statbuf;
837
838   if ( stat ( ddpath, &statbuf) < 0 ) {
839     return ( NULL ); // couldn't open
840   }
841
842   // buffers..
843   char dd [ 1024 ];
844   unsigned char libpnd_origin = 0;
845
846   // disco
847   pnd_disco_t *p = malloc ( sizeof(pnd_disco_t) );
848   if ( ! p ) {
849     return ( NULL );
850   }
851   bzero ( p, sizeof(pnd_disco_t) );
852
853   // inhale file
854   FILE *f = fopen ( ddpath, "r" );
855
856   if ( ! f ) {
857     return ( NULL ); // not up or shut up!
858   }
859
860   while ( fgets ( dd, 1024, f ) ) {
861     char *nl = strchr ( dd, '\n' );
862     if ( nl ) {
863       *nl = '\0';
864     }
865
866     // grep
867     //
868
869     if ( strncmp ( dd, "Name=", 5 ) == 0 ) {
870       p -> title_en = strdup ( dd + 5 );
871     } else if ( strncmp ( dd, "Name[en]=", 9 ) == 0 ) {
872       p -> title_en = strdup ( dd + 9 );
873     } else if ( strncmp ( dd, "Icon=", 5 ) == 0 ) {
874       p -> icon = strdup ( dd + 5 );
875     } else if ( strcmp ( dd, PND_DOTDESKTOP_SOURCE ) == 0 ) {
876       libpnd_origin = 1;
877     } else if ( strncmp ( dd, "X-Pandora-UID=", 14 ) == 0 ) {
878       p -> unique_id = strdup ( dd + 14 );
879     } else if ( strncmp ( dd, "X-Pandora-Preview-Pic-1=", 24 ) == 0 ) {
880       p -> preview_pic1 = strdup ( dd + 24 );
881     } else if ( strncmp ( dd, "X-Pandora-Clockspeed=", 21 ) == 0 ) {
882       p -> clockspeed = strdup ( dd + 21 );
883     } else if ( strncmp ( dd, "X-Pandora-Startdir=", 19 ) == 0 ) {
884       p -> startdir = strdup ( dd + 19 );
885     } else if ( strncmp ( dd, "X-Pandora-Appdata-Dirname=", 26 ) == 0 ) {
886       p -> appdata_dirname = strdup ( dd + 26 );
887     } else if ( strncmp ( dd, "X-Pandora-ExecArgs=", 19 ) == 0 ) {
888       p -> execargs = strdup ( dd + 19 );
889     } else if ( strncmp ( dd, "X-Pandora-Exec=", 15 ) == 0 ) {
890       p -> exec = strdup ( dd + 15 );
891     } else if ( strncmp ( dd, "X-Pandora-Object-Path=", 22 ) == 0 ) {
892       p -> object_path = strdup ( dd + 22 );
893     } else if ( strncmp ( dd, "X-Pandora-Object-Filename=", 26 ) == 0 ) {
894       p -> object_filename = strdup ( dd + 26 );
895     } else if ( strncmp ( dd, "X-Pandora-Object-Flag-OVR=", 26 ) == 0 ) {
896       p -> object_flags |= PND_DISCO_FLAG_OVR;
897
898     } else if ( strncmp ( dd, "X-Pandora-MainCategory=", 23 ) == 0 ) {
899       p -> main_category = strdup ( dd + 23 );
900     } else if ( strncmp ( dd, "X-Pandora-MainCategory1=", 24 ) == 0 ) {
901       p -> main_category1 = strdup ( dd + 24 );
902     } else if ( strncmp ( dd, "X-Pandora-MainCategory2=", 24 ) == 0 ) {
903       p -> main_category2 = strdup ( dd + 24 );
904
905     } else if ( strncmp ( dd, "X-Pandora-AltCategory=", 22 ) == 0 ) {
906       p -> alt_category = strdup ( dd + 22 );
907     } else if ( strncmp ( dd, "X-Pandora-AltCategory1=", 23 ) == 0 ) {
908       p -> alt_category1 = strdup ( dd + 23 );
909     } else if ( strncmp ( dd, "X-Pandora-AltCategory2=", 23 ) == 0 ) {
910       p -> alt_category2 = strdup ( dd + 23 );
911
912     } else if ( strncmp ( dd, "X-Pandora-Info-Filename=", 24 ) == 0 ) {
913       p -> info_filename = strdup ( dd + 24 );
914     } else if ( strncmp ( dd, "X-Pandora-Info-Name=", 20 ) == 0 ) {
915       p -> info_name = strdup ( dd + 20 );
916
917     } else if ( strncmp ( dd, "Comment=", 8 ) == 0 ) {
918       p -> desc_en = strdup ( dd + 8 );
919     } else if ( strncmp ( dd, "Comment[en]=", 12 ) == 0 ) {
920       p -> desc_en = strdup ( dd + 12 );
921     } else if ( strncmp ( dd, "Exec=", 5 ) == 0 ) {
922
923       char *e = strstr ( dd, " -e " );
924
925       if ( e ) {
926         // probably libpnd app
927 #if 0 // no needed due to above X-Pandora attributes
928
929         if ( e ) {
930           e += 5;
931
932           char *space = strchr ( e, ' ' );
933           p -> exec = strndup ( e, space - e - 1 );
934         }
935
936         char *b = strstr ( dd, " -b " );
937         if ( b ) {
938           b += 5;
939           char *space = strchr ( b, '\0' );
940           p -> appdata_dirname = strndup ( b, space - b - 1 );
941         }
942
943         char *p = strstr ( dd, " -p " );
944         if ( p ) {
945           p += 5;
946           char *space = strchr ( p, ' ' );
947           strncpy ( pndpath, p, space - p - 1 );
948         }
949 #endif
950
951       } else {
952         // probably not libpnd app
953         p -> exec = strdup ( dd + 5 );
954       }
955
956 #if 0 // ignore; using X- categories now
957     } else if ( strncmp ( dd, "Categories=", 11 ) == 0 ) {
958       // HACK; only honours first category
959       char *semi = strchr ( dd, ';' );
960       if ( semi ) {
961         p -> main_category = strndup ( dd + 11, semi - dd + 11 );
962       } else {
963         p -> main_category = strdup ( dd + 11 );
964       }
965       semi = strchr ( p -> main_category, ';' );
966       if ( semi ) {
967         *semi = '\0';
968       }
969 #endif
970
971     }
972
973     //
974     // /grep
975
976   } // while
977
978   fclose ( f );
979
980   // filter
981   if ( ! libpnd_origin ) {
982
983     // convenience flag
984     if ( flags & PND_DOTDESKTOP_LIBPND_ONLY ) {
985       pnd_disco_destroy ( p );
986       free ( p );
987       return ( NULL );
988     }
989
990   } else {
991     p -> object_flags |= PND_DISCO_LIBPND_DD; // so caller can do something if it wishes
992   }
993
994   // filter on content
995   if ( ( ! p -> title_en ) ||
996        ( ! p -> exec )
997      )
998   {
999     pnd_disco_destroy ( p );
1000     free ( p );
1001     return ( NULL );
1002   }
1003
1004   if ( ! p -> unique_id ) {
1005     if ( flags & PND_DOTDESKTOP_LIBPND_ONLY ) {
1006       pnd_disco_destroy ( p );
1007       free ( p );
1008       return ( NULL );
1009     } else {
1010       char hack [ 100 ];
1011       snprintf ( hack, 100, "inode-%lu", statbuf.st_ino );
1012       p -> unique_id = strdup ( hack );
1013     }
1014   }
1015
1016   // additional
1017   p -> object_type = pnd_object_type_pnd;
1018
1019 #if 0 // nolonger needed due to above X-Pandora attributes
1020   char *source;
1021   if ( pndpath [ 0 ] ) {
1022     source = pndpath;
1023   } else {
1024     source = ddpath;
1025   }
1026
1027   char *slash = strrchr ( source, '/' );
1028   if ( slash ) {
1029     p -> object_path = strndup ( source, slash - source );
1030     p -> object_filename = strdup ( slash + 1 );
1031   } else {
1032     p -> object_path = "./";
1033     p -> object_filename = strdup ( source );
1034   }
1035 #endif
1036
1037   // lame guards, in case of lazy consumers and broken .desktop files
1038   if ( p -> object_path == NULL ) {
1039     p -> object_path = strdup ( "/tmp" );
1040   }
1041   if ( p -> object_filename == NULL ) {
1042     p -> object_filename = strdup ( "" ); // force bad filename
1043   }
1044
1045   // return disco-t
1046   return ( p );
1047 }