Pd-cvs January 2009

pd-cvs@lists.iem.at

23 participants
357 discussions

autobuild: pd-extended ubuntu-hardy-i386 2009-01-15 07.53.49
by pd＠ubuntu-dapper-i386.idmi.poly.edu 15 Jan '09

15 Jan '09

/home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:75: error: ‘MTXSh’ has no member named ‘nmax’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:83: error: ‘MTXSh’ has no member named ‘l’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:83: error: ‘MTXSh’ has no member named ‘nmax’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:83: error: ‘MTXSh’ has no member named ‘nmax’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:105: error: ‘MTXSh’ has no member named ‘l’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:107: error: ‘MTXSh’ has no member named ‘l’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:111: error: ‘MTXSh’ has no member named ‘l’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:116: error: ‘MTXSh’ has no member named ‘ws’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:117: error: ‘MTXSh’ has no member named ‘ws’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:117: error: too many arguments to function ‘sharmonics’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:118: error: ‘MTXSh’ has no member named ‘l’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:118: error: ‘MTXSh’ has no member named ‘nmax’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:118: error: ‘MTXSh’ has no member named ‘nmax’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:119: error: ‘MTXSh’ has no member named ‘l’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:120: error: ‘MTXSh’ has no member named ‘nmax’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:120: error: ‘MTXSh’ has no member named ‘nmax’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:122: error: ‘MTXSh’ has no member named ‘ws’ ERROR: module is write only rsync error: syntax or usage error (code 1) at main.c(641) [sender=2.6.9] rsync error: error in rsync protocol data stream (code 12) at io.c(454) [receiver=2.6.9] the full logfile - if it has been succesfully uploaded - can be viewed at: http://autobuild.puredata.info/auto-build/2009-01-15/logs/2009-01-15_07.53.…

1 0

autobuild: pd-extended debian-stable-powerpc 2009-01-15 06.27.48
by pd＠debian-stable-powerpc.idmi.poly.edu 15 Jan '09

15 Jan '09

/home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:75: error: ‘MTXSh’ has no member named ‘nmax’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:83: error: ‘MTXSh’ has no member named ‘l’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:83: error: ‘MTXSh’ has no member named ‘nmax’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:83: error: ‘MTXSh’ has no member named ‘nmax’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:105: error: ‘MTXSh’ has no member named ‘l’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:107: error: ‘MTXSh’ has no member named ‘l’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:111: error: ‘MTXSh’ has no member named ‘l’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:116: error: ‘MTXSh’ has no member named ‘ws’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:117: error: ‘MTXSh’ has no member named ‘ws’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:117: error: too many arguments to function ‘sharmonics’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:118: error: ‘MTXSh’ has no member named ‘l’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:118: error: ‘MTXSh’ has no member named ‘nmax’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:118: error: ‘MTXSh’ has no member named ‘nmax’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:119: error: ‘MTXSh’ has no member named ‘l’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:120: error: ‘MTXSh’ has no member named ‘nmax’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:120: error: ‘MTXSh’ has no member named ‘nmax’ /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:122: error: ‘MTXSh’ has no member named ‘ws’ ERROR: module is write only rsync error: syntax or usage error (code 1) at main.c(641) [sender=2.6.9] rsync error: error in rsync protocol data stream (code 12) at io.c(453) [receiver=2.6.9] the full logfile - if it has been succesfully uploaded - can be viewed at: http://autobuild.puredata.info/auto-build/2009-01-15/logs/2009-01-15_06.27.…

1 0

SF.net SVN: pure-data:[10558] trunk/externals/iem/iemmatrix/src
by fzotter＠users.sourceforge.net 15 Jan '09

15 Jan '09

