Skip to main content

notebooks - CDF, Player, PlayerPro, or something else?


I have a notebook, which contains a dozen or so custom functions all leading to the production of a simple static report, something like this:


enter image description here



I want to distribute this to a single user who will run (or execute) it a couple of times a day. I can get them a copy of Mathematica, but that seems overkill for this. They want something very simple.


The notebook as it stands gets computable data via FinancialData[] for a single instrument and has hard code for all other required inputs.


It requires only a single interaction with the user: pushing the "Run report" button (or some equivalent means of evaluating the code).


The code for the actual report uses some proprietary functions, which I want to protect and hide from the user.


Ideally, the end user should only see the latest report and the "Run report" button.


So, can anyone suggest the best solution for distributing such a computable but otherwise non-interactive report? It doesn't have any need for a Manipulate[] as I see it, so at first thought CDF seems the wrong fit.


Should I go with Player or Player Pro and simply hide the cells with functions? Does CDF make more sense?


CDF, Player Pro, Notebook comparison


I think you can see that I want simple, robust, and secure for this. Just a simple stand alone app.


Thx.



P.S., We don't seem to have a tag for "player".



Answer



I think this sounds like an ideal use case for a CDF document and the free CDF player to "play" it. It's not necessary that the interactivity within a CDF document is more complicated than reacting to a button press :-). You will find other answers with examples that show that it is also not necessary to use a Manipulate, you can very well deploy a custom gui based on e.g. DynamicModule as a CDF document as well. It's easy enough to create a Manipulate with the desired functionality, though:


Manipulate[
result = runit[];
Dynamic[result],
{result, None},
Button["Run", result = runit[];, Method -> "Queued"],
Initialization :> (runit[] :=
DateListPlot[{#1, #2 + RandomReal[]} & @@@

FinancialData["GE", "Jan. 1, 2010"]]),
SynchronousInitialization -> False
]

The only drawback with using the free CDF player for your use case that I see is that it's not possible to securely hide your code (except for whatever you write yourself to hide it, which might be more or less hard to uncover). There are means to hide it in such a way that it will need rather good knowledge and some criminal effort to uncover it, but usually these approaches turn out to be surprisingly simple to hack if you let the right people try.


If your end user gets a PlayerPro license you can in principle deploy your program as an encrypted package (which the PlayerPro can read but not the CDF-Player). You can then also create such encrypted packages that only will run on specific machines (checking $MachineId) or with specific licenses (checking $LicenseID). That is a relative straightforward way to ensure that the code won't be passed away.


There are rumours that this encryption is also not terrible difficult to hack. Doing so would actually need somewhat more criminal effort than hacking an "obfuscated" CDF-Document but I absolutely wouldn't exclude it can be done. With PlayerPro you can also load a .mx package which are considered somewhat safer than an encryped package but honestly it's not clear to me whether that's really true (that they are safer). .mx files are also platform dependent, so depending on how many customers and platforms you need to support that might add some complexity. And as they are, AFAIK, no "cross platform save" possibilities the only way to create the .mx files for a set of platforms is to have a Mathematica installed and licensed one each of those you want to support (possibly in 32 and 64 bit variants).


My personal opinion is that code is "protected" well enough if the effort to hack it is higher than the effort to rewrite it. If you ask the right persons it often turns out that hurdles for both alternatives are a lot lower than one would have guessed. On the other hand I would consider it to be an overestimation of my own code that those "right persons" would try or be engaged to hack it. So my suggestion would be to use a CDF-document with code coming e.g. from a compressed expression and include a license information which makes clear what the user is allowed to do and what not. I found that this will, at least within a professional environment, almost always have the desired effect.


Comments

Popular posts from this blog

plotting - How to draw lines between specified dots on ListPlot?

I would like to create a plot where I have unconnected dots and some connected. So far, I have figured out how to draw the dots. My code is the following: ListPlot[{{1, 1}, {2, 2}, {3, 3}, {4, 4}, {1, 4}, {2, 5}, {3, 6}, {4, 7}, {1, 7}, {2, 8}, {3, 9}, {4, 10}, {1, 10}, {2, 11}, {3, 12}, {4,13}, {2.5, 7}}, Ticks -> {{1, 2, 3, 4}, None}, AxesStyle -> Thin, TicksStyle -> Directive[Black, Bold, 12], Mesh -> Full] I have thought using ListLinePlot command, but I don't know how to specify to the command to draw only selected lines between the dots. Do have any suggestions/hints on how to do that? Thank you. Answer One possibility would be to use Epilog with Line : ListPlot[ {{1, 1}, {2, 2}, {3, 3}, {4, 4}, {1, 4}, {2, 5}, {3, 6}, {4, 7}, {1, 7}, {2, 8}, {3, 9}, {4, 10}, {1, 10}, {2, 11}, {3, 12}, {4, 13}, {2.5, 7}}, Ticks -> {{1, 2, 3, 4}, None}, AxesStyle -> Thin, TicksStyle -> Directive[Black, Bold, 12], Mesh -> Full, Epilog -> { Line[ ...

equation solving - Invert and fit implicitly defined curve

I need to fit an implicitly defined curve. I thought I could get some data out of Solve , and then using FindFit . Therefore, I would like to find the relation the parametric curve defined by $F(x,y)=0$: Solve[-(1/2) + 1/2 (0.41202 BesselK[0, 0.1 Sqrt[x^2 + y^2]] + (0.101483 x BesselK[1, 0.1 Sqrt[x^2 + y^2]])/Sqrt[x^2 + y^2]) == 0, y] But I can't get an output: Solve was unable to solve the system with inexact coefficients or the system obtained by direct rationalization of inexact numbers present in the system. Since many of the methods used by Solve require exact input, providing Solve with an exact version of the system may help. >> Edit: In particular, I would like to fit the data coming from the curve with the expression of another curve, and not with a function $f(x)$. In particular, since this clearly looks like a cardioid , I would like it to fit to something like it. What other strategies could I try?

dynamic - How can I make a clickable ArrayPlot that returns input?

I would like to create a dynamic ArrayPlot so that the rectangles, when clicked, provide the input. Can I use ArrayPlot for this? Or is there something else I should have to use? Answer ArrayPlot is much more than just a simple array like Grid : it represents a ranged 2D dataset, and its visualization can be finetuned by options like DataReversed and DataRange . These features make it quite complicated to reproduce the same layout and order with Grid . Here I offer AnnotatedArrayPlot which comes in handy when your dataset is more than just a flat 2D array. The dynamic interface allows highlighting individual cells and possibly interacting with them. AnnotatedArrayPlot works the same way as ArrayPlot and accepts the same options plus Enabled , HighlightCoordinates , HighlightStyle and HighlightElementFunction . data = {{Missing["HasSomeMoreData"], GrayLevel[ 1], {RGBColor[0, 1, 1], RGBColor[0, 0, 1], GrayLevel[1]}, RGBColor[0, 1, 0]}, {GrayLevel[0], GrayLevel...