Revision: 10558 http://pure-data.svn.sourceforge.net/pure-data/?rev=10558&view=rev Author: fzotter Date: 2009-01-15 11:44:21 +0000 (Thu, 15 Jan 2009) Log Message: ----------- considered dependency of [mtx_eig] for complex eigenvalues on recent gsl versions Modified Paths: -------------- trunk/externals/iem/iemmatrix/src/config.h.in trunk/externals/iem/iemmatrix/src/configure.ac trunk/externals/iem/iemmatrix/src/mtx_eig.c Modified: trunk/externals/iem/iemmatrix/src/config.h.in =================================================================== --- trunk/externals/iem/iemmatrix/src/config.h.in 2009-01-15 11:13:32 UTC (rev 10557) +++ trunk/externals/iem/iemmatrix/src/config.h.in 2009-01-15 11:44:21 UTC (rev 10558) @@ -10,5 +10,9 @@ /* do we have libgsl installed? */ #undef HAVE_LIBGSL +/* can libgsl compute complex eigenvalues? */ +#undef HAVE_GSL_EIGEN_NONSYMM + + #endif /* CONFIG_H_ */ Modified: trunk/externals/iem/iemmatrix/src/configure.ac =================================================================== --- trunk/externals/iem/iemmatrix/src/configure.ac 2009-01-15 11:13:32 UTC (rev 10557) +++ trunk/externals/iem/iemmatrix/src/configure.ac 2009-01-15 11:44:21 UTC (rev 10558) @@ -76,7 +76,7 @@ dnl AC_CHECK_LIB([m], [cos]) AC_CHECK_LIB([gslcblas], [cblas_dgemm]) AC_CHECK_LIB([gsl], [gsl_blas_dgemm]) -AC_CHECK_FUNCS([gsl], [gsl_eigen_nonsymm], ) +AC_CHECK_LIB([gsl], [gsl_eigen_nonsymm],AC_DEFINE(HAVE_GSL_EIGEN_NONSYMM,1,[can gsl compute complex eigenvalues?])) if test "x$with_pd" != "x"; then Modified: trunk/externals/iem/iemmatrix/src/mtx_eig.c =================================================================== --- trunk/externals/iem/iemmatrix/src/mtx_eig.c 2009-01-15 11:13:32 UTC (rev 10557) +++ trunk/externals/iem/iemmatrix/src/mtx_eig.c 2009-01-15 11:44:21 UTC (rev 10558) @@ -26,7 +26,7 @@ struct _MTXEig_ { t_object x_obj; -#ifdef HAVE_LIBGSL_EIGEN_NONSYMM +#ifdef HAVE_GSL_EIGEN_NONSYMM gsl_matrix *a; gsl_matrix_complex *q; gsl_vector_complex *l; @@ -45,7 +45,7 @@ enum WithEigenVectors withevs; }; -#ifdef HAVE_LIBGSL_EIGEN_NONSYMM +#ifdef HAVE_GSL_EIGEN_NONSYMM static void allocMTXqlw (MTXEig *x) { x->a=(gsl_matrix*)gsl_matrix_alloc(x->size,x->size); @@ -103,7 +103,7 @@ static void deleteMTXEig (MTXEig *x) { -#ifdef HAVE_LIBGSL_EIGEN_NONSYMM +#ifdef HAVE_GSL_EIGEN_NONSYMM deleteMTXqlw(x); #endif } @@ -124,7 +124,7 @@ x->list_l_im = 0; x->list_q_re = 0; x->list_q_im = 0; -#ifdef HAVE_LIBGSL_EIGEN_NONSYMM +#ifdef HAVE_GSL_EIGEN_NONSYMM x->a=0; x->q=0; x->l=0; @@ -159,7 +159,7 @@ int n,m; float f; -#ifdef HAVE_LIBGSL_EIGEN_NONSYMM +#ifdef HAVE_GSL_EIGEN_NONSYMM gsl_complex c; /* size check */ if (!size) This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.

1 0

SF.net SVN: pure-data:[10557] trunk/externals/iem/iemmatrix/src
by fzotter＠users.sourceforge.net 15 Jan '09

15 Jan '09

Revision: 10557 http://pure-data.svn.sourceforge.net/pure-data/?rev=10557&view=rev Author: fzotter Date: 2009-01-15 11:13:32 +0000 (Thu, 15 Jan 2009) Log Message: ----------- corrected the dependency of [mtx_eig] on recent gsl versions Modified Paths: -------------- trunk/externals/iem/iemmatrix/src/configure.ac trunk/externals/iem/iemmatrix/src/mtx_eig.c Modified: trunk/externals/iem/iemmatrix/src/configure.ac =================================================================== --- trunk/externals/iem/iemmatrix/src/configure.ac 2009-01-14 21:38:14 UTC (rev 10556) +++ trunk/externals/iem/iemmatrix/src/configure.ac 2009-01-15 11:13:32 UTC (rev 10557) @@ -76,6 +76,7 @@ dnl AC_CHECK_LIB([m], [cos]) AC_CHECK_LIB([gslcblas], [cblas_dgemm]) AC_CHECK_LIB([gsl], [gsl_blas_dgemm]) +AC_CHECK_FUNCS([gsl], [gsl_eigen_nonsymm], ) if test "x$with_pd" != "x"; then Modified: trunk/externals/iem/iemmatrix/src/mtx_eig.c =================================================================== --- trunk/externals/iem/iemmatrix/src/mtx_eig.c 2009-01-14 21:38:14 UTC (rev 10556) +++ trunk/externals/iem/iemmatrix/src/mtx_eig.c 2009-01-15 11:13:32 UTC (rev 10557) @@ -26,7 +26,7 @@ struct _MTXEig_ { t_object x_obj; -#ifdef HAVE_LIBGSL +#ifdef HAVE_LIBGSL_EIGEN_NONSYMM gsl_matrix *a; gsl_matrix_complex *q; gsl_vector_complex *l; @@ -45,7 +45,7 @@ enum WithEigenVectors withevs; }; -#ifdef HAVE_LIBGSL +#ifdef HAVE_LIBGSL_EIGEN_NONSYMM static void allocMTXqlw (MTXEig *x) { x->a=(gsl_matrix*)gsl_matrix_alloc(x->size,x->size); @@ -103,7 +103,7 @@ static void deleteMTXEig (MTXEig *x) { -#ifdef HAVE_LIBGSL +#ifdef HAVE_LIBGSL_EIGEN_NONSYMM deleteMTXqlw(x); #endif } @@ -124,7 +124,7 @@ x->list_l_im = 0; x->list_q_re = 0; x->list_q_im = 0; -#ifdef HAVE_LIBGSL +#ifdef HAVE_LIBGSL_EIGEN_NONSYMM x->a=0; x->q=0; x->l=0; @@ -159,7 +159,7 @@ int n,m; float f; -#ifdef HAVE_LIBGSL +#ifdef HAVE_LIBGSL_EIGEN_NONSYMM gsl_complex c; /* size check */ if (!size) @@ -205,7 +205,7 @@ mTXEigBang(x); } #else - post("mtx_eig: implementation requires gsl"); + post("mtx_eig: implementation requires more recent gsl version to handle nonsymmetric matrices"); #endif } This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.

1 0

autobuild: pd-extended planetccrma9-i386 2009-01-15 04.08.11
by pd＠planetccrma9-i386.idmi.poly.edu 15 Jan '09

15 Jan '09

/home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:69: error: 'MTXSh' has no member named 'ws' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:70: error: 'MTXSh' has no member named 'l' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:75: error: 'MTXSh' has no member named 'nmax' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:83: error: 'MTXSh' has no member named 'l' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:83: error: 'MTXSh' has no member named 'nmax' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:83: error: 'MTXSh' has no member named 'nmax' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:105: error: 'MTXSh' has no member named 'l' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:107: error: 'MTXSh' has no member named 'l' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:111: error: 'MTXSh' has no member named 'l' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:116: error: 'MTXSh' has no member named 'ws' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:117: error: 'MTXSh' has no member named 'ws' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:117: error: too many arguments to function 'sharmonics' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:118: error: 'MTXSh' has no member named 'l' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:118: error: 'MTXSh' has no member named 'nmax' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:118: error: 'MTXSh' has no member named 'nmax' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:119: error: 'MTXSh' has no member named 'l' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:120: error: 'MTXSh' has no member named 'nmax' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:120: error: 'MTXSh' has no member named 'nmax' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:122: error: 'MTXSh' has no member named 'ws' rsync error: syntax or usage error (code 1) at main.c(1216) [receiver=3.0.4] the full logfile - if it has been succesfully uploaded - can be viewed at: http://autobuild.puredata.info/auto-build/2009-01-15/logs/2009-01-15_04.08.…

1 0

autobuild: pd-extended debian-stable-i386 2009-01-15 01.49.22
by pd＠debian-stable-i386.idmi.poly.edu 15 Jan '09

15 Jan '09

/home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:75: error: 'MTXSh' has no member named 'nmax' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:83: error: 'MTXSh' has no member named 'l' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:83: error: 'MTXSh' has no member named 'nmax' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:83: error: 'MTXSh' has no member named 'nmax' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:105: error: 'MTXSh' has no member named 'l' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:107: error: 'MTXSh' has no member named 'l' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:111: error: 'MTXSh' has no member named 'l' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:116: error: 'MTXSh' has no member named 'ws' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:117: error: 'MTXSh' has no member named 'ws' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:117: error: too many arguments to function 'sharmonics' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:118: error: 'MTXSh' has no member named 'l' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:118: error: 'MTXSh' has no member named 'nmax' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:118: error: 'MTXSh' has no member named 'nmax' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:119: error: 'MTXSh' has no member named 'l' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:120: error: 'MTXSh' has no member named 'nmax' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:120: error: 'MTXSh' has no member named 'nmax' /home/pd/auto-build/pd-extended/externals/iem/iemmatrix/src/mtx_spherical_harmonics.c:122: error: 'MTXSh' has no member named 'ws' ERROR: module is write only rsync error: syntax or usage error (code 1) at main.c(641) [sender=2.6.9] rsync error: error in rsync protocol data stream (code 12) at io.c(453) [receiver=2.6.9] the full logfile - if it has been succesfully uploaded - can be viewed at: http://autobuild.puredata.info/auto-build/2009-01-15/logs/2009-01-15_01.49.…

1 0

SF.net SVN: pure-data:[10556] trunk/pd/src
by millerpuckette＠users.sourceforge.net 14 Jan '09

14 Jan '09

Revision: 10556 http://pure-data.svn.sourceforge.net/pure-data/?rev=10556&view=rev Author: millerpuckette Date: 2009-01-14 21:38:14 +0000 (Wed, 14 Jan 2009) Log Message: ----------- 0.42-2 - setuid and find bug fixes Modified Paths: -------------- trunk/pd/src/m_binbuf.c trunk/pd/src/m_pd.h trunk/pd/src/s_inter.c Modified: trunk/pd/src/m_binbuf.c =================================================================== --- trunk/pd/src/m_binbuf.c 2009-01-14 15:39:26 UTC (rev 10555) +++ trunk/pd/src/m_binbuf.c 2009-01-14 21:38:14 UTC (rev 10556) @@ -1330,7 +1330,7 @@ } else if (a1->a_type == A_SYMBOL || a1->a_type == A_DOLLSYM) { - if ((a2->a_type != A_SYMBOL && a2->a_type == A_DOLLSYM) + if ((a2->a_type != A_SYMBOL && a2->a_type != A_DOLLSYM) || (wholeword && a1->a_w.w_symbol != a2->a_w.w_symbol) || (!wholeword && !strstr(a1->a_w.w_symbol->s_name, a2->a_w.w_symbol->s_name))) Modified: trunk/pd/src/m_pd.h =================================================================== --- trunk/pd/src/m_pd.h 2009-01-14 15:39:26 UTC (rev 10555) +++ trunk/pd/src/m_pd.h 2009-01-14 21:38:14 UTC (rev 10556) @@ -10,7 +10,7 @@ #define PD_MAJOR_VERSION 0 #define PD_MINOR_VERSION 42 -#define PD_BUGFIX_VERSION 2 +#define PD_BUGFIX_VERSION 3 #define PD_TEST_VERSION "" /* old name for "MSW" flag -- we have to take it for the sake of many old Modified: trunk/pd/src/s_inter.c =================================================================== --- trunk/pd/src/s_inter.c 2009-01-14 15:39:26 UTC (rev 10555) +++ trunk/pd/src/s_inter.c 2009-01-14 21:38:14 UTC (rev 10556) @@ -1097,7 +1097,7 @@ } else if (!childpid) /* we're the child */ { - seteuid(getuid()); /* lose setuid priveliges */ + setuid(getuid()); /* lose setuid priveliges */ #ifndef __APPLE__ /* the wish process in Unix will make a wish shell and read/write standard in and out unless we close the @@ -1173,14 +1173,14 @@ if (pipe(pipe9) < 0) { - seteuid(getuid()); /* lose setuid priveliges */ + setuid(getuid()); /* lose setuid priveliges */ sys_sockerror("pipe"); return (1); } watchpid = fork(); if (watchpid < 0) { - seteuid(getuid()); /* lose setuid priveliges */ + setuid(getuid()); /* lose setuid priveliges */ if (errno) perror("sys_startgui"); else fprintf(stderr, "sys_startgui failed\n"); @@ -1189,7 +1189,7 @@ else if (!watchpid) /* we're the child */ { sys_set_priority(1); - seteuid(getuid()); /* lose setuid priveliges */ + setuid(getuid()); /* lose setuid priveliges */ if (pipe9[1] != 0) { dup2(pipe9[0], 0); @@ -1206,7 +1206,7 @@ else /* we're the parent */ { sys_set_priority(0); - seteuid(getuid()); /* lose setuid priveliges */ + setuid(getuid()); /* lose setuid priveliges */ close(pipe9[0]); sys_watchfd = pipe9[1]; /* We also have to start the ping loop in the GUI; @@ -1214,7 +1214,7 @@ } } - seteuid(getuid()); /* lose setuid priveliges */ + setuid(getuid()); /* lose setuid priveliges */ #endif /* __linux__ */ #ifdef MSW This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.

1 0

SF.net SVN: pure-data:[10555] branches/pd-devel/0.41.4/src
by eighthave＠users.sourceforge.net 14 Jan '09

14 Jan '09

Revision: 10555 http://pure-data.svn.sourceforge.net/pure-data/?rev=10555&view=rev Author: eighthave Date: 2009-01-14 15:39:26 +0000 (Wed, 14 Jan 2009) Log Message: ----------- - enabled key bindings to the canvas so typing in boxes is possible - changed mouse button bindings to be more explicit (Button -> Button-1) and added in some right-click bindings Modified Paths: -------------- branches/pd-devel/0.41.4/src/pd_bindings.tcl branches/pd-devel/0.41.4/src/pdtk_canvas.tcl Modified: branches/pd-devel/0.41.4/src/pd_bindings.tcl =================================================================== --- branches/pd-devel/0.41.4/src/pd_bindings.tcl 2009-01-14 15:34:55 UTC (rev 10554) +++ branches/pd-devel/0.41.4/src/pd_bindings.tcl 2009-01-14 15:39:26 UTC (rev 10555) @@ -29,7 +29,7 @@ bind $mytoplevel <$modifier-Key-o> "menu_open" bind $mytoplevel <$modifier-Key-p> "menu_print $mytoplevel" bind $mytoplevel <$modifier-Key-q> "pdsend \"pd verifyquit ;\"" - bind $mytoplevel <$modifier-Key-r> "menu_raiseconsole" + bind $mytoplevel <$modifier-Key-r> "menu_raise_pdwindow" bind $mytoplevel <$modifier-Shift-Key-L> "menu_clear_console" bind $mytoplevel <$modifier-Shift-Key-Q> "pdsend \"pd quit ;\"" bind $mytoplevel <$modifier-Shift-Key-R> "menu_toggle_console" @@ -120,25 +120,33 @@ bind $mytoplevel <$modifier-Key-t> "menu_texteditor" } + bind $mycanvas <Key> "pdtk_canvas_sendkey %W 1 %K %A 0" + bind $mycanvas <Shift-Key> "pdtk_canvas_sendkey %W 1 %K %A 1" + bind $mycanvas <KeyRelease> "pdtk_canvas_sendkey %W 0 %K %A 0" + # mouse bindings ----------------------------------------------------------- # these need to be bound to $mytoplevel.c because %W will return $mytoplevel for # events over the window frame and $mytoplevel.c for events over the canvas bind $mycanvas <Motion> "pdtk_canvas_motion %W %x %y 0" - bind $mycanvas <Button> "pdtk_canvas_mouse %W %x %y %b 0" - bind $mycanvas <ButtonRelease> "pdtk_canvas_mouseup %W %x %y %b" - bind $mycanvas <$modifier-Button> "pdtk_canvas_mouse %W %x %y %b 0" + bind $mycanvas <Button-1> "pdtk_canvas_mouse %W %x %y %b 0" + bind $mycanvas <ButtonRelease-1> "pdtk_canvas_mouseup %W %x %y %b" + bind $mycanvas <$modifier-Button-1> "pdtk_canvas_mouse %W %x %y %b 0" # TODO look into "virtual events' for a means for getting Shift-Button, etc. switch {$::windowingsystem} { "aqua" { + bind $mycanvas <Button-2> "pdtk_canvas_rightclick %W %x %y %b" # on Mac OS X, emulate a rightclick with Ctrl-click - bind $mycanvas <Ctrl-Button> "pdtk_canvas_rightclick %W %x %y %b" - # TODO try replacing the above with this (and making it global by binding to "." - #bind all <Control-ButtonPress-1> {event generate %W <ButtonPress-2> \ + bind $mycanvas <Ctrl-Button-1> "pdtk_canvas_rightclick %W %x %y %b" + # TODO try replacing the above with this + #bind all <Control-Button-1> {event generate %W <Button-2> \ # -x %x -y %y -rootx %X -rooty %Y \ # -button 2 -time %t} } "x11" { + bind $mycanvas <Button-3> "pdtk_canvas_rightclick %W %x %y %b" # on X11, button 2 "pastes" from the X windows clipboard - bind $mycanvas <Button-2> "pdtk_canvas_clickpaste %W %x %y %b" + bind $mycanvas <Button-2> "pdtk_canvas_clickpaste %W %x %y %b" + } "win32" { + bind $mycanvas <Button-3> "pdtk_canvas_rightclick %W %x %y %b" } } #TODO bind $mytoplevel <MouseWheel> Modified: branches/pd-devel/0.41.4/src/pdtk_canvas.tcl =================================================================== --- branches/pd-devel/0.41.4/src/pdtk_canvas.tcl 2009-01-14 15:34:55 UTC (rev 10554) +++ branches/pd-devel/0.41.4/src/pdtk_canvas.tcl 2009-01-14 15:39:26 UTC (rev 10555) @@ -22,10 +22,11 @@ } else { # leave room for the menubar wm minsize $mytoplevel 310 30 } - canvas $mytoplevel.c -width $width -height $height -background white \ + set mycanvas $mytoplevel.c + canvas $mycanvas -width $width -height $height -background white \ -highlightthickness 0 # TODO add scrollbars here - pack $mytoplevel.c -side left -expand 1 -fill both + pack $mycanvas -side left -expand 1 -fill both ::pd_bindings::canvas_bindings $mytoplevel @@ -37,6 +38,9 @@ -command "popup_action $mytoplevel 1" $mytoplevel.popup add command -label "Help" \ -command "popup_action $mytoplevel 2" + + # give focus to the canvas so it gets the events rather than the window + focus $mycanvas } proc pdtk_canvas_saveas {name initfile initdir} { @@ -75,6 +79,36 @@ } #------------------------------------------------------------------------------# +# key usage + +proc pdtk_canvas_sendkey {mycanvas state key iso shift} { + if {$key == "BackSpace"} { + set iso "" + set key 8 + } elseif {$key == "Tab"} { + set iso "" + set key 9 + } elseif {$key == "Return"} { + set iso "" + set key 10 + } elseif {$key == "Escape"} { + set iso "" + set key 27 + } elseif {$key == "Space"} { + set iso "" + set key 32 + } elseif {$key == "Delete" || $key == "KP_Delete"} { + set iso "" + set key 127 + } + if {$iso != ""} { + scan $iso %c key + } + puts "pdtk_canvas_sendkey $key" + pdsend "[winfo toplevel $mycanvas] key $state $key $shift ;" +} + +#------------------------------------------------------------------------------# # procs for canvas events # "map" event tells us when the canvas becomes visible (arg is "0") or This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.

1 0

SF.net SVN: pure-data:[10554] branches/pd-devel/0.41.4/src/pd_menus.tcl
by eighthave＠users.sourceforge.net 14 Jan '09

14 Jan '09

Revision: 10554 http://pure-data.svn.sourceforge.net/pure-data/?rev=10554&view=rev Author: eighthave Date: 2009-01-14 15:34:55 +0000 (Wed, 14 Jan 2009) Log Message: ----------- enabled "raise pd window" and "find parent" in the menus Modified Paths: -------------- branches/pd-devel/0.41.4/src/pd_menus.tcl Modified: branches/pd-devel/0.41.4/src/pd_menus.tcl =================================================================== --- branches/pd-devel/0.41.4/src/pd_menus.tcl 2009-01-14 15:32:47 UTC (rev 10553) +++ branches/pd-devel/0.41.4/src/pd_menus.tcl 2009-01-14 15:34:55 UTC (rev 10554) @@ -209,9 +209,10 @@ $mymenu add command -label [say "Zoom"] -command "menu_zoom ." $mymenu add separator } - $mymenu add command -label [say "Parent Window"] -state disabled - $mymenu add command -label [say "Pd window"] -command "menu_raise_console" \ - -accelerator "$accelerator+R" -state disabled + $mymenu add command -label [say "Parent Window"] \ + -command "pdsend \"$mytoplevel findparent ;\"" + $mymenu add command -label [say "Pd window"] -command "menu_raise_pdwindow" \ + -accelerator "$accelerator+R" $mymenu add separator } This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.

1 0

SF.net SVN: pure-data:[10553] branches/pd-devel/0.41.4/src/pd_menucommands. tcl
by eighthave＠users.sourceforge.net 14 Jan '09

14 Jan '09

Revision: 10553 http://pure-data.svn.sourceforge.net/pure-data/?rev=10553&view=rev Author: eighthave Date: 2009-01-14 15:32:47 +0000 (Wed, 14 Jan 2009) Log Message: ----------- added menu_raise_pdwindow proc and put platform-specific procs at the end Modified Paths: -------------- branches/pd-devel/0.41.4/src/pd_menucommands.tcl Modified: branches/pd-devel/0.41.4/src/pd_menucommands.tcl =================================================================== --- branches/pd-devel/0.41.4/src/pd_menucommands.tcl 2009-01-14 14:36:28 UTC (rev 10552) +++ branches/pd-devel/0.41.4/src/pd_menucommands.tcl 2009-01-14 15:32:47 UTC (rev 10553) @@ -12,22 +12,6 @@ } # ------------------------------------------------------------------------------ -# Mac OS X specific functions - -proc ::pd_menucommands::menu_bringalltofront {} { - #use [winfo children .] here to get windows that are minimized - foreach item [winfo children .] { - #get all toplevel windows, exclude menubar windows - if { [string equal [winfo toplevel $item] $item] && [catch {$item cget -tearoff}]} { - wm deiconify $item - } - } - #be sure to deiconify ., since the above command only gets the child toplevels - wm deiconify . -} - - -# ------------------------------------------------------------------------------ # functions called from File menu proc ::pd_menucommands::menu_new {} { @@ -109,7 +93,6 @@ # ------------------------------------------------------------------------------ # window management functions - proc ::pd_menucommands::menu_minimize {} { set windowlist [wm stackorder .] if {$windowlist != {}} { @@ -122,3 +105,28 @@ wm state $mytoplevel zoomed } +proc menu_raise_pdwindow {} { + set pd_window . + set top_window [lindex [wm stackorder $pd_window] end] + if {$pd_window eq $top_window} { + lower $pd_window + } else { + wm deiconify $pd_window + raise $pd_window + } +} + +# ------------------------------------------------------------------------------ +# Mac OS X specific functions + +proc ::pd_menucommands::menu_bringalltofront {} { + #use [winfo children .] here to get windows that are minimized + foreach item [winfo children .] { + #get all toplevel windows, exclude menubar windows + if { [string equal [winfo toplevel $item] $item] && [catch {$item cget -tearoff}]} { + wm deiconify $item + } + } + #be sure to deiconify ., since the above command only gets the child toplevels + wm deiconify . +} This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.

1 0

← Newer
1
...
23
24
25
26
27
28
29
...
36
Older →

Jump to page:

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

2003

Pd-cvs January 2009